diff --git a/index.html b/index.html
index f42eeae2c..8a82ca828 100644
--- a/index.html
+++ b/index.html
@@ -260,7 +260,7 @@ <h3>Derived Types</h3>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/compute_d2tgc.html b/interface/compute_d2tgc.html
index e729b2bf2..97c81fb32 100644
--- a/interface/compute_d2tgc.html
+++ b/interface/compute_d2tgc.html
@@ -82,15 +82,15 @@ <h1>compute_d2Tgc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">compute_d2Tgc</li>
           </ol>
         </nav>
@@ -128,10 +128,10 @@ <h4 class="card-header bg-primary text-white">Subroutines</h4>
       </a>
       <div id="subs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../interface/compute_d2tgc.html#proc-compute_d2tgc_bspline_3d_scalar">compute_d2Tgc_bspline_3d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_d2tgc.html#proc-compute_d2tgc_bspline_3d_vector">compute_d2Tgc_bspline_3d_vector</a>
-            <a class="list-group-item" href="../interface/compute_d2tgc.html#proc-compute_d2tgc_nurbs_3d_scalar">compute_d2Tgc_nurbs_3d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_d2tgc.html#proc-compute_d2tgc_nurbs_3d_vector">compute_d2Tgc_nurbs_3d_vector</a>
+            <a class="list-group-item" href="../interface/compute_d2tgc.html#proc-compute_d2tgc_bspline_1d_scalar">compute_d2Tgc_bspline_1d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_d2tgc.html#proc-compute_d2tgc_bspline_1d_vector">compute_d2Tgc_bspline_1d_vector</a>
+            <a class="list-group-item" href="../interface/compute_d2tgc.html#proc-compute_d2tgc_nurbs_1d_scalar">compute_d2Tgc_nurbs_1d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_d2tgc.html#proc-compute_d2tgc_nurbs_1d_vector">compute_d2Tgc_nurbs_1d_vector</a>
         </div>
       </div>
     </div>
@@ -163,97 +163,97 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: interface~~compute_d2tgc~~CalledByGraph Pages: 1 -->
-<svg id="interfacecompute_d2tgcCalledByGraph" width="641pt" height="54pt"
- viewBox="0.00 0.00 641.00 53.78" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~compute_d2tgc~~CalledByGraph" class="graph" transform="scale(1.38 1.38) rotate(0) translate(4 70)">
+<svg id="interfacecompute_d2tgcCalledByGraph" width="641pt" height="56pt"
+ viewBox="0.00 0.00 641.00 55.54" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~compute_d2tgc~~CalledByGraph" class="graph" transform="scale(1.33 1.33) rotate(0) translate(4 70)">
 <title>interface~~compute_d2tgc~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 878,-70 878,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 850,-70 850,4 -4,4"/>
 <!-- interface~compute_d2tgc -->
 <g id="interface~~compute_d2tgc~~CalledByGraph_node1" class="node">
 <title>interface~compute_d2tgc</title>
-<polygon fill="none" stroke="black" points="874,-45 776,-45 776,-21 874,-21 874,-45"/>
-<text text-anchor="middle" x="825" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_d2Tgc</text>
+<polygon fill="none" stroke="black" points="846,-45 748,-45 748,-21 846,-21 846,-45"/>
+<text text-anchor="middle" x="797" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_d2Tgc</text>
 </g>
 <!-- proc~derivative2_scalar -->
 <g id="interface~~compute_d2tgc~~CalledByGraph_node2" class="node">
 <title>proc~derivative2_scalar</title>
-<g id="a_interface~~compute_d2tgc~~CalledByGraph_node2"><a xlink:href="../proc/derivative2_scalar.html" xlink:title="nurbs_volume%derivative2_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="739.5,-66 544.5,-66 544.5,-42 739.5,-42 739.5,-66"/>
-<text text-anchor="middle" x="642" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_scalar</text>
+<g id="a_interface~~compute_d2tgc~~CalledByGraph_node2"><a xlink:href="../proc/derivative2_scalar.html" xlink:title="nurbs_curve%derivative2_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="711,-66 526,-66 526,-42 711,-42 711,-66"/>
+<text text-anchor="middle" x="618.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_scalar&#45;&gt;interface~compute_d2tgc -->
 <g id="interface~~compute_d2tgc~~CalledByGraph_edge1" class="edge">
 <title>proc~derivative2_scalar&#45;&gt;interface~compute_d2tgc</title>
-<path fill="none" stroke="#ff0000" d="M739.59,-42.79C748.46,-41.76 757.24,-40.75 765.61,-39.77"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="766.05,-43.25 775.58,-38.62 765.24,-36.29 766.05,-43.25"/>
+<path fill="none" stroke="#ff0000" d="M711.11,-43.1C720.06,-42.04 728.97,-40.98 737.46,-39.97"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="738.07,-43.42 747.58,-38.76 737.24,-36.47 738.07,-43.42"/>
 </g>
 <!-- proc~derivative2_vector -->
 <g id="interface~~compute_d2tgc~~CalledByGraph_node3" class="node">
 <title>proc~derivative2_vector</title>
-<g id="a_interface~~compute_d2tgc~~CalledByGraph_node3"><a xlink:href="../proc/derivative2_vector.html" xlink:title="nurbs_volume%derivative2_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="740,-24 544,-24 544,0 740,0 740,-24"/>
-<text text-anchor="middle" x="642" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_vector</text>
+<g id="a_interface~~compute_d2tgc~~CalledByGraph_node3"><a xlink:href="../proc/derivative2_vector.html" xlink:title="nurbs_curve%derivative2_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="712,-24 525,-24 525,0 712,0 712,-24"/>
+<text text-anchor="middle" x="618.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_vector&#45;&gt;interface~compute_d2tgc -->
 <g id="interface~~compute_d2tgc~~CalledByGraph_edge2" class="edge">
 <title>proc~derivative2_vector&#45;&gt;interface~compute_d2tgc</title>
-<path fill="none" stroke="#ff0000" d="M740.12,-23.27C748.85,-24.28 757.49,-25.28 765.73,-26.24"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="765.58,-29.75 775.92,-27.42 766.39,-22.79 765.58,-29.75"/>
+<path fill="none" stroke="#ff0000" d="M712.14,-23.02C720.8,-24.05 729.41,-25.08 737.62,-26.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="737.45,-29.56 747.79,-27.26 738.27,-22.61 737.45,-29.56"/>
 </g>
 <!-- none~derivative2 -->
 <g id="interface~~compute_d2tgc~~CalledByGraph_node4" class="node">
 <title>none~derivative2</title>
-<g id="a_interface~~compute_d2tgc~~CalledByGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2" xlink:title="nurbs_volume%derivative2">
-<polygon fill="#a7506f" stroke="#a7506f" points="508,-45 351,-45 351,-21 508,-21 508,-45"/>
-<text text-anchor="middle" x="429.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2</text>
+<g id="a_interface~~compute_d2tgc~~CalledByGraph_node4"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative2" xlink:title="nurbs_curve%derivative2">
+<polygon fill="#a7506f" stroke="#a7506f" points="489,-45 341,-45 341,-21 489,-21 489,-45"/>
+<text text-anchor="middle" x="415" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2&#45;&gt;proc~derivative2_scalar -->
 <g id="interface~~compute_d2tgc~~CalledByGraph_edge3" class="edge">
 <title>none~derivative2&#45;&gt;proc~derivative2_scalar</title>
-<path fill="none" stroke="#ff0000" d="M508.28,-40.76C516.7,-41.6 525.37,-42.46 534.06,-43.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="533.95,-46.84 544.25,-44.35 534.64,-39.87 533.95,-46.84"/>
+<path fill="none" stroke="#ff0000" d="M489.03,-40.61C497.71,-41.52 506.68,-42.45 515.66,-43.39"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="515.48,-46.89 525.79,-44.44 516.21,-39.92 515.48,-46.89"/>
 </g>
 <!-- none~derivative2&#45;&gt;proc~derivative2_vector -->
 <g id="interface~~compute_d2tgc~~CalledByGraph_edge4" class="edge">
 <title>none~derivative2&#45;&gt;proc~derivative2_vector</title>
-<path fill="none" stroke="#00ffff" d="M508.28,-25.24C516.62,-24.41 525.2,-23.55 533.8,-22.69"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="534.28,-26.16 543.88,-21.69 533.59,-19.2 534.28,-26.16"/>
+<path fill="none" stroke="#00ffff" d="M489.03,-25.39C497.37,-24.52 505.98,-23.62 514.62,-22.72"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="515.16,-26.18 524.74,-21.67 514.44,-19.22 515.16,-26.18"/>
 </g>
 <!-- proc~nearest_point2 -->
 <g id="interface~~compute_d2tgc~~CalledByGraph_node5" class="node">
 <title>proc~nearest_point2</title>
-<g id="a_interface~~compute_d2tgc~~CalledByGraph_node5"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_volume%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="315,-45 139,-45 139,-21 315,-21 315,-45"/>
-<text text-anchor="middle" x="227" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
+<g id="a_interface~~compute_d2tgc~~CalledByGraph_node5"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_curve%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="305,-45 139,-45 139,-21 305,-21 305,-45"/>
+<text text-anchor="middle" x="222" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2&#45;&gt;none~derivative2 -->
 <g id="interface~~compute_d2tgc~~CalledByGraph_edge5" class="edge">
 <title>proc~nearest_point2&#45;&gt;none~derivative2</title>
-<path fill="none" stroke="#ff0000" d="M315.07,-33C323.65,-33 332.37,-33 340.95,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="340.96,-36.5 350.96,-33 340.96,-29.5 340.96,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M305.11,-33C313.59,-33 322.22,-33 330.71,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="330.99,-36.5 340.99,-33 330.99,-29.5 330.99,-36.5"/>
 </g>
-<!-- program~nearest_point_3d -->
+<!-- program~nearest_point_1d -->
 <g id="interface~~compute_d2tgc~~CalledByGraph_node6" class="node">
-<title>program~nearest_point_3d</title>
-<g id="a_interface~~compute_d2tgc~~CalledByGraph_node6"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<title>program~nearest_point_1d</title>
+<g id="a_interface~~compute_d2tgc~~CalledByGraph_node6"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-45 0,-45 0,-21 103,-21 103,-45"/>
-<text text-anchor="middle" x="51.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
+<text text-anchor="middle" x="51.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
+<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2 -->
 <g id="interface~~compute_d2tgc~~CalledByGraph_edge6" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
-<path fill="none" stroke="#ff0000" d="M103.15,-33C111.2,-33 119.76,-33 128.46,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="128.73,-36.5 138.73,-33 128.73,-29.5 128.73,-36.5"/>
+<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2</title>
+<path fill="none" stroke="#ff0000" d="M103.06,-33C111.3,-33 120.05,-33 128.92,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="128.97,-36.5 138.97,-33 128.97,-29.5 128.97,-36.5"/>
 </g>
 </g>
 </svg>
@@ -346,7 +346,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
 
         <h2>Subroutines</h2>
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_bspline_3d_scalar"></span> <h3>private pure subroutine compute_d2Tgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_d2Tgc, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_bspline_1d_scalar"></span> <h3>private pure subroutine compute_d2Tgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_d2Tgc, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -364,52 +364,22 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~12"></span>
+              <span class="anchor" id="variable-f_xt~8"></span>
               real(kind=rk),
             </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_Xt</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot1~12"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot2~12"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
+<td>intent(in)</td>
               <td></td>            <td>
-              contiguous
+              
             </td>
             <td>::</td>
-            <td><strong>f_knot2</strong>(:)</td>
+            <td><strong>f_Xt</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot3~12"></span>
+              <span class="anchor" id="variable-f_knot~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -417,14 +387,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot3</strong>(:)</td>
+            <td><strong>f_knot</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~12"></span>
+              <span class="anchor" id="variable-f_degree~8"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -432,14 +402,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(3)</td>
+            <td><strong>f_degree</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~12"></span>
+              <span class="anchor" id="variable-f_nc~8"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -447,7 +417,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(3)</td>
+            <td><strong>f_nc</strong></td>
             <td>
                 
             </td>
@@ -462,14 +432,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_d2Tgc</strong>(:,:)</td>
+            <td><strong>f_d2Tgc</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~8"></span>
+              <span class="anchor" id="variable-f_dtgc~4"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -477,14 +447,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_dTgc</strong>(:,:)</td>
+            <td><strong>f_dTgc</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~8"></span>
+              <span class="anchor" id="variable-f_tgc~4"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -505,7 +475,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_bspline_3d_vector"></span> <h3>private pure subroutine compute_d2Tgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_bspline_1d_vector"></span> <h3>private pure subroutine compute_d2Tgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -523,22 +493,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~10"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_Xt</strong>(:,:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot1~10"></span>
+              <span class="anchor" id="variable-f_xt~6"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -546,29 +501,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot2~10"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot2</strong>(:)</td>
+            <td><strong>f_Xt</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot3~10"></span>
+              <span class="anchor" id="variable-f_knot~6"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -576,14 +516,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot3</strong>(:)</td>
+            <td><strong>f_knot</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~10"></span>
+              <span class="anchor" id="variable-f_degree~6"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -591,14 +531,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(3)</td>
+            <td><strong>f_degree</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~10"></span>
+              <span class="anchor" id="variable-f_nc~6"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -606,14 +546,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(3)</td>
+            <td><strong>f_nc</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~6"></span>
+              <span class="anchor" id="variable-f_ng~4"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -621,7 +561,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong>(3)</td>
+            <td><strong>f_ng</strong></td>
             <td>
                 
             </td>
@@ -636,14 +576,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_d2Tgc</strong>(:,:,:)</td>
+            <td><strong>f_d2Tgc</strong>(:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~6"></span>
+              <span class="anchor" id="variable-f_dtgc~2"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -651,14 +591,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_dTgc</strong>(:,:,:)</td>
+            <td><strong>f_dTgc</strong>(:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~6"></span>
+              <span class="anchor" id="variable-f_tgc~2"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -679,7 +619,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_nurbs_3d_scalar"></span> <h3>private pure subroutine compute_d2Tgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_nurbs_1d_scalar"></span> <h3>private pure subroutine compute_d2Tgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -697,52 +637,22 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~11"></span>
+              <span class="anchor" id="variable-f_xt~7"></span>
               real(kind=rk),
             </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_Xt</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot1~11"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot2~11"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
+<td>intent(in)</td>
               <td></td>            <td>
-              contiguous
+              
             </td>
             <td>::</td>
-            <td><strong>f_knot2</strong>(:)</td>
+            <td><strong>f_Xt</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot3~11"></span>
+              <span class="anchor" id="variable-f_knot~7"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -750,14 +660,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot3</strong>(:)</td>
+            <td><strong>f_knot</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~11"></span>
+              <span class="anchor" id="variable-f_degree~7"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -765,14 +675,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(3)</td>
+            <td><strong>f_degree</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~11"></span>
+              <span class="anchor" id="variable-f_nc~7"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -780,14 +690,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(3)</td>
+            <td><strong>f_nc</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~6"></span>
+              <span class="anchor" id="variable-f_wc~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -810,14 +720,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_d2Tgc</strong>(:,:)</td>
+            <td><strong>f_d2Tgc</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~7"></span>
+              <span class="anchor" id="variable-f_dtgc~3"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -825,14 +735,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_dTgc</strong>(:,:)</td>
+            <td><strong>f_dTgc</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~7"></span>
+              <span class="anchor" id="variable-f_tgc~3"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -853,7 +763,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_nurbs_3d_vector"></span> <h3>private pure subroutine compute_d2Tgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_nurbs_1d_vector"></span> <h3>private pure subroutine compute_d2Tgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -871,22 +781,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~9"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_Xt</strong>(:,:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot1~9"></span>
+              <span class="anchor" id="variable-f_xt~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -894,29 +789,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot2~9"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot2</strong>(:)</td>
+            <td><strong>f_Xt</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot3~9"></span>
+              <span class="anchor" id="variable-f_knot~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -924,14 +804,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot3</strong>(:)</td>
+            <td><strong>f_knot</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~9"></span>
+              <span class="anchor" id="variable-f_degree~5"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -939,14 +819,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(3)</td>
+            <td><strong>f_degree</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~9"></span>
+              <span class="anchor" id="variable-f_nc~5"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -954,14 +834,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(3)</td>
+            <td><strong>f_nc</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~5"></span>
+              <span class="anchor" id="variable-f_ng~3"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -969,14 +849,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong>(3)</td>
+            <td><strong>f_ng</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~5"></span>
+              <span class="anchor" id="variable-f_wc~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -999,14 +879,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_d2Tgc</strong>(:,:,:)</td>
+            <td><strong>f_d2Tgc</strong>(:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~5"></span>
+              <span class="anchor" id="variable-f_dtgc"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -1014,14 +894,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_dTgc</strong>(:,:,:)</td>
+            <td><strong>f_dTgc</strong>(:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~5"></span>
+              <span class="anchor" id="variable-f_tgc"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -1059,7 +939,7 @@ <h4>Arguments</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/compute_d2tgc~2.html b/interface/compute_d2tgc~2.html
index dfde958ef..a4be0e026 100644
--- a/interface/compute_d2tgc~2.html
+++ b/interface/compute_d2tgc~2.html
@@ -82,15 +82,15 @@ <h1>compute_d2Tgc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">compute_d2Tgc</li>
           </ol>
         </nav>
@@ -128,10 +128,10 @@ <h4 class="card-header bg-primary text-white">Subroutines</h4>
       </a>
       <div id="subs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../interface/compute_d2tgc~2.html#proc-compute_d2tgc_bspline_2d_scalar">compute_d2Tgc_bspline_2d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_d2tgc~2.html#proc-compute_d2tgc_bspline_2d_vector">compute_d2Tgc_bspline_2d_vector</a>
-            <a class="list-group-item" href="../interface/compute_d2tgc~2.html#proc-compute_d2tgc_nurbs_2d_scalar">compute_d2Tgc_nurbs_2d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_d2tgc~2.html#proc-compute_d2tgc_nurbs_2d_vector">compute_d2Tgc_nurbs_2d_vector</a>
+            <a class="list-group-item" href="../interface/compute_d2tgc~2.html#proc-compute_d2tgc_bspline_3d_scalar">compute_d2Tgc_bspline_3d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_d2tgc~2.html#proc-compute_d2tgc_bspline_3d_vector">compute_d2Tgc_bspline_3d_vector</a>
+            <a class="list-group-item" href="../interface/compute_d2tgc~2.html#proc-compute_d2tgc_nurbs_3d_scalar">compute_d2Tgc_nurbs_3d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_d2tgc~2.html#proc-compute_d2tgc_nurbs_3d_vector">compute_d2Tgc_nurbs_3d_vector</a>
         </div>
       </div>
     </div>
@@ -177,9 +177,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~derivative2_scalar~2 -->
 <g id="interface~~compute_d2tgc~2~~CalledByGraph_node2" class="node">
 <title>proc~derivative2_scalar~2</title>
-<g id="a_interface~~compute_d2tgc~2~~CalledByGraph_node2"><a xlink:href="../proc/derivative2_scalar~2.html" xlink:title="nurbs_surface%derivative2_scalar">
+<g id="a_interface~~compute_d2tgc~2~~CalledByGraph_node2"><a xlink:href="../proc/derivative2_scalar~2.html" xlink:title="nurbs_volume%derivative2_scalar">
 <polygon fill="#d9534f" stroke="#d9534f" points="739.5,-66 544.5,-66 544.5,-42 739.5,-42 739.5,-66"/>
-<text text-anchor="middle" x="642" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_scalar</text>
+<text text-anchor="middle" x="642" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_scalar</text>
 </a>
 </g>
 </g>
@@ -192,9 +192,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~derivative2_vector~2 -->
 <g id="interface~~compute_d2tgc~2~~CalledByGraph_node3" class="node">
 <title>proc~derivative2_vector~2</title>
-<g id="a_interface~~compute_d2tgc~2~~CalledByGraph_node3"><a xlink:href="../proc/derivative2_vector~2.html" xlink:title="nurbs_surface%derivative2_vector">
+<g id="a_interface~~compute_d2tgc~2~~CalledByGraph_node3"><a xlink:href="../proc/derivative2_vector~2.html" xlink:title="nurbs_volume%derivative2_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="740,-24 544,-24 544,0 740,0 740,-24"/>
-<text text-anchor="middle" x="642" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_vector</text>
+<text text-anchor="middle" x="642" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_vector</text>
 </a>
 </g>
 </g>
@@ -207,9 +207,9 @@ <h3 class="card-title">Called by</h3>
 <!-- none~derivative2~2 -->
 <g id="interface~~compute_d2tgc~2~~CalledByGraph_node4" class="node">
 <title>none~derivative2~2</title>
-<g id="a_interface~~compute_d2tgc~2~~CalledByGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~2" xlink:title="nurbs_surface%derivative2">
+<g id="a_interface~~compute_d2tgc~2~~CalledByGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2~2" xlink:title="nurbs_volume%derivative2">
 <polygon fill="#a7506f" stroke="#a7506f" points="508,-45 351,-45 351,-21 508,-21 508,-45"/>
-<text text-anchor="middle" x="429.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2</text>
+<text text-anchor="middle" x="429.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2</text>
 </a>
 </g>
 </g>
@@ -228,9 +228,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~nearest_point2~2 -->
 <g id="interface~~compute_d2tgc~2~~CalledByGraph_node5" class="node">
 <title>proc~nearest_point2~2</title>
-<g id="a_interface~~compute_d2tgc~2~~CalledByGraph_node5"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_surface%nearest_point2">
+<g id="a_interface~~compute_d2tgc~2~~CalledByGraph_node5"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_volume%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="315,-45 139,-45 139,-21 315,-21 315,-45"/>
-<text text-anchor="middle" x="227" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
+<text text-anchor="middle" x="227" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
 </a>
 </g>
 </g>
@@ -240,18 +240,18 @@ <h3 class="card-title">Called by</h3>
 <path fill="none" stroke="#ff0000" d="M315.07,-33C323.65,-33 332.37,-33 340.95,-33"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="340.96,-36.5 350.96,-33 340.96,-29.5 340.96,-36.5"/>
 </g>
-<!-- program~nearest_point_2d -->
+<!-- program~nearest_point_3d -->
 <g id="interface~~compute_d2tgc~2~~CalledByGraph_node6" class="node">
-<title>program~nearest_point_2d</title>
-<g id="a_interface~~compute_d2tgc~2~~CalledByGraph_node6"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
+<title>program~nearest_point_3d</title>
+<g id="a_interface~~compute_d2tgc~2~~CalledByGraph_node6"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-45 0,-45 0,-21 103,-21 103,-45"/>
-<text text-anchor="middle" x="51.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<text text-anchor="middle" x="51.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
 <g id="interface~~compute_d2tgc~2~~CalledByGraph_edge6" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
 <path fill="none" stroke="#ff0000" d="M103.15,-33C111.2,-33 119.76,-33 128.46,-33"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="128.73,-36.5 138.73,-33 128.73,-29.5 128.73,-36.5"/>
 </g>
@@ -346,7 +346,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
 
         <h2>Subroutines</h2>
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_bspline_2d_scalar"></span> <h3>private pure subroutine compute_d2Tgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, nc, f_d2Tgc, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_bspline_3d_scalar"></span> <h3>private pure subroutine compute_d2Tgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_d2Tgc, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -379,7 +379,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot1~28"></span>
+              <span class="anchor" id="variable-f_knot1~12"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -394,7 +394,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot2~28"></span>
+              <span class="anchor" id="variable-f_knot2~12"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -407,6 +407,21 @@ <h4>Arguments</h4>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot3~12"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-f_degree~28"></span>
@@ -417,14 +432,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(2)</td>
+            <td><strong>f_degree</strong>(3)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~28"></span>
+              <span class="anchor" id="variable-f_nc~28"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -432,7 +447,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>nc</strong>(2)</td>
+            <td><strong>f_nc</strong>(3)</td>
             <td>
                 
             </td>
@@ -490,7 +505,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_bspline_2d_vector"></span> <h3>private pure subroutine compute_d2Tgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_bspline_3d_vector"></span> <h3>private pure subroutine compute_d2Tgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -523,7 +538,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot1~26"></span>
+              <span class="anchor" id="variable-f_knot1~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -538,7 +553,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot2~26"></span>
+              <span class="anchor" id="variable-f_knot2~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -551,6 +566,21 @@ <h4>Arguments</h4>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot3~10"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-f_degree~26"></span>
@@ -561,14 +591,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(2)</td>
+            <td><strong>f_degree</strong>(3)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~27"></span>
+              <span class="anchor" id="variable-f_nc~26"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -576,7 +606,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>nc</strong>(2)</td>
+            <td><strong>f_nc</strong>(3)</td>
             <td>
                 
             </td>
@@ -591,7 +621,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong>(2)</td>
+            <td><strong>f_ng</strong>(3)</td>
             <td>
                 
             </td>
@@ -649,7 +679,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_nurbs_2d_scalar"></span> <h3>private pure subroutine compute_d2Tgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_nurbs_3d_scalar"></span> <h3>private pure subroutine compute_d2Tgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -682,7 +712,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot1~27"></span>
+              <span class="anchor" id="variable-f_knot1~11"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -697,7 +727,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot2~27"></span>
+              <span class="anchor" id="variable-f_knot2~11"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -710,6 +740,21 @@ <h4>Arguments</h4>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot3~11"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-f_degree~27"></span>
@@ -720,14 +765,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(2)</td>
+            <td><strong>f_degree</strong>(3)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~24"></span>
+              <span class="anchor" id="variable-f_nc~27"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -735,7 +780,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(2)</td>
+            <td><strong>f_nc</strong>(3)</td>
             <td>
                 
             </td>
@@ -808,7 +853,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_nurbs_2d_vector"></span> <h3>private pure subroutine compute_d2Tgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_nurbs_3d_vector"></span> <h3>private pure subroutine compute_d2Tgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -841,7 +886,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot1~25"></span>
+              <span class="anchor" id="variable-f_knot1~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -856,7 +901,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot2~25"></span>
+              <span class="anchor" id="variable-f_knot2~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -869,6 +914,21 @@ <h4>Arguments</h4>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot3~9"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-f_degree~25"></span>
@@ -879,14 +939,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(2)</td>
+            <td><strong>f_degree</strong>(3)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~23"></span>
+              <span class="anchor" id="variable-f_nc~25"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -894,7 +954,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(2)</td>
+            <td><strong>f_nc</strong>(3)</td>
             <td>
                 
             </td>
@@ -909,7 +969,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong>(2)</td>
+            <td><strong>f_ng</strong>(3)</td>
             <td>
                 
             </td>
@@ -999,7 +1059,7 @@ <h4>Arguments</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/compute_d2tgc~3.html b/interface/compute_d2tgc~3.html
index 1ae4ea4d4..8e597ca29 100644
--- a/interface/compute_d2tgc~3.html
+++ b/interface/compute_d2tgc~3.html
@@ -82,15 +82,15 @@ <h1>compute_d2Tgc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">compute_d2Tgc</li>
           </ol>
         </nav>
@@ -128,10 +128,10 @@ <h4 class="card-header bg-primary text-white">Subroutines</h4>
       </a>
       <div id="subs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../interface/compute_d2tgc~3.html#proc-compute_d2tgc_bspline_1d_scalar">compute_d2Tgc_bspline_1d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_d2tgc~3.html#proc-compute_d2tgc_bspline_1d_vector">compute_d2Tgc_bspline_1d_vector</a>
-            <a class="list-group-item" href="../interface/compute_d2tgc~3.html#proc-compute_d2tgc_nurbs_1d_scalar">compute_d2Tgc_nurbs_1d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_d2tgc~3.html#proc-compute_d2tgc_nurbs_1d_vector">compute_d2Tgc_nurbs_1d_vector</a>
+            <a class="list-group-item" href="../interface/compute_d2tgc~3.html#proc-compute_d2tgc_bspline_2d_scalar">compute_d2Tgc_bspline_2d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_d2tgc~3.html#proc-compute_d2tgc_bspline_2d_vector">compute_d2Tgc_bspline_2d_vector</a>
+            <a class="list-group-item" href="../interface/compute_d2tgc~3.html#proc-compute_d2tgc_nurbs_2d_scalar">compute_d2Tgc_nurbs_2d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_d2tgc~3.html#proc-compute_d2tgc_nurbs_2d_vector">compute_d2Tgc_nurbs_2d_vector</a>
         </div>
       </div>
     </div>
@@ -163,97 +163,97 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: interface~~compute_d2tgc~3~~CalledByGraph Pages: 1 -->
-<svg id="interfacecompute_d2tgc3CalledByGraph" width="641pt" height="56pt"
- viewBox="0.00 0.00 641.00 55.54" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~compute_d2tgc~3~~CalledByGraph" class="graph" transform="scale(1.33 1.33) rotate(0) translate(4 70)">
+<svg id="interfacecompute_d2tgc3CalledByGraph" width="641pt" height="54pt"
+ viewBox="0.00 0.00 641.00 53.78" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~compute_d2tgc~3~~CalledByGraph" class="graph" transform="scale(1.38 1.38) rotate(0) translate(4 70)">
 <title>interface~~compute_d2tgc~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 850,-70 850,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 878,-70 878,4 -4,4"/>
 <!-- interface~compute_d2tgc~3 -->
 <g id="interface~~compute_d2tgc~3~~CalledByGraph_node1" class="node">
 <title>interface~compute_d2tgc~3</title>
-<polygon fill="none" stroke="black" points="846,-45 748,-45 748,-21 846,-21 846,-45"/>
-<text text-anchor="middle" x="797" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_d2Tgc</text>
+<polygon fill="none" stroke="black" points="874,-45 776,-45 776,-21 874,-21 874,-45"/>
+<text text-anchor="middle" x="825" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_d2Tgc</text>
 </g>
 <!-- proc~derivative2_scalar~3 -->
 <g id="interface~~compute_d2tgc~3~~CalledByGraph_node2" class="node">
 <title>proc~derivative2_scalar~3</title>
-<g id="a_interface~~compute_d2tgc~3~~CalledByGraph_node2"><a xlink:href="../proc/derivative2_scalar~3.html" xlink:title="nurbs_curve%derivative2_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="711,-66 526,-66 526,-42 711,-42 711,-66"/>
-<text text-anchor="middle" x="618.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_scalar</text>
+<g id="a_interface~~compute_d2tgc~3~~CalledByGraph_node2"><a xlink:href="../proc/derivative2_scalar~3.html" xlink:title="nurbs_surface%derivative2_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="739.5,-66 544.5,-66 544.5,-42 739.5,-42 739.5,-66"/>
+<text text-anchor="middle" x="642" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_scalar~3&#45;&gt;interface~compute_d2tgc~3 -->
 <g id="interface~~compute_d2tgc~3~~CalledByGraph_edge1" class="edge">
 <title>proc~derivative2_scalar~3&#45;&gt;interface~compute_d2tgc~3</title>
-<path fill="none" stroke="#ff0000" d="M711.11,-43.1C720.06,-42.04 728.97,-40.98 737.46,-39.97"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="738.07,-43.42 747.58,-38.76 737.24,-36.47 738.07,-43.42"/>
+<path fill="none" stroke="#ff0000" d="M739.59,-42.79C748.46,-41.76 757.24,-40.75 765.61,-39.77"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="766.05,-43.25 775.58,-38.62 765.24,-36.29 766.05,-43.25"/>
 </g>
 <!-- proc~derivative2_vector~3 -->
 <g id="interface~~compute_d2tgc~3~~CalledByGraph_node3" class="node">
 <title>proc~derivative2_vector~3</title>
-<g id="a_interface~~compute_d2tgc~3~~CalledByGraph_node3"><a xlink:href="../proc/derivative2_vector~3.html" xlink:title="nurbs_curve%derivative2_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="712,-24 525,-24 525,0 712,0 712,-24"/>
-<text text-anchor="middle" x="618.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_vector</text>
+<g id="a_interface~~compute_d2tgc~3~~CalledByGraph_node3"><a xlink:href="../proc/derivative2_vector~3.html" xlink:title="nurbs_surface%derivative2_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="740,-24 544,-24 544,0 740,0 740,-24"/>
+<text text-anchor="middle" x="642" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_vector~3&#45;&gt;interface~compute_d2tgc~3 -->
 <g id="interface~~compute_d2tgc~3~~CalledByGraph_edge2" class="edge">
 <title>proc~derivative2_vector~3&#45;&gt;interface~compute_d2tgc~3</title>
-<path fill="none" stroke="#ff0000" d="M712.14,-23.02C720.8,-24.05 729.41,-25.08 737.62,-26.05"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="737.45,-29.56 747.79,-27.26 738.27,-22.61 737.45,-29.56"/>
+<path fill="none" stroke="#ff0000" d="M740.12,-23.27C748.85,-24.28 757.49,-25.28 765.73,-26.24"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="765.58,-29.75 775.92,-27.42 766.39,-22.79 765.58,-29.75"/>
 </g>
 <!-- none~derivative2~3 -->
 <g id="interface~~compute_d2tgc~3~~CalledByGraph_node4" class="node">
 <title>none~derivative2~3</title>
-<g id="a_interface~~compute_d2tgc~3~~CalledByGraph_node4"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative2~3" xlink:title="nurbs_curve%derivative2">
-<polygon fill="#a7506f" stroke="#a7506f" points="489,-45 341,-45 341,-21 489,-21 489,-45"/>
-<text text-anchor="middle" x="415" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2</text>
+<g id="a_interface~~compute_d2tgc~3~~CalledByGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~3" xlink:title="nurbs_surface%derivative2">
+<polygon fill="#a7506f" stroke="#a7506f" points="508,-45 351,-45 351,-21 508,-21 508,-45"/>
+<text text-anchor="middle" x="429.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2~3&#45;&gt;proc~derivative2_scalar~3 -->
 <g id="interface~~compute_d2tgc~3~~CalledByGraph_edge3" class="edge">
 <title>none~derivative2~3&#45;&gt;proc~derivative2_scalar~3</title>
-<path fill="none" stroke="#ff0000" d="M489.03,-40.61C497.71,-41.52 506.68,-42.45 515.66,-43.39"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="515.48,-46.89 525.79,-44.44 516.21,-39.92 515.48,-46.89"/>
+<path fill="none" stroke="#ff0000" d="M508.28,-40.76C516.7,-41.6 525.37,-42.46 534.06,-43.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="533.95,-46.84 544.25,-44.35 534.64,-39.87 533.95,-46.84"/>
 </g>
 <!-- none~derivative2~3&#45;&gt;proc~derivative2_vector~3 -->
 <g id="interface~~compute_d2tgc~3~~CalledByGraph_edge4" class="edge">
 <title>none~derivative2~3&#45;&gt;proc~derivative2_vector~3</title>
-<path fill="none" stroke="#00ffff" d="M489.03,-25.39C497.37,-24.52 505.98,-23.62 514.62,-22.72"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="515.16,-26.18 524.74,-21.67 514.44,-19.22 515.16,-26.18"/>
+<path fill="none" stroke="#00ffff" d="M508.28,-25.24C516.62,-24.41 525.2,-23.55 533.8,-22.69"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="534.28,-26.16 543.88,-21.69 533.59,-19.2 534.28,-26.16"/>
 </g>
 <!-- proc~nearest_point2~3 -->
 <g id="interface~~compute_d2tgc~3~~CalledByGraph_node5" class="node">
 <title>proc~nearest_point2~3</title>
-<g id="a_interface~~compute_d2tgc~3~~CalledByGraph_node5"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_curve%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="305,-45 139,-45 139,-21 305,-21 305,-45"/>
-<text text-anchor="middle" x="222" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
+<g id="a_interface~~compute_d2tgc~3~~CalledByGraph_node5"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_surface%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="315,-45 139,-45 139,-21 315,-21 315,-45"/>
+<text text-anchor="middle" x="227" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;none~derivative2~3 -->
 <g id="interface~~compute_d2tgc~3~~CalledByGraph_edge5" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;none~derivative2~3</title>
-<path fill="none" stroke="#ff0000" d="M305.11,-33C313.59,-33 322.22,-33 330.71,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="330.99,-36.5 340.99,-33 330.99,-29.5 330.99,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M315.07,-33C323.65,-33 332.37,-33 340.95,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="340.96,-36.5 350.96,-33 340.96,-29.5 340.96,-36.5"/>
 </g>
-<!-- program~nearest_point_1d -->
+<!-- program~nearest_point_2d -->
 <g id="interface~~compute_d2tgc~3~~CalledByGraph_node6" class="node">
-<title>program~nearest_point_1d</title>
-<g id="a_interface~~compute_d2tgc~3~~CalledByGraph_node6"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
+<title>program~nearest_point_2d</title>
+<g id="a_interface~~compute_d2tgc~3~~CalledByGraph_node6"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-45 0,-45 0,-21 103,-21 103,-45"/>
-<text text-anchor="middle" x="51.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<text text-anchor="middle" x="51.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2~3 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
 <g id="interface~~compute_d2tgc~3~~CalledByGraph_edge6" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2~3</title>
-<path fill="none" stroke="#ff0000" d="M103.06,-33C111.3,-33 120.05,-33 128.92,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="128.97,-36.5 138.97,-33 128.97,-29.5 128.97,-36.5"/>
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
+<path fill="none" stroke="#ff0000" d="M103.15,-33C111.2,-33 119.76,-33 128.46,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="128.73,-36.5 138.73,-33 128.73,-29.5 128.73,-36.5"/>
 </g>
 </g>
 </svg>
@@ -346,7 +346,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
 
         <h2>Subroutines</h2>
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_bspline_1d_scalar"></span> <h3>private pure subroutine compute_d2Tgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_d2Tgc, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_bspline_2d_scalar"></span> <h3>private pure subroutine compute_d2Tgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, nc, f_d2Tgc, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -364,22 +364,37 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~40"></span>
+              <span class="anchor" id="variable-f_xt~44"></span>
               real(kind=rk),
             </td>
-<td>intent(in)</td>
+<td>intent(in),</td>
               <td></td>            <td>
-              
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_Xt</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot1~28"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong></td>
+            <td><strong>f_knot1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot~8"></span>
+              <span class="anchor" id="variable-f_knot2~28"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -387,14 +402,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot</strong>(:)</td>
+            <td><strong>f_knot2</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~40"></span>
+              <span class="anchor" id="variable-f_degree~44"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -402,14 +417,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong></td>
+            <td><strong>f_degree</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~36"></span>
+              <span class="anchor" id="variable-nc~56"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -417,7 +432,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong></td>
+            <td><strong>nc</strong>(2)</td>
             <td>
                 
             </td>
@@ -432,14 +447,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_d2Tgc</strong>(:)</td>
+            <td><strong>f_d2Tgc</strong>(:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~20"></span>
+              <span class="anchor" id="variable-f_dtgc~24"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -447,14 +462,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_dTgc</strong>(:)</td>
+            <td><strong>f_dTgc</strong>(:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~28"></span>
+              <span class="anchor" id="variable-f_tgc~32"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -475,7 +490,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_bspline_1d_vector"></span> <h3>private pure subroutine compute_d2Tgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_bspline_2d_vector"></span> <h3>private pure subroutine compute_d2Tgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -493,7 +508,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~38"></span>
+              <span class="anchor" id="variable-f_xt~42"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -501,14 +516,29 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong>(:)</td>
+            <td><strong>f_Xt</strong>(:,:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot1~26"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot~6"></span>
+              <span class="anchor" id="variable-f_knot2~26"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -516,14 +546,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot</strong>(:)</td>
+            <td><strong>f_knot2</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~38"></span>
+              <span class="anchor" id="variable-f_degree~42"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -531,14 +561,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong></td>
+            <td><strong>f_degree</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~34"></span>
+              <span class="anchor" id="variable-nc~55"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -546,14 +576,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong></td>
+            <td><strong>nc</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~22"></span>
+              <span class="anchor" id="variable-f_ng~24"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -561,7 +591,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong></td>
+            <td><strong>f_ng</strong>(2)</td>
             <td>
                 
             </td>
@@ -576,14 +606,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_d2Tgc</strong>(:,:)</td>
+            <td><strong>f_d2Tgc</strong>(:,:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~18"></span>
+              <span class="anchor" id="variable-f_dtgc~22"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -591,14 +621,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_dTgc</strong>(:,:)</td>
+            <td><strong>f_dTgc</strong>(:,:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~26"></span>
+              <span class="anchor" id="variable-f_tgc~30"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -619,7 +649,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_nurbs_1d_scalar"></span> <h3>private pure subroutine compute_d2Tgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_nurbs_2d_scalar"></span> <h3>private pure subroutine compute_d2Tgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -637,22 +667,37 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~39"></span>
+              <span class="anchor" id="variable-f_xt~43"></span>
               real(kind=rk),
             </td>
-<td>intent(in)</td>
+<td>intent(in),</td>
               <td></td>            <td>
-              
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_Xt</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot1~27"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong></td>
+            <td><strong>f_knot1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot~7"></span>
+              <span class="anchor" id="variable-f_knot2~27"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -660,14 +705,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot</strong>(:)</td>
+            <td><strong>f_knot2</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~39"></span>
+              <span class="anchor" id="variable-f_degree~43"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -675,14 +720,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong></td>
+            <td><strong>f_degree</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~35"></span>
+              <span class="anchor" id="variable-f_nc~40"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -690,14 +735,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong></td>
+            <td><strong>f_nc</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~20"></span>
+              <span class="anchor" id="variable-f_wc~22"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -720,14 +765,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_d2Tgc</strong>(:)</td>
+            <td><strong>f_d2Tgc</strong>(:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~19"></span>
+              <span class="anchor" id="variable-f_dtgc~23"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -735,14 +780,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_dTgc</strong>(:)</td>
+            <td><strong>f_dTgc</strong>(:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~27"></span>
+              <span class="anchor" id="variable-f_tgc~31"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -763,7 +808,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_nurbs_1d_vector"></span> <h3>private pure subroutine compute_d2Tgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_d2tgc_nurbs_2d_vector"></span> <h3>private pure subroutine compute_d2Tgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -781,7 +826,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~37"></span>
+              <span class="anchor" id="variable-f_xt~41"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -789,14 +834,29 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong>(:)</td>
+            <td><strong>f_Xt</strong>(:,:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot1~25"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot~5"></span>
+              <span class="anchor" id="variable-f_knot2~25"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -804,14 +864,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot</strong>(:)</td>
+            <td><strong>f_knot2</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~37"></span>
+              <span class="anchor" id="variable-f_degree~41"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -819,14 +879,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong></td>
+            <td><strong>f_degree</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~33"></span>
+              <span class="anchor" id="variable-f_nc~39"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -834,14 +894,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong></td>
+            <td><strong>f_nc</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~21"></span>
+              <span class="anchor" id="variable-f_ng~23"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -849,14 +909,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong></td>
+            <td><strong>f_ng</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~19"></span>
+              <span class="anchor" id="variable-f_wc~21"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -879,14 +939,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_d2Tgc</strong>(:,:)</td>
+            <td><strong>f_d2Tgc</strong>(:,:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~17"></span>
+              <span class="anchor" id="variable-f_dtgc~21"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -894,14 +954,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_dTgc</strong>(:,:)</td>
+            <td><strong>f_dTgc</strong>(:,:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~25"></span>
+              <span class="anchor" id="variable-f_tgc~29"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -939,7 +999,7 @@ <h4>Arguments</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/compute_dtgc.html b/interface/compute_dtgc.html
index 898e8a26f..fbc88bec4 100644
--- a/interface/compute_dtgc.html
+++ b/interface/compute_dtgc.html
@@ -82,15 +82,15 @@ <h1>compute_dTgc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">compute_dTgc</li>
           </ol>
         </nav>
@@ -128,10 +128,10 @@ <h4 class="card-header bg-primary text-white">Subroutines</h4>
       </a>
       <div id="subs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../interface/compute_dtgc.html#proc-compute_dtgc_bspline_3d_scalar">compute_dTgc_bspline_3d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_dtgc.html#proc-compute_dtgc_bspline_3d_vector">compute_dTgc_bspline_3d_vector</a>
-            <a class="list-group-item" href="../interface/compute_dtgc.html#proc-compute_dtgc_nurbs_3d_scalar">compute_dTgc_nurbs_3d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_dtgc.html#proc-compute_dtgc_nurbs_3d_vector">compute_dTgc_nurbs_3d_vector</a>
+            <a class="list-group-item" href="../interface/compute_dtgc.html#proc-compute_dtgc_bspline_1d_scalar">compute_dTgc_bspline_1d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_dtgc.html#proc-compute_dtgc_bspline_1d_vector">compute_dTgc_bspline_1d_vector</a>
+            <a class="list-group-item" href="../interface/compute_dtgc.html#proc-compute_dtgc_nurbs_1d_scalar">compute_dTgc_nurbs_1d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_dtgc.html#proc-compute_dtgc_nurbs_1d_vector">compute_dTgc_nurbs_1d_vector</a>
         </div>
       </div>
     </div>
@@ -163,112 +163,112 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: interface~~compute_dtgc~~CalledByGraph Pages: 1 -->
-<svg id="interfacecompute_dtgcCalledByGraph" width="641pt" height="46pt"
- viewBox="0.00 0.00 641.00 46.37" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~compute_dtgc~~CalledByGraph" class="graph" transform="scale(1.6 1.6) rotate(0) translate(4 70)">
+<svg id="interfacecompute_dtgcCalledByGraph" width="641pt" height="49pt"
+ viewBox="0.00 0.00 641.00 48.85" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~compute_dtgc~~CalledByGraph" class="graph" transform="scale(1.51 1.51) rotate(0) translate(4 70)">
 <title>interface~~compute_dtgc~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 1019,-70 1019,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 967,-70 967,4 -4,4"/>
 <!-- interface~compute_dtgc -->
 <g id="interface~~compute_dtgc~~CalledByGraph_node1" class="node">
 <title>interface~compute_dtgc</title>
-<polygon fill="none" stroke="black" points="1015,-45 924,-45 924,-21 1015,-21 1015,-45"/>
-<text text-anchor="middle" x="969.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_dTgc</text>
+<polygon fill="none" stroke="black" points="963,-45 872,-45 872,-21 963,-21 963,-45"/>
+<text text-anchor="middle" x="917.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_dTgc</text>
 </g>
 <!-- proc~derivative_scalar -->
 <g id="interface~~compute_dtgc~~CalledByGraph_node2" class="node">
 <title>proc~derivative_scalar</title>
-<g id="a_interface~~compute_dtgc~~CalledByGraph_node2"><a xlink:href="../proc/derivative_scalar.html" xlink:title="nurbs_volume%derivative_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="887,-66 699,-66 699,-42 887,-42 887,-66"/>
-<text text-anchor="middle" x="793" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_scalar</text>
+<g id="a_interface~~compute_dtgc~~CalledByGraph_node2"><a xlink:href="../proc/derivative_scalar.html" xlink:title="nurbs_curve%derivative_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="835,-66 657,-66 657,-42 835,-42 835,-66"/>
+<text text-anchor="middle" x="746" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_scalar&#45;&gt;interface~compute_dtgc -->
 <g id="interface~~compute_dtgc~~CalledByGraph_edge1" class="edge">
 <title>proc~derivative_scalar&#45;&gt;interface~compute_dtgc</title>
-<path fill="none" stroke="#ff0000" d="M887.13,-42.79C896.25,-41.7 905.28,-40.61 913.83,-39.58"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="914.48,-43.03 923.99,-38.36 913.65,-36.08 914.48,-43.03"/>
+<path fill="none" stroke="#ff0000" d="M835.23,-43.07C844.26,-41.95 853.24,-40.84 861.76,-39.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="862.4,-43.23 871.89,-38.53 861.54,-36.28 862.4,-43.23"/>
 </g>
 <!-- proc~derivative_vector -->
 <g id="interface~~compute_dtgc~~CalledByGraph_node3" class="node">
 <title>proc~derivative_vector</title>
-<g id="a_interface~~compute_dtgc~~CalledByGraph_node3"><a xlink:href="../proc/derivative_vector.html" xlink:title="nurbs_volume%derivative_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="888,-24 698,-24 698,0 888,0 888,-24"/>
-<text text-anchor="middle" x="793" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_vector</text>
+<g id="a_interface~~compute_dtgc~~CalledByGraph_node3"><a xlink:href="../proc/derivative_vector.html" xlink:title="nurbs_curve%derivative_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="836,-24 656,-24 656,0 836,0 836,-24"/>
+<text text-anchor="middle" x="746" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_vector&#45;&gt;interface~compute_dtgc -->
 <g id="interface~~compute_dtgc~~CalledByGraph_edge2" class="edge">
 <title>proc~derivative_vector&#45;&gt;interface~compute_dtgc</title>
-<path fill="none" stroke="#ff0000" d="M888.15,-23.33C896.86,-24.38 905.48,-25.42 913.66,-26.4"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="913.41,-29.9 923.76,-27.62 914.25,-22.95 913.41,-29.9"/>
+<path fill="none" stroke="#ff0000" d="M836.22,-23.05C844.85,-24.12 853.43,-25.19 861.58,-26.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="861.3,-29.69 871.65,-27.44 862.16,-22.74 861.3,-29.69"/>
 </g>
 <!-- none~derivative -->
 <g id="interface~~compute_dtgc~~CalledByGraph_node4" class="node">
 <title>none~derivative</title>
-<g id="a_interface~~compute_dtgc~~CalledByGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative" xlink:title="nurbs_volume%derivative">
-<polygon fill="#a7506f" stroke="#a7506f" points="662,-45 511,-45 511,-21 662,-21 662,-45"/>
-<text text-anchor="middle" x="586.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative</text>
+<g id="a_interface~~compute_dtgc~~CalledByGraph_node4"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative" xlink:title="nurbs_curve%derivative">
+<polygon fill="#a7506f" stroke="#a7506f" points="620,-45 479,-45 479,-21 620,-21 620,-45"/>
+<text text-anchor="middle" x="549.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative</text>
 </a>
 </g>
 </g>
 <!-- none~derivative&#45;&gt;proc~derivative_scalar -->
 <g id="interface~~compute_dtgc~~CalledByGraph_edge3" class="edge">
 <title>none~derivative&#45;&gt;proc~derivative_scalar</title>
-<path fill="none" stroke="#ff0000" d="M662.2,-40.67C670.82,-41.56 679.72,-42.47 688.64,-43.39"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="688.39,-46.88 698.69,-44.42 689.1,-39.92 688.39,-46.88"/>
+<path fill="none" stroke="#ff0000" d="M620.17,-40.52C628.8,-41.45 637.75,-42.42 646.71,-43.39"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="646.5,-46.89 656.82,-44.48 647.25,-39.93 646.5,-46.89"/>
 </g>
 <!-- none~derivative&#45;&gt;proc~derivative_vector -->
 <g id="interface~~compute_dtgc~~CalledByGraph_edge4" class="edge">
 <title>none~derivative&#45;&gt;proc~derivative_vector</title>
-<path fill="none" stroke="#00ffff" d="M662.2,-25.33C670.56,-24.47 679.19,-23.58 687.84,-22.7"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="688.4,-26.16 697.99,-21.65 687.68,-19.19 688.4,-26.16"/>
+<path fill="none" stroke="#00ffff" d="M620.17,-25.48C628.47,-24.58 637.07,-23.65 645.69,-22.72"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="646.24,-26.18 655.8,-21.63 645.48,-19.22 646.24,-26.18"/>
 </g>
 <!-- proc~ansatz -->
 <g id="interface~~compute_dtgc~~CalledByGraph_node5" class="node">
 <title>proc~ansatz</title>
-<g id="a_interface~~compute_dtgc~~CalledByGraph_node5"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-45 343,-45 343,-21 475,-21 475,-45"/>
-<text text-anchor="middle" x="409" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_interface~~compute_dtgc~~CalledByGraph_node5"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="443,-45 321,-45 321,-21 443,-21 443,-45"/>
+<text text-anchor="middle" x="382" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;none~derivative -->
 <g id="interface~~compute_dtgc~~CalledByGraph_edge5" class="edge">
 <title>proc~ansatz&#45;&gt;none~derivative</title>
-<path fill="none" stroke="#ff0000" d="M475.35,-33C483.69,-33 492.31,-33 500.89,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="500.93,-36.5 510.93,-33 500.93,-29.5 500.93,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M443.22,-33C451.52,-33 460.15,-33 468.74,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="468.78,-36.5 478.78,-33 468.78,-29.5 468.78,-36.5"/>
 </g>
-<!-- proc~cmp_volume -->
+<!-- proc~cmp_length -->
 <g id="interface~~compute_dtgc~~CalledByGraph_node6" class="node">
-<title>proc~cmp_volume</title>
-<g id="a_interface~~compute_dtgc~~CalledByGraph_node6"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-45 141,-45 141,-21 307,-21 307,-45"/>
-<text text-anchor="middle" x="224" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<title>proc~cmp_length</title>
+<g id="a_interface~~compute_dtgc~~CalledByGraph_node6"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
+<polygon fill="#d9534f" stroke="#d9534f" points="285,-45 135,-45 135,-21 285,-21 285,-45"/>
+<text text-anchor="middle" x="210" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="interface~~compute_dtgc~~CalledByGraph_edge6" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.13,-33C315.64,-33 324.26,-33 332.7,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="332.87,-36.5 342.87,-33 332.87,-29.5 332.87,-36.5"/>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M285.07,-33C293.59,-33 302.27,-33 310.74,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="310.95,-36.5 320.95,-33 310.95,-29.5 310.95,-36.5"/>
 </g>
-<!-- program~compute_volume -->
+<!-- program~compute_length -->
 <g id="interface~~compute_dtgc~~CalledByGraph_node7" class="node">
-<title>program~compute_volume</title>
-<g id="a_interface~~compute_dtgc~~CalledByGraph_node7"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-45 0,-45 0,-21 105,-21 105,-45"/>
-<text text-anchor="middle" x="52.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<title>program~compute_length</title>
+<g id="a_interface~~compute_dtgc~~CalledByGraph_node7"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-45 0,-45 0,-21 99,-21 99,-45"/>
+<text text-anchor="middle" x="49.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
+<!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="interface~~compute_dtgc~~CalledByGraph_edge7" class="edge">
-<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#ff0000" d="M105.28,-33C113.39,-33 121.99,-33 130.69,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="130.93,-36.5 140.93,-33 130.93,-29.5 130.93,-36.5"/>
+<title>program~compute_length&#45;&gt;proc~cmp_length</title>
+<path fill="none" stroke="#ff0000" d="M99.35,-33C107.46,-33 116.06,-33 124.75,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="124.96,-36.5 134.96,-33 124.96,-29.5 124.96,-36.5"/>
 </g>
 </g>
 </svg>
@@ -361,7 +361,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
 
         <h2>Subroutines</h2>
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_bspline_3d_scalar"></span> <h3>private pure subroutine compute_dTgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_dTgc, f_Tgc, f_elem)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_bspline_1d_scalar"></span> <h3>private pure subroutine compute_dTgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_dTgc, f_Tgc, f_elem)  
 </h3></div>
     <div class="card-body">
         
@@ -379,52 +379,22 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~8"></span>
+              <span class="anchor" id="variable-f_xt~12"></span>
               real(kind=rk),
             </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_Xt</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot1~8"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot2~8"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
+<td>intent(in)</td>
               <td></td>            <td>
-              contiguous
+              
             </td>
             <td>::</td>
-            <td><strong>f_knot2</strong>(:)</td>
+            <td><strong>f_Xt</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot3~8"></span>
+              <span class="anchor" id="variable-f_knot~12"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -432,14 +402,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot3</strong>(:)</td>
+            <td><strong>f_knot</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~8"></span>
+              <span class="anchor" id="variable-f_degree~12"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -447,14 +417,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(3)</td>
+            <td><strong>f_degree</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~8"></span>
+              <span class="anchor" id="variable-f_nc~12"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -462,14 +432,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(3)</td>
+            <td><strong>f_nc</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~4"></span>
+              <span class="anchor" id="variable-f_dtgc~8"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -477,14 +447,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_dTgc</strong>(:,:)</td>
+            <td><strong>f_dTgc</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~4"></span>
+              <span class="anchor" id="variable-f_tgc~8"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -520,7 +490,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_bspline_3d_vector"></span> <h3>private pure subroutine compute_dTgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_bspline_1d_vector"></span> <h3>private pure subroutine compute_dTgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -538,22 +508,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~6"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_Xt</strong>(:,:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot1~6"></span>
+              <span class="anchor" id="variable-f_xt~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -561,29 +516,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot2~6"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot2</strong>(:)</td>
+            <td><strong>f_Xt</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot3~6"></span>
+              <span class="anchor" id="variable-f_knot~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -591,14 +531,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot3</strong>(:)</td>
+            <td><strong>f_knot</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~6"></span>
+              <span class="anchor" id="variable-f_degree~10"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -606,14 +546,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(3)</td>
+            <td><strong>f_degree</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~6"></span>
+              <span class="anchor" id="variable-f_nc~10"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -621,14 +561,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(3)</td>
+            <td><strong>f_nc</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~4"></span>
+              <span class="anchor" id="variable-f_ng~6"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -636,14 +576,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong>(3)</td>
+            <td><strong>f_ng</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~2"></span>
+              <span class="anchor" id="variable-f_dtgc~6"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -651,14 +591,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_dTgc</strong>(:,:,:)</td>
+            <td><strong>f_dTgc</strong>(:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~2"></span>
+              <span class="anchor" id="variable-f_tgc~6"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -679,7 +619,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_nurbs_3d_scalar"></span> <h3>private pure subroutine compute_dTgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, f_elem)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_nurbs_1d_scalar"></span> <h3>private pure subroutine compute_dTgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, f_elem)  
 </h3></div>
     <div class="card-body">
         
@@ -697,52 +637,22 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~7"></span>
+              <span class="anchor" id="variable-f_xt~11"></span>
               real(kind=rk),
             </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_Xt</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot1~7"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot2~7"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
+<td>intent(in)</td>
               <td></td>            <td>
-              contiguous
+              
             </td>
             <td>::</td>
-            <td><strong>f_knot2</strong>(:)</td>
+            <td><strong>f_Xt</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot3~7"></span>
+              <span class="anchor" id="variable-f_knot~11"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -750,14 +660,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot3</strong>(:)</td>
+            <td><strong>f_knot</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~7"></span>
+              <span class="anchor" id="variable-f_degree~11"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -765,14 +675,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(3)</td>
+            <td><strong>f_degree</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~7"></span>
+              <span class="anchor" id="variable-f_nc~11"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -780,14 +690,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(3)</td>
+            <td><strong>f_nc</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~4"></span>
+              <span class="anchor" id="variable-f_wc~6"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -802,7 +712,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~3"></span>
+              <span class="anchor" id="variable-f_dtgc~7"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -810,14 +720,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_dTgc</strong>(:,:)</td>
+            <td><strong>f_dTgc</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~3"></span>
+              <span class="anchor" id="variable-f_tgc~7"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -853,7 +763,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_nurbs_3d_vector"></span> <h3>private pure subroutine compute_dTgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_nurbs_1d_vector"></span> <h3>private pure subroutine compute_dTgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -871,22 +781,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~5"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_Xt</strong>(:,:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot1~5"></span>
+              <span class="anchor" id="variable-f_xt~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -894,29 +789,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot2~5"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot2</strong>(:)</td>
+            <td><strong>f_Xt</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot3~5"></span>
+              <span class="anchor" id="variable-f_knot~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -924,14 +804,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot3</strong>(:)</td>
+            <td><strong>f_knot</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~5"></span>
+              <span class="anchor" id="variable-f_degree~9"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -939,14 +819,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(3)</td>
+            <td><strong>f_degree</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~5"></span>
+              <span class="anchor" id="variable-f_nc~9"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -954,14 +834,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(3)</td>
+            <td><strong>f_nc</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~3"></span>
+              <span class="anchor" id="variable-f_ng~5"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -969,14 +849,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong>(3)</td>
+            <td><strong>f_ng</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~3"></span>
+              <span class="anchor" id="variable-f_wc~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -991,7 +871,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc"></span>
+              <span class="anchor" id="variable-f_dtgc~5"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -999,14 +879,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_dTgc</strong>(:,:,:)</td>
+            <td><strong>f_dTgc</strong>(:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc"></span>
+              <span class="anchor" id="variable-f_tgc~5"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -1044,7 +924,7 @@ <h4>Arguments</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/compute_dtgc~2.html b/interface/compute_dtgc~2.html
index ef7bd9952..8d0cfca72 100644
--- a/interface/compute_dtgc~2.html
+++ b/interface/compute_dtgc~2.html
@@ -82,15 +82,15 @@ <h1>compute_dTgc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">compute_dTgc</li>
           </ol>
         </nav>
@@ -128,10 +128,10 @@ <h4 class="card-header bg-primary text-white">Subroutines</h4>
       </a>
       <div id="subs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../interface/compute_dtgc~2.html#proc-compute_dtgc_bspline_2d_scalar">compute_dTgc_bspline_2d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_dtgc~2.html#proc-compute_dtgc_bspline_2d_vector">compute_dTgc_bspline_2d_vector</a>
-            <a class="list-group-item" href="../interface/compute_dtgc~2.html#proc-compute_dtgc_nurbs_2d_scalar">compute_dTgc_nurbs_2d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_dtgc~2.html#proc-compute_dtgc_nurbs_2d_vector">compute_dTgc_nurbs_2d_vector</a>
+            <a class="list-group-item" href="../interface/compute_dtgc~2.html#proc-compute_dtgc_bspline_3d_scalar">compute_dTgc_bspline_3d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_dtgc~2.html#proc-compute_dtgc_bspline_3d_vector">compute_dTgc_bspline_3d_vector</a>
+            <a class="list-group-item" href="../interface/compute_dtgc~2.html#proc-compute_dtgc_nurbs_3d_scalar">compute_dTgc_nurbs_3d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_dtgc~2.html#proc-compute_dtgc_nurbs_3d_vector">compute_dTgc_nurbs_3d_vector</a>
         </div>
       </div>
     </div>
@@ -163,112 +163,112 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: interface~~compute_dtgc~2~~CalledByGraph Pages: 1 -->
-<svg id="interfacecompute_dtgc2CalledByGraph" width="641pt" height="48pt"
- viewBox="0.00 0.00 641.00 47.86" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~compute_dtgc~2~~CalledByGraph" class="graph" transform="scale(1.55 1.55) rotate(0) translate(4 70)">
+<svg id="interfacecompute_dtgc2CalledByGraph" width="641pt" height="46pt"
+ viewBox="0.00 0.00 641.00 46.37" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~compute_dtgc~2~~CalledByGraph" class="graph" transform="scale(1.6 1.6) rotate(0) translate(4 70)">
 <title>interface~~compute_dtgc~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 987,-70 987,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 1019,-70 1019,4 -4,4"/>
 <!-- interface~compute_dtgc~2 -->
 <g id="interface~~compute_dtgc~2~~CalledByGraph_node1" class="node">
 <title>interface~compute_dtgc~2</title>
-<polygon fill="none" stroke="black" points="983,-45 892,-45 892,-21 983,-21 983,-45"/>
-<text text-anchor="middle" x="937.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_dTgc</text>
+<polygon fill="none" stroke="black" points="1015,-45 924,-45 924,-21 1015,-21 1015,-45"/>
+<text text-anchor="middle" x="969.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_dTgc</text>
 </g>
 <!-- proc~derivative_scalar~2 -->
 <g id="interface~~compute_dtgc~2~~CalledByGraph_node2" class="node">
 <title>proc~derivative_scalar~2</title>
-<g id="a_interface~~compute_dtgc~2~~CalledByGraph_node2"><a xlink:href="../proc/derivative_scalar~2.html" xlink:title="nurbs_surface%derivative_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="855,-66 667,-66 667,-42 855,-42 855,-66"/>
-<text text-anchor="middle" x="761" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_scalar</text>
+<g id="a_interface~~compute_dtgc~2~~CalledByGraph_node2"><a xlink:href="../proc/derivative_scalar~2.html" xlink:title="nurbs_volume%derivative_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="887,-66 699,-66 699,-42 887,-42 887,-66"/>
+<text text-anchor="middle" x="793" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_scalar~2&#45;&gt;interface~compute_dtgc~2 -->
 <g id="interface~~compute_dtgc~2~~CalledByGraph_edge1" class="edge">
 <title>proc~derivative_scalar~2&#45;&gt;interface~compute_dtgc~2</title>
-<path fill="none" stroke="#ff0000" d="M855.13,-42.79C864.25,-41.7 873.28,-40.61 881.83,-39.58"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="882.48,-43.03 891.99,-38.36 881.65,-36.08 882.48,-43.03"/>
+<path fill="none" stroke="#ff0000" d="M887.13,-42.79C896.25,-41.7 905.28,-40.61 913.83,-39.58"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="914.48,-43.03 923.99,-38.36 913.65,-36.08 914.48,-43.03"/>
 </g>
 <!-- proc~derivative_vector~2 -->
 <g id="interface~~compute_dtgc~2~~CalledByGraph_node3" class="node">
 <title>proc~derivative_vector~2</title>
-<g id="a_interface~~compute_dtgc~2~~CalledByGraph_node3"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_surface%derivative_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="856,-24 666,-24 666,0 856,0 856,-24"/>
-<text text-anchor="middle" x="761" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_vector</text>
+<g id="a_interface~~compute_dtgc~2~~CalledByGraph_node3"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_volume%derivative_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="888,-24 698,-24 698,0 888,0 888,-24"/>
+<text text-anchor="middle" x="793" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_vector~2&#45;&gt;interface~compute_dtgc~2 -->
 <g id="interface~~compute_dtgc~2~~CalledByGraph_edge2" class="edge">
 <title>proc~derivative_vector~2&#45;&gt;interface~compute_dtgc~2</title>
-<path fill="none" stroke="#ff0000" d="M856.15,-23.33C864.86,-24.38 873.48,-25.42 881.66,-26.4"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="881.41,-29.9 891.76,-27.62 882.25,-22.95 881.41,-29.9"/>
+<path fill="none" stroke="#ff0000" d="M888.15,-23.33C896.86,-24.38 905.48,-25.42 913.66,-26.4"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="913.41,-29.9 923.76,-27.62 914.25,-22.95 913.41,-29.9"/>
 </g>
 <!-- none~derivative~2 -->
 <g id="interface~~compute_dtgc~2~~CalledByGraph_node4" class="node">
 <title>none~derivative~2</title>
-<g id="a_interface~~compute_dtgc~2~~CalledByGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~2" xlink:title="nurbs_surface%derivative">
-<polygon fill="#a7506f" stroke="#a7506f" points="630,-45 479,-45 479,-21 630,-21 630,-45"/>
-<text text-anchor="middle" x="554.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative</text>
+<g id="a_interface~~compute_dtgc~2~~CalledByGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative~2" xlink:title="nurbs_volume%derivative">
+<polygon fill="#a7506f" stroke="#a7506f" points="662,-45 511,-45 511,-21 662,-21 662,-45"/>
+<text text-anchor="middle" x="586.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative</text>
 </a>
 </g>
 </g>
 <!-- none~derivative~2&#45;&gt;proc~derivative_scalar~2 -->
 <g id="interface~~compute_dtgc~2~~CalledByGraph_edge3" class="edge">
 <title>none~derivative~2&#45;&gt;proc~derivative_scalar~2</title>
-<path fill="none" stroke="#ff0000" d="M630.2,-40.67C638.82,-41.56 647.72,-42.47 656.64,-43.39"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="656.39,-46.88 666.69,-44.42 657.1,-39.92 656.39,-46.88"/>
+<path fill="none" stroke="#ff0000" d="M662.2,-40.67C670.82,-41.56 679.72,-42.47 688.64,-43.39"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="688.39,-46.88 698.69,-44.42 689.1,-39.92 688.39,-46.88"/>
 </g>
 <!-- none~derivative~2&#45;&gt;proc~derivative_vector~2 -->
 <g id="interface~~compute_dtgc~2~~CalledByGraph_edge4" class="edge">
 <title>none~derivative~2&#45;&gt;proc~derivative_vector~2</title>
-<path fill="none" stroke="#00ffff" d="M630.2,-25.33C638.56,-24.47 647.19,-23.58 655.84,-22.7"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="656.4,-26.16 665.99,-21.65 655.68,-19.19 656.4,-26.16"/>
+<path fill="none" stroke="#00ffff" d="M662.2,-25.33C670.56,-24.47 679.19,-23.58 687.84,-22.7"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="688.4,-26.16 697.99,-21.65 687.68,-19.19 688.4,-26.16"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="interface~~compute_dtgc~2~~CalledByGraph_node5" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_interface~~compute_dtgc~2~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="443,-45 311,-45 311,-21 443,-21 443,-45"/>
-<text text-anchor="middle" x="377" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_interface~~compute_dtgc~2~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-45 343,-45 343,-21 475,-21 475,-45"/>
+<text text-anchor="middle" x="409" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~derivative~2 -->
 <g id="interface~~compute_dtgc~2~~CalledByGraph_edge5" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~derivative~2</title>
-<path fill="none" stroke="#ff0000" d="M443.35,-33C451.69,-33 460.31,-33 468.89,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="468.93,-36.5 478.93,-33 468.93,-29.5 468.93,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M475.35,-33C483.69,-33 492.31,-33 500.89,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="500.93,-36.5 510.93,-33 500.93,-29.5 500.93,-36.5"/>
 </g>
-<!-- proc~cmp_area -->
+<!-- proc~cmp_volume -->
 <g id="interface~~compute_dtgc~2~~CalledByGraph_node6" class="node">
-<title>proc~cmp_area</title>
-<g id="a_interface~~compute_dtgc~2~~CalledByGraph_node6"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="275,-45 125,-45 125,-21 275,-21 275,-45"/>
-<text text-anchor="middle" x="200" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<title>proc~cmp_volume</title>
+<g id="a_interface~~compute_dtgc~2~~CalledByGraph_node6"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-45 141,-45 141,-21 307,-21 307,-45"/>
+<text text-anchor="middle" x="224" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
 <g id="interface~~compute_dtgc~2~~CalledByGraph_edge6" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ff0000" d="M275.22,-33C283.63,-33 292.21,-33 300.63,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="300.81,-36.5 310.81,-33 300.81,-29.5 300.81,-36.5"/>
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ff0000" d="M307.13,-33C315.64,-33 324.26,-33 332.7,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="332.87,-36.5 342.87,-33 332.87,-29.5 332.87,-36.5"/>
 </g>
-<!-- program~compute_area -->
+<!-- program~compute_volume -->
 <g id="interface~~compute_dtgc~2~~CalledByGraph_node7" class="node">
-<title>program~compute_area</title>
-<g id="a_interface~~compute_dtgc~2~~CalledByGraph_node7"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-45 0,-45 0,-21 89,-21 89,-45"/>
-<text text-anchor="middle" x="44.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<title>program~compute_volume</title>
+<g id="a_interface~~compute_dtgc~2~~CalledByGraph_node7"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-45 0,-45 0,-21 105,-21 105,-45"/>
+<text text-anchor="middle" x="52.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;proc~cmp_area -->
+<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="interface~~compute_dtgc~2~~CalledByGraph_edge7" class="edge">
-<title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M89.08,-33C97.19,-33 105.92,-33 114.78,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="114.81,-36.5 124.81,-33 114.81,-29.5 114.81,-36.5"/>
+<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
+<path fill="none" stroke="#ff0000" d="M105.28,-33C113.39,-33 121.99,-33 130.69,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="130.93,-36.5 140.93,-33 130.93,-29.5 130.93,-36.5"/>
 </g>
 </g>
 </svg>
@@ -361,7 +361,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
 
         <h2>Subroutines</h2>
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_bspline_2d_scalar"></span> <h3>private pure subroutine compute_dTgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, nc, f_dTgc, f_Tgc, elem)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_bspline_3d_scalar"></span> <h3>private pure subroutine compute_dTgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_dTgc, f_Tgc, f_elem)  
 </h3></div>
     <div class="card-body">
         
@@ -394,7 +394,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot1~24"></span>
+              <span class="anchor" id="variable-f_knot1~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -409,7 +409,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot2~24"></span>
+              <span class="anchor" id="variable-f_knot2~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -422,6 +422,21 @@ <h4>Arguments</h4>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot3~8"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-f_degree~24"></span>
@@ -432,14 +447,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(2)</td>
+            <td><strong>f_degree</strong>(3)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~26"></span>
+              <span class="anchor" id="variable-f_nc~24"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -447,7 +462,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>nc</strong>(2)</td>
+            <td><strong>f_nc</strong>(3)</td>
             <td>
                 
             </td>
@@ -484,15 +499,15 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~9"></span>
+              <span class="anchor" id="variable-f_elem~4"></span>
               integer,
             </td>
-<td>intent(in)</td>
-              <td></td>            <td>
+<td>intent(in),</td>
+              <td>optional</td>            <td>
               
             </td>
             <td>::</td>
-            <td><strong>elem</strong>(:)</td>
+            <td><strong>f_elem</strong>(:)</td>
             <td>
                 
             </td>
@@ -505,7 +520,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_bspline_2d_vector"></span> <h3>private pure subroutine compute_dTgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, nc, f_ng, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_bspline_3d_vector"></span> <h3>private pure subroutine compute_dTgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -538,7 +553,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot1~22"></span>
+              <span class="anchor" id="variable-f_knot1~6"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -553,7 +568,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot2~22"></span>
+              <span class="anchor" id="variable-f_knot2~6"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -566,6 +581,21 @@ <h4>Arguments</h4>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot3~6"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-f_degree~22"></span>
@@ -576,14 +606,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(2)</td>
+            <td><strong>f_degree</strong>(3)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~25"></span>
+              <span class="anchor" id="variable-f_nc~22"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -591,7 +621,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>nc</strong>(2)</td>
+            <td><strong>f_nc</strong>(3)</td>
             <td>
                 
             </td>
@@ -606,7 +636,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong>(2)</td>
+            <td><strong>f_ng</strong>(3)</td>
             <td>
                 
             </td>
@@ -649,7 +679,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_nurbs_2d_scalar"></span> <h3>private pure subroutine compute_dTgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, elem)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_nurbs_3d_scalar"></span> <h3>private pure subroutine compute_dTgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, f_elem)  
 </h3></div>
     <div class="card-body">
         
@@ -682,7 +712,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot1~23"></span>
+              <span class="anchor" id="variable-f_knot1~7"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -697,7 +727,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot2~23"></span>
+              <span class="anchor" id="variable-f_knot2~7"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -710,6 +740,21 @@ <h4>Arguments</h4>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot3~7"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-f_degree~23"></span>
@@ -720,14 +765,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(2)</td>
+            <td><strong>f_degree</strong>(3)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~22"></span>
+              <span class="anchor" id="variable-f_nc~23"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -735,7 +780,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(2)</td>
+            <td><strong>f_nc</strong>(3)</td>
             <td>
                 
             </td>
@@ -787,15 +832,15 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~8"></span>
+              <span class="anchor" id="variable-f_elem~3"></span>
               integer,
             </td>
-<td>intent(in)</td>
-              <td></td>            <td>
+<td>intent(in),</td>
+              <td>optional</td>            <td>
               
             </td>
             <td>::</td>
-            <td><strong>elem</strong>(:)</td>
+            <td><strong>f_elem</strong>(:)</td>
             <td>
                 
             </td>
@@ -808,7 +853,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_nurbs_2d_vector"></span> <h3>private pure subroutine compute_dTgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_nurbs_3d_vector"></span> <h3>private pure subroutine compute_dTgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -841,7 +886,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot1~21"></span>
+              <span class="anchor" id="variable-f_knot1~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -856,7 +901,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot2~21"></span>
+              <span class="anchor" id="variable-f_knot2~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -869,6 +914,21 @@ <h4>Arguments</h4>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot3~5"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-f_degree~21"></span>
@@ -879,7 +939,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(2)</td>
+            <td><strong>f_degree</strong>(3)</td>
             <td>
                 
             </td>
@@ -894,7 +954,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(2)</td>
+            <td><strong>f_nc</strong>(3)</td>
             <td>
                 
             </td>
@@ -909,7 +969,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong>(2)</td>
+            <td><strong>f_ng</strong>(3)</td>
             <td>
                 
             </td>
@@ -984,7 +1044,7 @@ <h4>Arguments</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/compute_dtgc~3.html b/interface/compute_dtgc~3.html
index 11d6ccf41..ab654b075 100644
--- a/interface/compute_dtgc~3.html
+++ b/interface/compute_dtgc~3.html
@@ -82,15 +82,15 @@ <h1>compute_dTgc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">compute_dTgc</li>
           </ol>
         </nav>
@@ -128,10 +128,10 @@ <h4 class="card-header bg-primary text-white">Subroutines</h4>
       </a>
       <div id="subs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../interface/compute_dtgc~3.html#proc-compute_dtgc_bspline_1d_scalar">compute_dTgc_bspline_1d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_dtgc~3.html#proc-compute_dtgc_bspline_1d_vector">compute_dTgc_bspline_1d_vector</a>
-            <a class="list-group-item" href="../interface/compute_dtgc~3.html#proc-compute_dtgc_nurbs_1d_scalar">compute_dTgc_nurbs_1d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_dtgc~3.html#proc-compute_dtgc_nurbs_1d_vector">compute_dTgc_nurbs_1d_vector</a>
+            <a class="list-group-item" href="../interface/compute_dtgc~3.html#proc-compute_dtgc_bspline_2d_scalar">compute_dTgc_bspline_2d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_dtgc~3.html#proc-compute_dtgc_bspline_2d_vector">compute_dTgc_bspline_2d_vector</a>
+            <a class="list-group-item" href="../interface/compute_dtgc~3.html#proc-compute_dtgc_nurbs_2d_scalar">compute_dTgc_nurbs_2d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_dtgc~3.html#proc-compute_dtgc_nurbs_2d_vector">compute_dTgc_nurbs_2d_vector</a>
         </div>
       </div>
     </div>
@@ -163,112 +163,112 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: interface~~compute_dtgc~3~~CalledByGraph Pages: 1 -->
-<svg id="interfacecompute_dtgc3CalledByGraph" width="641pt" height="49pt"
- viewBox="0.00 0.00 641.00 48.85" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~compute_dtgc~3~~CalledByGraph" class="graph" transform="scale(1.51 1.51) rotate(0) translate(4 70)">
+<svg id="interfacecompute_dtgc3CalledByGraph" width="641pt" height="48pt"
+ viewBox="0.00 0.00 641.00 47.86" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~compute_dtgc~3~~CalledByGraph" class="graph" transform="scale(1.55 1.55) rotate(0) translate(4 70)">
 <title>interface~~compute_dtgc~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 967,-70 967,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 987,-70 987,4 -4,4"/>
 <!-- interface~compute_dtgc~3 -->
 <g id="interface~~compute_dtgc~3~~CalledByGraph_node1" class="node">
 <title>interface~compute_dtgc~3</title>
-<polygon fill="none" stroke="black" points="963,-45 872,-45 872,-21 963,-21 963,-45"/>
-<text text-anchor="middle" x="917.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_dTgc</text>
+<polygon fill="none" stroke="black" points="983,-45 892,-45 892,-21 983,-21 983,-45"/>
+<text text-anchor="middle" x="937.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_dTgc</text>
 </g>
 <!-- proc~derivative_scalar~3 -->
 <g id="interface~~compute_dtgc~3~~CalledByGraph_node2" class="node">
 <title>proc~derivative_scalar~3</title>
-<g id="a_interface~~compute_dtgc~3~~CalledByGraph_node2"><a xlink:href="../proc/derivative_scalar~3.html" xlink:title="nurbs_curve%derivative_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="835,-66 657,-66 657,-42 835,-42 835,-66"/>
-<text text-anchor="middle" x="746" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_scalar</text>
+<g id="a_interface~~compute_dtgc~3~~CalledByGraph_node2"><a xlink:href="../proc/derivative_scalar~3.html" xlink:title="nurbs_surface%derivative_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="855,-66 667,-66 667,-42 855,-42 855,-66"/>
+<text text-anchor="middle" x="761" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_scalar~3&#45;&gt;interface~compute_dtgc~3 -->
 <g id="interface~~compute_dtgc~3~~CalledByGraph_edge1" class="edge">
 <title>proc~derivative_scalar~3&#45;&gt;interface~compute_dtgc~3</title>
-<path fill="none" stroke="#ff0000" d="M835.23,-43.07C844.26,-41.95 853.24,-40.84 861.76,-39.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="862.4,-43.23 871.89,-38.53 861.54,-36.28 862.4,-43.23"/>
+<path fill="none" stroke="#ff0000" d="M855.13,-42.79C864.25,-41.7 873.28,-40.61 881.83,-39.58"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="882.48,-43.03 891.99,-38.36 881.65,-36.08 882.48,-43.03"/>
 </g>
 <!-- proc~derivative_vector~3 -->
 <g id="interface~~compute_dtgc~3~~CalledByGraph_node3" class="node">
 <title>proc~derivative_vector~3</title>
-<g id="a_interface~~compute_dtgc~3~~CalledByGraph_node3"><a xlink:href="../proc/derivative_vector~3.html" xlink:title="nurbs_curve%derivative_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="836,-24 656,-24 656,0 836,0 836,-24"/>
-<text text-anchor="middle" x="746" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_vector</text>
+<g id="a_interface~~compute_dtgc~3~~CalledByGraph_node3"><a xlink:href="../proc/derivative_vector~3.html" xlink:title="nurbs_surface%derivative_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="856,-24 666,-24 666,0 856,0 856,-24"/>
+<text text-anchor="middle" x="761" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_vector~3&#45;&gt;interface~compute_dtgc~3 -->
 <g id="interface~~compute_dtgc~3~~CalledByGraph_edge2" class="edge">
 <title>proc~derivative_vector~3&#45;&gt;interface~compute_dtgc~3</title>
-<path fill="none" stroke="#ff0000" d="M836.22,-23.05C844.85,-24.12 853.43,-25.19 861.58,-26.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="861.3,-29.69 871.65,-27.44 862.16,-22.74 861.3,-29.69"/>
+<path fill="none" stroke="#ff0000" d="M856.15,-23.33C864.86,-24.38 873.48,-25.42 881.66,-26.4"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="881.41,-29.9 891.76,-27.62 882.25,-22.95 881.41,-29.9"/>
 </g>
 <!-- none~derivative~3 -->
 <g id="interface~~compute_dtgc~3~~CalledByGraph_node4" class="node">
 <title>none~derivative~3</title>
-<g id="a_interface~~compute_dtgc~3~~CalledByGraph_node4"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative~3" xlink:title="nurbs_curve%derivative">
-<polygon fill="#a7506f" stroke="#a7506f" points="620,-45 479,-45 479,-21 620,-21 620,-45"/>
-<text text-anchor="middle" x="549.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative</text>
+<g id="a_interface~~compute_dtgc~3~~CalledByGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~3" xlink:title="nurbs_surface%derivative">
+<polygon fill="#a7506f" stroke="#a7506f" points="630,-45 479,-45 479,-21 630,-21 630,-45"/>
+<text text-anchor="middle" x="554.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative</text>
 </a>
 </g>
 </g>
 <!-- none~derivative~3&#45;&gt;proc~derivative_scalar~3 -->
 <g id="interface~~compute_dtgc~3~~CalledByGraph_edge3" class="edge">
 <title>none~derivative~3&#45;&gt;proc~derivative_scalar~3</title>
-<path fill="none" stroke="#ff0000" d="M620.17,-40.52C628.8,-41.45 637.75,-42.42 646.71,-43.39"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="646.5,-46.89 656.82,-44.48 647.25,-39.93 646.5,-46.89"/>
+<path fill="none" stroke="#ff0000" d="M630.2,-40.67C638.82,-41.56 647.72,-42.47 656.64,-43.39"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="656.39,-46.88 666.69,-44.42 657.1,-39.92 656.39,-46.88"/>
 </g>
 <!-- none~derivative~3&#45;&gt;proc~derivative_vector~3 -->
 <g id="interface~~compute_dtgc~3~~CalledByGraph_edge4" class="edge">
 <title>none~derivative~3&#45;&gt;proc~derivative_vector~3</title>
-<path fill="none" stroke="#00ffff" d="M620.17,-25.48C628.47,-24.58 637.07,-23.65 645.69,-22.72"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="646.24,-26.18 655.8,-21.63 645.48,-19.22 646.24,-26.18"/>
+<path fill="none" stroke="#00ffff" d="M630.2,-25.33C638.56,-24.47 647.19,-23.58 655.84,-22.7"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="656.4,-26.16 665.99,-21.65 655.68,-19.19 656.4,-26.16"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="interface~~compute_dtgc~3~~CalledByGraph_node5" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_interface~~compute_dtgc~3~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="443,-45 321,-45 321,-21 443,-21 443,-45"/>
-<text text-anchor="middle" x="382" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_interface~~compute_dtgc~3~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="443,-45 311,-45 311,-21 443,-21 443,-45"/>
+<text text-anchor="middle" x="377" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~derivative~3 -->
 <g id="interface~~compute_dtgc~3~~CalledByGraph_edge5" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~derivative~3</title>
-<path fill="none" stroke="#ff0000" d="M443.22,-33C451.52,-33 460.15,-33 468.74,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="468.78,-36.5 478.78,-33 468.78,-29.5 468.78,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M443.35,-33C451.69,-33 460.31,-33 468.89,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="468.93,-36.5 478.93,-33 468.93,-29.5 468.93,-36.5"/>
 </g>
-<!-- proc~cmp_length -->
+<!-- proc~cmp_area -->
 <g id="interface~~compute_dtgc~3~~CalledByGraph_node6" class="node">
-<title>proc~cmp_length</title>
-<g id="a_interface~~compute_dtgc~3~~CalledByGraph_node6"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="285,-45 135,-45 135,-21 285,-21 285,-45"/>
-<text text-anchor="middle" x="210" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<title>proc~cmp_area</title>
+<g id="a_interface~~compute_dtgc~3~~CalledByGraph_node6"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
+<polygon fill="#d9534f" stroke="#d9534f" points="275,-45 125,-45 125,-21 275,-21 275,-45"/>
+<text text-anchor="middle" x="200" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
 <g id="interface~~compute_dtgc~3~~CalledByGraph_edge6" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#ff0000" d="M285.07,-33C293.59,-33 302.27,-33 310.74,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="310.95,-36.5 320.95,-33 310.95,-29.5 310.95,-36.5"/>
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#ff0000" d="M275.22,-33C283.63,-33 292.21,-33 300.63,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="300.81,-36.5 310.81,-33 300.81,-29.5 300.81,-36.5"/>
 </g>
-<!-- program~compute_length -->
+<!-- program~compute_area -->
 <g id="interface~~compute_dtgc~3~~CalledByGraph_node7" class="node">
-<title>program~compute_length</title>
-<g id="a_interface~~compute_dtgc~3~~CalledByGraph_node7"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-45 0,-45 0,-21 99,-21 99,-45"/>
-<text text-anchor="middle" x="49.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<title>program~compute_area</title>
+<g id="a_interface~~compute_dtgc~3~~CalledByGraph_node7"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-45 0,-45 0,-21 89,-21 89,-45"/>
+<text text-anchor="middle" x="44.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;proc~cmp_length -->
+<!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="interface~~compute_dtgc~3~~CalledByGraph_edge7" class="edge">
-<title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#ff0000" d="M99.35,-33C107.46,-33 116.06,-33 124.75,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="124.96,-36.5 134.96,-33 124.96,-29.5 124.96,-36.5"/>
+<title>program~compute_area&#45;&gt;proc~cmp_area</title>
+<path fill="none" stroke="#ff0000" d="M89.08,-33C97.19,-33 105.92,-33 114.78,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="114.81,-36.5 124.81,-33 114.81,-29.5 114.81,-36.5"/>
 </g>
 </g>
 </svg>
@@ -361,7 +361,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
 
         <h2>Subroutines</h2>
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_bspline_1d_scalar"></span> <h3>private pure subroutine compute_dTgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_dTgc, f_Tgc, f_elem)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_bspline_2d_scalar"></span> <h3>private pure subroutine compute_dTgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, nc, f_dTgc, f_Tgc, elem)  
 </h3></div>
     <div class="card-body">
         
@@ -379,22 +379,22 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~44"></span>
+              <span class="anchor" id="variable-f_xt~40"></span>
               real(kind=rk),
             </td>
-<td>intent(in)</td>
+<td>intent(in),</td>
               <td></td>            <td>
-              
+              contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong></td>
+            <td><strong>f_Xt</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot~12"></span>
+              <span class="anchor" id="variable-f_knot1~24"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -402,14 +402,29 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot</strong>(:)</td>
+            <td><strong>f_knot1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~44"></span>
+              <span class="anchor" id="variable-f_knot2~24"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot2</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_degree~40"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -417,14 +432,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong></td>
+            <td><strong>f_degree</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~40"></span>
+              <span class="anchor" id="variable-nc~54"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -432,14 +447,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong></td>
+            <td><strong>nc</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~24"></span>
+              <span class="anchor" id="variable-f_dtgc~20"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -447,14 +462,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_dTgc</strong>(:)</td>
+            <td><strong>f_dTgc</strong>(:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~32"></span>
+              <span class="anchor" id="variable-f_tgc~28"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -469,15 +484,15 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_elem~4"></span>
+              <span class="anchor" id="variable-elem~12"></span>
               integer,
             </td>
-<td>intent(in),</td>
-              <td>optional</td>            <td>
+<td>intent(in)</td>
+              <td></td>            <td>
               
             </td>
             <td>::</td>
-            <td><strong>f_elem</strong>(:)</td>
+            <td><strong>elem</strong>(:)</td>
             <td>
                 
             </td>
@@ -490,7 +505,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_bspline_1d_vector"></span> <h3>private pure subroutine compute_dTgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_bspline_2d_vector"></span> <h3>private pure subroutine compute_dTgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, nc, f_ng, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -508,7 +523,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~42"></span>
+              <span class="anchor" id="variable-f_xt~38"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -516,14 +531,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong>(:)</td>
+            <td><strong>f_Xt</strong>(:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot~10"></span>
+              <span class="anchor" id="variable-f_knot1~22"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -531,14 +546,29 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot</strong>(:)</td>
+            <td><strong>f_knot1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~42"></span>
+              <span class="anchor" id="variable-f_knot2~22"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot2</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_degree~38"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -546,14 +576,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong></td>
+            <td><strong>f_degree</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~38"></span>
+              <span class="anchor" id="variable-nc~53"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -561,14 +591,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong></td>
+            <td><strong>nc</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~24"></span>
+              <span class="anchor" id="variable-f_ng~22"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -576,14 +606,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong></td>
+            <td><strong>f_ng</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~22"></span>
+              <span class="anchor" id="variable-f_dtgc~18"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -591,14 +621,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_dTgc</strong>(:,:)</td>
+            <td><strong>f_dTgc</strong>(:,:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~30"></span>
+              <span class="anchor" id="variable-f_tgc~26"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -619,7 +649,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_nurbs_1d_scalar"></span> <h3>private pure subroutine compute_dTgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, f_elem)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_nurbs_2d_scalar"></span> <h3>private pure subroutine compute_dTgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, elem)  
 </h3></div>
     <div class="card-body">
         
@@ -637,22 +667,22 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~43"></span>
+              <span class="anchor" id="variable-f_xt~39"></span>
               real(kind=rk),
             </td>
-<td>intent(in)</td>
+<td>intent(in),</td>
               <td></td>            <td>
-              
+              contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong></td>
+            <td><strong>f_Xt</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot~11"></span>
+              <span class="anchor" id="variable-f_knot1~23"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -660,14 +690,29 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot</strong>(:)</td>
+            <td><strong>f_knot1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~43"></span>
+              <span class="anchor" id="variable-f_knot2~23"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot2</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_degree~39"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -675,14 +720,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong></td>
+            <td><strong>f_degree</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~39"></span>
+              <span class="anchor" id="variable-f_nc~38"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -690,14 +735,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong></td>
+            <td><strong>f_nc</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~22"></span>
+              <span class="anchor" id="variable-f_wc~20"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -712,7 +757,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~23"></span>
+              <span class="anchor" id="variable-f_dtgc~19"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -720,14 +765,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_dTgc</strong>(:)</td>
+            <td><strong>f_dTgc</strong>(:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~31"></span>
+              <span class="anchor" id="variable-f_tgc~27"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -742,15 +787,15 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_elem~3"></span>
+              <span class="anchor" id="variable-elem~11"></span>
               integer,
             </td>
-<td>intent(in),</td>
-              <td>optional</td>            <td>
+<td>intent(in)</td>
+              <td></td>            <td>
               
             </td>
             <td>::</td>
-            <td><strong>f_elem</strong>(:)</td>
+            <td><strong>elem</strong>(:)</td>
             <td>
                 
             </td>
@@ -763,7 +808,7 @@ <h4>Arguments</h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_nurbs_1d_vector"></span> <h3>private pure subroutine compute_dTgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_dtgc_nurbs_2d_vector"></span> <h3>private pure subroutine compute_dTgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -781,7 +826,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~41"></span>
+              <span class="anchor" id="variable-f_xt~37"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -789,14 +834,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong>(:)</td>
+            <td><strong>f_Xt</strong>(:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot~9"></span>
+              <span class="anchor" id="variable-f_knot1~21"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -804,14 +849,29 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot</strong>(:)</td>
+            <td><strong>f_knot1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~41"></span>
+              <span class="anchor" id="variable-f_knot2~21"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot2</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_degree~37"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -819,7 +879,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong></td>
+            <td><strong>f_degree</strong>(2)</td>
             <td>
                 
             </td>
@@ -834,14 +894,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong></td>
+            <td><strong>f_nc</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~23"></span>
+              <span class="anchor" id="variable-f_ng~21"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -849,14 +909,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong></td>
+            <td><strong>f_ng</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~21"></span>
+              <span class="anchor" id="variable-f_wc~19"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -871,7 +931,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~21"></span>
+              <span class="anchor" id="variable-f_dtgc~17"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -879,14 +939,14 @@ <h4>Arguments</h4>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>f_dTgc</strong>(:,:)</td>
+            <td><strong>f_dTgc</strong>(:,:,:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~29"></span>
+              <span class="anchor" id="variable-f_tgc~25"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -924,7 +984,7 @@ <h4>Arguments</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/compute_multiplicity.html b/interface/compute_multiplicity.html
index 2dc4139bc..336d8ae81 100644
--- a/interface/compute_multiplicity.html
+++ b/interface/compute_multiplicity.html
@@ -304,566 +304,566 @@ <h3 class="card-title">Called by</h3>
 <!-- interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node1" class="node">
 <title>interface~compute_multiplicity</title>
-<polygon fill="none" stroke="black" points="1442,-1154.51 1318,-1154.51 1318,-1130.51 1442,-1130.51 1442,-1154.51"/>
-<text text-anchor="middle" x="1380" y="-1140.11" font-family="Helvetica,sans-Serif" font-size="10.50">compute_multiplicity</text>
+<polygon fill="none" stroke="black" points="1442,-1163.51 1318,-1163.51 1318,-1139.51 1442,-1139.51 1442,-1163.51"/>
+<text text-anchor="middle" x="1380" y="-1149.11" font-family="Helvetica,sans-Serif" font-size="10.50">compute_multiplicity</text>
 </g>
 <!-- proc~cmp_nc -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node2" class="node">
 <title>proc~cmp_nc</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node2"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="1056,-1358.51 917,-1358.51 917,-1334.51 1056,-1334.51 1056,-1358.51"/>
-<text text-anchor="middle" x="986.5" y="-1344.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node2"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_curve%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="1257.5,-1602.51 1128.5,-1602.51 1128.5,-1578.51 1257.5,-1578.51 1257.5,-1602.51"/>
+<text text-anchor="middle" x="1193" y="-1588.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_nc</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge1" class="edge">
 <title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M994.85,-1334.44C1011.11,-1308.82 1052.81,-1248.83 1104,-1218.51 1174.03,-1177.03 1203.84,-1198.19 1282,-1175.51 1299.99,-1170.28 1319.6,-1163.77 1336.45,-1157.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1337.74,-1161.17 1346.02,-1154.56 1335.42,-1154.57 1337.74,-1161.17"/>
+<path fill="none" stroke="#ff0000" d="M1257.77,-1580.53C1266.84,-1576.74 1275.33,-1571.57 1282,-1564.51 1336.72,-1506.6 1368.23,-1251.57 1376.68,-1173.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1380.18,-1174.18 1377.76,-1163.87 1373.22,-1173.44 1380.18,-1174.18"/>
 </g>
 <!-- proc~cmp_nc~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node3" class="node">
 <title>proc~cmp_nc~2</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node3"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="1056,-892.51 917,-892.51 917,-868.51 1056,-868.51 1056,-892.51"/>
-<text text-anchor="middle" x="986.5" y="-878.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node3"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="1056,-1358.51 917,-1358.51 917,-1334.51 1056,-1334.51 1056,-1358.51"/>
+<text text-anchor="middle" x="986.5" y="-1344.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge2" class="edge">
 <title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1056.27,-877.89C1120.95,-878.95 1217.28,-890.07 1282,-940.51 1341.29,-986.72 1366.34,-1078.26 1375.06,-1120.37"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1371.67,-1121.26 1377.02,-1130.4 1378.54,-1119.92 1371.67,-1121.26"/>
+<path fill="none" stroke="#ff0000" d="M995.84,-1334.2C1013.04,-1309.82 1054.98,-1255.35 1104,-1227.51 1174.77,-1187.31 1203.84,-1207.19 1282,-1184.51 1299.99,-1179.28 1319.6,-1172.77 1336.45,-1166.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1337.74,-1170.17 1346.02,-1163.56 1335.42,-1163.57 1337.74,-1170.17"/>
 </g>
 <!-- proc~cmp_nc~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node4" class="node">
 <title>proc~cmp_nc~3</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node4"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_curve%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="1257.5,-1522.51 1128.5,-1522.51 1128.5,-1498.51 1257.5,-1498.51 1257.5,-1522.51"/>
-<text text-anchor="middle" x="1193" y="-1508.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_nc</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node4"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="1056,-901.51 917,-901.51 917,-877.51 1056,-877.51 1056,-901.51"/>
+<text text-anchor="middle" x="986.5" y="-887.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge3" class="edge">
 <title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1257.94,-1500.07C1266.87,-1496.34 1275.28,-1491.3 1282,-1484.51 1371.91,-1393.61 1379.82,-1225.89 1379.57,-1165.19"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1383.07,-1164.79 1379.44,-1154.83 1376.07,-1164.87 1383.07,-1164.79"/>
+<path fill="none" stroke="#ff0000" d="M1056.27,-886.89C1120.95,-887.95 1217.28,-899.07 1282,-949.51 1341.29,-995.72 1366.34,-1087.26 1375.06,-1129.37"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1371.67,-1130.26 1377.02,-1139.4 1378.54,-1128.92 1371.67,-1130.26"/>
 </g>
 <!-- proc~elevate_degree_a_5_9 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node5" class="node">
 <title>proc~elevate_degree_a_5_9</title>
 <g id="a_interface~~compute_multiplicity~~CalledByGraph_node5"><a xlink:href="../proc/elevate_degree_a_5_9.html" xlink:title="elevate_degree_A_5_9">
-<polygon fill="#d9534f" stroke="#d9534f" points="702.5,-1052.51 570.5,-1052.51 570.5,-1028.51 702.5,-1028.51 702.5,-1052.51"/>
-<text text-anchor="middle" x="636.5" y="-1038.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elevate_degree_A_5_9</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="702.5,-1051.51 570.5,-1051.51 570.5,-1027.51 702.5,-1027.51 702.5,-1051.51"/>
+<text text-anchor="middle" x="636.5" y="-1037.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elevate_degree_A_5_9</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree_a_5_9&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge4" class="edge">
 <title>proc~elevate_degree_a_5_9&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M702.59,-1031C845.36,-1011.33 1181.3,-971.92 1282,-1020.51 1325.17,-1041.33 1355.03,-1091.74 1369.34,-1120.83"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1366.31,-1122.6 1373.75,-1130.14 1372.64,-1119.61 1366.31,-1122.6"/>
+<path fill="none" stroke="#ff0000" d="M702.59,-1031.24C845.37,-1014.25 1181.34,-980.94 1282,-1029.51 1325.17,-1050.33 1355.03,-1100.74 1369.34,-1129.83"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1366.31,-1131.6 1373.75,-1139.14 1372.64,-1128.61 1366.31,-1131.6"/>
 </g>
 <!-- proc~get_continuity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node6" class="node">
 <title>proc~get_continuity</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node6"><a xlink:href="../proc/get_continuity.html" xlink:title="nurbs_volume%get_continuity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1279,-1335.51 1107,-1335.51 1107,-1311.51 1279,-1311.51 1279,-1335.51"/>
-<text text-anchor="middle" x="1193" y="-1321.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_continuity</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node6"><a xlink:href="../proc/get_continuity.html" xlink:title="nurbs_curve%get_continuity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1274.5,-1344.51 1111.5,-1344.51 1111.5,-1320.51 1274.5,-1320.51 1274.5,-1344.51"/>
+<text text-anchor="middle" x="1193" y="-1330.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_continuity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_continuity&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge5" class="edge">
 <title>proc~get_continuity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1266.27,-1311.41C1271.85,-1308.96 1277.18,-1306.02 1282,-1302.51 1330.52,-1267.13 1359.55,-1199.4 1371.94,-1164.5"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1375.33,-1165.39 1375.25,-1154.8 1368.7,-1163.13 1375.33,-1165.39"/>
+<path fill="none" stroke="#ff0000" d="M1266.27,-1320.41C1271.85,-1317.96 1277.18,-1315.02 1282,-1311.51 1330.52,-1276.13 1359.55,-1208.4 1371.94,-1173.5"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1375.33,-1174.39 1375.25,-1163.8 1368.7,-1172.13 1375.33,-1174.39"/>
 </g>
 <!-- proc~get_continuity~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node7" class="node">
 <title>proc~get_continuity~2</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node7"><a xlink:href="../proc/get_continuity~2.html" xlink:title="nurbs_surface%get_continuity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1279,-1293.51 1107,-1293.51 1107,-1269.51 1279,-1269.51 1279,-1293.51"/>
-<text text-anchor="middle" x="1193" y="-1279.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_continuity</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node7"><a xlink:href="../proc/get_continuity~2.html" xlink:title="nurbs_volume%get_continuity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1279,-1302.51 1107,-1302.51 1107,-1278.51 1279,-1278.51 1279,-1302.51"/>
+<text text-anchor="middle" x="1193" y="-1288.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_continuity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_continuity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge6" class="edge">
 <title>proc~get_continuity~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1263.94,-1269.35C1270.28,-1266.92 1276.41,-1264 1282,-1260.51 1321.06,-1236.1 1351.76,-1190.5 1367.47,-1163.7"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1370.67,-1165.17 1372.57,-1154.75 1364.58,-1161.7 1370.67,-1165.17"/>
+<path fill="none" stroke="#ff0000" d="M1263.94,-1278.35C1270.28,-1275.92 1276.41,-1273 1282,-1269.51 1321.06,-1245.1 1351.76,-1199.5 1367.47,-1172.7"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1370.67,-1174.17 1372.57,-1163.75 1364.58,-1170.7 1370.67,-1174.17"/>
 </g>
 <!-- proc~get_continuity~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node8" class="node">
 <title>proc~get_continuity~3</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node8"><a xlink:href="../proc/get_continuity~3.html" xlink:title="nurbs_curve%get_continuity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1274.5,-1251.51 1111.5,-1251.51 1111.5,-1227.51 1274.5,-1227.51 1274.5,-1251.51"/>
-<text text-anchor="middle" x="1193" y="-1237.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_continuity</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node8"><a xlink:href="../proc/get_continuity~3.html" xlink:title="nurbs_surface%get_continuity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1279,-1260.51 1107,-1260.51 1107,-1236.51 1279,-1236.51 1279,-1260.51"/>
+<text text-anchor="middle" x="1193" y="-1246.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_continuity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_continuity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge7" class="edge">
 <title>proc~get_continuity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1245.86,-1227.41C1258.02,-1223.7 1270.72,-1219.09 1282,-1213.51 1310.35,-1199.48 1339.13,-1177.17 1357.9,-1161.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1360.24,-1163.91 1365.54,-1154.74 1355.67,-1158.6 1360.24,-1163.91"/>
+<path fill="none" stroke="#ff0000" d="M1245.86,-1236.41C1258.02,-1232.7 1270.72,-1228.09 1282,-1222.51 1310.35,-1208.48 1339.13,-1186.17 1357.9,-1170.31"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1360.24,-1172.91 1365.54,-1163.74 1355.67,-1167.6 1360.24,-1172.91"/>
 </g>
 <!-- proc~get_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node9" class="node">
 <title>proc~get_multiplicity</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node9"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1282,-1564.51 1104,-1564.51 1104,-1540.51 1282,-1540.51 1282,-1564.51"/>
-<text text-anchor="middle" x="1193" y="-1550.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node9"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1277.5,-286.51 1108.5,-286.51 1108.5,-262.51 1277.5,-262.51 1277.5,-286.51"/>
+<text text-anchor="middle" x="1193" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge8" class="edge">
 <title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1270.42,-1540.29C1274.63,-1537.84 1278.54,-1534.93 1282,-1531.51 1335.28,-1478.76 1367.58,-1239.29 1376.48,-1164.73"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1379.98,-1164.94 1377.66,-1154.6 1373.03,-1164.13 1379.98,-1164.94"/>
+<path fill="none" stroke="#ff0000" d="M1197.9,-286.54C1211.19,-327.81 1255.29,-467.57 1282,-585.51 1329.45,-794.99 1365.73,-1052.74 1376.04,-1129.16"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1372.62,-1130.02 1377.42,-1139.47 1379.56,-1129.09 1372.62,-1130.02"/>
 </g>
 <!-- proc~get_multiplicity~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node10" class="node">
 <title>proc~get_multiplicity~2</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node10"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1282,-973.51 1104,-973.51 1104,-949.51 1282,-949.51 1282,-973.51"/>
-<text text-anchor="middle" x="1193" y="-959.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node10"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1282,-1522.51 1104,-1522.51 1104,-1498.51 1282,-1498.51 1282,-1522.51"/>
+<text text-anchor="middle" x="1193" y="-1508.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge9" class="edge">
 <title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1255.92,-973.55C1265.21,-977.08 1274.26,-981.63 1282,-987.51 1328.31,-1022.67 1358.01,-1086.87 1371.16,-1120.55"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1368.05,-1122.21 1374.85,-1130.34 1374.6,-1119.75 1368.05,-1122.21"/>
+<path fill="none" stroke="#ff0000" d="M1261.44,-1498.47C1269.05,-1494.93 1276.15,-1490.38 1282,-1484.51 1370.03,-1396.14 1379.11,-1232.74 1379.37,-1173.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1382.87,-1173.5 1379.33,-1163.52 1375.87,-1173.53 1382.87,-1173.5"/>
 </g>
 <!-- proc~get_multiplicity~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node11" class="node">
 <title>proc~get_multiplicity~3</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node11"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1277.5,-286.51 1108.5,-286.51 1108.5,-262.51 1277.5,-262.51 1277.5,-286.51"/>
-<text text-anchor="middle" x="1193" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node11"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1282,-982.51 1104,-982.51 1104,-958.51 1282,-958.51 1282,-982.51"/>
+<text text-anchor="middle" x="1193" y="-968.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge10" class="edge">
 <title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1199.48,-286.56C1214.88,-320.94 1258.95,-422.72 1282,-511.51 1342.65,-745.11 1370.31,-1037.86 1377.21,-1120.11"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1373.74,-1120.61 1378.05,-1130.29 1380.72,-1120.04 1373.74,-1120.61"/>
+<path fill="none" stroke="#ff0000" d="M1255.92,-982.55C1265.21,-986.08 1274.26,-990.63 1282,-996.51 1328.31,-1031.67 1358.01,-1095.87 1371.16,-1129.55"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1368.05,-1131.21 1374.85,-1139.34 1374.6,-1128.75 1368.05,-1131.21"/>
 </g>
 <!-- proc~get_nc_dir -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node12" class="node">
 <title>proc~get_nc_dir</title>
 <g id="a_interface~~compute_multiplicity~~CalledByGraph_node12"><a xlink:href="../proc/get_nc_dir.html" xlink:title="nurbs_volume%get_nc_dir">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1269,-1095.51 1117,-1095.51 1117,-1071.51 1269,-1071.51 1269,-1095.51"/>
-<text text-anchor="middle" x="1193" y="-1081.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_nc_dir</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1269,-1104.51 1117,-1104.51 1117,-1080.51 1269,-1080.51 1269,-1104.51"/>
+<text text-anchor="middle" x="1193" y="-1090.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_nc_dir</text>
 </a>
 </g>
 </g>
 <!-- proc~get_nc_dir&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge11" class="edge">
 <title>proc~get_nc_dir&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1236.18,-1095.59C1250.74,-1099.86 1267.12,-1104.78 1282,-1109.51 1299.27,-1114.99 1318.15,-1121.34 1334.63,-1126.99"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1333.95,-1130.46 1344.54,-1130.41 1336.23,-1123.84 1333.95,-1130.46"/>
+<path fill="none" stroke="#ff0000" d="M1236.18,-1104.59C1250.74,-1108.86 1267.12,-1113.78 1282,-1118.51 1299.27,-1123.99 1318.15,-1130.34 1334.63,-1135.99"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1333.95,-1139.46 1344.54,-1139.41 1336.23,-1132.84 1333.95,-1139.46"/>
 </g>
 <!-- proc~get_nc_dir~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node13" class="node">
 <title>proc~get_nc_dir~2</title>
 <g id="a_interface~~compute_multiplicity~~CalledByGraph_node13"><a xlink:href="../proc/get_nc_dir~2.html" xlink:title="nurbs_surface%get_nc_dir">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1269,-1053.51 1117,-1053.51 1117,-1029.51 1269,-1029.51 1269,-1053.51"/>
-<text text-anchor="middle" x="1193" y="-1039.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_nc_dir</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1269,-1062.51 1117,-1062.51 1117,-1038.51 1269,-1038.51 1269,-1062.51"/>
+<text text-anchor="middle" x="1193" y="-1048.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_nc_dir</text>
 </a>
 </g>
 </g>
 <!-- proc~get_nc_dir~2&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge12" class="edge">
 <title>proc~get_nc_dir~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1259.58,-1053.62C1267.33,-1056.07 1274.97,-1059.01 1282,-1062.51 1312.95,-1077.92 1342.73,-1104.88 1360.94,-1123.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1358.53,-1125.74 1368.01,-1130.47 1363.54,-1120.86 1358.53,-1125.74"/>
+<path fill="none" stroke="#ff0000" d="M1259.58,-1062.62C1267.33,-1065.07 1274.97,-1068.01 1282,-1071.51 1312.95,-1086.92 1342.73,-1113.88 1360.94,-1132.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1358.53,-1134.74 1368.01,-1139.47 1363.54,-1129.86 1358.53,-1134.74"/>
 </g>
 <!-- proc~insert_knots -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node14" class="node">
 <title>proc~insert_knots</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node14"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514,-1732.51 353,-1732.51 353,-1708.51 514,-1708.51 514,-1732.51"/>
-<text text-anchor="middle" x="433.5" y="-1718.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node14"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_curve%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="509,-492.51 358,-492.51 358,-468.51 509,-468.51 509,-492.51"/>
+<text text-anchor="middle" x="433.5" y="-478.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge13" class="edge">
 <title>proc~insert_knots&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M490.71,-1708.47C579.19,-1689.93 747.15,-1656.51 808,-1656.51 808,-1656.51 808,-1656.51 987.5,-1656.51 1123.49,-1656.51 1188.44,-1672.2 1282,-1573.51 1339.34,-1513.03 1369.23,-1244.65 1376.95,-1164.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1380.47,-1164.86 1377.93,-1154.57 1373.5,-1164.2 1380.47,-1164.86"/>
+<path fill="none" stroke="#ff0000" d="M509.4,-491.53C514.7,-494.22 519.66,-497.5 524,-501.51 562.43,-536.96 529.55,-571.01 560,-613.51 639.94,-725.07 670.75,-797.51 808,-797.51 808,-797.51 808,-797.51 987.5,-797.51 1124.24,-797.51 1182.58,-792.64 1282,-886.51 1353.53,-954.05 1372.53,-1078.69 1377.39,-1129.29"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1373.92,-1129.78 1378.27,-1139.44 1380.9,-1129.18 1373.92,-1129.78"/>
 </g>
 <!-- none~set -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_node36" class="node">
+<g id="interface~~compute_multiplicity~~CalledByGraph_node49" class="node">
 <title>none~set</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node36"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="693,-1442.51 580,-1442.51 580,-1418.51 693,-1418.51 693,-1442.51"/>
-<text text-anchor="middle" x="636.5" y="-1428.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node49"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="688,-286.51 585,-286.51 585,-262.51 688,-262.51 688,-286.51"/>
+<text text-anchor="middle" x="636.5" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;none~set -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge61" class="edge">
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge101" class="edge">
 <title>proc~insert_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M510.35,-1708.45C515.25,-1705.97 519.86,-1703.02 524,-1699.51 544.17,-1682.37 605.96,-1513.25 627.77,-1452.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="631.19,-1453.12 631.25,-1442.52 624.6,-1450.76 631.19,-1453.12"/>
+<path fill="none" stroke="#ff0000" d="M508.45,-468.33C513.96,-465.89 519.23,-462.98 524,-459.51 581.76,-417.45 615.3,-335.52 628.69,-296.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="632.05,-297.33 631.86,-286.74 625.4,-295.14 632.05,-297.33"/>
 </g>
 <!-- proc~insert_knots~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node15" class="node">
 <title>proc~insert_knots~2</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node15"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514,-1152.51 353,-1152.51 353,-1128.51 514,-1128.51 514,-1152.51"/>
-<text text-anchor="middle" x="433.5" y="-1138.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node15"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514,-1732.51 353,-1732.51 353,-1708.51 514,-1708.51 514,-1732.51"/>
+<text text-anchor="middle" x="433.5" y="-1718.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge14" class="edge">
 <title>proc~insert_knots~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M514.21,-1147.59C589.78,-1153.68 706.52,-1161.51 808,-1161.51 808,-1161.51 808,-1161.51 987.5,-1161.51 1099.35,-1161.51 1228.97,-1153.67 1307.42,-1148.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1307.96,-1151.54 1317.68,-1147.33 1307.45,-1144.56 1307.96,-1151.54"/>
+<path fill="none" stroke="#ff0000" d="M495.3,-1708.44C505.02,-1705.88 514.88,-1702.91 524,-1699.51 657.56,-1649.72 665.46,-1550.51 808,-1550.51 808,-1550.51 808,-1550.51 987.5,-1550.51 1053.08,-1550.51 1231.53,-1573.39 1282,-1531.51 1338.44,-1484.67 1368.58,-1247.54 1376.72,-1173.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1380.21,-1173.84 1377.8,-1163.52 1373.25,-1173.09 1380.21,-1173.84"/>
 </g>
 <!-- none~set~2 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_node37" class="node">
+<g id="interface~~compute_multiplicity~~CalledByGraph_node36" class="node">
 <title>none~set~2</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node37"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="693,-870.51 580,-870.51 580,-846.51 693,-846.51 693,-870.51"/>
-<text text-anchor="middle" x="636.5" y="-856.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node36"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="693,-1442.51 580,-1442.51 580,-1418.51 693,-1418.51 693,-1442.51"/>
+<text text-anchor="middle" x="636.5" y="-1428.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;none~set~2 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge76" class="edge">
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge61" class="edge">
 <title>proc~insert_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M512.81,-1128.34C516.89,-1125.87 520.67,-1122.94 524,-1119.51 580.18,-1061.56 523.53,-1013.51 560,-941.51 572.78,-916.27 595.36,-892.95 612.51,-877.5"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="615.2,-879.79 620.42,-870.57 610.59,-874.53 615.2,-879.79"/>
+<path fill="none" stroke="#ff0000" d="M512.74,-1708.27C516.83,-1705.81 520.64,-1702.91 524,-1699.51 576.12,-1646.7 529.87,-1604.31 560,-1536.51 574.68,-1503.48 600.49,-1470.34 617.79,-1450.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="620.47,-1452.38 624.41,-1442.54 615.2,-1447.77 620.47,-1452.38"/>
 </g>
 <!-- proc~insert_knots~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node16" class="node">
 <title>proc~insert_knots~3</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node16"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_curve%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="509,-450.51 358,-450.51 358,-426.51 509,-426.51 509,-450.51"/>
-<text text-anchor="middle" x="433.5" y="-436.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node16"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514,-1152.51 353,-1152.51 353,-1128.51 514,-1128.51 514,-1152.51"/>
+<text text-anchor="middle" x="433.5" y="-1138.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge15" class="edge">
 <title>proc~insert_knots~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M485.71,-450.51C587.55,-474.38 805.96,-525.51 808,-525.51 808,-525.51 808,-525.51 987.5,-525.51 1133.2,-525.51 1192.77,-554.33 1282,-669.51 1338.2,-742.05 1369.22,-1036.47 1377.02,-1120.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1373.56,-1120.72 1377.95,-1130.36 1380.53,-1120.09 1373.56,-1120.72"/>
+<path fill="none" stroke="#ff0000" d="M514.13,-1150.62C589.65,-1159.33 706.36,-1170.51 808,-1170.51 808,-1170.51 808,-1170.51 987.5,-1170.51 1099.35,-1170.51 1228.97,-1162.67 1307.42,-1157.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1307.96,-1160.54 1317.68,-1156.33 1307.45,-1153.56 1307.96,-1160.54"/>
 </g>
 <!-- none~set~3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_node49" class="node">
+<g id="interface~~compute_multiplicity~~CalledByGraph_node37" class="node">
 <title>none~set~3</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node49"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="688,-286.51 585,-286.51 585,-262.51 688,-262.51 688,-286.51"/>
-<text text-anchor="middle" x="636.5" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node37"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="693,-870.51 580,-870.51 580,-846.51 693,-846.51 693,-870.51"/>
+<text text-anchor="middle" x="636.5" y="-856.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;none~set~3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge101" class="edge">
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge76" class="edge">
 <title>proc~insert_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M495,-426.41C505.16,-422.88 515.24,-418.33 524,-412.51 570.28,-381.72 606.72,-325.76 624.2,-295.42"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="627.34,-296.96 629.19,-286.53 621.24,-293.53 627.34,-296.96"/>
+<path fill="none" stroke="#ff7500" d="M512.77,-1128.3C516.85,-1125.83 520.65,-1122.93 524,-1119.51 577.74,-1064.65 526.7,-1019.71 560,-950.51 573.6,-922.25 597.61,-895.17 614.9,-877.79"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="617.63,-880.02 622.32,-870.52 612.73,-875.03 617.63,-880.02"/>
 </g>
 <!-- proc~remove_knots -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node17" class="node">
 <title>proc~remove_knots</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node17"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-1690.51 347.5,-1690.51 347.5,-1666.51 519.5,-1666.51 519.5,-1690.51"/>
-<text text-anchor="middle" x="433.5" y="-1676.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node17"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_curve%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514.5,-450.51 352.5,-450.51 352.5,-426.51 514.5,-426.51 514.5,-450.51"/>
+<text text-anchor="middle" x="433.5" y="-436.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge16" class="edge">
 <title>proc~remove_knots&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M483.24,-1666.44C496.72,-1662.4 511.17,-1657.4 524,-1651.51 660.04,-1589.08 658.32,-1470.51 808,-1470.51 808,-1470.51 808,-1470.51 987.5,-1470.51 1129.87,-1470.51 1182.14,-1445.98 1282,-1344.51 1334.24,-1291.42 1362.6,-1204.76 1373.57,-1164.44"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1377.01,-1165.13 1376.16,-1154.57 1370.24,-1163.36 1377.01,-1165.13"/>
+<path fill="none" stroke="#ff0000" d="M494.27,-450.53C504.31,-453.12 514.53,-456.11 524,-459.51 656.47,-507 667.27,-599.51 808,-599.51 808,-599.51 808,-599.51 987.5,-599.51 1144.97,-599.51 1189.99,-668.71 1282,-796.51 1359.15,-903.67 1374.95,-1069.19 1378.18,-1128.99"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1374.69,-1129.36 1378.66,-1139.19 1381.68,-1129.03 1374.69,-1129.36"/>
 </g>
 <!-- proc~remove_knots&#45;&gt;none~set -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge64" class="edge">
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge104" class="edge">
 <title>proc~remove_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M505.43,-1666.32C512.39,-1662.78 518.79,-1658.27 524,-1652.51 583.38,-1586.8 502.24,-1523.65 560,-1456.51 563.17,-1452.83 566.88,-1449.66 570.93,-1446.95"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="572.7,-1449.97 579.66,-1441.98 569.24,-1443.89 572.7,-1449.97"/>
+<path fill="none" stroke="#ff0000" d="M495,-426.41C505.16,-422.88 515.24,-418.33 524,-412.51 570.28,-381.72 606.72,-325.76 624.2,-295.42"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="627.34,-296.96 629.19,-286.53 621.24,-293.53 627.34,-296.96"/>
 </g>
 <!-- proc~remove_knots~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node18" class="node">
 <title>proc~remove_knots~2</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node18"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-1110.51 347.5,-1110.51 347.5,-1086.51 519.5,-1086.51 519.5,-1110.51"/>
-<text text-anchor="middle" x="433.5" y="-1096.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node18"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-1690.51 347.5,-1690.51 347.5,-1666.51 519.5,-1666.51 519.5,-1690.51"/>
+<text text-anchor="middle" x="433.5" y="-1676.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge17" class="edge">
 <title>proc~remove_knots~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M519.69,-1107.46C595.32,-1114.64 708.89,-1123.51 808,-1123.51 808,-1123.51 808,-1123.51 987.5,-1123.51 1099.35,-1123.51 1228.97,-1131.34 1307.42,-1136.95"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1307.45,-1140.46 1317.68,-1137.69 1307.96,-1133.48 1307.45,-1140.46"/>
+<path fill="none" stroke="#ff0000" d="M501.65,-1666.32C509.91,-1662.61 517.66,-1657.79 524,-1651.51 562.07,-1613.83 521.32,-1573.55 560,-1536.51 642.38,-1457.62 693.94,-1470.51 808,-1470.51 808,-1470.51 808,-1470.51 987.5,-1470.51 1128.34,-1470.51 1181.51,-1452.18 1282,-1353.51 1335.14,-1301.32 1363.05,-1214.22 1373.74,-1173.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1377.2,-1174.23 1376.26,-1163.67 1370.41,-1172.51 1377.2,-1174.23"/>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;none~set~2 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge79" class="edge">
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge64" class="edge">
 <title>proc~remove_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M512.16,-1086.35C516.45,-1083.88 520.45,-1080.96 524,-1077.51 568.83,-1033.92 530.11,-996.43 560,-941.51 573.52,-916.66 596,-893.29 612.92,-877.72"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="615.61,-880.01 620.72,-870.73 610.94,-874.8 615.61,-880.01"/>
+<path fill="none" stroke="#ff0000" d="M505.43,-1666.32C512.39,-1662.78 518.79,-1658.27 524,-1652.51 583.38,-1586.8 502.24,-1523.65 560,-1456.51 563.17,-1452.83 566.88,-1449.66 570.93,-1446.95"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="572.7,-1449.97 579.66,-1441.98 569.24,-1443.89 572.7,-1449.97"/>
 </g>
 <!-- proc~remove_knots~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node19" class="node">
 <title>proc~remove_knots~3</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node19"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_curve%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514.5,-492.51 352.5,-492.51 352.5,-468.51 514.5,-468.51 514.5,-492.51"/>
-<text text-anchor="middle" x="433.5" y="-478.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node19"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-1110.51 347.5,-1110.51 347.5,-1086.51 519.5,-1086.51 519.5,-1110.51"/>
+<text text-anchor="middle" x="433.5" y="-1096.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;interface~compute_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge18" class="edge">
 <title>proc~remove_knots~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M504.45,-492.66C511.27,-495.09 517.91,-498.01 524,-501.51 544.17,-513.1 541,-526.09 560,-539.51 658.49,-609.07 687.42,-649.51 808,-649.51 808,-649.51 808,-649.51 987.5,-649.51 1153.03,-649.51 1184.29,-743.89 1282,-877.51 1339.42,-956.02 1366.12,-1072.14 1375.21,-1120.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1371.79,-1121.07 1377.02,-1130.28 1378.68,-1119.82 1371.79,-1121.07"/>
+<path fill="none" stroke="#ff0000" d="M518.48,-1110.54C594.05,-1120.32 708.22,-1132.51 808,-1132.51 808,-1132.51 808,-1132.51 987.5,-1132.51 1099.35,-1132.51 1228.97,-1140.34 1307.42,-1145.95"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1307.45,-1149.46 1317.68,-1146.69 1307.96,-1142.48 1307.45,-1149.46"/>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;none~set~3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge104" class="edge">
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge79" class="edge">
 <title>proc~remove_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M508.45,-468.33C513.96,-465.89 519.23,-462.98 524,-459.51 581.76,-417.45 615.3,-335.52 628.69,-296.36"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="632.05,-297.33 631.86,-286.74 625.4,-295.14 632.05,-297.33"/>
+<path fill="none" stroke="#ff7500" d="M512.09,-1086.28C516.4,-1083.82 520.42,-1080.92 524,-1077.51 566.42,-1036.98 532.82,-1002.5 560,-950.51 574.53,-922.72 598.36,-895.55 615.37,-878.02"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="618.09,-880.25 622.64,-870.69 613.11,-875.32 618.09,-880.25"/>
 </g>
 <!-- proc~cmp_degree -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node20" class="node">
 <title>proc~cmp_degree</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node20"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="1068,-1442.51 905,-1442.51 905,-1418.51 1068,-1418.51 1068,-1442.51"/>
-<text text-anchor="middle" x="986.5" y="-1428.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node20"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="1063.5,-286.51 909.5,-286.51 909.5,-262.51 1063.5,-262.51 1063.5,-286.51"/>
+<text text-anchor="middle" x="986.5" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge26" class="edge">
 <title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#00ff55" d="M997.72,-1442.55C1016.5,-1463.9 1058.75,-1508.28 1104,-1531.51 1107.96,-1533.54 1112.12,-1535.38 1116.39,-1537.04"/>
-<polygon fill="#00ff55" stroke="#00ff55" points="1115.27,-1540.36 1125.87,-1540.41 1117.62,-1533.77 1115.27,-1540.36"/>
+<path fill="none" stroke="#00ff55" d="M1063.65,-274.51C1074.89,-274.51 1086.58,-274.51 1098.13,-274.51"/>
+<polygon fill="#00ff55" stroke="#00ff55" points="1098.23,-278.01 1108.23,-274.51 1098.23,-271.01 1098.23,-278.01"/>
 </g>
 <!-- proc~cmp_degree~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node21" class="node">
 <title>proc~cmp_degree~2</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node21"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="1068,-934.51 905,-934.51 905,-910.51 1068,-910.51 1068,-934.51"/>
-<text text-anchor="middle" x="986.5" y="-920.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node21"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="1068,-1442.51 905,-1442.51 905,-1418.51 1068,-1418.51 1068,-1442.51"/>
+<text text-anchor="middle" x="986.5" y="-1428.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge28" class="edge">
 <title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
-<path fill="none" stroke="#00ffa9" d="M1050.53,-934.53C1072.1,-938.64 1096.42,-943.28 1118.74,-947.54"/>
-<polygon fill="#00ffa9" stroke="#00ffa9" points="1118.35,-951.02 1128.83,-949.46 1119.66,-944.15 1118.35,-951.02"/>
+<path fill="none" stroke="#00ffa9" d="M1018.56,-1442.66C1054.2,-1456.6 1112.75,-1479.5 1151.83,-1494.79"/>
+<polygon fill="#00ffa9" stroke="#00ffa9" points="1150.73,-1498.12 1161.32,-1498.5 1153.28,-1491.6 1150.73,-1498.12"/>
 </g>
 <!-- proc~cmp_degree~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node22" class="node">
 <title>proc~cmp_degree~3</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node22"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="1063.5,-286.51 909.5,-286.51 909.5,-262.51 1063.5,-262.51 1063.5,-286.51"/>
-<text text-anchor="middle" x="986.5" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node22"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="1068,-943.51 905,-943.51 905,-919.51 1068,-919.51 1068,-943.51"/>
+<text text-anchor="middle" x="986.5" y="-929.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge30" class="edge">
 <title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#00ffff" d="M1063.65,-274.51C1074.89,-274.51 1086.58,-274.51 1098.13,-274.51"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="1098.23,-278.01 1108.23,-274.51 1098.23,-271.01 1098.23,-278.01"/>
+<path fill="none" stroke="#00ffff" d="M1050.53,-943.53C1072.1,-947.64 1096.42,-952.28 1118.74,-956.54"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="1118.35,-960.02 1128.83,-958.46 1119.66,-953.15 1118.35,-960.02"/>
 </g>
 <!-- proc~cmp_elem -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node23" class="node">
 <title>proc~cmp_elem</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node23"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_volume%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="713,-1794.51 560,-1794.51 560,-1770.51 713,-1770.51 713,-1794.51"/>
-<text text-anchor="middle" x="636.5" y="-1780.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node23"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_curve%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="708,-38.51 565,-38.51 565,-14.51 708,-14.51 708,-38.51"/>
+<text text-anchor="middle" x="636.5" y="-24.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem&#45;&gt;proc~get_multiplicity -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge27" class="edge">
 <title>proc~cmp_elem&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#00ff55" d="M666.53,-1770.47C759.34,-1731.97 1048.88,-1611.87 1153.66,-1568.41"/>
-<polygon fill="#00ff55" stroke="#00ff55" points="1155.03,-1571.63 1162.92,-1564.57 1152.34,-1565.17 1155.03,-1571.63"/>
+<path fill="none" stroke="#00ff55" d="M664.62,-38.64C755.92,-79.47 1052.17,-211.97 1155.8,-258.32"/>
+<polygon fill="#00ff55" stroke="#00ff55" points="1154.37,-261.51 1164.93,-262.4 1157.23,-255.12 1154.37,-261.51"/>
 </g>
 <!-- proc~cmp_elem~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node24" class="node">
 <title>proc~cmp_elem~2</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node24"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_surface%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="713,-974.51 560,-974.51 560,-950.51 713,-950.51 713,-974.51"/>
-<text text-anchor="middle" x="636.5" y="-960.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node24"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_volume%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="713,-1794.51 560,-1794.51 560,-1770.51 713,-1770.51 713,-1794.51"/>
+<text text-anchor="middle" x="636.5" y="-1780.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge29" class="edge">
 <title>proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2</title>
-<path fill="none" stroke="#00ffa9" d="M713.15,-962.37C811.77,-962.19 984.47,-961.88 1093.3,-961.69"/>
-<polygon fill="#00ffa9" stroke="#00ffa9" points="1093.63,-965.18 1103.62,-961.67 1093.62,-958.18 1093.63,-965.18"/>
+<path fill="none" stroke="#00ffa9" d="M662.04,-1770.47C750.87,-1726.89 1055.78,-1577.33 1158.17,-1527.1"/>
+<polygon fill="#00ffa9" stroke="#00ffa9" points="1159.99,-1530.11 1167.43,-1522.56 1156.91,-1523.82 1159.99,-1530.11"/>
 </g>
 <!-- proc~cmp_elem~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node25" class="node">
 <title>proc~cmp_elem~3</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node25"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_curve%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="708,-38.51 565,-38.51 565,-14.51 708,-14.51 708,-38.51"/>
-<text text-anchor="middle" x="636.5" y="-24.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node25"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_surface%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="713,-983.51 560,-983.51 560,-959.51 713,-959.51 713,-983.51"/>
+<text text-anchor="middle" x="636.5" y="-969.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge31" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#00ffff" d="M664.62,-38.64C755.92,-79.47 1052.17,-211.97 1155.8,-258.32"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="1154.37,-261.51 1164.93,-262.4 1157.23,-255.12 1154.37,-261.51"/>
+<path fill="none" stroke="#00ffff" d="M713.15,-971.37C811.77,-971.19 984.47,-970.88 1093.3,-970.69"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="1093.63,-974.18 1103.62,-970.67 1093.62,-967.18 1093.63,-974.18"/>
 </g>
 <!-- proc~elevate_degree -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node26" class="node">
 <title>proc~elevate_degree</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node26"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-1194.51 343.5,-1194.51 343.5,-1170.51 523.5,-1170.51 523.5,-1194.51"/>
-<text text-anchor="middle" x="433.5" y="-1180.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node26"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="518.5,-534.51 348.5,-534.51 348.5,-510.51 518.5,-510.51 518.5,-534.51"/>
+<text text-anchor="middle" x="433.5" y="-520.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree&#45;&gt;proc~elevate_degree_a_5_9 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge23" class="edge">
 <title>proc~elevate_degree&#45;&gt;proc~elevate_degree_a_5_9</title>
-<path fill="none" stroke="#ffff00" d="M504.5,-1170.44C511.31,-1167.99 517.94,-1165.05 524,-1161.51 567.44,-1136.15 603.88,-1088.42 622.39,-1061.1"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="625.36,-1062.95 627.96,-1052.68 619.53,-1059.09 625.36,-1062.95"/>
+<path fill="none" stroke="#ffff00" d="M514.09,-534.75C517.74,-537.22 521.09,-540.12 524,-543.51 589.26,-619.41 507.94,-907.01 560,-992.51 567.9,-1005.47 580.86,-1015.41 593.84,-1022.73"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="592.28,-1025.87 602.76,-1027.39 595.52,-1019.66 592.28,-1025.87"/>
 </g>
 <!-- proc~elevate_degree&#45;&gt;none~set -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge60" class="edge">
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge100" class="edge">
 <title>proc~elevate_degree&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.81,-1194.52C508.54,-1198.05 516.91,-1202.61 524,-1208.51 588.93,-1262.54 619.77,-1363.83 630.68,-1408.45"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="627.29,-1409.33 632.98,-1418.27 634.11,-1407.74 627.29,-1409.33"/>
+<path fill="none" stroke="#ff0000" d="M509.67,-510.36C514.78,-507.91 519.63,-504.99 524,-501.51 591.6,-447.7 621.15,-342.49 631.21,-296.69"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="634.69,-297.14 633.31,-286.64 627.84,-295.71 634.69,-297.14"/>
 </g>
 <!-- proc~elevate_degree~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node27" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node27"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-1068.51 343.5,-1068.51 343.5,-1044.51 523.5,-1044.51 523.5,-1068.51"/>
-<text text-anchor="middle" x="433.5" y="-1054.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node27"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-1194.51 343.5,-1194.51 343.5,-1170.51 523.5,-1170.51 523.5,-1194.51"/>
+<text text-anchor="middle" x="433.5" y="-1180.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;proc~elevate_degree_a_5_9 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge24" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;proc~elevate_degree_a_5_9</title>
-<path fill="none" stroke="#ffff00" d="M523.54,-1049.42C535.72,-1048.45 548.13,-1047.46 560.04,-1046.51"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="560.67,-1049.98 570.36,-1045.69 560.11,-1043 560.67,-1049.98"/>
+<path fill="none" stroke="#ffff00" d="M504.51,-1170.46C511.32,-1168.01 517.94,-1165.06 524,-1161.51 567.59,-1135.95 603.97,-1087.82 622.43,-1060.27"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="625.44,-1062.07 627.99,-1051.78 619.59,-1058.23 625.44,-1062.07"/>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;none~set~2 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge75" class="edge">
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge60" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M455.55,-1044.29C474.72,-1032.54 503.13,-1013.51 524,-992.51 543.56,-972.83 542.63,-963.14 560,-941.51 578.13,-918.92 600.66,-894.58 616.37,-878.13"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="619.08,-880.37 623.49,-870.74 614.03,-875.52 619.08,-880.37"/>
+<path fill="none" stroke="#ff0000" d="M499.81,-1194.52C508.54,-1198.05 516.91,-1202.61 524,-1208.51 588.93,-1262.54 619.77,-1363.83 630.68,-1408.45"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="627.29,-1409.33 632.98,-1418.27 634.11,-1407.74 627.29,-1409.33"/>
 </g>
 <!-- proc~elevate_degree~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node28" class="node">
 <title>proc~elevate_degree~3</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node28"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="518.5,-534.51 348.5,-534.51 348.5,-510.51 518.5,-510.51 518.5,-534.51"/>
-<text text-anchor="middle" x="433.5" y="-520.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node28"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-1068.51 343.5,-1068.51 343.5,-1044.51 523.5,-1044.51 523.5,-1068.51"/>
+<text text-anchor="middle" x="433.5" y="-1054.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;proc~elevate_degree_a_5_9 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge25" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;proc~elevate_degree_a_5_9</title>
-<path fill="none" stroke="#ffff00" d="M514.08,-534.75C517.73,-537.22 521.08,-540.12 524,-543.51 588.02,-617.84 512.72,-897.55 560,-983.51 569.26,-1000.35 585.84,-1013.7 601.1,-1023.24"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="599.48,-1026.35 609.87,-1028.41 603.03,-1020.32 599.48,-1026.35"/>
+<path fill="none" stroke="#ffff00" d="M523.54,-1048.98C535.72,-1047.95 548.13,-1046.9 560.04,-1045.89"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="560.69,-1049.35 570.36,-1045.02 560.1,-1042.37 560.69,-1049.35"/>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;none~set~3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge100" class="edge">
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge75" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M509.67,-510.36C514.78,-507.91 519.63,-504.99 524,-501.51 591.6,-447.7 621.15,-342.49 631.21,-296.69"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="634.69,-297.14 633.31,-286.64 627.84,-295.71 634.69,-297.14"/>
+<path fill="none" stroke="#ff7500" d="M454.45,-1044.36C473.35,-1032.37 502.03,-1012.92 524,-992.51 529.31,-987.57 589.15,-914.94 618.91,-878.72"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="621.8,-880.72 625.44,-870.77 616.39,-876.28 621.8,-880.72"/>
 </g>
-<!-- proc~set1 -->
+<!-- proc~set1~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node29" class="node">
-<title>proc~set1</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node29"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
+<title>proc~set1~2</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node29"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="869,-1400.51 749,-1400.51 749,-1376.51 869,-1376.51 869,-1400.51"/>
 <text text-anchor="middle" x="809" y="-1386.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge19" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#ff0000" d="M860.29,-1376.47C880.58,-1371.62 904.15,-1365.98 925.34,-1360.9"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="926.29,-1364.28 935.2,-1358.54 924.66,-1357.47 926.29,-1364.28"/>
+<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<path fill="none" stroke="#ff5400" d="M860.29,-1376.47C880.58,-1371.62 904.15,-1365.98 925.34,-1360.9"/>
+<polygon fill="#ff5400" stroke="#ff5400" points="926.29,-1364.28 935.2,-1358.54 924.66,-1357.47 926.29,-1364.28"/>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_degree -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge38" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#ff0000" d="M860.29,-1400.54C880.58,-1405.4 904.15,-1411.04 925.34,-1416.11"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="924.66,-1419.55 935.2,-1418.47 926.29,-1412.74 924.66,-1419.55"/>
+<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge41" class="edge">
+<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<path fill="none" stroke="#ff5f00" d="M860.29,-1400.54C880.58,-1405.4 904.15,-1411.04 925.34,-1416.11"/>
+<polygon fill="#ff5f00" stroke="#ff5f00" points="924.66,-1419.55 935.2,-1418.47 926.29,-1412.74 924.66,-1419.55"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node30" class="node">
-<title>proc~set1~2</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node30"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="869,-892.51 749,-892.51 749,-868.51 869,-868.51 869,-892.51"/>
-<text text-anchor="middle" x="809" y="-878.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
+<title>proc~set1~3</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node30"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="869,-901.51 749,-901.51 749,-877.51 869,-877.51 869,-901.51"/>
+<text text-anchor="middle" x="809" y="-887.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge21" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
-<path fill="none" stroke="#ff5400" d="M869.42,-880.51C881.3,-880.51 893.97,-880.51 906.4,-880.51"/>
-<polygon fill="#ff5400" stroke="#ff5400" points="906.76,-884.01 916.76,-880.51 906.76,-877.01 906.76,-884.01"/>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#ffaa00" d="M869.42,-889.51C881.3,-889.51 893.97,-889.51 906.4,-889.51"/>
+<polygon fill="#ffaa00" stroke="#ffaa00" points="906.76,-893.01 916.76,-889.51 906.76,-886.01 906.76,-893.01"/>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge40" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#ff5f00" d="M860.29,-892.54C880.58,-897.4 904.15,-903.04 925.34,-908.11"/>
-<polygon fill="#ff5f00" stroke="#ff5f00" points="924.66,-911.55 935.2,-910.47 926.29,-904.74 924.66,-911.55"/>
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge43" class="edge">
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
+<path fill="none" stroke="#ffbf00" d="M860.29,-901.54C880.58,-906.4 904.15,-912.04 925.34,-917.11"/>
+<polygon fill="#ffbf00" stroke="#ffbf00" points="924.66,-920.55 935.2,-919.47 926.29,-913.74 924.66,-920.55"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set2~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node31" class="node">
-<title>proc~set2</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node31"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
+<title>proc~set2~2</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node31"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="869,-1358.51 749,-1358.51 749,-1334.51 869,-1334.51 869,-1358.51"/>
 <text text-anchor="middle" x="809" y="-1344.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge20" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#ff0000" d="M869.42,-1346.51C881.3,-1346.51 893.97,-1346.51 906.4,-1346.51"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="906.76,-1350.01 916.76,-1346.51 906.76,-1343.01 906.76,-1350.01"/>
+<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<path fill="none" stroke="#ff5400" d="M869.42,-1346.51C881.3,-1346.51 893.97,-1346.51 906.4,-1346.51"/>
+<polygon fill="#ff5400" stroke="#ff5400" points="906.76,-1350.01 916.76,-1346.51 906.76,-1343.01 906.76,-1350.01"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node32" class="node">
-<title>proc~set2~2</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node32"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="869,-850.51 749,-850.51 749,-826.51 869,-826.51 869,-850.51"/>
-<text text-anchor="middle" x="809" y="-836.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
+<title>proc~set2~3</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node32"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="869,-859.51 749,-859.51 749,-835.51 869,-835.51 869,-859.51"/>
+<text text-anchor="middle" x="809" y="-845.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge22" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
-<path fill="none" stroke="#ff5400" d="M860.29,-850.54C880.58,-855.4 904.15,-861.04 925.34,-866.11"/>
-<polygon fill="#ff5400" stroke="#ff5400" points="924.66,-869.55 935.2,-868.47 926.29,-862.74 924.66,-869.55"/>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#ffaa00" d="M860.29,-859.54C880.58,-864.4 904.15,-870.04 925.34,-875.11"/>
+<polygon fill="#ffaa00" stroke="#ffaa00" points="924.66,-878.55 935.2,-877.47 926.29,-871.74 924.66,-878.55"/>
 </g>
 <!-- program~example1_curve -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node33" class="node">
@@ -874,27 +874,27 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge34" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
-<path fill="none" stroke="#aa00ff" d="M274.17,-454.53C296.08,-452.31 322.53,-449.64 347.48,-447.11"/>
-<polygon fill="#aa00ff" stroke="#aa00ff" points="348.1,-450.57 357.7,-446.08 347.4,-443.6 348.1,-450.57"/>
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge32" class="edge">
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
+<path fill="none" stroke="#0000ff" d="M274.17,-464.48C296.08,-466.7 322.53,-469.38 347.48,-471.9"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="347.4,-475.41 357.7,-472.94 348.1,-468.45 347.4,-475.41"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge37" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
-<path fill="none" stroke="#ff0055" d="M274.17,-464.48C294.62,-466.55 319.03,-469.02 342.48,-471.4"/>
-<polygon fill="#ff0055" stroke="#ff0055" points="342.15,-474.88 352.45,-472.41 342.86,-467.92 342.15,-474.88"/>
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge35" class="edge">
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
+<path fill="none" stroke="#ff00ff" d="M274.17,-454.53C294.62,-452.46 319.03,-449.99 342.48,-447.62"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="342.86,-451.1 352.45,-446.61 342.15,-444.13 342.86,-451.1"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge54" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
-<path fill="none" stroke="#00ffff" d="M255.75,-471.51C279.38,-480.48 312.96,-492.67 343,-501.51 350.73,-503.78 358.89,-505.98 367.01,-508.03"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="366.32,-511.47 376.87,-510.47 368,-504.67 366.32,-511.47"/>
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge52" class="edge">
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
+<path fill="none" stroke="#00ff3f" d="M255.75,-471.51C279.38,-480.48 312.96,-492.67 343,-501.51 350.73,-503.78 358.89,-505.98 367.01,-508.03"/>
+<polygon fill="#00ff3f" stroke="#00ff3f" points="366.32,-511.47 376.87,-510.47 368,-504.67 366.32,-511.47"/>
 </g>
-<!-- program~example1_curve&#45;&gt;none~set~3 -->
+<!-- program~example1_curve&#45;&gt;none~set -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge109" class="edge">
-<title>program~example1_curve&#45;&gt;none~set~3</title>
+<title>program~example1_curve&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M255.2,-447.49C278.82,-438.39 312.65,-426.05 343,-417.51 422.12,-395.23 451.13,-417.55 524,-379.51 564.1,-358.57 600.14,-319.1 619.81,-294.97"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="622.8,-296.83 626.29,-286.83 617.32,-292.47 622.8,-296.83"/>
 </g>
@@ -907,27 +907,27 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge33" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
-<path fill="none" stroke="#5400ff" d="M255.75,-1089.51C279.38,-1098.48 312.96,-1110.67 343,-1119.51 350.73,-1121.78 358.89,-1123.98 367.01,-1126.03"/>
-<polygon fill="#5400ff" stroke="#5400ff" points="366.32,-1129.47 376.87,-1128.47 368,-1122.67 366.32,-1129.47"/>
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge34" class="edge">
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#aa00ff" d="M255.75,-1089.51C279.38,-1098.48 312.96,-1110.67 343,-1119.51 350.73,-1121.78 358.89,-1123.98 367.01,-1126.03"/>
+<polygon fill="#aa00ff" stroke="#aa00ff" points="366.32,-1129.47 376.87,-1128.47 368,-1122.67 366.32,-1129.47"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge36" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
-<path fill="none" stroke="#ff00aa" d="M279.25,-1083C297.02,-1084.8 317.32,-1086.85 337.21,-1088.86"/>
-<polygon fill="#ff00aa" stroke="#ff00aa" points="336.93,-1092.35 347.23,-1089.88 337.64,-1085.39 336.93,-1092.35"/>
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge37" class="edge">
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#ff0055" d="M279.25,-1083C297.02,-1084.8 317.32,-1086.85 337.21,-1088.86"/>
+<polygon fill="#ff0055" stroke="#ff0055" points="336.93,-1092.35 347.23,-1089.88 337.64,-1085.39 336.93,-1092.35"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge53" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
-<path fill="none" stroke="#00ff9f" d="M279.25,-1072.02C295.84,-1070.34 314.64,-1068.44 333.24,-1066.55"/>
-<polygon fill="#00ff9f" stroke="#00ff9f" points="333.64,-1070.03 343.24,-1065.54 332.94,-1063.07 333.64,-1070.03"/>
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge54" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#00ffff" d="M279.25,-1072.02C295.84,-1070.34 314.64,-1068.44 333.24,-1066.55"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="333.64,-1070.03 343.24,-1065.54 332.94,-1063.07 333.64,-1070.03"/>
 </g>
-<!-- program~example3_surface&#45;&gt;none~set~2 -->
+<!-- program~example3_surface&#45;&gt;none~set~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge85" class="edge">
-<title>program~example3_surface&#45;&gt;none~set~2</title>
+<title>program~example3_surface&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff7500" d="M257.45,-1065.46C329.87,-1038.45 500.21,-974.29 524,-959.51 561.15,-936.43 597.4,-900.33 618.04,-878.12"/>
 <polygon fill="#ff7500" stroke="#ff7500" points="620.74,-880.35 624.91,-870.61 615.57,-875.63 620.74,-880.35"/>
 </g>
@@ -940,152 +940,152 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge32" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#0000ff" d="M279.25,-1689.49C304.91,-1694.68 335.86,-1700.95 363.2,-1706.48"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="362.6,-1709.93 373.1,-1708.48 363.99,-1703.07 362.6,-1709.93"/>
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge33" class="edge">
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
+<path fill="none" stroke="#5400ff" d="M279.25,-1689.49C304.91,-1694.68 335.86,-1700.95 363.2,-1706.48"/>
+<polygon fill="#5400ff" stroke="#5400ff" points="362.6,-1709.93 373.1,-1708.48 363.99,-1703.07 362.6,-1709.93"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge35" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#ff00ff" d="M279.25,-1678.51C297.02,-1678.51 317.32,-1678.51 337.21,-1678.51"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="337.23,-1682.01 347.23,-1678.51 337.23,-1675.01 337.23,-1682.01"/>
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge36" class="edge">
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
+<path fill="none" stroke="#ff00aa" d="M279.25,-1678.51C297.02,-1678.51 317.32,-1678.51 337.21,-1678.51"/>
+<polygon fill="#ff00aa" stroke="#ff00aa" points="337.23,-1682.01 347.23,-1678.51 337.23,-1675.01 337.23,-1682.01"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~cmp_elem -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge47" class="edge">
-<title>program~example3_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#dfff00" d="M242.8,-1690.56C260,-1702.57 286.41,-1721.99 307,-1741.51 324.84,-1758.42 320.66,-1773.23 343,-1783.51 418.17,-1818.08 516.14,-1808.24 577.43,-1796.52"/>
-<polygon fill="#dfff00" stroke="#dfff00" points="578.2,-1799.93 587.32,-1794.55 576.83,-1793.07 578.2,-1799.93"/>
+<!-- program~example3_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge49" class="edge">
+<title>program~example3_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#7fff00" d="M242.8,-1690.56C260,-1702.57 286.41,-1721.99 307,-1741.51 324.84,-1758.42 320.66,-1773.23 343,-1783.51 418.17,-1818.08 516.14,-1808.24 577.43,-1796.52"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="578.2,-1799.93 587.32,-1794.55 576.83,-1793.07 578.2,-1799.93"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge52" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#00ff3f" d="M252.32,-1666.47C271.07,-1656.67 294.69,-1640.95 307,-1619.51 391,-1473.14 256.02,-1386.13 343,-1241.51 354.27,-1222.77 374.05,-1208.8 392.16,-1199.17"/>
-<polygon fill="#00ff3f" stroke="#00ff3f" points="394.05,-1202.14 401.42,-1194.53 390.91,-1195.88 394.05,-1202.14"/>
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge53" class="edge">
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
+<path fill="none" stroke="#00ff9f" d="M252.32,-1666.47C271.07,-1656.67 294.69,-1640.95 307,-1619.51 391,-1473.14 256.02,-1386.13 343,-1241.51 354.27,-1222.77 374.05,-1208.8 392.16,-1199.17"/>
+<polygon fill="#00ff9f" stroke="#00ff9f" points="394.05,-1202.14 401.42,-1194.53 390.91,-1195.88 394.05,-1202.14"/>
 </g>
-<!-- program~example3_volume&#45;&gt;none~set -->
+<!-- program~example3_volume&#45;&gt;none~set~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge70" class="edge">
-<title>program~example3_volume&#45;&gt;none~set</title>
+<title>program~example3_volume&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M279.2,-1668.59C364.17,-1652.93 519.61,-1623.8 524,-1619.51 577.05,-1567.64 510.62,-1511.88 560,-1456.51 563.23,-1452.88 566.99,-1449.76 571.08,-1447.08"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="572.84,-1450.1 579.85,-1442.16 569.42,-1444 572.84,-1450.1"/>
 </g>
-<!-- none~set&#45;&gt;proc~set1 -->
+<!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge55" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
+<title>none~set~2&#45;&gt;proc~set1~2</title>
 <path fill="none" stroke="#009fff" d="M686.36,-1418.47C705.98,-1413.64 728.76,-1408.03 749.27,-1402.97"/>
 <polygon fill="#009fff" stroke="#009fff" points="750.26,-1406.33 759.13,-1400.54 748.59,-1399.54 750.26,-1406.33"/>
 </g>
-<!-- none~set&#45;&gt;proc~set2 -->
+<!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge57" class="edge">
-<title>none~set&#45;&gt;proc~set2</title>
+<title>none~set~2&#45;&gt;proc~set2~2</title>
 <path fill="none" stroke="#1f00ff" d="M656.7,-1418.3C678.51,-1404.77 715.42,-1382.83 749,-1367.51 753.06,-1365.65 757.33,-1363.86 761.65,-1362.14"/>
 <polygon fill="#1f00ff" stroke="#1f00ff" points="763.01,-1365.37 771.1,-1358.54 760.51,-1358.83 763.01,-1365.37"/>
 </g>
-<!-- proc~set3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_node46" class="node">
-<title>proc~set3</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node46"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
+<!-- proc~set3~2 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_node47" class="node">
+<title>proc~set3~2</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node47"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="869,-1442.51 749,-1442.51 749,-1418.51 869,-1418.51 869,-1442.51"/>
 <text text-anchor="middle" x="809" y="-1428.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge96" class="edge">
-<title>none~set&#45;&gt;proc~set3</title>
-<path fill="none" stroke="#9c00ff" d="M693.33,-1430.51C707.77,-1430.51 723.49,-1430.51 738.54,-1430.51"/>
-<polygon fill="#9c00ff" stroke="#9c00ff" points="738.82,-1434.01 748.82,-1430.51 738.82,-1427.01 738.82,-1434.01"/>
+<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge97" class="edge">
+<title>none~set~2&#45;&gt;proc~set3~2</title>
+<path fill="none" stroke="#ff00eb" d="M693.33,-1430.51C707.77,-1430.51 723.49,-1430.51 738.54,-1430.51"/>
+<polygon fill="#ff00eb" stroke="#ff00eb" points="738.82,-1434.01 748.82,-1430.51 738.82,-1427.01 738.82,-1434.01"/>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge56" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
-<path fill="none" stroke="#003fff" d="M693.33,-865.71C707.77,-867.57 723.49,-869.6 738.54,-871.54"/>
-<polygon fill="#003fff" stroke="#003fff" points="738.45,-875.06 748.82,-872.87 739.35,-868.12 738.45,-875.06"/>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
+<path fill="none" stroke="#003fff" d="M693.33,-868.66C707.91,-871.31 723.8,-874.2 738.97,-876.96"/>
+<polygon fill="#003fff" stroke="#003fff" points="738.35,-880.4 748.82,-878.75 739.61,-873.51 738.35,-880.4"/>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge58" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
-<path fill="none" stroke="#7f00ff" d="M693.33,-851.96C707.77,-850.26 723.49,-848.42 738.54,-846.66"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="739.3,-850.09 748.82,-845.45 738.48,-843.14 739.3,-850.09"/>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
+<path fill="none" stroke="#7f00ff" d="M693.33,-854.91C707.77,-853.97 723.49,-852.96 738.54,-851.99"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="739.07,-855.46 748.82,-851.33 738.62,-848.48 739.07,-855.46"/>
 </g>
-<!-- proc~set3~2 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_node47" class="node">
-<title>proc~set3~2</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node47"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="869,-934.51 749,-934.51 749,-910.51 869,-910.51 869,-934.51"/>
-<text text-anchor="middle" x="809" y="-920.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
+<!-- proc~set3~3 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_node48" class="node">
+<title>proc~set3~3</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node48"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="869,-943.51 749,-943.51 749,-919.51 869,-919.51 869,-943.51"/>
+<text text-anchor="middle" x="809" y="-929.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge97" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
-<path fill="none" stroke="#ff00eb" d="M668.18,-870.59C690.53,-879.33 721.57,-891.34 749,-901.51 753.85,-903.3 758.93,-905.16 763.99,-906.98"/>
-<polygon fill="#ff00eb" stroke="#ff00eb" points="763.03,-910.36 773.63,-910.44 765.4,-903.77 763.03,-910.36"/>
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge98" class="edge">
+<title>none~set~3&#45;&gt;proc~set3~3</title>
+<path fill="none" stroke="#ff0075" d="M661.57,-870.54C683.95,-881.53 718.37,-897.95 749,-910.51 753.48,-912.34 758.19,-914.18 762.9,-915.95"/>
+<polygon fill="#ff0075" stroke="#ff0075" points="761.95,-919.33 772.54,-919.5 764.36,-912.76 761.95,-919.33"/>
 </g>
 <!-- proc~ansatz -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node38" class="node">
 <title>proc~ansatz</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node38"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-1774.51 367.5,-1774.51 367.5,-1750.51 499.5,-1750.51 499.5,-1774.51"/>
-<text text-anchor="middle" x="433.5" y="-1760.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node38"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="494.5,-38.51 372.5,-38.51 372.5,-14.51 494.5,-14.51 494.5,-38.51"/>
+<text text-anchor="middle" x="433.5" y="-24.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge45" class="edge">
 <title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#dfff00" d="M499.76,-1769C515.61,-1770.58 532.8,-1772.29 549.46,-1773.95"/>
-<polygon fill="#dfff00" stroke="#dfff00" points="549.44,-1777.46 559.74,-1774.97 550.13,-1770.5 549.44,-1777.46"/>
+<path fill="none" stroke="#dfff00" d="M494.53,-26.51C513.44,-26.51 534.63,-26.51 554.73,-26.51"/>
+<polygon fill="#dfff00" stroke="#dfff00" points="554.8,-30.01 564.8,-26.51 554.8,-23.01 554.8,-30.01"/>
 </g>
 <!-- proc~ansatz&#45;&gt;none~set -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge59" class="edge">
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge99" class="edge">
 <title>proc~ansatz&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.9,-1755.31C508.72,-1752.12 517.09,-1747.67 524,-1741.51 612.07,-1662.93 630.6,-1509.73 634.48,-1452.64"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="637.98,-1452.75 635.08,-1442.56 630.99,-1452.33 637.98,-1452.75"/>
+<path fill="none" stroke="#ff0000" d="M494.67,-32.91C505.21,-36.1 515.51,-40.75 524,-47.51 591.6,-101.32 621.15,-206.52 631.21,-252.32"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="627.84,-253.3 633.31,-262.38 634.69,-251.87 627.84,-253.3"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node39" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node39"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-950.51 367.5,-950.51 367.5,-926.51 499.5,-926.51 499.5,-950.51"/>
-<text text-anchor="middle" x="433.5" y="-936.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node39"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-1774.51 367.5,-1774.51 367.5,-1750.51 499.5,-1750.51 499.5,-1774.51"/>
+<text text-anchor="middle" x="433.5" y="-1760.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;proc~cmp_elem~2 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge48" class="edge">
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge47" class="edge">
 <title>proc~ansatz~2&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#7fff00" d="M499.76,-946.3C515.61,-948.19 532.8,-950.25 549.46,-952.23"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="549.39,-955.75 559.74,-953.46 550.22,-948.8 549.39,-955.75"/>
+<path fill="none" stroke="#7fff00" d="M499.76,-1769C515.61,-1770.58 532.8,-1772.29 549.46,-1773.95"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="549.44,-1777.46 559.74,-1774.97 550.13,-1770.5 549.44,-1777.46"/>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~set~2 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge74" class="edge">
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge59" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M481.45,-926.48C495.31,-922.49 510.41,-917.73 524,-912.51 551.93,-901.77 582.44,-886.76 604.47,-875.28"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="606.14,-878.36 613.36,-870.61 602.88,-872.17 606.14,-878.36"/>
+<path fill="none" stroke="#ff0000" d="M499.9,-1755.31C508.72,-1752.12 517.09,-1747.67 524,-1741.51 612.07,-1662.93 630.6,-1509.73 634.48,-1452.64"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="637.98,-1452.75 635.08,-1442.56 630.99,-1452.33 637.98,-1452.75"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node40" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node40"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="494.5,-38.51 372.5,-38.51 372.5,-14.51 494.5,-14.51 494.5,-38.51"/>
-<text text-anchor="middle" x="433.5" y="-24.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node40"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-950.51 367.5,-950.51 367.5,-926.51 499.5,-926.51 499.5,-950.51"/>
+<text text-anchor="middle" x="433.5" y="-936.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;proc~cmp_elem~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge50" class="edge">
 <title>proc~ansatz~3&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#1fff00" d="M494.53,-26.51C513.44,-26.51 534.63,-26.51 554.73,-26.51"/>
-<polygon fill="#1fff00" stroke="#1fff00" points="554.8,-30.01 564.8,-26.51 554.8,-23.01 554.8,-30.01"/>
+<path fill="none" stroke="#1fff00" d="M499.76,-949.22C516.43,-951.96 534.59,-954.94 552.04,-957.8"/>
+<polygon fill="#1fff00" stroke="#1fff00" points="551.78,-961.31 562.21,-959.47 552.91,-954.4 551.78,-961.31"/>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~set~3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge99" class="edge">
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge74" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M494.67,-32.91C505.21,-36.1 515.51,-40.75 524,-47.51 591.6,-101.32 621.15,-206.52 631.21,-252.32"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="627.84,-253.3 633.31,-262.38 634.69,-251.87 627.84,-253.3"/>
+<path fill="none" stroke="#ff7500" d="M481.45,-926.48C495.31,-922.49 510.41,-917.73 524,-912.51 551.93,-901.77 582.44,-886.76 604.47,-875.28"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="606.14,-878.36 613.36,-870.61 602.88,-872.17 606.14,-878.36"/>
 </g>
 <!-- proc~cmp_area -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node41" class="node">
@@ -1096,17 +1096,17 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~2 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge49" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#7fff00" d="M281.46,-950.52C300.87,-954.12 322.8,-957.62 343,-959.51 412.28,-965.98 491.2,-966.39 549.58,-965.36"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="549.94,-968.86 559.87,-965.16 549.81,-961.86 549.94,-968.86"/>
+<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~3 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge51" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~cmp_elem~3</title>
+<path fill="none" stroke="#1fff00" d="M283.6,-950.55C302.48,-953.99 323.56,-957.39 343,-959.51 412.23,-967.05 491.15,-969.96 549.55,-971.03"/>
+<polygon fill="#1fff00" stroke="#1fff00" points="549.78,-974.53 559.84,-971.2 549.9,-967.54 549.78,-974.53"/>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge89" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#9cff00" d="M299.03,-938.51C317.98,-938.51 338.36,-938.51 357.36,-938.51"/>
-<polygon fill="#9cff00" stroke="#9cff00" points="357.45,-942.01 367.45,-938.51 357.45,-935.01 357.45,-942.01"/>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge90" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#27ff00" d="M299.03,-938.51C317.98,-938.51 338.36,-938.51 357.36,-938.51"/>
+<polygon fill="#27ff00" stroke="#27ff00" points="357.45,-942.01 367.45,-938.51 357.45,-935.01 357.45,-942.01"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node42" class="node">
@@ -1117,17 +1117,17 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~cmp_elem~3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge51" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#1fff00" d="M280.85,-14.49C300.41,-10.83 322.58,-7.31 343,-5.51 423.13,1.57 443.9,1.97 524,-5.51 539.85,-6.99 556.8,-9.62 572.58,-12.54"/>
-<polygon fill="#1fff00" stroke="#1fff00" points="572.28,-16.05 582.76,-14.49 573.59,-9.17 572.28,-16.05"/>
+<!-- proc~cmp_length&#45;&gt;proc~cmp_elem -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge46" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~cmp_elem</title>
+<path fill="none" stroke="#dfff00" d="M280.85,-14.49C300.41,-10.83 322.58,-7.31 343,-5.51 423.13,1.57 443.9,1.97 524,-5.51 539.85,-6.99 556.8,-9.62 572.58,-12.54"/>
+<polygon fill="#dfff00" stroke="#dfff00" points="572.28,-16.05 582.76,-14.49 573.59,-9.17 572.28,-16.05"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge90" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#27ff00" d="M299.03,-26.51C319.64,-26.51 341.96,-26.51 362.34,-26.51"/>
-<polygon fill="#27ff00" stroke="#27ff00" points="362.49,-30.01 372.49,-26.51 362.49,-23.01 362.49,-30.01"/>
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge88" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ffeb00" d="M299.03,-26.51C319.64,-26.51 341.96,-26.51 362.34,-26.51"/>
+<polygon fill="#ffeb00" stroke="#ffeb00" points="362.49,-30.01 372.49,-26.51 362.49,-23.01 362.49,-30.01"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node43" class="node">
@@ -1138,180 +1138,180 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge46" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#dfff00" d="M244.54,-1774.64C267.22,-1787.96 306.24,-1808.5 343,-1816.51 421.6,-1833.64 444.43,-1828.37 524,-1816.51 548.19,-1812.9 574.39,-1805.12 595.31,-1797.91"/>
-<polygon fill="#dfff00" stroke="#dfff00" points="596.57,-1801.18 604.83,-1794.55 594.23,-1794.58 596.57,-1801.18"/>
+<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge48" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#7fff00" d="M244.54,-1774.64C267.22,-1787.96 306.24,-1808.5 343,-1816.51 421.6,-1833.64 444.43,-1828.37 524,-1816.51 548.19,-1812.9 574.39,-1805.12 595.31,-1797.91"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="596.57,-1801.18 604.83,-1794.55 594.23,-1794.58 596.57,-1801.18"/>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge88" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ffeb00" d="M307.01,-1762.51C323.61,-1762.51 341,-1762.51 357.35,-1762.51"/>
-<polygon fill="#ffeb00" stroke="#ffeb00" points="357.38,-1766.01 367.38,-1762.51 357.38,-1759.01 357.38,-1766.01"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge89" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#9cff00" d="M307.01,-1762.51C323.61,-1762.51 341,-1762.51 357.35,-1762.51"/>
+<polygon fill="#9cff00" stroke="#9cff00" points="357.38,-1766.01 367.38,-1762.51 357.38,-1759.01 357.38,-1766.01"/>
 </g>
-<!-- proc~set1a -->
+<!-- proc~set1 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node44" class="node">
+<title>proc~set1</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node44"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="864,-328.51 754,-328.51 754,-304.51 864,-304.51 864,-328.51"/>
+<text text-anchor="middle" x="809" y="-314.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+</a>
+</g>
+</g>
+<!-- proc~set1&#45;&gt;proc~cmp_degree -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge38" class="edge">
+<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#ff0000" d="M860.29,-304.47C880.58,-299.62 904.15,-293.98 925.34,-288.9"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="926.29,-292.28 935.2,-286.54 924.66,-285.47 926.29,-292.28"/>
+</g>
+<!-- proc~set1a -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_node45" class="node">
 <title>proc~set1a</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node44"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node45"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
 <polygon fill="#d9534f" stroke="#d9534f" points="867.5,-286.51 750.5,-286.51 750.5,-262.51 867.5,-262.51 867.5,-286.51"/>
 <text text-anchor="middle" x="809" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge42" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ffbf00" d="M867.95,-274.51C878.01,-274.51 888.67,-274.51 899.3,-274.51"/>
-<polygon fill="#ffbf00" stroke="#ffbf00" points="899.46,-278.01 909.46,-274.51 899.46,-271.01 899.46,-278.01"/>
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge39" class="edge">
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#ff0000" d="M867.95,-274.51C878.01,-274.51 888.67,-274.51 899.3,-274.51"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="899.46,-278.01 909.46,-274.51 899.46,-271.01 899.46,-278.01"/>
 </g>
-<!-- proc~set1~3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_node45" class="node">
-<title>proc~set1~3</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node45"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
+<!-- proc~set3 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_node46" class="node">
+<title>proc~set3</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node46"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="864,-244.51 754,-244.51 754,-220.51 864,-220.51 864,-244.51"/>
-<text text-anchor="middle" x="809" y="-230.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<text text-anchor="middle" x="809" y="-230.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge43" class="edge">
-<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ffbf00" d="M860.29,-244.54C880.58,-249.4 904.15,-255.04 925.34,-260.11"/>
-<polygon fill="#ffbf00" stroke="#ffbf00" points="924.66,-263.55 935.2,-262.47 926.29,-256.74 924.66,-263.55"/>
-</g>
 <!-- proc~set3&#45;&gt;proc~cmp_degree -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge39" class="edge">
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge40" class="edge">
 <title>proc~set3&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#ff0000" d="M869.42,-1430.51C877.64,-1430.51 886.23,-1430.51 894.86,-1430.51"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="894.98,-1434.01 904.98,-1430.51 894.98,-1427.01 894.98,-1434.01"/>
+<path fill="none" stroke="#ff0000" d="M860.29,-244.54C880.58,-249.4 904.15,-255.04 925.34,-260.11"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="924.66,-263.55 935.2,-262.47 926.29,-256.74 924.66,-263.55"/>
 </g>
 <!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge41" class="edge">
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge42" class="edge">
 <title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#ff5f00" d="M869.42,-922.51C877.64,-922.51 886.23,-922.51 894.86,-922.51"/>
-<polygon fill="#ff5f00" stroke="#ff5f00" points="894.98,-926.01 904.98,-922.51 894.98,-919.01 894.98,-926.01"/>
-</g>
-<!-- proc~set3~3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_node48" class="node">
-<title>proc~set3~3</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node48"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="864,-328.51 754,-328.51 754,-304.51 864,-304.51 864,-328.51"/>
-<text text-anchor="middle" x="809" y="-314.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
-</a>
-</g>
+<path fill="none" stroke="#ff5f00" d="M869.42,-1430.51C877.64,-1430.51 886.23,-1430.51 894.86,-1430.51"/>
+<polygon fill="#ff5f00" stroke="#ff5f00" points="894.98,-1434.01 904.98,-1430.51 894.98,-1427.01 894.98,-1434.01"/>
 </g>
 <!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge44" class="edge">
 <title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ffbf00" d="M860.29,-304.47C880.58,-299.62 904.15,-293.98 925.34,-288.9"/>
-<polygon fill="#ffbf00" stroke="#ffbf00" points="926.29,-292.28 935.2,-286.54 924.66,-285.47 926.29,-292.28"/>
+<path fill="none" stroke="#ffbf00" d="M869.42,-931.51C877.64,-931.51 886.23,-931.51 894.86,-931.51"/>
+<polygon fill="#ffbf00" stroke="#ffbf00" points="894.98,-935.01 904.98,-931.51 894.98,-928.01 894.98,-935.01"/>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
+<!-- none~set&#45;&gt;proc~set1 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge94" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
-<path fill="none" stroke="#004eff" d="M688.19,-274.51C704.52,-274.51 722.89,-274.51 740.24,-274.51"/>
-<polygon fill="#004eff" stroke="#004eff" points="740.32,-278.01 750.32,-274.51 740.32,-271.01 740.32,-278.01"/>
+<title>none~set&#45;&gt;proc~set1</title>
+<path fill="none" stroke="#004eff" d="M686.36,-286.54C705.98,-291.38 728.76,-296.99 749.27,-302.04"/>
+<polygon fill="#004eff" stroke="#004eff" points="748.59,-305.48 759.13,-304.47 750.26,-298.68 748.59,-305.48"/>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1~3 -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge95" class="edge">
-<title>none~set~3&#45;&gt;proc~set1~3</title>
-<path fill="none" stroke="#2700ff" d="M686.36,-262.47C705.98,-257.64 728.76,-252.03 749.27,-246.97"/>
-<polygon fill="#2700ff" stroke="#2700ff" points="750.26,-250.33 759.13,-244.54 748.59,-243.54 750.26,-250.33"/>
+<title>none~set&#45;&gt;proc~set1a</title>
+<path fill="none" stroke="#2700ff" d="M688.19,-274.51C704.52,-274.51 722.89,-274.51 740.24,-274.51"/>
+<polygon fill="#2700ff" stroke="#2700ff" points="740.32,-278.01 750.32,-274.51 740.32,-271.01 740.32,-278.01"/>
 </g>
-<!-- none~set~3&#45;&gt;proc~set3~3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge98" class="edge">
-<title>none~set~3&#45;&gt;proc~set3~3</title>
-<path fill="none" stroke="#ff0075" d="M686.36,-286.54C705.98,-291.38 728.76,-296.99 749.27,-302.04"/>
-<polygon fill="#ff0075" stroke="#ff0075" points="748.59,-305.48 759.13,-304.47 750.26,-298.68 748.59,-305.48"/>
+<!-- none~set&#45;&gt;proc~set3 -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge96" class="edge">
+<title>none~set&#45;&gt;proc~set3</title>
+<path fill="none" stroke="#9c00ff" d="M686.36,-262.47C705.98,-257.64 728.76,-252.03 749.27,-246.97"/>
+<polygon fill="#9c00ff" stroke="#9c00ff" points="750.26,-250.33 759.13,-244.54 748.59,-243.54 750.26,-250.33"/>
 </g>
-<!-- proc~modify_wc -->
+<!-- proc~modify_wc~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node50" class="node">
-<title>proc~modify_wc</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node50"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
+<title>proc~modify_wc~2</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node50"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
 <polygon fill="#d9534f" stroke="#d9534f" points="511.5,-1526.51 355.5,-1526.51 355.5,-1502.51 511.5,-1502.51 511.5,-1526.51"/>
 <text text-anchor="middle" x="433.5" y="-1512.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_wc&#45;&gt;none~set -->
+<!-- proc~modify_wc~2&#45;&gt;none~set~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge62" class="edge">
-<title>proc~modify_wc&#45;&gt;none~set</title>
+<title>proc~modify_wc~2&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M503.94,-1502.43C510.93,-1499.99 517.75,-1497.04 524,-1493.51 543.97,-1482.21 540.63,-1468.8 560,-1456.51 566.12,-1452.63 572.88,-1449.25 579.77,-1446.33"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="581.18,-1449.53 589.21,-1442.62 578.62,-1443.02 581.18,-1449.53"/>
 </g>
-<!-- proc~modify_wc~2 -->
+<!-- proc~modify_wc~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node51" class="node">
-<title>proc~modify_wc~2</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node51"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
+<title>proc~modify_wc~3</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node51"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
 <polygon fill="#d9534f" stroke="#d9534f" points="511.5,-660.51 355.5,-660.51 355.5,-636.51 511.5,-636.51 511.5,-660.51"/>
 <text text-anchor="middle" x="433.5" y="-646.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_wc~2&#45;&gt;none~set~2 -->
+<!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge77" class="edge">
-<title>proc~modify_wc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M508.49,-660.64C513.99,-663.08 519.24,-666.01 524,-669.51 582.76,-712.72 615.99,-797 629.01,-836.76"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="625.74,-838.02 632.09,-846.51 632.42,-835.92 625.74,-838.02"/>
+<title>proc~modify_wc~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff7500" d="M511.79,-660.38C516.23,-662.92 520.36,-665.93 524,-669.51 570.45,-715.13 521.58,-758.94 560,-811.51 569.25,-824.17 583.05,-834.18 596.32,-841.65"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="594.89,-844.85 605.37,-846.42 598.16,-838.66 594.89,-844.85"/>
 </g>
-<!-- proc~modify_xc -->
+<!-- proc~modify_xc~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node52" class="node">
-<title>proc~modify_xc</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node52"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
+<title>proc~modify_xc~2</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node52"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="510,-1484.51 357,-1484.51 357,-1460.51 510,-1460.51 510,-1484.51"/>
 <text text-anchor="middle" x="433.5" y="-1470.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_xc&#45;&gt;none~set -->
+<!-- proc~modify_xc~2&#45;&gt;none~set~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge63" class="edge">
-<title>proc~modify_xc&#45;&gt;none~set</title>
+<title>proc~modify_xc~2&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M492.1,-1460.47C516.47,-1455.38 544.99,-1449.42 570.15,-1444.16"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="570.9,-1447.58 579.97,-1442.11 569.47,-1440.73 570.9,-1447.58"/>
 </g>
-<!-- proc~modify_xc~2 -->
+<!-- proc~modify_xc~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node53" class="node">
-<title>proc~modify_xc~2</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node53"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
+<title>proc~modify_xc~3</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node53"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="510,-576.51 357,-576.51 357,-552.51 510,-552.51 510,-576.51"/>
 <text text-anchor="middle" x="433.5" y="-562.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_xc~2&#45;&gt;none~set~2 -->
+<!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge78" class="edge">
-<title>proc~modify_xc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M510.37,-576.54C515.26,-579.03 519.87,-581.98 524,-585.51 534.26,-594.27 603.2,-773.65 627.25,-836.77"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="624,-838.08 630.83,-846.18 630.54,-835.59 624,-838.08"/>
+<title>proc~modify_xc~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff7500" d="M510.1,-574.82C515.25,-577.67 519.98,-581.18 524,-585.51 593.27,-659.99 503.75,-726.76 560,-811.51 568.53,-824.36 581.91,-834.34 595.05,-841.74"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="593.56,-844.91 604.04,-846.44 596.81,-838.71 593.56,-844.91"/>
 </g>
-<!-- proc~set_c -->
+<!-- proc~set_c~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node54" class="node">
-<title>proc~set_c</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node54"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_volume%set_C">
+<title>proc~set_c~2</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node54"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_volume%set_C">
 <polygon fill="#d9534f" stroke="#d9534f" points="496.5,-1610.51 370.5,-1610.51 370.5,-1586.51 496.5,-1586.51 496.5,-1610.51"/>
 <text text-anchor="middle" x="433.5" y="-1596.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c&#45;&gt;none~set -->
+<!-- proc~set_c~2&#45;&gt;none~set~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge65" class="edge">
-<title>proc~set_c&#45;&gt;none~set</title>
+<title>proc~set_c~2&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M496.56,-1592.92C506.68,-1589.63 516.34,-1584.73 524,-1577.51 564.82,-1539.01 521.18,-1497.01 560,-1456.51 563.36,-1453 567.21,-1449.97 571.37,-1447.34"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="573.13,-1450.37 580.24,-1442.51 569.78,-1444.22 573.13,-1450.37"/>
 </g>
-<!-- proc~set_c~2 -->
+<!-- proc~set_c~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node55" class="node">
-<title>proc~set_c~2</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node55"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_surface%set_C">
+<title>proc~set_c~3</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node55"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_surface%set_C">
 <polygon fill="#d9534f" stroke="#d9534f" points="496.5,-786.51 370.5,-786.51 370.5,-762.51 496.5,-762.51 496.5,-786.51"/>
 <text text-anchor="middle" x="433.5" y="-772.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c~2&#45;&gt;none~set~2 -->
+<!-- proc~set_c~3&#45;&gt;none~set~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge80" class="edge">
-<title>proc~set_c~2&#45;&gt;none~set~2</title>
+<title>proc~set_c~3&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff7500" d="M496.35,-786.59C505.75,-789.12 515.23,-792.08 524,-795.51 554.76,-807.52 587.36,-826.8 609.31,-840.87"/>
 <polygon fill="#ff7500" stroke="#ff7500" points="607.46,-843.84 617.75,-846.36 611.27,-837.97 607.46,-843.84"/>
 </g>
@@ -1324,9 +1324,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring&#45;&gt;none~set -->
+<!-- proc~set_half_ring&#45;&gt;none~set~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge66" class="edge">
-<title>proc~set_half_ring&#45;&gt;none~set</title>
+<title>proc~set_half_ring&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M516.25,-1430.51C533.99,-1430.51 552.52,-1430.51 569.56,-1430.51"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="569.94,-1434.01 579.94,-1430.51 569.94,-1427.01 569.94,-1434.01"/>
 </g>
@@ -1339,9 +1339,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_half_ring~2&#45;&gt;none~set~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge81" class="edge">
-<title>proc~set_half_ring~2&#45;&gt;none~set~2</title>
+<title>proc~set_half_ring~2&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff7500" d="M516.25,-858.51C533.99,-858.51 552.52,-858.51 569.56,-858.51"/>
 <polygon fill="#ff7500" stroke="#ff7500" points="569.94,-862.01 579.94,-858.51 569.94,-855.01 569.94,-862.01"/>
 </g>
@@ -1354,9 +1354,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_hexahedron&#45;&gt;none~set -->
+<!-- proc~set_hexahedron&#45;&gt;none~set~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge67" class="edge">
-<title>proc~set_hexahedron&#45;&gt;none~set</title>
+<title>proc~set_hexahedron&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M492.1,-1400.54C516.47,-1405.64 544.99,-1411.59 570.15,-1416.85"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="569.47,-1420.28 579.97,-1418.9 570.9,-1413.43 569.47,-1420.28"/>
 </g>
@@ -1369,9 +1369,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_ring&#45;&gt;none~set -->
+<!-- proc~set_ring&#45;&gt;none~set~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge68" class="edge">
-<title>proc~set_ring&#45;&gt;none~set</title>
+<title>proc~set_ring&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M496.35,-1358.59C505.75,-1361.12 515.23,-1364.08 524,-1367.51 554.76,-1379.52 587.36,-1398.8 609.31,-1412.87"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="607.46,-1415.84 617.75,-1418.36 611.27,-1409.97 607.46,-1415.84"/>
 </g>
@@ -1384,11 +1384,11 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_ring~2&#45;&gt;none~set~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge82" class="edge">
-<title>proc~set_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M503.02,-701.3C510.41,-703.99 517.58,-707.33 524,-711.51 573.17,-743.45 609.03,-804.88 625.48,-837.29"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="622.39,-838.93 629.95,-846.35 628.66,-835.83 622.39,-838.93"/>
+<title>proc~set_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff7500" d="M503.07,-698.92C510.72,-702 517.92,-706.09 524,-711.51 559.27,-742.93 530.31,-774.77 560,-811.51 570.02,-823.9 584.22,-833.94 597.62,-841.5"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="596.23,-844.73 606.7,-846.35 599.52,-838.55 596.23,-844.73"/>
 </g>
 <!-- proc~set_tetragon -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node61" class="node">
@@ -1399,11 +1399,11 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge83" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M509.69,-618.62C514.8,-621.08 519.64,-624.01 524,-627.51 592.67,-682.56 621.77,-790.31 631.47,-836.56"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="628.05,-837.32 633.43,-846.44 634.91,-835.95 628.05,-837.32"/>
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff7500" d="M512.83,-618.65C516.91,-621.13 520.68,-624.06 524,-627.51 581.81,-687.52 512.7,-742.9 560,-811.51 568.83,-824.31 582.4,-834.32 595.62,-841.75"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="594.17,-844.94 604.65,-846.48 597.42,-838.74 594.17,-844.94"/>
 </g>
 <!-- program~compute_area -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node62" class="node">
@@ -1414,9 +1414,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;none~set~2 -->
+<!-- program~compute_area&#45;&gt;none~set~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge84" class="edge">
-<title>program~compute_area&#45;&gt;none~set~2</title>
+<title>program~compute_area&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff7500" d="M97.12,-916.4C180.4,-912.05 367.64,-900.65 524,-879.51 538.83,-877.5 554.68,-874.84 569.63,-872.08"/>
 <polygon fill="#ff7500" stroke="#ff7500" points="570.64,-875.45 579.82,-870.17 569.34,-868.57 570.64,-875.45"/>
 </g>
@@ -1430,22 +1430,22 @@ <h3 class="card-title">Called by</h3>
 <g id="interface~~compute_multiplicity~~CalledByGraph_node63" class="node">
 <title>program~compute_length</title>
 <g id="a_interface~~compute_multiplicity~~CalledByGraph_node63"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-121.51 3,-121.51 3,-97.51 102,-97.51 102,-121.51"/>
-<text text-anchor="middle" x="52.5" y="-107.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-79.51 3,-79.51 3,-55.51 102,-55.51 102,-79.51"/>
+<text text-anchor="middle" x="52.5" y="-65.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge92" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#00ffc4" d="M78.15,-97.44C107.4,-83.12 156.32,-59.16 189.12,-43.1"/>
-<polygon fill="#00ffc4" stroke="#00ffc4" points="190.88,-46.13 198.32,-38.59 187.8,-39.85 190.88,-46.13"/>
+<path fill="none" stroke="#00ffc4" d="M102.07,-55.76C121.15,-51.14 143.25,-45.8 163.29,-40.95"/>
+<polygon fill="#00ffc4" stroke="#00ffc4" points="164.35,-44.3 173.24,-38.54 162.7,-37.49 164.35,-44.3"/>
 </g>
-<!-- program~compute_length&#45;&gt;none~set~3 -->
+<!-- program~compute_length&#45;&gt;none~set -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge108" class="edge">
-<title>program~compute_length&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M65.54,-121.66C81.32,-136.74 110.59,-161.88 141,-173.51 300.78,-234.6 360.92,-159.88 524,-211.51 556.04,-221.65 589.12,-241.78 610.84,-256.57"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="608.93,-259.5 619.14,-262.34 612.93,-253.76 608.93,-259.5"/>
+<title>program~compute_length&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M95.95,-79.52C110.18,-83.19 126.19,-86.92 141,-89.51 225.26,-104.2 449.37,-85.73 524,-127.51 575.42,-156.29 610.52,-219.62 626.2,-252.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="623.11,-254.65 630.44,-262.3 629.48,-251.75 623.11,-254.65"/>
 </g>
 <!-- program~compute_volume -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node64" class="node">
@@ -1456,9 +1456,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;none~set -->
+<!-- program~compute_volume&#45;&gt;none~set~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge69" class="edge">
-<title>program~compute_volume&#45;&gt;none~set</title>
+<title>program~compute_volume&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M56.77,-1480.22C65.43,-1449.87 91.74,-1370.59 141,-1325.51 212.73,-1259.86 247.65,-1260.54 343,-1241.51 421.89,-1225.76 454.14,-1201.61 524,-1241.51 587.91,-1278.01 618.86,-1367.05 630.2,-1408.55"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="626.81,-1409.44 632.72,-1418.24 633.59,-1407.68 626.81,-1409.44"/>
 </g>
@@ -1477,9 +1477,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;none~set~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;none~set~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge86" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;none~set~2</title>
+<title>program~example_nurbs_surface&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff7500" d="M492.1,-828.54C516.47,-833.64 544.99,-839.59 570.15,-844.85"/>
 <polygon fill="#ff7500" stroke="#ff7500" points="569.47,-848.28 579.97,-846.9 570.9,-841.43 569.47,-848.28"/>
 </g>
@@ -1492,9 +1492,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;none~set -->
+<!-- program~example_nurbs_volume&#45;&gt;none~set~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge71" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;none~set</title>
+<title>program~example_nurbs_volume&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M502.84,-1316.55C510.19,-1319 517.39,-1321.96 524,-1325.51 563.85,-1346.91 599.97,-1386.23 619.72,-1410.21"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="617.24,-1412.7 626.24,-1418.29 622.69,-1408.3 617.24,-1412.7"/>
 </g>
@@ -1507,9 +1507,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;none~set -->
+<!-- program~example_put_to_nurbs&#45;&gt;none~set~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge72" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;none~set</title>
+<title>program~example_put_to_nurbs&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M499.77,-1272.17C508.31,-1275.03 516.64,-1278.72 524,-1283.51 573.17,-1315.45 609.03,-1376.88 625.48,-1409.29"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="622.39,-1410.93 629.95,-1418.35 628.66,-1407.83 622.39,-1410.93"/>
 </g>
@@ -1522,11 +1522,11 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;none~set~2 -->
+<!-- program~nearest_point_2d&#45;&gt;none~set~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge87" class="edge">
-<title>program~nearest_point_2d&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M485.42,-739.62C498.49,-742.72 512.19,-747.16 524,-753.51 563.85,-774.91 599.97,-814.23 619.72,-838.21"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="617.24,-840.7 626.24,-846.29 622.69,-836.3 617.24,-840.7"/>
+<title>program~nearest_point_2d&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff7500" d="M485.27,-737.29C498.77,-740.39 512.72,-745.41 524,-753.51 548.64,-771.21 538.56,-790.04 560,-811.51 571.9,-823.43 587.37,-833.72 601.21,-841.61"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="599.56,-844.7 610.01,-846.45 602.93,-838.57 599.56,-844.7"/>
 </g>
 <!-- program~nearest_point_3d -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node69" class="node">
@@ -1537,101 +1537,101 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;none~set -->
+<!-- program~nearest_point_3d&#45;&gt;none~set~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge73" class="edge">
-<title>program~nearest_point_3d&#45;&gt;none~set</title>
+<title>program~nearest_point_3d&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M485.05,-1552.86C498.85,-1549.8 513.02,-1544.51 524,-1535.51 553.84,-1511.04 531.44,-1482.45 560,-1456.51 564.04,-1452.84 568.62,-1449.68 573.49,-1446.97"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="575.06,-1450.1 582.49,-1442.55 571.97,-1443.81 575.06,-1450.1"/>
 </g>
-<!-- proc~modify_wc~3 -->
+<!-- proc~modify_wc -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node70" class="node">
-<title>proc~modify_wc~3</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node70"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
+<title>proc~modify_wc</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node70"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
 <polygon fill="#d9534f" stroke="#d9534f" points="506.5,-328.51 360.5,-328.51 360.5,-304.51 506.5,-304.51 506.5,-328.51"/>
 <text text-anchor="middle" x="433.5" y="-314.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
+<!-- proc~modify_wc&#45;&gt;none~set -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge102" class="edge">
-<title>proc~modify_wc~3&#45;&gt;none~set~3</title>
+<title>proc~modify_wc&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M492.1,-304.47C518.02,-299.06 548.63,-292.66 574.9,-287.17"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="575.66,-290.59 584.73,-285.11 574.23,-283.73 575.66,-290.59"/>
 </g>
-<!-- proc~modify_xc~3 -->
+<!-- proc~modify_xc -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node71" class="node">
-<title>proc~modify_xc~3</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node71"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
+<title>proc~modify_xc</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node71"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="505,-286.51 362,-286.51 362,-262.51 505,-262.51 505,-286.51"/>
 <text text-anchor="middle" x="433.5" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
+<!-- proc~modify_xc&#45;&gt;none~set -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge103" class="edge">
-<title>proc~modify_xc~3&#45;&gt;none~set~3</title>
+<title>proc~modify_xc&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M505.08,-274.51C527.74,-274.51 552.62,-274.51 574.53,-274.51"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="574.69,-278.01 584.69,-274.51 574.69,-271.01 574.69,-278.01"/>
 </g>
-<!-- proc~set_circle -->
+<!-- proc~set_c -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node72" class="node">
-<title>proc~set_circle</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node72"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="502,-164.51 365,-164.51 365,-140.51 502,-140.51 502,-164.51"/>
-<text text-anchor="middle" x="433.5" y="-150.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
+<title>proc~set_c</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node72"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_curve%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="491.5,-80.51 375.5,-80.51 375.5,-56.51 491.5,-56.51 491.5,-80.51"/>
+<text text-anchor="middle" x="433.5" y="-66.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
 </a>
 </g>
 </g>
-<!-- proc~set_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_c&#45;&gt;none~set -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge105" class="edge">
-<title>proc~set_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M489.93,-164.59C501.55,-168.22 513.47,-172.8 524,-178.51 561.4,-198.78 597.33,-233.31 617.87,-254.96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="615.34,-257.38 624.72,-262.31 620.46,-252.6 615.34,-257.38"/>
+<title>proc~set_c&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M491.9,-78.42C503.27,-82.18 514.59,-87.36 524,-94.51 579.39,-136.57 613.81,-214.79 628,-252.73"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="624.77,-254.1 631.47,-262.31 631.36,-251.71 624.77,-254.1"/>
 </g>
-<!-- proc~set_c~3 -->
+<!-- proc~set_circle -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node73" class="node">
-<title>proc~set_c~3</title>
-<g id="a_interface~~compute_multiplicity~~CalledByGraph_node73"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_curve%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="491.5,-370.51 375.5,-370.51 375.5,-346.51 491.5,-346.51 491.5,-370.51"/>
-<text text-anchor="middle" x="433.5" y="-356.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
+<title>proc~set_circle</title>
+<g id="a_interface~~compute_multiplicity~~CalledByGraph_node73"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
+<polygon fill="#d9534f" stroke="#d9534f" points="502,-370.51 365,-370.51 365,-346.51 502,-346.51 502,-370.51"/>
+<text text-anchor="middle" x="433.5" y="-356.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c~3&#45;&gt;none~set~3 -->
+<!-- proc~set_circle&#45;&gt;none~set -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge106" class="edge">
-<title>proc~set_c~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M491.58,-347.68C502.51,-344.89 513.74,-341.51 524,-337.51 554.76,-325.49 587.36,-306.21 609.31,-292.14"/>
+<title>proc~set_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M496.35,-346.43C505.75,-343.9 515.23,-340.93 524,-337.51 554.76,-325.49 587.36,-306.21 609.31,-292.14"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="611.27,-295.04 617.75,-286.65 607.46,-289.17 611.27,-295.04"/>
 </g>
 <!-- proc~set_half_circle -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node74" class="node">
 <title>proc~set_half_circle</title>
 <g id="a_interface~~compute_multiplicity~~CalledByGraph_node74"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="515,-244.51 352,-244.51 352,-220.51 515,-220.51 515,-244.51"/>
-<text text-anchor="middle" x="433.5" y="-230.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="515,-160.51 352,-160.51 352,-136.51 515,-136.51 515,-160.51"/>
+<text text-anchor="middle" x="433.5" y="-146.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_half_circle&#45;&gt;none~set -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge107" class="edge">
-<title>proc~set_half_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M492.1,-244.54C518.02,-249.96 548.63,-256.36 574.9,-261.84"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="574.23,-265.28 584.73,-263.9 575.66,-258.43 574.23,-265.28"/>
+<title>proc~set_half_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M502.84,-160.55C510.19,-163 517.39,-165.96 524,-169.51 563.85,-190.91 599.97,-230.23 619.72,-254.21"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="617.24,-256.7 626.24,-262.29 622.69,-252.3 617.24,-256.7"/>
 </g>
 <!-- program~example_nurbs_curve -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node75" class="node">
 <title>program~example_nurbs_curve</title>
 <g id="a_interface~~compute_multiplicity~~CalledByGraph_node75"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-122.51 369,-122.51 369,-98.51 498,-98.51 498,-122.51"/>
-<text text-anchor="middle" x="433.5" y="-108.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-244.51 369,-244.51 369,-220.51 498,-220.51 498,-244.51"/>
+<text text-anchor="middle" x="433.5" y="-230.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;none~set~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;none~set -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge110" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M498.31,-119.8C507.35,-122.71 516.2,-126.52 524,-131.51 572.09,-162.3 608,-221.24 624.86,-252.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="621.95,-254.99 629.65,-262.27 628.17,-251.78 621.95,-254.99"/>
+<title>program~example_nurbs_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M492.1,-244.54C518.02,-249.96 548.63,-256.36 574.9,-261.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="574.23,-265.28 584.73,-263.9 575.66,-258.43 574.23,-265.28"/>
 </g>
 <!-- program~example_ppm1 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node76" class="node">
@@ -1684,9 +1684,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge112" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
 <path fill="none" stroke="#daff00" d="M271.05,-564.51C293.29,-564.51 320.72,-564.51 346.61,-564.51"/>
 <polygon fill="#daff00" stroke="#daff00" points="346.83,-568.01 356.83,-564.51 346.83,-561.01 346.83,-568.01"/>
 </g>
@@ -1700,16 +1700,16 @@ <h3 class="card-title">Called by</h3>
 <g id="interface~~compute_multiplicity~~CalledByGraph_node79" class="node">
 <title>program~nearest_point_1d</title>
 <g id="a_interface~~compute_multiplicity~~CalledByGraph_node79"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-80.51 382,-80.51 382,-56.51 485,-56.51 485,-80.51"/>
-<text text-anchor="middle" x="433.5" y="-66.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-202.51 382,-202.51 382,-178.51 485,-178.51 485,-202.51"/>
+<text text-anchor="middle" x="433.5" y="-188.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;none~set~3 -->
+<!-- program~nearest_point_1d&#45;&gt;none~set -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge111" class="edge">
-<title>program~nearest_point_1d&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M485.34,-73.19C498.84,-76.29 512.78,-81.33 524,-89.51 581.76,-131.57 615.3,-213.5 628.69,-252.65"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="625.4,-253.88 631.86,-262.28 632.05,-251.68 625.4,-253.88"/>
+<title>program~nearest_point_1d&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M485.44,-199.82C498.25,-202.88 511.81,-206.75 524,-211.51 554.76,-223.52 587.36,-242.8 609.31,-256.87"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="607.46,-259.84 617.75,-262.36 611.27,-253.97 607.46,-259.84"/>
 </g>
 <!-- program~nearest_point_2d_bench -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node80" class="node">
@@ -1735,9 +1735,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~set_c~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~set_c~3 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge114" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~set_c~2</title>
+<title>program~shape_c_2d&#45;&gt;proc~set_c~3</title>
 <path fill="none" stroke="#48ff00" d="M262.1,-774.51C289.25,-774.51 326.96,-774.51 360,-774.51"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="360.09,-778.01 370.09,-774.51 360.09,-771.01 360.09,-778.01"/>
 </g>
@@ -1750,9 +1750,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~set_c -->
+<!-- program~shape_c_3d&#45;&gt;proc~set_c~2 -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge113" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~set_c</title>
+<title>program~shape_c_3d&#45;&gt;proc~set_c~2</title>
 <path fill="none" stroke="#91ff00" d="M262.1,-1598.51C289.25,-1598.51 326.96,-1598.51 360,-1598.51"/>
 <polygon fill="#91ff00" stroke="#91ff00" points="360.09,-1602.01 370.09,-1598.51 360.09,-1595.01 360.09,-1602.01"/>
 </g>
@@ -1850,46 +1850,46 @@ <h3 class="card-title">Called by</h3>
 <g id="interface~~compute_multiplicity~~CalledByGraph_node89" class="node">
 <title>program~shape_c_1d</title>
 <g id="a_interface~~compute_multiplicity~~CalledByGraph_node89"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-370.51 186,-370.51 186,-346.51 262,-346.51 262,-370.51"/>
-<text text-anchor="middle" x="224" y="-356.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-80.51 186,-80.51 186,-56.51 262,-56.51 262,-80.51"/>
+<text text-anchor="middle" x="224" y="-66.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~set_c~3 -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge128" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~set_c~3</title>
-<path fill="none" stroke="#fff100" d="M262.1,-358.51C290.62,-358.51 330.8,-358.51 364.98,-358.51"/>
-<polygon fill="#fff100" stroke="#fff100" points="365.38,-362.01 375.38,-358.51 365.37,-355.01 365.38,-362.01"/>
+<!-- program~shape_c_1d&#45;&gt;proc~set_c -->
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge127" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~set_c</title>
+<path fill="none" stroke="#ffa100" d="M262.1,-68.51C290.62,-68.51 330.8,-68.51 364.98,-68.51"/>
+<polygon fill="#ffa100" stroke="#ffa100" points="365.38,-72.01 375.38,-68.51 365.37,-65.01 365.38,-72.01"/>
 </g>
 <!-- program~shape_circle -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node90" class="node">
 <title>program~shape_circle</title>
 <g id="a_interface~~compute_multiplicity~~CalledByGraph_node90"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="263.5,-164.51 184.5,-164.51 184.5,-140.51 263.5,-140.51 263.5,-164.51"/>
-<text text-anchor="middle" x="224" y="-150.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="263.5,-370.51 184.5,-370.51 184.5,-346.51 263.5,-346.51 263.5,-370.51"/>
+<text text-anchor="middle" x="224" y="-356.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
 <!-- program~shape_circle&#45;&gt;proc~set_circle -->
-<g id="interface~~compute_multiplicity~~CalledByGraph_edge127" class="edge">
+<g id="interface~~compute_multiplicity~~CalledByGraph_edge128" class="edge">
 <title>program~shape_circle&#45;&gt;proc~set_circle</title>
-<path fill="none" stroke="#ffa100" d="M263.54,-152.51C289.03,-152.51 323.33,-152.51 354.38,-152.51"/>
-<polygon fill="#ffa100" stroke="#ffa100" points="354.76,-156.01 364.76,-152.51 354.76,-149.01 354.76,-156.01"/>
+<path fill="none" stroke="#fff100" d="M263.54,-358.51C289.03,-358.51 323.33,-358.51 354.38,-358.51"/>
+<polygon fill="#fff100" stroke="#fff100" points="354.76,-362.01 364.76,-358.51 354.76,-355.01 354.76,-362.01"/>
 </g>
 <!-- program~shape_half_circle -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_node91" class="node">
 <title>program~shape_half_circle</title>
 <g id="a_interface~~compute_multiplicity~~CalledByGraph_node91"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="276,-244.51 172,-244.51 172,-220.51 276,-220.51 276,-244.51"/>
-<text text-anchor="middle" x="224" y="-230.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="276,-160.51 172,-160.51 172,-136.51 276,-136.51 276,-160.51"/>
+<text text-anchor="middle" x="224" y="-146.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
 <!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
 <g id="interface~~compute_multiplicity~~CalledByGraph_edge129" class="edge">
 <title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
-<path fill="none" stroke="#bbff00" d="M276.03,-232.51C295.8,-232.51 319.05,-232.51 341.49,-232.51"/>
-<polygon fill="#bbff00" stroke="#bbff00" points="341.73,-236.01 351.73,-232.51 341.73,-229.01 341.73,-236.01"/>
+<path fill="none" stroke="#bbff00" d="M276.03,-148.51C295.8,-148.51 319.05,-148.51 341.49,-148.51"/>
+<polygon fill="#bbff00" stroke="#bbff00" points="341.73,-152.01 351.73,-148.51 341.73,-145.01 341.73,-152.01"/>
 </g>
 </g>
 </svg>
@@ -2006,7 +2006,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~10"></span>
+              <span class="anchor" id="variable-knot~31"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2055,7 +2055,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~11"></span>
+              <span class="anchor" id="variable-knot~32"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2112,7 +2112,7 @@ <h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/compute_tgc.html b/interface/compute_tgc.html
index 77b246c41..643782a78 100644
--- a/interface/compute_tgc.html
+++ b/interface/compute_tgc.html
@@ -82,15 +82,15 @@ <h1>compute_Tgc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">compute_Tgc</li>
           </ol>
         </nav>
@@ -127,10 +127,10 @@ <h4 class="card-header bg-primary text-white">Functions</h4>
       </a>
       <div id="funcs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../interface/compute_tgc.html#proc-compute_tgc_bspline_3d_scalar">compute_Tgc_bspline_3d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_tgc.html#proc-compute_tgc_bspline_3d_vector">compute_Tgc_bspline_3d_vector</a>
-            <a class="list-group-item" href="../interface/compute_tgc.html#proc-compute_tgc_nurbs_3d_scalar">compute_Tgc_nurbs_3d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_tgc.html#proc-compute_tgc_nurbs_3d_vector">compute_Tgc_nurbs_3d_vector</a>
+            <a class="list-group-item" href="../interface/compute_tgc.html#proc-compute_tgc_bspline_1d_scalar">compute_Tgc_bspline_1d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_tgc.html#proc-compute_tgc_bspline_1d_vector">compute_Tgc_bspline_1d_vector</a>
+            <a class="list-group-item" href="../interface/compute_tgc.html#proc-compute_tgc_nurbs_1d_scalar">compute_Tgc_nurbs_1d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_tgc.html#proc-compute_tgc_nurbs_1d_vector">compute_Tgc_nurbs_1d_vector</a>
         </div>
       </div>
     </div>
@@ -163,46 +163,46 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: interface~~compute_tgc~~CalledByGraph Pages: 1 -->
-<svg id="interfacecompute_tgcCalledByGraph" width="292pt" height="74pt"
- viewBox="0.00 0.00 292.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="interfacecompute_tgcCalledByGraph" width="283pt" height="74pt"
+ viewBox="0.00 0.00 283.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="interface~~compute_tgc~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>interface~~compute_tgc~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 288,-70 288,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 279,-70 279,4 -4,4"/>
 <!-- interface~compute_tgc -->
 <g id="interface~~compute_tgc~~CalledByGraph_node1" class="node">
 <title>interface~compute_tgc</title>
-<polygon fill="none" stroke="black" points="284,-45 199,-45 199,-21 284,-21 284,-45"/>
-<text text-anchor="middle" x="241.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_Tgc</text>
+<polygon fill="none" stroke="black" points="275,-45 190,-45 190,-21 275,-21 275,-45"/>
+<text text-anchor="middle" x="232.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_Tgc</text>
 </g>
 <!-- proc~basis_scalar -->
 <g id="interface~~compute_tgc~~CalledByGraph_node2" class="node">
 <title>proc~basis_scalar</title>
-<g id="a_interface~~compute_tgc~~CalledByGraph_node2"><a xlink:href="../proc/basis_scalar.html" xlink:title="nurbs_volume%basis_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="162.5,-66 0.5,-66 0.5,-42 162.5,-42 162.5,-66"/>
-<text text-anchor="middle" x="81.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%basis_scalar</text>
+<g id="a_interface~~compute_tgc~~CalledByGraph_node2"><a xlink:href="../proc/basis_scalar.html" xlink:title="nurbs_curve%basis_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="153,-66 1,-66 1,-42 153,-42 153,-66"/>
+<text text-anchor="middle" x="77" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%basis_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_scalar&#45;&gt;interface~compute_tgc -->
 <g id="interface~~compute_tgc~~CalledByGraph_edge1" class="edge">
 <title>proc~basis_scalar&#45;&gt;interface~compute_tgc</title>
-<path fill="none" stroke="#ff0000" d="M162.89,-43.32C171.57,-42.16 180.23,-41.01 188.45,-39.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="189.14,-43.36 198.59,-38.57 188.22,-36.42 189.14,-43.36"/>
+<path fill="none" stroke="#ff0000" d="M153.4,-43.68C162.35,-42.46 171.32,-41.23 179.83,-40.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="180.52,-43.51 189.95,-38.68 179.57,-36.57 180.52,-43.51"/>
 </g>
 <!-- proc~basis_vector -->
 <g id="interface~~compute_tgc~~CalledByGraph_node3" class="node">
 <title>proc~basis_vector</title>
-<g id="a_interface~~compute_tgc~~CalledByGraph_node3"><a xlink:href="../proc/basis_vector.html" xlink:title="nurbs_volume%basis_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="163,-24 0,-24 0,0 163,0 163,-24"/>
-<text text-anchor="middle" x="81.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%basis_vector</text>
+<g id="a_interface~~compute_tgc~~CalledByGraph_node3"><a xlink:href="../proc/basis_vector.html" xlink:title="nurbs_curve%basis_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="154,-24 0,-24 0,0 154,0 154,-24"/>
+<text text-anchor="middle" x="77" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%basis_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_vector&#45;&gt;interface~compute_tgc -->
 <g id="interface~~compute_tgc~~CalledByGraph_edge2" class="edge">
 <title>proc~basis_vector&#45;&gt;interface~compute_tgc</title>
-<path fill="none" stroke="#ff0000" d="M163.35,-22.75C172,-23.9 180.62,-25.04 188.79,-26.13"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="188.5,-29.62 198.88,-27.47 189.43,-22.68 188.5,-29.62"/>
+<path fill="none" stroke="#ff0000" d="M154.3,-22.44C162.87,-23.61 171.45,-24.78 179.61,-25.9"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="179.3,-29.39 189.68,-27.28 180.25,-22.46 179.3,-29.39"/>
 </g>
 </g>
 </svg>
@@ -290,7 +290,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
 <br>
         <h2>Functions</h2>
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_bspline_3d_scalar"></span> <h3>private pure function compute_Tgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc) result(f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_bspline_1d_scalar"></span> <h3>private pure function compute_Tgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc) result(f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -311,49 +311,19 @@ <h4>Arguments</h4>
               <span class="anchor" id="variable-f_xt~16"></span>
               real(kind=rk),
             </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_Xt</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot1~16"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot2~16"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
+<td>intent(in)</td>
               <td></td>            <td>
-              contiguous
+              
             </td>
             <td>::</td>
-            <td><strong>f_knot2</strong>(:)</td>
+            <td><strong>f_Xt</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot3~16"></span>
+              <span class="anchor" id="variable-f_knot~16"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -361,7 +331,7 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot3</strong>(:)</td>
+            <td><strong>f_knot</strong>(:)</td>
             <td>
                 
             </td>
@@ -376,7 +346,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(3)</td>
+            <td><strong>f_degree</strong></td>
             <td>
                 
             </td>
@@ -391,7 +361,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(3)</td>
+            <td><strong>f_nc</strong></td>
             <td>
                 
             </td>
@@ -409,7 +379,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_bspline_3d_vector"></span> <h3>private pure function compute_Tgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng) result(f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_bspline_1d_vector"></span> <h3>private pure function compute_Tgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng) result(f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -435,44 +405,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong>(:,:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot1~14"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot2~14"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot2</strong>(:)</td>
+            <td><strong>f_Xt</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot3~14"></span>
+              <span class="anchor" id="variable-f_knot~14"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -480,7 +420,7 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot3</strong>(:)</td>
+            <td><strong>f_knot</strong>(:)</td>
             <td>
                 
             </td>
@@ -495,7 +435,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(3)</td>
+            <td><strong>f_degree</strong></td>
             <td>
                 
             </td>
@@ -510,7 +450,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(3)</td>
+            <td><strong>f_nc</strong></td>
             <td>
                 
             </td>
@@ -525,7 +465,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong>(3)</td>
+            <td><strong>f_ng</strong></td>
             <td>
                 
             </td>
@@ -543,7 +483,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_nurbs_3d_scalar"></span> <h3>private pure function compute_Tgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc) result(f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_nurbs_1d_scalar"></span> <h3>private pure function compute_Tgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc) result(f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -564,49 +504,19 @@ <h4>Arguments</h4>
               <span class="anchor" id="variable-f_xt~15"></span>
               real(kind=rk),
             </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_Xt</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot1~15"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot2~15"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
+<td>intent(in)</td>
               <td></td>            <td>
-              contiguous
+              
             </td>
             <td>::</td>
-            <td><strong>f_knot2</strong>(:)</td>
+            <td><strong>f_Xt</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot3~15"></span>
+              <span class="anchor" id="variable-f_knot~15"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -614,7 +524,7 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot3</strong>(:)</td>
+            <td><strong>f_knot</strong>(:)</td>
             <td>
                 
             </td>
@@ -629,7 +539,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(3)</td>
+            <td><strong>f_degree</strong></td>
             <td>
                 
             </td>
@@ -644,7 +554,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(3)</td>
+            <td><strong>f_nc</strong></td>
             <td>
                 
             </td>
@@ -677,7 +587,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_nurbs_3d_vector"></span> <h3>private pure function compute_Tgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_nurbs_1d_vector"></span> <h3>private pure function compute_Tgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -703,44 +613,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong>(:,:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot1~13"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot2~13"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot2</strong>(:)</td>
+            <td><strong>f_Xt</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot3~13"></span>
+              <span class="anchor" id="variable-f_knot~13"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -748,7 +628,7 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot3</strong>(:)</td>
+            <td><strong>f_knot</strong>(:)</td>
             <td>
                 
             </td>
@@ -763,7 +643,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(3)</td>
+            <td><strong>f_degree</strong></td>
             <td>
                 
             </td>
@@ -778,7 +658,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(3)</td>
+            <td><strong>f_nc</strong></td>
             <td>
                 
             </td>
@@ -793,7 +673,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong>(3)</td>
+            <td><strong>f_ng</strong></td>
             <td>
                 
             </td>
@@ -844,7 +724,7 @@ <h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/compute_tgc~2.html b/interface/compute_tgc~2.html
index d2bbbf1cd..579a06957 100644
--- a/interface/compute_tgc~2.html
+++ b/interface/compute_tgc~2.html
@@ -82,15 +82,15 @@ <h1>compute_Tgc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">compute_Tgc</li>
           </ol>
         </nav>
@@ -127,10 +127,10 @@ <h4 class="card-header bg-primary text-white">Functions</h4>
       </a>
       <div id="funcs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../interface/compute_tgc~2.html#proc-compute_tgc_bspline_2d_scalar">compute_Tgc_bspline_2d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_tgc~2.html#proc-compute_tgc_bspline_2d_vector">compute_Tgc_bspline_2d_vector</a>
-            <a class="list-group-item" href="../interface/compute_tgc~2.html#proc-compute_tgc_nurbs_2d_scalar">compute_Tgc_nurbs_2d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_tgc~2.html#proc-compute_tgc_nurbs_2d_vector">compute_Tgc_nurbs_2d_vector</a>
+            <a class="list-group-item" href="../interface/compute_tgc~2.html#proc-compute_tgc_bspline_3d_scalar">compute_Tgc_bspline_3d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_tgc~2.html#proc-compute_tgc_bspline_3d_vector">compute_Tgc_bspline_3d_vector</a>
+            <a class="list-group-item" href="../interface/compute_tgc~2.html#proc-compute_tgc_nurbs_3d_scalar">compute_Tgc_nurbs_3d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_tgc~2.html#proc-compute_tgc_nurbs_3d_vector">compute_Tgc_nurbs_3d_vector</a>
         </div>
       </div>
     </div>
@@ -177,9 +177,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~basis_scalar~2 -->
 <g id="interface~~compute_tgc~2~~CalledByGraph_node2" class="node">
 <title>proc~basis_scalar~2</title>
-<g id="a_interface~~compute_tgc~2~~CalledByGraph_node2"><a xlink:href="../proc/basis_scalar~2.html" xlink:title="nurbs_surface%basis_scalar">
+<g id="a_interface~~compute_tgc~2~~CalledByGraph_node2"><a xlink:href="../proc/basis_scalar~2.html" xlink:title="nurbs_volume%basis_scalar">
 <polygon fill="#d9534f" stroke="#d9534f" points="162.5,-66 0.5,-66 0.5,-42 162.5,-42 162.5,-66"/>
-<text text-anchor="middle" x="81.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%basis_scalar</text>
+<text text-anchor="middle" x="81.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%basis_scalar</text>
 </a>
 </g>
 </g>
@@ -192,9 +192,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~basis_vector~2 -->
 <g id="interface~~compute_tgc~2~~CalledByGraph_node3" class="node">
 <title>proc~basis_vector~2</title>
-<g id="a_interface~~compute_tgc~2~~CalledByGraph_node3"><a xlink:href="../proc/basis_vector~2.html" xlink:title="nurbs_surface%basis_vector">
+<g id="a_interface~~compute_tgc~2~~CalledByGraph_node3"><a xlink:href="../proc/basis_vector~2.html" xlink:title="nurbs_volume%basis_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="163,-24 0,-24 0,0 163,0 163,-24"/>
-<text text-anchor="middle" x="81.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%basis_vector</text>
+<text text-anchor="middle" x="81.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%basis_vector</text>
 </a>
 </g>
 </g>
@@ -290,7 +290,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
 <br>
         <h2>Functions</h2>
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_bspline_2d_scalar"></span> <h3>private pure function compute_Tgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc) result(f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_bspline_3d_scalar"></span> <h3>private pure function compute_Tgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc) result(f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -323,7 +323,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot1~32"></span>
+              <span class="anchor" id="variable-f_knot1~16"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -338,7 +338,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot2~32"></span>
+              <span class="anchor" id="variable-f_knot2~16"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -351,6 +351,21 @@ <h4>Arguments</h4>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot3~16"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-f_degree~32"></span>
@@ -361,14 +376,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(2)</td>
+            <td><strong>f_degree</strong>(3)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~28"></span>
+              <span class="anchor" id="variable-f_nc~32"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -376,7 +391,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(2)</td>
+            <td><strong>f_nc</strong>(3)</td>
             <td>
                 
             </td>
@@ -394,7 +409,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_bspline_2d_vector"></span> <h3>private pure function compute_Tgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng) result(f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_bspline_3d_vector"></span> <h3>private pure function compute_Tgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng) result(f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -427,7 +442,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot1~30"></span>
+              <span class="anchor" id="variable-f_knot1~14"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -442,7 +457,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot2~30"></span>
+              <span class="anchor" id="variable-f_knot2~14"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -455,6 +470,21 @@ <h4>Arguments</h4>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot3~14"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-f_degree~30"></span>
@@ -465,14 +495,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(2)</td>
+            <td><strong>f_degree</strong>(3)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~26"></span>
+              <span class="anchor" id="variable-f_nc~30"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -480,7 +510,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(2)</td>
+            <td><strong>f_nc</strong>(3)</td>
             <td>
                 
             </td>
@@ -495,7 +525,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong>(2)</td>
+            <td><strong>f_ng</strong>(3)</td>
             <td>
                 
             </td>
@@ -513,7 +543,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_nurbs_2d_scalar"></span> <h3>private pure function compute_Tgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc) result(f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_nurbs_3d_scalar"></span> <h3>private pure function compute_Tgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc) result(f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -546,7 +576,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot1~31"></span>
+              <span class="anchor" id="variable-f_knot1~15"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -561,7 +591,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot2~31"></span>
+              <span class="anchor" id="variable-f_knot2~15"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -574,6 +604,21 @@ <h4>Arguments</h4>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot3~15"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-f_degree~31"></span>
@@ -584,14 +629,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(2)</td>
+            <td><strong>f_degree</strong>(3)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~27"></span>
+              <span class="anchor" id="variable-f_nc~31"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -599,7 +644,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(2)</td>
+            <td><strong>f_nc</strong>(3)</td>
             <td>
                 
             </td>
@@ -632,7 +677,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_nurbs_2d_vector"></span> <h3>private pure function compute_Tgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_nurbs_3d_vector"></span> <h3>private pure function compute_Tgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -665,7 +710,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot1~29"></span>
+              <span class="anchor" id="variable-f_knot1~13"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -680,7 +725,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot2~29"></span>
+              <span class="anchor" id="variable-f_knot2~13"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -693,6 +738,21 @@ <h4>Arguments</h4>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot3~13"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-f_degree~29"></span>
@@ -703,14 +763,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(2)</td>
+            <td><strong>f_degree</strong>(3)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~25"></span>
+              <span class="anchor" id="variable-f_nc~29"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -718,7 +778,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(2)</td>
+            <td><strong>f_nc</strong>(3)</td>
             <td>
                 
             </td>
@@ -733,7 +793,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong>(2)</td>
+            <td><strong>f_ng</strong>(3)</td>
             <td>
                 
             </td>
@@ -784,7 +844,7 @@ <h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/compute_tgc~3.html b/interface/compute_tgc~3.html
index b23056de3..76aa08275 100644
--- a/interface/compute_tgc~3.html
+++ b/interface/compute_tgc~3.html
@@ -82,15 +82,15 @@ <h1>compute_Tgc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">compute_Tgc</li>
           </ol>
         </nav>
@@ -127,10 +127,10 @@ <h4 class="card-header bg-primary text-white">Functions</h4>
       </a>
       <div id="funcs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../interface/compute_tgc~3.html#proc-compute_tgc_bspline_1d_scalar">compute_Tgc_bspline_1d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_tgc~3.html#proc-compute_tgc_bspline_1d_vector">compute_Tgc_bspline_1d_vector</a>
-            <a class="list-group-item" href="../interface/compute_tgc~3.html#proc-compute_tgc_nurbs_1d_scalar">compute_Tgc_nurbs_1d_scalar</a>
-            <a class="list-group-item" href="../interface/compute_tgc~3.html#proc-compute_tgc_nurbs_1d_vector">compute_Tgc_nurbs_1d_vector</a>
+            <a class="list-group-item" href="../interface/compute_tgc~3.html#proc-compute_tgc_bspline_2d_scalar">compute_Tgc_bspline_2d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_tgc~3.html#proc-compute_tgc_bspline_2d_vector">compute_Tgc_bspline_2d_vector</a>
+            <a class="list-group-item" href="../interface/compute_tgc~3.html#proc-compute_tgc_nurbs_2d_scalar">compute_Tgc_nurbs_2d_scalar</a>
+            <a class="list-group-item" href="../interface/compute_tgc~3.html#proc-compute_tgc_nurbs_2d_vector">compute_Tgc_nurbs_2d_vector</a>
         </div>
       </div>
     </div>
@@ -163,46 +163,46 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: interface~~compute_tgc~3~~CalledByGraph Pages: 1 -->
-<svg id="interfacecompute_tgc3CalledByGraph" width="283pt" height="74pt"
- viewBox="0.00 0.00 283.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="interfacecompute_tgc3CalledByGraph" width="292pt" height="74pt"
+ viewBox="0.00 0.00 292.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="interface~~compute_tgc~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>interface~~compute_tgc~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 279,-70 279,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 288,-70 288,4 -4,4"/>
 <!-- interface~compute_tgc~3 -->
 <g id="interface~~compute_tgc~3~~CalledByGraph_node1" class="node">
 <title>interface~compute_tgc~3</title>
-<polygon fill="none" stroke="black" points="275,-45 190,-45 190,-21 275,-21 275,-45"/>
-<text text-anchor="middle" x="232.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_Tgc</text>
+<polygon fill="none" stroke="black" points="284,-45 199,-45 199,-21 284,-21 284,-45"/>
+<text text-anchor="middle" x="241.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_Tgc</text>
 </g>
 <!-- proc~basis_scalar~3 -->
 <g id="interface~~compute_tgc~3~~CalledByGraph_node2" class="node">
 <title>proc~basis_scalar~3</title>
-<g id="a_interface~~compute_tgc~3~~CalledByGraph_node2"><a xlink:href="../proc/basis_scalar~3.html" xlink:title="nurbs_curve%basis_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="153,-66 1,-66 1,-42 153,-42 153,-66"/>
-<text text-anchor="middle" x="77" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%basis_scalar</text>
+<g id="a_interface~~compute_tgc~3~~CalledByGraph_node2"><a xlink:href="../proc/basis_scalar~3.html" xlink:title="nurbs_surface%basis_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="162.5,-66 0.5,-66 0.5,-42 162.5,-42 162.5,-66"/>
+<text text-anchor="middle" x="81.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%basis_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_scalar~3&#45;&gt;interface~compute_tgc~3 -->
 <g id="interface~~compute_tgc~3~~CalledByGraph_edge1" class="edge">
 <title>proc~basis_scalar~3&#45;&gt;interface~compute_tgc~3</title>
-<path fill="none" stroke="#ff0000" d="M153.4,-43.68C162.35,-42.46 171.32,-41.23 179.83,-40.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="180.52,-43.51 189.95,-38.68 179.57,-36.57 180.52,-43.51"/>
+<path fill="none" stroke="#ff0000" d="M162.89,-43.32C171.57,-42.16 180.23,-41.01 188.45,-39.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="189.14,-43.36 198.59,-38.57 188.22,-36.42 189.14,-43.36"/>
 </g>
 <!-- proc~basis_vector~3 -->
 <g id="interface~~compute_tgc~3~~CalledByGraph_node3" class="node">
 <title>proc~basis_vector~3</title>
-<g id="a_interface~~compute_tgc~3~~CalledByGraph_node3"><a xlink:href="../proc/basis_vector~3.html" xlink:title="nurbs_curve%basis_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="154,-24 0,-24 0,0 154,0 154,-24"/>
-<text text-anchor="middle" x="77" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%basis_vector</text>
+<g id="a_interface~~compute_tgc~3~~CalledByGraph_node3"><a xlink:href="../proc/basis_vector~3.html" xlink:title="nurbs_surface%basis_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="163,-24 0,-24 0,0 163,0 163,-24"/>
+<text text-anchor="middle" x="81.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%basis_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_vector~3&#45;&gt;interface~compute_tgc~3 -->
 <g id="interface~~compute_tgc~3~~CalledByGraph_edge2" class="edge">
 <title>proc~basis_vector~3&#45;&gt;interface~compute_tgc~3</title>
-<path fill="none" stroke="#ff0000" d="M154.3,-22.44C162.87,-23.61 171.45,-24.78 179.61,-25.9"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="179.3,-29.39 189.68,-27.28 180.25,-22.46 179.3,-29.39"/>
+<path fill="none" stroke="#ff0000" d="M163.35,-22.75C172,-23.9 180.62,-25.04 188.79,-26.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="188.5,-29.62 198.88,-27.47 189.43,-22.68 188.5,-29.62"/>
 </g>
 </g>
 </svg>
@@ -290,7 +290,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
 <br>
         <h2>Functions</h2>
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_bspline_1d_scalar"></span> <h3>private pure function compute_Tgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc) result(f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_bspline_2d_scalar"></span> <h3>private pure function compute_Tgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc) result(f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -311,19 +311,34 @@ <h4>Arguments</h4>
               <span class="anchor" id="variable-f_xt~48"></span>
               real(kind=rk),
             </td>
-<td>intent(in)</td>
+<td>intent(in),</td>
               <td></td>            <td>
-              
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_Xt</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot1~32"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong></td>
+            <td><strong>f_knot1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot~16"></span>
+              <span class="anchor" id="variable-f_knot2~32"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -331,7 +346,7 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot</strong>(:)</td>
+            <td><strong>f_knot2</strong>(:)</td>
             <td>
                 
             </td>
@@ -346,7 +361,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong></td>
+            <td><strong>f_degree</strong>(2)</td>
             <td>
                 
             </td>
@@ -361,7 +376,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong></td>
+            <td><strong>f_nc</strong>(2)</td>
             <td>
                 
             </td>
@@ -379,7 +394,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_bspline_1d_vector"></span> <h3>private pure function compute_Tgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng) result(f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_bspline_2d_vector"></span> <h3>private pure function compute_Tgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng) result(f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -405,14 +420,29 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong>(:)</td>
+            <td><strong>f_Xt</strong>(:,:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot1~30"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot~14"></span>
+              <span class="anchor" id="variable-f_knot2~30"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -420,7 +450,7 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot</strong>(:)</td>
+            <td><strong>f_knot2</strong>(:)</td>
             <td>
                 
             </td>
@@ -435,7 +465,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong></td>
+            <td><strong>f_degree</strong>(2)</td>
             <td>
                 
             </td>
@@ -450,7 +480,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong></td>
+            <td><strong>f_nc</strong>(2)</td>
             <td>
                 
             </td>
@@ -465,7 +495,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong></td>
+            <td><strong>f_ng</strong>(2)</td>
             <td>
                 
             </td>
@@ -483,7 +513,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_nurbs_1d_scalar"></span> <h3>private pure function compute_Tgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc) result(f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_nurbs_2d_scalar"></span> <h3>private pure function compute_Tgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc) result(f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -504,19 +534,34 @@ <h4>Arguments</h4>
               <span class="anchor" id="variable-f_xt~47"></span>
               real(kind=rk),
             </td>
-<td>intent(in)</td>
+<td>intent(in),</td>
               <td></td>            <td>
-              
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_Xt</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot1~31"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong></td>
+            <td><strong>f_knot1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot~15"></span>
+              <span class="anchor" id="variable-f_knot2~31"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -524,7 +569,7 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot</strong>(:)</td>
+            <td><strong>f_knot2</strong>(:)</td>
             <td>
                 
             </td>
@@ -539,7 +584,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong></td>
+            <td><strong>f_degree</strong>(2)</td>
             <td>
                 
             </td>
@@ -554,7 +599,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong></td>
+            <td><strong>f_nc</strong>(2)</td>
             <td>
                 
             </td>
@@ -587,7 +632,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_nurbs_1d_vector"></span> <h3>private pure function compute_Tgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_tgc_nurbs_2d_vector"></span> <h3>private pure function compute_Tgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc)  
 </h3></div>
     <div class="card-body">
         
@@ -613,14 +658,29 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong>(:)</td>
+            <td><strong>f_Xt</strong>(:,:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot1~29"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot~13"></span>
+              <span class="anchor" id="variable-f_knot2~29"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -628,7 +688,7 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot</strong>(:)</td>
+            <td><strong>f_knot2</strong>(:)</td>
             <td>
                 
             </td>
@@ -643,7 +703,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong></td>
+            <td><strong>f_degree</strong>(2)</td>
             <td>
                 
             </td>
@@ -658,7 +718,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong></td>
+            <td><strong>f_nc</strong>(2)</td>
             <td>
                 
             </td>
@@ -673,7 +733,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong></td>
+            <td><strong>f_ng</strong>(2)</td>
             <td>
                 
             </td>
@@ -724,7 +784,7 @@ <h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/compute_xg.html b/interface/compute_xg.html
index 6b75ccb34..cdb338098 100644
--- a/interface/compute_xg.html
+++ b/interface/compute_xg.html
@@ -82,15 +82,15 @@ <h1>compute_Xg
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">compute_Xg</li>
           </ol>
         </nav>
@@ -127,10 +127,10 @@ <h4 class="card-header bg-primary text-white">Functions</h4>
       </a>
       <div id="funcs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../interface/compute_xg.html#proc-compute_xg_bspline_3d">compute_Xg_bspline_3d</a>
-            <a class="list-group-item" href="../interface/compute_xg.html#proc-compute_xg_bspline_3d_1point">compute_Xg_bspline_3d_1point</a>
-            <a class="list-group-item" href="../interface/compute_xg.html#proc-compute_xg_nurbs_3d">compute_Xg_nurbs_3d</a>
-            <a class="list-group-item" href="../interface/compute_xg.html#proc-compute_xg_nurbs_3d_1point">compute_Xg_nurbs_3d_1point</a>
+            <a class="list-group-item" href="../interface/compute_xg.html#proc-compute_xg_bspline_1d">compute_Xg_bspline_1d</a>
+            <a class="list-group-item" href="../interface/compute_xg.html#proc-compute_xg_bspline_1d_1point">compute_Xg_bspline_1d_1point</a>
+            <a class="list-group-item" href="../interface/compute_xg.html#proc-compute_xg_nurbs_1d">compute_Xg_nurbs_1d</a>
+            <a class="list-group-item" href="../interface/compute_xg.html#proc-compute_xg_nurbs_1d_1point">compute_Xg_nurbs_1d_1point</a>
         </div>
       </div>
     </div>
@@ -163,178 +163,163 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: interface~~compute_xg~~CalledByGraph Pages: 1 -->
-<svg id="interfacecompute_xgCalledByGraph" width="614pt" height="322pt"
- viewBox="0.00 0.00 614.00 322.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~compute_xg~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 318)">
+<svg id="interfacecompute_xgCalledByGraph" width="594pt" height="280pt"
+ viewBox="0.00 0.00 594.00 280.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~compute_xg~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 276)">
 <title>interface~~compute_xg~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-318 610,-318 610,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-276 590,-276 590,4 -4,4"/>
 <!-- interface~compute_xg -->
 <g id="interface~~compute_xg~~CalledByGraph_node1" class="node">
 <title>interface~compute_xg</title>
-<polygon fill="none" stroke="black" points="606,-87 527,-87 527,-63 606,-63 606,-87"/>
-<text text-anchor="middle" x="566.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_Xg</text>
+<polygon fill="none" stroke="black" points="586,-87 507,-87 507,-63 586,-63 586,-87"/>
+<text text-anchor="middle" x="546.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_Xg</text>
 </g>
 <!-- proc~cmp_xg -->
 <g id="interface~~compute_xg~~CalledByGraph_node2" class="node">
 <title>proc~cmp_xg</title>
-<g id="a_interface~~compute_xg~~CalledByGraph_node2"><a xlink:href="../proc/cmp_xg.html" xlink:title="nurbs_volume%cmp_Xg">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="491,-66 351,-66 351,-42 491,-42 491,-66"/>
-<text text-anchor="middle" x="421" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_Xg</text>
+<g id="a_interface~~compute_xg~~CalledByGraph_node2"><a xlink:href="../proc/cmp_xg.html" xlink:title="nurbs_curve%cmp_Xg">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="471,-66 341,-66 341,-42 471,-42 471,-66"/>
+<text text-anchor="middle" x="406" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_xg&#45;&gt;interface~compute_xg -->
 <g id="interface~~compute_xg~~CalledByGraph_edge1" class="edge">
 <title>proc~cmp_xg&#45;&gt;interface~compute_xg</title>
-<path fill="none" stroke="#ff0000" d="M491.23,-64.13C499.79,-65.38 508.41,-66.65 516.58,-67.84"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="516.26,-71.33 526.66,-69.32 517.28,-64.41 516.26,-71.33"/>
+<path fill="none" stroke="#ff0000" d="M471.38,-63.76C479.93,-65.06 488.57,-66.37 496.79,-67.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="496.52,-71.11 506.93,-69.15 497.57,-64.19 496.52,-71.11"/>
 </g>
 <!-- proc~create -->
 <g id="interface~~compute_xg~~CalledByGraph_node3" class="node">
 <title>proc~create</title>
-<g id="a_interface~~compute_xg~~CalledByGraph_node3"><a xlink:href="../proc/create.html" xlink:title="nurbs_volume%create">
-<polygon fill="#d9534f" stroke="#d9534f" points="486.5,-150 355.5,-150 355.5,-126 486.5,-126 486.5,-150"/>
-<text text-anchor="middle" x="421" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
+<g id="a_interface~~compute_xg~~CalledByGraph_node3"><a xlink:href="../proc/create.html" xlink:title="nurbs_curve%create">
+<polygon fill="#d9534f" stroke="#d9534f" points="466.5,-129 345.5,-129 345.5,-105 466.5,-105 466.5,-129"/>
+<text text-anchor="middle" x="406" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%create</text>
 </a>
 </g>
 </g>
 <!-- proc~create&#45;&gt;interface~compute_xg -->
 <g id="interface~~compute_xg~~CalledByGraph_edge2" class="edge">
 <title>proc~create&#45;&gt;interface~compute_xg</title>
-<path fill="none" stroke="#ff0000" d="M449.67,-125.85C472.1,-116 503.92,-102.04 528.53,-91.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="530.17,-94.33 537.92,-87.11 527.35,-87.92 530.17,-94.33"/>
+<path fill="none" stroke="#ff0000" d="M446.69,-104.96C462.31,-100.23 480.4,-94.74 496.81,-89.77"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="498.21,-93 506.76,-86.75 496.18,-86.3 498.21,-93"/>
 </g>
 <!-- proc~nearest_point2 -->
 <g id="interface~~compute_xg~~CalledByGraph_node4" class="node">
 <title>proc~nearest_point2</title>
-<g id="a_interface~~compute_xg~~CalledByGraph_node4"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_volume%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="315,-24 139,-24 139,0 315,0 315,-24"/>
-<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
+<g id="a_interface~~compute_xg~~CalledByGraph_node4"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_curve%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="305,-24 139,-24 139,0 305,0 305,-24"/>
+<text text-anchor="middle" x="222" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2&#45;&gt;proc~cmp_xg -->
 <g id="interface~~compute_xg~~CalledByGraph_edge3" class="edge">
 <title>proc~nearest_point2&#45;&gt;proc~cmp_xg</title>
-<path fill="none" stroke="#ff0000" d="M283.02,-24.04C305.51,-28.96 331.7,-34.69 355.12,-39.81"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="354.46,-43.24 364.97,-41.96 355.95,-36.41 354.46,-43.24"/>
+<path fill="none" stroke="#ff0000" d="M275.15,-24.04C296.29,-28.91 320.86,-34.58 342.91,-39.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="342.31,-43.12 352.84,-41.96 343.88,-36.3 342.31,-43.12"/>
 </g>
 <!-- proc~nearest_point2&#45;&gt;proc~create -->
 <g id="interface~~compute_xg~~CalledByGraph_edge4" class="edge">
 <title>proc~nearest_point2&#45;&gt;proc~create</title>
-<path fill="none" stroke="#00ffff" d="M296.18,-24.01C302.77,-26.47 309.17,-29.43 315,-33 335.97,-45.84 333.89,-57.35 351,-75 366.1,-90.58 384.26,-107.08 398.15,-119.28"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="395.95,-122 405.79,-125.93 400.55,-116.72 395.95,-122"/>
+<path fill="none" stroke="#00ffff" d="M286.42,-24C292.93,-26.46 299.26,-29.43 305,-33 325.88,-45.99 322.54,-58.76 341,-75 351.31,-84.07 363.73,-92.67 374.88,-99.69"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="373.12,-102.72 383.47,-104.96 376.78,-96.75 373.12,-102.72"/>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example1_curve -->
 <g id="interface~~compute_xg~~CalledByGraph_node5" class="node">
-<title>program~example3_volume</title>
-<g id="a_interface~~compute_xg~~CalledByGraph_node5"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="282,-314 172,-314 172,-290 282,-290 282,-314"/>
-<text text-anchor="middle" x="227" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example1_curve</title>
+<g id="a_interface~~compute_xg~~CalledByGraph_node5"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-272 172,-272 172,-248 272,-248 272,-272"/>
+<text text-anchor="middle" x="222" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~create -->
+<!-- program~example1_curve&#45;&gt;proc~create -->
 <g id="interface~~compute_xg~~CalledByGraph_edge5" class="edge">
-<title>program~example3_volume&#45;&gt;proc~create</title>
-<path fill="none" stroke="#00ffff" d="M282.42,-295.03C293.81,-291.93 305.3,-287.46 315,-281 361.51,-250.05 394.82,-191.18 410.29,-159.48"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="413.56,-160.75 414.68,-150.22 407.24,-157.75 413.56,-160.75"/>
+<title>program~example1_curve&#45;&gt;proc~create</title>
+<path fill="none" stroke="#00ffff" d="M272.35,-252.71C283.65,-249.63 295.21,-245.24 305,-239 345.49,-213.19 377.42,-165.51 393.53,-138.02"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="396.64,-139.63 398.55,-129.21 390.56,-136.16 396.64,-139.63"/>
 </g>
-<!-- program~example_nurbs_volume -->
+<!-- program~example_nurbs_curve -->
 <g id="interface~~compute_xg~~CalledByGraph_node6" class="node">
-<title>program~example_nurbs_volume</title>
-<g id="a_interface~~compute_xg~~CalledByGraph_node6"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="296.5,-272 157.5,-272 157.5,-248 296.5,-248 296.5,-272"/>
-<text text-anchor="middle" x="227" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<title>program~example_nurbs_curve</title>
+<g id="a_interface~~compute_xg~~CalledByGraph_node6"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="286.5,-230 157.5,-230 157.5,-206 286.5,-206 286.5,-230"/>
+<text text-anchor="middle" x="222" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~create -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~create -->
 <g id="interface~~compute_xg~~CalledByGraph_edge6" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~create</title>
-<path fill="none" stroke="#00ffff" d="M282,-247.98C293.3,-244.35 304.85,-239.75 315,-234 350.63,-213.81 384.16,-179.5 403.36,-157.83"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="406.07,-160.04 409.99,-150.2 400.78,-155.45 406.07,-160.04"/>
+<title>program~example_nurbs_curve&#45;&gt;proc~create</title>
+<path fill="none" stroke="#00ffff" d="M270.49,-205.92C282.08,-202.17 294.24,-197.54 305,-192 334.72,-176.71 364.87,-152.67 384.18,-135.95"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="386.56,-138.51 391.76,-129.27 381.94,-133.26 386.56,-138.51"/>
 </g>
-<!-- program~nearest_point_3d -->
+<!-- program~nearest_point_1d -->
 <g id="interface~~compute_xg~~CalledByGraph_node7" class="node">
-<title>program~nearest_point_3d</title>
-<g id="a_interface~~compute_xg~~CalledByGraph_node7"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-128 0,-128 0,-104 103,-104 103,-128"/>
-<text text-anchor="middle" x="51.5" y="-113.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
+<title>program~nearest_point_1d</title>
+<g id="a_interface~~compute_xg~~CalledByGraph_node7"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-107 0,-107 0,-83 103,-83 103,-107"/>
+<text text-anchor="middle" x="51.5" y="-92.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~create -->
+<!-- program~nearest_point_1d&#45;&gt;proc~create -->
 <g id="interface~~compute_xg~~CalledByGraph_edge7" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~create</title>
-<path fill="none" stroke="#00ffff" d="M60.24,-128.26C73.52,-148.02 102.75,-186.17 139,-201 211.4,-230.62 239.62,-221.88 315,-201 346.19,-192.36 377.42,-171.71 397.61,-156.4"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="399.82,-159.12 405.55,-150.21 395.51,-153.59 399.82,-159.12"/>
+<title>program~nearest_point_1d&#45;&gt;proc~create</title>
+<path fill="none" stroke="#00ffff" d="M63.67,-107.09C78.93,-122.61 107.95,-148.76 139,-159 209.07,-182.1 232.68,-173.57 305,-159 329.16,-154.13 354.76,-143.26 374,-133.8"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="375.83,-136.8 383.18,-129.16 372.67,-130.55 375.83,-136.8"/>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
-<g id="interface~~compute_xg~~CalledByGraph_edge12" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
-<path fill="none" stroke="#ff0000" d="M61.68,-103.76C76.07,-85.47 105.77,-51.19 139,-33 142.5,-31.08 146.18,-29.34 149.96,-27.75"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="151.42,-30.94 159.53,-24.13 148.94,-24.4 151.42,-30.94"/>
+<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2 -->
+<g id="interface~~compute_xg~~CalledByGraph_edge11" class="edge">
+<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2</title>
+<path fill="none" stroke="#ff0000" d="M65.87,-82.96C82.07,-68.99 110.7,-46.2 139,-33 143.43,-30.94 148.09,-29.05 152.85,-27.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="154.33,-30.54 162.71,-24.06 152.12,-23.89 154.33,-30.54"/>
 </g>
-<!-- program~shape_c_3d -->
+<!-- program~shape_c_1d -->
 <g id="interface~~compute_xg~~CalledByGraph_node8" class="node">
-<title>program~shape_c_3d</title>
-<g id="a_interface~~compute_xg~~CalledByGraph_node8"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="265,-192 189,-192 189,-168 265,-168 265,-192"/>
-<text text-anchor="middle" x="227" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<title>program~shape_c_1d</title>
+<g id="a_interface~~compute_xg~~CalledByGraph_node8"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-150 184,-150 184,-126 260,-126 260,-150"/>
+<text text-anchor="middle" x="222" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~create -->
+<!-- program~shape_c_1d&#45;&gt;proc~create -->
 <g id="interface~~compute_xg~~CalledByGraph_edge8" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~create</title>
-<path fill="none" stroke="#00ffff" d="M265.02,-171.9C290.47,-166.33 324.96,-158.79 354.94,-152.23"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="355.9,-155.61 364.92,-150.05 354.4,-148.77 355.9,-155.61"/>
+<title>program~shape_c_1d&#45;&gt;proc~create</title>
+<path fill="none" stroke="#00ffff" d="M260.27,-133.7C281.84,-131.21 309.7,-128 335.2,-125.05"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="335.68,-128.52 345.21,-123.9 334.88,-121.57 335.68,-128.52"/>
 </g>
-<!-- program~shape_half_ring_3d -->
+<!-- program~shape_circle -->
 <g id="interface~~compute_xg~~CalledByGraph_node9" class="node">
-<title>program~shape_half_ring_3d</title>
-<g id="a_interface~~compute_xg~~CalledByGraph_node9"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="284.5,-150 169.5,-150 169.5,-126 284.5,-126 284.5,-150"/>
-<text text-anchor="middle" x="227" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<title>program~shape_circle</title>
+<g id="a_interface~~compute_xg~~CalledByGraph_node9"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="261.5,-108 182.5,-108 182.5,-84 261.5,-84 261.5,-108"/>
+<text text-anchor="middle" x="222" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~create -->
+<!-- program~shape_circle&#45;&gt;proc~create -->
 <g id="interface~~compute_xg~~CalledByGraph_edge9" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~create</title>
-<path fill="none" stroke="#00ffff" d="M284.57,-138C303.59,-138 325.11,-138 345.3,-138"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="345.41,-141.5 355.41,-138 345.41,-134.5 345.41,-141.5"/>
+<title>program~shape_circle&#45;&gt;proc~create</title>
+<path fill="none" stroke="#00ffff" d="M261.6,-100.45C282.97,-102.92 310.18,-106.06 335.15,-108.94"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="334.98,-112.44 345.32,-110.11 335.79,-105.49 334.98,-112.44"/>
 </g>
-<!-- program~shape_hexahedron -->
+<!-- program~shape_half_circle -->
 <g id="interface~~compute_xg~~CalledByGraph_node10" class="node">
-<title>program~shape_hexahedron</title>
-<g id="a_interface~~compute_xg~~CalledByGraph_node10"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="283.5,-108 170.5,-108 170.5,-84 283.5,-84 283.5,-108"/>
-<text text-anchor="middle" x="227" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
+<title>program~shape_half_circle</title>
+<g id="a_interface~~compute_xg~~CalledByGraph_node10"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-66 170,-66 170,-42 274,-42 274,-66"/>
+<text text-anchor="middle" x="222" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~create -->
+<!-- program~shape_half_circle&#45;&gt;proc~create -->
 <g id="interface~~compute_xg~~CalledByGraph_edge10" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~create</title>
-<path fill="none" stroke="#00ffff" d="M283.02,-108.04C305.51,-112.96 331.7,-118.69 355.12,-123.81"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="354.46,-127.24 364.97,-125.96 355.95,-120.41 354.46,-127.24"/>
-</g>
-<!-- program~shape_ring_3d -->
-<g id="interface~~compute_xg~~CalledByGraph_node11" class="node">
-<title>program~shape_ring_3d</title>
-<g id="a_interface~~compute_xg~~CalledByGraph_node11"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-66 182,-66 182,-42 272,-42 272,-66"/>
-<text text-anchor="middle" x="227" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_ring_3d&#45;&gt;proc~create -->
-<g id="interface~~compute_xg~~CalledByGraph_edge11" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~create</title>
-<path fill="none" stroke="#00ffff" d="M272.19,-61.94C286.16,-65.16 301.48,-69.47 315,-75 343.96,-86.86 374.34,-105.91 394.92,-119.96"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="393.17,-123.01 403.38,-125.83 397.16,-117.26 393.17,-123.01"/>
+<title>program~shape_half_circle&#45;&gt;proc~create</title>
+<path fill="none" stroke="#00ffff" d="M274.08,-65.84C284.4,-68.58 295.11,-71.68 305,-75 326.99,-82.39 350.97,-92.39 369.94,-100.78"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="368.53,-103.99 379.09,-104.88 371.39,-97.6 368.53,-103.99"/>
 </g>
 </g>
 </svg>
@@ -422,7 +407,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
 <br>
         <h2>Functions</h2>
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_bspline_3d"></span> <h3>private pure function compute_Xg_bspline_3d(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Xc) result(f_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_bspline_1d"></span> <h3>private pure function compute_Xg_bspline_1d(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Xc) result(f_Xg)  
 </h3></div>
     <div class="card-body">
         
@@ -448,44 +433,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong>(:,:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot1~2"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot2~2"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot2</strong>(:)</td>
+            <td><strong>f_Xt</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot3~2"></span>
+              <span class="anchor" id="variable-f_knot~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -493,7 +448,7 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot3</strong>(:)</td>
+            <td><strong>f_knot</strong>(:)</td>
             <td>
                 
             </td>
@@ -508,7 +463,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(3)</td>
+            <td><strong>f_degree</strong></td>
             <td>
                 
             </td>
@@ -523,7 +478,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(3)</td>
+            <td><strong>f_nc</strong></td>
             <td>
                 
             </td>
@@ -538,7 +493,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong>(3)</td>
+            <td><strong>f_ng</strong></td>
             <td>
                 
             </td>
@@ -571,7 +526,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_bspline_3d_1point"></span> <h3>private pure function compute_Xg_bspline_3d_1point(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Xc) result(f_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_bspline_1d_1point"></span> <h3>private pure function compute_Xg_bspline_1d_1point(f_Xt, f_knot, f_degree, f_nc, f_Xc) result(f_Xg)  
 </h3></div>
     <div class="card-body">
         
@@ -592,49 +547,19 @@ <h4>Arguments</h4>
               <span class="anchor" id="variable-f_xt~4"></span>
               real(kind=rk),
             </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_Xt</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot1~4"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot2~4"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
+<td>intent(in)</td>
               <td></td>            <td>
-              contiguous
+              
             </td>
             <td>::</td>
-            <td><strong>f_knot2</strong>(:)</td>
+            <td><strong>f_Xt</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot3~4"></span>
+              <span class="anchor" id="variable-f_knot~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -642,7 +567,7 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot3</strong>(:)</td>
+            <td><strong>f_knot</strong>(:)</td>
             <td>
                 
             </td>
@@ -657,7 +582,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(3)</td>
+            <td><strong>f_degree</strong></td>
             <td>
                 
             </td>
@@ -672,7 +597,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(3)</td>
+            <td><strong>f_nc</strong></td>
             <td>
                 
             </td>
@@ -705,7 +630,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_nurbs_3d"></span> <h3>private pure function compute_Xg_nurbs_3d(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_nurbs_1d"></span> <h3>private pure function compute_Xg_nurbs_1d(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg)  
 </h3></div>
     <div class="card-body">
         
@@ -731,44 +656,14 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong>(:,:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot1"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot2"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot2</strong>(:)</td>
+            <td><strong>f_Xt</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot3"></span>
+              <span class="anchor" id="variable-f_knot"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -776,7 +671,7 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot3</strong>(:)</td>
+            <td><strong>f_knot</strong>(:)</td>
             <td>
                 
             </td>
@@ -791,7 +686,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(3)</td>
+            <td><strong>f_degree</strong></td>
             <td>
                 
             </td>
@@ -806,7 +701,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(3)</td>
+            <td><strong>f_nc</strong></td>
             <td>
                 
             </td>
@@ -821,7 +716,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong>(3)</td>
+            <td><strong>f_ng</strong></td>
             <td>
                 
             </td>
@@ -869,7 +764,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_nurbs_3d_1point"></span> <h3>private pure function compute_Xg_nurbs_3d_1point(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_nurbs_1d_1point"></span> <h3>private pure function compute_Xg_nurbs_1d_1point(f_Xt, f_knot, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg)  
 </h3></div>
     <div class="card-body">
         
@@ -890,49 +785,19 @@ <h4>Arguments</h4>
               <span class="anchor" id="variable-f_xt~3"></span>
               real(kind=rk),
             </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_Xt</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot1~3"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>f_knot1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-f_knot2~3"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
+<td>intent(in)</td>
               <td></td>            <td>
-              contiguous
+              
             </td>
             <td>::</td>
-            <td><strong>f_knot2</strong>(:)</td>
+            <td><strong>f_Xt</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot3~3"></span>
+              <span class="anchor" id="variable-f_knot~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -940,7 +805,7 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot3</strong>(:)</td>
+            <td><strong>f_knot</strong>(:)</td>
             <td>
                 
             </td>
@@ -955,7 +820,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(3)</td>
+            <td><strong>f_degree</strong></td>
             <td>
                 
             </td>
@@ -970,7 +835,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(3)</td>
+            <td><strong>f_nc</strong></td>
             <td>
                 
             </td>
@@ -1036,7 +901,7 @@ <h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/compute_xg~2.html b/interface/compute_xg~2.html
index b37043166..130979b92 100644
--- a/interface/compute_xg~2.html
+++ b/interface/compute_xg~2.html
@@ -77,20 +77,20 @@ <h1>compute_Xg
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title="<p> 0.6% of total for procedures.</p>Including implementation: 44 statements,  0.6% of total for procedures.">44 statements</a>
+                 title="<p> 0.6% of total for procedures.</p>Including implementation: 42 statements,  0.6% of total for procedures.">42 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">compute_Xg</li>
           </ol>
         </nav>
@@ -127,10 +127,10 @@ <h4 class="card-header bg-primary text-white">Functions</h4>
       </a>
       <div id="funcs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../interface/compute_xg~2.html#proc-compute_xg_bspline_2d">compute_Xg_bspline_2d</a>
-            <a class="list-group-item" href="../interface/compute_xg~2.html#proc-compute_xg_bspline_2d_1point">compute_Xg_bspline_2d_1point</a>
-            <a class="list-group-item" href="../interface/compute_xg~2.html#proc-compute_xg_nurbs_2d">compute_Xg_nurbs_2d</a>
-            <a class="list-group-item" href="../interface/compute_xg~2.html#proc-compute_xg_nurbs_2d_1point">compute_Xg_nurbs_2d_1point</a>
+            <a class="list-group-item" href="../interface/compute_xg~2.html#proc-compute_xg_bspline_3d">compute_Xg_bspline_3d</a>
+            <a class="list-group-item" href="../interface/compute_xg~2.html#proc-compute_xg_bspline_3d_1point">compute_Xg_bspline_3d_1point</a>
+            <a class="list-group-item" href="../interface/compute_xg~2.html#proc-compute_xg_nurbs_3d">compute_Xg_nurbs_3d</a>
+            <a class="list-group-item" href="../interface/compute_xg~2.html#proc-compute_xg_nurbs_3d_1point">compute_Xg_nurbs_3d_1point</a>
         </div>
       </div>
     </div>
@@ -163,238 +163,178 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: interface~~compute_xg~2~~CalledByGraph Pages: 1 -->
-<svg id="interfacecompute_xg2CalledByGraph" width="614pt" height="490pt"
- viewBox="0.00 0.00 614.00 490.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~compute_xg~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 486)">
+<svg id="interfacecompute_xg2CalledByGraph" width="614pt" height="322pt"
+ viewBox="0.00 0.00 614.00 322.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~compute_xg~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 318)">
 <title>interface~~compute_xg~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-486 610,-486 610,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-318 610,-318 610,4 -4,4"/>
 <!-- interface~compute_xg~2 -->
 <g id="interface~~compute_xg~2~~CalledByGraph_node1" class="node">
 <title>interface~compute_xg~2</title>
-<polygon fill="none" stroke="black" points="606,-129 527,-129 527,-105 606,-105 606,-129"/>
-<text text-anchor="middle" x="566.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_Xg</text>
+<polygon fill="none" stroke="black" points="606,-87 527,-87 527,-63 606,-63 606,-87"/>
+<text text-anchor="middle" x="566.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_Xg</text>
 </g>
 <!-- proc~cmp_xg~2 -->
 <g id="interface~~compute_xg~2~~CalledByGraph_node2" class="node">
 <title>proc~cmp_xg~2</title>
-<g id="a_interface~~compute_xg~2~~CalledByGraph_node2"><a xlink:href="../proc/cmp_xg~2.html" xlink:title="nurbs_surface%cmp_Xg">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="491,-108 351,-108 351,-84 491,-84 491,-108"/>
-<text text-anchor="middle" x="421" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_Xg</text>
+<g id="a_interface~~compute_xg~2~~CalledByGraph_node2"><a xlink:href="../proc/cmp_xg~2.html" xlink:title="nurbs_volume%cmp_Xg">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="491,-66 351,-66 351,-42 491,-42 491,-66"/>
+<text text-anchor="middle" x="421" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_xg~2&#45;&gt;interface~compute_xg~2 -->
 <g id="interface~~compute_xg~2~~CalledByGraph_edge1" class="edge">
 <title>proc~cmp_xg~2&#45;&gt;interface~compute_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M491.23,-106.13C499.79,-107.38 508.41,-108.65 516.58,-109.84"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="516.26,-113.33 526.66,-111.32 517.28,-106.41 516.26,-113.33"/>
+<path fill="none" stroke="#ff0000" d="M491.23,-64.13C499.79,-65.38 508.41,-66.65 516.58,-67.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="516.26,-71.33 526.66,-69.32 517.28,-64.41 516.26,-71.33"/>
 </g>
 <!-- proc~create~2 -->
 <g id="interface~~compute_xg~2~~CalledByGraph_node3" class="node">
 <title>proc~create~2</title>
-<g id="a_interface~~compute_xg~2~~CalledByGraph_node3"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
-<polygon fill="#d9534f" stroke="#d9534f" points="486.5,-234 355.5,-234 355.5,-210 486.5,-210 486.5,-234"/>
-<text text-anchor="middle" x="421" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
+<g id="a_interface~~compute_xg~2~~CalledByGraph_node3"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_volume%create">
+<polygon fill="#d9534f" stroke="#d9534f" points="486.5,-150 355.5,-150 355.5,-126 486.5,-126 486.5,-150"/>
+<text text-anchor="middle" x="421" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
 </a>
 </g>
 </g>
 <!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
 <g id="interface~~compute_xg~2~~CalledByGraph_edge2" class="edge">
 <title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M438.46,-209.96C463.52,-191.62 511.41,-156.58 540.7,-135.15"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="542.79,-137.96 548.79,-129.23 538.65,-132.31 542.79,-137.96"/>
+<path fill="none" stroke="#ff0000" d="M449.67,-125.85C472.1,-116 503.92,-102.04 528.53,-91.23"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="530.17,-94.33 537.92,-87.11 527.35,-87.92 530.17,-94.33"/>
 </g>
 <!-- proc~nearest_point2~2 -->
 <g id="interface~~compute_xg~2~~CalledByGraph_node4" class="node">
 <title>proc~nearest_point2~2</title>
-<g id="a_interface~~compute_xg~2~~CalledByGraph_node4"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_surface%nearest_point2">
+<g id="a_interface~~compute_xg~2~~CalledByGraph_node4"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_volume%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="315,-24 139,-24 139,0 315,0 315,-24"/>
-<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
+<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~2&#45;&gt;proc~cmp_xg~2 -->
 <g id="interface~~compute_xg~2~~CalledByGraph_edge3" class="edge">
 <title>proc~nearest_point2~2&#45;&gt;proc~cmp_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M288.66,-24.13C297.63,-26.64 306.66,-29.59 315,-33 343.96,-44.86 374.34,-63.91 394.92,-77.96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="393.17,-81.01 403.38,-83.83 397.16,-75.26 393.17,-81.01"/>
+<path fill="none" stroke="#ff0000" d="M283.02,-24.04C305.51,-28.96 331.7,-34.69 355.12,-39.81"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="354.46,-43.24 364.97,-41.96 355.95,-36.41 354.46,-43.24"/>
 </g>
 <!-- proc~nearest_point2~2&#45;&gt;proc~create~2 -->
 <g id="interface~~compute_xg~2~~CalledByGraph_edge4" class="edge">
 <title>proc~nearest_point2~2&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#00ffff" d="M301.28,-24.08C306.2,-26.55 310.85,-29.49 315,-33 346.03,-59.21 331.77,-81.22 351,-117 367.46,-147.63 390.18,-180.83 404.97,-201.52"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="402.29,-203.77 410.98,-209.83 407.96,-199.68 402.29,-203.77"/>
+<path fill="none" stroke="#00ffff" d="M296.18,-24.01C302.77,-26.47 309.17,-29.43 315,-33 335.97,-45.84 333.89,-57.35 351,-75 366.1,-90.58 384.26,-107.08 398.15,-119.28"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="395.95,-122 405.79,-125.93 400.55,-116.72 395.95,-122"/>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="interface~~compute_xg~2~~CalledByGraph_node5" class="node">
-<title>program~example3_surface</title>
-<g id="a_interface~~compute_xg~2~~CalledByGraph_node5"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="282,-482 172,-482 172,-458 282,-458 282,-482"/>
-<text text-anchor="middle" x="227" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<title>program~example3_volume</title>
+<g id="a_interface~~compute_xg~2~~CalledByGraph_node5"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="282,-314 172,-314 172,-290 282,-290 282,-314"/>
+<text text-anchor="middle" x="227" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~create~2 -->
+<!-- program~example3_volume&#45;&gt;proc~create~2 -->
 <g id="interface~~compute_xg~2~~CalledByGraph_edge5" class="edge">
-<title>program~example3_surface&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#00ffff" d="M282.1,-464.81C293.89,-461.64 305.63,-456.69 315,-449 381.05,-394.8 407.6,-289.8 416.35,-244.12"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="419.82,-244.56 418.16,-234.1 412.94,-243.31 419.82,-244.56"/>
+<title>program~example3_volume&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#00ffff" d="M282.42,-295.03C293.81,-291.93 305.3,-287.46 315,-281 361.51,-250.05 394.82,-191.18 410.29,-159.48"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="413.56,-160.75 414.68,-150.22 407.24,-157.75 413.56,-160.75"/>
 </g>
-<!-- program~example_nurbs_surface -->
+<!-- program~example_nurbs_volume -->
 <g id="interface~~compute_xg~2~~CalledByGraph_node6" class="node">
-<title>program~example_nurbs_surface</title>
-<g id="a_interface~~compute_xg~2~~CalledByGraph_node6"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="296.5,-440 157.5,-440 157.5,-416 296.5,-416 296.5,-440"/>
-<text text-anchor="middle" x="227" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<title>program~example_nurbs_volume</title>
+<g id="a_interface~~compute_xg~2~~CalledByGraph_node6"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="296.5,-272 157.5,-272 157.5,-248 296.5,-248 296.5,-272"/>
+<text text-anchor="middle" x="227" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~create~2 -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~create~2 -->
 <g id="interface~~compute_xg~2~~CalledByGraph_edge6" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#00ffff" d="M296.94,-417.11C303.39,-414.43 309.54,-411.11 315,-407 371.08,-364.75 401.78,-283.21 413.86,-244.05"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="417.29,-244.78 416.78,-234.2 410.58,-242.79 417.29,-244.78"/>
+<title>program~example_nurbs_volume&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#00ffff" d="M282,-247.98C293.3,-244.35 304.85,-239.75 315,-234 350.63,-213.81 384.16,-179.5 403.36,-157.83"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="406.07,-160.04 409.99,-150.2 400.78,-155.45 406.07,-160.04"/>
 </g>
-<!-- program~example_ppm1 -->
+<!-- program~nearest_point_3d -->
 <g id="interface~~compute_xg~2~~CalledByGraph_node7" class="node">
-<title>program~example_ppm1</title>
-<g id="a_interface~~compute_xg~2~~CalledByGraph_node7"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-398 180,-398 180,-374 274,-374 274,-398"/>
-<text text-anchor="middle" x="227" y="-383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+<title>program~nearest_point_3d</title>
+<g id="a_interface~~compute_xg~2~~CalledByGraph_node7"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-128 0,-128 0,-104 103,-104 103,-128"/>
+<text text-anchor="middle" x="51.5" y="-113.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~create~2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~create~2 -->
 <g id="interface~~compute_xg~2~~CalledByGraph_edge7" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#00ffff" d="M274.27,-381.04C288.2,-377.97 302.97,-373.01 315,-365 361.51,-334.05 394.82,-275.18 410.29,-243.48"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="413.56,-244.75 414.68,-234.22 407.24,-241.75 413.56,-244.75"/>
+<title>program~nearest_point_3d&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#00ffff" d="M60.24,-128.26C73.52,-148.02 102.75,-186.17 139,-201 211.4,-230.62 239.62,-221.88 315,-201 346.19,-192.36 377.42,-171.71 397.61,-156.4"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="399.82,-159.12 405.55,-150.21 395.51,-153.59 399.82,-159.12"/>
 </g>
-<!-- program~example_ppm2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
+<g id="interface~~compute_xg~2~~CalledByGraph_edge12" class="edge">
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
+<path fill="none" stroke="#ff0000" d="M61.68,-103.76C76.07,-85.47 105.77,-51.19 139,-33 142.5,-31.08 146.18,-29.34 149.96,-27.75"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="151.42,-30.94 159.53,-24.13 148.94,-24.4 151.42,-30.94"/>
+</g>
+<!-- program~shape_c_3d -->
 <g id="interface~~compute_xg~2~~CalledByGraph_node8" class="node">
-<title>program~example_ppm2</title>
-<g id="a_interface~~compute_xg~2~~CalledByGraph_node8"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-356 180,-356 180,-332 274,-332 274,-356"/>
-<text text-anchor="middle" x="227" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+<title>program~shape_c_3d</title>
+<g id="a_interface~~compute_xg~2~~CalledByGraph_node8"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="265,-192 189,-192 189,-168 265,-168 265,-192"/>
+<text text-anchor="middle" x="227" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~create~2 -->
+<!-- program~shape_c_3d&#45;&gt;proc~create~2 -->
 <g id="interface~~compute_xg~2~~CalledByGraph_edge8" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#00ffff" d="M274.38,-337.54C288.02,-334.41 302.6,-329.8 315,-323 352.37,-302.52 386.03,-265.25 404.68,-242.16"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="407.61,-244.09 411.06,-234.07 402.12,-239.75 407.61,-244.09"/>
+<title>program~shape_c_3d&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#00ffff" d="M265.02,-171.9C290.47,-166.33 324.96,-158.79 354.94,-152.23"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="355.9,-155.61 364.92,-150.05 354.4,-148.77 355.9,-155.61"/>
 </g>
-<!-- program~example_ppm3 -->
+<!-- program~shape_half_ring_3d -->
 <g id="interface~~compute_xg~2~~CalledByGraph_node9" class="node">
-<title>program~example_ppm3</title>
-<g id="a_interface~~compute_xg~2~~CalledByGraph_node9"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-314 180,-314 180,-290 274,-290 274,-314"/>
-<text text-anchor="middle" x="227" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+<title>program~shape_half_ring_3d</title>
+<g id="a_interface~~compute_xg~2~~CalledByGraph_node9"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="284.5,-150 169.5,-150 169.5,-126 284.5,-126 284.5,-150"/>
+<text text-anchor="middle" x="227" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~create~2 -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~create~2 -->
 <g id="interface~~compute_xg~2~~CalledByGraph_edge9" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#00ffff" d="M274.15,-289.93C287.5,-285.98 301.98,-281.24 315,-276 341.22,-265.45 369.65,-250.6 390.31,-239.14"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="392.21,-242.09 399.22,-234.14 388.79,-235.98 392.21,-242.09"/>
+<title>program~shape_half_ring_3d&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#00ffff" d="M284.57,-138C303.59,-138 325.11,-138 345.3,-138"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="345.41,-141.5 355.41,-138 345.41,-134.5 345.41,-141.5"/>
 </g>
-<!-- program~nearest_point_2d -->
+<!-- program~shape_hexahedron -->
 <g id="interface~~compute_xg~2~~CalledByGraph_node10" class="node">
-<title>program~nearest_point_2d</title>
-<g id="a_interface~~compute_xg~2~~CalledByGraph_node10"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-149 0,-149 0,-125 103,-125 103,-149"/>
-<text text-anchor="middle" x="51.5" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<title>program~shape_hexahedron</title>
+<g id="a_interface~~compute_xg~2~~CalledByGraph_node10"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="283.5,-108 170.5,-108 170.5,-84 283.5,-84 283.5,-108"/>
+<text text-anchor="middle" x="227" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~create~2 -->
+<!-- program~shape_hexahedron&#45;&gt;proc~create~2 -->
 <g id="interface~~compute_xg~2~~CalledByGraph_edge10" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#00ffff" d="M57.94,-149.16C69.16,-172.56 97.37,-223.24 139,-243 217.38,-280.2 322.02,-255.78 378.92,-237.26"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="380.27,-240.5 388.64,-234.01 378.05,-233.87 380.27,-240.5"/>
-</g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
-<g id="interface~~compute_xg~2~~CalledByGraph_edge16" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
-<path fill="none" stroke="#ff0000" d="M59.03,-124.88C71.51,-102.93 100.92,-56.71 139,-33 141.84,-31.23 144.81,-29.62 147.88,-28.14"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="149.51,-31.24 157.32,-24.09 146.75,-24.81 149.51,-31.24"/>
+<title>program~shape_hexahedron&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#00ffff" d="M283.02,-108.04C305.51,-112.96 331.7,-118.69 355.12,-123.81"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="354.46,-127.24 364.97,-125.96 355.95,-120.41 354.46,-127.24"/>
 </g>
-<!-- program~nearest_point_2d_bench -->
+<!-- program~shape_ring_3d -->
 <g id="interface~~compute_xg~2~~CalledByGraph_node11" class="node">
-<title>program~nearest_point_2d_bench</title>
-<g id="a_interface~~compute_xg~2~~CalledByGraph_node11"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="298,-234 156,-234 156,-210 298,-210 298,-234"/>
-<text text-anchor="middle" x="227" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+<title>program~shape_ring_3d</title>
+<g id="a_interface~~compute_xg~2~~CalledByGraph_node11"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-66 182,-66 182,-42 272,-42 272,-66"/>
+<text text-anchor="middle" x="227" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~create~2 -->
+<!-- program~shape_ring_3d&#45;&gt;proc~create~2 -->
 <g id="interface~~compute_xg~2~~CalledByGraph_edge11" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#00ffff" d="M298.13,-222C313.51,-222 329.84,-222 345.39,-222"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="345.48,-225.5 355.48,-222 345.48,-218.5 345.48,-225.5"/>
-</g>
-<!-- program~shape_c_2d -->
-<g id="interface~~compute_xg~2~~CalledByGraph_node12" class="node">
-<title>program~shape_c_2d</title>
-<g id="a_interface~~compute_xg~2~~CalledByGraph_node12"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="265,-192 189,-192 189,-168 265,-168 265,-192"/>
-<text text-anchor="middle" x="227" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_c_2d&#45;&gt;proc~create~2 -->
-<g id="interface~~compute_xg~2~~CalledByGraph_edge12" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#00ffff" d="M265.02,-188.1C290.47,-193.67 324.96,-201.21 354.94,-207.77"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="354.4,-211.23 364.92,-209.95 355.9,-204.39 354.4,-211.23"/>
-</g>
-<!-- program~shape_half_ring_2d -->
-<g id="interface~~compute_xg~2~~CalledByGraph_node13" class="node">
-<title>program~shape_half_ring_2d</title>
-<g id="a_interface~~compute_xg~2~~CalledByGraph_node13"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="284.5,-150 169.5,-150 169.5,-126 284.5,-126 284.5,-150"/>
-<text text-anchor="middle" x="227" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~create~2 -->
-<g id="interface~~compute_xg~2~~CalledByGraph_edge13" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#00ffff" d="M284.95,-149.11C295.13,-151.84 305.51,-155.11 315,-159 343.96,-170.86 374.34,-189.91 394.92,-203.96"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="393.17,-207.01 403.38,-209.83 397.16,-201.26 393.17,-207.01"/>
-</g>
-<!-- program~shape_ring_2d -->
-<g id="interface~~compute_xg~2~~CalledByGraph_node14" class="node">
-<title>program~shape_ring_2d</title>
-<g id="a_interface~~compute_xg~2~~CalledByGraph_node14"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-108 182,-108 182,-84 272,-84 272,-108"/>
-<text text-anchor="middle" x="227" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_ring_2d&#45;&gt;proc~create~2 -->
-<g id="interface~~compute_xg~2~~CalledByGraph_edge14" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#00ffff" d="M272.23,-101.8C286.5,-104.93 301.99,-109.7 315,-117 353.25,-138.45 387.03,-177.76 405.39,-201.72"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="402.64,-203.88 411.44,-209.79 408.24,-199.69 402.64,-203.88"/>
-</g>
-<!-- program~shape_tetragon -->
-<g id="interface~~compute_xg~2~~CalledByGraph_node15" class="node">
-<title>program~shape_tetragon</title>
-<g id="a_interface~~compute_xg~2~~CalledByGraph_node15"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="275,-66 179,-66 179,-42 275,-42 275,-66"/>
-<text text-anchor="middle" x="227" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
-</a>
-</g>
-</g>
-<!-- program~shape_tetragon&#45;&gt;proc~create~2 -->
-<g id="interface~~compute_xg~2~~CalledByGraph_edge15" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#00ffff" d="M275.23,-59.07C288.9,-62.15 303.28,-67.09 315,-75 327.57,-83.49 381.12,-163.12 406.52,-201.5"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="403.63,-203.46 412.06,-209.88 409.47,-199.61 403.63,-203.46"/>
+<title>program~shape_ring_3d&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#00ffff" d="M272.19,-61.94C286.16,-65.16 301.48,-69.47 315,-75 343.96,-86.86 374.34,-105.91 394.92,-119.96"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="393.17,-123.01 403.38,-125.83 397.16,-117.26 393.17,-123.01"/>
 </g>
 </g>
 </svg>
@@ -482,7 +422,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
 <br>
         <h2>Functions</h2>
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_bspline_2d"></span> <h3>private pure function compute_Xg_bspline_2d(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Xc) result(f_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_bspline_3d"></span> <h3>private pure function compute_Xg_bspline_3d(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Xc) result(f_Xg)  
 </h3></div>
     <div class="card-body">
         
@@ -515,7 +455,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot1~18"></span>
+              <span class="anchor" id="variable-f_knot1~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -530,7 +470,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot2~18"></span>
+              <span class="anchor" id="variable-f_knot2~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -543,6 +483,21 @@ <h4>Arguments</h4>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot3~2"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-f_degree~18"></span>
@@ -553,7 +508,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(2)</td>
+            <td><strong>f_degree</strong>(3)</td>
             <td>
                 
             </td>
@@ -568,7 +523,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(2)</td>
+            <td><strong>f_nc</strong>(3)</td>
             <td>
                 
             </td>
@@ -583,7 +538,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong>(2)</td>
+            <td><strong>f_ng</strong>(3)</td>
             <td>
                 
             </td>
@@ -616,7 +571,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_bspline_2d_1point"></span> <h3>private pure function compute_Xg_bspline_2d_1point(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Xc) result(f_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_bspline_3d_1point"></span> <h3>private pure function compute_Xg_bspline_3d_1point(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Xc) result(f_Xg)  
 </h3></div>
     <div class="card-body">
         
@@ -649,7 +604,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot1~20"></span>
+              <span class="anchor" id="variable-f_knot1~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -664,7 +619,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot2~20"></span>
+              <span class="anchor" id="variable-f_knot2~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -677,6 +632,21 @@ <h4>Arguments</h4>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot3~4"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-f_degree~20"></span>
@@ -687,7 +657,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(2)</td>
+            <td><strong>f_degree</strong>(3)</td>
             <td>
                 
             </td>
@@ -702,7 +672,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(2)</td>
+            <td><strong>f_nc</strong>(3)</td>
             <td>
                 
             </td>
@@ -735,7 +705,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_nurbs_2d"></span> <h3>private pure function compute_Xg_nurbs_2d(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_nurbs_3d"></span> <h3>private pure function compute_Xg_nurbs_3d(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg)  
 </h3></div>
     <div class="card-body">
         
@@ -768,7 +738,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot1~17"></span>
+              <span class="anchor" id="variable-f_knot1"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -783,7 +753,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot2~17"></span>
+              <span class="anchor" id="variable-f_knot2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -796,6 +766,21 @@ <h4>Arguments</h4>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot3"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-f_degree~17"></span>
@@ -806,7 +791,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(2)</td>
+            <td><strong>f_degree</strong>(3)</td>
             <td>
                 
             </td>
@@ -821,7 +806,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(2)</td>
+            <td><strong>f_nc</strong>(3)</td>
             <td>
                 
             </td>
@@ -836,7 +821,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong>(2)</td>
+            <td><strong>f_ng</strong>(3)</td>
             <td>
                 
             </td>
@@ -884,7 +869,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_nurbs_2d_1point"></span> <h3>private pure function compute_Xg_nurbs_2d_1point(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_nurbs_3d_1point"></span> <h3>private pure function compute_Xg_nurbs_3d_1point(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg)  
 </h3></div>
     <div class="card-body">
         
@@ -917,7 +902,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot1~19"></span>
+              <span class="anchor" id="variable-f_knot1~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -932,7 +917,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot2~19"></span>
+              <span class="anchor" id="variable-f_knot2~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -945,6 +930,21 @@ <h4>Arguments</h4>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot3~3"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-f_degree~19"></span>
@@ -955,7 +955,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong>(2)</td>
+            <td><strong>f_degree</strong>(3)</td>
             <td>
                 
             </td>
@@ -970,7 +970,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong>(2)</td>
+            <td><strong>f_nc</strong>(3)</td>
             <td>
                 
             </td>
@@ -1036,7 +1036,7 @@ <h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/compute_xg~3.html b/interface/compute_xg~3.html
index 72bae2ae6..8b75dbbdb 100644
--- a/interface/compute_xg~3.html
+++ b/interface/compute_xg~3.html
@@ -77,20 +77,20 @@ <h1>compute_Xg
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title="<p> 0.6% of total for procedures.</p>Including implementation: 42 statements,  0.6% of total for procedures.">42 statements</a>
+                 title="<p> 0.6% of total for procedures.</p>Including implementation: 44 statements,  0.6% of total for procedures.">44 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">compute_Xg</li>
           </ol>
         </nav>
@@ -127,10 +127,10 @@ <h4 class="card-header bg-primary text-white">Functions</h4>
       </a>
       <div id="funcs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../interface/compute_xg~3.html#proc-compute_xg_bspline_1d">compute_Xg_bspline_1d</a>
-            <a class="list-group-item" href="../interface/compute_xg~3.html#proc-compute_xg_bspline_1d_1point">compute_Xg_bspline_1d_1point</a>
-            <a class="list-group-item" href="../interface/compute_xg~3.html#proc-compute_xg_nurbs_1d">compute_Xg_nurbs_1d</a>
-            <a class="list-group-item" href="../interface/compute_xg~3.html#proc-compute_xg_nurbs_1d_1point">compute_Xg_nurbs_1d_1point</a>
+            <a class="list-group-item" href="../interface/compute_xg~3.html#proc-compute_xg_bspline_2d">compute_Xg_bspline_2d</a>
+            <a class="list-group-item" href="../interface/compute_xg~3.html#proc-compute_xg_bspline_2d_1point">compute_Xg_bspline_2d_1point</a>
+            <a class="list-group-item" href="../interface/compute_xg~3.html#proc-compute_xg_nurbs_2d">compute_Xg_nurbs_2d</a>
+            <a class="list-group-item" href="../interface/compute_xg~3.html#proc-compute_xg_nurbs_2d_1point">compute_Xg_nurbs_2d_1point</a>
         </div>
       </div>
     </div>
@@ -163,163 +163,238 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: interface~~compute_xg~3~~CalledByGraph Pages: 1 -->
-<svg id="interfacecompute_xg3CalledByGraph" width="594pt" height="280pt"
- viewBox="0.00 0.00 594.00 280.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~compute_xg~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 276)">
+<svg id="interfacecompute_xg3CalledByGraph" width="614pt" height="490pt"
+ viewBox="0.00 0.00 614.00 490.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~compute_xg~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 486)">
 <title>interface~~compute_xg~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-276 590,-276 590,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-486 610,-486 610,4 -4,4"/>
 <!-- interface~compute_xg~3 -->
 <g id="interface~~compute_xg~3~~CalledByGraph_node1" class="node">
 <title>interface~compute_xg~3</title>
-<polygon fill="none" stroke="black" points="586,-87 507,-87 507,-63 586,-63 586,-87"/>
-<text text-anchor="middle" x="546.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_Xg</text>
+<polygon fill="none" stroke="black" points="606,-129 527,-129 527,-105 606,-105 606,-129"/>
+<text text-anchor="middle" x="566.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_Xg</text>
 </g>
 <!-- proc~cmp_xg~3 -->
 <g id="interface~~compute_xg~3~~CalledByGraph_node2" class="node">
 <title>proc~cmp_xg~3</title>
-<g id="a_interface~~compute_xg~3~~CalledByGraph_node2"><a xlink:href="../proc/cmp_xg~3.html" xlink:title="nurbs_curve%cmp_Xg">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="471,-66 341,-66 341,-42 471,-42 471,-66"/>
-<text text-anchor="middle" x="406" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_Xg</text>
+<g id="a_interface~~compute_xg~3~~CalledByGraph_node2"><a xlink:href="../proc/cmp_xg~3.html" xlink:title="nurbs_surface%cmp_Xg">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="491,-108 351,-108 351,-84 491,-84 491,-108"/>
+<text text-anchor="middle" x="421" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_xg~3&#45;&gt;interface~compute_xg~3 -->
 <g id="interface~~compute_xg~3~~CalledByGraph_edge1" class="edge">
 <title>proc~cmp_xg~3&#45;&gt;interface~compute_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M471.38,-63.76C479.93,-65.06 488.57,-66.37 496.79,-67.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="496.52,-71.11 506.93,-69.15 497.57,-64.19 496.52,-71.11"/>
+<path fill="none" stroke="#ff0000" d="M491.23,-106.13C499.79,-107.38 508.41,-108.65 516.58,-109.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="516.26,-113.33 526.66,-111.32 517.28,-106.41 516.26,-113.33"/>
 </g>
 <!-- proc~create~3 -->
 <g id="interface~~compute_xg~3~~CalledByGraph_node3" class="node">
 <title>proc~create~3</title>
-<g id="a_interface~~compute_xg~3~~CalledByGraph_node3"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_curve%create">
-<polygon fill="#d9534f" stroke="#d9534f" points="466.5,-129 345.5,-129 345.5,-105 466.5,-105 466.5,-129"/>
-<text text-anchor="middle" x="406" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%create</text>
+<g id="a_interface~~compute_xg~3~~CalledByGraph_node3"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
+<polygon fill="#d9534f" stroke="#d9534f" points="486.5,-234 355.5,-234 355.5,-210 486.5,-210 486.5,-234"/>
+<text text-anchor="middle" x="421" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
 <!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
 <g id="interface~~compute_xg~3~~CalledByGraph_edge2" class="edge">
 <title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M446.69,-104.96C462.31,-100.23 480.4,-94.74 496.81,-89.77"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="498.21,-93 506.76,-86.75 496.18,-86.3 498.21,-93"/>
+<path fill="none" stroke="#ff0000" d="M438.46,-209.96C463.52,-191.62 511.41,-156.58 540.7,-135.15"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="542.79,-137.96 548.79,-129.23 538.65,-132.31 542.79,-137.96"/>
 </g>
 <!-- proc~nearest_point2~3 -->
 <g id="interface~~compute_xg~3~~CalledByGraph_node4" class="node">
 <title>proc~nearest_point2~3</title>
-<g id="a_interface~~compute_xg~3~~CalledByGraph_node4"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_curve%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="305,-24 139,-24 139,0 305,0 305,-24"/>
-<text text-anchor="middle" x="222" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
+<g id="a_interface~~compute_xg~3~~CalledByGraph_node4"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_surface%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="315,-24 139,-24 139,0 315,0 315,-24"/>
+<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;proc~cmp_xg~3 -->
 <g id="interface~~compute_xg~3~~CalledByGraph_edge3" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;proc~cmp_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M275.15,-24.04C296.29,-28.91 320.86,-34.58 342.91,-39.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="342.31,-43.12 352.84,-41.96 343.88,-36.3 342.31,-43.12"/>
+<path fill="none" stroke="#ff0000" d="M288.66,-24.13C297.63,-26.64 306.66,-29.59 315,-33 343.96,-44.86 374.34,-63.91 394.92,-77.96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="393.17,-81.01 403.38,-83.83 397.16,-75.26 393.17,-81.01"/>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;proc~create~3 -->
 <g id="interface~~compute_xg~3~~CalledByGraph_edge4" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#00ffff" d="M286.42,-24C292.93,-26.46 299.26,-29.43 305,-33 325.88,-45.99 322.54,-58.76 341,-75 351.31,-84.07 363.73,-92.67 374.88,-99.69"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="373.12,-102.72 383.47,-104.96 376.78,-96.75 373.12,-102.72"/>
+<path fill="none" stroke="#00ffff" d="M301.28,-24.08C306.2,-26.55 310.85,-29.49 315,-33 346.03,-59.21 331.77,-81.22 351,-117 367.46,-147.63 390.18,-180.83 404.97,-201.52"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="402.29,-203.77 410.98,-209.83 407.96,-199.68 402.29,-203.77"/>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="interface~~compute_xg~3~~CalledByGraph_node5" class="node">
-<title>program~example1_curve</title>
-<g id="a_interface~~compute_xg~3~~CalledByGraph_node5"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-272 172,-272 172,-248 272,-248 272,-272"/>
-<text text-anchor="middle" x="222" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_interface~~compute_xg~3~~CalledByGraph_node5"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="282,-482 172,-482 172,-458 282,-458 282,-482"/>
+<text text-anchor="middle" x="227" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~create~3 -->
+<!-- program~example3_surface&#45;&gt;proc~create~3 -->
 <g id="interface~~compute_xg~3~~CalledByGraph_edge5" class="edge">
-<title>program~example1_curve&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#00ffff" d="M272.35,-252.71C283.65,-249.63 295.21,-245.24 305,-239 345.49,-213.19 377.42,-165.51 393.53,-138.02"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="396.64,-139.63 398.55,-129.21 390.56,-136.16 396.64,-139.63"/>
+<title>program~example3_surface&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#00ffff" d="M282.1,-464.81C293.89,-461.64 305.63,-456.69 315,-449 381.05,-394.8 407.6,-289.8 416.35,-244.12"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="419.82,-244.56 418.16,-234.1 412.94,-243.31 419.82,-244.56"/>
 </g>
-<!-- program~example_nurbs_curve -->
+<!-- program~example_nurbs_surface -->
 <g id="interface~~compute_xg~3~~CalledByGraph_node6" class="node">
-<title>program~example_nurbs_curve</title>
-<g id="a_interface~~compute_xg~3~~CalledByGraph_node6"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="286.5,-230 157.5,-230 157.5,-206 286.5,-206 286.5,-230"/>
-<text text-anchor="middle" x="222" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<title>program~example_nurbs_surface</title>
+<g id="a_interface~~compute_xg~3~~CalledByGraph_node6"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="296.5,-440 157.5,-440 157.5,-416 296.5,-416 296.5,-440"/>
+<text text-anchor="middle" x="227" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~create~3 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~create~3 -->
 <g id="interface~~compute_xg~3~~CalledByGraph_edge6" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#00ffff" d="M270.49,-205.92C282.08,-202.17 294.24,-197.54 305,-192 334.72,-176.71 364.87,-152.67 384.18,-135.95"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="386.56,-138.51 391.76,-129.27 381.94,-133.26 386.56,-138.51"/>
+<title>program~example_nurbs_surface&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#00ffff" d="M296.94,-417.11C303.39,-414.43 309.54,-411.11 315,-407 371.08,-364.75 401.78,-283.21 413.86,-244.05"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="417.29,-244.78 416.78,-234.2 410.58,-242.79 417.29,-244.78"/>
 </g>
-<!-- program~nearest_point_1d -->
+<!-- program~example_ppm1 -->
 <g id="interface~~compute_xg~3~~CalledByGraph_node7" class="node">
-<title>program~nearest_point_1d</title>
-<g id="a_interface~~compute_xg~3~~CalledByGraph_node7"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-107 0,-107 0,-83 103,-83 103,-107"/>
-<text text-anchor="middle" x="51.5" y="-92.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<title>program~example_ppm1</title>
+<g id="a_interface~~compute_xg~3~~CalledByGraph_node7"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-398 180,-398 180,-374 274,-374 274,-398"/>
+<text text-anchor="middle" x="227" y="-383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~create~3 -->
+<!-- program~example_ppm1&#45;&gt;proc~create~3 -->
 <g id="interface~~compute_xg~3~~CalledByGraph_edge7" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#00ffff" d="M63.67,-107.09C78.93,-122.61 107.95,-148.76 139,-159 209.07,-182.1 232.68,-173.57 305,-159 329.16,-154.13 354.76,-143.26 374,-133.8"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="375.83,-136.8 383.18,-129.16 372.67,-130.55 375.83,-136.8"/>
+<title>program~example_ppm1&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#00ffff" d="M274.27,-381.04C288.2,-377.97 302.97,-373.01 315,-365 361.51,-334.05 394.82,-275.18 410.29,-243.48"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="413.56,-244.75 414.68,-234.22 407.24,-241.75 413.56,-244.75"/>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2~3 -->
-<g id="interface~~compute_xg~3~~CalledByGraph_edge11" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2~3</title>
-<path fill="none" stroke="#ff0000" d="M65.87,-82.96C82.07,-68.99 110.7,-46.2 139,-33 143.43,-30.94 148.09,-29.05 152.85,-27.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="154.33,-30.54 162.71,-24.06 152.12,-23.89 154.33,-30.54"/>
-</g>
-<!-- program~shape_c_1d -->
+<!-- program~example_ppm2 -->
 <g id="interface~~compute_xg~3~~CalledByGraph_node8" class="node">
-<title>program~shape_c_1d</title>
-<g id="a_interface~~compute_xg~3~~CalledByGraph_node8"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-150 184,-150 184,-126 260,-126 260,-150"/>
-<text text-anchor="middle" x="222" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<title>program~example_ppm2</title>
+<g id="a_interface~~compute_xg~3~~CalledByGraph_node8"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-356 180,-356 180,-332 274,-332 274,-356"/>
+<text text-anchor="middle" x="227" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~create~3 -->
+<!-- program~example_ppm2&#45;&gt;proc~create~3 -->
 <g id="interface~~compute_xg~3~~CalledByGraph_edge8" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#00ffff" d="M260.27,-133.7C281.84,-131.21 309.7,-128 335.2,-125.05"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="335.68,-128.52 345.21,-123.9 334.88,-121.57 335.68,-128.52"/>
+<title>program~example_ppm2&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#00ffff" d="M274.38,-337.54C288.02,-334.41 302.6,-329.8 315,-323 352.37,-302.52 386.03,-265.25 404.68,-242.16"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="407.61,-244.09 411.06,-234.07 402.12,-239.75 407.61,-244.09"/>
 </g>
-<!-- program~shape_circle -->
+<!-- program~example_ppm3 -->
 <g id="interface~~compute_xg~3~~CalledByGraph_node9" class="node">
-<title>program~shape_circle</title>
-<g id="a_interface~~compute_xg~3~~CalledByGraph_node9"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="261.5,-108 182.5,-108 182.5,-84 261.5,-84 261.5,-108"/>
-<text text-anchor="middle" x="222" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<title>program~example_ppm3</title>
+<g id="a_interface~~compute_xg~3~~CalledByGraph_node9"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-314 180,-314 180,-290 274,-290 274,-314"/>
+<text text-anchor="middle" x="227" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~create~3 -->
+<!-- program~example_ppm3&#45;&gt;proc~create~3 -->
 <g id="interface~~compute_xg~3~~CalledByGraph_edge9" class="edge">
-<title>program~shape_circle&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#00ffff" d="M261.6,-100.45C282.97,-102.92 310.18,-106.06 335.15,-108.94"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="334.98,-112.44 345.32,-110.11 335.79,-105.49 334.98,-112.44"/>
+<title>program~example_ppm3&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#00ffff" d="M274.15,-289.93C287.5,-285.98 301.98,-281.24 315,-276 341.22,-265.45 369.65,-250.6 390.31,-239.14"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="392.21,-242.09 399.22,-234.14 388.79,-235.98 392.21,-242.09"/>
 </g>
-<!-- program~shape_half_circle -->
+<!-- program~nearest_point_2d -->
 <g id="interface~~compute_xg~3~~CalledByGraph_node10" class="node">
-<title>program~shape_half_circle</title>
-<g id="a_interface~~compute_xg~3~~CalledByGraph_node10"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-66 170,-66 170,-42 274,-42 274,-66"/>
-<text text-anchor="middle" x="222" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<title>program~nearest_point_2d</title>
+<g id="a_interface~~compute_xg~3~~CalledByGraph_node10"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-149 0,-149 0,-125 103,-125 103,-149"/>
+<text text-anchor="middle" x="51.5" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~create~3 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~create~3 -->
 <g id="interface~~compute_xg~3~~CalledByGraph_edge10" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#00ffff" d="M274.08,-65.84C284.4,-68.58 295.11,-71.68 305,-75 326.99,-82.39 350.97,-92.39 369.94,-100.78"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="368.53,-103.99 379.09,-104.88 371.39,-97.6 368.53,-103.99"/>
+<title>program~nearest_point_2d&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#00ffff" d="M57.94,-149.16C69.16,-172.56 97.37,-223.24 139,-243 217.38,-280.2 322.02,-255.78 378.92,-237.26"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="380.27,-240.5 388.64,-234.01 378.05,-233.87 380.27,-240.5"/>
+</g>
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
+<g id="interface~~compute_xg~3~~CalledByGraph_edge16" class="edge">
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
+<path fill="none" stroke="#ff0000" d="M59.03,-124.88C71.51,-102.93 100.92,-56.71 139,-33 141.84,-31.23 144.81,-29.62 147.88,-28.14"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="149.51,-31.24 157.32,-24.09 146.75,-24.81 149.51,-31.24"/>
+</g>
+<!-- program~nearest_point_2d_bench -->
+<g id="interface~~compute_xg~3~~CalledByGraph_node11" class="node">
+<title>program~nearest_point_2d_bench</title>
+<g id="a_interface~~compute_xg~3~~CalledByGraph_node11"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="298,-234 156,-234 156,-210 298,-210 298,-234"/>
+<text text-anchor="middle" x="227" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+</a>
+</g>
+</g>
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~create~3 -->
+<g id="interface~~compute_xg~3~~CalledByGraph_edge11" class="edge">
+<title>program~nearest_point_2d_bench&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#00ffff" d="M298.13,-222C313.51,-222 329.84,-222 345.39,-222"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="345.48,-225.5 355.48,-222 345.48,-218.5 345.48,-225.5"/>
+</g>
+<!-- program~shape_c_2d -->
+<g id="interface~~compute_xg~3~~CalledByGraph_node12" class="node">
+<title>program~shape_c_2d</title>
+<g id="a_interface~~compute_xg~3~~CalledByGraph_node12"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="265,-192 189,-192 189,-168 265,-168 265,-192"/>
+<text text-anchor="middle" x="227" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_c_2d&#45;&gt;proc~create~3 -->
+<g id="interface~~compute_xg~3~~CalledByGraph_edge12" class="edge">
+<title>program~shape_c_2d&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#00ffff" d="M265.02,-188.1C290.47,-193.67 324.96,-201.21 354.94,-207.77"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="354.4,-211.23 364.92,-209.95 355.9,-204.39 354.4,-211.23"/>
+</g>
+<!-- program~shape_half_ring_2d -->
+<g id="interface~~compute_xg~3~~CalledByGraph_node13" class="node">
+<title>program~shape_half_ring_2d</title>
+<g id="a_interface~~compute_xg~3~~CalledByGraph_node13"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="284.5,-150 169.5,-150 169.5,-126 284.5,-126 284.5,-150"/>
+<text text-anchor="middle" x="227" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~create~3 -->
+<g id="interface~~compute_xg~3~~CalledByGraph_edge13" class="edge">
+<title>program~shape_half_ring_2d&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#00ffff" d="M284.95,-149.11C295.13,-151.84 305.51,-155.11 315,-159 343.96,-170.86 374.34,-189.91 394.92,-203.96"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="393.17,-207.01 403.38,-209.83 397.16,-201.26 393.17,-207.01"/>
+</g>
+<!-- program~shape_ring_2d -->
+<g id="interface~~compute_xg~3~~CalledByGraph_node14" class="node">
+<title>program~shape_ring_2d</title>
+<g id="a_interface~~compute_xg~3~~CalledByGraph_node14"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-108 182,-108 182,-84 272,-84 272,-108"/>
+<text text-anchor="middle" x="227" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_ring_2d&#45;&gt;proc~create~3 -->
+<g id="interface~~compute_xg~3~~CalledByGraph_edge14" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#00ffff" d="M272.23,-101.8C286.5,-104.93 301.99,-109.7 315,-117 353.25,-138.45 387.03,-177.76 405.39,-201.72"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="402.64,-203.88 411.44,-209.79 408.24,-199.69 402.64,-203.88"/>
+</g>
+<!-- program~shape_tetragon -->
+<g id="interface~~compute_xg~3~~CalledByGraph_node15" class="node">
+<title>program~shape_tetragon</title>
+<g id="a_interface~~compute_xg~3~~CalledByGraph_node15"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="275,-66 179,-66 179,-42 275,-42 275,-66"/>
+<text text-anchor="middle" x="227" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+</a>
+</g>
+</g>
+<!-- program~shape_tetragon&#45;&gt;proc~create~3 -->
+<g id="interface~~compute_xg~3~~CalledByGraph_edge15" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#00ffff" d="M275.23,-59.07C288.9,-62.15 303.28,-67.09 315,-75 327.57,-83.49 381.12,-163.12 406.52,-201.5"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="403.63,-203.46 412.06,-209.88 409.47,-199.61 403.63,-203.46"/>
 </g>
 </g>
 </svg>
@@ -407,7 +482,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
 <br>
         <h2>Functions</h2>
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_bspline_1d"></span> <h3>private pure function compute_Xg_bspline_1d(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Xc) result(f_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_bspline_2d"></span> <h3>private pure function compute_Xg_bspline_2d(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Xc) result(f_Xg)  
 </h3></div>
     <div class="card-body">
         
@@ -433,14 +508,29 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong>(:)</td>
+            <td><strong>f_Xt</strong>(:,:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot1~18"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot~2"></span>
+              <span class="anchor" id="variable-f_knot2~18"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -448,7 +538,7 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot</strong>(:)</td>
+            <td><strong>f_knot2</strong>(:)</td>
             <td>
                 
             </td>
@@ -463,14 +553,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong></td>
+            <td><strong>f_degree</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~30"></span>
+              <span class="anchor" id="variable-f_nc~34"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -478,7 +568,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong></td>
+            <td><strong>f_nc</strong>(2)</td>
             <td>
                 
             </td>
@@ -493,7 +583,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong></td>
+            <td><strong>f_ng</strong>(2)</td>
             <td>
                 
             </td>
@@ -526,7 +616,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_bspline_1d_1point"></span> <h3>private pure function compute_Xg_bspline_1d_1point(f_Xt, f_knot, f_degree, f_nc, f_Xc) result(f_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_bspline_2d_1point"></span> <h3>private pure function compute_Xg_bspline_2d_1point(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Xc) result(f_Xg)  
 </h3></div>
     <div class="card-body">
         
@@ -547,19 +637,34 @@ <h4>Arguments</h4>
               <span class="anchor" id="variable-f_xt~36"></span>
               real(kind=rk),
             </td>
-<td>intent(in)</td>
+<td>intent(in),</td>
               <td></td>            <td>
-              
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_Xt</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot1~20"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong></td>
+            <td><strong>f_knot1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot~4"></span>
+              <span class="anchor" id="variable-f_knot2~20"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -567,7 +672,7 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot</strong>(:)</td>
+            <td><strong>f_knot2</strong>(:)</td>
             <td>
                 
             </td>
@@ -582,14 +687,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong></td>
+            <td><strong>f_degree</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~32"></span>
+              <span class="anchor" id="variable-f_nc~36"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -597,7 +702,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong></td>
+            <td><strong>f_nc</strong>(2)</td>
             <td>
                 
             </td>
@@ -630,7 +735,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_nurbs_1d"></span> <h3>private pure function compute_Xg_nurbs_1d(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_nurbs_2d"></span> <h3>private pure function compute_Xg_nurbs_2d(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg)  
 </h3></div>
     <div class="card-body">
         
@@ -656,14 +761,29 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong>(:)</td>
+            <td><strong>f_Xt</strong>(:,:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot1~17"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_knot1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot"></span>
+              <span class="anchor" id="variable-f_knot2~17"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -671,7 +791,7 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot</strong>(:)</td>
+            <td><strong>f_knot2</strong>(:)</td>
             <td>
                 
             </td>
@@ -686,14 +806,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong></td>
+            <td><strong>f_degree</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~29"></span>
+              <span class="anchor" id="variable-f_nc~33"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -701,7 +821,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong></td>
+            <td><strong>f_nc</strong>(2)</td>
             <td>
                 
             </td>
@@ -716,7 +836,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_ng</strong></td>
+            <td><strong>f_ng</strong>(2)</td>
             <td>
                 
             </td>
@@ -764,7 +884,7 @@ <h4>
   </div>
 
             <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_nurbs_1d_1point"></span> <h3>private pure function compute_Xg_nurbs_1d_1point(f_Xt, f_knot, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-compute_xg_nurbs_2d_1point"></span> <h3>private pure function compute_Xg_nurbs_2d_1point(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg)  
 </h3></div>
     <div class="card-body">
         
@@ -785,19 +905,34 @@ <h4>Arguments</h4>
               <span class="anchor" id="variable-f_xt~35"></span>
               real(kind=rk),
             </td>
-<td>intent(in)</td>
+<td>intent(in),</td>
               <td></td>            <td>
-              
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>f_Xt</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-f_knot1~19"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
             </td>
             <td>::</td>
-            <td><strong>f_Xt</strong></td>
+            <td><strong>f_knot1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_knot~3"></span>
+              <span class="anchor" id="variable-f_knot2~19"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -805,7 +940,7 @@ <h4>Arguments</h4>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>f_knot</strong>(:)</td>
+            <td><strong>f_knot2</strong>(:)</td>
             <td>
                 
             </td>
@@ -820,14 +955,14 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_degree</strong></td>
+            <td><strong>f_degree</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~31"></span>
+              <span class="anchor" id="variable-f_nc~35"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -835,7 +970,7 @@ <h4>Arguments</h4>
               
             </td>
             <td>::</td>
-            <td><strong>f_nc</strong></td>
+            <td><strong>f_nc</strong>(2)</td>
             <td>
                 
             </td>
@@ -901,7 +1036,7 @@ <h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/dyad.html b/interface/dyad.html
index e84037233..5fb0e4c21 100644
--- a/interface/dyad.html
+++ b/interface/dyad.html
@@ -291,18 +291,18 @@ <h3 class="card-title">Called by</h3>
 <polygon fill="none" stroke="black" points="533,-24 479,-24 479,0 533,0 533,-24"/>
 <text text-anchor="middle" x="506" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">dyad</text>
 </g>
-<!-- proc~ansatz~3 -->
+<!-- proc~ansatz -->
 <g id="interface~~dyad~~CalledByGraph_node2" class="node">
-<title>proc~ansatz~3</title>
-<g id="a_interface~~dyad~~CalledByGraph_node2"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
+<title>proc~ansatz</title>
+<g id="a_interface~~dyad~~CalledByGraph_node2"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="443,-24 321,-24 321,0 443,0 443,-24"/>
 <text text-anchor="middle" x="382" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;interface~dyad -->
+<!-- proc~ansatz&#45;&gt;interface~dyad -->
 <g id="interface~~dyad~~CalledByGraph_edge1" class="edge">
-<title>proc~ansatz~3&#45;&gt;interface~dyad</title>
+<title>proc~ansatz&#45;&gt;interface~dyad</title>
 <path fill="none" stroke="#ff0000" d="M443.29,-12C451.97,-12 460.67,-12 468.69,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="468.77,-15.5 478.77,-12 468.77,-8.5 468.77,-15.5"/>
 </g>
@@ -315,9 +315,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="interface~~dyad~~CalledByGraph_edge2" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
 <path fill="none" stroke="#ff0000" d="M285.07,-12C293.59,-12 302.27,-12 310.74,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="310.95,-15.5 320.95,-12 310.95,-8.5 310.95,-15.5"/>
 </g>
@@ -504,7 +504,7 @@ <h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/elemconn_c0.html b/interface/elemconn_c0.html
index 4a11d0174..3e5bd07f3 100644
--- a/interface/elemconn_c0.html
+++ b/interface/elemconn_c0.html
@@ -320,566 +320,566 @@ <h3 class="card-title">Called by</h3>
 <!-- interface~elemconn_c0 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node1" class="node">
 <title>interface~elemconn_c0</title>
-<polygon fill="none" stroke="black" points="677,-339 590,-339 590,-315 677,-315 677,-339"/>
-<text text-anchor="middle" x="633.5" y="-324.6" font-family="Helvetica,sans-Serif" font-size="10.50">elemConn_C0</text>
+<polygon fill="none" stroke="black" points="677,-402 590,-402 590,-378 677,-378 677,-402"/>
+<text text-anchor="middle" x="633.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50">elemConn_C0</text>
 </g>
 <!-- proc~cmp_elem_xc_vis -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node2" class="node">
 <title>proc~cmp_elem_xc_vis</title>
-<g id="a_interface~~elemconn_c0~~CalledByGraph_node2"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-570 362.5,-570 362.5,-546 553.5,-546 553.5,-570"/>
-<text text-anchor="middle" x="458" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
+<g id="a_interface~~elemconn_c0~~CalledByGraph_node2"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="548.5,-612 367.5,-612 367.5,-588 548.5,-588 548.5,-612"/>
+<text text-anchor="middle" x="458" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_edge1" class="edge">
 <title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M484.83,-545.89C505.73,-535.02 534.75,-517.34 554,-495 592.49,-450.32 616.09,-383.57 626.4,-349.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="629.86,-349.83 629.28,-339.25 623.14,-347.89 629.86,-349.83"/>
+<path fill="none" stroke="#ff0000" d="M484.1,-587.84C504.85,-576.82 534.03,-558.96 554,-537 588.65,-498.89 613.07,-442.7 624.73,-412.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="628.14,-412.88 628.32,-402.28 621.57,-410.45 628.14,-412.88"/>
 </g>
 <!-- proc~cmp_elem_xc_vis~2 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node3" class="node">
 <title>proc~cmp_elem_xc_vis~2</title>
-<g id="a_interface~~elemconn_c0~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-360 362.5,-360 362.5,-336 553.5,-336 553.5,-360"/>
-<text text-anchor="middle" x="458" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
+<g id="a_interface~~elemconn_c0~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-423 362.5,-423 362.5,-399 553.5,-399 553.5,-423"/>
+<text text-anchor="middle" x="458" y="-408.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_edge2" class="edge">
 <title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M553.62,-336.55C562.64,-335.46 571.54,-334.38 579.94,-333.36"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="580.4,-336.83 589.9,-332.16 579.56,-329.88 580.4,-336.83"/>
+<path fill="none" stroke="#ff0000" d="M553.62,-399.55C562.64,-398.46 571.54,-397.38 579.94,-396.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="580.4,-399.83 589.9,-395.16 579.56,-392.88 580.4,-399.83"/>
 </g>
 <!-- proc~cmp_elem_xc_vis~3 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node4" class="node">
 <title>proc~cmp_elem_xc_vis~3</title>
-<g id="a_interface~~elemconn_c0~~CalledByGraph_node4"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="548.5,-245 367.5,-245 367.5,-221 548.5,-221 548.5,-245"/>
-<text text-anchor="middle" x="458" y="-230.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xc_vis</text>
+<g id="a_interface~~elemconn_c0~~CalledByGraph_node4"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-297 362.5,-297 362.5,-273 553.5,-273 553.5,-297"/>
+<text text-anchor="middle" x="458" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_edge3" class="edge">
 <title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M481.33,-245.1C511.78,-261.59 566.49,-291.24 601.08,-309.97"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="599.8,-313.26 610.26,-314.95 603.13,-307.11 599.8,-313.26"/>
+<path fill="none" stroke="#ff0000" d="M478.9,-297.04C509.54,-315.59 568.41,-351.22 603.7,-372.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="602.2,-375.75 612.56,-377.93 605.82,-369.76 602.2,-375.75"/>
 </g>
 <!-- proc~cmp_elem_xg_vis -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node5" class="node">
 <title>proc~cmp_elem_xg_vis</title>
-<g id="a_interface~~elemconn_c0~~CalledByGraph_node5"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="554,-486 362,-486 362,-462 554,-462 554,-486"/>
-<text text-anchor="middle" x="458" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
+<g id="a_interface~~elemconn_c0~~CalledByGraph_node5"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="549,-528 367,-528 367,-504 549,-504 549,-528"/>
+<text text-anchor="middle" x="458" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_edge4" class="edge">
 <title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M473.2,-461.97C503.32,-436.45 573.82,-376.72 610.08,-345.99"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="612.74,-348.33 618.11,-339.2 608.21,-342.99 612.74,-348.33"/>
+<path fill="none" stroke="#ff0000" d="M475.64,-503.92C506.21,-481.72 571.48,-434.31 607.44,-408.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="609.88,-410.75 615.91,-402.04 605.77,-405.09 609.88,-410.75"/>
 </g>
 <!-- proc~cmp_elem_xg_vis~2 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node6" class="node">
 <title>proc~cmp_elem_xg_vis~2</title>
-<g id="a_interface~~elemconn_c0~~CalledByGraph_node6"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="554,-318 362,-318 362,-294 554,-294 554,-318"/>
-<text text-anchor="middle" x="458" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
+<g id="a_interface~~elemconn_c0~~CalledByGraph_node6"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="554,-381 362,-381 362,-357 554,-357 554,-381"/>
+<text text-anchor="middle" x="458" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_edge5" class="edge">
 <title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M554.13,-317.51C562.89,-318.58 571.55,-319.62 579.72,-320.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="579.45,-324.1 589.79,-321.83 580.29,-317.15 579.45,-324.1"/>
+<path fill="none" stroke="#ff0000" d="M554.13,-380.51C562.89,-381.58 571.55,-382.62 579.72,-383.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="579.45,-387.1 589.79,-384.83 580.29,-380.15 579.45,-387.1"/>
 </g>
 <!-- proc~cmp_elem_xg_vis~3 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node7" class="node">
 <title>proc~cmp_elem_xg_vis~3</title>
-<g id="a_interface~~elemconn_c0~~CalledByGraph_node7"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="549,-140 367,-140 367,-116 549,-116 549,-140"/>
-<text text-anchor="middle" x="458" y="-125.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xg_vis</text>
+<g id="a_interface~~elemconn_c0~~CalledByGraph_node7"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="554,-171 362,-171 362,-147 554,-147 554,-171"/>
+<text text-anchor="middle" x="458" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_edge6" class="edge">
 <title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M474.88,-140.02C494.68,-155.45 528.95,-183.6 554,-212 580.82,-242.41 606.2,-282.34 620.51,-306.26"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="617.5,-308.05 625.6,-314.88 623.52,-304.49 617.5,-308.05"/>
+<path fill="none" stroke="#ff0000" d="M471.47,-171.29C490.41,-190.28 527.06,-228.28 554,-264 580.43,-299.03 606.42,-343.19 620.87,-368.85"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="617.89,-370.69 625.82,-377.72 624.01,-367.28 617.89,-370.69"/>
 </g>
 <!-- proc~export_xc -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node8" class="node">
 <title>proc~export_xc</title>
-<g id="a_interface~~elemconn_c0~~CalledByGraph_node8"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_volume%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="325.5,-612 175.5,-612 175.5,-588 325.5,-588 325.5,-612"/>
-<text text-anchor="middle" x="250.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
+<g id="a_interface~~elemconn_c0~~CalledByGraph_node8"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_curve%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="320.5,-654 180.5,-654 180.5,-630 320.5,-630 320.5,-654"/>
+<text text-anchor="middle" x="250.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
 <g id="interface~~elemconn_c0~~CalledByGraph_edge7" class="edge">
 <title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
-<path fill="none" stroke="#ff0000" d="M310.39,-587.96C334.68,-583 363,-577.21 388.23,-572.05"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="389.01,-575.47 398.1,-570.04 387.61,-568.61 389.01,-575.47"/>
+<path fill="none" stroke="#ff0000" d="M310.39,-629.96C334.68,-625 363,-619.21 388.23,-614.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="389.01,-617.47 398.1,-612.04 387.61,-610.61 389.01,-617.47"/>
 </g>
 <!-- proc~export_xc~2 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node9" class="node">
 <title>proc~export_xc~2</title>
-<g id="a_interface~~elemconn_c0~~CalledByGraph_node9"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_surface%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="325.5,-360 175.5,-360 175.5,-336 325.5,-336 325.5,-360"/>
-<text text-anchor="middle" x="250.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
+<g id="a_interface~~elemconn_c0~~CalledByGraph_node9"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_volume%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="325.5,-423 175.5,-423 175.5,-399 325.5,-399 325.5,-423"/>
+<text text-anchor="middle" x="250.5" y="-408.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_edge8" class="edge">
 <title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
-<path fill="none" stroke="#ffff00" d="M325.69,-348C334.29,-348 343.19,-348 352.1,-348"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="352.16,-351.5 362.16,-348 352.16,-344.5 352.16,-351.5"/>
+<path fill="none" stroke="#ffff00" d="M325.69,-411C334.29,-411 343.19,-411 352.1,-411"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="352.16,-414.5 362.16,-411 352.16,-407.5 352.16,-414.5"/>
 </g>
 <!-- proc~export_xc~3 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node10" class="node">
 <title>proc~export_xc~3</title>
-<g id="a_interface~~elemconn_c0~~CalledByGraph_node10"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_curve%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="320.5,-150 180.5,-150 180.5,-126 320.5,-126 320.5,-150"/>
-<text text-anchor="middle" x="250.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xc</text>
+<g id="a_interface~~elemconn_c0~~CalledByGraph_node10"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_surface%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="325.5,-171 175.5,-171 175.5,-147 325.5,-147 325.5,-171"/>
+<text text-anchor="middle" x="250.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_edge9" class="edge">
 <title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
-<path fill="none" stroke="#00ff00" d="M277.53,-150.03C314.1,-166.94 380.8,-197.77 421.78,-216.72"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="420.32,-219.9 430.86,-220.92 423.25,-213.54 420.32,-219.9"/>
+<path fill="none" stroke="#00ff00" d="M271.2,-171.08C307.8,-193.52 386.37,-241.69 428.66,-267.63"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="427,-270.71 437.36,-272.96 430.66,-264.74 427,-270.71"/>
 </g>
 <!-- proc~export_xg -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node11" class="node">
 <title>proc~export_xg</title>
-<g id="a_interface~~elemconn_c0~~CalledByGraph_node11"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_volume%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="326,-570 175,-570 175,-546 326,-546 326,-570"/>
-<text text-anchor="middle" x="250.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
+<g id="a_interface~~elemconn_c0~~CalledByGraph_node11"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_curve%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="321,-612 180,-612 180,-588 321,-588 321,-612"/>
+<text text-anchor="middle" x="250.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
 <g id="interface~~elemconn_c0~~CalledByGraph_edge10" class="edge">
 <title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
-<path fill="none" stroke="#00ffff" d="M280.94,-545.96C317.03,-531.21 378.3,-506.17 418.2,-489.86"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="419.68,-493.04 427.61,-486.01 417.03,-486.56 419.68,-493.04"/>
+<path fill="none" stroke="#00ffff" d="M280.94,-587.96C317.03,-573.21 378.3,-548.17 418.2,-531.86"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="419.68,-535.04 427.61,-528.01 417.03,-528.56 419.68,-535.04"/>
 </g>
 <!-- proc~export_xg~2 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node12" class="node">
 <title>proc~export_xg~2</title>
-<g id="a_interface~~elemconn_c0~~CalledByGraph_node12"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_surface%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="326,-318 175,-318 175,-294 326,-294 326,-318"/>
-<text text-anchor="middle" x="250.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
+<g id="a_interface~~elemconn_c0~~CalledByGraph_node12"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_volume%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="326,-381 175,-381 175,-357 326,-357 326,-381"/>
+<text text-anchor="middle" x="250.5" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_edge11" class="edge">
 <title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
-<path fill="none" stroke="#0000ff" d="M326.27,-306C334.6,-306 343.2,-306 351.82,-306"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="351.93,-309.5 361.93,-306 351.93,-302.5 351.93,-309.5"/>
+<path fill="none" stroke="#0000ff" d="M326.27,-369C334.6,-369 343.2,-369 351.82,-369"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="351.93,-372.5 361.93,-369 351.93,-365.5 351.93,-372.5"/>
 </g>
 <!-- proc~export_xg~3 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node13" class="node">
 <title>proc~export_xg~3</title>
-<g id="a_interface~~elemconn_c0~~CalledByGraph_node13"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_curve%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="321,-108 180,-108 180,-84 321,-84 321,-108"/>
-<text text-anchor="middle" x="250.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xg</text>
+<g id="a_interface~~elemconn_c0~~CalledByGraph_node13"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_surface%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="326,-129 175,-129 175,-105 326,-105 326,-129"/>
+<text text-anchor="middle" x="250.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
 <g id="interface~~elemconn_c0~~CalledByGraph_edge12" class="edge">
 <title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
-<path fill="none" stroke="#ff00ff" d="M321.07,-106.83C336.69,-109.27 353.46,-111.88 369.7,-114.41"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="369.31,-117.89 379.73,-115.97 370.39,-110.97 369.31,-117.89"/>
+<path fill="none" stroke="#ff00ff" d="M310.39,-129.04C334.68,-134 363,-139.79 388.23,-144.95"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="387.61,-148.39 398.1,-146.96 389.01,-141.53 387.61,-148.39"/>
 </g>
 <!-- program~example1_curve -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node14" class="node">
 <title>program~example1_curve</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node14"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="119.5,-192 19.5,-192 19.5,-168 119.5,-168 119.5,-192"/>
-<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="119.5,-738 19.5,-738 19.5,-714 119.5,-714 119.5,-738"/>
+<text text-anchor="middle" x="69.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~export_xc~3 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge26" class="edge">
-<title>program~example1_curve&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M119.89,-168.41C140.97,-163.46 165.81,-157.64 188.07,-152.41"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="189.15,-155.75 198.09,-150.06 187.56,-148.94 189.15,-155.75"/>
+<!-- program~example1_curve&#45;&gt;proc~export_xc -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge13" class="edge">
+<title>program~example1_curve&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M114.87,-713.97C123.01,-711.32 131.35,-708.31 139,-705 168.62,-692.2 200.43,-673.49 222.28,-659.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="224.43,-662.56 230.99,-654.25 220.68,-656.65 224.43,-662.56"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~export_xg~3 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge44" class="edge">
-<title>program~example1_curve&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M119.57,-168.7C126.38,-166.08 133.07,-162.88 139,-159 159.57,-145.53 154.28,-130.24 175,-117 177.77,-115.23 180.7,-113.6 183.72,-112.11"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="185.27,-115.25 193.03,-108.03 182.46,-108.84 185.27,-115.25"/>
+<!-- program~example1_curve&#45;&gt;proc~export_xg -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge31" class="edge">
+<title>program~example1_curve&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M119.71,-716.69C126.73,-713.79 133.45,-709.99 139,-705 169.22,-677.86 144.47,-647.79 175,-621 176.51,-619.67 178.11,-618.42 179.77,-617.26"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="181.71,-620.17 188.52,-612.05 178.13,-614.16 181.71,-620.17"/>
 </g>
 <!-- program~example3_surface -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node15" class="node">
 <title>program~example3_surface</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node15"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-444 14.5,-444 14.5,-420 124.5,-420 124.5,-444"/>
-<text text-anchor="middle" x="69.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-234 14.5,-234 14.5,-210 124.5,-210 124.5,-234"/>
+<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~export_xc~2 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge20" class="edge">
-<title>program~example3_surface&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M114.87,-419.97C123.01,-417.32 131.35,-414.31 139,-411 168.62,-398.2 200.43,-379.49 222.28,-365.78"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="224.43,-368.56 230.99,-360.25 220.68,-362.65 224.43,-368.56"/>
+<!-- program~example3_surface&#45;&gt;proc~export_xc~3 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge25" class="edge">
+<title>program~example3_surface&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M111.57,-209.89C120.64,-207.08 130.18,-204.03 139,-201 162.63,-192.9 188.77,-183 209.69,-174.86"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="211.17,-178.03 219.21,-171.13 208.62,-171.52 211.17,-178.03"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~export_xg~2 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge38" class="edge">
-<title>program~example3_surface&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M124.57,-420.51C129.8,-417.95 134.74,-414.82 139,-411 169.22,-383.86 144.47,-353.79 175,-327 176.51,-325.67 178.11,-324.42 179.77,-323.26"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="181.71,-326.17 188.52,-318.05 178.13,-320.16 181.71,-326.17"/>
+<!-- program~example3_surface&#45;&gt;proc~export_xg~3 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge43" class="edge">
+<title>program~example3_surface&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M124.49,-209.84C129.68,-207.41 134.63,-204.5 139,-201 164.19,-180.86 149.59,-157.85 175,-138 176.85,-136.55 178.79,-135.21 180.81,-133.96"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="182.87,-136.82 190.06,-129.03 179.58,-130.64 182.87,-136.82"/>
 </g>
 <!-- program~example3_volume -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node16" class="node">
 <title>program~example3_volume</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node16"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-570 14.5,-570 14.5,-546 124.5,-546 124.5,-570"/>
-<text text-anchor="middle" x="69.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-360 14.5,-360 14.5,-336 124.5,-336 124.5,-360"/>
+<text text-anchor="middle" x="69.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~export_xc -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge13" class="edge">
-<title>program~example3_volume&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M121.79,-570.04C142.58,-574.91 166.75,-580.58 188.43,-585.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="187.66,-589.09 198.2,-587.96 189.26,-582.27 187.66,-589.09"/>
+<!-- program~example3_volume&#45;&gt;proc~export_xc~2 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge18" class="edge">
+<title>program~example3_volume&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M115.26,-360.09C123.28,-362.72 131.48,-365.71 139,-369 155.97,-376.43 157.95,-382.76 175,-390 179.95,-392.1 185.17,-394.06 190.46,-395.86"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="189.41,-399.2 200,-398.95 191.56,-392.54 189.41,-399.2"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~export_xg -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge31" class="edge">
-<title>program~example3_volume&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M124.69,-558C137.24,-558 150.89,-558 164.4,-558"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="164.69,-561.5 174.69,-558 164.69,-554.5 164.69,-561.5"/>
+<!-- program~example3_volume&#45;&gt;proc~export_xg~2 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge36" class="edge">
+<title>program~example3_volume&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M124.69,-354.36C137.24,-355.83 150.89,-357.43 164.4,-359.02"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="164.35,-362.53 174.69,-360.22 165.16,-355.58 164.35,-362.53"/>
 </g>
 <!-- program~example_nurbs_curve -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node17" class="node">
 <title>program~example_nurbs_curve</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node17"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="134,-150 5,-150 5,-126 134,-126 134,-150"/>
-<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="134,-696 5,-696 5,-672 134,-672 134,-696"/>
+<text text-anchor="middle" x="69.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~export_xc~3 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge27" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M134.11,-138C145.81,-138 158.15,-138 170.24,-138"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="170.32,-141.5 180.32,-138 170.32,-134.5 170.32,-141.5"/>
+<!-- program~example_nurbs_curve&#45;&gt;proc~export_xc -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge14" class="edge">
+<title>program~example_nurbs_curve&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M121.79,-671.96C142.58,-667.09 166.75,-661.42 188.43,-656.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="189.26,-659.73 198.2,-654.04 187.66,-652.91 189.26,-659.73"/>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~export_xg~3 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge45" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M121.79,-125.96C142.58,-121.09 166.75,-115.42 188.43,-110.33"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="189.26,-113.73 198.2,-108.04 187.66,-106.91 189.26,-113.73"/>
+<!-- program~example_nurbs_curve&#45;&gt;proc~export_xg -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge32" class="edge">
+<title>program~example_nurbs_curve&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M121.36,-672C127.55,-669.51 133.59,-666.54 139,-663 159.57,-649.53 154.28,-634.24 175,-621 177.77,-619.23 180.7,-617.6 183.72,-616.11"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="185.27,-619.25 193.03,-612.03 182.46,-612.84 185.27,-619.25"/>
 </g>
 <!-- program~example_nurbs_surface -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node18" class="node">
 <title>program~example_nurbs_surface</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node18"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-402 0,-402 0,-378 139,-378 139,-402"/>
-<text text-anchor="middle" x="69.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-192 0,-192 0,-168 139,-168 139,-192"/>
+<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~export_xc~2 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge21" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M121.79,-377.96C142.58,-373.09 166.75,-367.42 188.43,-362.33"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="189.26,-365.73 198.2,-360.04 187.66,-358.91 189.26,-365.73"/>
+<!-- program~example_nurbs_surface&#45;&gt;proc~export_xc~3 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge26" class="edge">
+<title>program~example_nurbs_surface&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M139.19,-171.94C147.7,-170.94 156.47,-169.91 165.17,-168.89"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="165.81,-172.34 175.34,-167.7 165,-165.39 165.81,-172.34"/>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~export_xg~2 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge39" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M121.36,-378C127.55,-375.51 133.59,-372.54 139,-369 159.57,-355.53 154.28,-340.24 175,-327 177.77,-325.23 180.7,-323.6 183.72,-322.11"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="185.27,-325.25 193.03,-318.03 182.46,-318.84 185.27,-325.25"/>
+<!-- program~example_nurbs_surface&#45;&gt;proc~export_xg~3 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge44" class="edge">
+<title>program~example_nurbs_surface&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M115.26,-167.91C123.28,-165.28 131.48,-162.29 139,-159 155.97,-151.57 157.95,-145.24 175,-138 179.95,-135.9 185.17,-133.94 190.46,-132.14"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="191.56,-135.46 200,-129.05 189.41,-128.8 191.56,-135.46"/>
 </g>
 <!-- program~example_nurbs_volume -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node19" class="node">
 <title>program~example_nurbs_volume</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node19"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-528 0,-528 0,-504 139,-504 139,-528"/>
-<text text-anchor="middle" x="69.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-318 0,-318 0,-294 139,-294 139,-318"/>
+<text text-anchor="middle" x="69.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~export_xc -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge14" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M121.36,-528C127.55,-530.49 133.59,-533.46 139,-537 159.57,-550.47 154.28,-565.76 175,-579 177.77,-580.77 180.7,-582.4 183.72,-583.89"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="182.46,-587.16 193.03,-587.97 185.27,-580.75 182.46,-587.16"/>
+<!-- program~example_nurbs_volume&#45;&gt;proc~export_xc~2 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge19" class="edge">
+<title>program~example_nurbs_volume&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M124.49,-318.16C129.68,-320.59 134.63,-323.5 139,-327 164.19,-347.14 149.59,-370.15 175,-390 176.85,-391.45 178.79,-392.79 180.81,-394.04"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="179.58,-397.36 190.06,-398.97 182.87,-391.18 179.58,-397.36"/>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~export_xg -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge32" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M121.79,-528.04C142.58,-532.91 166.75,-538.58 188.43,-543.67"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="187.66,-547.09 198.2,-545.96 189.26,-540.27 187.66,-547.09"/>
+<!-- program~example_nurbs_volume&#45;&gt;proc~export_xg~2 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge37" class="edge">
+<title>program~example_nurbs_volume&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M111.57,-318.11C120.64,-320.92 130.18,-323.97 139,-327 162.63,-335.1 188.77,-345 209.69,-353.14"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="208.62,-356.48 219.21,-356.87 211.17,-349.97 208.62,-356.48"/>
 </g>
 <!-- program~example_put_to_nurbs -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node20" class="node">
 <title>program~example_put_to_nurbs</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node20"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-486 3.5,-486 3.5,-462 135.5,-462 135.5,-486"/>
-<text text-anchor="middle" x="69.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-276 3.5,-276 3.5,-252 135.5,-252 135.5,-276"/>
+<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xc -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge15" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M125.92,-486.17C130.66,-488.6 135.11,-491.51 139,-495 169.22,-522.14 144.47,-552.21 175,-579 176.51,-580.33 178.11,-581.58 179.77,-582.74"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="178.13,-585.84 188.52,-587.95 181.71,-579.83 178.13,-585.84"/>
+<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xc~2 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge20" class="edge">
+<title>program~example_put_to_nurbs&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M126.54,-276.05C131.09,-278.5 135.34,-281.45 139,-285 174.45,-319.31 139.16,-356.1 175,-390 176.28,-391.21 177.61,-392.34 179.01,-393.42"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="177.2,-396.42 187.51,-398.88 180.99,-390.53 177.2,-396.42"/>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xg -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge33" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M114.87,-486.03C123.01,-488.68 131.35,-491.69 139,-495 168.62,-507.8 200.43,-526.51 222.28,-540.22"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="220.68,-543.35 230.99,-545.75 224.43,-537.44 220.68,-543.35"/>
+<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xg~2 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge38" class="edge">
+<title>program~example_put_to_nurbs&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M117.8,-276.09C125.07,-278.63 132.36,-281.6 139,-285 173.27,-302.57 207.81,-330.93 228.93,-349.77"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="226.84,-352.6 236.6,-356.72 231.54,-347.41 226.84,-352.6"/>
 </g>
 <!-- program~shape_c_1d -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node21" class="node">
 <title>program~shape_c_1d</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node21"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-108 31.5,-108 31.5,-84 107.5,-84 107.5,-108"/>
-<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-654 31.5,-654 31.5,-630 107.5,-630 107.5,-654"/>
+<text text-anchor="middle" x="69.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~export_xc~3 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge28" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M107.59,-104.7C130.83,-110.16 161.36,-117.32 188.15,-123.6"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="187.67,-127.09 198.21,-125.96 189.27,-120.27 187.67,-127.09"/>
+<!-- program~shape_c_1d&#45;&gt;proc~export_xc -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge15" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M107.59,-642C125.71,-642 148.26,-642 170.01,-642"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="170.26,-645.5 180.26,-642 170.26,-638.5 170.26,-645.5"/>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~export_xg~3 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge46" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M107.59,-96C125.62,-96 148.04,-96 169.69,-96"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="169.9,-99.5 179.9,-96 169.9,-92.5 169.9,-99.5"/>
+<!-- program~shape_c_1d&#45;&gt;proc~export_xg -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge33" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M107.59,-633.3C130.83,-627.84 161.36,-620.68 188.15,-614.4"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="189.27,-617.73 198.21,-612.04 187.67,-610.91 189.27,-617.73"/>
 </g>
 <!-- program~shape_c_2d -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node22" class="node">
 <title>program~shape_c_2d</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node22"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-360 31.5,-360 31.5,-336 107.5,-336 107.5,-360"/>
-<text text-anchor="middle" x="69.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
+<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~export_xc~2 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge22" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M107.59,-348C124.32,-348 144.83,-348 164.99,-348"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="165.17,-351.5 175.17,-348 165.17,-344.5 165.17,-351.5"/>
+<!-- program~shape_c_2d&#45;&gt;proc~export_xc~3 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge27" class="edge">
+<title>program~shape_c_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M107.59,-142.35C124.32,-144.31 144.83,-146.72 164.99,-149.09"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="164.83,-152.59 175.17,-150.28 165.64,-145.64 164.83,-152.59"/>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~export_xg~2 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge40" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M107.59,-339.3C130.83,-333.84 161.36,-326.68 188.15,-320.4"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="189.27,-323.73 198.21,-318.04 187.67,-316.91 189.27,-323.73"/>
+<!-- program~shape_c_2d&#45;&gt;proc~export_xg~3 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge45" class="edge">
+<title>program~shape_c_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M107.59,-133.65C124.23,-131.7 144.61,-129.31 164.68,-126.95"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="165.28,-130.41 174.8,-125.76 164.46,-123.45 165.28,-130.41"/>
 </g>
 <!-- program~shape_c_3d -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node23" class="node">
 <title>program~shape_c_3d</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node23"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-738 31.5,-738 31.5,-714 107.5,-714 107.5,-738"/>
-<text text-anchor="middle" x="69.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-528 31.5,-528 31.5,-504 107.5,-504 107.5,-528"/>
+<text text-anchor="middle" x="69.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~export_xc -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge16" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M107.72,-717.98C118.25,-714.82 129.44,-710.58 139,-705 177.67,-682.41 213.5,-643.81 233.35,-620.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="236.24,-622.22 239.91,-612.28 230.84,-617.76 236.24,-622.22"/>
+<!-- program~shape_c_3d&#45;&gt;proc~export_xc~2 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge21" class="edge">
+<title>program~shape_c_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M107.7,-507.19C118.12,-504.04 129.26,-499.99 139,-495 173.27,-477.43 207.81,-449.07 228.93,-430.23"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="231.54,-432.59 236.6,-423.28 226.84,-427.4 231.54,-432.59"/>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~export_xg -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge34" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M107.53,-721.63C118.91,-718.61 130.64,-713.52 139,-705 179.79,-663.42 133.74,-620.11 175,-579 176.1,-577.9 177.25,-576.86 178.45,-575.88"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="180.64,-578.62 186.95,-570.11 176.71,-572.83 180.64,-578.62"/>
+<!-- program~shape_c_3d&#45;&gt;proc~export_xg~2 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge39" class="edge">
+<title>program~shape_c_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M107.63,-511.28C118.89,-508.23 130.51,-503.22 139,-495 174.45,-460.69 139.16,-423.9 175,-390 176.28,-388.79 177.61,-387.66 179.01,-386.58"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="180.99,-389.47 187.51,-381.12 177.2,-383.58 180.99,-389.47"/>
 </g>
 <!-- program~shape_circle -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node24" class="node">
 <title>program~shape_circle</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node24"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-66 30,-66 30,-42 109,-42 109,-66"/>
-<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-612 30,-612 30,-588 109,-588 109,-612"/>
+<text text-anchor="middle" x="69.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~export_xc~3 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge29" class="edge">
-<title>program~shape_circle&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M109.16,-61.73C119.38,-64.85 130.05,-69.14 139,-75 159.57,-88.47 154.28,-103.76 175,-117 177.77,-118.77 180.7,-120.4 183.72,-121.89"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="182.46,-125.16 193.03,-125.97 185.27,-118.75 182.46,-125.16"/>
+<!-- program~shape_circle&#45;&gt;proc~export_xc -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge16" class="edge">
+<title>program~shape_circle&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M109.34,-609.11C132.41,-614.53 162.17,-621.51 188.33,-627.65"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="187.62,-631.08 198.16,-629.95 189.22,-624.26 187.62,-631.08"/>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~export_xg~3 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge47" class="edge">
-<title>program~shape_circle&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M109.34,-63.11C132.41,-68.53 162.17,-75.51 188.33,-81.65"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="187.62,-85.08 198.16,-83.95 189.22,-78.26 187.62,-85.08"/>
+<!-- program~shape_circle&#45;&gt;proc~export_xg -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge34" class="edge">
+<title>program~shape_circle&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M109.34,-600C127.01,-600 148.62,-600 169.52,-600"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="169.7,-603.5 179.7,-600 169.7,-596.5 169.7,-603.5"/>
 </g>
 <!-- program~shape_half_circle -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node25" class="node">
 <title>program~shape_half_circle</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node25"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121.5,-24 17.5,-24 17.5,0 121.5,0 121.5,-24"/>
-<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121.5,-570 17.5,-570 17.5,-546 121.5,-546 121.5,-570"/>
+<text text-anchor="middle" x="69.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~export_xc~3 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge30" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M121.81,-22.21C128.07,-24.98 134,-28.51 139,-33 169.22,-60.14 144.47,-90.21 175,-117 176.51,-118.33 178.11,-119.58 179.77,-120.74"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="178.13,-123.84 188.52,-125.95 181.71,-117.83 178.13,-123.84"/>
+<!-- program~shape_half_circle&#45;&gt;proc~export_xc -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge17" class="edge">
+<title>program~shape_half_circle&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M121.36,-570C127.55,-572.49 133.59,-575.46 139,-579 159.57,-592.47 154.28,-607.76 175,-621 177.77,-622.77 180.7,-624.4 183.72,-625.89"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="182.46,-629.16 193.03,-629.97 185.27,-622.75 182.46,-629.16"/>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~export_xg~3 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge48" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M114.87,-24.03C123.01,-26.68 131.35,-29.69 139,-33 168.62,-45.8 200.43,-64.51 222.28,-78.22"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="220.68,-81.35 230.99,-83.75 224.43,-75.44 220.68,-81.35"/>
+<!-- program~shape_half_circle&#45;&gt;proc~export_xg -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge35" class="edge">
+<title>program~shape_half_circle&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M121.79,-570.04C142.58,-574.91 166.75,-580.58 188.43,-585.67"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="187.66,-589.09 198.2,-587.96 189.26,-582.27 187.66,-589.09"/>
 </g>
 <!-- program~shape_half_ring_2d -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node26" class="node">
 <title>program~shape_half_ring_2d</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node26"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-318 12,-318 12,-294 127,-294 127,-318"/>
-<text text-anchor="middle" x="69.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
+<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xc~2 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge23" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M121.79,-318.04C142.58,-322.91 166.75,-328.58 188.43,-333.67"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="187.66,-337.09 198.2,-335.96 189.26,-330.27 187.66,-337.09"/>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xc~3 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge28" class="edge">
+<title>program~shape_half_ring_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M115.26,-108.09C123.28,-110.72 131.48,-113.71 139,-117 155.97,-124.43 157.95,-130.76 175,-138 179.95,-140.1 185.17,-142.06 190.46,-143.86"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="189.41,-147.2 200,-146.95 191.56,-140.54 189.41,-147.2"/>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xg~2 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge41" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M127.14,-306C139.1,-306 151.97,-306 164.71,-306"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="164.88,-309.5 174.88,-306 164.88,-302.5 164.88,-309.5"/>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xg~3 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge46" class="edge">
+<title>program~shape_half_ring_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M127.14,-102.64C139.1,-104.05 151.97,-105.56 164.71,-107.05"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="164.54,-110.56 174.88,-108.25 165.36,-103.6 164.54,-110.56"/>
 </g>
 <!-- program~shape_half_ring_3d -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node27" class="node">
 <title>program~shape_half_ring_3d</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node27"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-696 12,-696 12,-672 127,-672 127,-696"/>
-<text text-anchor="middle" x="69.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-486 12,-486 12,-462 127,-462 127,-486"/>
+<text text-anchor="middle" x="69.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xc -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge17" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M114.87,-671.97C123.01,-669.32 131.35,-666.31 139,-663 168.62,-650.2 200.43,-631.49 222.28,-617.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="224.43,-620.56 230.99,-612.25 220.68,-614.65 224.43,-620.56"/>
+<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xc~2 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge22" class="edge">
+<title>program~shape_half_ring_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M111.57,-461.89C120.64,-459.08 130.18,-456.03 139,-453 162.63,-444.9 188.77,-435 209.69,-426.86"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="211.17,-430.03 219.21,-423.13 208.62,-423.52 211.17,-430.03"/>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xg -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge35" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M125.92,-671.83C130.66,-669.4 135.11,-666.49 139,-663 169.22,-635.86 144.47,-605.79 175,-579 176.51,-577.67 178.11,-576.42 179.77,-575.26"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="181.71,-578.17 188.52,-570.05 178.13,-572.16 181.71,-578.17"/>
+<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xg~2 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge40" class="edge">
+<title>program~shape_half_ring_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M124.49,-461.84C129.68,-459.41 134.63,-456.5 139,-453 164.19,-432.86 149.59,-409.85 175,-390 176.85,-388.55 178.79,-387.21 180.81,-385.96"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="182.87,-388.82 190.06,-381.03 179.58,-382.64 182.87,-388.82"/>
 </g>
 <!-- program~shape_hexahedron -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node28" class="node">
 <title>program~shape_hexahedron</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node28"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-654 13,-654 13,-630 126,-630 126,-654"/>
-<text text-anchor="middle" x="69.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-444 13,-444 13,-420 126,-420 126,-444"/>
+<text text-anchor="middle" x="69.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~export_xc -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge18" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M121.79,-629.96C142.58,-625.09 166.75,-619.42 188.43,-614.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="189.26,-617.73 198.2,-612.04 187.66,-610.91 189.26,-617.73"/>
+<!-- program~shape_hexahedron&#45;&gt;proc~export_xc~2 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge23" class="edge">
+<title>program~shape_hexahedron&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M126.16,-425.47C138.59,-424.01 152.04,-422.43 165.33,-420.87"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="165.93,-424.33 175.45,-419.69 165.11,-417.38 165.93,-424.33"/>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~export_xg -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge36" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M121.36,-630C127.55,-627.51 133.59,-624.54 139,-621 159.57,-607.53 154.28,-592.24 175,-579 177.77,-577.23 180.7,-575.6 183.72,-574.11"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="185.27,-577.25 193.03,-570.03 182.46,-570.84 185.27,-577.25"/>
+<!-- program~shape_hexahedron&#45;&gt;proc~export_xg~2 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge41" class="edge">
+<title>program~shape_hexahedron&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M115.26,-419.91C123.28,-417.28 131.48,-414.29 139,-411 155.97,-403.57 157.95,-397.24 175,-390 179.95,-387.9 185.17,-385.94 190.46,-384.14"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="191.56,-387.46 200,-381.05 189.41,-380.8 191.56,-387.46"/>
 </g>
 <!-- program~shape_ring_2d -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node29" class="node">
 <title>program~shape_ring_2d</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node29"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-276 24.5,-276 24.5,-252 114.5,-252 114.5,-276"/>
-<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-66 24.5,-66 24.5,-42 114.5,-42 114.5,-66"/>
+<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~export_xc~2 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge24" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M114.54,-273.47C123.05,-276.39 131.61,-280.16 139,-285 159.57,-298.47 154.28,-313.76 175,-327 177.77,-328.77 180.7,-330.4 183.72,-331.89"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="182.46,-335.16 193.03,-335.97 185.27,-328.75 182.46,-335.16"/>
+<!-- program~shape_ring_2d&#45;&gt;proc~export_xc~3 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge29" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M114.6,-62.16C123.29,-65.18 131.91,-69.33 139,-75 164.19,-95.14 149.59,-118.15 175,-138 176.85,-139.45 178.79,-140.79 180.81,-142.04"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="179.58,-145.36 190.06,-146.97 182.87,-139.18 179.58,-145.36"/>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~export_xg~2 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge42" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M114.75,-274.38C136.95,-279.59 164.19,-285.98 188.36,-291.65"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="187.62,-295.08 198.15,-293.95 189.22,-288.26 187.62,-295.08"/>
+<!-- program~shape_ring_2d&#45;&gt;proc~export_xg~3 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge47" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M111.57,-66.11C120.64,-68.92 130.18,-71.97 139,-75 162.63,-83.1 188.77,-93 209.69,-101.14"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="208.62,-104.48 219.21,-104.87 211.17,-97.97 208.62,-104.48"/>
 </g>
 <!-- program~shape_ring_3d -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node30" class="node">
 <title>program~shape_ring_3d</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node30"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-612 24.5,-612 24.5,-588 114.5,-588 114.5,-612"/>
-<text text-anchor="middle" x="69.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-402 24.5,-402 24.5,-378 114.5,-378 114.5,-402"/>
+<text text-anchor="middle" x="69.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~export_xc -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge19" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M114.75,-600C130.07,-600 147.78,-600 165.24,-600"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="165.46,-603.5 175.46,-600 165.46,-596.5 165.46,-603.5"/>
+<!-- program~shape_ring_3d&#45;&gt;proc~export_xc~2 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge24" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M114.75,-395.19C130.07,-396.99 147.78,-399.07 165.24,-401.11"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="165.12,-404.62 175.46,-402.31 165.94,-397.67 165.12,-404.62"/>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~export_xg -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge37" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M114.75,-589.62C136.95,-584.41 164.19,-578.02 188.36,-572.35"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="189.22,-575.74 198.15,-570.05 187.62,-568.92 189.22,-575.74"/>
+<!-- program~shape_ring_3d&#45;&gt;proc~export_xg~2 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge42" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M114.75,-384.81C129.89,-383.03 147.38,-380.98 164.64,-378.96"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="165.24,-382.41 174.76,-377.77 164.42,-375.46 165.24,-382.41"/>
 </g>
 <!-- program~shape_tetragon -->
 <g id="interface~~elemconn_c0~~CalledByGraph_node31" class="node">
 <title>program~shape_tetragon</title>
 <g id="a_interface~~elemconn_c0~~CalledByGraph_node31"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-234 21.5,-234 21.5,-210 117.5,-210 117.5,-234"/>
-<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-24 21.5,-24 21.5,0 117.5,0 117.5,-24"/>
+<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~export_xc~2 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge25" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M117.59,-230.47C125.38,-233.46 132.89,-237.51 139,-243 169.22,-270.14 144.47,-300.21 175,-327 176.51,-328.33 178.11,-329.58 179.77,-330.74"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="178.13,-333.84 188.52,-335.95 181.71,-327.83 178.13,-333.84"/>
+<!-- program~shape_tetragon&#45;&gt;proc~export_xc~3 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge30" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M117.59,-19.96C125.47,-23 133.01,-27.2 139,-33 174.45,-67.31 139.16,-104.1 175,-138 176.28,-139.21 177.61,-140.34 179.01,-141.42"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="177.2,-144.42 187.51,-146.88 180.99,-138.53 177.2,-144.42"/>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~export_xg~2 -->
-<g id="interface~~elemconn_c0~~CalledByGraph_edge43" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M114.87,-234.03C123.01,-236.68 131.35,-239.69 139,-243 168.62,-255.8 200.43,-274.51 222.28,-288.22"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="220.68,-291.35 230.99,-293.75 224.43,-285.44 220.68,-291.35"/>
+<!-- program~shape_tetragon&#45;&gt;proc~export_xg~3 -->
+<g id="interface~~elemconn_c0~~CalledByGraph_edge48" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M117.8,-24.09C125.07,-26.63 132.36,-29.6 139,-33 173.27,-50.57 207.81,-78.93 228.93,-97.77"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="226.84,-100.6 236.6,-104.72 231.54,-95.41 226.84,-100.6"/>
 </g>
 </g>
 </svg>
@@ -1271,7 +1271,7 @@ <h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/elemconn_cn.html b/interface/elemconn_cn.html
index 88be0cdbc..b6ab3dee4 100644
--- a/interface/elemconn_cn.html
+++ b/interface/elemconn_cn.html
@@ -312,98 +312,98 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: interface~~elemconn_cn~~CalledByGraph Pages: 1 -->
-<svg id="interfaceelemconn_cnCalledByGraph" width="641pt" height="205pt"
- viewBox="0.00 0.00 641.00 204.80" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~elemconn_cn~~CalledByGraph" class="graph" transform="scale(1.24 1.24) rotate(0) translate(4 250)">
+<svg id="interfaceelemconn_cnCalledByGraph" width="641pt" height="199pt"
+ viewBox="0.00 0.00 641.00 198.56" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~elemconn_cn~~CalledByGraph" class="graph" transform="scale(1.24 1.24) rotate(0) translate(4 242.26)">
 <title>interface~~elemconn_cn~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-250 791,-250 791,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-242.26 791,-242.26 791,4 -4,4"/>
 <!-- interface~elemconn_cn -->
 <g id="interface~~elemconn_cn~~CalledByGraph_node1" class="node">
 <title>interface~elemconn_cn</title>
-<polygon fill="none" stroke="black" points="787,-124 700,-124 700,-100 787,-100 787,-124"/>
-<text text-anchor="middle" x="743.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50">elemConn_Cn</text>
+<polygon fill="none" stroke="black" points="787,-146 700,-146 700,-122 787,-122 787,-146"/>
+<text text-anchor="middle" x="743.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50">elemConn_Cn</text>
 </g>
 <!-- proc~cmp_elem -->
 <g id="interface~~elemconn_cn~~CalledByGraph_node2" class="node">
 <title>proc~cmp_elem</title>
-<g id="a_interface~~elemconn_cn~~CalledByGraph_node2"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_volume%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-205 511,-205 511,-181 664,-181 664,-205"/>
-<text text-anchor="middle" x="587.5" y="-190.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
+<g id="a_interface~~elemconn_cn~~CalledByGraph_node2"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_curve%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="659,-226 516,-226 516,-202 659,-202 659,-226"/>
+<text text-anchor="middle" x="587.5" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem&#45;&gt;interface~elemconn_cn -->
 <g id="interface~~elemconn_cn~~CalledByGraph_edge1" class="edge">
 <title>proc~cmp_elem&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#ff0000" d="M611.56,-180.87C637.83,-167.05 680.94,-144.38 710.47,-128.85"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="712.32,-131.83 719.54,-124.08 709.06,-125.63 712.32,-131.83"/>
+<path fill="none" stroke="#ff0000" d="M611.89,-201.85C638.16,-188.2 680.96,-165.97 710.36,-150.7"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="712.13,-153.72 719.4,-146 708.91,-147.51 712.13,-153.72"/>
 </g>
 <!-- proc~cmp_elem~2 -->
 <g id="interface~~elemconn_cn~~CalledByGraph_node3" class="node">
 <title>proc~cmp_elem~2</title>
-<g id="a_interface~~elemconn_cn~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_surface%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-124 511,-124 511,-100 664,-100 664,-124"/>
-<text text-anchor="middle" x="587.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
+<g id="a_interface~~elemconn_cn~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_volume%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-146 511,-146 511,-122 664,-122 664,-146"/>
+<text text-anchor="middle" x="587.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~2&#45;&gt;interface~elemconn_cn -->
 <g id="interface~~elemconn_cn~~CalledByGraph_edge2" class="edge">
 <title>proc~cmp_elem~2&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#ff0000" d="M664.15,-112C672.81,-112 681.5,-112 689.77,-112"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="689.99,-115.5 699.99,-112 689.99,-108.5 689.99,-115.5"/>
+<path fill="none" stroke="#ff0000" d="M664.15,-134C672.81,-134 681.5,-134 689.77,-134"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="689.99,-137.5 699.99,-134 689.99,-130.5 689.99,-137.5"/>
 </g>
 <!-- proc~cmp_elem~3 -->
 <g id="interface~~elemconn_cn~~CalledByGraph_node4" class="node">
 <title>proc~cmp_elem~3</title>
-<g id="a_interface~~elemconn_cn~~CalledByGraph_node4"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_curve%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="659,-64 516,-64 516,-40 659,-40 659,-64"/>
-<text text-anchor="middle" x="587.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
+<g id="a_interface~~elemconn_cn~~CalledByGraph_node4"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_surface%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-64 511,-64 511,-40 664,-40 664,-64"/>
+<text text-anchor="middle" x="587.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;interface~elemconn_cn -->
 <g id="interface~~elemconn_cn~~CalledByGraph_edge3" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#ff0000" d="M619.66,-64.14C643.43,-73.4 676.37,-86.23 702.15,-96.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="701.06,-99.61 711.65,-99.98 703.6,-93.09 701.06,-99.61"/>
+<path fill="none" stroke="#ff0000" d="M611.22,-64.1C637.57,-78.13 681.17,-101.34 710.83,-117.14"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="709.46,-120.37 719.93,-121.98 712.75,-114.2 709.46,-120.37"/>
 </g>
 <!-- proc~ansatz -->
 <g id="interface~~elemconn_cn~~CalledByGraph_node5" class="node">
 <title>proc~ansatz</title>
-<g id="a_interface~~elemconn_cn~~CalledByGraph_node5"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-226 343,-226 343,-202 475,-202 475,-226"/>
-<text text-anchor="middle" x="409" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_interface~~elemconn_cn~~CalledByGraph_node5"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="470,-226 348,-226 348,-202 470,-202 470,-226"/>
+<text text-anchor="middle" x="409" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
 <g id="interface~~elemconn_cn~~CalledByGraph_edge4" class="edge">
 <title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0000" d="M475.22,-206.24C483.55,-205.25 492.17,-204.22 500.76,-203.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="501.3,-206.66 510.81,-202.01 500.47,-199.71 501.3,-206.66"/>
+<path fill="none" stroke="#ff0000" d="M470.25,-214C481.72,-214 493.89,-214 505.87,-214"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="505.88,-217.5 515.88,-214 505.88,-210.5 505.88,-217.5"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="interface~~elemconn_cn~~CalledByGraph_node6" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_interface~~elemconn_cn~~CalledByGraph_node6"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-104 343,-104 343,-80 475,-80 475,-104"/>
-<text text-anchor="middle" x="409" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_interface~~elemconn_cn~~CalledByGraph_node6"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-146 343,-146 343,-122 475,-122 475,-146"/>
+<text text-anchor="middle" x="409" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;proc~cmp_elem~2 -->
-<g id="interface~~elemconn_cn~~CalledByGraph_edge7" class="edge">
+<g id="interface~~elemconn_cn~~CalledByGraph_edge6" class="edge">
 <title>proc~ansatz~2&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#00ff00" d="M475.22,-99.39C483.55,-100.33 492.17,-101.31 500.76,-102.28"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="500.48,-105.78 510.81,-103.42 501.27,-98.82 500.48,-105.78"/>
+<path fill="none" stroke="#00ff00" d="M475.22,-134C483.55,-134 492.17,-134 500.76,-134"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="500.81,-137.5 510.81,-134 500.81,-130.5 500.81,-137.5"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="interface~~elemconn_cn~~CalledByGraph_node7" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_interface~~elemconn_cn~~CalledByGraph_node7"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="470,-24 348,-24 348,0 470,0 470,-24"/>
-<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_interface~~elemconn_cn~~CalledByGraph_node7"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-24 343,-24 343,0 475,0 475,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
@@ -417,124 +417,124 @@ <h3 class="card-title">Called by</h3>
 <g id="interface~~elemconn_cn~~CalledByGraph_node8" class="node">
 <title>proc~cmp_area</title>
 <g id="a_interface~~elemconn_cn~~CalledByGraph_node8"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-124 149,-124 149,-100 299,-100 299,-124"/>
-<text text-anchor="middle" x="224" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-44 149,-44 149,-20 299,-20 299,-44"/>
+<text text-anchor="middle" x="224" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~2 -->
-<g id="interface~~elemconn_cn~~CalledByGraph_edge8" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#00ff00" d="M299.28,-112.73C313.78,-112.84 328.86,-112.94 343,-113 401.67,-113.25 416.33,-113.26 475,-113 483.35,-112.96 492.05,-112.91 500.74,-112.85"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="500.96,-116.35 510.93,-112.77 500.9,-109.35 500.96,-116.35"/>
+<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~3 -->
+<g id="interface~~elemconn_cn~~CalledByGraph_edge10" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~cmp_elem~3</title>
+<path fill="none" stroke="#0000ff" d="M299.03,-36.1C357.53,-39.33 439.28,-43.86 500.65,-47.25"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="500.53,-50.75 510.71,-47.81 500.91,-43.76 500.53,-50.75"/>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="interface~~elemconn_cn~~CalledByGraph_edge12" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ffda00" d="M299.17,-103.89C310.24,-102.68 321.67,-101.43 332.77,-100.22"/>
-<polygon fill="#ffda00" stroke="#ffda00" points="333.29,-103.69 342.85,-99.12 332.52,-96.73 333.29,-103.69"/>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="interface~~elemconn_cn~~CalledByGraph_edge13" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#48ff00" d="M299.17,-23.89C310.24,-22.68 321.67,-21.43 332.77,-20.22"/>
+<polygon fill="#48ff00" stroke="#48ff00" points="333.29,-23.69 342.85,-19.12 332.52,-16.73 333.29,-23.69"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="interface~~elemconn_cn~~CalledByGraph_node9" class="node">
 <title>proc~cmp_length</title>
 <g id="a_interface~~elemconn_cn~~CalledByGraph_node9"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-44 149,-44 149,-20 299,-20 299,-44"/>
-<text text-anchor="middle" x="224" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-236 149,-236 149,-212 299,-212 299,-236"/>
+<text text-anchor="middle" x="224" y="-221.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~cmp_elem~3 -->
-<g id="interface~~elemconn_cn~~CalledByGraph_edge10" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#0000ff" d="M299.03,-36.1C359.2,-39.42 443.95,-44.11 505.84,-47.54"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="505.77,-51.04 515.95,-48.1 506.16,-44.05 505.77,-51.04"/>
+<!-- proc~cmp_length&#45;&gt;proc~cmp_elem -->
+<g id="interface~~elemconn_cn~~CalledByGraph_edge5" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~cmp_elem</title>
+<path fill="none" stroke="#ff0000" d="M299.24,-232.58C349.05,-237.03 416.06,-240.5 475,-235 490.85,-233.52 507.8,-230.88 523.58,-227.97"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="524.59,-231.34 533.76,-226.02 523.28,-224.46 524.59,-231.34"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="interface~~elemconn_cn~~CalledByGraph_edge13" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#48ff00" d="M299.17,-23.89C311.91,-22.5 325.12,-21.06 337.76,-19.68"/>
-<polygon fill="#48ff00" stroke="#48ff00" points="338.19,-23.15 347.75,-18.58 337.43,-16.19 338.19,-23.15"/>
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
+<g id="interface~~elemconn_cn~~CalledByGraph_edge11" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M299.17,-219.95C311.91,-219.25 325.12,-218.53 337.76,-217.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="337.95,-221.33 347.75,-217.29 337.57,-214.34 337.95,-221.33"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="interface~~elemconn_cn~~CalledByGraph_node10" class="node">
 <title>proc~cmp_volume</title>
 <g id="a_interface~~elemconn_cn~~CalledByGraph_node10"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-246 141,-246 141,-222 307,-222 307,-246"/>
-<text text-anchor="middle" x="224" y="-231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-175 141,-175 141,-151 307,-151 307,-175"/>
+<text text-anchor="middle" x="224" y="-160.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem -->
-<g id="interface~~elemconn_cn~~CalledByGraph_edge5" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0000" d="M307.01,-241.85C356.13,-244.69 419.6,-245.09 475,-235 502,-230.08 530.96,-218.98 552.6,-209.43"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="554.33,-212.49 562,-205.17 551.44,-206.11 554.33,-212.49"/>
+<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="interface~~elemconn_cn~~CalledByGraph_edge7" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#00ff00" d="M307.14,-163.55C356.02,-163.09 419.21,-161.11 475,-155 490.26,-153.33 506.56,-150.73 521.86,-147.92"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="522.56,-151.35 531.74,-146.05 521.26,-144.47 522.56,-151.35"/>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="interface~~elemconn_cn~~CalledByGraph_edge11" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.13,-225.02C315.64,-224.09 324.26,-223.15 332.7,-222.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="333.31,-225.68 342.87,-221.12 332.54,-218.73 333.31,-225.68"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="interface~~elemconn_cn~~CalledByGraph_edge12" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ffda00" d="M300.75,-151C311.34,-149.32 322.21,-147.6 332.78,-145.92"/>
+<polygon fill="#ffda00" stroke="#ffda00" points="333.47,-149.35 342.8,-144.33 332.38,-142.44 333.47,-149.35"/>
 </g>
 <!-- program~example3_volume -->
 <g id="interface~~elemconn_cn~~CalledByGraph_node11" class="node">
 <title>program~example3_volume</title>
 <g id="a_interface~~elemconn_cn~~CalledByGraph_node11"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="464,-184 354,-184 354,-160 464,-160 464,-184"/>
-<text text-anchor="middle" x="409" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="464,-104 354,-104 354,-80 464,-80 464,-104"/>
+<text text-anchor="middle" x="409" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~cmp_elem -->
-<g id="interface~~elemconn_cn~~CalledByGraph_edge6" class="edge">
-<title>program~example3_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0000" d="M464.4,-178.47C475.98,-179.85 488.49,-181.34 500.93,-182.82"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="500.52,-186.3 510.87,-184 501.35,-179.34 500.52,-186.3"/>
+<!-- program~example3_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="interface~~elemconn_cn~~CalledByGraph_edge8" class="edge">
+<title>program~example3_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#00ff00" d="M460.58,-104.04C480.98,-108.89 504.69,-114.53 526,-119.6"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="525.38,-123.05 535.91,-121.96 527,-116.24 525.38,-123.05"/>
 </g>
 <!-- program~compute_area -->
 <g id="interface~~elemconn_cn~~CalledByGraph_node12" class="node">
 <title>program~compute_area</title>
 <g id="a_interface~~elemconn_cn~~CalledByGraph_node12"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-124 8,-124 8,-100 97,-100 97,-124"/>
-<text text-anchor="middle" x="52.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-44 8,-44 8,-20 97,-20 97,-44"/>
+<text text-anchor="middle" x="52.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
 <!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="interface~~elemconn_cn~~CalledByGraph_edge14" class="edge">
 <title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#00ff91" d="M97.15,-112C109.86,-112 124.19,-112 138.52,-112"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="138.92,-115.5 148.92,-112 138.92,-108.5 138.92,-115.5"/>
+<path fill="none" stroke="#00ff91" d="M97.15,-32C109.86,-32 124.19,-32 138.52,-32"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="138.92,-35.5 148.92,-32 138.92,-28.5 138.92,-35.5"/>
 </g>
 <!-- program~compute_length -->
 <g id="interface~~elemconn_cn~~CalledByGraph_node13" class="node">
 <title>program~compute_length</title>
 <g id="a_interface~~elemconn_cn~~CalledByGraph_node13"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-44 3,-44 3,-20 102,-20 102,-44"/>
-<text text-anchor="middle" x="52.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-236 3,-236 3,-212 102,-212 102,-236"/>
+<text text-anchor="middle" x="52.5" y="-221.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="interface~~elemconn_cn~~CalledByGraph_edge15" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#0091ff" d="M102.07,-32C113.57,-32 126.17,-32 138.75,-32"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="138.82,-35.5 148.82,-32 138.82,-28.5 138.82,-35.5"/>
+<path fill="none" stroke="#0091ff" d="M102.07,-224C113.57,-224 126.17,-224 138.75,-224"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="138.82,-227.5 148.82,-224 138.82,-220.5 138.82,-227.5"/>
 </g>
 <!-- program~compute_volume -->
 <g id="interface~~elemconn_cn~~CalledByGraph_node14" class="node">
 <title>program~compute_volume</title>
 <g id="a_interface~~elemconn_cn~~CalledByGraph_node14"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-246 0,-246 0,-222 105,-222 105,-246"/>
-<text text-anchor="middle" x="52.5" y="-231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-175 0,-175 0,-151 105,-151 105,-175"/>
+<text text-anchor="middle" x="52.5" y="-160.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
 <!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="interface~~elemconn_cn~~CalledByGraph_edge16" class="edge">
 <title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#4800ff" d="M105.28,-234C113.39,-234 121.99,-234 130.69,-234"/>
-<polygon fill="#4800ff" stroke="#4800ff" points="130.93,-237.5 140.93,-234 130.93,-230.5 130.93,-237.5"/>
+<path fill="none" stroke="#4800ff" d="M105.28,-163C113.39,-163 121.99,-163 130.69,-163"/>
+<polygon fill="#4800ff" stroke="#4800ff" points="130.93,-166.5 140.93,-163 130.93,-159.5 130.93,-166.5"/>
 </g>
 </g>
 </svg>
@@ -815,7 +815,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth1~3"></span>
+              <span class="anchor" id="variable-xth1~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -830,7 +830,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth2~3"></span>
+              <span class="anchor" id="variable-xth2~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1009,7 +1009,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth1~4"></span>
+              <span class="anchor" id="variable-xth1~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1024,7 +1024,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth2~4"></span>
+              <span class="anchor" id="variable-xth2~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1136,7 +1136,7 @@ <h4>Arguments</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/gauss_leg.html b/interface/gauss_leg.html
index 40b9dc3c0..58da07207 100644
--- a/interface/gauss_leg.html
+++ b/interface/gauss_leg.html
@@ -422,9 +422,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~ansatz -->
 <g id="interface~~gauss_leg~~CalledByGraph_node2" class="node">
 <title>proc~ansatz</title>
-<g id="a_interface~~gauss_leg~~CalledByGraph_node2"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-108 343,-108 343,-84 475,-84 475,-108"/>
-<text text-anchor="middle" x="409" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_interface~~gauss_leg~~CalledByGraph_node2"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="470,-108 348,-108 348,-84 470,-84 470,-108"/>
+<text text-anchor="middle" x="409" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
@@ -437,9 +437,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~ansatz~2 -->
 <g id="interface~~gauss_leg~~CalledByGraph_node3" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_interface~~gauss_leg~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
+<g id="a_interface~~gauss_leg~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="475,-66 343,-66 343,-42 475,-42 475,-66"/>
-<text text-anchor="middle" x="409" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<text text-anchor="middle" x="409" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
@@ -452,9 +452,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~ansatz~3 -->
 <g id="interface~~gauss_leg~~CalledByGraph_node4" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_interface~~gauss_leg~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="470,-24 348,-24 348,0 470,0 470,-24"/>
-<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_interface~~gauss_leg~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-24 343,-24 343,0 475,0 475,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
@@ -468,91 +468,91 @@ <h3 class="card-title">Called by</h3>
 <g id="interface~~gauss_leg~~CalledByGraph_node5" class="node">
 <title>proc~cmp_area</title>
 <g id="a_interface~~gauss_leg~~CalledByGraph_node5"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-66 149,-66 149,-42 299,-42 299,-66"/>
-<text text-anchor="middle" x="224" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-24 149,-24 149,0 299,0 299,-24"/>
+<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="interface~~gauss_leg~~CalledByGraph_edge5" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#00ff00" d="M299.17,-54C310.24,-54 321.67,-54 332.77,-54"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="332.85,-57.5 342.85,-54 332.85,-50.5 332.85,-57.5"/>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="interface~~gauss_leg~~CalledByGraph_edge6" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#0000ff" d="M299.17,-12C310.24,-12 321.67,-12 332.77,-12"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="332.85,-15.5 342.85,-12 332.85,-8.5 332.85,-15.5"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="interface~~gauss_leg~~CalledByGraph_node6" class="node">
 <title>proc~cmp_length</title>
 <g id="a_interface~~gauss_leg~~CalledByGraph_node6"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-24 149,-24 149,0 299,0 299,-24"/>
-<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-108 149,-108 149,-84 299,-84 299,-108"/>
+<text text-anchor="middle" x="224" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="interface~~gauss_leg~~CalledByGraph_edge6" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#0000ff" d="M299.17,-12C311.79,-12 324.86,-12 337.38,-12"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="337.75,-15.5 347.75,-12 337.75,-8.5 337.75,-15.5"/>
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
+<g id="interface~~gauss_leg~~CalledByGraph_edge4" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M299.17,-96C311.79,-96 324.86,-96 337.38,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="337.75,-99.5 347.75,-96 337.75,-92.5 337.75,-99.5"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="interface~~gauss_leg~~CalledByGraph_node7" class="node">
 <title>proc~cmp_volume</title>
 <g id="a_interface~~gauss_leg~~CalledByGraph_node7"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-108 141,-108 141,-84 307,-84 307,-108"/>
-<text text-anchor="middle" x="224" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-66 141,-66 141,-42 307,-42 307,-66"/>
+<text text-anchor="middle" x="224" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="interface~~gauss_leg~~CalledByGraph_edge4" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.13,-96C315.64,-96 324.26,-96 332.7,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="332.87,-99.5 342.87,-96 332.87,-92.5 332.87,-99.5"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="interface~~gauss_leg~~CalledByGraph_edge5" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#00ff00" d="M307.13,-54C315.64,-54 324.26,-54 332.7,-54"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="332.87,-57.5 342.87,-54 332.87,-50.5 332.87,-57.5"/>
 </g>
 <!-- program~compute_area -->
 <g id="interface~~gauss_leg~~CalledByGraph_node8" class="node">
 <title>program~compute_area</title>
 <g id="a_interface~~gauss_leg~~CalledByGraph_node8"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-66 8,-66 8,-42 97,-42 97,-66"/>
-<text text-anchor="middle" x="52.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-24 8,-24 8,0 97,0 97,-24"/>
+<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
 <!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="interface~~gauss_leg~~CalledByGraph_edge7" class="edge">
 <title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M97.15,-54C109.86,-54 124.19,-54 138.52,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="138.92,-57.5 148.92,-54 138.92,-50.5 138.92,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M97.15,-12C109.86,-12 124.19,-12 138.52,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="138.92,-15.5 148.92,-12 138.92,-8.5 138.92,-15.5"/>
 </g>
 <!-- program~compute_length -->
 <g id="interface~~gauss_leg~~CalledByGraph_node9" class="node">
 <title>program~compute_length</title>
 <g id="a_interface~~gauss_leg~~CalledByGraph_node9"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-24 3,-24 3,0 102,0 102,-24"/>
-<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-108 3,-108 3,-84 102,-84 102,-108"/>
+<text text-anchor="middle" x="52.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="interface~~gauss_leg~~CalledByGraph_edge8" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#00ff00" d="M102.07,-12C113.57,-12 126.17,-12 138.75,-12"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="138.82,-15.5 148.82,-12 138.82,-8.5 138.82,-15.5"/>
+<path fill="none" stroke="#00ff00" d="M102.07,-96C113.57,-96 126.17,-96 138.75,-96"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="138.82,-99.5 148.82,-96 138.82,-92.5 138.82,-99.5"/>
 </g>
 <!-- program~compute_volume -->
 <g id="interface~~gauss_leg~~CalledByGraph_node10" class="node">
 <title>program~compute_volume</title>
 <g id="a_interface~~gauss_leg~~CalledByGraph_node10"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-108 0,-108 0,-84 105,-84 105,-108"/>
-<text text-anchor="middle" x="52.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-66 0,-66 0,-42 105,-42 105,-66"/>
+<text text-anchor="middle" x="52.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
 <!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="interface~~gauss_leg~~CalledByGraph_edge9" class="edge">
 <title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#0000ff" d="M105.28,-96C113.39,-96 121.99,-96 130.69,-96"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="130.93,-99.5 140.93,-96 130.93,-92.5 130.93,-99.5"/>
+<path fill="none" stroke="#0000ff" d="M105.28,-54C113.39,-54 121.99,-54 130.69,-54"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="130.93,-57.5 140.93,-54 130.93,-50.5 130.93,-57.5"/>
 </g>
 </g>
 </svg>
@@ -680,7 +680,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~51"></span>
+              <span class="anchor" id="variable-degree~50"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -784,7 +784,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~52"></span>
+              <span class="anchor" id="variable-degree~51"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -903,7 +903,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~53"></span>
+              <span class="anchor" id="variable-degree~52"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -970,7 +970,7 @@ <h4>Arguments</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/ndgrid.html b/interface/ndgrid.html
index dde38b6ee..f4f5d4de0 100644
--- a/interface/ndgrid.html
+++ b/interface/ndgrid.html
@@ -307,18 +307,18 @@ <h3 class="card-title">Called by</h3>
 <polygon fill="none" stroke="black" points="1034,-795 980,-795 980,-771 1034,-771 1034,-795"/>
 <text text-anchor="middle" x="1007" y="-780.6" font-family="Helvetica,sans-Serif" font-size="10.50">ndgrid</text>
 </g>
-<!-- proc~ansatz -->
+<!-- proc~ansatz~2 -->
 <g id="interface~~ndgrid~~CalledByGraph_node2" class="node">
-<title>proc~ansatz</title>
-<g id="a_interface~~ndgrid~~CalledByGraph_node2"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
+<title>proc~ansatz~2</title>
+<g id="a_interface~~ndgrid~~CalledByGraph_node2"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="497,-856 365,-856 365,-832 497,-832 497,-856"/>
 <text text-anchor="middle" x="431" y="-841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;interface~ndgrid -->
+<!-- proc~ansatz~2&#45;&gt;interface~ndgrid -->
 <g id="interface~~ndgrid~~CalledByGraph_edge1" class="edge">
-<title>proc~ansatz&#45;&gt;interface~ndgrid</title>
+<title>proc~ansatz~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M496.65,-831.96C515.42,-828.73 535.99,-825.46 555,-823 708.75,-803.09 893.28,-790.12 969.91,-785.21"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="970.23,-788.7 979.99,-784.57 969.79,-781.71 970.23,-788.7"/>
 </g>
@@ -331,180 +331,180 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;interface~gauss_leg -->
-<g id="interface~~ndgrid~~CalledByGraph_edge41" class="edge">
-<title>proc~ansatz&#45;&gt;interface~gauss_leg</title>
+<!-- proc~ansatz~2&#45;&gt;interface~gauss_leg -->
+<g id="interface~~ndgrid~~CalledByGraph_edge42" class="edge">
+<title>proc~ansatz~2&#45;&gt;interface~gauss_leg</title>
 <path fill="none" stroke="#ff0000" d="M471.13,-856.1C505.57,-866.75 555.57,-882.21 590.76,-893.09"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="590.13,-896.56 600.72,-896.17 592.2,-889.87 590.13,-896.56"/>
 </g>
-<!-- none~derivative -->
-<g id="interface~~ndgrid~~CalledByGraph_node15" class="node">
-<title>none~derivative</title>
-<g id="a_interface~~ndgrid~~CalledByGraph_node15"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative" xlink:title="nurbs_volume%derivative">
+<!-- none~derivative~2 -->
+<g id="interface~~ndgrid~~CalledByGraph_node17" class="node">
+<title>none~derivative~2</title>
+<g id="a_interface~~ndgrid~~CalledByGraph_node17"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative~2" xlink:title="nurbs_volume%derivative">
 <polygon fill="#a7506f" stroke="#a7506f" points="709,-856 558,-856 558,-832 709,-832 709,-856"/>
 <text text-anchor="middle" x="633.5" y="-841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;none~derivative -->
-<g id="interface~~ndgrid~~CalledByGraph_edge44" class="edge">
-<title>proc~ansatz&#45;&gt;none~derivative</title>
-<path fill="none" stroke="#ff3800" d="M497.1,-844C513.19,-844 530.68,-844 547.56,-844"/>
-<polygon fill="#ff3800" stroke="#ff3800" points="547.99,-847.5 557.99,-844 547.99,-840.5 547.99,-847.5"/>
+<!-- proc~ansatz~2&#45;&gt;none~derivative~2 -->
+<g id="interface~~ndgrid~~CalledByGraph_edge46" class="edge">
+<title>proc~ansatz~2&#45;&gt;none~derivative~2</title>
+<path fill="none" stroke="#ffaa00" d="M497.1,-844C513.19,-844 530.68,-844 547.56,-844"/>
+<polygon fill="#ffaa00" stroke="#ffaa00" points="547.99,-847.5 557.99,-844 547.99,-840.5 547.99,-847.5"/>
 </g>
-<!-- proc~ansatz~2 -->
+<!-- proc~ansatz~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_node3" class="node">
-<title>proc~ansatz~2</title>
-<g id="a_interface~~ndgrid~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
+<title>proc~ansatz~3</title>
+<g id="a_interface~~ndgrid~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="497,-979 365,-979 365,-955 497,-955 497,-979"/>
 <text text-anchor="middle" x="431" y="-964.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;interface~ndgrid -->
+<!-- proc~ansatz~3&#45;&gt;interface~ndgrid -->
 <g id="interface~~ndgrid~~CalledByGraph_edge2" class="edge">
-<title>proc~ansatz~2&#45;&gt;interface~ndgrid</title>
+<title>proc~ansatz~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M497.11,-973.23C618.71,-983.49 874.35,-998.17 944,-948 990.36,-914.61 1002.07,-842.17 1005.02,-805.39"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1008.53,-805.41 1005.68,-795.21 1001.54,-804.96 1008.53,-805.41"/>
 </g>
-<!-- proc~ansatz~2&#45;&gt;interface~gauss_leg -->
-<g id="interface~~ndgrid~~CalledByGraph_edge42" class="edge">
-<title>proc~ansatz~2&#45;&gt;interface~gauss_leg</title>
+<!-- proc~ansatz~3&#45;&gt;interface~gauss_leg -->
+<g id="interface~~ndgrid~~CalledByGraph_edge43" class="edge">
+<title>proc~ansatz~3&#45;&gt;interface~gauss_leg</title>
 <path fill="none" stroke="#ff0000" d="M471.61,-954.95C506.1,-944.46 555.92,-929.3 590.96,-918.64"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="592.33,-921.88 600.88,-915.62 590.29,-915.18 592.33,-921.88"/>
 </g>
-<!-- none~derivative~2 -->
+<!-- none~derivative~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_node18" class="node">
-<title>none~derivative~2</title>
-<g id="a_interface~~ndgrid~~CalledByGraph_node18"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~2" xlink:title="nurbs_surface%derivative">
+<title>none~derivative~3</title>
+<g id="a_interface~~ndgrid~~CalledByGraph_node18"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~3" xlink:title="nurbs_surface%derivative">
 <polygon fill="#a7506f" stroke="#a7506f" points="709,-1019 558,-1019 558,-995 709,-995 709,-1019"/>
 <text text-anchor="middle" x="633.5" y="-1004.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;none~derivative~2 -->
+<!-- proc~ansatz~3&#45;&gt;none~derivative~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge47" class="edge">
-<title>proc~ansatz~2&#45;&gt;none~derivative~2</title>
+<title>proc~ansatz~3&#45;&gt;none~derivative~3</title>
 <path fill="none" stroke="#ffe200" d="M492.16,-979C514.16,-983.39 539.25,-988.4 562.07,-992.95"/>
 <polygon fill="#ffe200" stroke="#ffe200" points="561.55,-996.41 572.04,-994.94 562.92,-989.55 561.55,-996.41"/>
 </g>
-<!-- proc~basis_vector -->
+<!-- proc~basis_vector~2 -->
 <g id="interface~~ndgrid~~CalledByGraph_node4" class="node">
-<title>proc~basis_vector</title>
-<g id="a_interface~~ndgrid~~CalledByGraph_node4"><a xlink:href="../proc/basis_vector.html" xlink:title="nurbs_volume%basis_vector">
+<title>proc~basis_vector~2</title>
+<g id="a_interface~~ndgrid~~CalledByGraph_node4"><a xlink:href="../proc/basis_vector~2.html" xlink:title="nurbs_volume%basis_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="927.5,-775 764.5,-775 764.5,-751 927.5,-751 927.5,-775"/>
 <text text-anchor="middle" x="846" y="-760.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%basis_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~basis_vector&#45;&gt;interface~ndgrid -->
+<!-- proc~basis_vector~2&#45;&gt;interface~ndgrid -->
 <g id="interface~~ndgrid~~CalledByGraph_edge3" class="edge">
-<title>proc~basis_vector&#45;&gt;interface~ndgrid</title>
+<title>proc~basis_vector~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M927.9,-773.18C942.64,-775.03 957.32,-776.88 969.91,-778.46"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="969.58,-781.95 979.94,-779.72 970.46,-775 969.58,-781.95"/>
 </g>
-<!-- proc~basis_vector~2 -->
+<!-- proc~basis_vector~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_node5" class="node">
-<title>proc~basis_vector~2</title>
-<g id="a_interface~~ndgrid~~CalledByGraph_node5"><a xlink:href="../proc/basis_vector~2.html" xlink:title="nurbs_surface%basis_vector">
+<title>proc~basis_vector~3</title>
+<g id="a_interface~~ndgrid~~CalledByGraph_node5"><a xlink:href="../proc/basis_vector~3.html" xlink:title="nurbs_surface%basis_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="927.5,-733 764.5,-733 764.5,-709 927.5,-709 927.5,-733"/>
 <text text-anchor="middle" x="846" y="-718.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%basis_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~basis_vector~2&#45;&gt;interface~ndgrid -->
+<!-- proc~basis_vector~3&#45;&gt;interface~ndgrid -->
 <g id="interface~~ndgrid~~CalledByGraph_edge4" class="edge">
-<title>proc~basis_vector~2&#45;&gt;interface~ndgrid</title>
+<title>proc~basis_vector~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M917.63,-733.05C926.67,-735.53 935.66,-738.49 944,-742 957.7,-747.77 971.63,-756.65 982.8,-764.67"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="981,-767.7 991.11,-770.85 985.17,-762.08 981,-767.7"/>
 </g>
-<!-- proc~create -->
+<!-- proc~create~2 -->
 <g id="interface~~ndgrid~~CalledByGraph_node6" class="node">
-<title>proc~create</title>
-<g id="a_interface~~ndgrid~~CalledByGraph_node6"><a xlink:href="../proc/create.html" xlink:title="nurbs_volume%create">
+<title>proc~create~2</title>
+<g id="a_interface~~ndgrid~~CalledByGraph_node6"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_volume%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="699,-651 568,-651 568,-627 699,-627 699,-651"/>
 <text text-anchor="middle" x="633.5" y="-636.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;interface~ndgrid -->
+<!-- proc~create~2&#45;&gt;interface~ndgrid -->
 <g id="interface~~ndgrid~~CalledByGraph_edge5" class="edge">
-<title>proc~create&#45;&gt;interface~ndgrid</title>
+<title>proc~create~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M689.42,-626.96C755.63,-615.67 867.52,-607.25 944,-658 979.44,-681.51 995.43,-731.57 1001.98,-760.7"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="998.6,-761.65 1004.05,-770.74 1005.46,-760.24 998.6,-761.65"/>
 </g>
-<!-- proc~create~2 -->
+<!-- proc~create~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_node7" class="node">
-<title>proc~create~2</title>
-<g id="a_interface~~ndgrid~~CalledByGraph_node7"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
+<title>proc~create~3</title>
+<g id="a_interface~~ndgrid~~CalledByGraph_node7"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="699,-276 568,-276 568,-252 699,-252 699,-276"/>
 <text text-anchor="middle" x="633.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~ndgrid -->
+<!-- proc~create~3&#45;&gt;interface~ndgrid -->
 <g id="interface~~ndgrid~~CalledByGraph_edge6" class="edge">
-<title>proc~create~2&#45;&gt;interface~ndgrid</title>
+<title>proc~create~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M658.81,-276.19C717.85,-307.15 869.46,-394.83 944,-514 994.57,-594.86 1003.99,-712.55 1005.67,-760.96"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1002.17,-761.05 1005.94,-770.96 1009.17,-760.87 1002.17,-761.05"/>
 </g>
-<!-- proc~derivative2_vector -->
+<!-- proc~derivative2_vector~2 -->
 <g id="interface~~ndgrid~~CalledByGraph_node8" class="node">
-<title>proc~derivative2_vector</title>
-<g id="a_interface~~ndgrid~~CalledByGraph_node8"><a xlink:href="../proc/derivative2_vector.html" xlink:title="nurbs_volume%derivative2_vector">
+<title>proc~derivative2_vector~2</title>
+<g id="a_interface~~ndgrid~~CalledByGraph_node8"><a xlink:href="../proc/derivative2_vector~2.html" xlink:title="nurbs_volume%derivative2_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="944,-691 748,-691 748,-667 944,-667 944,-691"/>
 <text text-anchor="middle" x="846" y="-676.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative2_vector&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative2_vector~2&#45;&gt;interface~ndgrid -->
 <g id="interface~~ndgrid~~CalledByGraph_edge7" class="edge">
-<title>proc~derivative2_vector&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative2_vector~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M926.24,-691.05C932.48,-693.51 938.49,-696.46 944,-700 967.69,-715.22 985.59,-742.87 995.92,-762.05"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="992.82,-763.66 1000.51,-770.94 999.04,-760.45 992.82,-763.66"/>
 </g>
-<!-- proc~derivative2_vector~2 -->
+<!-- proc~derivative2_vector~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_node9" class="node">
-<title>proc~derivative2_vector~2</title>
-<g id="a_interface~~ndgrid~~CalledByGraph_node9"><a xlink:href="../proc/derivative2_vector~2.html" xlink:title="nurbs_surface%derivative2_vector">
+<title>proc~derivative2_vector~3</title>
+<g id="a_interface~~ndgrid~~CalledByGraph_node9"><a xlink:href="../proc/derivative2_vector~3.html" xlink:title="nurbs_surface%derivative2_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="944,-547 748,-547 748,-523 944,-523 944,-547"/>
 <text text-anchor="middle" x="846" y="-532.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative2_vector~2&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative2_vector~3&#45;&gt;interface~ndgrid -->
 <g id="interface~~ndgrid~~CalledByGraph_edge8" class="edge">
-<title>proc~derivative2_vector~2&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative2_vector~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M864.29,-547.17C885.61,-562.95 921.74,-592.35 944,-625 973.83,-668.75 992.33,-728.92 1000.71,-760.91"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="997.32,-761.78 1003.16,-770.62 1004.1,-760.06 997.32,-761.78"/>
 </g>
-<!-- proc~derivative_vector -->
+<!-- proc~derivative_vector~2 -->
 <g id="interface~~ndgrid~~CalledByGraph_node10" class="node">
-<title>proc~derivative_vector</title>
-<g id="a_interface~~ndgrid~~CalledByGraph_node10"><a xlink:href="../proc/derivative_vector.html" xlink:title="nurbs_volume%derivative_vector">
+<title>proc~derivative_vector~2</title>
+<g id="a_interface~~ndgrid~~CalledByGraph_node10"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_volume%derivative_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="941,-855 751,-855 751,-831 941,-831 941,-855"/>
 <text text-anchor="middle" x="846" y="-840.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_vector&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative_vector~2&#45;&gt;interface~ndgrid -->
 <g id="interface~~ndgrid~~CalledByGraph_edge9" class="edge">
-<title>proc~derivative_vector&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative_vector~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M901.12,-830.95C915.29,-827.13 930.41,-822.46 944,-817 955.54,-812.37 967.66,-806.07 978.09,-800.16"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="979.88,-803.17 986.76,-795.12 976.36,-797.12 979.88,-803.17"/>
 </g>
-<!-- proc~derivative_vector~2 -->
+<!-- proc~derivative_vector~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_node11" class="node">
-<title>proc~derivative_vector~2</title>
-<g id="a_interface~~ndgrid~~CalledByGraph_node11"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_surface%derivative_vector">
+<title>proc~derivative_vector~3</title>
+<g id="a_interface~~ndgrid~~CalledByGraph_node11"><a xlink:href="../proc/derivative_vector~3.html" xlink:title="nurbs_surface%derivative_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="941,-1019 751,-1019 751,-995 941,-995 941,-1019"/>
 <text text-anchor="middle" x="846" y="-1004.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_vector~2&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative_vector~3&#45;&gt;interface~ndgrid -->
 <g id="interface~~ndgrid~~CalledByGraph_edge10" class="edge">
-<title>proc~derivative_vector~2&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative_vector~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M923.09,-994.87C930.78,-991.33 937.96,-986.79 944,-981 993.77,-933.26 1003.77,-846.19 1005.65,-805.31"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1009.15,-805.41 1005.99,-795.3 1002.16,-805.18 1009.15,-805.41"/>
 </g>
@@ -550,45 +550,45 @@ <h3 class="card-title">Called by</h3>
 <path fill="none" stroke="#ff007f" stroke-dasharray="5,2" d="M666.01,-909.14C695.37,-912.07 740.1,-916.53 777.5,-920.27"/>
 <polygon fill="#ff007f" stroke="#ff007f" points="777.54,-923.79 787.84,-921.3 778.23,-916.82 777.54,-923.79"/>
 </g>
-<!-- none~derivative&#45;&gt;proc~derivative_vector -->
-<g id="interface~~ndgrid~~CalledByGraph_edge37" class="edge">
-<title>none~derivative&#45;&gt;proc~derivative_vector</title>
-<path fill="none" stroke="#0000ff" d="M709.01,-843.65C719.23,-843.6 729.87,-843.55 740.5,-843.5"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="740.69,-847 750.68,-843.45 740.66,-840 740.69,-847"/>
-</g>
-<!-- none~derivative2 -->
-<g id="interface~~ndgrid~~CalledByGraph_node16" class="node">
-<title>none~derivative2</title>
-<g id="a_interface~~ndgrid~~CalledByGraph_node16"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2" xlink:title="nurbs_volume%derivative2">
+<!-- none~derivative2~2 -->
+<g id="interface~~ndgrid~~CalledByGraph_node15" class="node">
+<title>none~derivative2~2</title>
+<g id="a_interface~~ndgrid~~CalledByGraph_node15"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2~2" xlink:title="nurbs_volume%derivative2">
 <polygon fill="#a7506f" stroke="#a7506f" points="712,-734 555,-734 555,-710 712,-710 712,-734"/>
 <text text-anchor="middle" x="633.5" y="-719.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2</text>
 </a>
 </g>
 </g>
-<!-- none~derivative2&#45;&gt;proc~derivative2_vector -->
+<!-- none~derivative2~2&#45;&gt;proc~derivative2_vector~2 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge35" class="edge">
-<title>none~derivative2&#45;&gt;proc~derivative2_vector</title>
+<title>none~derivative2~2&#45;&gt;proc~derivative2_vector~2</title>
 <path fill="none" stroke="#00ffff" d="M693.42,-709.96C719.08,-704.72 749.35,-698.54 776.05,-693.08"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="777,-696.46 786.1,-691.03 775.6,-689.6 777,-696.46"/>
 </g>
-<!-- none~derivative2~2 -->
-<g id="interface~~ndgrid~~CalledByGraph_node17" class="node">
-<title>none~derivative2~2</title>
-<g id="a_interface~~ndgrid~~CalledByGraph_node17"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~2" xlink:title="nurbs_surface%derivative2">
+<!-- none~derivative2~3 -->
+<g id="interface~~ndgrid~~CalledByGraph_node16" class="node">
+<title>none~derivative2~3</title>
+<g id="a_interface~~ndgrid~~CalledByGraph_node16"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~3" xlink:title="nurbs_surface%derivative2">
 <polygon fill="#a7506f" stroke="#a7506f" points="712,-514 555,-514 555,-490 712,-490 712,-514"/>
 <text text-anchor="middle" x="633.5" y="-499.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2</text>
 </a>
 </g>
 </g>
-<!-- none~derivative2~2&#45;&gt;proc~derivative2_vector~2 -->
+<!-- none~derivative2~3&#45;&gt;proc~derivative2_vector~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge36" class="edge">
-<title>none~derivative2~2&#45;&gt;proc~derivative2_vector~2</title>
+<title>none~derivative2~3&#45;&gt;proc~derivative2_vector~3</title>
 <path fill="none" stroke="#007fff" d="M711.09,-514.01C726.33,-516.4 742.43,-518.92 757.99,-521.36"/>
 <polygon fill="#007fff" stroke="#007fff" points="757.69,-524.86 768.11,-522.95 758.78,-517.94 757.69,-524.86"/>
 </g>
 <!-- none~derivative~2&#45;&gt;proc~derivative_vector~2 -->
-<g id="interface~~ndgrid~~CalledByGraph_edge38" class="edge">
+<g id="interface~~ndgrid~~CalledByGraph_edge37" class="edge">
 <title>none~derivative~2&#45;&gt;proc~derivative_vector~2</title>
+<path fill="none" stroke="#0000ff" d="M709.01,-843.65C719.23,-843.6 729.87,-843.55 740.5,-843.5"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="740.69,-847 750.68,-843.45 740.66,-840 740.69,-847"/>
+</g>
+<!-- none~derivative~3&#45;&gt;proc~derivative_vector~3 -->
+<g id="interface~~ndgrid~~CalledByGraph_edge38" class="edge">
+<title>none~derivative~3&#45;&gt;proc~derivative_vector~3</title>
 <path fill="none" stroke="#7f00ff" d="M709.01,-1007C719.23,-1007 729.87,-1007 740.5,-1007"/>
 <polygon fill="#7f00ff" stroke="#7f00ff" points="740.68,-1010.5 750.68,-1007 740.68,-1003.5 740.68,-1010.5"/>
 </g>
@@ -601,9 +601,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge14" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
 <path fill="none" stroke="#ff7f00" d="M299.01,-967C317.12,-967 336.51,-967 354.68,-967"/>
 <polygon fill="#ff7f00" stroke="#ff7f00" points="354.93,-970.5 364.93,-967 354.93,-963.5 354.93,-970.5"/>
 </g>
@@ -616,53 +616,53 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge13" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
 <path fill="none" stroke="#ff0000" d="M307.2,-844C322.92,-844 339.3,-844 354.78,-844"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="354.81,-847.5 364.81,-844 354.81,-840.5 354.81,-847.5"/>
 </g>
-<!-- proc~nearest_point2 -->
+<!-- proc~nearest_point2~2 -->
 <g id="interface~~ndgrid~~CalledByGraph_node21" class="node">
-<title>proc~nearest_point2</title>
-<g id="a_interface~~ndgrid~~CalledByGraph_node21"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_volume%nearest_point2">
+<title>proc~nearest_point2~2</title>
+<g id="a_interface~~ndgrid~~CalledByGraph_node21"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_volume%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="519,-814 343,-814 343,-790 519,-790 519,-814"/>
 <text text-anchor="middle" x="431" y="-799.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2&#45;&gt;proc~create -->
+<!-- proc~nearest_point2~2&#45;&gt;proc~create~2 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge15" class="edge">
-<title>proc~nearest_point2&#45;&gt;proc~create</title>
+<title>proc~nearest_point2~2&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M495.59,-789.87C504.06,-786.36 512.17,-781.84 519,-776 547.12,-751.99 531.99,-729.94 555,-701 568.84,-683.59 588.43,-667.97 604.45,-656.77"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="606.62,-659.53 612.93,-651.01 602.69,-653.74 606.62,-659.53"/>
 </g>
-<!-- proc~nearest_point2&#45;&gt;none~derivative2 -->
-<g id="interface~~ndgrid~~CalledByGraph_edge45" class="edge">
-<title>proc~nearest_point2&#45;&gt;none~derivative2</title>
-<path fill="none" stroke="#ff7100" d="M477.15,-789.94C490.75,-785.92 505.61,-781.15 519,-776 547.33,-765.1 578.39,-750.1 600.85,-738.67"/>
-<polygon fill="#ff7100" stroke="#ff7100" points="602.61,-741.7 609.91,-734.02 599.42,-735.47 602.61,-741.7"/>
+<!-- proc~nearest_point2~2&#45;&gt;none~derivative2~2 -->
+<g id="interface~~ndgrid~~CalledByGraph_edge44" class="edge">
+<title>proc~nearest_point2~2&#45;&gt;none~derivative2~2</title>
+<path fill="none" stroke="#ff3800" d="M477.15,-789.94C490.75,-785.92 505.61,-781.15 519,-776 547.33,-765.1 578.39,-750.1 600.85,-738.67"/>
+<polygon fill="#ff3800" stroke="#ff3800" points="602.61,-741.7 609.91,-734.02 599.42,-735.47 602.61,-741.7"/>
 </g>
-<!-- proc~nearest_point2~2 -->
+<!-- proc~nearest_point2~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_node22" class="node">
-<title>proc~nearest_point2~2</title>
-<g id="a_interface~~ndgrid~~CalledByGraph_node22"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_surface%nearest_point2">
+<title>proc~nearest_point2~3</title>
+<g id="a_interface~~ndgrid~~CalledByGraph_node22"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_surface%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="519,-482 343,-482 343,-458 519,-458 519,-482"/>
 <text text-anchor="middle" x="431" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2~2&#45;&gt;proc~create~2 -->
+<!-- proc~nearest_point2~3&#45;&gt;proc~create~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge23" class="edge">
-<title>proc~nearest_point2~2&#45;&gt;proc~create~2</title>
+<title>proc~nearest_point2~3&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M493.2,-457.85C502.39,-454.33 511.34,-449.81 519,-444 574.68,-401.74 610.05,-323.62 624.72,-285.73"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="628.07,-286.77 628.31,-276.18 621.52,-284.31 628.07,-286.77"/>
 </g>
-<!-- proc~nearest_point2~2&#45;&gt;none~derivative2~2 -->
-<g id="interface~~ndgrid~~CalledByGraph_edge46" class="edge">
-<title>proc~nearest_point2~2&#45;&gt;none~derivative2~2</title>
-<path fill="none" stroke="#ffaa00" d="M507.23,-482.01C520.25,-484.08 533.86,-486.26 547.13,-488.37"/>
-<polygon fill="#ffaa00" stroke="#ffaa00" points="546.76,-491.86 557.18,-489.98 547.86,-484.95 546.76,-491.86"/>
+<!-- proc~nearest_point2~3&#45;&gt;none~derivative2~3 -->
+<g id="interface~~ndgrid~~CalledByGraph_edge45" class="edge">
+<title>proc~nearest_point2~3&#45;&gt;none~derivative2~3</title>
+<path fill="none" stroke="#ff7100" d="M507.23,-482.01C520.25,-484.08 533.86,-486.26 547.13,-488.37"/>
+<polygon fill="#ff7100" stroke="#ff7100" points="546.76,-491.86 557.18,-489.98 547.86,-484.95 546.76,-491.86"/>
 </g>
 <!-- program~example3_surface -->
 <g id="interface~~ndgrid~~CalledByGraph_node23" class="node">
@@ -673,9 +673,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~create~2 -->
+<!-- program~example3_surface&#45;&gt;proc~create~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge24" class="edge">
-<title>program~example3_surface&#45;&gt;proc~create~2</title>
+<title>program~example3_surface&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M486.03,-381.48C497.32,-378.47 508.86,-374.43 519,-369 559.43,-347.35 596.45,-307.83 616.6,-283.93"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="619.33,-286.13 623.01,-276.19 613.94,-281.67 619.33,-286.13"/>
 </g>
@@ -688,9 +688,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~create -->
+<!-- program~example3_volume&#45;&gt;proc~create~2 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge16" class="edge">
-<title>program~example3_volume&#45;&gt;proc~create</title>
+<title>program~example3_volume&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M486.05,-711.29C497.12,-708.45 508.56,-705.03 519,-701 549.93,-689.06 582.94,-670.27 605.34,-656.5"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="607.33,-659.39 613.96,-651.13 603.62,-653.45 607.33,-659.39"/>
 </g>
@@ -703,9 +703,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~create~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~create~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge25" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~create~2</title>
+<title>program~example_nurbs_surface&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M491.63,-335.88C500.92,-333.34 510.31,-330.39 519,-327 550.19,-314.84 583.39,-295.58 605.78,-281.56"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="607.82,-284.41 614.38,-276.09 604.06,-278.5 607.82,-284.41"/>
 </g>
@@ -718,9 +718,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~create -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~create~2 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge17" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~create</title>
+<title>program~example_nurbs_volume&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M490.8,-667.98C513.65,-663.3 539.99,-657.92 563.71,-653.07"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="564.6,-656.46 573.7,-651.02 563.2,-649.6 564.6,-656.46"/>
 </g>
@@ -733,9 +733,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~create~2 -->
+<!-- program~example_ppm1&#45;&gt;proc~create~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge26" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~create~2</title>
+<title>program~example_ppm1&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M478.25,-296.31C504.01,-290.92 536.55,-284.1 565.09,-278.12"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="565.94,-281.52 575.01,-276.04 564.5,-274.67 565.94,-281.52"/>
 </g>
@@ -748,9 +748,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~create~2 -->
+<!-- program~example_ppm2&#45;&gt;proc~create~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge27" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~create~2</title>
+<title>program~example_ppm2&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M478.25,-264C501.84,-264 531.11,-264 557.79,-264"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="557.87,-267.5 567.87,-264 557.87,-260.5 557.87,-267.5"/>
 </g>
@@ -763,9 +763,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~create~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~create~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge28" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~create~2</title>
+<title>program~example_ppm3&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M478.25,-231.69C504.01,-237.08 536.55,-243.9 565.09,-249.88"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="564.5,-253.33 575.01,-251.96 565.94,-246.48 564.5,-253.33"/>
 </g>
@@ -778,15 +778,15 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~create~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~create~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge29" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~create~2</title>
+<title>program~nearest_point_2d&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M275.52,-447.91C348.37,-444.12 478.62,-434.26 519,-411 570.4,-381.39 606.54,-318.42 622.81,-285.33"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="626.07,-286.63 627.21,-276.09 619.75,-283.61 626.07,-286.63"/>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge51" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
 <path fill="none" stroke="#38ff00" d="M275.67,-454.94C293.02,-456.64 313.05,-458.59 332.82,-460.52"/>
 <polygon fill="#38ff00" stroke="#38ff00" points="332.51,-464 342.8,-461.49 333.19,-457.04 332.51,-464"/>
 </g>
@@ -799,9 +799,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~create~2 -->
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~create~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge30" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~create~2</title>
+<title>program~nearest_point_2d_bench&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M491.63,-192.12C500.92,-194.66 510.31,-197.61 519,-201 550.19,-213.16 583.39,-232.42 605.78,-246.44"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="604.06,-249.5 614.38,-251.91 607.82,-243.59 604.06,-249.5"/>
 </g>
@@ -814,15 +814,15 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~create -->
+<!-- program~nearest_point_3d&#45;&gt;proc~create~2 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge18" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~create</title>
+<title>program~nearest_point_3d&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M275.67,-779.62C348.39,-775.49 478.1,-765.19 519,-743 540.61,-731.28 537.32,-718.09 555,-701 571.41,-685.14 591.59,-669.09 607.24,-657.3"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="609.49,-659.99 615.42,-651.21 605.31,-654.37 609.49,-659.99"/>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge50" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
 <path fill="none" stroke="#71ff00" d="M275.67,-786.94C293.02,-788.64 313.05,-790.59 332.82,-792.52"/>
 <polygon fill="#71ff00" stroke="#71ff00" points="332.51,-796 342.8,-793.49 333.19,-789.04 332.51,-796"/>
 </g>
@@ -835,9 +835,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~create~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~create~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge31" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~create~2</title>
+<title>program~shape_c_2d&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M469.05,-142.66C485.09,-145.74 503.66,-150.78 519,-159 559.43,-180.65 596.45,-220.17 616.6,-244.07"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="613.94,-246.33 623.01,-251.81 619.33,-241.87 613.94,-246.33"/>
 </g>
@@ -850,9 +850,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~create -->
+<!-- program~shape_c_3d&#45;&gt;proc~create~2 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge19" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~create</title>
+<title>program~shape_c_3d&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M469.24,-638.19C494.07,-638.31 527.56,-638.48 557.75,-638.63"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="557.83,-642.13 567.85,-638.68 557.87,-635.13 557.83,-642.13"/>
 </g>
@@ -865,9 +865,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~create~2 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~create~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge32" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~create~2</title>
+<title>program~shape_half_ring_2d&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M488.59,-103.78C499.23,-106.83 509.87,-111.08 519,-117 568.53,-149.1 605.26,-210.46 622.17,-242.82"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="619.12,-244.54 626.78,-251.87 625.36,-241.37 619.12,-244.54"/>
 </g>
@@ -880,9 +880,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~create -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~create~2 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge20" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~create</title>
+<title>program~shape_half_ring_3d&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M488.12,-608.04C512.46,-613.26 541.14,-619.41 566.49,-624.84"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="565.88,-628.29 576.4,-626.97 567.35,-621.45 565.88,-628.29"/>
 </g>
@@ -895,9 +895,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~create -->
+<!-- program~shape_hexahedron&#45;&gt;proc~create~2 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge21" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~create</title>
+<title>program~shape_hexahedron&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M487.94,-565.08C498.42,-567.83 509.17,-571.13 519,-575 550.45,-587.38 583.85,-607.11 606.21,-621.4"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="604.5,-624.45 614.79,-626.96 608.3,-618.58 604.5,-624.45"/>
 </g>
@@ -910,9 +910,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~create~2 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~create~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge33" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~create~2</title>
+<title>program~shape_ring_2d&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M476.04,-57.73C490.78,-60.69 506.6,-65.9 519,-75 577.9,-118.26 612.08,-202.13 625.65,-241.96"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="622.34,-243.12 628.79,-251.53 628.99,-240.94 622.34,-243.12"/>
 </g>
@@ -925,9 +925,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~create -->
+<!-- program~shape_ring_3d&#45;&gt;proc~create~2 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge22" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~create</title>
+<title>program~shape_ring_3d&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M476.08,-518.07C490.35,-521.21 505.87,-525.93 519,-533 559.56,-554.84 596.53,-594.75 616.64,-618.87"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="614,-621.16 623.03,-626.69 619.42,-616.73 614,-621.16"/>
 </g>
@@ -940,24 +940,24 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~create~2 -->
+<!-- program~shape_tetragon&#45;&gt;proc~create~3 -->
 <g id="interface~~ndgrid~~CalledByGraph_edge34" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~create~2</title>
+<title>program~shape_tetragon&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M479.18,-15.71C493.16,-18.72 507.72,-23.96 519,-33 587.93,-88.22 618.08,-195.88 628.24,-242.08"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="624.83,-242.88 630.31,-251.95 631.68,-241.44 624.83,-242.88"/>
 </g>
-<!-- proc~ansatz~3 -->
+<!-- proc~ansatz -->
 <g id="interface~~ndgrid~~CalledByGraph_node41" class="node">
-<title>proc~ansatz~3</title>
-<g id="a_interface~~ndgrid~~CalledByGraph_node41"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
+<title>proc~ansatz</title>
+<g id="a_interface~~ndgrid~~CalledByGraph_node41"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="492,-918 370,-918 370,-894 492,-894 492,-918"/>
 <text text-anchor="middle" x="431" y="-903.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;interface~gauss_leg -->
-<g id="interface~~ndgrid~~CalledByGraph_edge43" class="edge">
-<title>proc~ansatz~3&#45;&gt;interface~gauss_leg</title>
+<!-- proc~ansatz&#45;&gt;interface~gauss_leg -->
+<g id="interface~~ndgrid~~CalledByGraph_edge41" class="edge">
+<title>proc~ansatz&#45;&gt;interface~gauss_leg</title>
 <path fill="none" stroke="#ff0000" d="M492.16,-906C524,-906 562.31,-906 590.86,-906"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="590.9,-909.5 600.9,-906 590.9,-902.5 590.9,-909.5"/>
 </g>
@@ -1000,9 +1000,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="interface~~ndgrid~~CalledByGraph_edge52" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
 <path fill="none" stroke="#ff0000" d="M299.01,-906C318.84,-906 340.21,-906 359.82,-906"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="359.9,-909.5 369.9,-906 359.9,-902.5 359.9,-909.5"/>
 </g>
@@ -1292,7 +1292,7 @@ <h4>Arguments</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/nearest_point_help_1d.html b/interface/nearest_point_help_1d.html
index eb73a13c7..a08847f7a 100644
--- a/interface/nearest_point_help_1d.html
+++ b/interface/nearest_point_help_1d.html
@@ -162,33 +162,33 @@ <h3 class="card-title">Called by</h3>
 <polygon fill="none" stroke="black" points="669,-44 537,-44 537,-20 669,-20 669,-44"/>
 <text text-anchor="middle" x="603" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">nearest_point_help_1d</text>
 </g>
-<!-- proc~nearest_point~3 -->
+<!-- proc~nearest_point -->
 <g id="interface~~nearest_point_help_1d~~CalledByGraph_node2" class="node">
-<title>proc~nearest_point~3</title>
-<g id="a_interface~~nearest_point_help_1d~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point~3.html" xlink:title="nurbs_curve%nearest_point">
+<title>proc~nearest_point</title>
+<g id="a_interface~~nearest_point_help_1d~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point.html" xlink:title="nurbs_curve%nearest_point">
 <polygon fill="#d9534f" stroke="#d9534f" points="501,-44 341,-44 341,-20 501,-20 501,-44"/>
 <text text-anchor="middle" x="421" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point~3&#45;&gt;interface~nearest_point_help_1d -->
+<!-- proc~nearest_point&#45;&gt;interface~nearest_point_help_1d -->
 <g id="interface~~nearest_point_help_1d~~CalledByGraph_edge1" class="edge">
-<title>proc~nearest_point~3&#45;&gt;interface~nearest_point_help_1d</title>
+<title>proc~nearest_point&#45;&gt;interface~nearest_point_help_1d</title>
 <path fill="none" stroke="#ff0000" d="M501.21,-32C509.66,-32 518.24,-32 526.64,-32"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="526.78,-35.5 536.78,-32 526.78,-28.5 526.78,-35.5"/>
 </g>
-<!-- proc~nearest_point2~3 -->
+<!-- proc~nearest_point2 -->
 <g id="interface~~nearest_point_help_1d~~CalledByGraph_node3" class="node">
-<title>proc~nearest_point2~3</title>
-<g id="a_interface~~nearest_point_help_1d~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_curve%nearest_point2">
+<title>proc~nearest_point2</title>
+<g id="a_interface~~nearest_point_help_1d~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_curve%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="305,-24 139,-24 139,0 305,0 305,-24"/>
 <text text-anchor="middle" x="222" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2~3&#45;&gt;proc~nearest_point~3 -->
+<!-- proc~nearest_point2&#45;&gt;proc~nearest_point -->
 <g id="interface~~nearest_point_help_1d~~CalledByGraph_edge2" class="edge">
-<title>proc~nearest_point2~3&#45;&gt;proc~nearest_point~3</title>
+<title>proc~nearest_point2&#45;&gt;proc~nearest_point</title>
 <path fill="none" stroke="#ff0000" d="M305.12,-20.34C313.62,-21.2 322.28,-22.08 330.86,-22.95"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="330.55,-26.44 340.86,-23.97 331.26,-19.47 330.55,-26.44"/>
 </g>
@@ -201,15 +201,15 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point~3 -->
+<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point -->
 <g id="interface~~nearest_point_help_1d~~CalledByGraph_edge3" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~nearest_point~3</title>
+<title>program~nearest_point_1d&#45;&gt;proc~nearest_point</title>
 <path fill="none" stroke="#ff0000" d="M103.27,-32.68C115,-32.82 127.44,-32.93 139,-33 212.78,-33.43 231.22,-33.32 305,-33 313.32,-32.96 321.99,-32.91 330.66,-32.85"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="330.84,-36.35 340.82,-32.78 330.79,-29.35 330.84,-36.35"/>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2~3 -->
+<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2 -->
 <g id="interface~~nearest_point_help_1d~~CalledByGraph_edge4" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2~3</title>
+<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2</title>
 <path fill="none" stroke="#ff0000" d="M103.06,-26C111.3,-25.02 120.05,-23.98 128.92,-22.93"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="129.45,-26.39 138.97,-21.74 128.63,-19.44 129.45,-26.39"/>
 </g>
@@ -319,7 +319,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~27"></span>
+              <span class="anchor" id="variable-f_ng~9"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -334,7 +334,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xg~15"></span>
+              <span class="anchor" id="variable-f_xg~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -349,7 +349,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_point_xg~3"></span>
+              <span class="anchor" id="variable-f_point_xg"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -365,7 +365,7 @@ <h3>Arguments</h3>
     </tbody>
   </table>
 
-      <h3>Return Value <span class="anchor" id="variable-f_distances~3"></span><small>real(kind=rk),allocatable,(:)</small></h3>
+      <h3>Return Value <span class="anchor" id="variable-f_distances"></span><small>real(kind=rk),allocatable,(:)</small></h3>
     
     <br>
 
@@ -387,7 +387,7 @@ <h3>Return Value <span class="anchor" id="variable-f_distances~3"></span><small>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/nearest_point_help_2d.html b/interface/nearest_point_help_2d.html
index 4c0b91d24..2facba80d 100644
--- a/interface/nearest_point_help_2d.html
+++ b/interface/nearest_point_help_2d.html
@@ -162,33 +162,33 @@ <h3 class="card-title">Called by</h3>
 <polygon fill="none" stroke="black" points="688,-66 556,-66 556,-42 688,-42 688,-66"/>
 <text text-anchor="middle" x="622" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nearest_point_help_2d</text>
 </g>
-<!-- proc~nearest_point~2 -->
+<!-- proc~nearest_point~3 -->
 <g id="interface~~nearest_point_help_2d~~CalledByGraph_node2" class="node">
-<title>proc~nearest_point~2</title>
-<g id="a_interface~~nearest_point_help_2d~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point~2.html" xlink:title="nurbs_surface%nearest_point">
+<title>proc~nearest_point~3</title>
+<g id="a_interface~~nearest_point_help_2d~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point~3.html" xlink:title="nurbs_surface%nearest_point">
 <polygon fill="#d9534f" stroke="#d9534f" points="520,-66 351,-66 351,-42 520,-42 520,-66"/>
 <text text-anchor="middle" x="435.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point~2&#45;&gt;interface~nearest_point_help_2d -->
+<!-- proc~nearest_point~3&#45;&gt;interface~nearest_point_help_2d -->
 <g id="interface~~nearest_point_help_2d~~CalledByGraph_edge1" class="edge">
-<title>proc~nearest_point~2&#45;&gt;interface~nearest_point_help_2d</title>
+<title>proc~nearest_point~3&#45;&gt;interface~nearest_point_help_2d</title>
 <path fill="none" stroke="#ff0000" d="M520.11,-54C528.65,-54 537.29,-54 545.74,-54"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="545.92,-57.5 555.92,-54 545.92,-50.5 545.92,-57.5"/>
 </g>
-<!-- proc~nearest_point2~2 -->
+<!-- proc~nearest_point2~3 -->
 <g id="interface~~nearest_point_help_2d~~CalledByGraph_node3" class="node">
-<title>proc~nearest_point2~2</title>
-<g id="a_interface~~nearest_point_help_2d~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_surface%nearest_point2">
+<title>proc~nearest_point2~3</title>
+<g id="a_interface~~nearest_point_help_2d~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_surface%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="315,-66 139,-66 139,-42 315,-42 315,-66"/>
 <text text-anchor="middle" x="227" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2~2&#45;&gt;proc~nearest_point~2 -->
+<!-- proc~nearest_point2~3&#45;&gt;proc~nearest_point~3 -->
 <g id="interface~~nearest_point_help_2d~~CalledByGraph_edge2" class="edge">
-<title>proc~nearest_point2~2&#45;&gt;proc~nearest_point~2</title>
+<title>proc~nearest_point2~3&#45;&gt;proc~nearest_point~3</title>
 <path fill="none" stroke="#ff0000" d="M315.28,-54C323.65,-54 332.17,-54 340.6,-54"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="340.83,-57.5 350.83,-54 340.83,-50.5 340.83,-57.5"/>
 </g>
@@ -201,15 +201,15 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point~3 -->
 <g id="interface~~nearest_point_help_2d~~CalledByGraph_edge3" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point~2</title>
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point~3</title>
 <path fill="none" stroke="#ff0000" d="M103.27,-74.68C115,-74.82 127.44,-74.93 139,-75 217.22,-75.45 237.07,-81.8 315,-75 332.28,-73.49 350.81,-70.78 367.99,-67.8"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="368.71,-71.23 377.93,-66.02 367.47,-64.34 368.71,-71.23"/>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
 <g id="interface~~nearest_point_help_2d~~CalledByGraph_edge5" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
 <path fill="none" stroke="#ff0000" d="M103.15,-68.16C111.29,-67.22 119.94,-66.23 128.75,-65.21"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="129.19,-68.68 138.73,-64.06 128.39,-61.73 129.19,-68.68"/>
 </g>
@@ -222,9 +222,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~nearest_point~2 -->
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~nearest_point~3 -->
 <g id="interface~~nearest_point_help_2d~~CalledByGraph_edge4" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~nearest_point~2</title>
+<title>program~nearest_point_2d_bench&#45;&gt;proc~nearest_point~3</title>
 <path fill="none" stroke="#ff0000" d="M287.17,-24.04C311.58,-29 340.04,-34.79 365.4,-39.95"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="364.82,-43.4 375.32,-41.96 366.21,-36.54 364.82,-43.4"/>
 </g>
@@ -334,7 +334,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~18"></span>
+              <span class="anchor" id="variable-f_ng~27"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -349,7 +349,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xg~10"></span>
+              <span class="anchor" id="variable-f_xg~15"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -364,7 +364,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_point_xg~2"></span>
+              <span class="anchor" id="variable-f_point_xg~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -380,7 +380,7 @@ <h3>Arguments</h3>
     </tbody>
   </table>
 
-      <h3>Return Value <span class="anchor" id="variable-f_distances~2"></span><small>real(kind=rk),allocatable,(:)</small></h3>
+      <h3>Return Value <span class="anchor" id="variable-f_distances~3"></span><small>real(kind=rk),allocatable,(:)</small></h3>
     
     <br>
 
@@ -402,7 +402,7 @@ <h3>Return Value <span class="anchor" id="variable-f_distances~2"></span><small>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/nearest_point_help_3d.html b/interface/nearest_point_help_3d.html
index 1a03b2b34..2a83d6213 100644
--- a/interface/nearest_point_help_3d.html
+++ b/interface/nearest_point_help_3d.html
@@ -162,33 +162,33 @@ <h3 class="card-title">Called by</h3>
 <polygon fill="none" stroke="black" points="688,-44 556,-44 556,-20 688,-20 688,-44"/>
 <text text-anchor="middle" x="622" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">nearest_point_help_3d</text>
 </g>
-<!-- proc~nearest_point -->
+<!-- proc~nearest_point~2 -->
 <g id="interface~~nearest_point_help_3d~~CalledByGraph_node2" class="node">
-<title>proc~nearest_point</title>
-<g id="a_interface~~nearest_point_help_3d~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point.html" xlink:title="nurbs_volume%nearest_point">
+<title>proc~nearest_point~2</title>
+<g id="a_interface~~nearest_point_help_3d~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point~2.html" xlink:title="nurbs_volume%nearest_point">
 <polygon fill="#d9534f" stroke="#d9534f" points="520,-44 351,-44 351,-20 520,-20 520,-44"/>
 <text text-anchor="middle" x="435.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point&#45;&gt;interface~nearest_point_help_3d -->
+<!-- proc~nearest_point~2&#45;&gt;interface~nearest_point_help_3d -->
 <g id="interface~~nearest_point_help_3d~~CalledByGraph_edge1" class="edge">
-<title>proc~nearest_point&#45;&gt;interface~nearest_point_help_3d</title>
+<title>proc~nearest_point~2&#45;&gt;interface~nearest_point_help_3d</title>
 <path fill="none" stroke="#ff0000" d="M520.11,-32C528.65,-32 537.29,-32 545.74,-32"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="545.92,-35.5 555.92,-32 545.92,-28.5 545.92,-35.5"/>
 </g>
-<!-- proc~nearest_point2 -->
+<!-- proc~nearest_point2~2 -->
 <g id="interface~~nearest_point_help_3d~~CalledByGraph_node3" class="node">
-<title>proc~nearest_point2</title>
-<g id="a_interface~~nearest_point_help_3d~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_volume%nearest_point2">
+<title>proc~nearest_point2~2</title>
+<g id="a_interface~~nearest_point_help_3d~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_volume%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="315,-24 139,-24 139,0 315,0 315,-24"/>
 <text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2&#45;&gt;proc~nearest_point -->
+<!-- proc~nearest_point2~2&#45;&gt;proc~nearest_point~2 -->
 <g id="interface~~nearest_point_help_3d~~CalledByGraph_edge2" class="edge">
-<title>proc~nearest_point2&#45;&gt;proc~nearest_point</title>
+<title>proc~nearest_point2~2&#45;&gt;proc~nearest_point~2</title>
 <path fill="none" stroke="#ff0000" d="M315.28,-20.45C323.65,-21.26 332.17,-22.09 340.6,-22.91"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="340.54,-26.42 350.83,-23.9 341.21,-19.45 340.54,-26.42"/>
 </g>
@@ -201,15 +201,15 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point~2 -->
 <g id="interface~~nearest_point_help_3d~~CalledByGraph_edge3" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point</title>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point~2</title>
 <path fill="none" stroke="#ff0000" d="M103.27,-32.68C115,-32.82 127.44,-32.93 139,-33 217.22,-33.45 236.78,-33.33 315,-33 323.35,-32.97 332.03,-32.92 340.73,-32.86"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="340.95,-36.36 350.93,-32.79 340.9,-29.36 340.95,-36.36"/>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
 <g id="interface~~nearest_point_help_3d~~CalledByGraph_edge4" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
 <path fill="none" stroke="#ff0000" d="M103.15,-26.16C111.29,-25.22 119.94,-24.23 128.75,-23.21"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="129.19,-26.68 138.73,-22.06 128.39,-19.73 129.19,-26.68"/>
 </g>
@@ -319,7 +319,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~9"></span>
+              <span class="anchor" id="variable-f_ng~18"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -334,7 +334,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xg~5"></span>
+              <span class="anchor" id="variable-f_xg~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -349,7 +349,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_point_xg"></span>
+              <span class="anchor" id="variable-f_point_xg~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -365,7 +365,7 @@ <h3>Arguments</h3>
     </tbody>
   </table>
 
-      <h3>Return Value <span class="anchor" id="variable-f_distances"></span><small>real(kind=rk),allocatable,(:)</small></h3>
+      <h3>Return Value <span class="anchor" id="variable-f_distances~2"></span><small>real(kind=rk),allocatable,(:)</small></h3>
     
     <br>
 
@@ -387,7 +387,7 @@ <h3>Return Value <span class="anchor" id="variable-f_distances"></span><small>re
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/interface/unique.html b/interface/unique.html
index 898069177..f2ae6e1c1 100644
--- a/interface/unique.html
+++ b/interface/unique.html
@@ -304,239 +304,239 @@ <h3 class="card-title">Called by</h3>
 <!-- interface~unique -->
 <g id="interface~~unique~~CalledByGraph_node1" class="node">
 <title>interface~unique</title>
-<polygon fill="none" stroke="black" points="754,-124 700,-124 700,-100 754,-100 754,-124"/>
-<text text-anchor="middle" x="727" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50">unique</text>
+<polygon fill="none" stroke="black" points="754,-146 700,-146 700,-122 754,-122 754,-146"/>
+<text text-anchor="middle" x="727" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50">unique</text>
 </g>
 <!-- proc~ansatz -->
 <g id="interface~~unique~~CalledByGraph_node2" class="node">
 <title>proc~ansatz</title>
-<g id="a_interface~~unique~~CalledByGraph_node2"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-246 343,-246 343,-222 475,-222 475,-246"/>
-<text text-anchor="middle" x="409" y="-231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_interface~~unique~~CalledByGraph_node2"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="470,-246 348,-246 348,-222 470,-222 470,-246"/>
+<text text-anchor="middle" x="409" y="-231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;interface~unique -->
 <g id="interface~~unique~~CalledByGraph_edge1" class="edge">
 <title>proc~ansatz&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M475.04,-236.81C529.23,-236.23 606.56,-228.42 664,-194 687.86,-179.71 705.64,-152.43 715.91,-133.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="719.16,-134.6 720.59,-124.11 712.92,-131.42 719.16,-134.6"/>
+<path fill="none" stroke="#ff0000" d="M470.05,-242.77C524.1,-247.71 604.01,-247.47 664,-215 688.38,-201.8 706.13,-174.46 716.24,-155.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="719.38,-156.75 720.7,-146.24 713.11,-153.63 719.38,-156.75"/>
 </g>
 <!-- proc~cmp_elem -->
 <g id="interface~~unique~~CalledByGraph_node5" class="node">
 <title>proc~cmp_elem</title>
-<g id="a_interface~~unique~~CalledByGraph_node5"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_volume%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-185 511,-185 511,-161 664,-161 664,-185"/>
-<text text-anchor="middle" x="587.5" y="-170.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
+<g id="a_interface~~unique~~CalledByGraph_node5"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_curve%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="659,-206 516,-206 516,-182 659,-182 659,-206"/>
+<text text-anchor="middle" x="587.5" y="-191.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
 <g id="interface~~unique~~CalledByGraph_edge10" class="edge">
 <title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#00ffff" d="M444.87,-221.95C472.67,-212.34 511.79,-198.82 541.88,-188.42"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="543.39,-191.6 551.7,-185.03 541.11,-184.99 543.39,-191.6"/>
+<path fill="none" stroke="#00ffff" d="M462.96,-222C481.98,-217.69 503.62,-212.78 523.42,-208.3"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="524.3,-211.69 533.28,-206.06 522.75,-204.86 524.3,-211.69"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="interface~~unique~~CalledByGraph_node3" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_interface~~unique~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-124 343,-124 343,-100 475,-100 475,-124"/>
-<text text-anchor="middle" x="409" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_interface~~unique~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-166 343,-166 343,-142 475,-142 475,-166"/>
+<text text-anchor="middle" x="409" y="-151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;interface~unique -->
 <g id="interface~~unique~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz~2&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M475.2,-112.74C487.11,-112.85 499.43,-112.94 511,-113 579,-113.34 596,-113.55 664,-113 672.25,-112.93 681.12,-112.82 689.49,-112.69"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="689.81,-116.18 699.76,-112.52 689.7,-109.18 689.81,-116.18"/>
+<path fill="none" stroke="#ff0000" d="M475.09,-149.88C540,-145.77 637.35,-139.61 689.66,-136.3"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="690.05,-139.78 699.8,-135.66 689.6,-132.8 690.05,-139.78"/>
 </g>
 <!-- proc~cmp_elem~2 -->
 <g id="interface~~unique~~CalledByGraph_node6" class="node">
 <title>proc~cmp_elem~2</title>
-<g id="a_interface~~unique~~CalledByGraph_node6"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_surface%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-104 511,-104 511,-80 664,-80 664,-104"/>
-<text text-anchor="middle" x="587.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
+<g id="a_interface~~unique~~CalledByGraph_node6"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_volume%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-126 511,-126 511,-102 664,-102 664,-126"/>
+<text text-anchor="middle" x="587.5" y="-111.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;proc~cmp_elem~2 -->
-<g id="interface~~unique~~CalledByGraph_edge13" class="edge">
+<g id="interface~~unique~~CalledByGraph_edge12" class="edge">
 <title>proc~ansatz~2&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#0000ff" d="M475.22,-104.61C483.55,-103.67 492.17,-102.69 500.76,-101.72"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="501.27,-105.18 510.81,-100.58 500.48,-98.22 501.27,-105.18"/>
+<path fill="none" stroke="#0000ff" d="M462.96,-142C481.98,-137.69 503.62,-132.78 523.42,-128.3"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="524.3,-131.69 533.28,-126.06 522.75,-124.86 524.3,-131.69"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="interface~~unique~~CalledByGraph_node4" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_interface~~unique~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="470,-44 348,-44 348,-20 470,-20 470,-44"/>
-<text text-anchor="middle" x="409" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_interface~~unique~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-44 343,-44 343,-20 475,-20 475,-44"/>
+<text text-anchor="middle" x="409" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;interface~unique -->
 <g id="interface~~unique~~CalledByGraph_edge3" class="edge">
 <title>proc~ansatz~3&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M470.12,-33.97C522.8,-37.38 600.63,-46.54 664,-71 678.2,-76.48 692.47,-85.61 703.74,-93.87"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="701.64,-96.67 711.72,-99.94 705.88,-91.1 701.64,-96.67"/>
+<path fill="none" stroke="#ff0000" d="M464.43,-44.01C533.47,-59.42 645.78,-85.08 664,-93 677.63,-98.93 691.55,-107.82 702.74,-115.81"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="700.94,-118.84 711.07,-121.96 705.1,-113.2 700.94,-118.84"/>
 </g>
 <!-- proc~cmp_elem~3 -->
 <g id="interface~~unique~~CalledByGraph_node7" class="node">
 <title>proc~cmp_elem~3</title>
-<g id="a_interface~~unique~~CalledByGraph_node7"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_curve%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="659,-24 516,-24 516,0 659,0 659,-24"/>
-<text text-anchor="middle" x="587.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
+<g id="a_interface~~unique~~CalledByGraph_node7"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_surface%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-44 511,-44 511,-20 664,-20 664,-44"/>
+<text text-anchor="middle" x="587.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;proc~cmp_elem~3 -->
 <g id="interface~~unique~~CalledByGraph_edge15" class="edge">
 <title>proc~ansatz~3&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#ff00ff" d="M470.25,-25.17C481.72,-23.87 493.89,-22.49 505.87,-21.14"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="506.33,-24.61 515.88,-20 505.54,-17.65 506.33,-24.61"/>
+<path fill="none" stroke="#ff00ff" d="M475.22,-32C483.55,-32 492.17,-32 500.76,-32"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="500.81,-35.5 510.81,-32 500.81,-28.5 500.81,-35.5"/>
 </g>
 <!-- proc~cmp_elem&#45;&gt;interface~unique -->
 <g id="interface~~unique~~CalledByGraph_edge4" class="edge">
 <title>proc~cmp_elem&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M625.83,-160.96C638.15,-156.65 651.81,-151.48 664,-146 675.06,-141.03 686.81,-134.83 697.08,-129.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="699.07,-131.99 706.03,-124.01 695.6,-125.91 699.07,-131.99"/>
+<path fill="none" stroke="#ff0000" d="M627.79,-181.88C639.59,-177.87 652.46,-173.11 664,-168 675.09,-163.09 686.85,-156.91 697.11,-151.17"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="699.1,-154.06 706.06,-146.07 695.63,-147.98 699.1,-154.06"/>
 </g>
 <!-- proc~cmp_elem~2&#45;&gt;interface~unique -->
 <g id="interface~~unique~~CalledByGraph_edge5" class="edge">
 <title>proc~cmp_elem~2&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M664.09,-102.99C673.03,-104.29 681.81,-105.57 689.82,-106.74"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="689.47,-110.22 699.87,-108.2 690.47,-103.3 689.47,-110.22"/>
+<path fill="none" stroke="#ff0000" d="M664.09,-124.99C673.03,-126.29 681.81,-127.57 689.82,-128.74"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="689.47,-132.22 699.87,-130.2 690.47,-125.3 689.47,-132.22"/>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;interface~unique -->
 <g id="interface~~unique~~CalledByGraph_edge6" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M636.3,-24.07C645.94,-27.69 655.66,-32.26 664,-38 684.51,-52.11 702.08,-74.75 713.23,-91.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="710.35,-93.26 718.74,-99.73 716.22,-89.44 710.35,-93.26"/>
+<path fill="none" stroke="#ff0000" d="M634.75,-44.11C644.9,-47.95 655.22,-52.84 664,-59 684.65,-73.49 702.31,-96.6 713.44,-113.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="710.58,-115.36 718.92,-121.89 716.47,-111.58 710.58,-115.36"/>
 </g>
 <!-- proc~cmp_area -->
 <g id="interface~~unique~~CalledByGraph_node8" class="node">
 <title>proc~cmp_area</title>
 <g id="a_interface~~unique~~CalledByGraph_node8"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-104 149,-104 149,-80 299,-80 299,-104"/>
-<text text-anchor="middle" x="224" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-24 149,-24 149,0 299,0 299,-24"/>
+<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="interface~~unique~~CalledByGraph_edge8" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ffff00" d="M299.17,-100.11C310.24,-101.32 321.67,-102.57 332.77,-103.78"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="332.52,-107.27 342.85,-104.88 333.29,-100.31 332.52,-107.27"/>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="interface~~unique~~CalledByGraph_edge9" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#00ff00" d="M299.17,-20.11C310.24,-21.32 321.67,-22.57 332.77,-23.78"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="332.52,-27.27 342.85,-24.88 333.29,-20.31 332.52,-27.27"/>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~2 -->
-<g id="interface~~unique~~CalledByGraph_edge14" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#0000ff" d="M299.28,-91.27C313.78,-91.16 328.86,-91.06 343,-91 401.67,-90.75 416.33,-90.74 475,-91 483.35,-91.04 492.05,-91.09 500.74,-91.15"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="500.9,-94.65 510.93,-91.23 500.96,-87.65 500.9,-94.65"/>
+<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~3 -->
+<g id="interface~~unique~~CalledByGraph_edge16" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~cmp_elem~3</title>
+<path fill="none" stroke="#ff00ff" d="M299.01,-7.95C348.85,-6.14 416.01,-5.49 475,-11 490.85,-12.48 507.8,-15.12 523.58,-18.03"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="523.28,-21.54 533.76,-19.98 524.59,-14.66 523.28,-21.54"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="interface~~unique~~CalledByGraph_node9" class="node">
 <title>proc~cmp_length</title>
 <g id="a_interface~~unique~~CalledByGraph_node9"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-24 149,-24 149,0 299,0 299,-24"/>
-<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-216 149,-216 149,-192 299,-192 299,-216"/>
+<text text-anchor="middle" x="224" y="-201.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="interface~~unique~~CalledByGraph_edge9" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#00ff00" d="M299.17,-20.11C311.91,-21.5 325.12,-22.94 337.76,-24.32"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="337.43,-27.81 347.75,-25.42 338.19,-20.85 337.43,-27.81"/>
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
+<g id="interface~~unique~~CalledByGraph_edge7" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M298.38,-216.03C311.32,-218.15 324.78,-220.36 337.64,-222.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="337.37,-225.97 347.8,-224.13 338.5,-219.06 337.37,-225.97"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~cmp_elem~3 -->
-<g id="interface~~unique~~CalledByGraph_edge16" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#ff00ff" d="M299.28,-11.27C313.78,-11.16 328.86,-11.06 343,-11 401.67,-10.75 416.33,-10.74 475,-11 484.87,-11.04 495.24,-11.11 505.51,-11.19"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="505.69,-14.69 515.72,-11.27 505.75,-7.69 505.69,-14.69"/>
+<!-- proc~cmp_length&#45;&gt;proc~cmp_elem -->
+<g id="interface~~unique~~CalledByGraph_edge11" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~cmp_elem</title>
+<path fill="none" stroke="#00ffff" d="M299.03,-201.95C359.2,-200.29 443.95,-197.94 505.84,-196.23"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="506.05,-199.73 515.95,-195.95 505.86,-192.73 506.05,-199.73"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="interface~~unique~~CalledByGraph_node10" class="node">
 <title>proc~cmp_volume</title>
 <g id="a_interface~~unique~~CalledByGraph_node10"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-226 141,-226 141,-202 307,-202 307,-226"/>
-<text text-anchor="middle" x="224" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-155 141,-155 141,-131 307,-131 307,-155"/>
+<text text-anchor="middle" x="224" y="-140.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="interface~~unique~~CalledByGraph_edge7" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.13,-222.98C315.64,-223.91 324.26,-224.85 332.7,-225.77"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="332.54,-229.27 342.87,-226.88 333.31,-222.32 332.54,-229.27"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="interface~~unique~~CalledByGraph_edge8" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ffff00" d="M307.13,-147.94C315.64,-148.45 324.26,-148.97 332.7,-149.47"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="332.67,-152.98 342.87,-150.08 333.09,-145.99 332.67,-152.98"/>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem -->
-<g id="interface~~unique~~CalledByGraph_edge11" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#00ffff" d="M307.03,-204.7C364.93,-198.13 442.31,-189.35 500.97,-182.7"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="501.42,-186.17 510.96,-181.57 500.63,-179.22 501.42,-186.17"/>
+<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="interface~~unique~~CalledByGraph_edge13" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#0000ff" d="M307.2,-135.96C319.21,-134.96 331.42,-133.94 343,-133 395.37,-128.74 454.09,-124.15 500.74,-120.55"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="501.11,-124.03 510.81,-119.78 500.57,-117.05 501.11,-124.03"/>
 </g>
 <!-- program~example3_volume -->
 <g id="interface~~unique~~CalledByGraph_node11" class="node">
 <title>program~example3_volume</title>
 <g id="a_interface~~unique~~CalledByGraph_node11"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="464,-166 354,-166 354,-142 464,-142 464,-166"/>
-<text text-anchor="middle" x="409" y="-151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="464,-86 354,-86 354,-62 464,-62 464,-86"/>
+<text text-anchor="middle" x="409" y="-71.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~cmp_elem -->
-<g id="interface~~unique~~CalledByGraph_edge12" class="edge">
-<title>program~example3_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#00ffff" d="M464.4,-159.86C475.87,-161.09 488.24,-162.42 500.56,-163.75"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="500.55,-167.27 510.87,-164.86 501.3,-160.31 500.55,-167.27"/>
+<!-- program~example3_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="interface~~unique~~CalledByGraph_edge14" class="edge">
+<title>program~example3_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#0000ff" d="M462.96,-86C481.98,-90.31 503.62,-95.22 523.42,-99.7"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="522.75,-103.14 533.28,-101.94 524.3,-96.31 522.75,-103.14"/>
 </g>
 <!-- program~compute_area -->
 <g id="interface~~unique~~CalledByGraph_node12" class="node">
 <title>program~compute_area</title>
 <g id="a_interface~~unique~~CalledByGraph_node12"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-104 8,-104 8,-80 97,-80 97,-104"/>
-<text text-anchor="middle" x="52.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-24 8,-24 8,0 97,0 97,-24"/>
+<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
 <!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="interface~~unique~~CalledByGraph_edge17" class="edge">
 <title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M97.15,-92C109.86,-92 124.19,-92 138.52,-92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="138.92,-95.5 148.92,-92 138.92,-88.5 138.92,-95.5"/>
+<path fill="none" stroke="#ff0000" d="M97.15,-12C109.86,-12 124.19,-12 138.52,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="138.92,-15.5 148.92,-12 138.92,-8.5 138.92,-15.5"/>
 </g>
 <!-- program~compute_length -->
 <g id="interface~~unique~~CalledByGraph_node13" class="node">
 <title>program~compute_length</title>
 <g id="a_interface~~unique~~CalledByGraph_node13"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-24 3,-24 3,0 102,0 102,-24"/>
-<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-216 3,-216 3,-192 102,-192 102,-216"/>
+<text text-anchor="middle" x="52.5" y="-201.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="interface~~unique~~CalledByGraph_edge18" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#7fff00" d="M102.07,-12C113.57,-12 126.17,-12 138.75,-12"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="138.82,-15.5 148.82,-12 138.82,-8.5 138.82,-15.5"/>
+<path fill="none" stroke="#7fff00" d="M102.07,-204C113.57,-204 126.17,-204 138.75,-204"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="138.82,-207.5 148.82,-204 138.82,-200.5 138.82,-207.5"/>
 </g>
 <!-- program~compute_volume -->
 <g id="interface~~unique~~CalledByGraph_node14" class="node">
 <title>program~compute_volume</title>
 <g id="a_interface~~unique~~CalledByGraph_node14"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-226 0,-226 0,-202 105,-202 105,-226"/>
-<text text-anchor="middle" x="52.5" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-155 0,-155 0,-131 105,-131 105,-155"/>
+<text text-anchor="middle" x="52.5" y="-140.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
 <!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="interface~~unique~~CalledByGraph_edge19" class="edge">
 <title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#00ffff" d="M105.28,-214C113.39,-214 121.99,-214 130.69,-214"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="130.93,-217.5 140.93,-214 130.93,-210.5 130.93,-217.5"/>
+<path fill="none" stroke="#00ffff" d="M105.28,-143C113.39,-143 121.99,-143 130.69,-143"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="130.93,-146.5 140.93,-143 130.93,-139.5 130.93,-146.5"/>
 </g>
 </g>
 </svg>
@@ -744,7 +744,7 @@ <h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/lists/files.html b/lists/files.html
index 98591164b..1c086a9f8 100644
--- a/lists/files.html
+++ b/lists/files.html
@@ -795,7 +795,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/lists/modules.html b/lists/modules.html
index 0b9036a1f..29775105e 100644
--- a/lists/modules.html
+++ b/lists/modules.html
@@ -1567,7 +1567,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/lists/procedures.html b/lists/procedures.html
index de1817765..ecd538280 100644
--- a/lists/procedures.html
+++ b/lists/procedures.html
@@ -73,19 +73,19 @@ <h1>Procedures</h1>
 			 <tbody>
 			   <tr>
                  <td><a href='../proc/ansatz.html'>ansatz</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/ansatz~2.html'>ansatz</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/ansatz~3.html'>ansatz</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
@@ -115,37 +115,37 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/basis_scalar.html'>basis_scalar</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/basis_scalar~2.html'>basis_scalar</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/basis_scalar~3.html'>basis_scalar</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/basis_vector.html'>basis_vector</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/basis_vector~2.html'>basis_vector</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/basis_vector~3.html'>basis_vector</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
@@ -163,19 +163,19 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_degree.html'>cmp_degree</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_degree~2.html'>cmp_degree</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_degree~3.html'>cmp_degree</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
@@ -187,55 +187,55 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_elem.html'>cmp_elem</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_elem~2.html'>cmp_elem</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_elem~3.html'>cmp_elem</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_elem_xc_vis.html'>cmp_elem_Xc_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_elem_xc_vis~2.html'>cmp_elem_Xc_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_elem_xc_vis~3.html'>cmp_elem_Xc_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_elem_xg_vis.html'>cmp_elem_Xg_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_elem_xg_vis~2.html'>cmp_elem_Xg_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_elem_xg_vis~3.html'>cmp_elem_Xg_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
@@ -301,19 +301,19 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_nc.html'>cmp_nc</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_nc~2.html'>cmp_nc</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_nc~3.html'>cmp_nc</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
@@ -325,37 +325,37 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_xg.html'>cmp_Xg</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_xg~2.html'>cmp_Xg</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/cmp_xg~3.html'>cmp_Xg</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../interface/compute_d2tgc.html'>compute_d2Tgc</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Interface</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../interface/compute_d2tgc~2.html'>compute_d2Tgc</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Interface</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../interface/compute_d2tgc~3.html'>compute_d2Tgc</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Interface</td>
                  <td></td>
                </tr>
@@ -433,19 +433,19 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../interface/compute_dtgc.html'>compute_dTgc</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Interface</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../interface/compute_dtgc~2.html'>compute_dTgc</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Interface</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../interface/compute_dtgc~3.html'>compute_dTgc</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Interface</td>
                  <td></td>
                </tr>
@@ -547,19 +547,19 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../interface/compute_tgc.html'>compute_Tgc</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Interface</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../interface/compute_tgc~2.html'>compute_Tgc</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Interface</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../interface/compute_tgc~3.html'>compute_Tgc</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Interface</td>
                  <td></td>
                </tr>
@@ -637,19 +637,19 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../interface/compute_xg.html'>compute_Xg</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Interface</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../interface/compute_xg~2.html'>compute_Xg</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Interface</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../interface/compute_xg~3.html'>compute_Xg</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Interface</td>
                  <td></td>
                </tr>
@@ -727,91 +727,91 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/create.html'>create</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/create~2.html'>create</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/create~3.html'>create</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/derivative2_scalar.html'>derivative2_scalar</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/derivative2_scalar~2.html'>derivative2_scalar</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/derivative2_scalar~3.html'>derivative2_scalar</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/derivative2_vector.html'>derivative2_vector</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/derivative2_vector~2.html'>derivative2_vector</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/derivative2_vector~3.html'>derivative2_vector</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/derivative_scalar.html'>derivative_scalar</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/derivative_scalar~2.html'>derivative_scalar</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/derivative_scalar~3.html'>derivative_scalar</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/derivative_vector.html'>derivative_vector</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/derivative_vector~2.html'>derivative_vector</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/derivative_vector~3.html'>derivative_vector</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
@@ -847,19 +847,19 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/elevate_degree.html'>elevate_degree</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/elevate_degree~2.html'>elevate_degree</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/elevate_degree~3.html'>elevate_degree</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
@@ -871,37 +871,37 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/export_xc.html'>export_Xc</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/export_xc~2.html'>export_Xc</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/export_xc~3.html'>export_Xc</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/export_xg.html'>export_Xg</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/export_xg~2.html'>export_Xg</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/export_xg~3.html'>export_Xg</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
@@ -913,19 +913,19 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/finalize.html'>finalize</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/finalize~2.html'>finalize</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/finalize~3.html'>finalize</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
@@ -961,7 +961,7 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/generate_xc.html'>generate_Xc</a></td>
-                 <td><a href='../program/example_nurbs_volume.html'>example_nurbs_volume</a></td>
+                 <td><a href='../program/example_nurbs_curve.html'>example_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
@@ -973,37 +973,37 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/generate_xc~3.html'>generate_Xc</a></td>
-                 <td><a href='../program/example_nurbs_curve.html'>example_nurbs_curve</a></td>
+                 <td><a href='../program/example_nurbs_surface.html'>example_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/generate_xc~4.html'>generate_Xc</a></td>
-                 <td><a href='../program/example_nurbs_surface.html'>example_nurbs_surface</a></td>
+                 <td><a href='../program/example3_volume.html'>example3_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/generate_xc~5.html'>generate_Xc</a></td>
-                 <td><a href='../program/example3_volume.html'>example3_volume</a></td>
+                 <td><a href='../program/example_nurbs_volume.html'>example_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_continuity.html'>get_continuity</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_continuity~2.html'>get_continuity</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_continuity~3.html'>get_continuity</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
@@ -1039,109 +1039,109 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_elem.html'>get_elem</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_elem~2.html'>get_elem</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_elem~3.html'>get_elem</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_elem_xc_vis.html'>get_elem_Xc_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_elem_xc_vis~2.html'>get_elem_Xc_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_elem_xc_vis~3.html'>get_elem_Xc_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_elem_xg_vis.html'>get_elem_Xg_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_elem_xg_vis~2.html'>get_elem_Xg_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_elem_xg_vis~3.html'>get_elem_Xg_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_knot_all.html'>get_knot_all</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_knot_all~2.html'>get_knot_all</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_knot_all~3.html'>get_knot_all</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_knoti.html'>get_knoti</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_knoti~2.html'>get_knoti</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_knoti~3.html'>get_knoti</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_multiplicity.html'>get_multiplicity</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_multiplicity~2.html'>get_multiplicity</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_multiplicity~3.html'>get_multiplicity</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
@@ -1177,181 +1177,181 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_ng.html'>get_ng</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_ng~2.html'>get_ng</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_ng~3.html'>get_ng</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_wc_all.html'>get_Wc_all</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_wc_all~2.html'>get_Wc_all</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_wc_all~3.html'>get_Wc_all</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_wci.html'>get_Wci</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_wci~2.html'>get_Wci</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_wci~3.html'>get_Wci</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xc_all.html'>get_Xc_all</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xc_all~2.html'>get_Xc_all</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xc_all~3.html'>get_Xc_all</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xci.html'>get_Xci</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xci~2.html'>get_Xci</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xci~3.html'>get_Xci</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xcid.html'>get_Xcid</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xcid~2.html'>get_Xcid</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xcid~3.html'>get_Xcid</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xg_all.html'>get_Xg_all</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xg_all~2.html'>get_Xg_all</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xg_all~3.html'>get_Xg_all</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xgi.html'>get_Xgi</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xgi~2.html'>get_Xgi</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xgi~3.html'>get_Xgi</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xgid.html'>get_Xgid</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xgid~2.html'>get_Xgid</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xgid~3.html'>get_Xgid</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xt.html'>get_Xt</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xt~2.html'>get_Xt</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/get_xt~3.html'>get_Xt</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
@@ -1369,19 +1369,19 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/insert_knots.html'>insert_knots</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/insert_knots~2.html'>insert_knots</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/insert_knots~3.html'>insert_knots</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
@@ -1393,19 +1393,19 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/is_rational.html'>is_rational</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/is_rational~2.html'>is_rational</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/is_rational~3.html'>is_rational</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Function</td>
                  <td></td>
                </tr>
@@ -1429,37 +1429,37 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/modify_wc.html'>modify_Wc</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/modify_wc~2.html'>modify_Wc</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/modify_wc~3.html'>modify_Wc</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/modify_xc.html'>modify_Xc</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/modify_xc~2.html'>modify_Xc</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/modify_xc~3.html'>modify_Xc</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
@@ -1483,37 +1483,37 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/nearest_point.html'>nearest_point</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/nearest_point~2.html'>nearest_point</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/nearest_point~3.html'>nearest_point</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/nearest_point2.html'>nearest_point2</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/nearest_point2~2.html'>nearest_point2</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/nearest_point2~3.html'>nearest_point2</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
@@ -1561,19 +1561,19 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/remove_knots.html'>remove_knots</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/remove_knots~2.html'>remove_knots</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/remove_knots~3.html'>remove_knots</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
@@ -1591,37 +1591,37 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/rotate_xc.html'>rotate_Xc</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/rotate_xc~2.html'>rotate_Xc</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/rotate_xc~3.html'>rotate_Xc</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/rotate_xg.html'>rotate_Xg</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/rotate_xg~2.html'>rotate_Xg</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/rotate_xg~3.html'>rotate_Xg</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
@@ -1633,97 +1633,97 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/set1.html'>set1</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td>Subroutine</td>
+                 <td><p>Set knot vector, control points and weights for the NURBS curve object.</p></td>
+               </tr>
+			   <tr>
+                 <td><a href='../proc/set1~2.html'>set1</a></td>
                  <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td><p>Set control points and weights for the NURBS volume object.</p></td>
                </tr>
 			   <tr>
-                 <td><a href='../proc/set1~2.html'>set1</a></td>
+                 <td><a href='../proc/set1~3.html'>set1</a></td>
                  <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td><p>Set knot vectors, control points and weights for the NURBS surface object.</p></td>
                </tr>
 			   <tr>
-                 <td><a href='../proc/set1~3.html'>set1</a></td>
+                 <td><a href='../proc/set1a.html'>set1a</a></td>
                  <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td><p>Set knot vector, control points and weights for the NURBS curve object.</p></td>
                </tr>
 			   <tr>
-                 <td><a href='../proc/set1a.html'>set1a</a></td>
+                 <td><a href='../proc/set2.html'>set2</a></td>
                  <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
-                 <td><p>Set knot vector, control points and weights for the NURBS curve object.</p></td>
+                 <td><p>Set NURBS curve using nodes of parameter space (Xth), degree, continuity, control points and weights.</p></td>
                </tr>
 			   <tr>
-                 <td><a href='../proc/set2.html'>set2</a></td>
+                 <td><a href='../proc/set2~2.html'>set2</a></td>
                  <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td><p>Set control points and weights for the NURBS volume object.</p></td>
                </tr>
 			   <tr>
-                 <td><a href='../proc/set2~2.html'>set2</a></td>
+                 <td><a href='../proc/set2~3.html'>set2</a></td>
                  <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td><p>Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights</p></td>
                </tr>
 			   <tr>
-                 <td><a href='../proc/set2~3.html'>set2</a></td>
+                 <td><a href='../proc/set3.html'>set3</a></td>
                  <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
-                 <td><p>Set NURBS curve using nodes of parameter space (Xth), degree, continuity, control points and weights.</p></td>
+                 <td><p>Set Bezier or Rational Bezier curve using control points and weights.</p></td>
                </tr>
 			   <tr>
-                 <td><a href='../proc/set3.html'>set3</a></td>
+                 <td><a href='../proc/set3~2.html'>set3</a></td>
                  <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td><p>Set Bezier or Rational Bezier volume using control points and weights.</p></td>
                </tr>
 			   <tr>
-                 <td><a href='../proc/set3~2.html'>set3</a></td>
+                 <td><a href='../proc/set3~3.html'>set3</a></td>
                  <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td><p>Set Bezier or Rational Bezier surface using control points and weights.</p></td>
-               </tr>
-			   <tr>
-                 <td><a href='../proc/set3~3.html'>set3</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
-                 <td>Subroutine</td>
-                 <td><p>Set Bezier or Rational Bezier curve using control points and weights.</p></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/set4.html'>set4</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/set4~2.html'>set4</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/set4~3.html'>set4</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/set_c.html'>set_C</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/set_c~2.html'>set_C</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/set_c~3.html'>set_C</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
@@ -1735,55 +1735,55 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/set_elem.html'>set_elem</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/set_elem~2.html'>set_elem</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/set_elem~3.html'>set_elem</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/set_elem_xc_vis.html'>set_elem_Xc_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/set_elem_xc_vis~2.html'>set_elem_Xc_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/set_elem_xc_vis~3.html'>set_elem_Xc_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/set_elem_xg_vis.html'>set_elem_Xg_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/set_elem_xg_vis~2.html'>set_elem_Xg_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/set_elem_xg_vis~3.html'>set_elem_Xg_vis</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
@@ -1831,19 +1831,19 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/show.html'>show</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/show~2.html'>show</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/show~3.html'>show</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
@@ -1855,37 +1855,37 @@ <h1>Procedures</h1>
                </tr>
 			   <tr>
                  <td><a href='../proc/translate_xc.html'>translate_Xc</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/translate_xc~2.html'>translate_Xc</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/translate_xc~3.html'>translate_Xc</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/translate_xg.html'>translate_Xg</a></td>
-                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
+                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/translate_xg~2.html'>translate_Xg</a></td>
-                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
+                 <td><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
 			   <tr>
                  <td><a href='../proc/translate_xg~3.html'>translate_Xg</a></td>
-                 <td><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></td>
+                 <td><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></td>
                  <td>Subroutine</td>
                  <td></td>
                </tr>
@@ -1914,17 +1914,17 @@ <h1>Procedures</h1>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: call~~graph~~CallGraph Pages: 1 -->
-<svg id="callgraphCallGraph" width="855pt" height="3168pt"
- viewBox="0.00 0.00 855.00 3168.11" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="call~~graph~~CallGraph" class="graph" transform="scale(2.41 2.41) rotate(0) translate(4 7618)">
+<svg id="callgraphCallGraph" width="855pt" height="3322pt"
+ viewBox="0.00 0.00 855.00 3321.91" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="call~~graph~~CallGraph" class="graph" transform="scale(2.41 2.41) rotate(0) translate(4 7988)">
 <title>call~~graph~~CallGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-7618 2053,-7618 2053,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-7988 2053,-7988 2053,4 -4,4"/>
 <!-- interface~compute_d2tgc -->
 <g id="call~~graph~~CallGraph_node1" class="node">
 <title>interface~compute_d2tgc</title>
 <g id="a_call~~graph~~CallGraph_node1"><a xlink:href="../interface/compute_d2tgc.html" xlink:title="compute_d2Tgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1267,-6507 1169,-6507 1169,-6483 1267,-6483 1267,-6507"/>
-<text text-anchor="middle" x="1218" y="-6492.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1267,-6596 1169,-6596 1169,-6572 1267,-6572 1267,-6596"/>
+<text text-anchor="middle" x="1218" y="-6581.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
 </a>
 </g>
 </g>
@@ -1932,8 +1932,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node2" class="node">
 <title>interface~compute_d2tgc~2</title>
 <g id="a_call~~graph~~CallGraph_node2"><a xlink:href="../interface/compute_d2tgc~2.html" xlink:title="compute_d2Tgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1267,-1818 1169,-1818 1169,-1794 1267,-1794 1267,-1818"/>
-<text text-anchor="middle" x="1218" y="-1803.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1267,-4969 1169,-4969 1169,-4945 1267,-4945 1267,-4969"/>
+<text text-anchor="middle" x="1218" y="-4954.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
 </a>
 </g>
 </g>
@@ -1941,8 +1941,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node3" class="node">
 <title>interface~compute_d2tgc~3</title>
 <g id="a_call~~graph~~CallGraph_node3"><a xlink:href="../interface/compute_d2tgc~3.html" xlink:title="compute_d2Tgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1267,-55 1169,-55 1169,-31 1267,-31 1267,-55"/>
-<text text-anchor="middle" x="1218" y="-40.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1267,-2355 1169,-2355 1169,-2331 1267,-2331 1267,-2355"/>
+<text text-anchor="middle" x="1218" y="-2340.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
 </a>
 </g>
 </g>
@@ -1950,8 +1950,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node4" class="node">
 <title>interface~compute_dtgc</title>
 <g id="a_call~~graph~~CallGraph_node4"><a xlink:href="../interface/compute_dtgc.html" xlink:title="compute_dTgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1263.5,-6311 1172.5,-6311 1172.5,-6287 1263.5,-6287 1263.5,-6311"/>
-<text text-anchor="middle" x="1218" y="-6296.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1263.5,-5799 1172.5,-5799 1172.5,-5775 1263.5,-5775 1263.5,-5799"/>
+<text text-anchor="middle" x="1218" y="-5784.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
 </a>
 </g>
 </g>
@@ -1959,8 +1959,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node5" class="node">
 <title>interface~compute_dtgc~2</title>
 <g id="a_call~~graph~~CallGraph_node5"><a xlink:href="../interface/compute_dtgc~2.html" xlink:title="compute_dTgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1263.5,-4000 1172.5,-4000 1172.5,-3976 1263.5,-3976 1263.5,-4000"/>
-<text text-anchor="middle" x="1218" y="-3985.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1263.5,-5236 1172.5,-5236 1172.5,-5212 1263.5,-5212 1263.5,-5236"/>
+<text text-anchor="middle" x="1218" y="-5221.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
 </a>
 </g>
 </g>
@@ -1968,8 +1968,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node6" class="node">
 <title>interface~compute_dtgc~3</title>
 <g id="a_call~~graph~~CallGraph_node6"><a xlink:href="../interface/compute_dtgc~3.html" xlink:title="compute_dTgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1263.5,-2638 1172.5,-2638 1172.5,-2614 1263.5,-2614 1263.5,-2638"/>
-<text text-anchor="middle" x="1218" y="-2623.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1263.5,-4521 1172.5,-4521 1172.5,-4497 1263.5,-4497 1263.5,-4521"/>
+<text text-anchor="middle" x="1218" y="-4506.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
 </a>
 </g>
 </g>
@@ -1977,8 +1977,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node7" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_call~~graph~~CallGraph_node7"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1883,-2613 1759,-2613 1759,-2589 1883,-2589 1883,-2613"/>
-<text text-anchor="middle" x="1821" y="-2598.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1883,-3715 1759,-3715 1759,-3691 1883,-3691 1883,-3715"/>
+<text text-anchor="middle" x="1821" y="-3700.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
@@ -1986,38 +1986,38 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node121" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_call~~graph~~CallGraph_node121"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="2049,-2634 1919,-2634 1919,-2610 2049,-2610 2049,-2634"/>
-<text text-anchor="middle" x="1984" y="-2619.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="2049,-3736 1919,-3736 1919,-3712 2049,-3712 2049,-3736"/>
+<text text-anchor="middle" x="1984" y="-3721.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="call~~graph~~CallGraph_edge1" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff1900" stroke-dasharray="5,2" d="M1883.33,-2609C1891.69,-2610.09 1900.35,-2611.22 1908.92,-2612.34"/>
-<polygon fill="#ff1900" stroke="#ff1900" points="1908.53,-2615.82 1918.9,-2613.64 1909.44,-2608.88 1908.53,-2615.82"/>
+<path fill="none" stroke="#ff1900" stroke-dasharray="5,2" d="M1883.33,-3711C1891.69,-3712.09 1900.35,-3713.22 1908.92,-3714.34"/>
+<polygon fill="#ff1900" stroke="#ff1900" points="1908.53,-3717.82 1918.9,-3715.64 1909.44,-3710.88 1908.53,-3717.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="call~~graph~~CallGraph_node122" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_call~~graph~~CallGraph_node122"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="2049,-2592 1919,-2592 1919,-2568 2049,-2568 2049,-2592"/>
-<text text-anchor="middle" x="1984" y="-2577.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="2049,-3694 1919,-3694 1919,-3670 2049,-3670 2049,-3694"/>
+<text text-anchor="middle" x="1984" y="-3679.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="call~~graph~~CallGraph_edge2" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff1900" stroke-dasharray="5,2" d="M1883.33,-2593C1891.69,-2591.91 1900.35,-2590.78 1908.92,-2589.66"/>
-<polygon fill="#ff1900" stroke="#ff1900" points="1909.44,-2593.12 1918.9,-2588.36 1908.53,-2586.18 1909.44,-2593.12"/>
+<path fill="none" stroke="#ff1900" stroke-dasharray="5,2" d="M1883.33,-3695C1891.69,-3693.91 1900.35,-3692.78 1908.92,-3691.66"/>
+<polygon fill="#ff1900" stroke="#ff1900" points="1909.44,-3695.12 1918.9,-3690.36 1908.53,-3688.18 1909.44,-3695.12"/>
 </g>
 <!-- interface~compute_tgc -->
 <g id="call~~graph~~CallGraph_node8" class="node">
 <title>interface~compute_tgc</title>
 <g id="a_call~~graph~~CallGraph_node8"><a xlink:href="../interface/compute_tgc.html" xlink:title="compute_Tgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1260.5,-6564 1175.5,-6564 1175.5,-6540 1260.5,-6540 1260.5,-6564"/>
-<text text-anchor="middle" x="1218" y="-6549.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1260.5,-6533 1175.5,-6533 1175.5,-6509 1260.5,-6509 1260.5,-6533"/>
+<text text-anchor="middle" x="1218" y="-6518.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc</text>
 </a>
 </g>
 </g>
@@ -2025,8 +2025,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node9" class="node">
 <title>interface~compute_tgc~2</title>
 <g id="a_call~~graph~~CallGraph_node9"><a xlink:href="../interface/compute_tgc~2.html" xlink:title="compute_Tgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1260.5,-6071 1175.5,-6071 1175.5,-6047 1260.5,-6047 1260.5,-6071"/>
-<text text-anchor="middle" x="1218" y="-6056.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1260.5,-5526 1175.5,-5526 1175.5,-5502 1260.5,-5502 1260.5,-5526"/>
+<text text-anchor="middle" x="1218" y="-5511.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc</text>
 </a>
 </g>
 </g>
@@ -2034,8 +2034,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node10" class="node">
 <title>interface~compute_tgc~3</title>
 <g id="a_call~~graph~~CallGraph_node10"><a xlink:href="../interface/compute_tgc~3.html" xlink:title="compute_Tgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1260.5,-622 1175.5,-622 1175.5,-598 1260.5,-598 1260.5,-622"/>
-<text text-anchor="middle" x="1218" y="-607.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1260.5,-2439 1175.5,-2439 1175.5,-2415 1260.5,-2415 1260.5,-2439"/>
+<text text-anchor="middle" x="1218" y="-2424.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc</text>
 </a>
 </g>
 </g>
@@ -2043,8 +2043,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node11" class="node">
 <title>interface~compute_xg</title>
 <g id="a_call~~graph~~CallGraph_node11"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
-<polygon fill="#a7506f" stroke="#a7506f" points="1030,-6374 951,-6374 951,-6350 1030,-6350 1030,-6374"/>
-<text text-anchor="middle" x="990.5" y="-6359.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1030,-6432 951,-6432 951,-6408 1030,-6408 1030,-6432"/>
+<text text-anchor="middle" x="990.5" y="-6417.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
@@ -2052,8 +2052,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node12" class="node">
 <title>interface~compute_xg~2</title>
 <g id="a_call~~graph~~CallGraph_node12"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
-<polygon fill="#a7506f" stroke="#a7506f" points="1030,-2184 951,-2184 951,-2160 1030,-2160 1030,-2184"/>
-<text text-anchor="middle" x="990.5" y="-2169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1030,-4702 951,-4702 951,-4678 1030,-4678 1030,-4702"/>
+<text text-anchor="middle" x="990.5" y="-4687.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
@@ -2061,8 +2061,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node13" class="node">
 <title>interface~compute_xg~3</title>
 <g id="a_call~~graph~~CallGraph_node13"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
-<polygon fill="#a7506f" stroke="#a7506f" points="1030,-247 951,-247 951,-223 1030,-223 1030,-247"/>
-<text text-anchor="middle" x="990.5" y="-232.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1030,-2540 951,-2540 951,-2516 1030,-2516 1030,-2540"/>
+<text text-anchor="middle" x="990.5" y="-2525.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
@@ -2070,8 +2070,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node14" class="node">
 <title>interface~dyad</title>
 <g id="a_call~~graph~~CallGraph_node14"><a xlink:href="../interface/dyad.html" xlink:title="dyad">
-<polygon fill="#a7506f" stroke="#a7506f" points="788,-2882 734,-2882 734,-2858 788,-2858 788,-2882"/>
-<text text-anchor="middle" x="761" y="-2867.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dyad</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="788,-5864 734,-5864 734,-5840 788,-5840 788,-5864"/>
+<text text-anchor="middle" x="761" y="-5849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dyad</text>
 </a>
 </g>
 </g>
@@ -2079,23 +2079,23 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node163" class="node">
 <title>proc~dyad_t1_t1</title>
 <g id="a_call~~graph~~CallGraph_node163"><a xlink:href="../proc/dyad_t1_t1.html" xlink:title="dyad_t1_t1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1025.5,-2760 955.5,-2760 955.5,-2736 1025.5,-2736 1025.5,-2760"/>
-<text text-anchor="middle" x="990.5" y="-2745.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dyad_t1_t1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1025.5,-5900 955.5,-5900 955.5,-5876 1025.5,-5876 1025.5,-5900"/>
+<text text-anchor="middle" x="990.5" y="-5885.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dyad_t1_t1</text>
 </a>
 </g>
 </g>
 <!-- interface~dyad&#45;&gt;proc~dyad_t1_t1 -->
 <g id="call~~graph~~CallGraph_edge3" class="edge">
 <title>interface~dyad&#45;&gt;proc~dyad_t1_t1</title>
-<path fill="none" stroke="#ff3600" stroke-dasharray="5,2" d="M788.39,-2870.17C808.67,-2868.97 836.29,-2864.29 855,-2849 885.19,-2824.33 860.66,-2793.49 891,-2769 906.15,-2756.77 926.77,-2751.21 945.22,-2748.82"/>
-<polygon fill="#ff3600" stroke="#ff3600" points="945.61,-2752.3 955.2,-2747.81 944.9,-2745.34 945.61,-2752.3"/>
+<path fill="none" stroke="#ff3600" stroke-dasharray="5,2" d="M788.1,-5856.13C826.4,-5862.19 898.35,-5873.58 945.07,-5880.97"/>
+<polygon fill="#ff3600" stroke="#ff3600" points="944.79,-5884.47 955.21,-5882.57 945.88,-5877.55 944.79,-5884.47"/>
 </g>
 <!-- interface~elemconn_c0 -->
 <g id="call~~graph~~CallGraph_node15" class="node">
 <title>interface~elemconn_c0</title>
 <g id="a_call~~graph~~CallGraph_node15"><a xlink:href="../interface/elemconn_c0.html" xlink:title="elemConn_C0">
-<polygon fill="#a7506f" stroke="#a7506f" points="1261.5,-2699 1174.5,-2699 1174.5,-2675 1261.5,-2675 1261.5,-2699"/>
-<text text-anchor="middle" x="1218" y="-2684.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1261.5,-4165 1174.5,-4165 1174.5,-4141 1261.5,-4141 1261.5,-4165"/>
+<text text-anchor="middle" x="1218" y="-4150.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
 </a>
 </g>
 </g>
@@ -2103,53 +2103,53 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node77" class="node">
 <title>proc~cmp_elemconn_c0_l</title>
 <g id="a_call~~graph~~CallGraph_node77"><a xlink:href="../proc/cmp_elemconn_c0_l.html" xlink:title="cmp_elemConn_C0_L">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1491,-2741 1364,-2741 1364,-2717 1491,-2717 1491,-2741"/>
-<text text-anchor="middle" x="1427.5" y="-2726.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1491,-4165 1364,-4165 1364,-4141 1491,-4141 1491,-4165"/>
+<text text-anchor="middle" x="1427.5" y="-4150.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l -->
 <g id="call~~graph~~CallGraph_edge4" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l</title>
-<path fill="none" stroke="#ff3b00" stroke-dasharray="5,2" d="M1261.74,-2695.65C1289.15,-2701.2 1325.36,-2708.53 1356.86,-2714.9"/>
-<polygon fill="#ff3b00" stroke="#ff3b00" points="1356.4,-2718.38 1366.9,-2716.94 1357.79,-2711.52 1356.4,-2718.38"/>
+<path fill="none" stroke="#ff3b00" stroke-dasharray="5,2" d="M1261.74,-4153C1288.18,-4153 1322.81,-4153 1353.49,-4153"/>
+<polygon fill="#ff3b00" stroke="#ff3b00" points="1353.73,-4156.5 1363.73,-4153 1353.73,-4149.5 1353.73,-4156.5"/>
 </g>
 <!-- proc~cmp_elemconn_c0_s -->
 <g id="call~~graph~~CallGraph_node78" class="node">
 <title>proc~cmp_elemconn_c0_s</title>
 <g id="a_call~~graph~~CallGraph_node78"><a xlink:href="../proc/cmp_elemconn_c0_s.html" xlink:title="cmp_elemConn_C0_S">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1491,-2699 1364,-2699 1364,-2675 1491,-2675 1491,-2699"/>
-<text text-anchor="middle" x="1427.5" y="-2684.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1491,-4123 1364,-4123 1364,-4099 1491,-4099 1491,-4123"/>
+<text text-anchor="middle" x="1427.5" y="-4108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s -->
 <g id="call~~graph~~CallGraph_edge5" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s</title>
-<path fill="none" stroke="#ff3b00" stroke-dasharray="5,2" d="M1261.74,-2687C1288.18,-2687 1322.81,-2687 1353.49,-2687"/>
-<polygon fill="#ff3b00" stroke="#ff3b00" points="1353.73,-2690.5 1363.73,-2687 1353.73,-2683.5 1353.73,-2690.5"/>
+<path fill="none" stroke="#ff3b00" stroke-dasharray="5,2" d="M1261.74,-4144.35C1289.15,-4138.8 1325.36,-4131.47 1356.86,-4125.1"/>
+<polygon fill="#ff3b00" stroke="#ff3b00" points="1357.79,-4128.48 1366.9,-4123.06 1356.4,-4121.62 1357.79,-4128.48"/>
 </g>
 <!-- proc~cmp_elemconn_c0_v -->
 <g id="call~~graph~~CallGraph_node79" class="node">
 <title>proc~cmp_elemconn_c0_v</title>
 <g id="a_call~~graph~~CallGraph_node79"><a xlink:href="../proc/cmp_elemconn_c0_v.html" xlink:title="cmp_elemConn_C0_V">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1491.5,-2615 1363.5,-2615 1363.5,-2591 1491.5,-2591 1491.5,-2615"/>
-<text text-anchor="middle" x="1427.5" y="-2600.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1491.5,-4207 1363.5,-4207 1363.5,-4183 1491.5,-4183 1491.5,-4207"/>
+<text text-anchor="middle" x="1427.5" y="-4192.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v -->
 <g id="call~~graph~~CallGraph_edge6" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v</title>
-<path fill="none" stroke="#ff3b00" stroke-dasharray="5,2" d="M1249.47,-2674.99C1267.42,-2667.58 1290.37,-2657.5 1310,-2647 1326.74,-2638.04 1328.6,-2631.6 1346,-2624 1350.76,-2621.92 1355.77,-2620.01 1360.86,-2618.27"/>
-<polygon fill="#ff3b00" stroke="#ff3b00" points="1362.27,-2621.49 1370.73,-2615.11 1360.14,-2614.82 1362.27,-2621.49"/>
+<path fill="none" stroke="#ff3b00" stroke-dasharray="5,2" d="M1261.74,-4161.65C1289.15,-4167.2 1325.36,-4174.53 1356.86,-4180.9"/>
+<polygon fill="#ff3b00" stroke="#ff3b00" points="1356.4,-4184.38 1366.9,-4182.94 1357.79,-4177.52 1356.4,-4184.38"/>
 </g>
 <!-- interface~elemconn_cn -->
 <g id="call~~graph~~CallGraph_node16" class="node">
 <title>interface~elemconn_cn</title>
 <g id="a_call~~graph~~CallGraph_node16"><a xlink:href="../interface/elemconn_cn.html" xlink:title="elemConn_Cn">
-<polygon fill="#a7506f" stroke="#a7506f" points="1034,-3622 947,-3622 947,-3598 1034,-3598 1034,-3622"/>
-<text text-anchor="middle" x="990.5" y="-3607.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_Cn</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1034,-5365 947,-5365 947,-5341 1034,-5341 1034,-5365"/>
+<text text-anchor="middle" x="990.5" y="-5350.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_Cn</text>
 </a>
 </g>
 </g>
@@ -2157,53 +2157,53 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node80" class="node">
 <title>proc~cmp_elemconn_cn_l</title>
 <g id="a_call~~graph~~CallGraph_node80"><a xlink:href="../proc/cmp_elemconn_cn_l.html" xlink:title="cmp_elemConn_Cn_L">
-<polygon fill="#d9534f" stroke="#d9534f" points="1281.5,-3668 1154.5,-3668 1154.5,-3644 1281.5,-3644 1281.5,-3668"/>
-<text text-anchor="middle" x="1218" y="-3653.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_L</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1281.5,-5358 1154.5,-5358 1154.5,-5334 1281.5,-5334 1281.5,-5358"/>
+<text text-anchor="middle" x="1218" y="-5343.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_L</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_l -->
 <g id="call~~graph~~CallGraph_edge7" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_l</title>
-<path fill="none" stroke="#ff3f00" stroke-dasharray="5,2" d="M1034.18,-3618.71C1066.16,-3625.23 1110.6,-3634.29 1147.65,-3641.85"/>
-<polygon fill="#ff3f00" stroke="#ff3f00" points="1147.4,-3645.37 1157.89,-3643.94 1148.8,-3638.51 1147.4,-3645.37"/>
+<path fill="none" stroke="#ff3f00" stroke-dasharray="5,2" d="M1034.18,-5351.68C1065.23,-5350.71 1108.01,-5349.38 1144.39,-5348.25"/>
+<polygon fill="#ff3f00" stroke="#ff3f00" points="1144.58,-5351.75 1154.47,-5347.94 1144.36,-5344.75 1144.58,-5351.75"/>
 </g>
 <!-- proc~cmp_elemconn_cn_s -->
 <g id="call~~graph~~CallGraph_node81" class="node">
 <title>proc~cmp_elemconn_cn_s</title>
 <g id="a_call~~graph~~CallGraph_node81"><a xlink:href="../proc/cmp_elemconn_cn_s.html" xlink:title="cmp_elemConn_Cn_S">
-<polygon fill="#d9534f" stroke="#d9534f" points="1281.5,-3752 1154.5,-3752 1154.5,-3728 1281.5,-3728 1281.5,-3752"/>
-<text text-anchor="middle" x="1218" y="-3737.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_S</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1281.5,-5316 1154.5,-5316 1154.5,-5292 1281.5,-5292 1281.5,-5316"/>
+<text text-anchor="middle" x="1218" y="-5301.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_S</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_s -->
 <g id="call~~graph~~CallGraph_edge8" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_s</title>
-<path fill="none" stroke="#ff3f00" stroke-dasharray="5,2" d="M1034.19,-3610.36C1053.13,-3612.56 1074.57,-3618.1 1090,-3631 1122.42,-3658.1 1093.81,-3691.63 1126,-3719 1131.6,-3723.77 1138.08,-3727.5 1144.95,-3730.42"/>
-<polygon fill="#ff3f00" stroke="#ff3f00" points="1143.91,-3733.77 1154.5,-3733.92 1146.31,-3727.2 1143.91,-3733.77"/>
+<path fill="none" stroke="#ff3f00" stroke-dasharray="5,2" d="M1034.18,-5343.73C1067.35,-5336.52 1113.93,-5326.4 1151.76,-5318.18"/>
+<polygon fill="#ff3f00" stroke="#ff3f00" points="1152.65,-5321.56 1161.68,-5316.02 1151.17,-5314.72 1152.65,-5321.56"/>
 </g>
 <!-- proc~cmp_elemconn_cn_v -->
 <g id="call~~graph~~CallGraph_node82" class="node">
 <title>proc~cmp_elemconn_cn_v</title>
 <g id="a_call~~graph~~CallGraph_node82"><a xlink:href="../proc/cmp_elemconn_cn_v.html" xlink:title="cmp_elemConn_Cn_V">
-<polygon fill="#d9534f" stroke="#d9534f" points="1282,-3710 1154,-3710 1154,-3686 1282,-3686 1282,-3710"/>
-<text text-anchor="middle" x="1218" y="-3695.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_V</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1282,-5400 1154,-5400 1154,-5376 1282,-5376 1282,-5400"/>
+<text text-anchor="middle" x="1218" y="-5385.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_V</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_v -->
 <g id="call~~graph~~CallGraph_edge9" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_v</title>
-<path fill="none" stroke="#ff3f00" stroke-dasharray="5,2" d="M1034.17,-3612.61C1052.46,-3615.31 1073.39,-3620.62 1090,-3631 1112.02,-3644.75 1104.1,-3663.06 1126,-3677 1131.48,-3680.48 1137.46,-3683.39 1143.67,-3685.82"/>
-<polygon fill="#ff3f00" stroke="#ff3f00" points="1142.97,-3689.28 1153.56,-3689.25 1145.26,-3682.67 1142.97,-3689.28"/>
+<path fill="none" stroke="#ff3f00" stroke-dasharray="5,2" d="M1034.18,-5359.62C1064.99,-5364.41 1107.37,-5370.98 1143.57,-5376.6"/>
+<polygon fill="#ff3f00" stroke="#ff3f00" points="1143.18,-5380.08 1153.6,-5378.16 1144.25,-5373.17 1143.18,-5380.08"/>
 </g>
 <!-- interface~gauss_leg -->
 <g id="call~~graph~~CallGraph_node17" class="node">
 <title>interface~gauss_leg</title>
 <g id="a_call~~graph~~CallGraph_node17"><a xlink:href="../interface/gauss_leg.html" xlink:title="gauss_leg">
-<polygon fill="#a7506f" stroke="#a7506f" points="793.5,-5848 728.5,-5848 728.5,-5824 793.5,-5824 793.5,-5848"/>
-<text text-anchor="middle" x="761" y="-5833.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_leg</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="793.5,-5288 728.5,-5288 728.5,-5264 793.5,-5264 793.5,-5288"/>
+<text text-anchor="middle" x="761" y="-5273.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_leg</text>
 </a>
 </g>
 </g>
@@ -2211,53 +2211,53 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node179" class="node">
 <title>proc~gauss_legendre_1d</title>
 <g id="a_call~~graph~~CallGraph_node179"><a xlink:href="../proc/gauss_legendre_1d.html" xlink:title="gauss_legendre_1D">
-<polygon fill="#d9534f" stroke="#d9534f" points="1048.5,-5970 932.5,-5970 932.5,-5946 1048.5,-5946 1048.5,-5970"/>
-<text text-anchor="middle" x="990.5" y="-5955.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_1D</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1048.5,-5194 932.5,-5194 932.5,-5170 1048.5,-5170 1048.5,-5194"/>
+<text text-anchor="middle" x="990.5" y="-5179.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_1D</text>
 </a>
 </g>
 </g>
 <!-- interface~gauss_leg&#45;&gt;proc~gauss_legendre_1d -->
 <g id="call~~graph~~CallGraph_edge10" class="edge">
 <title>interface~gauss_leg&#45;&gt;proc~gauss_legendre_1d</title>
-<path fill="none" stroke="#ff4300" stroke-dasharray="5,2" d="M774.81,-5848.23C796.81,-5868.56 843.97,-5909.34 891,-5932 900.88,-5936.76 911.76,-5940.74 922.56,-5944.04"/>
-<polygon fill="#ff4300" stroke="#ff4300" points="921.86,-5947.48 932.44,-5946.88 923.79,-5940.75 921.86,-5947.48"/>
+<path fill="none" stroke="#ff4300" stroke-dasharray="5,2" d="M793.86,-5272.26C812.88,-5268.83 836.81,-5262.31 855,-5250 876.79,-5235.25 868.76,-5217.06 891,-5203 900.55,-5196.97 911.54,-5192.64 922.65,-5189.55"/>
+<polygon fill="#ff4300" stroke="#ff4300" points="923.55,-5192.93 932.41,-5187.13 921.86,-5186.14 923.55,-5192.93"/>
 </g>
 <!-- proc~gauss_legendre_2d -->
 <g id="call~~graph~~CallGraph_node180" class="node">
 <title>proc~gauss_legendre_2d</title>
 <g id="a_call~~graph~~CallGraph_node180"><a xlink:href="../proc/gauss_legendre_2d.html" xlink:title="gauss_legendre_2D">
-<polygon fill="#d9534f" stroke="#d9534f" points="1048.5,-5890 932.5,-5890 932.5,-5866 1048.5,-5866 1048.5,-5890"/>
-<text text-anchor="middle" x="990.5" y="-5875.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_2D</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1048.5,-5152 932.5,-5152 932.5,-5128 1048.5,-5128 1048.5,-5152"/>
+<text text-anchor="middle" x="990.5" y="-5137.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_2D</text>
 </a>
 </g>
 </g>
 <!-- interface~gauss_leg&#45;&gt;proc~gauss_legendre_2d -->
 <g id="call~~graph~~CallGraph_edge11" class="edge">
 <title>interface~gauss_leg&#45;&gt;proc~gauss_legendre_2d</title>
-<path fill="none" stroke="#ff4300" stroke-dasharray="5,2" d="M793.63,-5841.84C826.75,-5847.95 879.75,-5857.74 922.28,-5865.59"/>
-<polygon fill="#ff4300" stroke="#ff4300" points="921.82,-5869.06 932.28,-5867.44 923.09,-5862.18 921.82,-5869.06"/>
+<path fill="none" stroke="#ff4300" stroke-dasharray="5,2" d="M793.82,-5274.12C813.56,-5271.39 838.25,-5264.97 855,-5250 886.81,-5221.56 858.32,-5188.43 891,-5161 899.96,-5153.48 910.96,-5148.46 922.33,-5145.14"/>
+<polygon fill="#ff4300" stroke="#ff4300" points="923.51,-5148.45 932.37,-5142.64 921.82,-5141.66 923.51,-5148.45"/>
 </g>
 <!-- proc~gauss_legendre_3d -->
 <g id="call~~graph~~CallGraph_node181" class="node">
 <title>proc~gauss_legendre_3d</title>
 <g id="a_call~~graph~~CallGraph_node181"><a xlink:href="../proc/gauss_legendre_3d.html" xlink:title="gauss_legendre_3D">
-<polygon fill="#d9534f" stroke="#d9534f" points="1048.5,-5848 932.5,-5848 932.5,-5824 1048.5,-5824 1048.5,-5848"/>
-<text text-anchor="middle" x="990.5" y="-5833.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_3D</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1048.5,-5110 932.5,-5110 932.5,-5086 1048.5,-5086 1048.5,-5110"/>
+<text text-anchor="middle" x="990.5" y="-5095.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_3D</text>
 </a>
 </g>
 </g>
 <!-- interface~gauss_leg&#45;&gt;proc~gauss_legendre_3d -->
 <g id="call~~graph~~CallGraph_edge12" class="edge">
 <title>interface~gauss_leg&#45;&gt;proc~gauss_legendre_3d</title>
-<path fill="none" stroke="#ff4300" stroke-dasharray="5,2" d="M793.63,-5836C826.75,-5836 879.75,-5836 922.28,-5836"/>
-<polygon fill="#ff4300" stroke="#ff4300" points="922.28,-5839.5 932.28,-5836 922.28,-5832.5 922.28,-5839.5"/>
+<path fill="none" stroke="#ff4300" stroke-dasharray="5,2" d="M793.54,-5274.87C813.67,-5272.49 838.91,-5266.16 855,-5250 897.6,-5207.21 847.08,-5160.44 891,-5119 899.74,-5110.75 910.89,-5105.42 922.53,-5102.03"/>
+<polygon fill="#ff4300" stroke="#ff4300" points="923.49,-5105.4 932.38,-5099.62 921.83,-5098.6 923.49,-5105.4"/>
 </g>
 <!-- interface~ndgrid -->
 <g id="call~~graph~~CallGraph_node18" class="node">
 <title>interface~ndgrid</title>
 <g id="a_call~~graph~~CallGraph_node18"><a xlink:href="../interface/ndgrid.html" xlink:title="ndgrid">
-<polygon fill="#a7506f" stroke="#a7506f" points="1245,-5971 1191,-5971 1191,-5947 1245,-5947 1245,-5971"/>
-<text text-anchor="middle" x="1218" y="-5956.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1245,-4908 1191,-4908 1191,-4884 1245,-4884 1245,-4908"/>
+<text text-anchor="middle" x="1218" y="-4893.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid</text>
 </a>
 </g>
 </g>
@@ -2265,38 +2265,38 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node266" class="node">
 <title>proc~ndgrid2</title>
 <g id="a_call~~graph~~CallGraph_node266"><a xlink:href="../proc/ndgrid2.html" xlink:title="ndgrid2">
-<polygon fill="#d9534f" stroke="#d9534f" points="1454.5,-5950 1400.5,-5950 1400.5,-5926 1454.5,-5926 1454.5,-5950"/>
-<text text-anchor="middle" x="1427.5" y="-5935.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid2</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1454.5,-4929 1400.5,-4929 1400.5,-4905 1454.5,-4905 1454.5,-4929"/>
+<text text-anchor="middle" x="1427.5" y="-4914.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid2</text>
 </a>
 </g>
 </g>
 <!-- interface~ndgrid&#45;&gt;proc~ndgrid2 -->
 <g id="call~~graph~~CallGraph_edge13" class="edge">
 <title>interface~ndgrid&#45;&gt;proc~ndgrid2</title>
-<path fill="none" stroke="#ff4700" stroke-dasharray="5,2" d="M1245.28,-5956.34C1282,-5952.62 1348.79,-5945.86 1390.23,-5941.67"/>
-<polygon fill="#ff4700" stroke="#ff4700" points="1390.84,-5945.13 1400.43,-5940.64 1390.13,-5938.16 1390.84,-5945.13"/>
+<path fill="none" stroke="#ff4700" stroke-dasharray="5,2" d="M1245.28,-4898.66C1282,-4902.38 1348.79,-4909.14 1390.23,-4913.33"/>
+<polygon fill="#ff4700" stroke="#ff4700" points="1390.13,-4916.84 1400.43,-4914.36 1390.84,-4909.87 1390.13,-4916.84"/>
 </g>
 <!-- proc~ndgrid3 -->
 <g id="call~~graph~~CallGraph_node267" class="node">
 <title>proc~ndgrid3</title>
 <g id="a_call~~graph~~CallGraph_node267"><a xlink:href="../proc/ndgrid3.html" xlink:title="ndgrid3">
-<polygon fill="#d9534f" stroke="#d9534f" points="1454.5,-5992 1400.5,-5992 1400.5,-5968 1454.5,-5968 1454.5,-5992"/>
-<text text-anchor="middle" x="1427.5" y="-5977.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid3</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1454.5,-4887 1400.5,-4887 1400.5,-4863 1454.5,-4863 1454.5,-4887"/>
+<text text-anchor="middle" x="1427.5" y="-4872.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid3</text>
 </a>
 </g>
 </g>
 <!-- interface~ndgrid&#45;&gt;proc~ndgrid3 -->
 <g id="call~~graph~~CallGraph_edge14" class="edge">
 <title>interface~ndgrid&#45;&gt;proc~ndgrid3</title>
-<path fill="none" stroke="#ff4700" stroke-dasharray="5,2" d="M1245.28,-5961.66C1282,-5965.38 1348.79,-5972.14 1390.23,-5976.33"/>
-<polygon fill="#ff4700" stroke="#ff4700" points="1390.13,-5979.84 1400.43,-5977.36 1390.84,-5972.87 1390.13,-5979.84"/>
+<path fill="none" stroke="#ff4700" stroke-dasharray="5,2" d="M1245.28,-4893.34C1282,-4889.62 1348.79,-4882.86 1390.23,-4878.67"/>
+<polygon fill="#ff4700" stroke="#ff4700" points="1390.84,-4882.13 1400.43,-4877.64 1390.13,-4875.16 1390.84,-4882.13"/>
 </g>
 <!-- interface~nearest_point_help_1d -->
 <g id="call~~graph~~CallGraph_node19" class="node">
 <title>interface~nearest_point_help_1d</title>
 <g id="a_call~~graph~~CallGraph_node19"><a xlink:href="../interface/nearest_point_help_1d.html" xlink:title="nearest_point_help_1d">
-<polygon fill="#a7506f" stroke="#a7506f" points="1056.5,-184 924.5,-184 924.5,-160 1056.5,-160 1056.5,-184"/>
-<text text-anchor="middle" x="990.5" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_1d</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1056.5,-6680 924.5,-6680 924.5,-6656 1056.5,-6656 1056.5,-6680"/>
+<text text-anchor="middle" x="990.5" y="-6665.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_1d</text>
 </a>
 </g>
 </g>
@@ -2304,8 +2304,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node20" class="node">
 <title>interface~nearest_point_help_2d</title>
 <g id="a_call~~graph~~CallGraph_node20"><a xlink:href="../interface/nearest_point_help_2d.html" xlink:title="nearest_point_help_2d">
-<polygon fill="#a7506f" stroke="#a7506f" points="1056.5,-1127 924.5,-1127 924.5,-1103 1056.5,-1103 1056.5,-1127"/>
-<text text-anchor="middle" x="990.5" y="-1112.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_2d</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1056.5,-2292 924.5,-2292 924.5,-2268 1056.5,-2268 1056.5,-2292"/>
+<text text-anchor="middle" x="990.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_2d</text>
 </a>
 </g>
 </g>
@@ -2313,8 +2313,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node21" class="node">
 <title>interface~nearest_point_help_3d</title>
 <g id="a_call~~graph~~CallGraph_node21"><a xlink:href="../interface/nearest_point_help_3d.html" xlink:title="nearest_point_help_3d">
-<polygon fill="#a7506f" stroke="#a7506f" points="1056.5,-6622 924.5,-6622 924.5,-6598 1056.5,-6598 1056.5,-6622"/>
-<text text-anchor="middle" x="990.5" y="-6607.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_3d</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1056.5,-5030 924.5,-5030 924.5,-5006 1056.5,-5006 1056.5,-5030"/>
+<text text-anchor="middle" x="990.5" y="-5015.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_3d</text>
 </a>
 </g>
 </g>
@@ -2322,8 +2322,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node22" class="node">
 <title>interface~unique</title>
 <g id="a_call~~graph~~CallGraph_node22"><a xlink:href="../interface/unique.html" xlink:title="unique">
-<polygon fill="#a7506f" stroke="#a7506f" points="1017.5,-3664 963.5,-3664 963.5,-3640 1017.5,-3640 1017.5,-3664"/>
-<text text-anchor="middle" x="990.5" y="-3649.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1017.5,-5442 963.5,-5442 963.5,-5418 1017.5,-5418 1017.5,-5442"/>
+<text text-anchor="middle" x="990.5" y="-5427.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique</text>
 </a>
 </g>
 </g>
@@ -2331,389 +2331,389 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node333" class="node">
 <title>proc~unique_integer</title>
 <g id="a_call~~graph~~CallGraph_node333"><a xlink:href="../proc/unique_integer.html" xlink:title="unique_integer">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1264.5,-3836 1171.5,-3836 1171.5,-3812 1264.5,-3812 1264.5,-3836"/>
-<text text-anchor="middle" x="1218" y="-3821.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_integer</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1264.5,-5484 1171.5,-5484 1171.5,-5460 1264.5,-5460 1264.5,-5484"/>
+<text text-anchor="middle" x="1218" y="-5469.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_integer</text>
 </a>
 </g>
 </g>
 <!-- interface~unique&#45;&gt;proc~unique_integer -->
 <g id="call~~graph~~CallGraph_edge15" class="edge">
 <title>interface~unique&#45;&gt;proc~unique_integer</title>
-<path fill="none" stroke="#ff5800" stroke-dasharray="5,2" d="M1017.92,-3650.57C1039.96,-3650.85 1070.78,-3654.9 1090,-3673 1133.65,-3714.1 1082.7,-3761.54 1126,-3803 1135.61,-3812.2 1148.41,-3817.66 1161.37,-3820.84"/>
-<polygon fill="#ff5800" stroke="#ff5800" points="1160.77,-3824.28 1171.26,-3822.84 1162.16,-3817.42 1160.77,-3824.28"/>
+<path fill="none" stroke="#ff5800" stroke-dasharray="5,2" d="M1017.81,-5434.9C1052.8,-5441.42 1115.57,-5453.11 1161.31,-5461.63"/>
+<polygon fill="#ff5800" stroke="#ff5800" points="1160.91,-5465.11 1171.38,-5463.5 1162.19,-5458.23 1160.91,-5465.11"/>
 </g>
 <!-- proc~unique_real -->
 <g id="call~~graph~~CallGraph_node334" class="node">
 <title>proc~unique_real</title>
 <g id="a_call~~graph~~CallGraph_node334"><a xlink:href="../proc/unique_real.html" xlink:title="unique_real">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1255.5,-3794 1180.5,-3794 1180.5,-3770 1255.5,-3770 1255.5,-3794"/>
-<text text-anchor="middle" x="1218" y="-3779.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_real</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1255.5,-5442 1180.5,-5442 1180.5,-5418 1255.5,-5418 1255.5,-5442"/>
+<text text-anchor="middle" x="1218" y="-5427.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_real</text>
 </a>
 </g>
 </g>
 <!-- interface~unique&#45;&gt;proc~unique_real -->
 <g id="call~~graph~~CallGraph_edge16" class="edge">
 <title>interface~unique&#45;&gt;proc~unique_real</title>
-<path fill="none" stroke="#ff5800" stroke-dasharray="5,2" d="M1017.83,-3651.17C1039.52,-3651.86 1069.88,-3656.18 1090,-3673 1122.42,-3700.1 1093.81,-3733.63 1126,-3761 1138.26,-3771.42 1154.69,-3776.92 1170.22,-3779.75"/>
-<polygon fill="#ff5800" stroke="#ff5800" points="1169.83,-3783.23 1180.24,-3781.24 1170.87,-3776.3 1169.83,-3783.23"/>
+<path fill="none" stroke="#ff5800" stroke-dasharray="5,2" d="M1017.81,-5430C1055.18,-5430 1124.22,-5430 1170.38,-5430"/>
+<polygon fill="#ff5800" stroke="#ff5800" points="1170.44,-5433.5 1180.44,-5430 1170.44,-5426.5 1170.44,-5433.5"/>
 </g>
 <!-- none~basis -->
 <g id="call~~graph~~CallGraph_node23" class="node">
 <title>none~basis</title>
-<g id="a_call~~graph~~CallGraph_node23"><a xlink:href="../type/nurbs_volume.html#boundprocedure-basis" xlink:title="nurbs_volume%basis">
-<polygon fill="#a7506f" stroke="#a7506f" points="823,-6496 699,-6496 699,-6472 823,-6472 823,-6496"/>
-<text text-anchor="middle" x="761" y="-6481.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%basis</text>
+<g id="a_call~~graph~~CallGraph_node23"><a xlink:href="../type/nurbs_curve.html#boundprocedure-basis" xlink:title="nurbs_curve%basis">
+<polygon fill="#a7506f" stroke="#a7506f" points="818.5,-6596 703.5,-6596 703.5,-6572 818.5,-6572 818.5,-6596"/>
+<text text-anchor="middle" x="761" y="-6581.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%basis</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_scalar -->
 <g id="call~~graph~~CallGraph_node58" class="node">
 <title>proc~basis_scalar</title>
-<g id="a_call~~graph~~CallGraph_node58"><a xlink:href="../proc/basis_scalar.html" xlink:title="nurbs_volume%basis_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1071.5,-6580 909.5,-6580 909.5,-6556 1071.5,-6556 1071.5,-6580"/>
-<text text-anchor="middle" x="990.5" y="-6565.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%basis_scalar</text>
+<g id="a_call~~graph~~CallGraph_node58"><a xlink:href="../proc/basis_scalar.html" xlink:title="nurbs_curve%basis_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="1066.5,-6512 914.5,-6512 914.5,-6488 1066.5,-6488 1066.5,-6512"/>
+<text text-anchor="middle" x="990.5" y="-6497.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%basis_scalar</text>
 </a>
 </g>
 </g>
 <!-- none~basis&#45;&gt;proc~basis_scalar -->
 <g id="call~~graph~~CallGraph_edge17" class="edge">
 <title>none~basis&#45;&gt;proc~basis_scalar</title>
-<path fill="none" stroke="#ff5c00" stroke-dasharray="5,2" d="M823.2,-6491.95C834.28,-6494.99 845.36,-6499.19 855,-6505 876.06,-6517.69 869.86,-6534.44 891,-6547 894.06,-6548.82 897.26,-6550.48 900.55,-6552"/>
-<polygon fill="#ff5c00" stroke="#ff5c00" points="899.47,-6555.34 910.05,-6555.92 902.14,-6548.87 899.47,-6555.34"/>
+<path fill="none" stroke="#ff5c00" stroke-dasharray="5,2" d="M818.81,-6577.2C831.32,-6574.1 844.08,-6569.58 855,-6563 876.06,-6550.31 869.86,-6533.56 891,-6521 895.4,-6518.39 900.07,-6516.1 904.91,-6514.09"/>
+<polygon fill="#ff5c00" stroke="#ff5c00" points="906.23,-6517.34 914.38,-6510.57 903.79,-6510.78 906.23,-6517.34"/>
 </g>
 <!-- proc~basis_vector -->
 <g id="call~~graph~~CallGraph_node61" class="node">
 <title>proc~basis_vector</title>
-<g id="a_call~~graph~~CallGraph_node61"><a xlink:href="../proc/basis_vector.html" xlink:title="nurbs_volume%basis_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1072,-6496 909,-6496 909,-6472 1072,-6472 1072,-6496"/>
-<text text-anchor="middle" x="990.5" y="-6481.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%basis_vector</text>
+<g id="a_call~~graph~~CallGraph_node61"><a xlink:href="../proc/basis_vector.html" xlink:title="nurbs_curve%basis_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="1067.5,-6554 913.5,-6554 913.5,-6530 1067.5,-6530 1067.5,-6554"/>
+<text text-anchor="middle" x="990.5" y="-6539.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%basis_vector</text>
 </a>
 </g>
 </g>
 <!-- none~basis&#45;&gt;proc~basis_vector -->
 <g id="call~~graph~~CallGraph_edge18" class="edge">
 <title>none~basis&#45;&gt;proc~basis_vector</title>
-<path fill="none" stroke="#ff5c00" stroke-dasharray="5,2" d="M823.27,-6484C846.5,-6484 873.48,-6484 898.86,-6484"/>
-<polygon fill="#ff5c00" stroke="#ff5c00" points="898.87,-6487.5 908.87,-6484 898.87,-6480.5 898.87,-6487.5"/>
+<path fill="none" stroke="#ff5c00" stroke-dasharray="5,2" d="M818.53,-6573.56C847.5,-6568.22 883.17,-6561.63 914.42,-6555.86"/>
+<polygon fill="#ff5c00" stroke="#ff5c00" points="915.2,-6559.28 924.4,-6554.02 913.93,-6552.39 915.2,-6559.28"/>
 </g>
 <!-- none~basis~2 -->
 <g id="call~~graph~~CallGraph_node24" class="node">
 <title>none~basis~2</title>
-<g id="a_call~~graph~~CallGraph_node24"><a xlink:href="../type/nurbs_surface.html#boundprocedure-basis~2" xlink:title="nurbs_surface%basis">
-<polygon fill="#a7506f" stroke="#a7506f" points="823,-6036 699,-6036 699,-6012 823,-6012 823,-6036"/>
-<text text-anchor="middle" x="761" y="-6021.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%basis</text>
+<g id="a_call~~graph~~CallGraph_node24"><a xlink:href="../type/nurbs_volume.html#boundprocedure-basis~2" xlink:title="nurbs_volume%basis">
+<polygon fill="#a7506f" stroke="#a7506f" points="823,-5780 699,-5780 699,-5756 823,-5756 823,-5780"/>
+<text text-anchor="middle" x="761" y="-5765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%basis</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_scalar~2 -->
 <g id="call~~graph~~CallGraph_node59" class="node">
 <title>proc~basis_scalar~2</title>
-<g id="a_call~~graph~~CallGraph_node59"><a xlink:href="../proc/basis_scalar~2.html" xlink:title="nurbs_surface%basis_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1071.5,-6092 909.5,-6092 909.5,-6068 1071.5,-6068 1071.5,-6092"/>
-<text text-anchor="middle" x="990.5" y="-6077.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%basis_scalar</text>
+<g id="a_call~~graph~~CallGraph_node59"><a xlink:href="../proc/basis_scalar~2.html" xlink:title="nurbs_volume%basis_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="1071.5,-5526 909.5,-5526 909.5,-5502 1071.5,-5502 1071.5,-5526"/>
+<text text-anchor="middle" x="990.5" y="-5511.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%basis_scalar</text>
 </a>
 </g>
 </g>
 <!-- none~basis~2&#45;&gt;proc~basis_scalar~2 -->
 <g id="call~~graph~~CallGraph_edge19" class="edge">
 <title>none~basis~2&#45;&gt;proc~basis_scalar~2</title>
-<path fill="none" stroke="#ff6100" stroke-dasharray="5,2" d="M803.97,-6036.01C829.12,-6043.06 861.79,-6051.93 891,-6059 900.56,-6061.31 910.67,-6063.62 920.64,-6065.82"/>
-<polygon fill="#ff6100" stroke="#ff6100" points="920.01,-6069.27 930.52,-6067.98 921.5,-6062.43 920.01,-6069.27"/>
+<path fill="none" stroke="#ff6100" stroke-dasharray="5,2" d="M823.17,-5761.73C834.49,-5758.55 845.67,-5753.87 855,-5747 929.5,-5692.15 969.23,-5582.69 983.4,-5535.97"/>
+<polygon fill="#ff6100" stroke="#ff6100" points="986.8,-5536.83 986.25,-5526.24 980.08,-5534.86 986.8,-5536.83"/>
 </g>
 <!-- proc~basis_vector~2 -->
 <g id="call~~graph~~CallGraph_node62" class="node">
 <title>proc~basis_vector~2</title>
-<g id="a_call~~graph~~CallGraph_node62"><a xlink:href="../proc/basis_vector~2.html" xlink:title="nurbs_surface%basis_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1072,-6050 909,-6050 909,-6026 1072,-6026 1072,-6050"/>
-<text text-anchor="middle" x="990.5" y="-6035.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%basis_vector</text>
+<g id="a_call~~graph~~CallGraph_node62"><a xlink:href="../proc/basis_vector~2.html" xlink:title="nurbs_volume%basis_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="1072,-5484 909,-5484 909,-5460 1072,-5460 1072,-5484"/>
+<text text-anchor="middle" x="990.5" y="-5469.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%basis_vector</text>
 </a>
 </g>
 </g>
 <!-- none~basis~2&#45;&gt;proc~basis_vector~2 -->
 <g id="call~~graph~~CallGraph_edge20" class="edge">
 <title>none~basis~2&#45;&gt;proc~basis_vector~2</title>
-<path fill="none" stroke="#ff6100" stroke-dasharray="5,2" d="M823.27,-6027.77C846.5,-6029.2 873.48,-6030.86 898.86,-6032.42"/>
-<polygon fill="#ff6100" stroke="#ff6100" points="898.67,-6035.92 908.87,-6033.04 899.1,-6028.93 898.67,-6035.92"/>
+<path fill="none" stroke="#ff6100" stroke-dasharray="5,2" d="M823.11,-5765.04C835.12,-5761.71 846.59,-5756.13 855,-5747 932.28,-5663.17 813.22,-5576.37 891,-5493 893.66,-5490.15 896.61,-5487.63 899.77,-5485.42"/>
+<polygon fill="#ff6100" stroke="#ff6100" points="901.74,-5488.32 908.59,-5480.23 898.19,-5482.28 901.74,-5488.32"/>
 </g>
 <!-- none~basis~3 -->
 <g id="call~~graph~~CallGraph_node25" class="node">
 <title>none~basis~3</title>
-<g id="a_call~~graph~~CallGraph_node25"><a xlink:href="../type/nurbs_curve.html#boundprocedure-basis~3" xlink:title="nurbs_curve%basis">
-<polygon fill="#a7506f" stroke="#a7506f" points="818.5,-642 703.5,-642 703.5,-618 818.5,-618 818.5,-642"/>
-<text text-anchor="middle" x="761" y="-627.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%basis</text>
+<g id="a_call~~graph~~CallGraph_node25"><a xlink:href="../type/nurbs_surface.html#boundprocedure-basis~3" xlink:title="nurbs_surface%basis">
+<polygon fill="#a7506f" stroke="#a7506f" points="823,-2364 699,-2364 699,-2340 823,-2340 823,-2364"/>
+<text text-anchor="middle" x="761" y="-2349.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%basis</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_scalar~3 -->
 <g id="call~~graph~~CallGraph_node60" class="node">
 <title>proc~basis_scalar~3</title>
-<g id="a_call~~graph~~CallGraph_node60"><a xlink:href="../proc/basis_scalar~3.html" xlink:title="nurbs_curve%basis_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1066.5,-600 914.5,-600 914.5,-576 1066.5,-576 1066.5,-600"/>
-<text text-anchor="middle" x="990.5" y="-585.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%basis_scalar</text>
+<g id="a_call~~graph~~CallGraph_node60"><a xlink:href="../proc/basis_scalar~3.html" xlink:title="nurbs_surface%basis_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="1071.5,-2418 909.5,-2418 909.5,-2394 1071.5,-2394 1071.5,-2418"/>
+<text text-anchor="middle" x="990.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%basis_scalar</text>
 </a>
 </g>
 </g>
 <!-- none~basis~3&#45;&gt;proc~basis_scalar~3 -->
 <g id="call~~graph~~CallGraph_edge21" class="edge">
 <title>none~basis~3&#45;&gt;proc~basis_scalar~3</title>
-<path fill="none" stroke="#ff6500" stroke-dasharray="5,2" d="M818.53,-619.56C847.5,-614.22 883.17,-607.63 914.42,-601.86"/>
-<polygon fill="#ff6500" stroke="#ff6500" points="915.2,-605.28 924.4,-600.02 913.93,-598.39 915.2,-605.28"/>
+<path fill="none" stroke="#ff6500" stroke-dasharray="5,2" d="M819.77,-2364.1C831.49,-2366.82 843.68,-2369.84 855,-2373 871.25,-2377.53 874.73,-2380.57 891,-2385 899.67,-2387.36 908.83,-2389.62 917.94,-2391.73"/>
+<polygon fill="#ff6500" stroke="#ff6500" points="917.24,-2395.16 927.77,-2393.95 918.78,-2388.33 917.24,-2395.16"/>
 </g>
 <!-- proc~basis_vector~3 -->
 <g id="call~~graph~~CallGraph_node63" class="node">
 <title>proc~basis_vector~3</title>
-<g id="a_call~~graph~~CallGraph_node63"><a xlink:href="../proc/basis_vector~3.html" xlink:title="nurbs_curve%basis_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1067.5,-642 913.5,-642 913.5,-618 1067.5,-618 1067.5,-642"/>
-<text text-anchor="middle" x="990.5" y="-627.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%basis_vector</text>
+<g id="a_call~~graph~~CallGraph_node63"><a xlink:href="../proc/basis_vector~3.html" xlink:title="nurbs_surface%basis_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="1072,-2460 909,-2460 909,-2436 1072,-2436 1072,-2460"/>
+<text text-anchor="middle" x="990.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%basis_vector</text>
 </a>
 </g>
 </g>
 <!-- none~basis~3&#45;&gt;proc~basis_vector~3 -->
 <g id="call~~graph~~CallGraph_edge22" class="edge">
 <title>none~basis~3&#45;&gt;proc~basis_vector~3</title>
-<path fill="none" stroke="#ff6500" stroke-dasharray="5,2" d="M818.53,-630C844.08,-630 874.84,-630 903.18,-630"/>
-<polygon fill="#ff6500" stroke="#ff6500" points="903.5,-633.5 913.5,-630 903.5,-626.5 903.5,-633.5"/>
+<path fill="none" stroke="#ff6500" stroke-dasharray="5,2" d="M823.31,-2358.89C834.5,-2362.02 845.59,-2366.53 855,-2373 878.77,-2389.34 867.14,-2410.8 891,-2427 893.75,-2428.87 896.63,-2430.57 899.61,-2432.13"/>
+<polygon fill="#ff6500" stroke="#ff6500" points="898.28,-2435.37 908.83,-2436.37 901.21,-2429.01 898.28,-2435.37"/>
 </g>
 <!-- none~derivative -->
 <g id="call~~graph~~CallGraph_node26" class="node">
 <title>none~derivative</title>
-<g id="a_call~~graph~~CallGraph_node26"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative" xlink:title="nurbs_volume%derivative">
-<polygon fill="#a7506f" stroke="#a7506f" points="836.5,-6290 685.5,-6290 685.5,-6266 836.5,-6266 836.5,-6290"/>
-<text text-anchor="middle" x="761" y="-6275.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative</text>
+<g id="a_call~~graph~~CallGraph_node26"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative" xlink:title="nurbs_curve%derivative">
+<polygon fill="#a7506f" stroke="#a7506f" points="831.5,-5822 690.5,-5822 690.5,-5798 831.5,-5798 831.5,-5822"/>
+<text text-anchor="middle" x="761" y="-5807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_scalar -->
 <g id="call~~graph~~CallGraph_node156" class="node">
 <title>proc~derivative_scalar</title>
-<g id="a_call~~graph~~CallGraph_node156"><a xlink:href="../proc/derivative_scalar.html" xlink:title="nurbs_volume%derivative_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1084.5,-6332 896.5,-6332 896.5,-6308 1084.5,-6308 1084.5,-6332"/>
-<text text-anchor="middle" x="990.5" y="-6317.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_scalar</text>
+<g id="a_call~~graph~~CallGraph_node156"><a xlink:href="../proc/derivative_scalar.html" xlink:title="nurbs_curve%derivative_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="1079.5,-5778 901.5,-5778 901.5,-5754 1079.5,-5754 1079.5,-5778"/>
+<text text-anchor="middle" x="990.5" y="-5763.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_scalar</text>
 </a>
 </g>
 </g>
 <!-- none~derivative&#45;&gt;proc~derivative_scalar -->
 <g id="call~~graph~~CallGraph_edge23" class="edge">
 <title>none~derivative&#45;&gt;proc~derivative_scalar</title>
-<path fill="none" stroke="#ff6900" stroke-dasharray="5,2" d="M827.19,-6290.04C854.32,-6295.04 885.99,-6300.89 914.11,-6306.08"/>
-<polygon fill="#ff6900" stroke="#ff6900" points="913.83,-6309.59 924.3,-6307.96 915.1,-6302.71 913.83,-6309.59"/>
+<path fill="none" stroke="#ff6900" stroke-dasharray="5,2" d="M824.17,-5797.98C853.01,-5792.4 887.46,-5785.74 917.43,-5779.94"/>
+<polygon fill="#ff6900" stroke="#ff6900" points="918.26,-5783.34 927.41,-5778.01 916.93,-5776.47 918.26,-5783.34"/>
 </g>
 <!-- proc~derivative_vector -->
 <g id="call~~graph~~CallGraph_node159" class="node">
 <title>proc~derivative_vector</title>
-<g id="a_call~~graph~~CallGraph_node159"><a xlink:href="../proc/derivative_vector.html" xlink:title="nurbs_volume%derivative_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1085.5,-6290 895.5,-6290 895.5,-6266 1085.5,-6266 1085.5,-6290"/>
-<text text-anchor="middle" x="990.5" y="-6275.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_vector</text>
+<g id="a_call~~graph~~CallGraph_node159"><a xlink:href="../proc/derivative_vector.html" xlink:title="nurbs_curve%derivative_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="1080.5,-5820 900.5,-5820 900.5,-5796 1080.5,-5796 1080.5,-5820"/>
+<text text-anchor="middle" x="990.5" y="-5805.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_vector</text>
 </a>
 </g>
 </g>
 <!-- none~derivative&#45;&gt;proc~derivative_vector -->
 <g id="call~~graph~~CallGraph_edge24" class="edge">
 <title>none~derivative&#45;&gt;proc~derivative_vector</title>
-<path fill="none" stroke="#ff6900" stroke-dasharray="5,2" d="M836.81,-6278C852.25,-6278 868.78,-6278 885.06,-6278"/>
-<polygon fill="#ff6900" stroke="#ff6900" points="885.15,-6281.5 895.15,-6278 885.15,-6274.5 885.15,-6281.5"/>
+<path fill="none" stroke="#ff6900" stroke-dasharray="5,2" d="M831.8,-5809.39C850.27,-5809.22 870.56,-5809.05 890.26,-5808.87"/>
+<polygon fill="#ff6900" stroke="#ff6900" points="890.52,-5812.37 900.49,-5808.78 890.46,-5805.37 890.52,-5812.37"/>
 </g>
 <!-- none~derivative2 -->
 <g id="call~~graph~~CallGraph_node27" class="node">
 <title>none~derivative2</title>
-<g id="a_call~~graph~~CallGraph_node27"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2" xlink:title="nurbs_volume%derivative2">
-<polygon fill="#a7506f" stroke="#a7506f" points="839.5,-6454 682.5,-6454 682.5,-6430 839.5,-6430 839.5,-6454"/>
-<text text-anchor="middle" x="761" y="-6439.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2</text>
+<g id="a_call~~graph~~CallGraph_node27"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative2" xlink:title="nurbs_curve%derivative2">
+<polygon fill="#a7506f" stroke="#a7506f" points="835,-6638 687,-6638 687,-6614 835,-6614 835,-6638"/>
+<text text-anchor="middle" x="761" y="-6623.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_scalar -->
 <g id="call~~graph~~CallGraph_node150" class="node">
 <title>proc~derivative2_scalar</title>
-<g id="a_call~~graph~~CallGraph_node150"><a xlink:href="../proc/derivative2_scalar.html" xlink:title="nurbs_volume%derivative2_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1088,-6538 893,-6538 893,-6514 1088,-6514 1088,-6538"/>
-<text text-anchor="middle" x="990.5" y="-6523.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_scalar</text>
+<g id="a_call~~graph~~CallGraph_node150"><a xlink:href="../proc/derivative2_scalar.html" xlink:title="nurbs_curve%derivative2_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="1083,-6638 898,-6638 898,-6614 1083,-6614 1083,-6638"/>
+<text text-anchor="middle" x="990.5" y="-6623.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_scalar</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2&#45;&gt;proc~derivative2_scalar -->
 <g id="call~~graph~~CallGraph_edge25" class="edge">
 <title>none~derivative2&#45;&gt;proc~derivative2_scalar</title>
-<path fill="none" stroke="#ff6d00" stroke-dasharray="5,2" d="M836.31,-6454.15C842.85,-6456.58 849.19,-6459.5 855,-6463 876.06,-6475.69 869.86,-6492.44 891,-6505 894.06,-6506.82 897.26,-6508.48 900.55,-6510"/>
-<polygon fill="#ff6d00" stroke="#ff6d00" points="899.47,-6513.34 910.05,-6513.92 902.14,-6506.87 899.47,-6513.34"/>
+<path fill="none" stroke="#ff6d00" stroke-dasharray="5,2" d="M835.23,-6626C851.85,-6626 869.79,-6626 887.35,-6626"/>
+<polygon fill="#ff6d00" stroke="#ff6d00" points="887.64,-6629.5 897.64,-6626 887.64,-6622.5 887.64,-6629.5"/>
 </g>
 <!-- proc~derivative2_vector -->
 <g id="call~~graph~~CallGraph_node153" class="node">
 <title>proc~derivative2_vector</title>
-<g id="a_call~~graph~~CallGraph_node153"><a xlink:href="../proc/derivative2_vector.html" xlink:title="nurbs_volume%derivative2_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1088.5,-6454 892.5,-6454 892.5,-6430 1088.5,-6430 1088.5,-6454"/>
-<text text-anchor="middle" x="990.5" y="-6439.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_vector</text>
+<g id="a_call~~graph~~CallGraph_node153"><a xlink:href="../proc/derivative2_vector.html" xlink:title="nurbs_curve%derivative2_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="1084,-6596 897,-6596 897,-6572 1084,-6572 1084,-6596"/>
+<text text-anchor="middle" x="990.5" y="-6581.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_vector</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2&#45;&gt;proc~derivative2_vector -->
 <g id="call~~graph~~CallGraph_edge26" class="edge">
 <title>none~derivative2&#45;&gt;proc~derivative2_vector</title>
-<path fill="none" stroke="#ff6d00" stroke-dasharray="5,2" d="M839.66,-6442C853.33,-6442 867.78,-6442 882.09,-6442"/>
-<polygon fill="#ff6d00" stroke="#ff6d00" points="882.48,-6445.5 892.48,-6442 882.48,-6438.5 882.48,-6445.5"/>
+<path fill="none" stroke="#ff6d00" stroke-dasharray="5,2" d="M827.19,-6613.96C854.32,-6608.96 885.99,-6603.11 914.11,-6597.92"/>
+<polygon fill="#ff6d00" stroke="#ff6d00" points="915.1,-6601.29 924.3,-6596.04 913.83,-6594.41 915.1,-6601.29"/>
 </g>
 <!-- none~derivative2~2 -->
 <g id="call~~graph~~CallGraph_node28" class="node">
 <title>none~derivative2~2</title>
-<g id="a_call~~graph~~CallGraph_node28"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~2" xlink:title="nurbs_surface%derivative2">
-<polygon fill="#a7506f" stroke="#a7506f" points="839.5,-1810 682.5,-1810 682.5,-1786 839.5,-1786 839.5,-1810"/>
-<text text-anchor="middle" x="761" y="-1795.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2</text>
+<g id="a_call~~graph~~CallGraph_node28"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2~2" xlink:title="nurbs_volume%derivative2">
+<polygon fill="#a7506f" stroke="#a7506f" points="839.5,-4964 682.5,-4964 682.5,-4940 839.5,-4940 839.5,-4964"/>
+<text text-anchor="middle" x="761" y="-4949.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_scalar~2 -->
 <g id="call~~graph~~CallGraph_node151" class="node">
 <title>proc~derivative2_scalar~2</title>
-<g id="a_call~~graph~~CallGraph_node151"><a xlink:href="../proc/derivative2_scalar~2.html" xlink:title="nurbs_surface%derivative2_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1088,-1780 893,-1780 893,-1756 1088,-1756 1088,-1780"/>
-<text text-anchor="middle" x="990.5" y="-1765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_scalar</text>
+<g id="a_call~~graph~~CallGraph_node151"><a xlink:href="../proc/derivative2_scalar~2.html" xlink:title="nurbs_volume%derivative2_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="1088,-4988 893,-4988 893,-4964 1088,-4964 1088,-4988"/>
+<text text-anchor="middle" x="990.5" y="-4973.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_scalar</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2~2&#45;&gt;proc~derivative2_scalar~2 -->
 <g id="call~~graph~~CallGraph_edge27" class="edge">
 <title>none~derivative2~2&#45;&gt;proc~derivative2_scalar~2</title>
-<path fill="none" stroke="#ff7200" stroke-dasharray="5,2" d="M839.66,-1787.76C855.33,-1785.69 872.02,-1783.49 888.35,-1781.34"/>
-<polygon fill="#ff7200" stroke="#ff7200" points="889.01,-1784.78 898.47,-1780 888.1,-1777.84 889.01,-1784.78"/>
+<path fill="none" stroke="#ff7200" stroke-dasharray="5,2" d="M839.66,-4960.19C853.57,-4961.66 868.28,-4963.21 882.84,-4964.75"/>
+<polygon fill="#ff7200" stroke="#ff7200" points="882.57,-4968.24 892.88,-4965.81 883.3,-4961.28 882.57,-4968.24"/>
 </g>
 <!-- proc~derivative2_vector~2 -->
 <g id="call~~graph~~CallGraph_node154" class="node">
 <title>proc~derivative2_vector~2</title>
-<g id="a_call~~graph~~CallGraph_node154"><a xlink:href="../proc/derivative2_vector~2.html" xlink:title="nurbs_surface%derivative2_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1088.5,-1822 892.5,-1822 892.5,-1798 1088.5,-1798 1088.5,-1822"/>
-<text text-anchor="middle" x="990.5" y="-1807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_vector</text>
+<g id="a_call~~graph~~CallGraph_node154"><a xlink:href="../proc/derivative2_vector~2.html" xlink:title="nurbs_volume%derivative2_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="1088.5,-4908 892.5,-4908 892.5,-4884 1088.5,-4884 1088.5,-4908"/>
+<text text-anchor="middle" x="990.5" y="-4893.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_vector</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2~2&#45;&gt;proc~derivative2_vector~2 -->
 <g id="call~~graph~~CallGraph_edge28" class="edge">
 <title>none~derivative2~2&#45;&gt;proc~derivative2_vector~2</title>
-<path fill="none" stroke="#ff7200" stroke-dasharray="5,2" d="M839.66,-1802.1C853.33,-1802.82 867.78,-1803.58 882.09,-1804.33"/>
-<polygon fill="#ff7200" stroke="#ff7200" points="882.31,-1807.85 892.48,-1804.88 882.68,-1800.86 882.31,-1807.85"/>
+<path fill="none" stroke="#ff7200" stroke-dasharray="5,2" d="M810.8,-4939.99C845.92,-4931.34 893.46,-4919.64 930.67,-4910.48"/>
+<polygon fill="#ff7200" stroke="#ff7200" points="931.51,-4913.88 940.38,-4908.09 929.84,-4907.08 931.51,-4913.88"/>
 </g>
 <!-- none~derivative2~3 -->
 <g id="call~~graph~~CallGraph_node29" class="node">
 <title>none~derivative2~3</title>
-<g id="a_call~~graph~~CallGraph_node29"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative2~3" xlink:title="nurbs_curve%derivative2">
-<polygon fill="#a7506f" stroke="#a7506f" points="835,-24 687,-24 687,0 835,0 835,-24"/>
-<text text-anchor="middle" x="761" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2</text>
+<g id="a_call~~graph~~CallGraph_node29"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~3" xlink:title="nurbs_surface%derivative2">
+<polygon fill="#a7506f" stroke="#a7506f" points="839.5,-2322 682.5,-2322 682.5,-2298 839.5,-2298 839.5,-2322"/>
+<text text-anchor="middle" x="761" y="-2307.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_scalar~3 -->
 <g id="call~~graph~~CallGraph_node152" class="node">
 <title>proc~derivative2_scalar~3</title>
-<g id="a_call~~graph~~CallGraph_node152"><a xlink:href="../proc/derivative2_scalar~3.html" xlink:title="nurbs_curve%derivative2_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1083,-34 898,-34 898,-10 1083,-10 1083,-34"/>
-<text text-anchor="middle" x="990.5" y="-19.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_scalar</text>
+<g id="a_call~~graph~~CallGraph_node152"><a xlink:href="../proc/derivative2_scalar~3.html" xlink:title="nurbs_surface%derivative2_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="1088,-2334 893,-2334 893,-2310 1088,-2310 1088,-2334"/>
+<text text-anchor="middle" x="990.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_scalar</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2~3&#45;&gt;proc~derivative2_scalar~3 -->
 <g id="call~~graph~~CallGraph_edge29" class="edge">
 <title>none~derivative2~3&#45;&gt;proc~derivative2_scalar~3</title>
-<path fill="none" stroke="#ff7600" stroke-dasharray="5,2" d="M835.23,-15.22C851.85,-15.95 869.79,-16.74 887.35,-17.51"/>
-<polygon fill="#ff7600" stroke="#ff7600" points="887.5,-21.02 897.64,-17.96 887.8,-14.03 887.5,-21.02"/>
+<path fill="none" stroke="#ff7600" stroke-dasharray="5,2" d="M839.66,-2314.1C853.57,-2314.83 868.28,-2315.61 882.84,-2316.37"/>
+<polygon fill="#ff7600" stroke="#ff7600" points="882.71,-2319.87 892.88,-2316.9 883.08,-2312.88 882.71,-2319.87"/>
 </g>
 <!-- proc~derivative2_vector~3 -->
 <g id="call~~graph~~CallGraph_node155" class="node">
 <title>proc~derivative2_vector~3</title>
-<g id="a_call~~graph~~CallGraph_node155"><a xlink:href="../proc/derivative2_vector~3.html" xlink:title="nurbs_curve%derivative2_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1084,-76 897,-76 897,-52 1084,-52 1084,-76"/>
-<text text-anchor="middle" x="990.5" y="-61.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_vector</text>
+<g id="a_call~~graph~~CallGraph_node155"><a xlink:href="../proc/derivative2_vector~3.html" xlink:title="nurbs_surface%derivative2_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="1088.5,-2376 892.5,-2376 892.5,-2352 1088.5,-2352 1088.5,-2376"/>
+<text text-anchor="middle" x="990.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_vector</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2~3&#45;&gt;proc~derivative2_vector~3 -->
 <g id="call~~graph~~CallGraph_edge30" class="edge">
 <title>none~derivative2~3&#45;&gt;proc~derivative2_vector~3</title>
-<path fill="none" stroke="#ff7600" stroke-dasharray="5,2" d="M817.68,-24.11C829.99,-26.91 842.96,-29.97 855,-33 871.1,-37.05 874.87,-39.04 891,-43 900.49,-45.33 910.53,-47.64 920.42,-49.83"/>
-<polygon fill="#ff7600" stroke="#ff7600" points="919.73,-53.26 930.25,-51.98 921.23,-46.42 919.73,-53.26"/>
+<path fill="none" stroke="#ff7600" stroke-dasharray="5,2" d="M819.77,-2322.1C831.49,-2324.82 843.68,-2327.84 855,-2331 871.25,-2335.53 874.73,-2338.57 891,-2343 899.67,-2345.36 908.83,-2347.62 917.94,-2349.73"/>
+<polygon fill="#ff7600" stroke="#ff7600" points="917.24,-2353.16 927.77,-2351.95 918.78,-2346.33 917.24,-2353.16"/>
 </g>
 <!-- none~derivative~2 -->
 <g id="call~~graph~~CallGraph_node30" class="node">
 <title>none~derivative~2</title>
-<g id="a_call~~graph~~CallGraph_node30"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~2" xlink:title="nurbs_surface%derivative">
-<polygon fill="#a7506f" stroke="#a7506f" points="836.5,-4552 685.5,-4552 685.5,-4528 836.5,-4528 836.5,-4552"/>
-<text text-anchor="middle" x="761" y="-4537.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative</text>
+<g id="a_call~~graph~~CallGraph_node30"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative~2" xlink:title="nurbs_volume%derivative">
+<polygon fill="#a7506f" stroke="#a7506f" points="836.5,-5330 685.5,-5330 685.5,-5306 836.5,-5306 836.5,-5330"/>
+<text text-anchor="middle" x="761" y="-5315.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_scalar~2 -->
 <g id="call~~graph~~CallGraph_node157" class="node">
 <title>proc~derivative_scalar~2</title>
-<g id="a_call~~graph~~CallGraph_node157"><a xlink:href="../proc/derivative_scalar~2.html" xlink:title="nurbs_surface%derivative_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1084.5,-3706 896.5,-3706 896.5,-3682 1084.5,-3682 1084.5,-3706"/>
-<text text-anchor="middle" x="990.5" y="-3691.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_scalar</text>
+<g id="a_call~~graph~~CallGraph_node157"><a xlink:href="../proc/derivative_scalar~2.html" xlink:title="nurbs_volume%derivative_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="1084.5,-5278 896.5,-5278 896.5,-5254 1084.5,-5254 1084.5,-5278"/>
+<text text-anchor="middle" x="990.5" y="-5263.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_scalar</text>
 </a>
 </g>
 </g>
 <!-- none~derivative~2&#45;&gt;proc~derivative_scalar~2 -->
 <g id="call~~graph~~CallGraph_edge31" class="edge">
 <title>none~derivative~2&#45;&gt;proc~derivative_scalar~2</title>
-<path fill="none" stroke="#ff7a00" stroke-dasharray="5,2" d="M836.5,-4528.88C843.59,-4525.15 849.99,-4520.3 855,-4514 910.3,-4444.43 833.55,-3782.8 891,-3715 891.62,-3714.27 892.25,-3713.56 892.91,-3712.88"/>
-<polygon fill="#ff7a00" stroke="#ff7a00" points="895.25,-3715.48 900.54,-3706.29 890.68,-3710.18 895.25,-3715.48"/>
+<path fill="none" stroke="#ff7a00" stroke-dasharray="5,2" d="M815.61,-5305.94C828.51,-5303.02 842.25,-5299.91 855,-5297 878.71,-5291.59 904.76,-5285.6 927.56,-5280.34"/>
+<polygon fill="#ff7a00" stroke="#ff7a00" points="928.5,-5283.71 937.46,-5278.05 926.93,-5276.89 928.5,-5283.71"/>
 </g>
 <!-- proc~derivative_vector~2 -->
 <g id="call~~graph~~CallGraph_node160" class="node">
 <title>proc~derivative_vector~2</title>
-<g id="a_call~~graph~~CallGraph_node160"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_surface%derivative_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1085.5,-4000 895.5,-4000 895.5,-3976 1085.5,-3976 1085.5,-4000"/>
-<text text-anchor="middle" x="990.5" y="-3985.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_vector</text>
+<g id="a_call~~graph~~CallGraph_node160"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_volume%derivative_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="1085.5,-5236 895.5,-5236 895.5,-5212 1085.5,-5212 1085.5,-5236"/>
+<text text-anchor="middle" x="990.5" y="-5221.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_vector</text>
 </a>
 </g>
 </g>
 <!-- none~derivative~2&#45;&gt;proc~derivative_vector~2 -->
 <g id="call~~graph~~CallGraph_edge32" class="edge">
 <title>none~derivative~2&#45;&gt;proc~derivative_vector~2</title>
-<path fill="none" stroke="#ff7a00" stroke-dasharray="5,2" d="M836.78,-4528.51C843.73,-4524.84 850.02,-4520.1 855,-4514 926.15,-4426.85 817.16,-4093.88 891,-4009 891.75,-4008.14 892.52,-4007.32 893.31,-4006.52"/>
-<polygon fill="#ff7a00" stroke="#ff7a00" points="895.6,-4009.17 901.07,-4000.09 891.13,-4003.78 895.6,-4009.17"/>
+<path fill="none" stroke="#ff7a00" stroke-dasharray="5,2" d="M836.7,-5306.48C843.17,-5303.92 849.37,-5300.8 855,-5297 878.3,-5281.28 867.61,-5260.58 891,-5245 893.46,-5243.36 896.02,-5241.85 898.66,-5240.46"/>
+<polygon fill="#ff7a00" stroke="#ff7a00" points="900.32,-5243.54 907.9,-5236.14 897.36,-5237.2 900.32,-5243.54"/>
 </g>
 <!-- none~derivative~3 -->
 <g id="call~~graph~~CallGraph_node31" class="node">
 <title>none~derivative~3</title>
-<g id="a_call~~graph~~CallGraph_node31"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative~3" xlink:title="nurbs_curve%derivative">
-<polygon fill="#a7506f" stroke="#a7506f" points="831.5,-2840 690.5,-2840 690.5,-2816 831.5,-2816 831.5,-2840"/>
-<text text-anchor="middle" x="761" y="-2825.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative</text>
+<g id="a_call~~graph~~CallGraph_node31"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~3" xlink:title="nurbs_surface%derivative">
+<polygon fill="#a7506f" stroke="#a7506f" points="836.5,-4660 685.5,-4660 685.5,-4636 836.5,-4636 836.5,-4660"/>
+<text text-anchor="middle" x="761" y="-4645.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_scalar~3 -->
 <g id="call~~graph~~CallGraph_node158" class="node">
 <title>proc~derivative_scalar~3</title>
-<g id="a_call~~graph~~CallGraph_node158"><a xlink:href="../proc/derivative_scalar~3.html" xlink:title="nurbs_curve%derivative_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1079.5,-2596 901.5,-2596 901.5,-2572 1079.5,-2572 1079.5,-2596"/>
-<text text-anchor="middle" x="990.5" y="-2581.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_scalar</text>
+<g id="a_call~~graph~~CallGraph_node158"><a xlink:href="../proc/derivative_scalar~3.html" xlink:title="nurbs_surface%derivative_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="1084.5,-4500 896.5,-4500 896.5,-4476 1084.5,-4476 1084.5,-4500"/>
+<text text-anchor="middle" x="990.5" y="-4485.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_scalar</text>
 </a>
 </g>
 </g>
 <!-- none~derivative~3&#45;&gt;proc~derivative_scalar~3 -->
 <g id="call~~graph~~CallGraph_edge33" class="edge">
 <title>none~derivative~3&#45;&gt;proc~derivative_scalar~3</title>
-<path fill="none" stroke="#ff7e00" stroke-dasharray="5,2" d="M831.63,-2821.61C840.34,-2818.28 848.47,-2813.57 855,-2807 907.61,-2754.07 847.42,-2703.58 891,-2643 904.77,-2623.86 926.84,-2609.81 946.6,-2600.24"/>
-<polygon fill="#ff7e00" stroke="#ff7e00" points="948.15,-2603.38 955.77,-2596.02 945.23,-2597.02 948.15,-2603.38"/>
+<path fill="none" stroke="#ff7e00" stroke-dasharray="5,2" d="M834.02,-4635.89C841.74,-4632.36 848.97,-4627.82 855,-4622 892.93,-4585.4 851.94,-4544.39 891,-4509 892.17,-4507.94 893.39,-4506.92 894.64,-4505.95"/>
+<polygon fill="#ff7e00" stroke="#ff7e00" points="896.93,-4508.64 903.37,-4500.22 893.09,-4502.78 896.93,-4508.64"/>
 </g>
 <!-- proc~derivative_vector~3 -->
 <g id="call~~graph~~CallGraph_node161" class="node">
 <title>proc~derivative_vector~3</title>
-<g id="a_call~~graph~~CallGraph_node161"><a xlink:href="../proc/derivative_vector~3.html" xlink:title="nurbs_curve%derivative_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1080.5,-2554 900.5,-2554 900.5,-2530 1080.5,-2530 1080.5,-2554"/>
-<text text-anchor="middle" x="990.5" y="-2539.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_vector</text>
+<g id="a_call~~graph~~CallGraph_node161"><a xlink:href="../proc/derivative_vector~3.html" xlink:title="nurbs_surface%derivative_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="1085.5,-4542 895.5,-4542 895.5,-4518 1085.5,-4518 1085.5,-4542"/>
+<text text-anchor="middle" x="990.5" y="-4527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_vector</text>
 </a>
 </g>
 </g>
 <!-- none~derivative~3&#45;&gt;proc~derivative_vector~3 -->
 <g id="call~~graph~~CallGraph_edge34" class="edge">
 <title>none~derivative~3&#45;&gt;proc~derivative_vector~3</title>
-<path fill="none" stroke="#ff7e00" stroke-dasharray="5,2" d="M831.59,-2822.2C840.42,-2818.8 848.59,-2813.92 855,-2807 929.53,-2726.61 815.99,-2642.94 891,-2563 891.91,-2562.03 892.85,-2561.1 893.82,-2560.21"/>
-<polygon fill="#ff7e00" stroke="#ff7e00" points="896.01,-2562.95 901.81,-2554.08 891.75,-2557.39 896.01,-2562.95"/>
+<path fill="none" stroke="#ff7e00" stroke-dasharray="5,2" d="M816.68,-4635.93C829.54,-4632.21 843,-4627.6 855,-4622 897.62,-4602.13 941.59,-4569.28 967.2,-4548.68"/>
+<polygon fill="#ff7e00" stroke="#ff7e00" points="969.61,-4551.23 975.15,-4542.2 965.18,-4545.81 969.61,-4551.23"/>
 </g>
-<!-- none~get_degree -->
+<!-- none~get_degree~2 -->
 <g id="call~~graph~~CallGraph_node32" class="node">
-<title>none~get_degree</title>
-<g id="a_call~~graph~~CallGraph_node32"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_degree" xlink:title="nurbs_volume%get_degree">
-<polygon fill="#a7506f" stroke="#a7506f" points="839.5,-3340 682.5,-3340 682.5,-3316 839.5,-3316 839.5,-3340"/>
-<text text-anchor="middle" x="761" y="-3325.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_degree</text>
+<title>none~get_degree~2</title>
+<g id="a_call~~graph~~CallGraph_node32"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_degree~2" xlink:title="nurbs_volume%get_degree">
+<polygon fill="#a7506f" stroke="#a7506f" points="839.5,-3562 682.5,-3562 682.5,-3538 839.5,-3538 839.5,-3562"/>
+<text text-anchor="middle" x="761" y="-3547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_degree</text>
 </a>
 </g>
 </g>
@@ -2721,38 +2721,38 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node191" class="node">
 <title>proc~get_degree_all</title>
 <g id="a_call~~graph~~CallGraph_node191"><a xlink:href="../proc/get_degree_all.html" xlink:title="nurbs_volume%get_degree_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1078,-3050 903,-3050 903,-3026 1078,-3026 1078,-3050"/>
-<text text-anchor="middle" x="990.5" y="-3035.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_degree_all</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1078,-3684 903,-3684 903,-3660 1078,-3660 1078,-3684"/>
+<text text-anchor="middle" x="990.5" y="-3669.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_degree_all</text>
 </a>
 </g>
 </g>
-<!-- none~get_degree&#45;&gt;proc~get_degree_all -->
+<!-- none~get_degree~2&#45;&gt;proc~get_degree_all -->
 <g id="call~~graph~~CallGraph_edge35" class="edge">
-<title>none~get_degree&#45;&gt;proc~get_degree_all</title>
-<path fill="none" stroke="#ff8300" stroke-dasharray="5,2" d="M839.72,-3318.52C845.4,-3315.51 850.61,-3311.73 855,-3307 929.25,-3226.96 818.2,-3145.36 891,-3064 893.92,-3060.74 897.19,-3057.86 900.73,-3055.33"/>
-<polygon fill="#ff8300" stroke="#ff8300" points="902.7,-3058.23 909.4,-3050.03 899.05,-3052.26 902.7,-3058.23"/>
+<title>none~get_degree~2&#45;&gt;proc~get_degree_all</title>
+<path fill="none" stroke="#ff8300" stroke-dasharray="5,2" d="M839.78,-3561.52C845.23,-3564.1 850.39,-3567.23 855,-3571 885.19,-3595.67 860.66,-3626.51 891,-3651 892.77,-3652.43 894.61,-3653.76 896.52,-3655.02"/>
+<polygon fill="#ff8300" stroke="#ff8300" points="894.81,-3658.07 905.23,-3659.97 898.27,-3651.99 894.81,-3658.07"/>
 </g>
 <!-- proc~get_degree_dir -->
 <g id="call~~graph~~CallGraph_node193" class="node">
 <title>proc~get_degree_dir</title>
 <g id="a_call~~graph~~CallGraph_node193"><a xlink:href="../proc/get_degree_dir.html" xlink:title="nurbs_volume%get_degree_dir">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1079,-3008 902,-3008 902,-2984 1079,-2984 1079,-3008"/>
-<text text-anchor="middle" x="990.5" y="-2993.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_degree_dir</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1079,-3642 902,-3642 902,-3618 1079,-3618 1079,-3642"/>
+<text text-anchor="middle" x="990.5" y="-3627.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_degree_dir</text>
 </a>
 </g>
 </g>
-<!-- none~get_degree&#45;&gt;proc~get_degree_dir -->
+<!-- none~get_degree~2&#45;&gt;proc~get_degree_dir -->
 <g id="call~~graph~~CallGraph_edge36" class="edge">
-<title>none~get_degree&#45;&gt;proc~get_degree_dir</title>
-<path fill="none" stroke="#ff8300" stroke-dasharray="5,2" d="M839.84,-3318.63C845.49,-3315.6 850.67,-3311.78 855,-3307 942.2,-3210.75 803.22,-3112.72 891,-3017 891.9,-3016.02 892.83,-3015.08 893.79,-3014.18"/>
-<polygon fill="#ff8300" stroke="#ff8300" points="895.99,-3016.91 901.72,-3008 891.68,-3011.39 895.99,-3016.91"/>
+<title>none~get_degree~2&#45;&gt;proc~get_degree_dir</title>
+<path fill="none" stroke="#ff8300" stroke-dasharray="5,2" d="M835.16,-3562.11C842.08,-3564.55 848.81,-3567.48 855,-3571 875.22,-3582.5 870.71,-3597.62 891,-3609 894.46,-3610.94 898.08,-3612.7 901.81,-3614.3"/>
+<polygon fill="#ff8300" stroke="#ff8300" points="900.67,-3617.61 911.26,-3617.95 903.19,-3611.08 900.67,-3617.61"/>
 </g>
-<!-- none~get_degree~2 -->
+<!-- none~get_degree~3 -->
 <g id="call~~graph~~CallGraph_node33" class="node">
-<title>none~get_degree~2</title>
-<g id="a_call~~graph~~CallGraph_node33"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_degree~2" xlink:title="nurbs_surface%get_degree">
-<polygon fill="#a7506f" stroke="#a7506f" points="839.5,-2218 682.5,-2218 682.5,-2194 839.5,-2194 839.5,-2218"/>
-<text text-anchor="middle" x="761" y="-2203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_degree</text>
+<title>none~get_degree~3</title>
+<g id="a_call~~graph~~CallGraph_node33"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_degree~3" xlink:title="nurbs_surface%get_degree">
+<polygon fill="#a7506f" stroke="#a7506f" points="839.5,-2658 682.5,-2658 682.5,-2634 839.5,-2634 839.5,-2658"/>
+<text text-anchor="middle" x="761" y="-2643.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_degree</text>
 </a>
 </g>
 </g>
@@ -2760,155 +2760,155 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node192" class="node">
 <title>proc~get_degree_all~2</title>
 <g id="a_call~~graph~~CallGraph_node192"><a xlink:href="../proc/get_degree_all~2.html" xlink:title="nurbs_surface%get_degree_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1078,-2428 903,-2428 903,-2404 1078,-2404 1078,-2428"/>
-<text text-anchor="middle" x="990.5" y="-2413.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_degree_all</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1078,-2700 903,-2700 903,-2676 1078,-2676 1078,-2700"/>
+<text text-anchor="middle" x="990.5" y="-2685.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_degree_all</text>
 </a>
 </g>
 </g>
-<!-- none~get_degree~2&#45;&gt;proc~get_degree_all~2 -->
+<!-- none~get_degree~3&#45;&gt;proc~get_degree_all~2 -->
 <g id="call~~graph~~CallGraph_edge37" class="edge">
-<title>none~get_degree~2&#45;&gt;proc~get_degree_all~2</title>
-<path fill="none" stroke="#ff8700" stroke-dasharray="5,2" d="M839.84,-2216.02C845.42,-2218.92 850.58,-2222.53 855,-2227 908.7,-2281.29 836.98,-2341.03 891,-2395 892.12,-2396.12 893.29,-2397.19 894.49,-2398.2"/>
-<polygon fill="#ff8700" stroke="#ff8700" points="892.78,-2401.28 902.97,-2404.2 896.83,-2395.57 892.78,-2401.28"/>
+<title>none~get_degree~3&#45;&gt;proc~get_degree_all~2</title>
+<path fill="none" stroke="#ff8700" stroke-dasharray="5,2" d="M827.19,-2658.04C854.32,-2663.04 885.99,-2668.89 914.11,-2674.08"/>
+<polygon fill="#ff8700" stroke="#ff8700" points="913.83,-2677.59 924.3,-2675.96 915.1,-2670.71 913.83,-2677.59"/>
 </g>
 <!-- proc~get_degree_dir~2 -->
 <g id="call~~graph~~CallGraph_node194" class="node">
 <title>proc~get_degree_dir~2</title>
 <g id="a_call~~graph~~CallGraph_node194"><a xlink:href="../proc/get_degree_dir~2.html" xlink:title="nurbs_surface%get_degree_dir">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1079,-2386 902,-2386 902,-2362 1079,-2362 1079,-2386"/>
-<text text-anchor="middle" x="990.5" y="-2371.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_degree_dir</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1079,-2658 902,-2658 902,-2634 1079,-2634 1079,-2658"/>
+<text text-anchor="middle" x="990.5" y="-2643.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_degree_dir</text>
 </a>
 </g>
 </g>
-<!-- none~get_degree~2&#45;&gt;proc~get_degree_dir~2 -->
+<!-- none~get_degree~3&#45;&gt;proc~get_degree_dir~2 -->
 <g id="call~~graph~~CallGraph_edge38" class="edge">
-<title>none~get_degree~2&#45;&gt;proc~get_degree_dir~2</title>
-<path fill="none" stroke="#ff8700" stroke-dasharray="5,2" d="M839.91,-2216.63C845.4,-2219.4 850.53,-2222.82 855,-2227 895.98,-2265.32 850.71,-2308.95 891,-2348 894.54,-2351.44 898.49,-2354.43 902.7,-2357.04"/>
-<polygon fill="#ff8700" stroke="#ff8700" points="901.21,-2360.22 911.68,-2361.88 904.53,-2354.05 901.21,-2360.22"/>
+<title>none~get_degree~3&#45;&gt;proc~get_degree_dir~2</title>
+<path fill="none" stroke="#ff8700" stroke-dasharray="5,2" d="M839.66,-2646C856.33,-2646 874.17,-2646 891.5,-2646"/>
+<polygon fill="#ff8700" stroke="#ff8700" points="891.64,-2649.5 901.64,-2646 891.64,-2642.5 891.64,-2649.5"/>
 </g>
 <!-- none~get_knot -->
 <g id="call~~graph~~CallGraph_node34" class="node">
 <title>none~get_knot</title>
-<g id="a_call~~graph~~CallGraph_node34"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot" xlink:title="nurbs_volume%get_knot">
-<polygon fill="#a7506f" stroke="#a7506f" points="1062,-3212 919,-3212 919,-3188 1062,-3188 1062,-3212"/>
-<text text-anchor="middle" x="990.5" y="-3197.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot</text>
+<g id="a_call~~graph~~CallGraph_node34"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_knot" xlink:title="nurbs_curve%get_knot">
+<polygon fill="#a7506f" stroke="#a7506f" points="1057,-6722 924,-6722 924,-6698 1057,-6698 1057,-6722"/>
+<text text-anchor="middle" x="990.5" y="-6707.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot</text>
 </a>
 </g>
 </g>
 <!-- proc~get_knot_all -->
 <g id="call~~graph~~CallGraph_node204" class="node">
 <title>proc~get_knot_all</title>
-<g id="a_call~~graph~~CallGraph_node204"><a xlink:href="../proc/get_knot_all.html" xlink:title="nurbs_volume%get_knot_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1298.5,-3172 1137.5,-3172 1137.5,-3148 1298.5,-3148 1298.5,-3172"/>
-<text text-anchor="middle" x="1218" y="-3157.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot_all</text>
+<g id="a_call~~graph~~CallGraph_node204"><a xlink:href="../proc/get_knot_all.html" xlink:title="nurbs_curve%get_knot_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1293.5,-6638 1142.5,-6638 1142.5,-6614 1293.5,-6614 1293.5,-6638"/>
+<text text-anchor="middle" x="1218" y="-6623.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot&#45;&gt;proc~get_knot_all -->
 <g id="call~~graph~~CallGraph_edge39" class="edge">
 <title>none~get_knot&#45;&gt;proc~get_knot_all</title>
-<path fill="none" stroke="#ff8b00" stroke-dasharray="5,2" d="M1059.16,-3188C1084.24,-3183.55 1112.89,-3178.47 1138.83,-3173.87"/>
-<polygon fill="#ff8b00" stroke="#ff8b00" points="1139.77,-3177.25 1149,-3172.06 1138.54,-3170.36 1139.77,-3177.25"/>
+<path fill="none" stroke="#ff8b00" stroke-dasharray="5,2" d="M1057.08,-6702.28C1068.55,-6699.21 1080,-6694.94 1090,-6689 1111.14,-6676.44 1104.97,-6659.73 1126,-6647 1129,-6645.18 1132.15,-6643.52 1135.39,-6642"/>
+<polygon fill="#ff8b00" stroke="#ff8b00" points="1136.88,-6645.18 1144.76,-6638.1 1134.18,-6638.72 1136.88,-6645.18"/>
 </g>
 <!-- proc~get_knoti -->
 <g id="call~~graph~~CallGraph_node207" class="node">
 <title>proc~get_knoti</title>
-<g id="a_call~~graph~~CallGraph_node207"><a xlink:href="../proc/get_knoti.html" xlink:title="nurbs_volume%get_knoti">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1291,-3130 1145,-3130 1145,-3106 1291,-3106 1291,-3130"/>
-<text text-anchor="middle" x="1218" y="-3115.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knoti</text>
+<g id="a_call~~graph~~CallGraph_node207"><a xlink:href="../proc/get_knoti.html" xlink:title="nurbs_curve%get_knoti">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1286,-6680 1150,-6680 1150,-6656 1286,-6656 1286,-6680"/>
+<text text-anchor="middle" x="1218" y="-6665.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knoti</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot&#45;&gt;proc~get_knoti -->
 <g id="call~~graph~~CallGraph_edge40" class="edge">
 <title>none~get_knot&#45;&gt;proc~get_knoti</title>
-<path fill="none" stroke="#ff8b00" stroke-dasharray="5,2" d="M1014.26,-3187.98C1040.56,-3174.5 1085.44,-3152.72 1126,-3139 1132.76,-3136.71 1139.88,-3134.59 1147.04,-3132.65"/>
-<polygon fill="#ff8b00" stroke="#ff8b00" points="1148.01,-3136.01 1156.81,-3130.11 1146.25,-3129.24 1148.01,-3136.01"/>
+<path fill="none" stroke="#ff8b00" stroke-dasharray="5,2" d="M1056.12,-6697.96C1083.01,-6692.96 1114.4,-6687.11 1142.27,-6681.92"/>
+<polygon fill="#ff8b00" stroke="#ff8b00" points="1143.18,-6685.31 1152.37,-6680.04 1141.9,-6678.43 1143.18,-6685.31"/>
 </g>
 <!-- none~get_knot~2 -->
 <g id="call~~graph~~CallGraph_node35" class="node">
 <title>none~get_knot~2</title>
-<g id="a_call~~graph~~CallGraph_node35"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~2" xlink:title="nurbs_surface%get_knot">
-<polygon fill="#a7506f" stroke="#a7506f" points="1062,-1902 919,-1902 919,-1878 1062,-1878 1062,-1902"/>
-<text text-anchor="middle" x="990.5" y="-1887.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
+<g id="a_call~~graph~~CallGraph_node35"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot~2" xlink:title="nurbs_volume%get_knot">
+<polygon fill="#a7506f" stroke="#a7506f" points="1062,-3795 919,-3795 919,-3771 1062,-3771 1062,-3795"/>
+<text text-anchor="middle" x="990.5" y="-3780.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot</text>
 </a>
 </g>
 </g>
 <!-- proc~get_knot_all~2 -->
 <g id="call~~graph~~CallGraph_node205" class="node">
 <title>proc~get_knot_all~2</title>
-<g id="a_call~~graph~~CallGraph_node205"><a xlink:href="../proc/get_knot_all~2.html" xlink:title="nurbs_surface%get_knot_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1298.5,-1902 1137.5,-1902 1137.5,-1878 1298.5,-1878 1298.5,-1902"/>
-<text text-anchor="middle" x="1218" y="-1887.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot_all</text>
+<g id="a_call~~graph~~CallGraph_node205"><a xlink:href="../proc/get_knot_all~2.html" xlink:title="nurbs_volume%get_knot_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1298.5,-3774 1137.5,-3774 1137.5,-3750 1298.5,-3750 1298.5,-3774"/>
+<text text-anchor="middle" x="1218" y="-3759.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot~2&#45;&gt;proc~get_knot_all~2 -->
 <g id="call~~graph~~CallGraph_edge41" class="edge">
 <title>none~get_knot~2&#45;&gt;proc~get_knot_all~2</title>
-<path fill="none" stroke="#ff8f00" stroke-dasharray="5,2" d="M1062.23,-1890C1082.86,-1890 1105.68,-1890 1127.31,-1890"/>
-<polygon fill="#ff8f00" stroke="#ff8f00" points="1127.49,-1893.5 1137.49,-1890 1127.49,-1886.5 1127.49,-1893.5"/>
+<path fill="none" stroke="#ff8f00" stroke-dasharray="5,2" d="M1062.23,-3776.41C1082.86,-3774.49 1105.68,-3772.37 1127.31,-3770.35"/>
+<polygon fill="#ff8f00" stroke="#ff8f00" points="1127.86,-3773.82 1137.49,-3769.4 1127.21,-3766.85 1127.86,-3773.82"/>
 </g>
 <!-- proc~get_knoti~2 -->
 <g id="call~~graph~~CallGraph_node208" class="node">
 <title>proc~get_knoti~2</title>
-<g id="a_call~~graph~~CallGraph_node208"><a xlink:href="../proc/get_knoti~2.html" xlink:title="nurbs_surface%get_knoti">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1291,-1860 1145,-1860 1145,-1836 1291,-1836 1291,-1860"/>
-<text text-anchor="middle" x="1218" y="-1845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knoti</text>
+<g id="a_call~~graph~~CallGraph_node208"><a xlink:href="../proc/get_knoti~2.html" xlink:title="nurbs_volume%get_knoti">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1291,-3816 1145,-3816 1145,-3792 1291,-3792 1291,-3816"/>
+<text text-anchor="middle" x="1218" y="-3801.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knoti</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot~2&#45;&gt;proc~get_knoti~2 -->
 <g id="call~~graph~~CallGraph_edge42" class="edge">
 <title>none~get_knot~2&#45;&gt;proc~get_knoti~2</title>
-<path fill="none" stroke="#ff8f00" stroke-dasharray="5,2" d="M1056.12,-1877.96C1083.01,-1872.96 1114.4,-1867.11 1142.27,-1861.92"/>
-<polygon fill="#ff8f00" stroke="#ff8f00" points="1143.18,-1865.31 1152.37,-1860.04 1141.9,-1858.43 1143.18,-1865.31"/>
+<path fill="none" stroke="#ff8f00" stroke-dasharray="5,2" d="M1062.23,-3789.59C1085.29,-3791.73 1111.08,-3794.14 1134.89,-3796.35"/>
+<polygon fill="#ff8f00" stroke="#ff8f00" points="1134.69,-3799.85 1144.97,-3797.29 1135.34,-3792.88 1134.69,-3799.85"/>
 </g>
 <!-- none~get_knot~3 -->
 <g id="call~~graph~~CallGraph_node36" class="node">
 <title>none~get_knot~3</title>
-<g id="a_call~~graph~~CallGraph_node36"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_knot~3" xlink:title="nurbs_curve%get_knot">
-<polygon fill="#a7506f" stroke="#a7506f" points="1057,-2802 924,-2802 924,-2778 1057,-2778 1057,-2802"/>
-<text text-anchor="middle" x="990.5" y="-2787.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot</text>
+<g id="a_call~~graph~~CallGraph_node36"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~3" xlink:title="nurbs_surface%get_knot">
+<polygon fill="#a7506f" stroke="#a7506f" points="1062,-2780 919,-2780 919,-2756 1062,-2756 1062,-2780"/>
+<text text-anchor="middle" x="990.5" y="-2765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
 </a>
 </g>
 </g>
 <!-- proc~get_knot_all~3 -->
 <g id="call~~graph~~CallGraph_node206" class="node">
 <title>proc~get_knot_all~3</title>
-<g id="a_call~~graph~~CallGraph_node206"><a xlink:href="../proc/get_knot_all~3.html" xlink:title="nurbs_curve%get_knot_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1293.5,-2760 1142.5,-2760 1142.5,-2736 1293.5,-2736 1293.5,-2760"/>
-<text text-anchor="middle" x="1218" y="-2745.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot_all</text>
+<g id="a_call~~graph~~CallGraph_node206"><a xlink:href="../proc/get_knot_all~3.html" xlink:title="nurbs_surface%get_knot_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1298.5,-2738 1137.5,-2738 1137.5,-2714 1298.5,-2714 1298.5,-2738"/>
+<text text-anchor="middle" x="1218" y="-2723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot~3&#45;&gt;proc~get_knot_all~3 -->
 <g id="call~~graph~~CallGraph_edge43" class="edge">
 <title>none~get_knot~3&#45;&gt;proc~get_knot_all~3</title>
-<path fill="none" stroke="#ff9300" stroke-dasharray="5,2" d="M1056.12,-2777.96C1083.01,-2772.96 1114.4,-2767.11 1142.27,-2761.92"/>
-<polygon fill="#ff9300" stroke="#ff9300" points="1143.18,-2765.31 1152.37,-2760.04 1141.9,-2758.43 1143.18,-2765.31"/>
+<path fill="none" stroke="#ff9300" stroke-dasharray="5,2" d="M1056.12,-2755.96C1083.01,-2750.96 1114.4,-2745.11 1142.27,-2739.92"/>
+<polygon fill="#ff9300" stroke="#ff9300" points="1143.18,-2743.31 1152.37,-2738.04 1141.9,-2736.43 1143.18,-2743.31"/>
 </g>
 <!-- proc~get_knoti~3 -->
 <g id="call~~graph~~CallGraph_node209" class="node">
 <title>proc~get_knoti~3</title>
-<g id="a_call~~graph~~CallGraph_node209"><a xlink:href="../proc/get_knoti~3.html" xlink:title="nurbs_curve%get_knoti">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1286,-2802 1150,-2802 1150,-2778 1286,-2778 1286,-2802"/>
-<text text-anchor="middle" x="1218" y="-2787.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knoti</text>
+<g id="a_call~~graph~~CallGraph_node209"><a xlink:href="../proc/get_knoti~3.html" xlink:title="nurbs_surface%get_knoti">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1291,-2780 1145,-2780 1145,-2756 1291,-2756 1291,-2780"/>
+<text text-anchor="middle" x="1218" y="-2765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knoti</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot~3&#45;&gt;proc~get_knoti~3 -->
 <g id="call~~graph~~CallGraph_edge44" class="edge">
 <title>none~get_knot~3&#45;&gt;proc~get_knoti~3</title>
-<path fill="none" stroke="#ff9300" stroke-dasharray="5,2" d="M1057.03,-2790C1082.86,-2790 1112.72,-2790 1139.6,-2790"/>
-<polygon fill="#ff9300" stroke="#ff9300" points="1139.74,-2793.5 1149.74,-2790 1139.74,-2786.5 1139.74,-2793.5"/>
+<path fill="none" stroke="#ff9300" stroke-dasharray="5,2" d="M1062.23,-2768C1085.29,-2768 1111.08,-2768 1134.89,-2768"/>
+<polygon fill="#ff9300" stroke="#ff9300" points="1134.97,-2771.5 1144.97,-2768 1134.97,-2764.5 1134.97,-2771.5"/>
 </g>
-<!-- none~get_nc -->
+<!-- none~get_nc~2 -->
 <g id="call~~graph~~CallGraph_node37" class="node">
-<title>none~get_nc</title>
-<g id="a_call~~graph~~CallGraph_node37"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_nc" xlink:title="nurbs_volume%get_nc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1494,-2657 1361,-2657 1361,-2633 1494,-2633 1494,-2657"/>
-<text text-anchor="middle" x="1427.5" y="-2642.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_nc</text>
+<title>none~get_nc~2</title>
+<g id="a_call~~graph~~CallGraph_node37"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_nc~2" xlink:title="nurbs_volume%get_nc">
+<polygon fill="#a7506f" stroke="#a7506f" points="1494,-3146 1361,-3146 1361,-3122 1494,-3122 1494,-3146"/>
+<text text-anchor="middle" x="1427.5" y="-3131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_nc</text>
 </a>
 </g>
 </g>
@@ -2916,38 +2916,38 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node214" class="node">
 <title>proc~get_nc_all</title>
 <g id="a_call~~graph~~CallGraph_node214"><a xlink:href="../proc/get_nc_all.html" xlink:title="nurbs_volume%get_nc_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1709.5,-2760 1558.5,-2760 1558.5,-2736 1709.5,-2736 1709.5,-2760"/>
-<text text-anchor="middle" x="1634" y="-2745.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_nc_all</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1709.5,-3188 1558.5,-3188 1558.5,-3164 1709.5,-3164 1709.5,-3188"/>
+<text text-anchor="middle" x="1634" y="-3173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_nc_all</text>
 </a>
 </g>
 </g>
-<!-- none~get_nc&#45;&gt;proc~get_nc_all -->
+<!-- none~get_nc~2&#45;&gt;proc~get_nc_all -->
 <g id="call~~graph~~CallGraph_edge45" class="edge">
-<title>none~get_nc&#45;&gt;proc~get_nc_all</title>
-<path fill="none" stroke="#ff9800" stroke-dasharray="5,2" d="M1493.46,-2657.01C1499,-2659.47 1504.27,-2662.43 1509,-2666 1534.13,-2684.96 1519.67,-2708.3 1545,-2727 1547.1,-2728.55 1549.3,-2729.99 1551.58,-2731.32"/>
-<polygon fill="#ff9800" stroke="#ff9800" points="1550.19,-2734.54 1560.69,-2735.96 1553.36,-2728.31 1550.19,-2734.54"/>
+<title>none~get_nc~2&#45;&gt;proc~get_nc_all</title>
+<path fill="none" stroke="#ff9800" stroke-dasharray="5,2" d="M1487.1,-3146.04C1511.27,-3151 1539.45,-3156.79 1564.57,-3161.95"/>
+<polygon fill="#ff9800" stroke="#ff9800" points="1563.89,-3165.38 1574.39,-3163.96 1565.3,-3158.52 1563.89,-3165.38"/>
 </g>
 <!-- proc~get_nc_dir -->
 <g id="call~~graph~~CallGraph_node216" class="node">
 <title>proc~get_nc_dir</title>
 <g id="a_call~~graph~~CallGraph_node216"><a xlink:href="../proc/get_nc_dir.html" xlink:title="nurbs_volume%get_nc_dir">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1710,-2634 1558,-2634 1558,-2610 1710,-2610 1710,-2634"/>
-<text text-anchor="middle" x="1634" y="-2619.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_nc_dir</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1710,-3146 1558,-3146 1558,-3122 1710,-3122 1710,-3146"/>
+<text text-anchor="middle" x="1634" y="-3131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_nc_dir</text>
 </a>
 </g>
 </g>
-<!-- none~get_nc&#45;&gt;proc~get_nc_dir -->
+<!-- none~get_nc~2&#45;&gt;proc~get_nc_dir -->
 <g id="call~~graph~~CallGraph_edge46" class="edge">
-<title>none~get_nc&#45;&gt;proc~get_nc_dir</title>
-<path fill="none" stroke="#ff9800" stroke-dasharray="5,2" d="M1494.05,-2637.63C1511.12,-2635.71 1529.77,-2633.61 1547.7,-2631.59"/>
-<polygon fill="#ff9800" stroke="#ff9800" points="1548.32,-2635.05 1557.86,-2630.45 1547.53,-2628.09 1548.32,-2635.05"/>
+<title>none~get_nc~2&#45;&gt;proc~get_nc_dir</title>
+<path fill="none" stroke="#ff9800" stroke-dasharray="5,2" d="M1494.05,-3134C1511.12,-3134 1529.77,-3134 1547.7,-3134"/>
+<polygon fill="#ff9800" stroke="#ff9800" points="1547.86,-3137.5 1557.86,-3134 1547.86,-3130.5 1547.86,-3137.5"/>
 </g>
-<!-- none~get_nc~2 -->
+<!-- none~get_nc~3 -->
 <g id="call~~graph~~CallGraph_node38" class="node">
-<title>none~get_nc~2</title>
-<g id="a_call~~graph~~CallGraph_node38"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_nc~2" xlink:title="nurbs_surface%get_nc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1494,-2428 1361,-2428 1361,-2404 1494,-2404 1494,-2428"/>
-<text text-anchor="middle" x="1427.5" y="-2413.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_nc</text>
+<title>none~get_nc~3</title>
+<g id="a_call~~graph~~CallGraph_node38"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_nc~3" xlink:title="nurbs_surface%get_nc">
+<polygon fill="#a7506f" stroke="#a7506f" points="1494,-2902 1361,-2902 1361,-2878 1494,-2878 1494,-2902"/>
+<text text-anchor="middle" x="1427.5" y="-2887.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_nc</text>
 </a>
 </g>
 </g>
@@ -2955,905 +2955,905 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node215" class="node">
 <title>proc~get_nc_all~2</title>
 <g id="a_call~~graph~~CallGraph_node215"><a xlink:href="../proc/get_nc_all~2.html" xlink:title="nurbs_surface%get_nc_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1709.5,-2470 1558.5,-2470 1558.5,-2446 1709.5,-2446 1709.5,-2470"/>
-<text text-anchor="middle" x="1634" y="-2455.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_nc_all</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1709.5,-2944 1558.5,-2944 1558.5,-2920 1709.5,-2920 1709.5,-2944"/>
+<text text-anchor="middle" x="1634" y="-2929.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_nc_all</text>
 </a>
 </g>
 </g>
-<!-- none~get_nc~2&#45;&gt;proc~get_nc_all~2 -->
+<!-- none~get_nc~3&#45;&gt;proc~get_nc_all~2 -->
 <g id="call~~graph~~CallGraph_edge47" class="edge">
-<title>none~get_nc~2&#45;&gt;proc~get_nc_all~2</title>
-<path fill="none" stroke="#ff9c00" stroke-dasharray="5,2" d="M1487.1,-2428.04C1511.27,-2433 1539.45,-2438.79 1564.57,-2443.95"/>
-<polygon fill="#ff9c00" stroke="#ff9c00" points="1563.89,-2447.38 1574.39,-2445.96 1565.3,-2440.52 1563.89,-2447.38"/>
+<title>none~get_nc~3&#45;&gt;proc~get_nc_all~2</title>
+<path fill="none" stroke="#ff9c00" stroke-dasharray="5,2" d="M1487.1,-2902.04C1511.27,-2907 1539.45,-2912.79 1564.57,-2917.95"/>
+<polygon fill="#ff9c00" stroke="#ff9c00" points="1563.89,-2921.38 1574.39,-2919.96 1565.3,-2914.52 1563.89,-2921.38"/>
 </g>
 <!-- proc~get_nc_dir~2 -->
 <g id="call~~graph~~CallGraph_node217" class="node">
 <title>proc~get_nc_dir~2</title>
 <g id="a_call~~graph~~CallGraph_node217"><a xlink:href="../proc/get_nc_dir~2.html" xlink:title="nurbs_surface%get_nc_dir">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1710,-2428 1558,-2428 1558,-2404 1710,-2404 1710,-2428"/>
-<text text-anchor="middle" x="1634" y="-2413.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_nc_dir</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1710,-2860 1558,-2860 1558,-2836 1710,-2836 1710,-2860"/>
+<text text-anchor="middle" x="1634" y="-2845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_nc_dir</text>
 </a>
 </g>
 </g>
-<!-- none~get_nc~2&#45;&gt;proc~get_nc_dir~2 -->
+<!-- none~get_nc~3&#45;&gt;proc~get_nc_dir~2 -->
 <g id="call~~graph~~CallGraph_edge48" class="edge">
-<title>none~get_nc~2&#45;&gt;proc~get_nc_dir~2</title>
-<path fill="none" stroke="#ff9c00" stroke-dasharray="5,2" d="M1494.05,-2416C1511.12,-2416 1529.77,-2416 1547.7,-2416"/>
-<polygon fill="#ff9c00" stroke="#ff9c00" points="1547.86,-2419.5 1557.86,-2416 1547.86,-2412.5 1547.86,-2419.5"/>
+<title>none~get_nc~3&#45;&gt;proc~get_nc_dir~2</title>
+<path fill="none" stroke="#ff9c00" stroke-dasharray="5,2" d="M1487.1,-2877.96C1511.27,-2873 1539.45,-2867.21 1564.57,-2862.05"/>
+<polygon fill="#ff9c00" stroke="#ff9c00" points="1565.3,-2865.48 1574.39,-2860.04 1563.89,-2858.62 1565.3,-2865.48"/>
 </g>
 <!-- none~get_wc -->
 <g id="call~~graph~~CallGraph_node39" class="node">
 <title>none~get_wc</title>
-<g id="a_call~~graph~~CallGraph_node39"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_wc" xlink:title="nurbs_volume%get_Wc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1058.5,-3296 922.5,-3296 922.5,-3272 1058.5,-3272 1058.5,-3296"/>
-<text text-anchor="middle" x="990.5" y="-3281.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wc</text>
+<g id="a_call~~graph~~CallGraph_node39"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_wc" xlink:title="nurbs_curve%get_Wc">
+<polygon fill="#a7506f" stroke="#a7506f" points="1054,-6827 927,-6827 927,-6803 1054,-6803 1054,-6827"/>
+<text text-anchor="middle" x="990.5" y="-6812.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~get_wc_all -->
 <g id="call~~graph~~CallGraph_node221" class="node">
 <title>proc~get_wc_all</title>
-<g id="a_call~~graph~~CallGraph_node221"><a xlink:href="../proc/get_wc_all.html" xlink:title="nurbs_volume%get_Wc_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1295,-3214 1141,-3214 1141,-3190 1295,-3190 1295,-3214"/>
-<text text-anchor="middle" x="1218" y="-3199.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wc_all</text>
+<g id="a_call~~graph~~CallGraph_node221"><a xlink:href="../proc/get_wc_all.html" xlink:title="nurbs_curve%get_Wc_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1290.5,-6890 1145.5,-6890 1145.5,-6866 1290.5,-6866 1290.5,-6890"/>
+<text text-anchor="middle" x="1218" y="-6875.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wc_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc&#45;&gt;proc~get_wc_all -->
 <g id="call~~graph~~CallGraph_edge49" class="edge">
 <title>none~get_wc&#45;&gt;proc~get_wc_all</title>
-<path fill="none" stroke="#ffa000" stroke-dasharray="5,2" d="M1058.52,-3275.66C1069.48,-3272.65 1080.39,-3268.56 1090,-3263 1110.71,-3251.03 1105.39,-3235.14 1126,-3223 1129.19,-3221.12 1132.54,-3219.41 1135.99,-3217.85"/>
-<polygon fill="#ffa000" stroke="#ffa000" points="1137.36,-3221.07 1145.32,-3214.07 1134.73,-3214.58 1137.36,-3221.07"/>
+<path fill="none" stroke="#ffa000" stroke-dasharray="5,2" d="M1027.53,-6827.07C1054.49,-6835.9 1092.36,-6847.88 1126,-6857 1134.3,-6859.25 1143.07,-6861.47 1151.75,-6863.57"/>
+<polygon fill="#ffa000" stroke="#ffa000" points="1150.95,-6866.98 1161.49,-6865.9 1152.58,-6860.17 1150.95,-6866.98"/>
 </g>
 <!-- proc~get_wci -->
 <g id="call~~graph~~CallGraph_node224" class="node">
 <title>proc~get_wci</title>
-<g id="a_call~~graph~~CallGraph_node224"><a xlink:href="../proc/get_wci.html" xlink:title="nurbs_volume%get_Wci">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1287.5,-3256 1148.5,-3256 1148.5,-3232 1287.5,-3232 1287.5,-3256"/>
-<text text-anchor="middle" x="1218" y="-3241.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wci</text>
+<g id="a_call~~graph~~CallGraph_node224"><a xlink:href="../proc/get_wci.html" xlink:title="nurbs_curve%get_Wci">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1283,-6848 1153,-6848 1153,-6824 1283,-6824 1283,-6848"/>
+<text text-anchor="middle" x="1218" y="-6833.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wci</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc&#45;&gt;proc~get_wci -->
 <g id="call~~graph~~CallGraph_edge50" class="edge">
 <title>none~get_wc&#45;&gt;proc~get_wci</title>
-<path fill="none" stroke="#ffa000" stroke-dasharray="5,2" d="M1058.55,-3272.11C1083.87,-3267.61 1112.9,-3262.47 1139.14,-3257.81"/>
-<polygon fill="#ffa000" stroke="#ffa000" points="1139.81,-3261.25 1149.04,-3256.05 1138.58,-3254.36 1139.81,-3261.25"/>
+<path fill="none" stroke="#ffa000" stroke-dasharray="5,2" d="M1054.01,-6820.82C1081.53,-6823.38 1114.07,-6826.41 1142.8,-6829.09"/>
+<polygon fill="#ffa000" stroke="#ffa000" points="1142.51,-6832.58 1152.79,-6830.02 1143.16,-6825.61 1142.51,-6832.58"/>
 </g>
 <!-- none~get_wc~2 -->
 <g id="call~~graph~~CallGraph_node40" class="node">
 <title>none~get_wc~2</title>
-<g id="a_call~~graph~~CallGraph_node40"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_wc~2" xlink:title="nurbs_surface%get_Wc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1058.5,-1982 922.5,-1982 922.5,-1958 1058.5,-1958 1058.5,-1982"/>
-<text text-anchor="middle" x="990.5" y="-1967.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc</text>
+<g id="a_call~~graph~~CallGraph_node40"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_wc~2" xlink:title="nurbs_volume%get_Wc">
+<polygon fill="#a7506f" stroke="#a7506f" points="1058.5,-4660 922.5,-4660 922.5,-4636 1058.5,-4636 1058.5,-4660"/>
+<text text-anchor="middle" x="990.5" y="-4645.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~get_wc_all~2 -->
 <g id="call~~graph~~CallGraph_node222" class="node">
 <title>proc~get_wc_all~2</title>
-<g id="a_call~~graph~~CallGraph_node222"><a xlink:href="../proc/get_wc_all~2.html" xlink:title="nurbs_surface%get_Wc_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1295,-2024 1141,-2024 1141,-2000 1295,-2000 1295,-2024"/>
-<text text-anchor="middle" x="1218" y="-2009.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc_all</text>
+<g id="a_call~~graph~~CallGraph_node222"><a xlink:href="../proc/get_wc_all~2.html" xlink:title="nurbs_volume%get_Wc_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1295,-4639 1141,-4639 1141,-4615 1295,-4615 1295,-4639"/>
+<text text-anchor="middle" x="1218" y="-4624.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wc_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc~2&#45;&gt;proc~get_wc_all~2 -->
 <g id="call~~graph~~CallGraph_edge51" class="edge">
 <title>none~get_wc~2&#45;&gt;proc~get_wc_all~2</title>
-<path fill="none" stroke="#ffa400" stroke-dasharray="5,2" d="M1056.12,-1982.04C1083.01,-1987.04 1114.4,-1992.89 1142.27,-1998.08"/>
-<polygon fill="#ffa400" stroke="#ffa400" points="1141.9,-2001.57 1152.37,-1999.96 1143.18,-1994.69 1141.9,-2001.57"/>
+<path fill="none" stroke="#ffa400" stroke-dasharray="5,2" d="M1058.55,-4641.76C1081.15,-4639.65 1106.71,-4637.27 1130.6,-4635.05"/>
+<polygon fill="#ffa400" stroke="#ffa400" points="1131.08,-4638.52 1140.72,-4634.1 1130.43,-4631.55 1131.08,-4638.52"/>
 </g>
 <!-- proc~get_wci~2 -->
 <g id="call~~graph~~CallGraph_node225" class="node">
 <title>proc~get_wci~2</title>
-<g id="a_call~~graph~~CallGraph_node225"><a xlink:href="../proc/get_wci~2.html" xlink:title="nurbs_surface%get_Wci">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1287.5,-1982 1148.5,-1982 1148.5,-1958 1287.5,-1958 1287.5,-1982"/>
-<text text-anchor="middle" x="1218" y="-1967.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wci</text>
+<g id="a_call~~graph~~CallGraph_node225"><a xlink:href="../proc/get_wci~2.html" xlink:title="nurbs_volume%get_Wci">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1287.5,-4681 1148.5,-4681 1148.5,-4657 1287.5,-4657 1287.5,-4681"/>
+<text text-anchor="middle" x="1218" y="-4666.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wci</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc~2&#45;&gt;proc~get_wci~2 -->
 <g id="call~~graph~~CallGraph_edge52" class="edge">
 <title>none~get_wc~2&#45;&gt;proc~get_wci~2</title>
-<path fill="none" stroke="#ffa400" stroke-dasharray="5,2" d="M1058.55,-1970C1083.53,-1970 1112.12,-1970 1138.08,-1970"/>
-<polygon fill="#ffa400" stroke="#ffa400" points="1138.26,-1973.5 1148.26,-1970 1138.26,-1966.5 1138.26,-1973.5"/>
+<path fill="none" stroke="#ffa400" stroke-dasharray="5,2" d="M1058.55,-4654.24C1083.53,-4656.57 1112.12,-4659.23 1138.08,-4661.65"/>
+<polygon fill="#ffa400" stroke="#ffa400" points="1137.98,-4665.16 1148.26,-4662.6 1138.63,-4658.19 1137.98,-4665.16"/>
 </g>
 <!-- none~get_wc~3 -->
 <g id="call~~graph~~CallGraph_node41" class="node">
 <title>none~get_wc~3</title>
-<g id="a_call~~graph~~CallGraph_node41"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_wc~3" xlink:title="nurbs_curve%get_Wc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1054,-2966 927,-2966 927,-2942 1054,-2942 1054,-2966"/>
-<text text-anchor="middle" x="990.5" y="-2951.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wc</text>
+<g id="a_call~~graph~~CallGraph_node41"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_wc~3" xlink:title="nurbs_surface%get_Wc">
+<polygon fill="#a7506f" stroke="#a7506f" points="1058.5,-2250 922.5,-2250 922.5,-2226 1058.5,-2226 1058.5,-2250"/>
+<text text-anchor="middle" x="990.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~get_wc_all~3 -->
 <g id="call~~graph~~CallGraph_node223" class="node">
 <title>proc~get_wc_all~3</title>
-<g id="a_call~~graph~~CallGraph_node223"><a xlink:href="../proc/get_wc_all~3.html" xlink:title="nurbs_curve%get_Wc_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1290.5,-3050 1145.5,-3050 1145.5,-3026 1290.5,-3026 1290.5,-3050"/>
-<text text-anchor="middle" x="1218" y="-3035.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wc_all</text>
+<g id="a_call~~graph~~CallGraph_node223"><a xlink:href="../proc/get_wc_all~3.html" xlink:title="nurbs_surface%get_Wc_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1295,-2250 1141,-2250 1141,-2226 1295,-2226 1295,-2250"/>
+<text text-anchor="middle" x="1218" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc~3&#45;&gt;proc~get_wc_all~3 -->
 <g id="call~~graph~~CallGraph_edge53" class="edge">
 <title>none~get_wc~3&#45;&gt;proc~get_wc_all~3</title>
-<path fill="none" stroke="#ffa900" stroke-dasharray="5,2" d="M1054.23,-2960.98C1066.65,-2964.09 1079.18,-2968.57 1090,-2975 1111.14,-2987.56 1104.97,-3004.27 1126,-3017 1129.17,-3018.92 1132.5,-3020.66 1135.93,-3022.25"/>
-<polygon fill="#ffa900" stroke="#ffa900" points="1134.65,-3025.5 1145.23,-3026.08 1137.31,-3019.03 1134.65,-3025.5"/>
+<path fill="none" stroke="#ffa900" stroke-dasharray="5,2" d="M1058.55,-2238C1081.15,-2238 1106.71,-2238 1130.6,-2238"/>
+<polygon fill="#ffa900" stroke="#ffa900" points="1130.72,-2241.5 1140.72,-2238 1130.72,-2234.5 1130.72,-2241.5"/>
 </g>
 <!-- proc~get_wci~3 -->
 <g id="call~~graph~~CallGraph_node226" class="node">
 <title>proc~get_wci~3</title>
-<g id="a_call~~graph~~CallGraph_node226"><a xlink:href="../proc/get_wci~3.html" xlink:title="nurbs_curve%get_Wci">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1283,-3008 1153,-3008 1153,-2984 1283,-2984 1283,-3008"/>
-<text text-anchor="middle" x="1218" y="-2993.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wci</text>
+<g id="a_call~~graph~~CallGraph_node226"><a xlink:href="../proc/get_wci~3.html" xlink:title="nurbs_surface%get_Wci">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1287.5,-2292 1148.5,-2292 1148.5,-2268 1287.5,-2268 1287.5,-2292"/>
+<text text-anchor="middle" x="1218" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wci</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc~3&#45;&gt;proc~get_wci~3 -->
 <g id="call~~graph~~CallGraph_edge54" class="edge">
 <title>none~get_wc~3&#45;&gt;proc~get_wci~3</title>
-<path fill="none" stroke="#ffa900" stroke-dasharray="5,2" d="M1054.01,-2965.64C1081.53,-2970.77 1114.07,-2976.83 1142.8,-2982.18"/>
-<polygon fill="#ffa900" stroke="#ffa900" points="1142.32,-2985.65 1152.79,-2984.04 1143.6,-2978.77 1142.32,-2985.65"/>
+<path fill="none" stroke="#ffa900" stroke-dasharray="5,2" d="M1056.12,-2250.04C1083.01,-2255.04 1114.4,-2260.89 1142.27,-2266.08"/>
+<polygon fill="#ffa900" stroke="#ffa900" points="1141.9,-2269.57 1152.37,-2267.96 1143.18,-2262.69 1141.9,-2269.57"/>
 </g>
 <!-- none~get_xc -->
 <g id="call~~graph~~CallGraph_node42" class="node">
 <title>none~get_xc</title>
-<g id="a_call~~graph~~CallGraph_node42"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_xc" xlink:title="nurbs_volume%get_Xc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1057,-3460 924,-3460 924,-3436 1057,-3436 1057,-3460"/>
-<text text-anchor="middle" x="990.5" y="-3445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc</text>
+<g id="a_call~~graph~~CallGraph_node42"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_xc" xlink:title="nurbs_curve%get_Xc">
+<polygon fill="#a7506f" stroke="#a7506f" points="1052.5,-6764 928.5,-6764 928.5,-6740 1052.5,-6740 1052.5,-6764"/>
+<text text-anchor="middle" x="990.5" y="-6749.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~get_xc_all -->
 <g id="call~~graph~~CallGraph_node227" class="node">
 <title>proc~get_xc_all</title>
-<g id="a_call~~graph~~CallGraph_node227"><a xlink:href="../proc/get_xc_all.html" xlink:title="nurbs_volume%get_Xc_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1293.5,-3420 1142.5,-3420 1142.5,-3396 1293.5,-3396 1293.5,-3420"/>
-<text text-anchor="middle" x="1218" y="-3405.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc_all</text>
+<g id="a_call~~graph~~CallGraph_node227"><a xlink:href="../proc/get_xc_all.html" xlink:title="nurbs_curve%get_Xc_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1289,-6806 1147,-6806 1147,-6782 1289,-6782 1289,-6806"/>
+<text text-anchor="middle" x="1218" y="-6791.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc&#45;&gt;proc~get_xc_all -->
 <g id="call~~graph~~CallGraph_edge55" class="edge">
 <title>none~get_xc&#45;&gt;proc~get_xc_all</title>
-<path fill="none" stroke="#ffad00" stroke-dasharray="5,2" d="M1057.03,-3436.38C1082.63,-3431.84 1112.19,-3426.59 1138.88,-3421.86"/>
-<polygon fill="#ffad00" stroke="#ffad00" points="1139.72,-3425.26 1148.96,-3420.07 1138.5,-3418.37 1139.72,-3425.26"/>
+<path fill="none" stroke="#ffad00" stroke-dasharray="5,2" d="M1052.52,-6763.37C1080.18,-6768.52 1113.13,-6774.65 1142.25,-6780.08"/>
+<polygon fill="#ffad00" stroke="#ffad00" points="1141.91,-6783.57 1152.38,-6781.96 1143.19,-6776.69 1141.91,-6783.57"/>
 </g>
 <!-- proc~get_xci -->
 <g id="call~~graph~~CallGraph_node230" class="node">
 <title>proc~get_xci</title>
-<g id="a_call~~graph~~CallGraph_node230"><a xlink:href="../proc/get_xci.html" xlink:title="nurbs_volume%get_Xci">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1286,-3378 1150,-3378 1150,-3354 1286,-3354 1286,-3378"/>
-<text text-anchor="middle" x="1218" y="-3363.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xci</text>
+<g id="a_call~~graph~~CallGraph_node230"><a xlink:href="../proc/get_xci.html" xlink:title="nurbs_curve%get_Xci">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1281.5,-6764 1154.5,-6764 1154.5,-6740 1281.5,-6740 1281.5,-6764"/>
+<text text-anchor="middle" x="1218" y="-6749.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xci</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc&#45;&gt;proc~get_xci -->
 <g id="call~~graph~~CallGraph_edge56" class="edge">
 <title>none~get_xc&#45;&gt;proc~get_xci</title>
-<path fill="none" stroke="#ffad00" stroke-dasharray="5,2" d="M1057.22,-3440.01C1068.62,-3436.97 1080.01,-3432.77 1090,-3427 1110.71,-3415.03 1105.39,-3399.14 1126,-3387 1130.43,-3384.39 1135.15,-3382.11 1140.03,-3380.11"/>
-<polygon fill="#ffad00" stroke="#ffad00" points="1141.4,-3383.33 1149.58,-3376.6 1138.98,-3376.76 1141.4,-3383.33"/>
+<path fill="none" stroke="#ffad00" stroke-dasharray="5,2" d="M1052.52,-6752C1080.76,-6752 1114.52,-6752 1144.09,-6752"/>
+<polygon fill="#ffad00" stroke="#ffad00" points="1144.36,-6755.5 1154.36,-6752 1144.36,-6748.5 1144.36,-6755.5"/>
 </g>
 <!-- proc~get_xcid -->
 <g id="call~~graph~~CallGraph_node231" class="node">
 <title>proc~get_xcid</title>
-<g id="a_call~~graph~~CallGraph_node231"><a xlink:href="../proc/get_xcid.html" xlink:title="nurbs_volume%get_Xcid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1289.5,-3336 1146.5,-3336 1146.5,-3312 1289.5,-3312 1289.5,-3336"/>
-<text text-anchor="middle" x="1218" y="-3321.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xcid</text>
+<g id="a_call~~graph~~CallGraph_node231"><a xlink:href="../proc/get_xcid.html" xlink:title="nurbs_curve%get_Xcid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1284.5,-6722 1151.5,-6722 1151.5,-6698 1284.5,-6698 1284.5,-6722"/>
+<text text-anchor="middle" x="1218" y="-6707.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xcid</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc&#45;&gt;proc~get_xcid -->
 <g id="call~~graph~~CallGraph_edge57" class="edge">
 <title>none~get_xc&#45;&gt;proc~get_xcid</title>
-<path fill="none" stroke="#ffad00" stroke-dasharray="5,2" d="M1057.16,-3443.02C1069.01,-3439.73 1080.58,-3434.67 1090,-3427 1120.86,-3401.86 1095.35,-3370.4 1126,-3345 1129.37,-3342.21 1133.04,-3339.77 1136.92,-3337.64"/>
-<polygon fill="#ffad00" stroke="#ffad00" points="1138.72,-3340.66 1146.27,-3333.23 1135.73,-3334.33 1138.72,-3340.66"/>
+<path fill="none" stroke="#ffad00" stroke-dasharray="5,2" d="M1052.52,-6740.63C1080.18,-6735.48 1113.13,-6729.35 1142.25,-6723.92"/>
+<polygon fill="#ffad00" stroke="#ffad00" points="1143.19,-6727.31 1152.38,-6722.04 1141.91,-6720.43 1143.19,-6727.31"/>
 </g>
 <!-- none~get_xc~2 -->
 <g id="call~~graph~~CallGraph_node43" class="node">
 <title>none~get_xc~2</title>
-<g id="a_call~~graph~~CallGraph_node43"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xc~2" xlink:title="nurbs_surface%get_Xc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1057,-2024 924,-2024 924,-2000 1057,-2000 1057,-2024"/>
-<text text-anchor="middle" x="990.5" y="-2009.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc</text>
+<g id="a_call~~graph~~CallGraph_node43"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_xc~2" xlink:title="nurbs_volume%get_Xc">
+<polygon fill="#a7506f" stroke="#a7506f" points="1057,-4782 924,-4782 924,-4758 1057,-4758 1057,-4782"/>
+<text text-anchor="middle" x="990.5" y="-4767.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~get_xc_all~2 -->
 <g id="call~~graph~~CallGraph_node228" class="node">
 <title>proc~get_xc_all~2</title>
-<g id="a_call~~graph~~CallGraph_node228"><a xlink:href="../proc/get_xc_all~2.html" xlink:title="nurbs_surface%get_Xc_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1293.5,-2108 1142.5,-2108 1142.5,-2084 1293.5,-2084 1293.5,-2108"/>
-<text text-anchor="middle" x="1218" y="-2093.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc_all</text>
+<g id="a_call~~graph~~CallGraph_node228"><a xlink:href="../proc/get_xc_all~2.html" xlink:title="nurbs_volume%get_Xc_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1293.5,-4866 1142.5,-4866 1142.5,-4842 1293.5,-4842 1293.5,-4866"/>
+<text text-anchor="middle" x="1218" y="-4851.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~2&#45;&gt;proc~get_xc_all~2 -->
 <g id="call~~graph~~CallGraph_edge58" class="edge">
 <title>none~get_xc~2&#45;&gt;proc~get_xc_all~2</title>
-<path fill="none" stroke="#ffb100" stroke-dasharray="5,2" d="M1057.08,-2023.98C1068.49,-2027.53 1079.92,-2032.11 1090,-2038 1109.81,-2049.57 1106.01,-2063.74 1126,-2075 1129.3,-2076.86 1132.76,-2078.56 1136.32,-2080.1"/>
-<polygon fill="#ffb100" stroke="#ffb100" points="1135.34,-2083.48 1145.93,-2083.85 1137.89,-2076.96 1135.34,-2083.48"/>
+<path fill="none" stroke="#ffb100" stroke-dasharray="5,2" d="M1046.46,-4782.03C1061.15,-4786.49 1076.65,-4792.38 1090,-4800 1108.85,-4810.76 1106.79,-4822.89 1126,-4833 1129.79,-4835 1133.77,-4836.8 1137.86,-4838.44"/>
+<polygon fill="#ffb100" stroke="#ffb100" points="1136.97,-4841.84 1147.56,-4841.96 1139.35,-4835.26 1136.97,-4841.84"/>
 </g>
 <!-- proc~get_xcid~2 -->
 <g id="call~~graph~~CallGraph_node232" class="node">
 <title>proc~get_xcid~2</title>
-<g id="a_call~~graph~~CallGraph_node232"><a xlink:href="../proc/get_xcid~2.html" xlink:title="nurbs_surface%get_Xcid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1289.5,-2066 1146.5,-2066 1146.5,-2042 1289.5,-2042 1289.5,-2066"/>
-<text text-anchor="middle" x="1218" y="-2051.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xcid</text>
+<g id="a_call~~graph~~CallGraph_node232"><a xlink:href="../proc/get_xcid~2.html" xlink:title="nurbs_volume%get_Xcid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1289.5,-4824 1146.5,-4824 1146.5,-4800 1289.5,-4800 1289.5,-4824"/>
+<text text-anchor="middle" x="1218" y="-4809.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xcid</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~2&#45;&gt;proc~get_xcid~2 -->
 <g id="call~~graph~~CallGraph_edge59" class="edge">
 <title>none~get_xc~2&#45;&gt;proc~get_xcid~2</title>
-<path fill="none" stroke="#ffb100" stroke-dasharray="5,2" d="M1056.12,-2024.04C1083.01,-2029.04 1114.4,-2034.89 1142.27,-2040.08"/>
-<polygon fill="#ffb100" stroke="#ffb100" points="1141.9,-2043.57 1152.37,-2041.96 1143.18,-2036.69 1141.9,-2043.57"/>
+<path fill="none" stroke="#ffb100" stroke-dasharray="5,2" d="M1056.12,-4782.04C1083.01,-4787.04 1114.4,-4792.89 1142.27,-4798.08"/>
+<polygon fill="#ffb100" stroke="#ffb100" points="1141.9,-4801.57 1152.37,-4799.96 1143.18,-4794.69 1141.9,-4801.57"/>
 </g>
 <!-- proc~get_xci~2 -->
 <g id="call~~graph~~CallGraph_node234" class="node">
 <title>proc~get_xci~2</title>
-<g id="a_call~~graph~~CallGraph_node234"><a xlink:href="../proc/get_xci~2.html" xlink:title="nurbs_surface%get_Xci">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1286,-2150 1150,-2150 1150,-2126 1286,-2126 1286,-2150"/>
-<text text-anchor="middle" x="1218" y="-2135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xci</text>
+<g id="a_call~~graph~~CallGraph_node234"><a xlink:href="../proc/get_xci~2.html" xlink:title="nurbs_volume%get_Xci">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1286,-4782 1150,-4782 1150,-4758 1286,-4758 1286,-4782"/>
+<text text-anchor="middle" x="1218" y="-4767.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xci</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~2&#45;&gt;proc~get_xci~2 -->
 <g id="call~~graph~~CallGraph_edge60" class="edge">
 <title>none~get_xc~2&#45;&gt;proc~get_xci~2</title>
-<path fill="none" stroke="#ffb100" stroke-dasharray="5,2" d="M1057.2,-2020.67C1069.05,-2024.54 1080.6,-2030.08 1090,-2038 1119.5,-2062.88 1096.12,-2092.59 1126,-2117 1130.32,-2120.53 1135.11,-2123.48 1140.19,-2125.96"/>
-<polygon fill="#ffb100" stroke="#ffb100" points="1138.99,-2129.26 1149.57,-2129.93 1141.72,-2122.81 1138.99,-2129.26"/>
+<path fill="none" stroke="#ffb100" stroke-dasharray="5,2" d="M1057.03,-4770C1082.86,-4770 1112.72,-4770 1139.6,-4770"/>
+<polygon fill="#ffb100" stroke="#ffb100" points="1139.74,-4773.5 1149.74,-4770 1139.74,-4766.5 1139.74,-4773.5"/>
 </g>
 <!-- none~get_xc~3 -->
 <g id="call~~graph~~CallGraph_node44" class="node">
 <title>none~get_xc~3</title>
-<g id="a_call~~graph~~CallGraph_node44"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_xc~3" xlink:title="nurbs_curve%get_Xc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1052.5,-2924 928.5,-2924 928.5,-2900 1052.5,-2900 1052.5,-2924"/>
-<text text-anchor="middle" x="990.5" y="-2909.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc</text>
+<g id="a_call~~graph~~CallGraph_node44"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xc~3" xlink:title="nurbs_surface%get_Xc">
+<polygon fill="#a7506f" stroke="#a7506f" points="1057,-2208 924,-2208 924,-2184 1057,-2184 1057,-2208"/>
+<text text-anchor="middle" x="990.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~get_xc_all~3 -->
 <g id="call~~graph~~CallGraph_node229" class="node">
 <title>proc~get_xc_all~3</title>
-<g id="a_call~~graph~~CallGraph_node229"><a xlink:href="../proc/get_xc_all~3.html" xlink:title="nurbs_curve%get_Xc_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1289,-2966 1147,-2966 1147,-2942 1289,-2942 1289,-2966"/>
-<text text-anchor="middle" x="1218" y="-2951.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc_all</text>
+<g id="a_call~~graph~~CallGraph_node229"><a xlink:href="../proc/get_xc_all~3.html" xlink:title="nurbs_surface%get_Xc_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1293.5,-2166 1142.5,-2166 1142.5,-2142 1293.5,-2142 1293.5,-2166"/>
+<text text-anchor="middle" x="1218" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~3&#45;&gt;proc~get_xc_all~3 -->
 <g id="call~~graph~~CallGraph_edge61" class="edge">
 <title>none~get_xc~3&#45;&gt;proc~get_xc_all~3</title>
-<path fill="none" stroke="#ffb500" stroke-dasharray="5,2" d="M1052.52,-2923.37C1080.18,-2928.52 1113.13,-2934.65 1142.25,-2940.08"/>
-<polygon fill="#ffb500" stroke="#ffb500" points="1141.91,-2943.57 1152.38,-2941.96 1143.19,-2936.69 1141.91,-2943.57"/>
+<path fill="none" stroke="#ffb500" stroke-dasharray="5,2" d="M1056.12,-2183.96C1083.01,-2178.96 1114.4,-2173.11 1142.27,-2167.92"/>
+<polygon fill="#ffb500" stroke="#ffb500" points="1143.18,-2171.31 1152.37,-2166.04 1141.9,-2164.43 1143.18,-2171.31"/>
 </g>
 <!-- proc~get_xcid~3 -->
 <g id="call~~graph~~CallGraph_node233" class="node">
 <title>proc~get_xcid~3</title>
-<g id="a_call~~graph~~CallGraph_node233"><a xlink:href="../proc/get_xcid~3.html" xlink:title="nurbs_curve%get_Xcid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1284.5,-2924 1151.5,-2924 1151.5,-2900 1284.5,-2900 1284.5,-2924"/>
-<text text-anchor="middle" x="1218" y="-2909.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xcid</text>
+<g id="a_call~~graph~~CallGraph_node233"><a xlink:href="../proc/get_xcid~3.html" xlink:title="nurbs_surface%get_Xcid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1289.5,-2124 1146.5,-2124 1146.5,-2100 1289.5,-2100 1289.5,-2124"/>
+<text text-anchor="middle" x="1218" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xcid</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~3&#45;&gt;proc~get_xcid~3 -->
 <g id="call~~graph~~CallGraph_edge62" class="edge">
 <title>none~get_xc~3&#45;&gt;proc~get_xcid~3</title>
-<path fill="none" stroke="#ffb500" stroke-dasharray="5,2" d="M1052.52,-2912C1079.83,-2912 1112.3,-2912 1141.14,-2912"/>
-<polygon fill="#ffb500" stroke="#ffb500" points="1141.18,-2915.5 1151.18,-2912 1141.18,-2908.5 1141.18,-2915.5"/>
+<path fill="none" stroke="#ffb500" stroke-dasharray="5,2" d="M1057.08,-2188.28C1068.55,-2185.21 1080,-2180.94 1090,-2175 1111.14,-2162.44 1104.97,-2145.73 1126,-2133 1129.41,-2130.93 1133.01,-2129.07 1136.73,-2127.39"/>
+<polygon fill="#ffb500" stroke="#ffb500" points="1138.2,-2130.57 1146.17,-2123.58 1135.58,-2124.08 1138.2,-2130.57"/>
 </g>
 <!-- proc~get_xci~3 -->
 <g id="call~~graph~~CallGraph_node235" class="node">
 <title>proc~get_xci~3</title>
-<g id="a_call~~graph~~CallGraph_node235"><a xlink:href="../proc/get_xci~3.html" xlink:title="nurbs_curve%get_Xci">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1281.5,-2882 1154.5,-2882 1154.5,-2858 1281.5,-2858 1281.5,-2882"/>
-<text text-anchor="middle" x="1218" y="-2867.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xci</text>
+<g id="a_call~~graph~~CallGraph_node235"><a xlink:href="../proc/get_xci~3.html" xlink:title="nurbs_surface%get_Xci">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1286,-2208 1150,-2208 1150,-2184 1286,-2184 1286,-2208"/>
+<text text-anchor="middle" x="1218" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xci</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~3&#45;&gt;proc~get_xci~3 -->
 <g id="call~~graph~~CallGraph_edge63" class="edge">
 <title>none~get_xc~3&#45;&gt;proc~get_xci~3</title>
-<path fill="none" stroke="#ffb500" stroke-dasharray="5,2" d="M1052.52,-2900.63C1080.88,-2895.35 1114.82,-2889.03 1144.48,-2883.51"/>
-<polygon fill="#ffb500" stroke="#ffb500" points="1145.17,-2886.94 1154.36,-2881.67 1143.88,-2880.06 1145.17,-2886.94"/>
+<path fill="none" stroke="#ffb500" stroke-dasharray="5,2" d="M1057.03,-2196C1082.86,-2196 1112.72,-2196 1139.6,-2196"/>
+<polygon fill="#ffb500" stroke="#ffb500" points="1139.74,-2199.5 1149.74,-2196 1139.74,-2192.5 1139.74,-2199.5"/>
 </g>
 <!-- none~get_xg -->
 <g id="call~~graph~~CallGraph_node45" class="node">
 <title>none~get_xg</title>
-<g id="a_call~~graph~~CallGraph_node45"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_xg" xlink:title="nurbs_volume%get_Xg">
-<polygon fill="#a7506f" stroke="#a7506f" points="175.5,-6228 41.5,-6228 41.5,-6204 175.5,-6204 175.5,-6228"/>
-<text text-anchor="middle" x="108.5" y="-6213.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xg</text>
+<g id="a_call~~graph~~CallGraph_node45"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_xg" xlink:title="nurbs_curve%get_Xg">
+<polygon fill="#a7506f" stroke="#a7506f" points="170.5,-6598 46.5,-6598 46.5,-6574 170.5,-6574 170.5,-6598"/>
+<text text-anchor="middle" x="108.5" y="-6583.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~get_xg_all -->
 <g id="call~~graph~~CallGraph_node236" class="node">
 <title>proc~get_xg_all</title>
-<g id="a_call~~graph~~CallGraph_node236"><a xlink:href="../proc/get_xg_all.html" xlink:title="nurbs_volume%get_Xg_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="412,-6270 260,-6270 260,-6246 412,-6246 412,-6270"/>
-<text text-anchor="middle" x="336" y="-6255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xg_all</text>
+<g id="a_call~~graph~~CallGraph_node236"><a xlink:href="../proc/get_xg_all.html" xlink:title="nurbs_curve%get_Xg_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="407,-6640 265,-6640 265,-6616 407,-6616 407,-6640"/>
+<text text-anchor="middle" x="336" y="-6625.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xg_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_xg&#45;&gt;proc~get_xg_all -->
 <g id="call~~graph~~CallGraph_edge64" class="edge">
 <title>none~get_xg&#45;&gt;proc~get_xg_all</title>
-<path fill="none" stroke="#ffb900" stroke-dasharray="5,2" d="M174.12,-6228.04C201.01,-6233.04 232.4,-6238.89 260.27,-6244.08"/>
-<polygon fill="#ffb900" stroke="#ffb900" points="259.9,-6247.57 270.37,-6245.96 261.18,-6240.69 259.9,-6247.57"/>
+<path fill="none" stroke="#ffb900" stroke-dasharray="5,2" d="M170.52,-6597.37C198.18,-6602.52 231.13,-6608.65 260.25,-6614.08"/>
+<polygon fill="#ffb900" stroke="#ffb900" points="259.91,-6617.57 270.38,-6615.96 261.19,-6610.69 259.91,-6617.57"/>
 </g>
 <!-- proc~get_xgi -->
 <g id="call~~graph~~CallGraph_node239" class="node">
 <title>proc~get_xgi</title>
-<g id="a_call~~graph~~CallGraph_node239"><a xlink:href="../proc/get_xgi.html" xlink:title="nurbs_volume%get_Xgi">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="404.5,-6228 267.5,-6228 267.5,-6204 404.5,-6204 404.5,-6228"/>
-<text text-anchor="middle" x="336" y="-6213.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xgi</text>
+<g id="a_call~~graph~~CallGraph_node239"><a xlink:href="../proc/get_xgi.html" xlink:title="nurbs_curve%get_Xgi">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="399.5,-6598 272.5,-6598 272.5,-6574 399.5,-6574 399.5,-6598"/>
+<text text-anchor="middle" x="336" y="-6583.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xgi</text>
 </a>
 </g>
 </g>
 <!-- none~get_xg&#45;&gt;proc~get_xgi -->
 <g id="call~~graph~~CallGraph_edge65" class="edge">
 <title>none~get_xg&#45;&gt;proc~get_xgi</title>
-<path fill="none" stroke="#ffb900" stroke-dasharray="5,2" d="M175.63,-6216C201.22,-6216 230.68,-6216 257.27,-6216"/>
-<polygon fill="#ffb900" stroke="#ffb900" points="257.3,-6219.5 267.3,-6216 257.3,-6212.5 257.3,-6219.5"/>
+<path fill="none" stroke="#ffb900" stroke-dasharray="5,2" d="M170.52,-6586C198.76,-6586 232.52,-6586 262.09,-6586"/>
+<polygon fill="#ffb900" stroke="#ffb900" points="262.36,-6589.5 272.36,-6586 262.36,-6582.5 262.36,-6589.5"/>
 </g>
 <!-- proc~get_xgid -->
 <g id="call~~graph~~CallGraph_node240" class="node">
 <title>proc~get_xgid</title>
-<g id="a_call~~graph~~CallGraph_node240"><a xlink:href="../proc/get_xgid.html" xlink:title="nurbs_volume%get_Xgid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="408,-6186 264,-6186 264,-6162 408,-6162 408,-6186"/>
-<text text-anchor="middle" x="336" y="-6171.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xgid</text>
+<g id="a_call~~graph~~CallGraph_node240"><a xlink:href="../proc/get_xgid.html" xlink:title="nurbs_curve%get_Xgid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="403,-6556 269,-6556 269,-6532 403,-6532 403,-6556"/>
+<text text-anchor="middle" x="336" y="-6541.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xgid</text>
 </a>
 </g>
 </g>
 <!-- none~get_xg&#45;&gt;proc~get_xgid -->
 <g id="call~~graph~~CallGraph_edge66" class="edge">
 <title>none~get_xg&#45;&gt;proc~get_xgid</title>
-<path fill="none" stroke="#ffb900" stroke-dasharray="5,2" d="M174.12,-6203.96C201.01,-6198.96 232.4,-6193.11 260.27,-6187.92"/>
-<polygon fill="#ffb900" stroke="#ffb900" points="261.18,-6191.31 270.37,-6186.04 259.9,-6184.43 261.18,-6191.31"/>
+<path fill="none" stroke="#ffb900" stroke-dasharray="5,2" d="M170.52,-6574.63C198.18,-6569.48 231.13,-6563.35 260.25,-6557.92"/>
+<polygon fill="#ffb900" stroke="#ffb900" points="261.19,-6561.31 270.38,-6556.04 259.91,-6554.43 261.19,-6561.31"/>
 </g>
 <!-- none~get_xg~2 -->
 <g id="call~~graph~~CallGraph_node46" class="node">
 <title>none~get_xg~2</title>
-<g id="a_call~~graph~~CallGraph_node46"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xg~2" xlink:title="nurbs_surface%get_Xg">
-<polygon fill="#a7506f" stroke="#a7506f" points="828,-1222 694,-1222 694,-1198 828,-1198 828,-1222"/>
-<text text-anchor="middle" x="761" y="-1207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xg</text>
+<g id="a_call~~graph~~CallGraph_node46"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_xg~2" xlink:title="nurbs_volume%get_Xg">
+<polygon fill="#a7506f" stroke="#a7506f" points="175.5,-6724 41.5,-6724 41.5,-6700 175.5,-6700 175.5,-6724"/>
+<text text-anchor="middle" x="108.5" y="-6709.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~get_xg_all~2 -->
 <g id="call~~graph~~CallGraph_node237" class="node">
 <title>proc~get_xg_all~2</title>
-<g id="a_call~~graph~~CallGraph_node237"><a xlink:href="../proc/get_xg_all~2.html" xlink:title="nurbs_surface%get_Xg_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1066.5,-1180 914.5,-1180 914.5,-1156 1066.5,-1156 1066.5,-1180"/>
-<text text-anchor="middle" x="990.5" y="-1165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xg_all</text>
+<g id="a_call~~graph~~CallGraph_node237"><a xlink:href="../proc/get_xg_all~2.html" xlink:title="nurbs_volume%get_Xg_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="412,-6766 260,-6766 260,-6742 412,-6742 412,-6766"/>
+<text text-anchor="middle" x="336" y="-6751.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xg_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_xg~2&#45;&gt;proc~get_xg_all~2 -->
 <g id="call~~graph~~CallGraph_edge67" class="edge">
 <title>none~get_xg~2&#45;&gt;proc~get_xg_all~2</title>
-<path fill="none" stroke="#ffbe00" stroke-dasharray="5,2" d="M827.19,-1197.96C854.32,-1192.96 885.99,-1187.11 914.11,-1181.92"/>
-<polygon fill="#ffbe00" stroke="#ffbe00" points="915.1,-1185.29 924.3,-1180.04 913.83,-1178.41 915.1,-1185.29"/>
+<path fill="none" stroke="#ffbe00" stroke-dasharray="5,2" d="M174.12,-6724.04C201.01,-6729.04 232.4,-6734.89 260.27,-6740.08"/>
+<polygon fill="#ffbe00" stroke="#ffbe00" points="259.9,-6743.57 270.37,-6741.96 261.18,-6736.69 259.9,-6743.57"/>
 </g>
 <!-- proc~get_xgid~2 -->
 <g id="call~~graph~~CallGraph_node241" class="node">
 <title>proc~get_xgid~2</title>
-<g id="a_call~~graph~~CallGraph_node241"><a xlink:href="../proc/get_xgid~2.html" xlink:title="nurbs_surface%get_Xgid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1062.5,-1264 918.5,-1264 918.5,-1240 1062.5,-1240 1062.5,-1264"/>
-<text text-anchor="middle" x="990.5" y="-1249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xgid</text>
+<g id="a_call~~graph~~CallGraph_node241"><a xlink:href="../proc/get_xgid~2.html" xlink:title="nurbs_volume%get_Xgid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="408,-6724 264,-6724 264,-6700 408,-6700 408,-6724"/>
+<text text-anchor="middle" x="336" y="-6709.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xgid</text>
 </a>
 </g>
 </g>
 <!-- none~get_xg~2&#45;&gt;proc~get_xgid~2 -->
 <g id="call~~graph~~CallGraph_edge68" class="edge">
 <title>none~get_xg~2&#45;&gt;proc~get_xgid~2</title>
-<path fill="none" stroke="#ffbe00" stroke-dasharray="5,2" d="M827.19,-1222.04C854.32,-1227.04 885.99,-1232.89 914.11,-1238.08"/>
-<polygon fill="#ffbe00" stroke="#ffbe00" points="913.83,-1241.59 924.3,-1239.96 915.1,-1234.71 913.83,-1241.59"/>
+<path fill="none" stroke="#ffbe00" stroke-dasharray="5,2" d="M175.63,-6712C200.07,-6712 228.05,-6712 253.68,-6712"/>
+<polygon fill="#ffbe00" stroke="#ffbe00" points="253.75,-6715.5 263.75,-6712 253.75,-6708.5 253.75,-6715.5"/>
 </g>
 <!-- proc~get_xgi~2 -->
 <g id="call~~graph~~CallGraph_node243" class="node">
 <title>proc~get_xgi~2</title>
-<g id="a_call~~graph~~CallGraph_node243"><a xlink:href="../proc/get_xgi~2.html" xlink:title="nurbs_surface%get_Xgi">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1059,-1222 922,-1222 922,-1198 1059,-1198 1059,-1222"/>
-<text text-anchor="middle" x="990.5" y="-1207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xgi</text>
+<g id="a_call~~graph~~CallGraph_node243"><a xlink:href="../proc/get_xgi~2.html" xlink:title="nurbs_volume%get_Xgi">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="404.5,-6682 267.5,-6682 267.5,-6658 404.5,-6658 404.5,-6682"/>
+<text text-anchor="middle" x="336" y="-6667.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xgi</text>
 </a>
 </g>
 </g>
 <!-- none~get_xg~2&#45;&gt;proc~get_xgi~2 -->
 <g id="call~~graph~~CallGraph_edge69" class="edge">
 <title>none~get_xg~2&#45;&gt;proc~get_xgi~2</title>
-<path fill="none" stroke="#ffbe00" stroke-dasharray="5,2" d="M828.11,-1210C854.17,-1210 884.3,-1210 911.41,-1210"/>
-<polygon fill="#ffbe00" stroke="#ffbe00" points="911.65,-1213.5 921.65,-1210 911.65,-1206.5 911.65,-1213.5"/>
+<path fill="none" stroke="#ffbe00" stroke-dasharray="5,2" d="M174.12,-6699.96C201.01,-6694.96 232.4,-6689.11 260.27,-6683.92"/>
+<polygon fill="#ffbe00" stroke="#ffbe00" points="261.18,-6687.31 270.37,-6682.04 259.9,-6680.43 261.18,-6687.31"/>
 </g>
 <!-- none~get_xg~3 -->
 <g id="call~~graph~~CallGraph_node47" class="node">
 <title>none~get_xg~3</title>
-<g id="a_call~~graph~~CallGraph_node47"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_xg~3" xlink:title="nurbs_curve%get_Xg">
-<polygon fill="#a7506f" stroke="#a7506f" points="170.5,-6354 46.5,-6354 46.5,-6330 170.5,-6330 170.5,-6354"/>
-<text text-anchor="middle" x="108.5" y="-6339.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xg</text>
+<g id="a_call~~graph~~CallGraph_node47"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xg~3" xlink:title="nurbs_surface%get_Xg">
+<polygon fill="#a7506f" stroke="#a7506f" points="828,-900 694,-900 694,-876 828,-876 828,-900"/>
+<text text-anchor="middle" x="761" y="-885.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~get_xg_all~3 -->
 <g id="call~~graph~~CallGraph_node238" class="node">
 <title>proc~get_xg_all~3</title>
-<g id="a_call~~graph~~CallGraph_node238"><a xlink:href="../proc/get_xg_all~3.html" xlink:title="nurbs_curve%get_Xg_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="407,-6396 265,-6396 265,-6372 407,-6372 407,-6396"/>
-<text text-anchor="middle" x="336" y="-6381.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xg_all</text>
+<g id="a_call~~graph~~CallGraph_node238"><a xlink:href="../proc/get_xg_all~3.html" xlink:title="nurbs_surface%get_Xg_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1066.5,-24 914.5,-24 914.5,0 1066.5,0 1066.5,-24"/>
+<text text-anchor="middle" x="990.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xg_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_xg~3&#45;&gt;proc~get_xg_all~3 -->
 <g id="call~~graph~~CallGraph_edge70" class="edge">
 <title>none~get_xg~3&#45;&gt;proc~get_xg_all~3</title>
-<path fill="none" stroke="#ffc200" stroke-dasharray="5,2" d="M170.52,-6353.37C198.18,-6358.52 231.13,-6364.65 260.25,-6370.08"/>
-<polygon fill="#ffc200" stroke="#ffc200" points="259.91,-6373.57 270.38,-6371.96 261.19,-6366.69 259.91,-6373.57"/>
+<path fill="none" stroke="#ffc200" stroke-dasharray="5,2" d="M762.01,-875.82C762.38,-781.09 769.45,-162.11 891,-33 895.15,-28.6 899.97,-25 905.21,-22.07"/>
+<polygon fill="#ffc200" stroke="#ffc200" points="906.83,-25.18 914.39,-17.75 903.85,-18.84 906.83,-25.18"/>
 </g>
 <!-- proc~get_xgid~3 -->
 <g id="call~~graph~~CallGraph_node242" class="node">
 <title>proc~get_xgid~3</title>
-<g id="a_call~~graph~~CallGraph_node242"><a xlink:href="../proc/get_xgid~3.html" xlink:title="nurbs_curve%get_Xgid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="403,-6354 269,-6354 269,-6330 403,-6330 403,-6354"/>
-<text text-anchor="middle" x="336" y="-6339.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xgid</text>
+<g id="a_call~~graph~~CallGraph_node242"><a xlink:href="../proc/get_xgid~3.html" xlink:title="nurbs_surface%get_Xgid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1062.5,-108 918.5,-108 918.5,-84 1062.5,-84 1062.5,-108"/>
+<text text-anchor="middle" x="990.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xgid</text>
 </a>
 </g>
 </g>
 <!-- none~get_xg~3&#45;&gt;proc~get_xgid~3 -->
 <g id="call~~graph~~CallGraph_edge71" class="edge">
 <title>none~get_xg~3&#45;&gt;proc~get_xgid~3</title>
-<path fill="none" stroke="#ffc200" stroke-dasharray="5,2" d="M170.52,-6342C197.71,-6342 230.02,-6342 258.77,-6342"/>
-<polygon fill="#ffc200" stroke="#ffc200" points="258.78,-6345.5 268.78,-6342 258.78,-6338.5 258.78,-6345.5"/>
+<path fill="none" stroke="#ffc200" stroke-dasharray="5,2" d="M762.23,-875.9C764.18,-786.78 780.65,-232.35 891,-117 896.15,-111.61 902.32,-107.44 909.02,-104.22"/>
+<polygon fill="#ffc200" stroke="#ffc200" points="910.49,-107.4 918.44,-100.41 907.86,-100.92 910.49,-107.4"/>
 </g>
 <!-- proc~get_xgi~3 -->
 <g id="call~~graph~~CallGraph_node244" class="node">
 <title>proc~get_xgi~3</title>
-<g id="a_call~~graph~~CallGraph_node244"><a xlink:href="../proc/get_xgi~3.html" xlink:title="nurbs_curve%get_Xgi">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="399.5,-6312 272.5,-6312 272.5,-6288 399.5,-6288 399.5,-6312"/>
-<text text-anchor="middle" x="336" y="-6297.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xgi</text>
+<g id="a_call~~graph~~CallGraph_node244"><a xlink:href="../proc/get_xgi~3.html" xlink:title="nurbs_surface%get_Xgi">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1059,-66 922,-66 922,-42 1059,-42 1059,-66"/>
+<text text-anchor="middle" x="990.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xgi</text>
 </a>
 </g>
 </g>
 <!-- none~get_xg~3&#45;&gt;proc~get_xgi~3 -->
 <g id="call~~graph~~CallGraph_edge72" class="edge">
 <title>none~get_xg~3&#45;&gt;proc~get_xgi~3</title>
-<path fill="none" stroke="#ffc200" stroke-dasharray="5,2" d="M170.52,-6330.63C198.88,-6325.35 232.82,-6319.03 262.48,-6313.51"/>
-<polygon fill="#ffc200" stroke="#ffc200" points="263.17,-6316.94 272.36,-6311.67 261.88,-6310.06 263.17,-6316.94"/>
+<path fill="none" stroke="#ffc200" stroke-dasharray="5,2" d="M762.12,-875.84C763.26,-783.8 775.06,-197.21 891,-75 896.97,-68.71 904.32,-64.07 912.3,-60.67"/>
+<polygon fill="#ffc200" stroke="#ffc200" points="913.67,-63.9 921.9,-57.23 911.31,-57.31 913.67,-63.9"/>
 </g>
 <!-- none~set -->
 <g id="call~~graph~~CallGraph_node48" class="node">
 <title>none~set</title>
-<g id="a_call~~graph~~CallGraph_node48"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="1047,-3542 934,-3542 934,-3518 1047,-3518 1047,-3542"/>
-<text text-anchor="middle" x="990.5" y="-3527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<g id="a_call~~graph~~CallGraph_node48"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="1042,-6064 939,-6064 939,-6040 1042,-6040 1042,-6064"/>
+<text text-anchor="middle" x="990.5" y="-6049.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
 <!-- proc~set1 -->
 <g id="call~~graph~~CallGraph_node290" class="node">
 <title>proc~set1</title>
-<g id="a_call~~graph~~CallGraph_node290"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="1278,-3504 1158,-3504 1158,-3480 1278,-3480 1278,-3504"/>
-<text text-anchor="middle" x="1218" y="-3489.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
+<g id="a_call~~graph~~CallGraph_node290"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="1273,-6106 1163,-6106 1163,-6082 1273,-6082 1273,-6106"/>
+<text text-anchor="middle" x="1218" y="-6091.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set1 -->
 <g id="call~~graph~~CallGraph_edge73" class="edge">
 <title>none~set&#45;&gt;proc~set1</title>
-<path fill="none" stroke="#ffc600" stroke-dasharray="5,2" d="M1047.24,-3520.61C1077.6,-3515.49 1115.45,-3509.11 1147.7,-3503.68"/>
-<polygon fill="#ffc600" stroke="#ffc600" points="1148.68,-3507.06 1157.96,-3501.95 1147.52,-3500.16 1148.68,-3507.06"/>
+<path fill="none" stroke="#ffc600" stroke-dasharray="5,2" d="M1042.11,-6061.43C1074.73,-6067.5 1117.44,-6075.46 1152.49,-6081.98"/>
+<polygon fill="#ffc600" stroke="#ffc600" points="1152.15,-6085.48 1162.62,-6083.87 1153.43,-6078.6 1152.15,-6085.48"/>
+</g>
+<!-- proc~set1a -->
+<g id="call~~graph~~CallGraph_node291" class="node">
+<title>proc~set1a</title>
+<g id="a_call~~graph~~CallGraph_node291"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="1276.5,-6064 1159.5,-6064 1159.5,-6040 1276.5,-6040 1276.5,-6064"/>
+<text text-anchor="middle" x="1218" y="-6049.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+</a>
+</g>
+</g>
+<!-- none~set&#45;&gt;proc~set1a -->
+<g id="call~~graph~~CallGraph_edge74" class="edge">
+<title>none~set&#45;&gt;proc~set1a</title>
+<path fill="none" stroke="#ffc600" stroke-dasharray="5,2" d="M1042.11,-6052C1073.64,-6052 1114.62,-6052 1148.98,-6052"/>
+<polygon fill="#ffc600" stroke="#ffc600" points="1149.41,-6055.5 1159.41,-6052 1149.41,-6048.5 1149.41,-6055.5"/>
 </g>
 <!-- proc~set2 -->
 <g id="call~~graph~~CallGraph_node294" class="node">
 <title>proc~set2</title>
-<g id="a_call~~graph~~CallGraph_node294"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="1278,-3462 1158,-3462 1158,-3438 1278,-3438 1278,-3462"/>
-<text text-anchor="middle" x="1218" y="-3447.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
+<g id="a_call~~graph~~CallGraph_node294"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="1273,-5889 1163,-5889 1163,-5865 1273,-5865 1273,-5889"/>
+<text text-anchor="middle" x="1218" y="-5874.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set2 -->
-<g id="call~~graph~~CallGraph_edge74" class="edge">
+<g id="call~~graph~~CallGraph_edge75" class="edge">
 <title>none~set&#45;&gt;proc~set2</title>
-<path fill="none" stroke="#ffc600" stroke-dasharray="5,2" d="M1015.26,-3517.95C1041.73,-3504.92 1086.06,-3484.24 1126,-3471 1133.06,-3468.66 1140.52,-3466.48 1148,-3464.49"/>
-<polygon fill="#ffc600" stroke="#ffc600" points="1149,-3467.84 1157.81,-3461.97 1147.26,-3461.06 1149,-3467.84"/>
+<path fill="none" stroke="#ffc600" stroke-dasharray="5,2" d="M1017.07,-6040C1038.02,-6029.42 1067.73,-6012.66 1090,-5993 1109.46,-5975.82 1107.57,-5965.28 1126,-5947 1145.79,-5927.37 1171.12,-5908.3 1190.02,-5895.03"/>
+<polygon fill="#ffc600" stroke="#ffc600" points="1192.24,-5897.75 1198.48,-5889.19 1188.26,-5892 1192.24,-5897.75"/>
 </g>
 <!-- proc~set3 -->
 <g id="call~~graph~~CallGraph_node297" class="node">
 <title>proc~set3</title>
-<g id="a_call~~graph~~CallGraph_node297"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="1278,-3546 1158,-3546 1158,-3522 1278,-3522 1278,-3546"/>
-<text text-anchor="middle" x="1218" y="-3531.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
+<g id="a_call~~graph~~CallGraph_node297"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="1273,-6022 1163,-6022 1163,-5998 1273,-5998 1273,-6022"/>
+<text text-anchor="middle" x="1218" y="-6007.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set3 -->
-<g id="call~~graph~~CallGraph_edge75" class="edge">
+<g id="call~~graph~~CallGraph_edge76" class="edge">
 <title>none~set&#45;&gt;proc~set3</title>
-<path fill="none" stroke="#ffc600" stroke-dasharray="5,2" d="M1047.24,-3530.99C1077.6,-3531.53 1115.45,-3532.2 1147.7,-3532.77"/>
-<polygon fill="#ffc600" stroke="#ffc600" points="1147.9,-3536.27 1157.96,-3532.95 1148.02,-3529.28 1147.9,-3536.27"/>
+<path fill="none" stroke="#ffc600" stroke-dasharray="5,2" d="M1042.11,-6042.57C1074.73,-6036.5 1117.44,-6028.54 1152.49,-6022.02"/>
+<polygon fill="#ffc600" stroke="#ffc600" points="1153.43,-6025.4 1162.62,-6020.13 1152.15,-6018.52 1153.43,-6025.4"/>
 </g>
 <!-- proc~set4 -->
 <g id="call~~graph~~CallGraph_node300" class="node">
 <title>proc~set4</title>
-<g id="a_call~~graph~~CallGraph_node300"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="1278,-3588 1158,-3588 1158,-3564 1278,-3564 1278,-3588"/>
-<text text-anchor="middle" x="1218" y="-3573.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
+<g id="a_call~~graph~~CallGraph_node300"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="1273,-5980 1163,-5980 1163,-5956 1273,-5956 1273,-5980"/>
+<text text-anchor="middle" x="1218" y="-5965.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set4 -->
-<g id="call~~graph~~CallGraph_edge76" class="edge">
+<g id="call~~graph~~CallGraph_edge77" class="edge">
 <title>none~set&#45;&gt;proc~set4</title>
-<path fill="none" stroke="#ffc600" stroke-dasharray="5,2" d="M1047.24,-3541.37C1077.74,-3547.59 1115.78,-3555.35 1148.12,-3561.95"/>
-<polygon fill="#ffc600" stroke="#ffc600" points="1147.46,-3565.39 1157.96,-3563.96 1148.86,-3558.53 1147.46,-3565.39"/>
+<path fill="none" stroke="#ffc600" stroke-dasharray="5,2" d="M1013.74,-6039.8C1039.92,-6025.85 1085.05,-6003.14 1126,-5989 1134.55,-5986.05 1143.7,-5983.38 1152.78,-5981.02"/>
+<polygon fill="#ffc600" stroke="#ffc600" points="1153.72,-5984.4 1162.57,-5978.58 1152.02,-5977.61 1153.72,-5984.4"/>
 </g>
 <!-- none~set~2 -->
 <g id="call~~graph~~CallGraph_node49" class="node">
 <title>none~set~2</title>
-<g id="a_call~~graph~~CallGraph_node49"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="1047,-2508 934,-2508 934,-2484 1047,-2484 1047,-2508"/>
-<text text-anchor="middle" x="990.5" y="-2493.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<g id="a_call~~graph~~CallGraph_node49"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="1047,-4348 934,-4348 934,-4324 1047,-4324 1047,-4348"/>
+<text text-anchor="middle" x="990.5" y="-4333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
 <!-- proc~set1~2 -->
 <g id="call~~graph~~CallGraph_node292" class="node">
 <title>proc~set1~2</title>
-<g id="a_call~~graph~~CallGraph_node292"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="1278,-2512 1158,-2512 1158,-2488 1278,-2488 1278,-2512"/>
-<text text-anchor="middle" x="1218" y="-2497.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
+<g id="a_call~~graph~~CallGraph_node292"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="1278,-4306 1158,-4306 1158,-4282 1278,-4282 1278,-4306"/>
+<text text-anchor="middle" x="1218" y="-4291.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set1~2 -->
-<g id="call~~graph~~CallGraph_edge77" class="edge">
+<g id="call~~graph~~CallGraph_edge78" class="edge">
 <title>none~set~2&#45;&gt;proc~set1~2</title>
-<path fill="none" stroke="#ffca00" stroke-dasharray="5,2" d="M1047.24,-2496.99C1077.6,-2497.53 1115.45,-2498.2 1147.7,-2498.77"/>
-<polygon fill="#ffca00" stroke="#ffca00" points="1147.9,-2502.27 1157.96,-2498.95 1148.02,-2495.28 1147.9,-2502.27"/>
+<path fill="none" stroke="#ffca00" stroke-dasharray="5,2" d="M1047.24,-4325.62C1077.74,-4319.94 1115.78,-4312.85 1148.12,-4306.83"/>
+<polygon fill="#ffca00" stroke="#ffca00" points="1148.77,-4310.27 1157.96,-4305 1147.49,-4303.39 1148.77,-4310.27"/>
 </g>
 <!-- proc~set2~2 -->
 <g id="call~~graph~~CallGraph_node295" class="node">
 <title>proc~set2~2</title>
-<g id="a_call~~graph~~CallGraph_node295"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="1278,-2470 1158,-2470 1158,-2446 1278,-2446 1278,-2470"/>
-<text text-anchor="middle" x="1218" y="-2455.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
+<g id="a_call~~graph~~CallGraph_node295"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="1278,-4390 1158,-4390 1158,-4366 1278,-4366 1278,-4390"/>
+<text text-anchor="middle" x="1218" y="-4375.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set2~2 -->
-<g id="call~~graph~~CallGraph_edge78" class="edge">
+<g id="call~~graph~~CallGraph_edge79" class="edge">
 <title>none~set~2&#45;&gt;proc~set2~2</title>
-<path fill="none" stroke="#ffca00" stroke-dasharray="5,2" d="M1047.24,-2486.61C1077.6,-2481.49 1115.45,-2475.11 1147.7,-2469.68"/>
-<polygon fill="#ffca00" stroke="#ffca00" points="1148.68,-2473.06 1157.96,-2467.95 1147.52,-2466.16 1148.68,-2473.06"/>
+<path fill="none" stroke="#ffca00" stroke-dasharray="5,2" d="M1047.24,-4346.38C1077.74,-4352.06 1115.78,-4359.15 1148.12,-4365.17"/>
+<polygon fill="#ffca00" stroke="#ffca00" points="1147.49,-4368.61 1157.96,-4367 1148.77,-4361.73 1147.49,-4368.61"/>
 </g>
 <!-- proc~set3~2 -->
 <g id="call~~graph~~CallGraph_node298" class="node">
 <title>proc~set3~2</title>
-<g id="a_call~~graph~~CallGraph_node298"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="1278,-2554 1158,-2554 1158,-2530 1278,-2530 1278,-2554"/>
-<text text-anchor="middle" x="1218" y="-2539.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
+<g id="a_call~~graph~~CallGraph_node298"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="1278,-4264 1158,-4264 1158,-4240 1278,-4240 1278,-4264"/>
+<text text-anchor="middle" x="1218" y="-4249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set3~2 -->
-<g id="call~~graph~~CallGraph_edge79" class="edge">
+<g id="call~~graph~~CallGraph_edge80" class="edge">
 <title>none~set~2&#45;&gt;proc~set3~2</title>
-<path fill="none" stroke="#ffca00" stroke-dasharray="5,2" d="M1047.24,-2507.37C1077.74,-2513.59 1115.78,-2521.35 1148.12,-2527.95"/>
-<polygon fill="#ffca00" stroke="#ffca00" points="1147.46,-2531.39 1157.96,-2529.96 1148.86,-2524.53 1147.46,-2531.39"/>
+<path fill="none" stroke="#ffca00" stroke-dasharray="5,2" d="M1013.74,-4323.8C1039.92,-4309.85 1085.05,-4287.14 1126,-4273 1133.03,-4270.57 1140.47,-4268.34 1147.94,-4266.31"/>
+<polygon fill="#ffca00" stroke="#ffca00" points="1148.95,-4269.67 1157.74,-4263.76 1147.18,-4262.89 1148.95,-4269.67"/>
 </g>
 <!-- proc~set4~2 -->
 <g id="call~~graph~~CallGraph_node301" class="node">
 <title>proc~set4~2</title>
-<g id="a_call~~graph~~CallGraph_node301"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="1278,-2596 1158,-2596 1158,-2572 1278,-2572 1278,-2596"/>
-<text text-anchor="middle" x="1218" y="-2581.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
+<g id="a_call~~graph~~CallGraph_node301"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="1278,-4348 1158,-4348 1158,-4324 1278,-4324 1278,-4348"/>
+<text text-anchor="middle" x="1218" y="-4333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set4~2 -->
-<g id="call~~graph~~CallGraph_edge80" class="edge">
+<g id="call~~graph~~CallGraph_edge81" class="edge">
 <title>none~set~2&#45;&gt;proc~set4~2</title>
-<path fill="none" stroke="#ffca00" stroke-dasharray="5,2" d="M1047.06,-2503.85C1061.76,-2507.55 1077.11,-2513 1090,-2521 1110.89,-2533.96 1104.97,-2550.27 1126,-2563 1132.73,-2567.07 1140.18,-2570.36 1147.83,-2573.01"/>
-<polygon fill="#ffca00" stroke="#ffca00" points="1147,-2576.41 1157.59,-2576.03 1149.07,-2569.73 1147,-2576.41"/>
+<path fill="none" stroke="#ffca00" stroke-dasharray="5,2" d="M1047.24,-4336C1077.6,-4336 1115.45,-4336 1147.7,-4336"/>
+<polygon fill="#ffca00" stroke="#ffca00" points="1147.96,-4339.5 1157.96,-4336 1147.96,-4332.5 1147.96,-4339.5"/>
 </g>
 <!-- none~set~3 -->
 <g id="call~~graph~~CallGraph_node50" class="node">
 <title>none~set~3</title>
-<g id="a_call~~graph~~CallGraph_node50"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="1042,-830 939,-830 939,-806 1042,-806 1042,-830"/>
-<text text-anchor="middle" x="990.5" y="-815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
-</a>
-</g>
-</g>
-<!-- proc~set1a -->
-<g id="call~~graph~~CallGraph_node291" class="node">
-<title>proc~set1a</title>
-<g id="a_call~~graph~~CallGraph_node291"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="1276.5,-883 1159.5,-883 1159.5,-859 1276.5,-859 1276.5,-883"/>
-<text text-anchor="middle" x="1218" y="-868.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+<g id="a_call~~graph~~CallGraph_node50"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="1047,-3038 934,-3038 934,-3014 1047,-3014 1047,-3038"/>
+<text text-anchor="middle" x="990.5" y="-3023.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
-<g id="call~~graph~~CallGraph_edge81" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
-<path fill="none" stroke="#ffcf00" stroke-dasharray="5,2" d="M1041.62,-830.01C1066.91,-836.05 1098.07,-843.46 1126,-850 1135.26,-852.17 1145.05,-854.45 1154.64,-856.67"/>
-<polygon fill="#ffcf00" stroke="#ffcf00" points="1154,-860.11 1164.53,-858.96 1155.58,-853.29 1154,-860.11"/>
-</g>
 <!-- proc~set1~3 -->
 <g id="call~~graph~~CallGraph_node293" class="node">
 <title>proc~set1~3</title>
-<g id="a_call~~graph~~CallGraph_node293"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="1273,-841 1163,-841 1163,-817 1273,-817 1273,-841"/>
-<text text-anchor="middle" x="1218" y="-826.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<g id="a_call~~graph~~CallGraph_node293"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="1278,-3188 1158,-3188 1158,-3164 1278,-3164 1278,-3188"/>
+<text text-anchor="middle" x="1218" y="-3173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="call~~graph~~CallGraph_edge82" class="edge">
 <title>none~set~3&#45;&gt;proc~set1~3</title>
-<path fill="none" stroke="#ffcf00" stroke-dasharray="5,2" d="M1042.11,-820.47C1074.73,-822.06 1117.44,-824.14 1152.49,-825.85"/>
-<polygon fill="#ffcf00" stroke="#ffcf00" points="1152.47,-829.36 1162.62,-826.35 1152.81,-822.36 1152.47,-829.36"/>
+<path fill="none" stroke="#ffcf00" stroke-dasharray="5,2" d="M1007.75,-3038.28C1032.73,-3056.99 1082.26,-3093.49 1126,-3122 1145.79,-3134.9 1168.66,-3148.47 1186.52,-3158.77"/>
+<polygon fill="#ffcf00" stroke="#ffcf00" points="1184.94,-3161.9 1195.36,-3163.84 1188.43,-3155.83 1184.94,-3161.9"/>
 </g>
 <!-- proc~set2~3 -->
 <g id="call~~graph~~CallGraph_node296" class="node">
 <title>proc~set2~3</title>
-<g id="a_call~~graph~~CallGraph_node296"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="1273,-963 1163,-963 1163,-939 1273,-939 1273,-963"/>
-<text text-anchor="middle" x="1218" y="-948.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
+<g id="a_call~~graph~~CallGraph_node296"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="1278,-3230 1158,-3230 1158,-3206 1278,-3206 1278,-3230"/>
+<text text-anchor="middle" x="1218" y="-3215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="call~~graph~~CallGraph_edge83" class="edge">
 <title>none~set~3&#45;&gt;proc~set2~3</title>
-<path fill="none" stroke="#ffcf00" stroke-dasharray="5,2" d="M1011.91,-830.04C1052.06,-853.72 1141.42,-906.42 1187.8,-933.78"/>
-<polygon fill="#ffcf00" stroke="#ffcf00" points="1186.08,-936.83 1196.47,-938.89 1189.64,-930.8 1186.08,-936.83"/>
+<path fill="none" stroke="#ffcf00" stroke-dasharray="5,2" d="M997.37,-3038.25C1013.25,-3069.99 1060.31,-3155.3 1126,-3197 1132.81,-3201.32 1140.42,-3204.76 1148.24,-3207.49"/>
+<polygon fill="#ffcf00" stroke="#ffcf00" points="1147.28,-3210.86 1157.87,-3210.48 1149.36,-3204.17 1147.28,-3210.86"/>
 </g>
 <!-- proc~set3~3 -->
 <g id="call~~graph~~CallGraph_node299" class="node">
 <title>proc~set3~3</title>
-<g id="a_call~~graph~~CallGraph_node299"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="1273,-799 1163,-799 1163,-775 1273,-775 1273,-799"/>
-<text text-anchor="middle" x="1218" y="-784.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
+<g id="a_call~~graph~~CallGraph_node299"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="1278,-3113 1158,-3113 1158,-3089 1278,-3089 1278,-3113"/>
+<text text-anchor="middle" x="1218" y="-3098.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="call~~graph~~CallGraph_edge84" class="edge">
 <title>none~set~3&#45;&gt;proc~set3~3</title>
-<path fill="none" stroke="#ffcf00" stroke-dasharray="5,2" d="M1042.11,-811.04C1074.73,-806.56 1117.44,-800.69 1152.49,-795.87"/>
-<polygon fill="#ffcf00" stroke="#ffcf00" points="1153.19,-799.3 1162.62,-794.48 1152.24,-792.37 1153.19,-799.3"/>
+<path fill="none" stroke="#ffcf00" stroke-dasharray="5,2" d="M1027.73,-3038.05C1066.77,-3051.03 1128.98,-3071.73 1171.34,-3085.81"/>
+<polygon fill="#ffcf00" stroke="#ffcf00" points="1170.27,-3089.14 1180.86,-3088.98 1172.48,-3082.5 1170.27,-3089.14"/>
 </g>
 <!-- proc~set4~3 -->
 <g id="call~~graph~~CallGraph_node302" class="node">
 <title>proc~set4~3</title>
-<g id="a_call~~graph~~CallGraph_node302"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="1273,-757 1163,-757 1163,-733 1273,-733 1273,-757"/>
-<text text-anchor="middle" x="1218" y="-742.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
+<g id="a_call~~graph~~CallGraph_node302"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="1278,-3038 1158,-3038 1158,-3014 1278,-3014 1278,-3038"/>
+<text text-anchor="middle" x="1218" y="-3023.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="call~~graph~~CallGraph_edge85" class="edge">
 <title>none~set~3&#45;&gt;proc~set4~3</title>
-<path fill="none" stroke="#ffcf00" stroke-dasharray="5,2" d="M1019.17,-805.97C1046.08,-794.59 1088.31,-777.57 1126,-766 1134.65,-763.34 1143.86,-760.85 1152.96,-758.57"/>
-<polygon fill="#ffcf00" stroke="#ffcf00" points="1153.88,-761.95 1162.77,-756.18 1152.23,-755.15 1153.88,-761.95"/>
+<path fill="none" stroke="#ffcf00" stroke-dasharray="5,2" d="M1047.24,-3026C1077.6,-3026 1115.45,-3026 1147.7,-3026"/>
+<polygon fill="#ffcf00" stroke="#ffcf00" points="1147.96,-3029.5 1157.96,-3026 1147.96,-3022.5 1147.96,-3029.5"/>
 </g>
 <!-- proc~ansatz -->
 <g id="call~~graph~~CallGraph_node51" class="node">
 <title>proc~ansatz</title>
-<g id="a_call~~graph~~CallGraph_node51"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="609,-5848 477,-5848 477,-5824 609,-5824 609,-5848"/>
-<text text-anchor="middle" x="543" y="-5833.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_call~~graph~~CallGraph_node51"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="604,-5749 482,-5749 482,-5725 604,-5725 604,-5749"/>
+<text text-anchor="middle" x="543" y="-5734.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;interface~gauss_leg -->
+<!-- proc~ansatz&#45;&gt;interface~dyad -->
 <g id="call~~graph~~CallGraph_edge86" class="edge">
-<title>proc~ansatz&#45;&gt;interface~gauss_leg</title>
-<path fill="none" stroke="#ffd300" d="M609.1,-5836C644.59,-5836 687.46,-5836 718.42,-5836"/>
-<polygon fill="#ffd300" stroke="#ffd300" points="718.44,-5839.5 728.44,-5836 718.44,-5832.5 718.44,-5839.5"/>
+<title>proc~ansatz&#45;&gt;interface~dyad</title>
+<path fill="none" stroke="#ffd300" d="M556.07,-5749.17C576.83,-5769.37 621.47,-5809.72 667,-5831 684.8,-5839.32 706.09,-5844.44 723.8,-5847.54"/>
+<polygon fill="#ffd300" stroke="#ffd300" points="723.34,-5851.01 733.77,-5849.14 724.45,-5844.1 723.34,-5851.01"/>
 </g>
-<!-- proc~ansatz&#45;&gt;interface~ndgrid -->
+<!-- proc~ansatz&#45;&gt;interface~gauss_leg -->
 <g id="call~~graph~~CallGraph_edge87" class="edge">
-<title>proc~ansatz&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#ffd300" d="M547.83,-5848.04C567.08,-5908.38 652.84,-6175.37 667,-6187 739.83,-6246.85 1017.13,-6278.8 1090,-6219 1153.4,-6166.97 1084.81,-6108.93 1126,-6038 1140.98,-6012.2 1167.52,-5990.62 1188.08,-5976.58"/>
-<polygon fill="#ffd300" stroke="#ffd300" points="1190.06,-5979.46 1196.48,-5971.03 1186.2,-5973.62 1190.06,-5979.46"/>
+<title>proc~ansatz&#45;&gt;interface~gauss_leg</title>
+<path fill="none" stroke="#ffd300" d="M545.74,-5724.6C555.1,-5659.64 601.47,-5359.3 667,-5297 680.54,-5284.13 700.21,-5278.53 717.98,-5276.28"/>
+<polygon fill="#ffd300" stroke="#ffd300" points="718.54,-5279.75 728.16,-5275.32 717.88,-5272.78 718.54,-5279.75"/>
 </g>
 <!-- proc~ansatz&#45;&gt;interface~unique -->
 <g id="call~~graph~~CallGraph_edge88" class="edge">
 <title>proc~ansatz&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ffd300" d="M544.28,-5823.64C547.27,-5696.07 575.12,-4622.26 667,-4519 723.79,-4455.18 799.78,-4544.18 855,-4479 912.95,-4410.6 833.07,-3741.41 891,-3673 905.95,-3655.34 931.77,-3650.33 953.22,-3649.61"/>
-<polygon fill="#ffd300" stroke="#ffd300" points="953.35,-3653.1 963.34,-3649.56 953.32,-3646.11 953.35,-3653.1"/>
+<path fill="none" stroke="#ffd300" d="M551.43,-5724.84C577.87,-5681.61 665.86,-5537.79 667,-5537 736.9,-5488.21 782.93,-5544.52 855,-5499 877.55,-5484.76 868.53,-5465.36 891,-5451 909.48,-5439.19 933.51,-5433.91 953.2,-5431.6"/>
+<polygon fill="#ffd300" stroke="#ffd300" points="953.72,-5435.06 963.34,-5430.62 953.05,-5428.1 953.72,-5435.06"/>
 </g>
 <!-- proc~ansatz&#45;&gt;none~derivative -->
 <g id="call~~graph~~CallGraph_edge89" class="edge">
 <title>proc~ansatz&#45;&gt;none~derivative</title>
-<path fill="none" stroke="#ffd300" d="M548.15,-5848.26C561.12,-5886.74 601.78,-6008.68 631,-6111 648.76,-6173.19 621.79,-6205.75 667,-6252 670.25,-6255.33 673.89,-6258.24 677.8,-6260.78"/>
-<polygon fill="#ffd300" stroke="#ffd300" points="676.29,-6263.95 686.72,-6265.8 679.72,-6257.85 676.29,-6263.95"/>
+<path fill="none" stroke="#ffd300" d="M568.94,-5749.1C593.45,-5760.61 632.13,-5777.79 667,-5789 674.31,-5791.35 682.03,-5793.54 689.77,-5795.55"/>
+<polygon fill="#ffd300" stroke="#ffd300" points="688.99,-5798.96 699.54,-5797.99 690.69,-5792.17 688.99,-5798.96"/>
 </g>
 <!-- proc~ansatz&#45;&gt;none~set -->
 <g id="call~~graph~~CallGraph_edge90" class="edge">
 <title>proc~ansatz&#45;&gt;none~set</title>
-<path fill="none" stroke="#ffd300" d="M544.81,-5823.93C554.12,-5684.76 641.47,-4388.43 667,-4359 723.16,-4294.25 800,-4381.74 855,-4316 909.24,-4251.16 837.84,-3621.73 891,-3556 899.37,-3545.64 911.35,-3539.13 924.07,-3535.1"/>
-<polygon fill="#ffd300" stroke="#ffd300" points="925.15,-3538.43 933.91,-3532.47 923.34,-3531.67 925.15,-3538.43"/>
+<path fill="none" stroke="#ffd300" d="M551.65,-5749.19C575.85,-5787.6 650.12,-5904.18 667,-5915 738.42,-5960.77 787.78,-5896.25 855,-5948 885.25,-5971.29 861.75,-6001.45 891,-6026 901.79,-6035.06 915.41,-6041 929.04,-6044.88"/>
+<polygon fill="#ffd300" stroke="#ffd300" points="928.38,-6048.32 938.93,-6047.36 930.08,-6041.53 928.38,-6048.32"/>
 </g>
 <!-- proc~cmp_elem -->
 <g id="call~~graph~~CallGraph_node70" class="node">
 <title>proc~cmp_elem</title>
-<g id="a_call~~graph~~CallGraph_node70"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_volume%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="837.5,-4434 684.5,-4434 684.5,-4410 837.5,-4410 837.5,-4434"/>
-<text text-anchor="middle" x="761" y="-4419.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
+<g id="a_call~~graph~~CallGraph_node70"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_curve%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="832.5,-5490 689.5,-5490 689.5,-5466 832.5,-5466 832.5,-5490"/>
+<text text-anchor="middle" x="761" y="-5475.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
 <g id="call~~graph~~CallGraph_edge91" class="edge">
 <title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ffd300" d="M544.48,-5823.9C549.6,-5696.77 595.38,-4608.38 667,-4486 679.31,-4464.97 701.59,-4449.27 721.26,-4438.69"/>
-<polygon fill="#ffd300" stroke="#ffd300" points="723.04,-4441.71 730.36,-4434.04 719.86,-4435.47 723.04,-4441.71"/>
-</g>
-<!-- proc~det -->
-<g id="call~~graph~~CallGraph_node162" class="node">
-<title>proc~det</title>
-<g id="a_call~~graph~~CallGraph_node162"><a xlink:href="../proc/det.html" xlink:title="det">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1017.5,-6210 963.5,-6210 963.5,-6186 1017.5,-6186 1017.5,-6210"/>
-<text text-anchor="middle" x="990.5" y="-6195.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">det</text>
-</a>
-</g>
-</g>
-<!-- proc~ansatz&#45;&gt;proc~det -->
-<g id="call~~graph~~CallGraph_edge92" class="edge">
-<title>proc~ansatz&#45;&gt;proc~det</title>
-<path fill="none" stroke="#ffd300" d="M544.81,-5848.11C548.61,-5894.72 568.95,-6063.82 667,-6143 750.93,-6210.77 887.83,-6208.26 952.91,-6202.44"/>
-<polygon fill="#ffd300" stroke="#ffd300" points="953.48,-6205.91 963.09,-6201.45 952.8,-6198.94 953.48,-6205.91"/>
-</g>
-<!-- proc~inv -->
-<g id="call~~graph~~CallGraph_node253" class="node">
-<title>proc~inv</title>
-<g id="a_call~~graph~~CallGraph_node253"><a xlink:href="../proc/inv.html" xlink:title="inv">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="788,-6116 734,-6116 734,-6092 788,-6092 788,-6116"/>
-<text text-anchor="middle" x="761" y="-6101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">inv</text>
-</a>
-</g>
-</g>
-<!-- proc~ansatz&#45;&gt;proc~inv -->
-<g id="call~~graph~~CallGraph_edge93" class="edge">
-<title>proc~ansatz&#45;&gt;proc~inv</title>
-<path fill="none" stroke="#ffd300" d="M546.55,-5848.24C555.45,-5887.91 589,-6014.07 667,-6078 682.97,-6091.09 705.11,-6097.6 723.78,-6100.84"/>
-<polygon fill="#ffd300" stroke="#ffd300" points="723.32,-6104.31 733.73,-6102.32 724.35,-6097.39 723.32,-6104.31"/>
+<path fill="none" stroke="#ffd300" d="M558.28,-5724.73C577.61,-5707.36 611.88,-5673.7 631,-5638 660.12,-5583.64 623.62,-5547.83 667,-5504 670.91,-5500.05 675.36,-5496.69 680.15,-5493.83"/>
+<polygon fill="#ffd300" stroke="#ffd300" points="681.82,-5496.91 689.1,-5489.21 678.61,-5490.69 681.82,-5496.91"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="call~~graph~~CallGraph_node52" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_call~~graph~~CallGraph_node52"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="609,-4552 477,-4552 477,-4528 609,-4528 609,-4552"/>
-<text text-anchor="middle" x="543" y="-4537.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_call~~graph~~CallGraph_node52"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="609,-5268 477,-5268 477,-5244 609,-5244 609,-5268"/>
+<text text-anchor="middle" x="543" y="-5253.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;interface~gauss_leg -->
-<g id="call~~graph~~CallGraph_edge94" class="edge">
+<g id="call~~graph~~CallGraph_edge92" class="edge">
 <title>proc~ansatz~2&#45;&gt;interface~gauss_leg</title>
-<path fill="none" stroke="#ffd700" d="M546,-4552C565.98,-4671.87 729.42,-5652.52 756.27,-5813.64"/>
-<polygon fill="#ffd700" stroke="#ffd700" points="752.87,-5814.51 757.97,-5823.8 759.77,-5813.36 752.87,-5814.51"/>
+<path fill="none" stroke="#ffd700" d="M609.1,-5262.03C644.59,-5265.31 687.46,-5269.28 718.42,-5272.15"/>
+<polygon fill="#ffd700" stroke="#ffd700" points="718.16,-5275.64 728.44,-5273.08 718.8,-5268.67 718.16,-5275.64"/>
 </g>
 <!-- proc~ansatz~2&#45;&gt;interface~ndgrid -->
-<g id="call~~graph~~CallGraph_edge95" class="edge">
+<g id="call~~graph~~CallGraph_edge93" class="edge">
 <title>proc~ansatz~2&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#ffd700" d="M544.45,-4552.24C549.16,-4678.48 590.95,-5741.59 667,-5857 779.23,-6027.33 1077.53,-5986.82 1181.03,-5966.79"/>
-<polygon fill="#ffd700" stroke="#ffd700" points="1181.86,-5970.19 1190.99,-5964.81 1180.5,-5963.33 1181.86,-5970.19"/>
+<path fill="none" stroke="#ffd700" d="M609.05,-5255.71C689.32,-5253.99 819.59,-5246.27 855,-5215 902.51,-5173.05 844.71,-5120.31 891,-5077 956.75,-5015.48 1021.81,-5097.8 1090,-5039 1126.72,-5007.33 1093.07,-4971.6 1126,-4936 1140.6,-4920.21 1162.55,-4910.32 1181.23,-4904.32"/>
+<polygon fill="#ffd700" stroke="#ffd700" points="1182.33,-4907.64 1190.93,-4901.45 1180.34,-4900.93 1182.33,-4907.64"/>
 </g>
 <!-- proc~ansatz~2&#45;&gt;interface~unique -->
-<g id="call~~graph~~CallGraph_edge96" class="edge">
+<g id="call~~graph~~CallGraph_edge94" class="edge">
 <title>proc~ansatz~2&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ffd700" d="M567.97,-4527.86C592.38,-4515.88 631.57,-4497.71 667,-4486 748.38,-4459.1 800.02,-4508.76 855,-4443 909.94,-4377.29 835.58,-3738.3 891,-3673 905.97,-3655.36 931.79,-3650.34 953.24,-3649.62"/>
-<polygon fill="#ffd700" stroke="#ffd700" points="953.36,-3653.12 963.35,-3649.57 953.33,-3646.12 953.36,-3653.12"/>
+<path fill="none" stroke="#ffd700" d="M549.17,-5268.4C562.93,-5299.58 603.77,-5381.13 667,-5414 760.57,-5462.65 890.76,-5448.44 953.23,-5437.48"/>
+<polygon fill="#ffd700" stroke="#ffd700" points="954.17,-5440.87 963.38,-5435.63 952.91,-5433.98 954.17,-5440.87"/>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~derivative~2 -->
-<g id="call~~graph~~CallGraph_edge97" class="edge">
+<g id="call~~graph~~CallGraph_edge95" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~derivative~2</title>
-<path fill="none" stroke="#ffd700" d="M609.1,-4540C629.8,-4540 653,-4540 674.89,-4540"/>
-<polygon fill="#ffd700" stroke="#ffd700" points="675.18,-4543.5 685.18,-4540 675.18,-4536.5 675.18,-4543.5"/>
+<path fill="none" stroke="#ffd700" d="M577.13,-5268.04C601.73,-5276.74 636.21,-5288.42 667,-5297 675.14,-5299.27 683.72,-5301.47 692.26,-5303.53"/>
+<polygon fill="#ffd700" stroke="#ffd700" points="691.69,-5307 702.23,-5305.9 693.3,-5300.18 691.69,-5307"/>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~set~2 -->
-<g id="call~~graph~~CallGraph_edge98" class="edge">
+<g id="call~~graph~~CallGraph_edge96" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ffd700" d="M547.96,-4527.88C560.14,-4492.29 600.33,-4386.76 667,-4326 734.91,-4264.11 804.54,-4316.79 855,-4240 907.46,-4160.17 831.56,-2595.78 891,-2521 899.27,-2510.6 911.19,-2504.15 923.91,-2500.24"/>
-<polygon fill="#ffd700" stroke="#ffd700" points="924.93,-2503.59 933.74,-2497.71 923.19,-2496.81 924.93,-2503.59"/>
+<path fill="none" stroke="#ffd700" d="M549.42,-5243.93C563.77,-5213.48 605.86,-5133.24 667,-5095 739.27,-5049.8 799.04,-5121.3 855,-5057 898.12,-5007.46 868.3,-4528.63 891,-4467 907.61,-4421.9 945.18,-4379.28 968.82,-4355.51"/>
+<polygon fill="#ffd700" stroke="#ffd700" points="971.58,-4357.7 976.26,-4348.19 966.67,-4352.71 971.58,-4357.7"/>
 </g>
 <!-- proc~cmp_elem~2 -->
 <g id="call~~graph~~CallGraph_node86" class="node">
 <title>proc~cmp_elem~2</title>
-<g id="a_call~~graph~~CallGraph_node86"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_surface%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="837.5,-4392 684.5,-4392 684.5,-4368 837.5,-4368 837.5,-4392"/>
-<text text-anchor="middle" x="761" y="-4377.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
+<g id="a_call~~graph~~CallGraph_node86"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_volume%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="837.5,-5372 684.5,-5372 684.5,-5348 837.5,-5348 837.5,-5372"/>
+<text text-anchor="middle" x="761" y="-5357.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;proc~cmp_elem~2 -->
-<g id="call~~graph~~CallGraph_edge99" class="edge">
+<g id="call~~graph~~CallGraph_edge97" class="edge">
 <title>proc~ansatz~2&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#ffd700" d="M551.12,-4527.67C567.66,-4500.2 611.53,-4433.82 667,-4401 670.18,-4399.12 673.51,-4397.41 676.94,-4395.85"/>
-<polygon fill="#ffd700" stroke="#ffd700" points="678.29,-4399.08 686.23,-4392.07 675.65,-4392.6 678.29,-4399.08"/>
+<path fill="none" stroke="#ffd700" d="M562.4,-5268.12C580.05,-5279.78 607.44,-5297.97 631,-5314 647.1,-5324.96 649.17,-5331.15 667,-5339 672.02,-5341.21 677.3,-5343.2 682.68,-5344.99"/>
+<polygon fill="#ffd700" stroke="#ffd700" points="681.87,-5348.4 692.46,-5347.99 683.93,-5341.71 681.87,-5348.4"/>
+</g>
+<!-- proc~det -->
+<g id="call~~graph~~CallGraph_node162" class="node">
+<title>proc~det</title>
+<g id="a_call~~graph~~CallGraph_node162"><a xlink:href="../proc/det.html" xlink:title="det">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1017.5,-4866 963.5,-4866 963.5,-4842 1017.5,-4842 1017.5,-4866"/>
+<text text-anchor="middle" x="990.5" y="-4851.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">det</text>
+</a>
+</g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;proc~det -->
-<g id="call~~graph~~CallGraph_edge100" class="edge">
+<g id="call~~graph~~CallGraph_edge98" class="edge">
 <title>proc~ansatz~2&#45;&gt;proc~det</title>
-<path fill="none" stroke="#ffd700" d="M544.8,-4552.3C554.03,-4694.14 640.64,-6015.33 667,-6045 723.62,-6108.72 789.41,-6028.55 855,-6083 887.83,-6110.26 858.98,-6143.79 891,-6172 908.14,-6187.1 933.06,-6193.58 953.55,-6196.3"/>
-<polygon fill="#ffd700" stroke="#ffd700" points="953.18,-6199.78 963.49,-6197.38 953.93,-6192.82 953.18,-6199.78"/>
+<path fill="none" stroke="#ffd700" d="M585.72,-5243.97C609.47,-5237.24 639.83,-5228.86 667,-5222 750.11,-5201.02 797.72,-5242.76 855,-5179 945.92,-5077.79 799.33,-4975.54 891,-4875 906.42,-4858.09 931.82,-4852.98 952.96,-4852.03"/>
+<polygon fill="#ffd700" stroke="#ffd700" points="953.31,-4855.52 963.25,-4851.86 953.19,-4848.52 953.31,-4855.52"/>
+</g>
+<!-- proc~inv -->
+<g id="call~~graph~~CallGraph_node253" class="node">
+<title>proc~inv</title>
+<g id="a_call~~graph~~CallGraph_node253"><a xlink:href="../proc/inv.html" xlink:title="inv">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="788,-4866 734,-4866 734,-4842 788,-4842 788,-4866"/>
+<text text-anchor="middle" x="761" y="-4851.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">inv</text>
+</a>
+</g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;proc~inv -->
-<g id="call~~graph~~CallGraph_edge101" class="edge">
+<g id="call~~graph~~CallGraph_edge99" class="edge">
 <title>proc~ansatz~2&#45;&gt;proc~inv</title>
-<path fill="none" stroke="#ffd700" d="M544.77,-4552.12C553.91,-4694.63 641.19,-6046.66 667,-6078 680.61,-6094.53 703.8,-6101.04 723.61,-6103.41"/>
-<polygon fill="#ffd700" stroke="#ffd700" points="723.32,-6106.9 733.59,-6104.3 723.95,-6099.92 723.32,-6106.9"/>
+<path fill="none" stroke="#ffd700" d="M546.27,-5243.72C555.1,-5198.44 590.53,-5038 667,-4931 684.31,-4906.79 711.02,-4885.74 731.39,-4871.81"/>
+<polygon fill="#ffd700" stroke="#ffd700" points="733.58,-4874.55 739.96,-4866.1 729.7,-4868.73 733.58,-4874.55"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="call~~graph~~CallGraph_node53" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_call~~graph~~CallGraph_node53"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="604,-2965 482,-2965 482,-2941 604,-2941 604,-2965"/>
-<text text-anchor="middle" x="543" y="-2950.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_call~~graph~~CallGraph_node53"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="609,-4895 477,-4895 477,-4871 609,-4871 609,-4895"/>
+<text text-anchor="middle" x="543" y="-4880.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;interface~dyad -->
-<g id="call~~graph~~CallGraph_edge102" class="edge">
-<title>proc~ansatz~3&#45;&gt;interface~dyad</title>
-<path fill="none" stroke="#ffdb00" d="M564.21,-2940.87C588.03,-2927.03 629.19,-2904.57 667,-2891 685.36,-2884.41 706.53,-2879.44 724.03,-2875.99"/>
-<polygon fill="#ffdb00" stroke="#ffdb00" points="724.68,-2879.43 733.86,-2874.13 723.38,-2872.55 724.68,-2879.43"/>
-</g>
 <!-- proc~ansatz~3&#45;&gt;interface~gauss_leg -->
-<g id="call~~graph~~CallGraph_edge103" class="edge">
+<g id="call~~graph~~CallGraph_edge100" class="edge">
 <title>proc~ansatz~3&#45;&gt;interface~gauss_leg</title>
-<path fill="none" stroke="#ffdb00" d="M547.75,-2965.14C561.91,-3011.61 612.23,-3182.84 631,-3328 701.3,-3871.71 639.05,-4013.48 667,-4561 692.92,-5068.8 746.93,-5688.84 757.99,-5813.54"/>
-<polygon fill="#ffdb00" stroke="#ffdb00" points="754.53,-5814.1 758.9,-5823.76 761.5,-5813.48 754.53,-5814.1"/>
+<path fill="none" stroke="#ffdb00" d="M547.25,-4895.05C558.88,-4936.83 601.22,-5078.4 667,-5179 686.95,-5209.51 717.19,-5238.91 737.73,-5257.19"/>
+<polygon fill="#ffdb00" stroke="#ffdb00" points="735.52,-5259.91 745.35,-5263.86 740.13,-5254.64 735.52,-5259.91"/>
+</g>
+<!-- proc~ansatz~3&#45;&gt;interface~ndgrid -->
+<g id="call~~graph~~CallGraph_edge101" class="edge">
+<title>proc~ansatz~3&#45;&gt;interface~ndgrid</title>
+<path fill="none" stroke="#ffdb00" d="M566.3,-4870.85C590.34,-4858.51 630.12,-4840.21 667,-4833 759.25,-4814.97 1004.6,-4793.72 1090,-4833 1112.34,-4843.27 1104.97,-4862.27 1126,-4875 1142.31,-4884.88 1162.84,-4890.11 1180.27,-4892.88"/>
+<polygon fill="#ffdb00" stroke="#ffdb00" points="1180.27,-4896.42 1190.65,-4894.31 1181.22,-4889.48 1180.27,-4896.42"/>
 </g>
 <!-- proc~ansatz~3&#45;&gt;interface~unique -->
-<g id="call~~graph~~CallGraph_edge104" class="edge">
+<g id="call~~graph~~CallGraph_edge102" class="edge">
 <title>proc~ansatz~3&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ffdb00" d="M563.25,-2965.2C586.84,-2979.62 628.42,-3003.37 667,-3017 747.38,-3045.4 798.99,-2990.74 855,-3055 939.27,-3151.68 807.25,-3533.87 891,-3631 906.11,-3648.52 931.92,-3653.54 953.33,-3654.3"/>
-<polygon fill="#ffdb00" stroke="#ffdb00" points="953.4,-3657.8 963.42,-3654.37 953.45,-3650.8 953.4,-3657.8"/>
+<path fill="none" stroke="#ffdb00" d="M547.01,-4895.16C558.15,-4940.19 598.11,-5101.77 631,-5235 647.02,-5299.88 617.64,-5335.94 667,-5381 677.53,-5390.61 871.14,-5415.43 953.21,-5425.58"/>
+<polygon fill="#ffdb00" stroke="#ffdb00" points="952.98,-5429.08 963.33,-5426.83 953.84,-5422.13 952.98,-5429.08"/>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~derivative~3 -->
-<g id="call~~graph~~CallGraph_edge105" class="edge">
+<g id="call~~graph~~CallGraph_edge103" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~derivative~3</title>
-<path fill="none" stroke="#ffdb00" d="M554.51,-2940.9C574.25,-2918.98 619.19,-2872.81 667,-2849 671.31,-2846.85 675.84,-2844.92 680.49,-2843.19"/>
-<polygon fill="#ffdb00" stroke="#ffdb00" points="681.82,-2846.43 690.16,-2839.9 679.56,-2839.81 681.82,-2846.43"/>
+<path fill="none" stroke="#ffdb00" d="M560.27,-4870.83C579.87,-4855.33 612.46,-4826.72 631,-4795 660.39,-4744.72 624.68,-4709.01 667,-4669 669.81,-4666.34 672.89,-4663.99 676.15,-4661.92"/>
+<polygon fill="#ffdb00" stroke="#ffdb00" points="678.04,-4664.88 685.19,-4657.06 674.72,-4658.72 678.04,-4664.88"/>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~set~3 -->
-<g id="call~~graph~~CallGraph_edge106" class="edge">
+<g id="call~~graph~~CallGraph_edge104" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ffdb00" d="M546.35,-2940.73C560.15,-2869.29 631.18,-2508.99 667,-2475 728.84,-2416.32 800.2,-2502.29 855,-2437 905.98,-2376.26 871.41,-1086.85 891,-1010 908.09,-942.97 951.77,-872.75 974.79,-838.81"/>
-<polygon fill="#ffdb00" stroke="#ffdb00" points="977.91,-840.46 980.7,-830.24 972.14,-836.49 977.91,-840.46"/>
+<path fill="none" stroke="#ffdb00" d="M560.98,-4870.76C580.97,-4855.39 613.64,-4827.13 631,-4795 667.3,-4727.82 622.73,-4689.22 667,-4627 723.65,-4547.38 805.82,-4597.44 855,-4513 923.93,-4394.67 863.94,-3415.25 891,-3281 909.28,-3190.34 956.81,-3089.94 978.46,-3047.16"/>
+<polygon fill="#ffdb00" stroke="#ffdb00" points="981.7,-3048.52 983.14,-3038.02 975.47,-3045.33 981.7,-3048.52"/>
 </g>
 <!-- proc~cmp_elem~3 -->
 <g id="call~~graph~~CallGraph_node87" class="node">
 <title>proc~cmp_elem~3</title>
-<g id="a_call~~graph~~CallGraph_node87"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_curve%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="832.5,-3706 689.5,-3706 689.5,-3682 832.5,-3682 832.5,-3706"/>
-<text text-anchor="middle" x="761" y="-3691.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
+<g id="a_call~~graph~~CallGraph_node87"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_surface%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="837.5,-5170 684.5,-5170 684.5,-5146 837.5,-5146 837.5,-5170"/>
+<text text-anchor="middle" x="761" y="-5155.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;proc~cmp_elem~3 -->
-<g id="call~~graph~~CallGraph_edge107" class="edge">
+<g id="call~~graph~~CallGraph_edge105" class="edge">
 <title>proc~ansatz~3&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#ffdb00" d="M547.35,-2965.2C560.08,-3011.88 605.9,-3183.8 631,-3328 642.78,-3395.67 630.45,-3576.84 667,-3635 678.98,-3654.06 699.61,-3668.07 718.4,-3677.64"/>
-<polygon fill="#ffdb00" stroke="#ffdb00" points="716.9,-3680.8 727.43,-3681.98 719.94,-3674.49 716.9,-3680.8"/>
+<path fill="none" stroke="#ffdb00" d="M549.86,-4895.2C574.15,-4945.71 665.67,-5135.94 667,-5137 669.59,-5139.06 672.35,-5140.92 675.22,-5142.61"/>
+<polygon fill="#ffdb00" stroke="#ffdb00" points="673.68,-5145.75 684.18,-5147.17 676.85,-5139.51 673.68,-5145.75"/>
+</g>
+<!-- proc~ansatz~3&#45;&gt;proc~det -->
+<g id="call~~graph~~CallGraph_edge106" class="edge">
+<title>proc~ansatz~3&#45;&gt;proc~det</title>
+<path fill="none" stroke="#ffdb00" d="M609.05,-4889.28C627.74,-4890.81 648.16,-4892.24 667,-4893 750.49,-4896.39 773.68,-4912.2 855,-4893 872.41,-4888.89 874.12,-4880.91 891,-4875 911.19,-4867.93 934.58,-4862.82 953.5,-4859.41"/>
+<polygon fill="#ffdb00" stroke="#ffdb00" points="954.24,-4862.84 963.5,-4857.69 953.05,-4855.94 954.24,-4862.84"/>
+</g>
+<!-- proc~ansatz~3&#45;&gt;proc~inv -->
+<g id="call~~graph~~CallGraph_edge107" class="edge">
+<title>proc~ansatz~3&#45;&gt;proc~inv</title>
+<path fill="none" stroke="#ffdb00" d="M609.1,-4874.26C646.71,-4869.21 692.61,-4863.05 723.84,-4858.85"/>
+<polygon fill="#ffdb00" stroke="#ffdb00" points="724.39,-4862.31 733.84,-4857.51 723.46,-4855.37 724.39,-4862.31"/>
 </g>
 <!-- proc~basis_bernstein -->
 <g id="call~~graph~~CallGraph_node54" class="node">
 <title>proc~basis_bernstein</title>
 <g id="a_call~~graph~~CallGraph_node54"><a xlink:href="../proc/basis_bernstein.html" xlink:title="basis_bernstein">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="156,-6396 61,-6396 61,-6372 156,-6372 156,-6396"/>
-<text text-anchor="middle" x="108.5" y="-6381.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">basis_bernstein</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="156,-6766 61,-6766 61,-6742 156,-6742 156,-6766"/>
+<text text-anchor="middle" x="108.5" y="-6751.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">basis_bernstein</text>
 </a>
 </g>
 </g>
@@ -3861,8 +3861,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node55" class="node">
 <title>proc~basis_bspline</title>
 <g id="a_call~~graph~~CallGraph_node55"><a xlink:href="../proc/basis_bspline.html" xlink:title="basis_bspline">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1259.5,-4294 1176.5,-4294 1176.5,-4270 1259.5,-4270 1259.5,-4294"/>
-<text text-anchor="middle" x="1218" y="-4279.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">basis_bspline</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1259.5,-1704 1176.5,-1704 1176.5,-1680 1259.5,-1680 1259.5,-1704"/>
+<text text-anchor="middle" x="1218" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">basis_bspline</text>
 </a>
 </g>
 </g>
@@ -3870,8 +3870,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node56" class="node">
 <title>proc~basis_bspline_2der</title>
 <g id="a_call~~graph~~CallGraph_node56"><a xlink:href="../proc/basis_bspline_2der.html" xlink:title="basis_bspline_2der">
-<polygon fill="#d9534f" stroke="#d9534f" points="1274.5,-5575 1161.5,-5575 1161.5,-5551 1274.5,-5551 1274.5,-5575"/>
-<text text-anchor="middle" x="1218" y="-5560.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">basis_bspline_2der</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1274.5,-927 1161.5,-927 1161.5,-903 1274.5,-903 1274.5,-927"/>
+<text text-anchor="middle" x="1218" y="-912.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">basis_bspline_2der</text>
 </a>
 </g>
 </g>
@@ -3879,128 +3879,128 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node57" class="node">
 <title>proc~basis_bspline_der</title>
 <g id="a_call~~graph~~CallGraph_node57"><a xlink:href="../proc/basis_bspline_der.html" xlink:title="basis_bspline_der">
-<polygon fill="#d9534f" stroke="#d9534f" points="1271,-5071 1165,-5071 1165,-5047 1271,-5047 1271,-5071"/>
-<text text-anchor="middle" x="1218" y="-5056.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">basis_bspline_der</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1271,-423 1165,-423 1165,-399 1271,-399 1271,-423"/>
+<text text-anchor="middle" x="1218" y="-408.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">basis_bspline_der</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_scalar&#45;&gt;interface~compute_tgc -->
 <g id="call~~graph~~CallGraph_edge108" class="edge">
 <title>proc~basis_scalar&#45;&gt;interface~compute_tgc</title>
-<path fill="none" stroke="#fff000" d="M1071.64,-6562.31C1102.73,-6560.11 1137.45,-6557.64 1165.15,-6555.68"/>
-<polygon fill="#fff000" stroke="#fff000" points="1165.68,-6559.15 1175.4,-6554.95 1165.18,-6552.17 1165.68,-6559.15"/>
+<path fill="none" stroke="#fff000" d="M1066.59,-6506.99C1099.02,-6510.01 1136.15,-6513.47 1165.41,-6516.2"/>
+<polygon fill="#fff000" stroke="#fff000" points="1165.13,-6519.68 1175.41,-6517.13 1165.78,-6512.71 1165.13,-6519.68"/>
 </g>
 <!-- proc~is_rational -->
 <g id="call~~graph~~CallGraph_node254" class="node">
 <title>proc~is_rational</title>
-<g id="a_call~~graph~~CallGraph_node254"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1294,-6434 1142,-6434 1142,-6410 1294,-6410 1294,-6434"/>
-<text text-anchor="middle" x="1218" y="-6419.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
+<g id="a_call~~graph~~CallGraph_node254"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1289,-6392 1147,-6392 1147,-6368 1289,-6368 1289,-6392"/>
+<text text-anchor="middle" x="1218" y="-6377.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_scalar&#45;&gt;proc~is_rational -->
 <g id="call~~graph~~CallGraph_edge109" class="edge">
 <title>proc~basis_scalar&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#fff000" d="M1071.75,-6557.55C1078.28,-6554.76 1084.48,-6551.3 1090,-6547 1118.55,-6524.78 1101.21,-6500.35 1126,-6474 1140.1,-6459.02 1159.49,-6447.12 1176.76,-6438.52"/>
-<polygon fill="#fff000" stroke="#fff000" points="1178.56,-6441.53 1186.08,-6434.07 1175.55,-6435.22 1178.56,-6441.53"/>
+<path fill="none" stroke="#fff000" d="M1051.66,-6488C1064.64,-6484.35 1078.04,-6479.74 1090,-6474 1131.14,-6454.25 1172.45,-6420.46 1196.33,-6399.23"/>
+<polygon fill="#fff000" stroke="#fff000" points="1198.95,-6401.59 1204.02,-6392.29 1194.26,-6396.39 1198.95,-6401.59"/>
 </g>
 <!-- proc~basis_scalar~2&#45;&gt;interface~compute_tgc~2 -->
 <g id="call~~graph~~CallGraph_edge110" class="edge">
 <title>proc~basis_scalar~2&#45;&gt;interface~compute_tgc~2</title>
-<path fill="none" stroke="#fff500" d="M1071.64,-6072.54C1102.73,-6069.64 1137.45,-6066.41 1165.15,-6063.83"/>
-<polygon fill="#fff500" stroke="#fff500" points="1165.77,-6067.29 1175.4,-6062.87 1165.12,-6060.32 1165.77,-6067.29"/>
+<path fill="none" stroke="#fff500" d="M1071.64,-5514C1102.73,-5514 1137.45,-5514 1165.15,-5514"/>
+<polygon fill="#fff500" stroke="#fff500" points="1165.4,-5517.5 1175.4,-5514 1165.4,-5510.5 1165.4,-5517.5"/>
 </g>
 <!-- proc~is_rational~2 -->
 <g id="call~~graph~~CallGraph_node255" class="node">
 <title>proc~is_rational~2</title>
-<g id="a_call~~graph~~CallGraph_node255"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1294,-2306 1142,-2306 1142,-2282 1294,-2282 1294,-2306"/>
-<text text-anchor="middle" x="1218" y="-2291.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
+<g id="a_call~~graph~~CallGraph_node255"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1294,-5194 1142,-5194 1142,-5170 1294,-5170 1294,-5194"/>
+<text text-anchor="middle" x="1218" y="-5179.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_scalar~2&#45;&gt;proc~is_rational~2 -->
 <g id="call~~graph~~CallGraph_edge111" class="edge">
 <title>proc~basis_scalar~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#fff500" d="M1071.79,-6073.13C1078.75,-6069.69 1085.02,-6065.09 1090,-6059 1153.68,-5981.1 1097.39,-2533.46 1126,-2437 1140.5,-2388.12 1177.05,-2339.91 1199.17,-2313.84"/>
-<polygon fill="#fff500" stroke="#fff500" points="1201.9,-2316.04 1205.79,-2306.19 1196.6,-2311.46 1201.9,-2316.04"/>
+<path fill="none" stroke="#fff500" d="M1071.57,-5506.31C1078.48,-5503.01 1084.8,-5498.67 1090,-5493 1177.78,-5397.28 1039.03,-5299.46 1126,-5203 1128.09,-5200.69 1130.37,-5198.6 1132.82,-5196.72"/>
+<polygon fill="#fff500" stroke="#fff500" points="1135.1,-5199.42 1141.67,-5191.11 1131.35,-5193.51 1135.1,-5199.42"/>
 </g>
 <!-- proc~basis_scalar~3&#45;&gt;interface~compute_tgc~3 -->
 <g id="call~~graph~~CallGraph_edge112" class="edge">
 <title>proc~basis_scalar~3&#45;&gt;interface~compute_tgc~3</title>
-<path fill="none" stroke="#fff900" d="M1066.59,-595.33C1099.02,-598.49 1136.15,-602.11 1165.41,-604.97"/>
-<polygon fill="#fff900" stroke="#fff900" points="1165.12,-608.45 1175.41,-605.94 1165.79,-601.49 1165.12,-608.45"/>
+<path fill="none" stroke="#fff900" d="M1071.64,-2413.46C1102.73,-2416.36 1137.45,-2419.59 1165.15,-2422.17"/>
+<polygon fill="#fff900" stroke="#fff900" points="1165.12,-2425.68 1175.4,-2423.13 1165.77,-2418.71 1165.12,-2425.68"/>
 </g>
 <!-- proc~is_rational~3 -->
 <g id="call~~graph~~CallGraph_node256" class="node">
 <title>proc~is_rational~3</title>
-<g id="a_call~~graph~~CallGraph_node256"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1289,-560 1147,-560 1147,-536 1289,-536 1289,-560"/>
-<text text-anchor="middle" x="1218" y="-545.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
+<g id="a_call~~graph~~CallGraph_node256"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1294,-2580 1142,-2580 1142,-2556 1294,-2556 1294,-2580"/>
+<text text-anchor="middle" x="1218" y="-2565.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_scalar~3&#45;&gt;proc~is_rational~3 -->
 <g id="call~~graph~~CallGraph_edge113" class="edge">
 <title>proc~basis_scalar~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#fff900" d="M1059.16,-576C1084.24,-571.55 1112.89,-566.47 1138.83,-561.87"/>
-<polygon fill="#fff900" stroke="#fff900" points="1139.77,-565.25 1149,-560.06 1138.54,-558.36 1139.77,-565.25"/>
+<path fill="none" stroke="#fff900" d="M1070.35,-2418.06C1077.21,-2420.51 1083.87,-2423.46 1090,-2427 1141.96,-2457.02 1184.28,-2515.71 1204.37,-2547.07"/>
+<polygon fill="#fff900" stroke="#fff900" points="1201.6,-2549.24 1209.87,-2555.86 1207.53,-2545.53 1201.6,-2549.24"/>
 </g>
 <!-- proc~basis_vector&#45;&gt;interface~compute_tgc -->
 <g id="call~~graph~~CallGraph_edge114" class="edge">
 <title>proc~basis_vector&#45;&gt;interface~compute_tgc</title>
-<path fill="none" stroke="#fffd00" d="M1054.63,-6496.04C1066.46,-6498.7 1078.66,-6501.71 1090,-6505 1120.3,-6513.79 1153.73,-6526.28 1178.68,-6536.17"/>
-<polygon fill="#fffd00" stroke="#fffd00" points="1177.56,-6539.49 1188.14,-6539.96 1180.16,-6532.99 1177.56,-6539.49"/>
-</g>
-<!-- proc~basis_vector&#45;&gt;interface~ndgrid -->
-<g id="call~~graph~~CallGraph_edge115" class="edge">
-<title>proc~basis_vector&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#fffd00" d="M1072.27,-6476.29C1078.95,-6472.98 1085.03,-6468.64 1090,-6463 1152.68,-6391.91 1083.06,-6122.5 1126,-6038 1139.35,-6011.73 1165.57,-5990.45 1186.44,-5976.62"/>
-<polygon fill="#fffd00" stroke="#fffd00" points="1188.46,-5979.48 1195.01,-5971.16 1184.7,-5973.58 1188.46,-5979.48"/>
+<path fill="none" stroke="#fffd00" d="M1067.53,-6534.92C1099.64,-6531.93 1136.22,-6528.52 1165.15,-6525.83"/>
+<polygon fill="#fffd00" stroke="#fffd00" points="1165.81,-6529.28 1175.44,-6524.87 1165.16,-6522.31 1165.81,-6529.28"/>
 </g>
 <!-- proc~basis_vector&#45;&gt;proc~is_rational -->
-<g id="call~~graph~~CallGraph_edge116" class="edge">
+<g id="call~~graph~~CallGraph_edge115" class="edge">
 <title>proc~basis_vector&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#fffd00" d="M1052.68,-6471.97C1065.09,-6469.25 1078.01,-6466.21 1090,-6463 1118.03,-6455.51 1149.04,-6445.53 1173.39,-6437.3"/>
-<polygon fill="#fffd00" stroke="#fffd00" points="1174.72,-6440.54 1183.05,-6434 1172.46,-6433.92 1174.72,-6440.54"/>
+<path fill="none" stroke="#fffd00" d="M1067.54,-6530.91C1075.39,-6528.28 1083.04,-6525.02 1090,-6521 1141.96,-6490.98 1184.28,-6432.29 1204.37,-6400.93"/>
+<polygon fill="#fffd00" stroke="#fffd00" points="1207.53,-6402.47 1209.87,-6392.14 1201.6,-6398.76 1207.53,-6402.47"/>
 </g>
 <!-- proc~basis_vector~2&#45;&gt;interface~compute_tgc~2 -->
-<g id="call~~graph~~CallGraph_edge117" class="edge">
+<g id="call~~graph~~CallGraph_edge116" class="edge">
 <title>proc~basis_vector~2&#45;&gt;interface~compute_tgc~2</title>
-<path fill="none" stroke="#fcff00" d="M1072.27,-6045.52C1103.2,-6048.4 1137.63,-6051.61 1165.15,-6054.17"/>
-<polygon fill="#fcff00" stroke="#fcff00" points="1165.05,-6057.68 1175.33,-6055.12 1165.7,-6050.71 1165.05,-6057.68"/>
+<path fill="none" stroke="#fcff00" d="M1056.12,-5484.04C1090.76,-5490.49 1132.87,-5498.33 1165.32,-5504.37"/>
+<polygon fill="#fcff00" stroke="#fcff00" points="1165.02,-5507.88 1175.49,-5506.27 1166.3,-5501 1165.02,-5507.88"/>
 </g>
 <!-- proc~basis_vector~2&#45;&gt;interface~ndgrid -->
-<g id="call~~graph~~CallGraph_edge118" class="edge">
+<g id="call~~graph~~CallGraph_edge117" class="edge">
 <title>proc~basis_vector~2&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#fcff00" d="M1042.51,-6025.96C1057.9,-6021.94 1074.76,-6017.17 1090,-6012 1121.7,-6001.26 1156.74,-5986.4 1181.97,-5975.15"/>
-<polygon fill="#fcff00" stroke="#fcff00" points="1183.45,-5978.32 1191.13,-5971.03 1180.58,-5971.94 1183.45,-5978.32"/>
+<path fill="none" stroke="#fcff00" d="M1072.36,-5464.37C1079.02,-5461.04 1085.07,-5456.68 1090,-5451 1165.24,-5364.39 1059.98,-5029.82 1126,-4936 1138.69,-4917.97 1161.37,-4907.98 1180.91,-4902.49"/>
+<polygon fill="#fcff00" stroke="#fcff00" points="1181.93,-4905.84 1190.78,-4900.01 1180.23,-4899.05 1181.93,-4905.84"/>
 </g>
 <!-- proc~basis_vector~2&#45;&gt;proc~is_rational~2 -->
-<g id="call~~graph~~CallGraph_edge119" class="edge">
+<g id="call~~graph~~CallGraph_edge118" class="edge">
 <title>proc~basis_vector~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#fcff00" d="M1029.23,-6025.95C1051.13,-6016.8 1076.91,-6001.83 1090,-5979 1138.94,-5893.64 1098.01,-2531.33 1126,-2437 1140.5,-2388.12 1177.05,-2339.91 1199.17,-2313.84"/>
-<polygon fill="#fcff00" stroke="#fcff00" points="1201.9,-2316.04 1205.79,-2306.19 1196.6,-2311.46 1201.9,-2316.04"/>
+<path fill="none" stroke="#fcff00" d="M1072.39,-5463.75C1078.96,-5460.53 1084.98,-5456.36 1090,-5451 1166.12,-5369.69 1050.56,-5284.94 1126,-5203 1128.11,-5200.71 1130.42,-5198.64 1132.88,-5196.78"/>
+<polygon fill="#fcff00" stroke="#fcff00" points="1135.16,-5199.48 1141.78,-5191.21 1131.45,-5193.55 1135.16,-5199.48"/>
 </g>
 <!-- proc~basis_vector~3&#45;&gt;interface~compute_tgc~3 -->
-<g id="call~~graph~~CallGraph_edge120" class="edge">
+<g id="call~~graph~~CallGraph_edge119" class="edge">
 <title>proc~basis_vector~3&#45;&gt;interface~compute_tgc~3</title>
-<path fill="none" stroke="#f7ff00" d="M1067.53,-623.26C1099.64,-620.41 1136.22,-617.16 1165.15,-614.6"/>
-<polygon fill="#f7ff00" stroke="#f7ff00" points="1165.79,-618.06 1175.44,-613.69 1165.17,-611.08 1165.79,-618.06"/>
+<path fill="none" stroke="#f7ff00" d="M1072.27,-2440.48C1103.2,-2437.6 1137.63,-2434.39 1165.15,-2431.83"/>
+<polygon fill="#f7ff00" stroke="#f7ff00" points="1165.7,-2435.29 1175.33,-2430.88 1165.05,-2428.32 1165.7,-2435.29"/>
+</g>
+<!-- proc~basis_vector~3&#45;&gt;interface~ndgrid -->
+<g id="call~~graph~~CallGraph_edge120" class="edge">
+<title>proc~basis_vector~3&#45;&gt;interface~ndgrid</title>
+<path fill="none" stroke="#f7ff00" d="M1029.19,-2460.07C1051.08,-2469.23 1076.85,-2484.21 1090,-2507 1155.74,-2620.97 1043.31,-4772.66 1126,-4875 1138.96,-4891.04 1161.49,-4896.32 1180.89,-4897.58"/>
+<polygon fill="#f7ff00" stroke="#f7ff00" points="1180.87,-4901.08 1190.98,-4897.91 1181.1,-4894.09 1180.87,-4901.08"/>
 </g>
 <!-- proc~basis_vector~3&#45;&gt;proc~is_rational~3 -->
 <g id="call~~graph~~CallGraph_edge121" class="edge">
 <title>proc~basis_vector~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#f7ff00" d="M1060.87,-617.93C1070.78,-615.43 1080.75,-612.47 1090,-609 1107.14,-602.58 1109.64,-597.21 1126,-589 1143.22,-580.36 1162.64,-571.49 1179.11,-564.22"/>
-<polygon fill="#f7ff00" stroke="#f7ff00" points="1180.67,-567.36 1188.43,-560.14 1177.87,-560.95 1180.67,-567.36"/>
+<path fill="none" stroke="#f7ff00" d="M1051.66,-2460C1064.64,-2463.65 1078.04,-2468.26 1090,-2474 1131.14,-2493.75 1172.45,-2527.54 1196.33,-2548.77"/>
+<polygon fill="#f7ff00" stroke="#f7ff00" points="1194.26,-2551.61 1204.02,-2555.71 1198.95,-2546.41 1194.26,-2551.61"/>
 </g>
 <!-- proc~bincoeff -->
 <g id="call~~graph~~CallGraph_node64" class="node">
 <title>proc~bincoeff</title>
 <g id="a_call~~graph~~CallGraph_node64"><a xlink:href="../proc/bincoeff.html" xlink:title="bincoeff">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1246,-1776 1190,-1776 1190,-1752 1246,-1752 1246,-1776"/>
-<text text-anchor="middle" x="1218" y="-1761.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">bincoeff</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1246,-3911 1190,-3911 1190,-3887 1246,-3887 1246,-3911"/>
+<text text-anchor="middle" x="1218" y="-3896.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">bincoeff</text>
 </a>
 </g>
 </g>
@@ -4008,233 +4008,233 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node174" class="node">
 <title>proc~factln</title>
 <g id="a_call~~graph~~CallGraph_node174"><a xlink:href="../proc/factln.html" xlink:title="factln">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1454.5,-1776 1400.5,-1776 1400.5,-1752 1454.5,-1752 1454.5,-1776"/>
-<text text-anchor="middle" x="1427.5" y="-1761.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">factln</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1454.5,-3911 1400.5,-3911 1400.5,-3887 1454.5,-3887 1454.5,-3911"/>
+<text text-anchor="middle" x="1427.5" y="-3896.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">factln</text>
 </a>
 </g>
 </g>
 <!-- proc~bincoeff&#45;&gt;proc~factln -->
 <g id="call~~graph~~CallGraph_edge122" class="edge">
 <title>proc~bincoeff&#45;&gt;proc~factln</title>
-<path fill="none" stroke="#f3ff00" d="M1246.13,-1764C1283.01,-1764 1349.09,-1764 1390.21,-1764"/>
-<polygon fill="#f3ff00" stroke="#f3ff00" points="1390.35,-1767.5 1400.35,-1764 1390.35,-1760.5 1390.35,-1767.5"/>
+<path fill="none" stroke="#f3ff00" d="M1246.13,-3899C1283.01,-3899 1349.09,-3899 1390.21,-3899"/>
+<polygon fill="#f3ff00" stroke="#f3ff00" points="1390.35,-3902.5 1400.35,-3899 1390.35,-3895.5 1390.35,-3902.5"/>
 </g>
 <!-- proc~cmp_area -->
 <g id="call~~graph~~CallGraph_node65" class="node">
 <title>proc~cmp_area</title>
 <g id="a_call~~graph~~CallGraph_node65"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="411,-4375 261,-4375 261,-4351 411,-4351 411,-4375"/>
-<text text-anchor="middle" x="336" y="-4360.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="411,-4895 261,-4895 261,-4871 411,-4871 411,-4895"/>
+<text text-anchor="middle" x="336" y="-4880.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
 <g id="call~~graph~~CallGraph_edge123" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#efff00" d="M357.3,-4375.1C374.37,-4385.63 399.1,-4401.71 419,-4418 459.32,-4451.01 501.4,-4495.22 524.39,-4520.35"/>
-<polygon fill="#efff00" stroke="#efff00" points="521.84,-4522.75 531.16,-4527.8 527.03,-4518.04 521.84,-4522.75"/>
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#efff00" d="M411.01,-4883C429.12,-4883 448.51,-4883 466.68,-4883"/>
+<polygon fill="#efff00" stroke="#efff00" points="466.93,-4886.5 476.93,-4883 466.93,-4879.5 466.93,-4886.5"/>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~2 -->
+<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~3 -->
 <g id="call~~graph~~CallGraph_edge124" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#efff00" d="M411.17,-4365.98C484.64,-4368.93 597.06,-4373.45 674.31,-4376.56"/>
-<polygon fill="#efff00" stroke="#efff00" points="674.36,-4380.06 684.49,-4376.97 674.64,-4373.07 674.36,-4380.06"/>
+<title>proc~cmp_area&#45;&gt;proc~cmp_elem~3</title>
+<path fill="none" stroke="#efff00" d="M348.58,-4895.09C388.53,-4936.06 525.98,-5070.77 667,-5137 671.56,-5139.14 676.36,-5141.07 681.27,-5142.81"/>
+<polygon fill="#efff00" stroke="#efff00" points="680.22,-5146.15 690.81,-5145.92 682.39,-5139.5 680.22,-5146.15"/>
 </g>
 <!-- proc~cmp_degree -->
 <g id="call~~graph~~CallGraph_node66" class="node">
 <title>proc~cmp_degree</title>
-<g id="a_call~~graph~~CallGraph_node66"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="1509,-3525 1346,-3525 1346,-3501 1509,-3501 1509,-3525"/>
-<text text-anchor="middle" x="1427.5" y="-3510.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
+<g id="a_call~~graph~~CallGraph_node66"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="1504.5,-6043 1350.5,-6043 1350.5,-6019 1504.5,-6019 1504.5,-6043"/>
+<text text-anchor="middle" x="1427.5" y="-6028.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity -->
 <g id="call~~graph~~CallGraph_node210" class="node">
 <title>proc~get_multiplicity</title>
-<g id="a_call~~graph~~CallGraph_node210"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1723,-3525 1545,-3525 1545,-3501 1723,-3501 1723,-3525"/>
-<text text-anchor="middle" x="1634" y="-3510.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
+<g id="a_call~~graph~~CallGraph_node210"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1718.5,-5736 1549.5,-5736 1549.5,-5712 1718.5,-5712 1718.5,-5736"/>
+<text text-anchor="middle" x="1634" y="-5721.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="call~~graph~~CallGraph_edge125" class="edge">
 <title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#ebff00" d="M1509.03,-3513C1517.47,-3513 1526.11,-3513 1534.71,-3513"/>
-<polygon fill="#ebff00" stroke="#ebff00" points="1534.78,-3516.5 1544.78,-3513 1534.78,-3509.5 1534.78,-3516.5"/>
+<path fill="none" stroke="#ebff00" d="M1429.58,-6019C1434.19,-5974.99 1456.3,-5821.11 1545,-5745 1546.52,-5743.7 1548.11,-5742.47 1549.75,-5741.32"/>
+<polygon fill="#ebff00" stroke="#ebff00" points="1551.61,-5744.28 1558.39,-5736.14 1548.01,-5738.28 1551.61,-5744.28"/>
 </g>
 <!-- proc~cmp_degreeface -->
 <g id="call~~graph~~CallGraph_node67" class="node">
 <title>proc~cmp_degreeface</title>
 <g id="a_call~~graph~~CallGraph_node67"><a xlink:href="../proc/cmp_degreeface.html" xlink:title="nurbs_volume%cmp_degreeFace">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="855,-3214 667,-3214 667,-3190 855,-3190 855,-3214"/>
-<text text-anchor="middle" x="761" y="-3199.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degreeFace</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="855,-3768 667,-3768 667,-3744 855,-3744 855,-3768"/>
+<text text-anchor="middle" x="761" y="-3753.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degreeFace</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~2 -->
 <g id="call~~graph~~CallGraph_node68" class="node">
 <title>proc~cmp_degree~2</title>
-<g id="a_call~~graph~~CallGraph_node68"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="1509,-2554 1346,-2554 1346,-2530 1509,-2530 1509,-2554"/>
-<text text-anchor="middle" x="1427.5" y="-2539.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
+<g id="a_call~~graph~~CallGraph_node68"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="1509,-4264 1346,-4264 1346,-4240 1509,-4240 1509,-4264"/>
+<text text-anchor="middle" x="1427.5" y="-4249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity~2 -->
 <g id="call~~graph~~CallGraph_node211" class="node">
 <title>proc~get_multiplicity~2</title>
-<g id="a_call~~graph~~CallGraph_node211"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1723,-2882 1545,-2882 1545,-2858 1723,-2858 1723,-2882"/>
-<text text-anchor="middle" x="1634" y="-2867.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
+<g id="a_call~~graph~~CallGraph_node211"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1723,-4264 1545,-4264 1545,-4240 1723,-4240 1723,-4264"/>
+<text text-anchor="middle" x="1634" y="-4249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="call~~graph~~CallGraph_edge126" class="edge">
 <title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
-<path fill="none" stroke="#e2ff00" d="M1470.63,-2554.07C1484.89,-2560.21 1499.59,-2569.16 1509,-2582 1569.93,-2665.08 1489.57,-2724.15 1545,-2811 1556.71,-2829.35 1576.41,-2843.35 1594.2,-2853.09"/>
-<polygon fill="#e2ff00" stroke="#e2ff00" points="1592.79,-2856.3 1603.28,-2857.8 1596.01,-2850.09 1592.79,-2856.3"/>
+<path fill="none" stroke="#e2ff00" d="M1509.03,-4252C1517.47,-4252 1526.11,-4252 1534.71,-4252"/>
+<polygon fill="#e2ff00" stroke="#e2ff00" points="1534.78,-4255.5 1544.78,-4252 1534.78,-4248.5 1534.78,-4255.5"/>
 </g>
 <!-- proc~cmp_degree~3 -->
 <g id="call~~graph~~CallGraph_node69" class="node">
 <title>proc~cmp_degree~3</title>
-<g id="a_call~~graph~~CallGraph_node69"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="1504.5,-862 1350.5,-862 1350.5,-838 1504.5,-838 1504.5,-862"/>
-<text text-anchor="middle" x="1427.5" y="-847.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
+<g id="a_call~~graph~~CallGraph_node69"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="1509,-3188 1346,-3188 1346,-3164 1509,-3164 1509,-3188"/>
+<text text-anchor="middle" x="1427.5" y="-3173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity~3 -->
 <g id="call~~graph~~CallGraph_node212" class="node">
 <title>proc~get_multiplicity~3</title>
-<g id="a_call~~graph~~CallGraph_node212"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1718.5,-2386 1549.5,-2386 1549.5,-2362 1718.5,-2362 1718.5,-2386"/>
-<text text-anchor="middle" x="1634" y="-2371.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
+<g id="a_call~~graph~~CallGraph_node212"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1723,-3276 1545,-3276 1545,-3252 1723,-3252 1723,-3276"/>
+<text text-anchor="middle" x="1634" y="-3261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="call~~graph~~CallGraph_edge127" class="edge">
 <title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#deff00" d="M1430.15,-862.27C1448.04,-995.61 1606.23,-2174.5 1630.01,-2351.73"/>
-<polygon fill="#deff00" stroke="#deff00" points="1626.56,-2352.29 1631.35,-2361.74 1633.49,-2351.36 1626.56,-2352.29"/>
+<path fill="none" stroke="#deff00" d="M1481.91,-3188C1491.07,-3190.61 1500.4,-3193.61 1509,-3197 1543.52,-3210.6 1580.65,-3231.59 1605.19,-3246.45"/>
+<polygon fill="#deff00" stroke="#deff00" points="1603.59,-3249.58 1613.94,-3251.82 1607.25,-3243.61 1603.59,-3249.58"/>
 </g>
 <!-- proc~cmp_elem&#45;&gt;interface~elemconn_cn -->
 <g id="call~~graph~~CallGraph_edge128" class="edge">
 <title>proc~cmp_elem&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#daff00" d="M837.64,-4414.35C844.24,-4411.06 850.21,-4406.71 855,-4401 910.03,-4335.37 835.58,-3696.3 891,-3631 902.3,-3617.68 919.78,-3611.56 936.9,-3609.05"/>
-<polygon fill="#daff00" stroke="#daff00" points="937.32,-3612.52 946.88,-3607.96 936.56,-3605.56 937.32,-3612.52"/>
+<path fill="none" stroke="#daff00" d="M784.23,-5465.79C825.02,-5443.37 911.92,-5395.63 958.49,-5370.04"/>
+<polygon fill="#daff00" stroke="#daff00" points="960.44,-5372.96 967.52,-5365.08 957.07,-5366.83 960.44,-5372.96"/>
 </g>
 <!-- proc~cmp_elem&#45;&gt;interface~unique -->
 <g id="call~~graph~~CallGraph_edge129" class="edge">
 <title>proc~cmp_elem&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#daff00" d="M837.62,-4414.34C844.23,-4411.05 850.21,-4406.7 855,-4401 959.23,-4277.02 786.02,-3796.35 891,-3673 906,-3655.38 931.81,-3650.36 953.25,-3649.63"/>
-<polygon fill="#daff00" stroke="#daff00" points="953.38,-3653.13 963.36,-3649.58 953.34,-3646.13 953.38,-3653.13"/>
+<path fill="none" stroke="#daff00" d="M819.11,-5465.95C861.16,-5457.08 917.07,-5445.28 953.18,-5437.66"/>
+<polygon fill="#daff00" stroke="#daff00" points="954.19,-5441.03 963.26,-5435.54 952.75,-5434.18 954.19,-5441.03"/>
 </g>
 <!-- proc~cmp_elem&#45;&gt;proc~get_multiplicity -->
 <g id="call~~graph~~CallGraph_edge130" class="edge">
 <title>proc~cmp_elem&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#daff00" d="M780.11,-4434.22C802.49,-4450.53 839.52,-4481.72 855,-4519 888.71,-4600.19 828.13,-6039.55 891,-6101 1024.34,-6231.34 1128.74,-6123.69 1310,-6080 1402.51,-6057.7 1453.61,-6078.37 1509,-6001 1584.97,-5894.88 1627.93,-3776.28 1632.58,-3535.26"/>
-<polygon fill="#daff00" stroke="#daff00" points="1636.08,-3535.29 1632.77,-3525.22 1629.08,-3535.15 1636.08,-3535.29"/>
+<path fill="none" stroke="#daff00" d="M786.25,-5490.16C811.82,-5502.63 853.52,-5522.01 891,-5535 1131.53,-5618.4 1427.44,-5682.79 1561.26,-5709.94"/>
+<polygon fill="#daff00" stroke="#daff00" points="1560.88,-5713.43 1571.38,-5711.98 1562.27,-5706.57 1560.88,-5713.43"/>
 </g>
 <!-- proc~cmp_elem_xc_vis -->
 <g id="call~~graph~~CallGraph_node71" class="node">
 <title>proc~cmp_elem_xc_vis</title>
-<g id="a_call~~graph~~CallGraph_node71"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1086,-3418 895,-3418 895,-3394 1086,-3394 1086,-3418"/>
-<text text-anchor="middle" x="990.5" y="-3403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
+<g id="a_call~~graph~~CallGraph_node71"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1081,-5984 900,-5984 900,-5960 1081,-5960 1081,-5984"/>
+<text text-anchor="middle" x="990.5" y="-5969.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="call~~graph~~CallGraph_edge131" class="edge">
 <title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#d6ff00" d="M1028.35,-3393.93C1050.22,-3384.72 1076.27,-3369.68 1090,-3347 1161.5,-3228.95 1047.24,-2840.33 1126,-2727 1135.21,-2713.75 1149.83,-2704.84 1164.69,-2698.87"/>
-<polygon fill="#d6ff00" stroke="#d6ff00" points="1166.21,-2702.04 1174.43,-2695.36 1163.83,-2695.46 1166.21,-2702.04"/>
+<path fill="none" stroke="#d6ff00" d="M1080.56,-5959.79C1084.03,-5957.28 1087.21,-5954.37 1090,-5951 1150.9,-5877.34 1085.16,-4317.41 1126,-4231 1138.37,-4204.83 1164.17,-4184.07 1185.15,-4170.56"/>
+<polygon fill="#d6ff00" stroke="#d6ff00" points="1187.13,-4173.46 1193.8,-4165.23 1183.45,-4167.5 1187.13,-4173.46"/>
 </g>
 <!-- proc~cmp_elem_xc_vis~2 -->
 <g id="call~~graph~~CallGraph_node72" class="node">
 <title>proc~cmp_elem_xc_vis~2</title>
-<g id="a_call~~graph~~CallGraph_node72"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1086,-2676 895,-2676 895,-2652 1086,-2652 1086,-2676"/>
-<text text-anchor="middle" x="990.5" y="-2661.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
+<g id="a_call~~graph~~CallGraph_node72"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1086,-4224 895,-4224 895,-4200 1086,-4200 1086,-4224"/>
+<text text-anchor="middle" x="990.5" y="-4209.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="call~~graph~~CallGraph_edge132" class="edge">
 <title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#d1ff00" d="M1086.15,-2673.65C1112.92,-2676.38 1141.1,-2679.26 1164.41,-2681.64"/>
-<polygon fill="#d1ff00" stroke="#d1ff00" points="1164.12,-2685.12 1174.42,-2682.66 1164.83,-2678.16 1164.12,-2685.12"/>
+<path fill="none" stroke="#d1ff00" d="M1037.41,-4199.99C1074.17,-4190.37 1125.77,-4176.87 1164.24,-4166.81"/>
+<polygon fill="#d1ff00" stroke="#d1ff00" points="1165.42,-4170.11 1174.21,-4164.19 1163.65,-4163.34 1165.42,-4170.11"/>
 </g>
 <!-- proc~cmp_elem_xc_vis~3 -->
 <g id="call~~graph~~CallGraph_node73" class="node">
 <title>proc~cmp_elem_xc_vis~3</title>
-<g id="a_call~~graph~~CallGraph_node73"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1081,-1085 900,-1085 900,-1061 1081,-1061 1081,-1085"/>
-<text text-anchor="middle" x="990.5" y="-1070.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xc_vis</text>
+<g id="a_call~~graph~~CallGraph_node73"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1086,-3394 895,-3394 895,-3370 1086,-3370 1086,-3394"/>
+<text text-anchor="middle" x="990.5" y="-3379.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="call~~graph~~CallGraph_edge133" class="edge">
 <title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#cdff00" d="M1080.55,-1085.22C1084.03,-1087.73 1087.21,-1090.63 1090,-1094 1145.06,-1160.45 1077.99,-2575.29 1126,-2647 1134.98,-2660.41 1149.54,-2669.36 1164.41,-2675.32"/>
-<polygon fill="#cdff00" stroke="#cdff00" points="1163.57,-2678.74 1174.17,-2678.82 1165.94,-2672.15 1163.57,-2678.74"/>
+<path fill="none" stroke="#cdff00" d="M1079.94,-3394.08C1083.63,-3396.62 1087.02,-3399.57 1090,-3403 1127.76,-3446.48 1113.38,-3863.82 1126,-3920 1144.25,-4001.25 1186.21,-4091.5 1206.13,-4131.69"/>
+<polygon fill="#cdff00" stroke="#cdff00" points="1203.08,-4133.42 1210.69,-4140.79 1209.34,-4130.28 1203.08,-4133.42"/>
 </g>
 <!-- proc~cmp_elem_xg_vis -->
 <g id="call~~graph~~CallGraph_node74" class="node">
 <title>proc~cmp_elem_xg_vis</title>
-<g id="a_call~~graph~~CallGraph_node74"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1086.5,-3338 894.5,-3338 894.5,-3314 1086.5,-3314 1086.5,-3338"/>
-<text text-anchor="middle" x="990.5" y="-3323.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
+<g id="a_call~~graph~~CallGraph_node74"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1081.5,-5942 899.5,-5942 899.5,-5918 1081.5,-5918 1081.5,-5942"/>
+<text text-anchor="middle" x="990.5" y="-5927.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="call~~graph~~CallGraph_edge134" class="edge">
 <title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#c9ff00" d="M1079.97,-3313.94C1083.65,-3311.4 1087.03,-3308.44 1090,-3305 1174.03,-3207.53 1052.34,-2832.53 1126,-2727 1135.24,-2713.77 1149.87,-2704.86 1164.72,-2698.89"/>
-<polygon fill="#c9ff00" stroke="#c9ff00" points="1166.24,-2702.07 1174.46,-2695.38 1163.87,-2695.48 1166.24,-2702.07"/>
+<path fill="none" stroke="#c9ff00" d="M1080.56,-5917.79C1084.03,-5915.28 1087.21,-5912.37 1090,-5909 1149.43,-5837.15 1086.13,-4315.29 1126,-4231 1138.38,-4204.83 1164.18,-4184.07 1185.16,-4170.56"/>
+<polygon fill="#c9ff00" stroke="#c9ff00" points="1187.13,-4173.46 1193.8,-4165.23 1183.45,-4167.5 1187.13,-4173.46"/>
 </g>
 <!-- proc~cmp_elem_xg_vis~2 -->
 <g id="call~~graph~~CallGraph_node75" class="node">
 <title>proc~cmp_elem_xg_vis~2</title>
-<g id="a_call~~graph~~CallGraph_node75"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1086.5,-2718 894.5,-2718 894.5,-2694 1086.5,-2694 1086.5,-2718"/>
-<text text-anchor="middle" x="990.5" y="-2703.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
+<g id="a_call~~graph~~CallGraph_node75"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1086.5,-4150 894.5,-4150 894.5,-4126 1086.5,-4126 1086.5,-4150"/>
+<text text-anchor="middle" x="990.5" y="-4135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="call~~graph~~CallGraph_edge135" class="edge">
 <title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#c5ff00" d="M1086.81,-2697.97C1113.28,-2695.74 1141.07,-2693.4 1164.15,-2691.45"/>
-<polygon fill="#c5ff00" stroke="#c5ff00" points="1164.73,-2694.92 1174.4,-2690.59 1164.14,-2687.94 1164.73,-2694.92"/>
+<path fill="none" stroke="#c5ff00" d="M1086.81,-4144.34C1113.28,-4146.1 1141.07,-4147.95 1164.15,-4149.48"/>
+<polygon fill="#c5ff00" stroke="#c5ff00" points="1164.19,-4152.99 1174.4,-4150.17 1164.65,-4146.01 1164.19,-4152.99"/>
 </g>
 <!-- proc~cmp_elem_xg_vis~3 -->
 <g id="call~~graph~~CallGraph_node76" class="node">
 <title>proc~cmp_elem_xg_vis~3</title>
-<g id="a_call~~graph~~CallGraph_node76"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1081.5,-1043 899.5,-1043 899.5,-1019 1081.5,-1019 1081.5,-1043"/>
-<text text-anchor="middle" x="990.5" y="-1028.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xg_vis</text>
+<g id="a_call~~graph~~CallGraph_node76"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1086.5,-3436 894.5,-3436 894.5,-3412 1086.5,-3412 1086.5,-3436"/>
+<text text-anchor="middle" x="990.5" y="-3421.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="call~~graph~~CallGraph_edge136" class="edge">
 <title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#c1ff00" d="M1080.56,-1043.21C1084.03,-1045.72 1087.21,-1048.63 1090,-1052 1146.53,-1120.26 1076.72,-2573.33 1126,-2647 1134.97,-2660.41 1149.53,-2669.36 1164.4,-2675.32"/>
-<polygon fill="#c1ff00" stroke="#c1ff00" points="1163.57,-2678.74 1174.16,-2678.83 1165.93,-2672.15 1163.57,-2678.74"/>
+<path fill="none" stroke="#c1ff00" d="M1079.91,-3436.1C1083.61,-3438.63 1087.01,-3441.58 1090,-3445 1124.83,-3484.86 1114.24,-3868.39 1126,-3920 1144.5,-4001.19 1186.34,-4091.48 1206.18,-4131.68"/>
+<polygon fill="#c1ff00" stroke="#c1ff00" points="1203.12,-4133.4 1210.72,-4140.79 1209.39,-4130.28 1203.12,-4133.4"/>
 </g>
 <!-- proc~cmp_elemface -->
 <g id="call~~graph~~CallGraph_node83" class="node">
 <title>proc~cmp_elemface</title>
 <g id="a_call~~graph~~CallGraph_node83"><a xlink:href="../proc/cmp_elemface.html" xlink:title="nurbs_volume%cmp_elemFace">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="850,-3172 672,-3172 672,-3148 850,-3148 850,-3172"/>
-<text text-anchor="middle" x="761" y="-3157.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elemFace</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="850,-3726 672,-3726 672,-3702 850,-3702 850,-3726"/>
+<text text-anchor="middle" x="761" y="-3711.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elemFace</text>
 </a>
 </g>
 </g>
@@ -4242,8 +4242,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node84" class="node">
 <title>proc~cmp_elemface_xc_vis</title>
 <g id="a_call~~graph~~CallGraph_node84"><a xlink:href="../proc/cmp_elemface_xc_vis.html" xlink:title="nurbs_volume%cmp_elemFace_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="216.5,-6438 0.5,-6438 0.5,-6414 216.5,-6414 216.5,-6438"/>
-<text text-anchor="middle" x="108.5" y="-6423.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elemFace_Xc_vis</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="216.5,-6808 0.5,-6808 0.5,-6784 216.5,-6784 216.5,-6808"/>
+<text text-anchor="middle" x="108.5" y="-6793.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elemFace_Xc_vis</text>
 </a>
 </g>
 </g>
@@ -4251,668 +4251,668 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node85" class="node">
 <title>proc~cmp_elemface_xg_vis</title>
 <g id="a_call~~graph~~CallGraph_node85"><a xlink:href="../proc/cmp_elemface_xg_vis.html" xlink:title="nurbs_volume%cmp_elemFace_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="217,-6480 0,-6480 0,-6456 217,-6456 217,-6480"/>
-<text text-anchor="middle" x="108.5" y="-6465.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elemFace_Xg_vis</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="217,-6850 0,-6850 0,-6826 217,-6826 217,-6850"/>
+<text text-anchor="middle" x="108.5" y="-6835.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elemFace_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~2&#45;&gt;interface~elemconn_cn -->
 <g id="call~~graph~~CallGraph_edge137" class="edge">
 <title>proc~cmp_elem~2&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#96ff00" d="M837.79,-4368.14C844.37,-4364.52 850.29,-4359.89 855,-4354 955.4,-4228.31 786.72,-3753.49 891,-3631 902.32,-3617.7 919.81,-3611.58 936.92,-3609.07"/>
-<polygon fill="#96ff00" stroke="#96ff00" points="937.34,-3612.54 946.9,-3607.97 936.58,-3605.58 937.34,-3612.54"/>
+<path fill="none" stroke="#96ff00" d="M837.75,-5357.67C870.24,-5356.67 907.41,-5355.53 936.82,-5354.62"/>
+<polygon fill="#96ff00" stroke="#96ff00" points="937,-5358.12 946.89,-5354.31 936.78,-5351.12 937,-5358.12"/>
 </g>
 <!-- proc~cmp_elem~2&#45;&gt;interface~unique -->
 <g id="call~~graph~~CallGraph_edge138" class="edge">
 <title>proc~cmp_elem~2&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#96ff00" d="M837.78,-4368.13C844.35,-4364.51 850.28,-4359.89 855,-4354 949.76,-4235.74 792.59,-3788.24 891,-3673 906.03,-3655.4 931.84,-3650.39 953.27,-3649.65"/>
-<polygon fill="#96ff00" stroke="#96ff00" points="953.4,-3653.15 963.38,-3649.59 953.36,-3646.15 953.4,-3653.15"/>
+<path fill="none" stroke="#96ff00" d="M806.58,-5372.04C821.96,-5376.31 839.28,-5381.23 855,-5386 888.57,-5396.18 926.52,-5408.69 953.53,-5417.76"/>
+<polygon fill="#96ff00" stroke="#96ff00" points="952.72,-5421.18 963.32,-5421.06 954.96,-5414.55 952.72,-5421.18"/>
 </g>
 <!-- proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="call~~graph~~CallGraph_edge139" class="edge">
 <title>proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2</title>
-<path fill="none" stroke="#96ff00" d="M835.22,-4367.93C842.83,-4363.97 849.71,-4358.78 855,-4352 907.22,-4285.1 829.59,-3647.58 891,-3589 955,-3527.95 1002.08,-3579.35 1090,-3589 1106.29,-3590.79 1109.71,-3595.21 1126,-3597 1207.29,-3605.92 1229.18,-3609.49 1310,-3597 1401.68,-3582.83 1447.52,-3603.48 1509,-3534 1596.54,-3435.07 1626.04,-2996.01 1631.85,-2892.1"/>
-<polygon fill="#96ff00" stroke="#96ff00" points="1635.35,-2892.29 1632.4,-2882.11 1628.36,-2891.91 1635.35,-2892.29"/>
+<path fill="none" stroke="#96ff00" d="M816.9,-5347.98C839.8,-5342.99 866.68,-5337.17 891,-5332 995.35,-5309.8 1021.53,-5304.68 1126,-5283 1207.76,-5266.03 1241.07,-5292.13 1310,-5245 1444.23,-5153.23 1458.08,-5092.42 1509,-4938 1590.02,-4692.29 1449.11,-4597.29 1545,-4357 1558.99,-4321.94 1589.46,-4289.99 1610.6,-4270.77"/>
+<polygon fill="#96ff00" stroke="#96ff00" points="1613.02,-4273.3 1618.19,-4264.05 1608.38,-4268.06 1613.02,-4273.3"/>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;interface~elemconn_cn -->
 <g id="call~~graph~~CallGraph_edge140" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#92ff00" d="M822.94,-3681.95C834.04,-3678.38 845.2,-3673.82 855,-3668 874.73,-3656.29 870.92,-3642.09 891,-3631 904.94,-3623.3 921.42,-3618.43 936.88,-3615.33"/>
-<polygon fill="#92ff00" stroke="#92ff00" points="937.62,-3618.76 946.85,-3613.55 936.39,-3611.87 937.62,-3618.76"/>
+<path fill="none" stroke="#92ff00" d="M773.5,-5170.09C800.26,-5198.11 866.29,-5266.69 891,-5287 913.07,-5305.13 940.15,-5323 960.33,-5335.56"/>
+<polygon fill="#92ff00" stroke="#92ff00" points="958.72,-5338.68 969.07,-5340.94 962.39,-5332.72 958.72,-5338.68"/>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;interface~unique -->
 <g id="call~~graph~~CallGraph_edge141" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#92ff00" d="M827.19,-3681.96C868.24,-3674.39 919.68,-3664.89 953.52,-3658.64"/>
-<polygon fill="#92ff00" stroke="#92ff00" points="954.22,-3662.07 963.42,-3656.81 952.95,-3655.19 954.22,-3662.07"/>
+<path fill="none" stroke="#92ff00" d="M777.5,-5170.11C798.09,-5187 834.28,-5219.55 855,-5255 882.89,-5302.7 856.52,-5330.82 891,-5374 907.18,-5394.26 932.81,-5408.51 953.87,-5417.56"/>
+<polygon fill="#92ff00" stroke="#92ff00" points="952.6,-5420.81 963.18,-5421.35 955.24,-5414.33 952.6,-5420.81"/>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="call~~graph~~CallGraph_edge142" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#92ff00" d="M794.38,-3681.86C815.14,-3672.34 840.77,-3656.99 855,-3635 915.98,-3540.75 813.46,-3466.17 891,-3385 953.2,-3319.89 1012.63,-3393.05 1090,-3347 1111.71,-3334.08 1104.39,-3316.09 1126,-3303 1197.43,-3259.76 1246.29,-3318.98 1310,-3265 1497.23,-3106.38 1451.89,-2988.64 1509,-2750 1527.46,-2672.88 1492.79,-2454.68 1545,-2395 1545.75,-2394.14 1546.53,-2393.32 1547.33,-2392.52"/>
-<polygon fill="#92ff00" stroke="#92ff00" points="1549.62,-2395.17 1555.21,-2386.17 1545.23,-2389.72 1549.62,-2395.17"/>
+<path fill="none" stroke="#92ff00" d="M837.82,-5149.91C844.29,-5146.68 850.19,-5142.47 855,-5137 912.14,-5071.93 831.24,-4811.66 891,-4749 955.9,-4680.95 1230.11,-4739.58 1310,-4690 1443.13,-4607.38 1454.64,-4545.95 1509,-4399 1549.13,-4290.51 1619.17,-3436.26 1631.21,-3286.4"/>
+<polygon fill="#92ff00" stroke="#92ff00" points="1634.72,-3286.4 1632.03,-3276.15 1627.75,-3285.84 1634.72,-3286.4"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="call~~graph~~CallGraph_node88" class="node">
 <title>proc~cmp_length</title>
 <g id="a_call~~graph~~CallGraph_node88"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="411,-2965 261,-2965 261,-2941 411,-2941 411,-2965"/>
-<text text-anchor="middle" x="336" y="-2950.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="411,-5749 261,-5749 261,-5725 411,-5725 411,-5749"/>
+<text text-anchor="middle" x="336" y="-5734.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="call~~graph~~CallGraph_edge143" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#8eff00" d="M411.01,-2953C430.84,-2953 452.21,-2953 471.82,-2953"/>
-<polygon fill="#8eff00" stroke="#8eff00" points="471.9,-2956.5 481.9,-2953 471.9,-2949.5 471.9,-2956.5"/>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#8eff00" d="M411.01,-5737C430.84,-5737 452.21,-5737 471.82,-5737"/>
+<polygon fill="#8eff00" stroke="#8eff00" points="471.9,-5740.5 481.9,-5737 471.9,-5733.5 471.9,-5740.5"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~cmp_elem~3 -->
+<!-- proc~cmp_length&#45;&gt;proc~cmp_elem -->
 <g id="call~~graph~~CallGraph_edge144" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#8eff00" d="M338.86,-2965.15C347.05,-3016.42 382.67,-3219.44 455,-3370 525.23,-3516.18 534.7,-3573.2 667,-3667 673.13,-3671.35 679.95,-3675 687.04,-3678.06"/>
-<polygon fill="#8eff00" stroke="#8eff00" points="686.24,-3681.51 696.83,-3681.89 688.79,-3674.99 686.24,-3681.51"/>
+<title>proc~cmp_length&#45;&gt;proc~cmp_elem</title>
+<path fill="none" stroke="#8eff00" d="M350.38,-5724.91C393.22,-5686.84 532.08,-5568.13 667,-5504 675.86,-5499.79 685.52,-5496.15 695.17,-5493.03"/>
+<polygon fill="#8eff00" stroke="#8eff00" points="696.23,-5496.36 704.77,-5490.09 694.18,-5489.67 696.23,-5496.36"/>
 </g>
 <!-- proc~cmp_nc -->
 <g id="call~~graph~~CallGraph_node89" class="node">
 <title>proc~cmp_nc</title>
-<g id="a_call~~graph~~CallGraph_node89"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="1497,-3462 1358,-3462 1358,-3438 1497,-3438 1497,-3462"/>
-<text text-anchor="middle" x="1427.5" y="-3447.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
+<g id="a_call~~graph~~CallGraph_node89"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_curve%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="1698.5,-2902 1569.5,-2902 1569.5,-2878 1698.5,-2878 1698.5,-2902"/>
+<text text-anchor="middle" x="1634" y="-2887.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_nc</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
 <g id="call~~graph~~CallGraph_edge145" class="edge">
 <title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#8aff00" d="M1442.71,-3437.73C1490.85,-3395.3 1648.86,-3248.79 1723,-3092 1802.33,-2924.24 1816.81,-2694.65 1819.43,-2623.16"/>
-<polygon fill="#8aff00" stroke="#8aff00" points="1822.93,-2623.19 1819.75,-2613.08 1815.93,-2622.96 1822.93,-2623.19"/>
+<path fill="none" stroke="#8aff00" d="M1698.84,-2895.39C1708,-2898.76 1716.51,-2903.74 1723,-2911 1775.92,-2970.23 1811.87,-3558.97 1818.78,-3680.95"/>
+<polygon fill="#8aff00" stroke="#8aff00" points="1815.29,-3681.19 1819.35,-3690.98 1822.28,-3680.8 1815.29,-3681.19"/>
 </g>
 <!-- proc~cmp_nc~2 -->
 <g id="call~~graph~~CallGraph_node90" class="node">
 <title>proc~cmp_nc~2</title>
-<g id="a_call~~graph~~CallGraph_node90"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="1497,-2512 1358,-2512 1358,-2488 1497,-2488 1497,-2512"/>
-<text text-anchor="middle" x="1427.5" y="-2497.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+<g id="a_call~~graph~~CallGraph_node90"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="1497,-4306 1358,-4306 1358,-4282 1497,-4282 1497,-4306"/>
+<text text-anchor="middle" x="1427.5" y="-4291.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
 <g id="call~~graph~~CallGraph_edge146" class="edge">
 <title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#85ff00" d="M1492.1,-2512C1571.97,-2527.19 1701.26,-2552.2 1723,-2559 1744.78,-2565.81 1768.28,-2575.91 1786.7,-2584.5"/>
-<polygon fill="#85ff00" stroke="#85ff00" points="1785.29,-2587.71 1795.83,-2588.83 1788.29,-2581.38 1785.29,-2587.71"/>
+<path fill="none" stroke="#85ff00" d="M1473.42,-4306.06C1537.48,-4320.27 1654.85,-4334.82 1723,-4273 1805.88,-4197.82 1817.97,-3821.31 1819.71,-3725.3"/>
+<polygon fill="#85ff00" stroke="#85ff00" points="1823.22,-3725.08 1819.88,-3715.03 1816.22,-3724.97 1823.22,-3725.08"/>
 </g>
 <!-- proc~cmp_nc~3 -->
 <g id="call~~graph~~CallGraph_node91" class="node">
 <title>proc~cmp_nc~3</title>
-<g id="a_call~~graph~~CallGraph_node91"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_curve%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="1698.5,-2802 1569.5,-2802 1569.5,-2778 1698.5,-2778 1698.5,-2802"/>
-<text text-anchor="middle" x="1634" y="-2787.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_nc</text>
+<g id="a_call~~graph~~CallGraph_node91"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="1497,-3230 1358,-3230 1358,-3206 1497,-3206 1497,-3230"/>
+<text text-anchor="middle" x="1427.5" y="-3215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="call~~graph~~CallGraph_edge147" class="edge">
 <title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#81ff00" d="M1698.84,-2781.36C1707.48,-2778.36 1715.82,-2774.35 1723,-2769 1773.38,-2731.44 1801.85,-2659.39 1813.58,-2623.07"/>
-<polygon fill="#81ff00" stroke="#81ff00" points="1816.95,-2624.02 1816.57,-2613.43 1810.27,-2621.95 1816.95,-2624.02"/>
+<path fill="none" stroke="#81ff00" d="M1445.86,-3230.11C1467.95,-3245 1507.72,-3270.13 1545,-3285 1620.6,-3315.15 1664.99,-3270.92 1723,-3328 1774.41,-3378.59 1807.77,-3607.72 1817.24,-3680.64"/>
+<polygon fill="#81ff00" stroke="#81ff00" points="1813.81,-3681.48 1818.55,-3690.95 1820.76,-3680.59 1813.81,-3681.48"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="call~~graph~~CallGraph_node92" class="node">
 <title>proc~cmp_volume</title>
 <g id="a_call~~graph~~CallGraph_node92"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="419,-4451 253,-4451 253,-4427 419,-4427 419,-4451"/>
-<text text-anchor="middle" x="336" y="-4436.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="419,-5268 253,-5268 253,-5244 419,-5244 419,-5268"/>
+<text text-anchor="middle" x="336" y="-5253.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
 <g id="call~~graph~~CallGraph_edge148" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#7dff00" d="M338.77,-4451.08C357.22,-4576.79 513.98,-5645.05 538.72,-5813.64"/>
-<polygon fill="#7dff00" stroke="#7dff00" points="535.27,-5814.23 540.18,-5823.62 542.19,-5813.21 535.27,-5814.23"/>
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#7dff00" d="M419.2,-5256C434.92,-5256 451.3,-5256 466.78,-5256"/>
+<polygon fill="#7dff00" stroke="#7dff00" points="466.81,-5259.5 476.81,-5256 466.81,-5252.5 466.81,-5259.5"/>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem -->
+<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem~2 -->
 <g id="call~~graph~~CallGraph_edge149" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#7dff00" d="M419.06,-4435.7C492.37,-4432.76 599.4,-4428.45 673.92,-4425.46"/>
-<polygon fill="#7dff00" stroke="#7dff00" points="674.36,-4428.94 684.21,-4425.05 674.08,-4421.95 674.36,-4428.94"/>
+<title>proc~cmp_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#7dff00" d="M383.37,-5268.04C447.14,-5284.51 565.58,-5314.8 667,-5339 676.2,-5341.2 685.93,-5343.46 695.49,-5345.65"/>
+<polygon fill="#7dff00" stroke="#7dff00" points="694.84,-5349.09 705.36,-5347.9 696.39,-5342.26 694.84,-5349.09"/>
 </g>
 <!-- proc~cmp_xg -->
 <g id="call~~graph~~CallGraph_node93" class="node">
 <title>proc~cmp_xg</title>
-<g id="a_call~~graph~~CallGraph_node93"><a xlink:href="../proc/cmp_xg.html" xlink:title="nurbs_volume%cmp_Xg">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="831,-6374 691,-6374 691,-6350 831,-6350 831,-6374"/>
-<text text-anchor="middle" x="761" y="-6359.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_Xg</text>
+<g id="a_call~~graph~~CallGraph_node93"><a xlink:href="../proc/cmp_xg.html" xlink:title="nurbs_curve%cmp_Xg">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="826,-6554 696,-6554 696,-6530 826,-6530 826,-6554"/>
+<text text-anchor="middle" x="761" y="-6539.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_xg&#45;&gt;interface~compute_xg -->
 <g id="call~~graph~~CallGraph_edge150" class="edge">
 <title>proc~cmp_xg&#45;&gt;interface~compute_xg</title>
-<path fill="none" stroke="#79ff00" d="M831.18,-6362C866.42,-6362 908.43,-6362 940.32,-6362"/>
-<polygon fill="#79ff00" stroke="#79ff00" points="940.72,-6365.5 950.72,-6362 940.72,-6358.5 940.72,-6365.5"/>
+<path fill="none" stroke="#79ff00" d="M826.44,-6531.51C836.72,-6527.8 846.69,-6522.78 855,-6516 882.11,-6493.89 863.73,-6467.91 891,-6446 905.06,-6434.7 923.55,-6428.28 940.71,-6424.64"/>
+<polygon fill="#79ff00" stroke="#79ff00" points="941.42,-6428.07 950.61,-6422.8 940.14,-6421.19 941.42,-6428.07"/>
 </g>
 <!-- proc~cmp_xg&#45;&gt;proc~is_rational -->
 <g id="call~~graph~~CallGraph_edge151" class="edge">
 <title>proc~cmp_xg&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#79ff00" d="M831.21,-6373.82C850.54,-6376.97 871.57,-6380.26 891,-6383 972.43,-6394.49 1065.63,-6405.42 1131.46,-6412.77"/>
-<polygon fill="#79ff00" stroke="#79ff00" points="1131.46,-6416.29 1141.78,-6413.92 1132.23,-6409.33 1131.46,-6416.29"/>
+<path fill="none" stroke="#79ff00" d="M822.94,-6529.95C834.04,-6526.38 845.2,-6521.82 855,-6516 874.73,-6504.29 870.8,-6489.88 891,-6479 970.28,-6436.31 1004.48,-6469.17 1090,-6441 1124.61,-6429.6 1161.94,-6410.81 1187.11,-6397.09"/>
+<polygon fill="#79ff00" stroke="#79ff00" points="1189.07,-6400.01 1196.13,-6392.11 1185.69,-6393.88 1189.07,-6400.01"/>
 </g>
 <!-- proc~cmp_xg~2 -->
 <g id="call~~graph~~CallGraph_node94" class="node">
 <title>proc~cmp_xg~2</title>
-<g id="a_call~~graph~~CallGraph_node94"><a xlink:href="../proc/cmp_xg~2.html" xlink:title="nurbs_surface%cmp_Xg">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="831,-1852 691,-1852 691,-1828 831,-1828 831,-1852"/>
-<text text-anchor="middle" x="761" y="-1837.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_Xg</text>
+<g id="a_call~~graph~~CallGraph_node94"><a xlink:href="../proc/cmp_xg~2.html" xlink:title="nurbs_volume%cmp_Xg">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="831,-4786 691,-4786 691,-4762 831,-4762 831,-4786"/>
+<text text-anchor="middle" x="761" y="-4771.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_xg~2&#45;&gt;interface~compute_xg~2 -->
 <g id="call~~graph~~CallGraph_edge152" class="edge">
 <title>proc~cmp_xg~2&#45;&gt;interface~compute_xg~2</title>
-<path fill="none" stroke="#74ff00" d="M794.39,-1852.13C815.15,-1861.65 840.78,-1877 855,-1899 916.4,-1994.02 813.77,-2068.32 891,-2151 903.63,-2164.52 922.65,-2170.45 940.62,-2172.76"/>
-<polygon fill="#74ff00" stroke="#74ff00" points="940.45,-2176.26 950.73,-2173.71 941.1,-2169.29 940.45,-2176.26"/>
+<path fill="none" stroke="#74ff00" d="M831.23,-4763.1C839.51,-4760.44 847.63,-4757.13 855,-4753 875.02,-4741.79 871.19,-4727.57 891,-4716 906.05,-4707.21 924.11,-4701.33 940.63,-4697.43"/>
+<polygon fill="#74ff00" stroke="#74ff00" points="941.65,-4700.79 950.68,-4695.25 940.16,-4693.95 941.65,-4700.79"/>
 </g>
 <!-- proc~cmp_xg~2&#45;&gt;proc~is_rational~2 -->
 <g id="call~~graph~~CallGraph_edge153" class="edge">
 <title>proc~cmp_xg~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#74ff00" d="M831.12,-1836.36C916.34,-1833.48 1054.32,-1834.56 1090,-1869 1136.72,-1914.1 1103.23,-2098.19 1126,-2159 1142.92,-2204.19 1177.74,-2249.14 1199.06,-2274.07"/>
-<polygon fill="#74ff00" stroke="#74ff00" points="1196.52,-2276.49 1205.73,-2281.74 1201.8,-2271.9 1196.52,-2276.49"/>
+<path fill="none" stroke="#74ff00" d="M790,-4786.17C810.34,-4796.21 837.28,-4812.18 855,-4833 881.33,-4863.93 859.35,-4891.55 891,-4917 961.17,-4973.43 1026.83,-4890.83 1090,-4955 1155.2,-5021.23 1062.07,-5093.54 1126,-5161 1128.14,-5163.26 1130.48,-5165.3 1132.96,-5167.14"/>
+<polygon fill="#74ff00" stroke="#74ff00" points="1131.58,-5170.4 1141.93,-5172.65 1135.24,-5164.44 1131.58,-5170.4"/>
 </g>
 <!-- proc~cmp_xg~3 -->
 <g id="call~~graph~~CallGraph_node95" class="node">
 <title>proc~cmp_xg~3</title>
-<g id="a_call~~graph~~CallGraph_node95"><a xlink:href="../proc/cmp_xg~3.html" xlink:title="nurbs_curve%cmp_Xg">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="826,-66 696,-66 696,-42 826,-42 826,-66"/>
-<text text-anchor="middle" x="761" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_Xg</text>
+<g id="a_call~~graph~~CallGraph_node95"><a xlink:href="../proc/cmp_xg~3.html" xlink:title="nurbs_surface%cmp_Xg">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="831,-2448 691,-2448 691,-2424 831,-2424 831,-2448"/>
+<text text-anchor="middle" x="761" y="-2433.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_xg~3&#45;&gt;interface~compute_xg~3 -->
 <g id="call~~graph~~CallGraph_edge154" class="edge">
 <title>proc~cmp_xg~3&#45;&gt;interface~compute_xg~3</title>
-<path fill="none" stroke="#70ff00" d="M826.01,-62.84C836.69,-66.7 846.92,-72.2 855,-80 892.93,-116.6 855.53,-154.01 891,-193 904.19,-207.5 923.23,-217.19 941.07,-223.56"/>
-<polygon fill="#70ff00" stroke="#70ff00" points="940.21,-226.96 950.8,-226.77 942.4,-220.31 940.21,-226.96"/>
+<path fill="none" stroke="#70ff00" d="M831.15,-2446.06C839.53,-2448.86 847.7,-2452.43 855,-2457 876.71,-2470.58 869.53,-2488.03 891,-2502 905.73,-2511.59 923.87,-2517.65 940.55,-2521.48"/>
+<polygon fill="#70ff00" stroke="#70ff00" points="940.2,-2524.98 950.7,-2523.59 941.62,-2518.13 940.2,-2524.98"/>
 </g>
 <!-- proc~cmp_xg~3&#45;&gt;proc~is_rational~3 -->
 <g id="call~~graph~~CallGraph_edge155" class="edge">
 <title>proc~cmp_xg~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#70ff00" d="M812.15,-66.07C898.96,-87.37 1069.89,-131.22 1090,-151 1198.98,-258.23 1214.58,-458.87 1216.7,-525.7"/>
-<polygon fill="#70ff00" stroke="#70ff00" points="1213.21,-526 1216.95,-535.91 1220.21,-525.83 1213.21,-526"/>
+<path fill="none" stroke="#70ff00" d="M819.77,-2448.1C831.49,-2450.82 843.68,-2453.84 855,-2457 871.25,-2461.53 874.68,-2464.74 891,-2469 978.13,-2491.73 1004.48,-2478.83 1090,-2507 1124.61,-2518.4 1161.94,-2537.19 1187.11,-2550.91"/>
+<polygon fill="#70ff00" stroke="#70ff00" points="1185.69,-2554.12 1196.13,-2555.89 1189.07,-2547.99 1185.69,-2554.12"/>
 </g>
 <!-- proc~compute_d2tgc_bspline_1d_scalar -->
 <g id="call~~graph~~CallGraph_node96" class="node">
 <title>proc~compute_d2tgc_bspline_1d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node96"><a xlink:href="../proc/compute_d2tgc_bspline_1d_scalar.html" xlink:title="compute_d2Tgc_bspline_1d_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1089.5,-5764 891.5,-5764 891.5,-5740 1089.5,-5740 1089.5,-5764"/>
-<text text-anchor="middle" x="990.5" y="-5749.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_bspline_1d_scalar</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1089.5,-654 891.5,-654 891.5,-630 1089.5,-630 1089.5,-654"/>
+<text text-anchor="middle" x="990.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_bspline_1d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_d2tgc_bspline_1d_scalar&#45;&gt;proc~basis_bspline_2der -->
 <g id="call~~graph~~CallGraph_edge156" class="edge">
 <title>proc~compute_d2tgc_bspline_1d_scalar&#45;&gt;proc~basis_bspline_2der</title>
-<path fill="none" stroke="#6cff00" d="M1072.19,-5739.91C1078.44,-5737.46 1084.47,-5734.52 1090,-5731 1148.08,-5694.04 1189.43,-5620.56 1207.24,-5584.28"/>
-<polygon fill="#6cff00" stroke="#6cff00" points="1210.47,-5585.63 1211.63,-5575.09 1204.16,-5582.61 1210.47,-5585.63"/>
+<path fill="none" stroke="#6cff00" d="M1075.11,-654.02C1080.4,-656.51 1085.43,-659.48 1090,-663 1167.72,-722.95 1201.58,-843.41 1212.62,-892.95"/>
+<polygon fill="#6cff00" stroke="#6cff00" points="1209.24,-893.87 1214.75,-902.92 1216.09,-892.41 1209.24,-893.87"/>
 </g>
 <!-- proc~compute_d2tgc_bspline_1d_vector -->
 <g id="call~~graph~~CallGraph_node97" class="node">
 <title>proc~compute_d2tgc_bspline_1d_vector</title>
 <g id="a_call~~graph~~CallGraph_node97"><a xlink:href="../proc/compute_d2tgc_bspline_1d_vector.html" xlink:title="compute_d2Tgc_bspline_1d_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1090,-5722 891,-5722 891,-5698 1090,-5698 1090,-5722"/>
-<text text-anchor="middle" x="990.5" y="-5707.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_bspline_1d_vector</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1090,-612 891,-612 891,-588 1090,-588 1090,-612"/>
+<text text-anchor="middle" x="990.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_bspline_1d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_d2tgc_bspline_1d_vector&#45;&gt;proc~basis_bspline_2der -->
 <g id="call~~graph~~CallGraph_edge157" class="edge">
 <title>proc~compute_d2tgc_bspline_1d_vector&#45;&gt;proc~basis_bspline_2der</title>
-<path fill="none" stroke="#68ff00" d="M1069.12,-5697.92C1076.38,-5695.47 1083.46,-5692.53 1090,-5689 1138.56,-5662.74 1180.92,-5612.19 1202.27,-5583.75"/>
-<polygon fill="#68ff00" stroke="#68ff00" points="1205.34,-5585.48 1208.45,-5575.36 1199.7,-5581.34 1205.34,-5585.48"/>
+<path fill="none" stroke="#68ff00" d="M1076.3,-612.19C1081.19,-614.65 1085.81,-617.56 1090,-621 1177.91,-693.04 1206.4,-837.49 1214.32,-892.78"/>
+<polygon fill="#68ff00" stroke="#68ff00" points="1210.87,-893.43 1215.67,-902.88 1217.81,-892.5 1210.87,-893.43"/>
 </g>
 <!-- proc~compute_d2tgc_bspline_2d_scalar -->
 <g id="call~~graph~~CallGraph_node98" class="node">
 <title>proc~compute_d2tgc_bspline_2d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node98"><a xlink:href="../proc/compute_d2tgc_bspline_2d_scalar.html" xlink:title="compute_d2Tgc_bspline_2d_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1089.5,-5218 891.5,-5218 891.5,-5194 1089.5,-5194 1089.5,-5218"/>
-<text text-anchor="middle" x="990.5" y="-5203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_bspline_2d_scalar</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1089.5,-1032 891.5,-1032 891.5,-1008 1089.5,-1008 1089.5,-1032"/>
+<text text-anchor="middle" x="990.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_bspline_2d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_d2tgc_bspline_2d_scalar&#45;&gt;proc~basis_bspline_2der -->
 <g id="call~~graph~~CallGraph_edge158" class="edge">
 <title>proc~compute_d2tgc_bspline_2d_scalar&#45;&gt;proc~basis_bspline_2der</title>
-<path fill="none" stroke="#64ff00" d="M1076.96,-5218.21C1081.62,-5220.68 1086.02,-5223.58 1090,-5227 1188.21,-5311.37 1210.65,-5479.89 1215.63,-5540.57"/>
-<polygon fill="#64ff00" stroke="#64ff00" points="1212.17,-5541.2 1216.39,-5550.91 1219.15,-5540.68 1212.17,-5541.2"/>
+<path fill="none" stroke="#64ff00" d="M1063.49,-1007.95C1072.57,-1005.47 1081.62,-1002.52 1090,-999 1129.9,-982.26 1170.71,-952.58 1194.94,-933.36"/>
+<polygon fill="#64ff00" stroke="#64ff00" points="1197.2,-936.03 1202.79,-927.03 1192.81,-930.58 1197.2,-936.03"/>
 </g>
 <!-- proc~kron -->
 <g id="call~~graph~~CallGraph_node259" class="node">
 <title>proc~kron</title>
 <g id="a_call~~graph~~CallGraph_node259"><a xlink:href="../proc/kron.html" xlink:title="kron">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1245,-4840 1191,-4840 1191,-4816 1245,-4816 1245,-4840"/>
-<text text-anchor="middle" x="1218" y="-4825.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kron</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1245,-1242 1191,-1242 1191,-1218 1245,-1218 1245,-1242"/>
+<text text-anchor="middle" x="1218" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kron</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_d2tgc_bspline_2d_scalar&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge159" class="edge">
 <title>proc~compute_d2tgc_bspline_2d_scalar&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#64ff00" d="M1078.36,-5193.81C1082.56,-5191.32 1086.49,-5188.41 1090,-5185 1138.27,-5138.16 1104.55,-5101.75 1126,-5038 1149.86,-4967.09 1187.85,-4886.88 1206.28,-4849.42"/>
-<polygon fill="#64ff00" stroke="#64ff00" points="1209.63,-4850.54 1210.93,-4840.03 1203.35,-4847.43 1209.63,-4850.54"/>
+<path fill="none" stroke="#64ff00" d="M1073.15,-1032.06C1079.09,-1034.52 1084.79,-1037.47 1090,-1041 1152.83,-1083.49 1192.81,-1168.44 1208.91,-1208.35"/>
+<polygon fill="#64ff00" stroke="#64ff00" points="1205.75,-1209.87 1212.65,-1217.91 1212.26,-1207.32 1205.75,-1209.87"/>
 </g>
 <!-- proc~compute_d2tgc_bspline_2d_vector -->
 <g id="call~~graph~~CallGraph_node99" class="node">
 <title>proc~compute_d2tgc_bspline_2d_vector</title>
 <g id="a_call~~graph~~CallGraph_node99"><a xlink:href="../proc/compute_d2tgc_bspline_2d_vector.html" xlink:title="compute_d2Tgc_bspline_2d_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1090,-5176 891,-5176 891,-5152 1090,-5152 1090,-5176"/>
-<text text-anchor="middle" x="990.5" y="-5161.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_bspline_2d_vector</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1090,-990 891,-990 891,-966 1090,-966 1090,-990"/>
+<text text-anchor="middle" x="990.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_bspline_2d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_d2tgc_bspline_2d_vector&#45;&gt;proc~basis_bspline_2der -->
 <g id="call~~graph~~CallGraph_edge160" class="edge">
 <title>proc~compute_d2tgc_bspline_2d_vector&#45;&gt;proc~basis_bspline_2der</title>
-<path fill="none" stroke="#5fff00" d="M1077.11,-5176.04C1081.74,-5178.55 1086.09,-5181.51 1090,-5185 1198.91,-5282.14 1214.57,-5475.61 1216.71,-5540.9"/>
-<polygon fill="#5fff00" stroke="#5fff00" points="1213.21,-5540.99 1216.96,-5550.9 1220.21,-5540.81 1213.21,-5540.99"/>
+<path fill="none" stroke="#5fff00" d="M1052.96,-965.98C1065.29,-963.27 1078.1,-960.23 1090,-957 1118.37,-949.31 1149.73,-938.96 1174.19,-930.46"/>
+<polygon fill="#5fff00" stroke="#5fff00" points="1175.6,-933.67 1183.88,-927.06 1173.28,-927.06 1175.6,-933.67"/>
 </g>
 <!-- proc~compute_d2tgc_bspline_2d_vector&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge161" class="edge">
 <title>proc~compute_d2tgc_bspline_2d_vector&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#5fff00" d="M1077.08,-5151.93C1081.72,-5149.43 1086.07,-5146.48 1090,-5143 1126.92,-5110.28 1108.18,-5084 1126,-5038 1153.03,-4968.23 1189.53,-4887.49 1206.94,-4849.66"/>
-<polygon fill="#5fff00" stroke="#5fff00" points="1210.31,-4850.71 1211.33,-4840.17 1203.95,-4847.78 1210.31,-4850.71"/>
+<path fill="none" stroke="#5fff00" d="M1074.97,-990.21C1080.29,-992.66 1085.37,-995.56 1090,-999 1162.6,-1052.95 1198.8,-1161.3 1211.53,-1207.88"/>
+<polygon fill="#5fff00" stroke="#5fff00" points="1208.22,-1209.05 1214.15,-1217.83 1214.99,-1207.27 1208.22,-1209.05"/>
 </g>
 <!-- proc~compute_d2tgc_bspline_3d_scalar -->
 <g id="call~~graph~~CallGraph_node100" class="node">
 <title>proc~compute_d2tgc_bspline_3d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node100"><a xlink:href="../proc/compute_d2tgc_bspline_3d_scalar.html" xlink:title="compute_d2Tgc_bspline_3d_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1089.5,-5638 891.5,-5638 891.5,-5614 1089.5,-5614 1089.5,-5638"/>
-<text text-anchor="middle" x="990.5" y="-5623.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_bspline_3d_scalar</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1089.5,-948 891.5,-948 891.5,-924 1089.5,-924 1089.5,-948"/>
+<text text-anchor="middle" x="990.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_bspline_3d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_d2tgc_bspline_3d_scalar&#45;&gt;proc~basis_bspline_2der -->
 <g id="call~~graph~~CallGraph_edge162" class="edge">
 <title>proc~compute_d2tgc_bspline_3d_scalar&#45;&gt;proc~basis_bspline_2der</title>
-<path fill="none" stroke="#5bff00" d="M1052.96,-5613.98C1065.29,-5611.27 1078.1,-5608.23 1090,-5605 1118.37,-5597.31 1149.73,-5586.96 1174.19,-5578.46"/>
-<polygon fill="#5bff00" stroke="#5bff00" points="1175.6,-5581.67 1183.88,-5575.06 1173.28,-5575.06 1175.6,-5581.67"/>
+<path fill="none" stroke="#5bff00" d="M1089.75,-926.85C1110.58,-924.91 1132.07,-922.91 1151.33,-921.12"/>
+<polygon fill="#5bff00" stroke="#5bff00" points="1151.85,-924.58 1161.49,-920.17 1151.21,-917.61 1151.85,-924.58"/>
 </g>
 <!-- proc~compute_d2tgc_bspline_3d_scalar&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge163" class="edge">
 <title>proc~compute_d2tgc_bspline_3d_scalar&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#5bff00" d="M1079.97,-5613.94C1083.65,-5611.4 1087.03,-5608.44 1090,-5605 1131.25,-5557.21 1111.23,-5099.37 1126,-5038 1143.49,-4965.3 1184.44,-4886.01 1204.91,-4849.1"/>
-<polygon fill="#5bff00" stroke="#5bff00" points="1208.03,-4850.69 1209.87,-4840.25 1201.93,-4847.26 1208.03,-4850.69"/>
+<path fill="none" stroke="#5bff00" d="M1075.72,-948.09C1080.8,-950.57 1085.62,-953.51 1090,-957 1172.83,-1022.99 1204.1,-1155.5 1213.54,-1207.93"/>
+<polygon fill="#5bff00" stroke="#5bff00" points="1210.1,-1208.58 1215.23,-1217.84 1217,-1207.4 1210.1,-1208.58"/>
 </g>
 <!-- proc~compute_d2tgc_bspline_3d_vector -->
 <g id="call~~graph~~CallGraph_node101" class="node">
 <title>proc~compute_d2tgc_bspline_3d_vector</title>
 <g id="a_call~~graph~~CallGraph_node101"><a xlink:href="../proc/compute_d2tgc_bspline_3d_vector.html" xlink:title="compute_d2Tgc_bspline_3d_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1090,-5596 891,-5596 891,-5572 1090,-5572 1090,-5596"/>
-<text text-anchor="middle" x="990.5" y="-5581.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_bspline_3d_vector</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1090,-906 891,-906 891,-882 1090,-882 1090,-906"/>
+<text text-anchor="middle" x="990.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_bspline_3d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_d2tgc_bspline_3d_vector&#45;&gt;proc~basis_bspline_2der -->
 <g id="call~~graph~~CallGraph_edge164" class="edge">
 <title>proc~compute_d2tgc_bspline_3d_vector&#45;&gt;proc~basis_bspline_2der</title>
-<path fill="none" stroke="#57ff00" d="M1090.08,-5574.82C1110.77,-5572.89 1132.12,-5570.9 1151.26,-5569.12"/>
-<polygon fill="#57ff00" stroke="#57ff00" points="1151.71,-5572.6 1161.35,-5568.18 1151.06,-5565.63 1151.71,-5572.6"/>
+<path fill="none" stroke="#57ff00" d="M1090.08,-903.18C1110.77,-905.11 1132.12,-907.1 1151.26,-908.88"/>
+<polygon fill="#57ff00" stroke="#57ff00" points="1151.06,-912.37 1161.35,-909.82 1151.71,-905.4 1151.06,-912.37"/>
 </g>
 <!-- proc~compute_d2tgc_bspline_3d_vector&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge165" class="edge">
 <title>proc~compute_d2tgc_bspline_3d_vector&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#57ff00" d="M1079.94,-5571.92C1083.63,-5569.39 1087.02,-5566.43 1090,-5563 1128.32,-5518.83 1112.18,-5094.81 1126,-5038 1143.68,-4965.35 1184.54,-4886.03 1204.95,-4849.11"/>
-<polygon fill="#57ff00" stroke="#57ff00" points="1208.07,-4850.7 1209.9,-4840.26 1201.96,-4847.28 1208.07,-4850.7"/>
+<path fill="none" stroke="#57ff00" d="M1076.4,-906.07C1081.26,-908.56 1085.85,-911.51 1090,-915 1182.9,-993.06 1208.51,-1149.16 1214.98,-1207.4"/>
+<polygon fill="#57ff00" stroke="#57ff00" points="1211.53,-1208.1 1216.03,-1217.69 1218.5,-1207.39 1211.53,-1208.1"/>
 </g>
 <!-- proc~compute_d2tgc_nurbs_1d_scalar -->
 <g id="call~~graph~~CallGraph_node102" class="node">
 <title>proc~compute_d2tgc_nurbs_1d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node102"><a xlink:href="../proc/compute_d2tgc_nurbs_1d_scalar.html" xlink:title="compute_d2Tgc_nurbs_1d_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1085.5,-5680 895.5,-5680 895.5,-5656 1085.5,-5656 1085.5,-5680"/>
-<text text-anchor="middle" x="990.5" y="-5665.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_nurbs_1d_scalar</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1085.5,-570 895.5,-570 895.5,-546 1085.5,-546 1085.5,-570"/>
+<text text-anchor="middle" x="990.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_nurbs_1d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_d2tgc_nurbs_1d_scalar&#45;&gt;proc~basis_bspline_2der -->
 <g id="call~~graph~~CallGraph_edge166" class="edge">
 <title>proc~compute_d2tgc_nurbs_1d_scalar&#45;&gt;proc~basis_bspline_2der</title>
-<path fill="none" stroke="#53ff00" d="M1063.49,-5655.95C1072.57,-5653.47 1081.62,-5650.52 1090,-5647 1129.9,-5630.26 1170.71,-5600.58 1194.94,-5581.36"/>
-<polygon fill="#53ff00" stroke="#53ff00" points="1197.2,-5584.03 1202.79,-5575.03 1192.81,-5578.58 1197.2,-5584.03"/>
+<path fill="none" stroke="#53ff00" d="M1076.96,-570.21C1081.62,-572.68 1086.02,-575.58 1090,-579 1188.21,-663.37 1210.65,-831.89 1215.63,-892.57"/>
+<polygon fill="#53ff00" stroke="#53ff00" points="1212.17,-893.2 1216.39,-902.91 1219.15,-892.68 1212.17,-893.2"/>
 </g>
 <!-- proc~compute_d2tgc_nurbs_1d_vector -->
 <g id="call~~graph~~CallGraph_node103" class="node">
 <title>proc~compute_d2tgc_nurbs_1d_vector</title>
 <g id="a_call~~graph~~CallGraph_node103"><a xlink:href="../proc/compute_d2tgc_nurbs_1d_vector.html" xlink:title="compute_d2Tgc_nurbs_1d_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1086,-5806 895,-5806 895,-5782 1086,-5782 1086,-5806"/>
-<text text-anchor="middle" x="990.5" y="-5791.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_nurbs_1d_vector</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1086,-696 895,-696 895,-672 1086,-672 1086,-696"/>
+<text text-anchor="middle" x="990.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_nurbs_1d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_d2tgc_nurbs_1d_vector&#45;&gt;proc~basis_bspline_2der -->
 <g id="call~~graph~~CallGraph_edge167" class="edge">
 <title>proc~compute_d2tgc_nurbs_1d_vector&#45;&gt;proc~basis_bspline_2der</title>
-<path fill="none" stroke="#4eff00" d="M1074.32,-5781.79C1079.86,-5779.35 1085.16,-5776.45 1090,-5773 1157.83,-5724.73 1196.1,-5627.81 1210.42,-5584.62"/>
-<polygon fill="#4eff00" stroke="#4eff00" points="1213.76,-5585.69 1213.48,-5575.09 1207.09,-5583.55 1213.76,-5585.69"/>
+<path fill="none" stroke="#4eff00" d="M1074.32,-696.21C1079.86,-698.65 1085.16,-701.55 1090,-705 1157.83,-753.27 1196.1,-850.19 1210.42,-893.38"/>
+<polygon fill="#4eff00" stroke="#4eff00" points="1207.09,-894.45 1213.48,-902.91 1213.76,-892.31 1207.09,-894.45"/>
 </g>
 <!-- proc~compute_d2tgc_nurbs_2d_scalar -->
 <g id="call~~graph~~CallGraph_node104" class="node">
 <title>proc~compute_d2tgc_nurbs_2d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node104"><a xlink:href="../proc/compute_d2tgc_nurbs_2d_scalar.html" xlink:title="compute_d2Tgc_nurbs_2d_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1085.5,-5554 895.5,-5554 895.5,-5530 1085.5,-5530 1085.5,-5554"/>
-<text text-anchor="middle" x="990.5" y="-5539.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_nurbs_2d_scalar</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1085.5,-864 895.5,-864 895.5,-840 1085.5,-840 1085.5,-864"/>
+<text text-anchor="middle" x="990.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_nurbs_2d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_d2tgc_nurbs_2d_scalar&#45;&gt;proc~basis_bspline_2der -->
 <g id="call~~graph~~CallGraph_edge168" class="edge">
 <title>proc~compute_d2tgc_nurbs_2d_scalar&#45;&gt;proc~basis_bspline_2der</title>
-<path fill="none" stroke="#4aff00" d="M1085.83,-5550.78C1107.82,-5552.83 1130.77,-5554.97 1151.21,-5556.87"/>
-<polygon fill="#4aff00" stroke="#4aff00" points="1151.06,-5560.37 1161.34,-5557.82 1151.71,-5553.4 1151.06,-5560.37"/>
+<path fill="none" stroke="#4aff00" d="M1052.96,-864.02C1065.29,-866.73 1078.1,-869.77 1090,-873 1118.37,-880.69 1149.73,-891.04 1174.19,-899.54"/>
+<polygon fill="#4aff00" stroke="#4aff00" points="1173.28,-902.94 1183.88,-902.94 1175.6,-896.33 1173.28,-902.94"/>
 </g>
 <!-- proc~compute_d2tgc_nurbs_2d_scalar&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge169" class="edge">
 <title>proc~compute_d2tgc_nurbs_2d_scalar&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#4aff00" d="M1079.92,-5529.9C1083.61,-5527.37 1087.01,-5524.43 1090,-5521 1160.77,-5439.91 1100.24,-5142.5 1126,-5038 1143.89,-4965.4 1184.65,-4886.06 1204.99,-4849.12"/>
-<polygon fill="#4aff00" stroke="#4aff00" points="1208.12,-4850.71 1209.93,-4840.27 1202,-4847.3 1208.12,-4850.71"/>
+<path fill="none" stroke="#4aff00" d="M1077.03,-864.12C1081.68,-866.61 1086.05,-869.54 1090,-873 1116.7,-896.4 1188.68,-1134.21 1210.59,-1208.17"/>
+<polygon fill="#4aff00" stroke="#4aff00" points="1207.26,-1209.25 1213.45,-1217.85 1213.97,-1207.27 1207.26,-1209.25"/>
 </g>
 <!-- proc~compute_d2tgc_nurbs_2d_vector -->
 <g id="call~~graph~~CallGraph_node105" class="node">
 <title>proc~compute_d2tgc_nurbs_2d_vector</title>
 <g id="a_call~~graph~~CallGraph_node105"><a xlink:href="../proc/compute_d2tgc_nurbs_2d_vector.html" xlink:title="compute_d2Tgc_nurbs_2d_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1086,-5512 895,-5512 895,-5488 1086,-5488 1086,-5512"/>
-<text text-anchor="middle" x="990.5" y="-5497.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_nurbs_2d_vector</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1086,-1158 895,-1158 895,-1134 1086,-1134 1086,-1158"/>
+<text text-anchor="middle" x="990.5" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_nurbs_2d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_d2tgc_nurbs_2d_vector&#45;&gt;proc~basis_bspline_2der -->
 <g id="call~~graph~~CallGraph_edge170" class="edge">
 <title>proc~compute_d2tgc_nurbs_2d_vector&#45;&gt;proc~basis_bspline_2der</title>
-<path fill="none" stroke="#46ff00" d="M1052.96,-5512.02C1065.29,-5514.73 1078.1,-5517.77 1090,-5521 1118.37,-5528.69 1149.73,-5539.04 1174.19,-5547.54"/>
-<polygon fill="#46ff00" stroke="#46ff00" points="1173.28,-5550.94 1183.88,-5550.94 1175.6,-5544.33 1173.28,-5550.94"/>
+<path fill="none" stroke="#46ff00" d="M1074.32,-1133.79C1079.86,-1131.35 1085.16,-1128.45 1090,-1125 1157.83,-1076.73 1196.1,-979.81 1210.42,-936.62"/>
+<polygon fill="#46ff00" stroke="#46ff00" points="1213.76,-937.69 1213.48,-927.09 1207.09,-935.55 1213.76,-937.69"/>
 </g>
 <!-- proc~compute_d2tgc_nurbs_2d_vector&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge171" class="edge">
 <title>proc~compute_d2tgc_nurbs_2d_vector&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#46ff00" d="M1079.89,-5487.87C1083.59,-5485.35 1087,-5482.41 1090,-5479 1154.92,-5405.15 1102.13,-5133.39 1126,-5038 1144.15,-4965.46 1184.79,-4886.09 1205.05,-4849.13"/>
-<polygon fill="#46ff00" stroke="#46ff00" points="1208.17,-4850.72 1209.96,-4840.27 1202.05,-4847.32 1208.17,-4850.72"/>
+<path fill="none" stroke="#46ff00" d="M1058.88,-1158.01C1069.42,-1160.56 1080.09,-1163.55 1090,-1167 1124.83,-1179.14 1162.4,-1198.65 1187.57,-1212.75"/>
+<polygon fill="#46ff00" stroke="#46ff00" points="1186.15,-1215.97 1196.58,-1217.86 1189.61,-1209.88 1186.15,-1215.97"/>
 </g>
 <!-- proc~compute_d2tgc_nurbs_3d_scalar -->
 <g id="call~~graph~~CallGraph_node106" class="node">
 <title>proc~compute_d2tgc_nurbs_3d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node106"><a xlink:href="../proc/compute_d2tgc_nurbs_3d_scalar.html" xlink:title="compute_d2Tgc_nurbs_3d_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1085.5,-5470 895.5,-5470 895.5,-5446 1085.5,-5446 1085.5,-5470"/>
-<text text-anchor="middle" x="990.5" y="-5455.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_nurbs_3d_scalar</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1085.5,-1116 895.5,-1116 895.5,-1092 1085.5,-1092 1085.5,-1116"/>
+<text text-anchor="middle" x="990.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_nurbs_3d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_d2tgc_nurbs_3d_scalar&#45;&gt;proc~basis_bspline_2der -->
 <g id="call~~graph~~CallGraph_edge172" class="edge">
 <title>proc~compute_d2tgc_nurbs_3d_scalar&#45;&gt;proc~basis_bspline_2der</title>
-<path fill="none" stroke="#42ff00" d="M1063.49,-5470.05C1072.57,-5472.53 1081.62,-5475.48 1090,-5479 1129.9,-5495.74 1170.71,-5525.42 1194.94,-5544.64"/>
-<polygon fill="#42ff00" stroke="#42ff00" points="1192.81,-5547.42 1202.79,-5550.97 1197.2,-5541.97 1192.81,-5547.42"/>
+<path fill="none" stroke="#42ff00" d="M1072.19,-1091.91C1078.44,-1089.46 1084.47,-1086.52 1090,-1083 1148.08,-1046.04 1189.43,-972.56 1207.24,-936.28"/>
+<polygon fill="#42ff00" stroke="#42ff00" points="1210.47,-937.63 1211.63,-927.09 1204.16,-934.61 1210.47,-937.63"/>
 </g>
 <!-- proc~compute_d2tgc_nurbs_3d_scalar&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge173" class="edge">
 <title>proc~compute_d2tgc_nurbs_3d_scalar&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#42ff00" d="M1079.86,-5445.84C1083.56,-5443.33 1086.98,-5440.4 1090,-5437 1149.06,-5370.38 1104.02,-5124.27 1126,-5038 1144.46,-4965.54 1184.95,-4886.13 1205.11,-4849.15"/>
-<polygon fill="#42ff00" stroke="#42ff00" points="1208.24,-4850.73 1210,-4840.28 1202.11,-4847.35 1208.24,-4850.73"/>
+<path fill="none" stroke="#42ff00" d="M1066.73,-1116.06C1074.77,-1118.51 1082.68,-1121.46 1090,-1125 1134.2,-1146.37 1176.21,-1186.27 1199.1,-1210.26"/>
+<polygon fill="#42ff00" stroke="#42ff00" points="1196.72,-1212.83 1206.11,-1217.73 1201.82,-1208.04 1196.72,-1212.83"/>
 </g>
 <!-- proc~compute_d2tgc_nurbs_3d_vector -->
 <g id="call~~graph~~CallGraph_node107" class="node">
 <title>proc~compute_d2tgc_nurbs_3d_vector</title>
 <g id="a_call~~graph~~CallGraph_node107"><a xlink:href="../proc/compute_d2tgc_nurbs_3d_vector.html" xlink:title="compute_d2Tgc_nurbs_3d_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1086,-5260 895,-5260 895,-5236 1086,-5236 1086,-5260"/>
-<text text-anchor="middle" x="990.5" y="-5245.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_nurbs_3d_vector</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1086,-1074 895,-1074 895,-1050 1086,-1050 1086,-1074"/>
+<text text-anchor="middle" x="990.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc_nurbs_3d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_d2tgc_nurbs_3d_vector&#45;&gt;proc~basis_bspline_2der -->
 <g id="call~~graph~~CallGraph_edge174" class="edge">
 <title>proc~compute_d2tgc_nurbs_3d_vector&#45;&gt;proc~basis_bspline_2der</title>
-<path fill="none" stroke="#3dff00" d="M1076.3,-5260.19C1081.19,-5262.65 1085.81,-5265.56 1090,-5269 1177.91,-5341.04 1206.4,-5485.49 1214.32,-5540.78"/>
-<polygon fill="#3dff00" stroke="#3dff00" points="1210.87,-5541.43 1215.67,-5550.88 1217.81,-5540.5 1210.87,-5541.43"/>
+<path fill="none" stroke="#3dff00" d="M1069.12,-1049.92C1076.38,-1047.47 1083.46,-1044.53 1090,-1041 1138.56,-1014.74 1180.92,-964.19 1202.27,-935.75"/>
+<polygon fill="#3dff00" stroke="#3dff00" points="1205.34,-937.48 1208.45,-927.36 1199.7,-933.34 1205.34,-937.48"/>
 </g>
 <!-- proc~compute_d2tgc_nurbs_3d_vector&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge175" class="edge">
 <title>proc~compute_d2tgc_nurbs_3d_vector&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#3dff00" d="M1079.02,-5235.75C1083,-5233.27 1086.7,-5230.37 1090,-5227 1149.8,-5165.88 1100.85,-5119.73 1126,-5038 1147.99,-4966.53 1186.83,-4886.66 1205.86,-4849.36"/>
-<polygon fill="#3dff00" stroke="#3dff00" points="1208.99,-4850.91 1210.46,-4840.41 1202.77,-4847.7 1208.99,-4850.91"/>
+<path fill="none" stroke="#3dff00" d="M1070.68,-1074.02C1077.44,-1076.48 1083.98,-1079.44 1090,-1083 1143.37,-1114.57 1185.58,-1176.61 1205.14,-1209.08"/>
+<polygon fill="#3dff00" stroke="#3dff00" points="1202.17,-1210.93 1210.26,-1217.77 1208.2,-1207.37 1202.17,-1210.93"/>
 </g>
 <!-- proc~compute_dtgc_bspline_1d_scalar -->
 <g id="call~~graph~~CallGraph_node108" class="node">
 <title>proc~compute_dtgc_bspline_1d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node108"><a xlink:href="../proc/compute_dtgc_bspline_1d_scalar.html" xlink:title="compute_dTgc_bspline_1d_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1086,-5428 895,-5428 895,-5404 1086,-5404 1086,-5428"/>
-<text text-anchor="middle" x="990.5" y="-5413.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_bspline_1d_scalar</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1086,-234 895,-234 895,-210 1086,-210 1086,-234"/>
+<text text-anchor="middle" x="990.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_bspline_1d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_dtgc_bspline_1d_scalar&#45;&gt;proc~basis_bspline_der -->
 <g id="call~~graph~~CallGraph_edge176" class="edge">
 <title>proc~compute_dtgc_bspline_1d_scalar&#45;&gt;proc~basis_bspline_der</title>
-<path fill="none" stroke="#39ff00" d="M1076.96,-5403.79C1081.62,-5401.32 1086.02,-5398.42 1090,-5395 1188.21,-5310.63 1210.65,-5142.11 1215.63,-5081.43"/>
-<polygon fill="#39ff00" stroke="#39ff00" points="1219.15,-5081.32 1216.39,-5071.09 1212.17,-5080.8 1219.15,-5081.32"/>
+<path fill="none" stroke="#39ff00" d="M1072.19,-234.09C1078.44,-236.54 1084.47,-239.48 1090,-243 1148.08,-279.96 1189.43,-353.44 1207.24,-389.72"/>
+<polygon fill="#39ff00" stroke="#39ff00" points="1204.16,-391.39 1211.63,-398.91 1210.47,-388.37 1204.16,-391.39"/>
 </g>
 <!-- proc~compute_dtgc_bspline_1d_vector -->
 <g id="call~~graph~~CallGraph_node109" class="node">
 <title>proc~compute_dtgc_bspline_1d_vector</title>
 <g id="a_call~~graph~~CallGraph_node109"><a xlink:href="../proc/compute_dtgc_bspline_1d_vector.html" xlink:title="compute_dTgc_bspline_1d_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1087,-5386 894,-5386 894,-5362 1087,-5362 1087,-5386"/>
-<text text-anchor="middle" x="990.5" y="-5371.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_bspline_1d_vector</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1087,-192 894,-192 894,-168 1087,-168 1087,-192"/>
+<text text-anchor="middle" x="990.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_bspline_1d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_dtgc_bspline_1d_vector&#45;&gt;proc~basis_bspline_der -->
 <g id="call~~graph~~CallGraph_edge177" class="edge">
 <title>proc~compute_dtgc_bspline_1d_vector&#45;&gt;proc~basis_bspline_der</title>
-<path fill="none" stroke="#35ff00" d="M1076.3,-5361.81C1081.19,-5359.35 1085.81,-5356.44 1090,-5353 1177.91,-5280.96 1206.4,-5136.51 1214.32,-5081.22"/>
-<polygon fill="#35ff00" stroke="#35ff00" points="1217.81,-5081.5 1215.67,-5071.12 1210.87,-5080.57 1217.81,-5081.5"/>
+<path fill="none" stroke="#35ff00" d="M1074.32,-192.21C1079.86,-194.65 1085.16,-197.55 1090,-201 1157.83,-249.27 1196.1,-346.19 1210.42,-389.38"/>
+<polygon fill="#35ff00" stroke="#35ff00" points="1207.09,-390.45 1213.48,-398.91 1213.76,-388.31 1207.09,-390.45"/>
 </g>
 <!-- proc~compute_dtgc_bspline_2d_scalar -->
 <g id="call~~graph~~CallGraph_node110" class="node">
 <title>proc~compute_dtgc_bspline_2d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node110"><a xlink:href="../proc/compute_dtgc_bspline_2d_scalar.html" xlink:title="compute_dTgc_bspline_2d_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1086,-4966 895,-4966 895,-4942 1086,-4942 1086,-4966"/>
-<text text-anchor="middle" x="990.5" y="-4951.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_bspline_2d_scalar</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1086,-528 895,-528 895,-504 1086,-504 1086,-528"/>
+<text text-anchor="middle" x="990.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_bspline_2d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_dtgc_bspline_2d_scalar&#45;&gt;proc~basis_bspline_der -->
 <g id="call~~graph~~CallGraph_edge178" class="edge">
 <title>proc~compute_dtgc_bspline_2d_scalar&#45;&gt;proc~basis_bspline_der</title>
-<path fill="none" stroke="#31ff00" d="M1063.49,-4966.05C1072.57,-4968.53 1081.62,-4971.48 1090,-4975 1129.9,-4991.74 1170.71,-5021.42 1194.94,-5040.64"/>
-<polygon fill="#31ff00" stroke="#31ff00" points="1192.81,-5043.42 1202.79,-5046.97 1197.2,-5037.97 1192.81,-5043.42"/>
+<path fill="none" stroke="#31ff00" d="M1063.49,-503.95C1072.57,-501.47 1081.62,-498.52 1090,-495 1129.9,-478.26 1170.71,-448.58 1194.94,-429.36"/>
+<polygon fill="#31ff00" stroke="#31ff00" points="1197.2,-432.03 1202.79,-423.03 1192.81,-426.58 1197.2,-432.03"/>
 </g>
 <!-- proc~compute_dtgc_bspline_2d_scalar&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge179" class="edge">
 <title>proc~compute_dtgc_bspline_2d_scalar&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#31ff00" d="M1066.73,-4941.94C1074.77,-4939.49 1082.68,-4936.54 1090,-4933 1134.2,-4911.63 1176.21,-4871.73 1199.1,-4847.74"/>
-<polygon fill="#31ff00" stroke="#31ff00" points="1201.82,-4849.96 1206.11,-4840.27 1196.72,-4845.17 1201.82,-4849.96"/>
+<path fill="none" stroke="#31ff00" d="M1079.86,-528.16C1083.56,-530.67 1086.98,-533.6 1090,-537 1149.06,-603.62 1108.74,-848.66 1126,-936 1146.65,-1040.51 1190.33,-1160.55 1208.64,-1208.55"/>
+<polygon fill="#31ff00" stroke="#31ff00" points="1205.39,-1209.84 1212.25,-1217.91 1211.92,-1207.32 1205.39,-1209.84"/>
 </g>
 <!-- proc~compute_dtgc_bspline_2d_vector -->
 <g id="call~~graph~~CallGraph_node111" class="node">
 <title>proc~compute_dtgc_bspline_2d_vector</title>
 <g id="a_call~~graph~~CallGraph_node111"><a xlink:href="../proc/compute_dtgc_bspline_2d_vector.html" xlink:title="compute_dTgc_bspline_2d_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1087,-4924 894,-4924 894,-4900 1087,-4900 1087,-4924"/>
-<text text-anchor="middle" x="990.5" y="-4909.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_bspline_2d_vector</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1087,-486 894,-486 894,-462 1087,-462 1087,-486"/>
+<text text-anchor="middle" x="990.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_bspline_2d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_dtgc_bspline_2d_vector&#45;&gt;proc~basis_bspline_der -->
 <g id="call~~graph~~CallGraph_edge180" class="edge">
 <title>proc~compute_dtgc_bspline_2d_vector&#45;&gt;proc~basis_bspline_der</title>
-<path fill="none" stroke="#2dff00" d="M1069.12,-4924.08C1076.38,-4926.53 1083.46,-4929.47 1090,-4933 1138.56,-4959.26 1180.92,-5009.81 1202.27,-5038.25"/>
-<polygon fill="#2dff00" stroke="#2dff00" points="1199.7,-5040.66 1208.45,-5046.64 1205.34,-5036.52 1199.7,-5040.66"/>
+<path fill="none" stroke="#2dff00" d="M1052.96,-461.98C1065.29,-459.27 1078.1,-456.23 1090,-453 1118.37,-445.31 1149.73,-434.96 1174.19,-426.46"/>
+<polygon fill="#2dff00" stroke="#2dff00" points="1175.6,-429.67 1183.88,-423.06 1173.28,-423.06 1175.6,-429.67"/>
 </g>
 <!-- proc~compute_dtgc_bspline_2d_vector&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge181" class="edge">
 <title>proc~compute_dtgc_bspline_2d_vector&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#2dff00" d="M1058.88,-4899.99C1069.42,-4897.44 1080.09,-4894.45 1090,-4891 1124.83,-4878.86 1162.4,-4859.35 1187.57,-4845.25"/>
-<polygon fill="#2dff00" stroke="#2dff00" points="1189.61,-4848.12 1196.58,-4840.14 1186.15,-4842.03 1189.61,-4848.12"/>
+<path fill="none" stroke="#2dff00" d="M1079.89,-486.13C1083.59,-488.65 1087,-491.59 1090,-495 1154.92,-568.85 1107.35,-839.46 1126,-936 1146.2,-1040.59 1190.13,-1160.59 1208.58,-1208.56"/>
+<polygon fill="#2dff00" stroke="#2dff00" points="1205.33,-1209.86 1212.21,-1217.92 1211.86,-1207.33 1205.33,-1209.86"/>
 </g>
 <!-- proc~compute_dtgc_bspline_3d_scalar -->
 <g id="call~~graph~~CallGraph_node112" class="node">
 <title>proc~compute_dtgc_bspline_3d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node112"><a xlink:href="../proc/compute_dtgc_bspline_3d_scalar.html" xlink:title="compute_dTgc_bspline_3d_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1086,-4882 895,-4882 895,-4858 1086,-4858 1086,-4882"/>
-<text text-anchor="middle" x="990.5" y="-4867.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_bspline_3d_scalar</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1086,-444 895,-444 895,-420 1086,-420 1086,-444"/>
+<text text-anchor="middle" x="990.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_bspline_3d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_dtgc_bspline_3d_scalar&#45;&gt;proc~basis_bspline_der -->
 <g id="call~~graph~~CallGraph_edge182" class="edge">
 <title>proc~compute_dtgc_bspline_3d_scalar&#45;&gt;proc~basis_bspline_der</title>
-<path fill="none" stroke="#28ff00" d="M1072.19,-4882.09C1078.44,-4884.54 1084.47,-4887.48 1090,-4891 1148.08,-4927.96 1189.43,-5001.44 1207.24,-5037.72"/>
-<polygon fill="#28ff00" stroke="#28ff00" points="1204.16,-5039.39 1211.63,-5046.91 1210.47,-5036.37 1204.16,-5039.39"/>
+<path fill="none" stroke="#28ff00" d="M1086.15,-423.19C1109.25,-421.03 1133.39,-418.79 1154.55,-416.82"/>
+<polygon fill="#28ff00" stroke="#28ff00" points="1155.05,-420.28 1164.69,-415.87 1154.4,-413.31 1155.05,-420.28"/>
 </g>
 <!-- proc~compute_dtgc_bspline_3d_scalar&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge183" class="edge">
 <title>proc~compute_dtgc_bspline_3d_scalar&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#28ff00" d="M1056.12,-4857.96C1096.52,-4850.44 1147.06,-4841.03 1180.61,-4834.78"/>
-<polygon fill="#28ff00" stroke="#28ff00" points="1181.67,-4838.14 1190.86,-4832.87 1180.39,-4831.26 1181.67,-4838.14"/>
+<path fill="none" stroke="#28ff00" d="M1079.92,-444.1C1083.61,-446.63 1087.01,-449.57 1090,-453 1125.39,-493.54 1115.98,-883.13 1126,-936 1145.83,-1040.66 1189.97,-1160.62 1208.52,-1208.57"/>
+<polygon fill="#28ff00" stroke="#28ff00" points="1205.28,-1209.88 1212.17,-1217.93 1211.8,-1207.34 1205.28,-1209.88"/>
 </g>
 <!-- proc~compute_dtgc_bspline_3d_vector -->
 <g id="call~~graph~~CallGraph_node113" class="node">
 <title>proc~compute_dtgc_bspline_3d_vector</title>
 <g id="a_call~~graph~~CallGraph_node113"><a xlink:href="../proc/compute_dtgc_bspline_3d_vector.html" xlink:title="compute_dTgc_bspline_3d_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1087,-4840 894,-4840 894,-4816 1087,-4816 1087,-4840"/>
-<text text-anchor="middle" x="990.5" y="-4825.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_bspline_3d_vector</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1087,-402 894,-402 894,-378 1087,-378 1087,-402"/>
+<text text-anchor="middle" x="990.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_bspline_3d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_dtgc_bspline_3d_vector&#45;&gt;proc~basis_bspline_der -->
 <g id="call~~graph~~CallGraph_edge184" class="edge">
 <title>proc~compute_dtgc_bspline_3d_vector&#45;&gt;proc~basis_bspline_der</title>
-<path fill="none" stroke="#24ff00" d="M1074.32,-4840.21C1079.86,-4842.65 1085.16,-4845.55 1090,-4849 1157.83,-4897.27 1196.1,-4994.19 1210.42,-5037.38"/>
-<polygon fill="#24ff00" stroke="#24ff00" points="1207.09,-5038.45 1213.48,-5046.91 1213.76,-5036.31 1207.09,-5038.45"/>
+<path fill="none" stroke="#24ff00" d="M1087.13,-398.91C1110.03,-401.04 1133.9,-403.26 1154.83,-405.21"/>
+<polygon fill="#24ff00" stroke="#24ff00" points="1154.57,-408.7 1164.85,-406.14 1155.22,-401.73 1154.57,-408.7"/>
 </g>
 <!-- proc~compute_dtgc_bspline_3d_vector&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge185" class="edge">
 <title>proc~compute_dtgc_bspline_3d_vector&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#24ff00" d="M1087.13,-4828C1120.11,-4828 1155.09,-4828 1180.43,-4828"/>
-<polygon fill="#24ff00" stroke="#24ff00" points="1180.67,-4831.5 1190.67,-4828 1180.67,-4824.5 1180.67,-4831.5"/>
+<path fill="none" stroke="#24ff00" d="M1079.94,-402.08C1083.63,-404.61 1087.02,-407.57 1090,-411 1128.32,-455.17 1115.28,-878.52 1126,-936 1145.52,-1040.72 1189.83,-1160.65 1208.48,-1208.58"/>
+<polygon fill="#24ff00" stroke="#24ff00" points="1205.24,-1209.9 1212.15,-1217.93 1211.75,-1207.35 1205.24,-1209.9"/>
 </g>
 <!-- proc~compute_dtgc_nurbs_1d_scalar -->
 <g id="call~~graph~~CallGraph_node114" class="node">
 <title>proc~compute_dtgc_nurbs_1d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node114"><a xlink:href="../proc/compute_dtgc_nurbs_1d_scalar.html" xlink:title="compute_dTgc_nurbs_1d_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1082,-5344 899,-5344 899,-5320 1082,-5320 1082,-5344"/>
-<text text-anchor="middle" x="990.5" y="-5329.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_nurbs_1d_scalar</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1082,-318 899,-318 899,-294 1082,-294 1082,-318"/>
+<text text-anchor="middle" x="990.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_nurbs_1d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_dtgc_nurbs_1d_scalar&#45;&gt;proc~basis_bspline_der -->
 <g id="call~~graph~~CallGraph_edge186" class="edge">
 <title>proc~compute_dtgc_nurbs_1d_scalar&#45;&gt;proc~basis_bspline_der</title>
-<path fill="none" stroke="#20ff00" d="M1075.11,-5319.98C1080.4,-5317.49 1085.43,-5314.52 1090,-5311 1167.72,-5251.05 1201.58,-5130.59 1212.62,-5081.05"/>
-<polygon fill="#20ff00" stroke="#20ff00" points="1216.09,-5081.59 1214.75,-5071.08 1209.24,-5080.13 1216.09,-5081.59"/>
+<path fill="none" stroke="#20ff00" d="M1063.49,-318.05C1072.57,-320.53 1081.62,-323.48 1090,-327 1129.9,-343.74 1170.71,-373.42 1194.94,-392.64"/>
+<polygon fill="#20ff00" stroke="#20ff00" points="1192.81,-395.42 1202.79,-398.97 1197.2,-389.97 1192.81,-395.42"/>
 </g>
 <!-- proc~compute_dtgc_nurbs_1d_vector -->
 <g id="call~~graph~~CallGraph_node115" class="node">
 <title>proc~compute_dtgc_nurbs_1d_vector</title>
 <g id="a_call~~graph~~CallGraph_node115"><a xlink:href="../proc/compute_dtgc_nurbs_1d_vector.html" xlink:title="compute_dTgc_nurbs_1d_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1082.5,-5302 898.5,-5302 898.5,-5278 1082.5,-5278 1082.5,-5302"/>
-<text text-anchor="middle" x="990.5" y="-5287.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_nurbs_1d_vector</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1082.5,-276 898.5,-276 898.5,-252 1082.5,-252 1082.5,-276"/>
+<text text-anchor="middle" x="990.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_nurbs_1d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_dtgc_nurbs_1d_vector&#45;&gt;proc~basis_bspline_der -->
 <g id="call~~graph~~CallGraph_edge187" class="edge">
 <title>proc~compute_dtgc_nurbs_1d_vector&#45;&gt;proc~basis_bspline_der</title>
-<path fill="none" stroke="#1cff00" d="M1074.32,-5277.79C1079.86,-5275.35 1085.16,-5272.45 1090,-5269 1157.83,-5220.73 1196.1,-5123.81 1210.42,-5080.62"/>
-<polygon fill="#1cff00" stroke="#1cff00" points="1213.76,-5081.69 1213.48,-5071.09 1207.09,-5079.55 1213.76,-5081.69"/>
+<path fill="none" stroke="#1cff00" d="M1069.12,-276.08C1076.38,-278.53 1083.46,-281.47 1090,-285 1138.56,-311.26 1180.92,-361.81 1202.27,-390.25"/>
+<polygon fill="#1cff00" stroke="#1cff00" points="1199.7,-392.66 1208.45,-398.64 1205.34,-388.52 1199.7,-392.66"/>
 </g>
 <!-- proc~compute_dtgc_nurbs_2d_scalar -->
 <g id="call~~graph~~CallGraph_node116" class="node">
 <title>proc~compute_dtgc_nurbs_2d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node116"><a xlink:href="../proc/compute_dtgc_nurbs_2d_scalar.html" xlink:title="compute_dTgc_nurbs_2d_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1082,-5134 899,-5134 899,-5110 1082,-5110 1082,-5134"/>
-<text text-anchor="middle" x="990.5" y="-5119.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_nurbs_2d_scalar</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1082,-360 899,-360 899,-336 1082,-336 1082,-360"/>
+<text text-anchor="middle" x="990.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_nurbs_2d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_dtgc_nurbs_2d_scalar&#45;&gt;proc~basis_bspline_der -->
 <g id="call~~graph~~CallGraph_edge188" class="edge">
 <title>proc~compute_dtgc_nurbs_2d_scalar&#45;&gt;proc~basis_bspline_der</title>
-<path fill="none" stroke="#17ff00" d="M1052.96,-5109.98C1065.29,-5107.27 1078.1,-5104.23 1090,-5101 1118.37,-5093.31 1149.73,-5082.96 1174.19,-5074.46"/>
-<polygon fill="#17ff00" stroke="#17ff00" points="1175.6,-5077.67 1183.88,-5071.06 1173.28,-5071.06 1175.6,-5077.67"/>
+<path fill="none" stroke="#17ff00" d="M1052.96,-360.02C1065.29,-362.73 1078.1,-365.77 1090,-369 1118.37,-376.69 1149.73,-387.04 1174.19,-395.54"/>
+<polygon fill="#17ff00" stroke="#17ff00" points="1173.28,-398.94 1183.88,-398.94 1175.6,-392.33 1173.28,-398.94"/>
 </g>
 <!-- proc~compute_dtgc_nurbs_2d_scalar&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge189" class="edge">
 <title>proc~compute_dtgc_nurbs_2d_scalar&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#17ff00" d="M1075.72,-5109.91C1080.8,-5107.43 1085.62,-5104.49 1090,-5101 1100.77,-5092.42 1179.89,-4912.92 1207.52,-4849.75"/>
-<polygon fill="#17ff00" stroke="#17ff00" points="1210.83,-4850.9 1211.63,-4840.34 1204.42,-4848.1 1210.83,-4850.9"/>
+<path fill="none" stroke="#17ff00" d="M1079.97,-360.06C1083.65,-362.6 1087.03,-365.56 1090,-369 1131.25,-416.79 1114.59,-873.91 1126,-936 1145.26,-1040.77 1189.71,-1160.67 1208.44,-1208.59"/>
+<polygon fill="#17ff00" stroke="#17ff00" points="1205.2,-1209.92 1212.12,-1217.94 1211.71,-1207.35 1205.2,-1209.92"/>
 </g>
 <!-- proc~compute_dtgc_nurbs_2d_vector -->
 <g id="call~~graph~~CallGraph_node117" class="node">
 <title>proc~compute_dtgc_nurbs_2d_vector</title>
 <g id="a_call~~graph~~CallGraph_node117"><a xlink:href="../proc/compute_dtgc_nurbs_2d_vector.html" xlink:title="compute_dTgc_nurbs_2d_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1082.5,-5092 898.5,-5092 898.5,-5068 1082.5,-5068 1082.5,-5092"/>
-<text text-anchor="middle" x="990.5" y="-5077.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_nurbs_2d_vector</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1082.5,-822 898.5,-822 898.5,-798 1082.5,-798 1082.5,-822"/>
+<text text-anchor="middle" x="990.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_nurbs_2d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_dtgc_nurbs_2d_vector&#45;&gt;proc~basis_bspline_der -->
 <g id="call~~graph~~CallGraph_edge190" class="edge">
 <title>proc~compute_dtgc_nurbs_2d_vector&#45;&gt;proc~basis_bspline_der</title>
-<path fill="none" stroke="#13ff00" d="M1082.57,-5071.52C1106.84,-5069.26 1132.51,-5066.87 1154.84,-5064.79"/>
-<polygon fill="#13ff00" stroke="#13ff00" points="1155.21,-5068.27 1164.85,-5063.86 1154.56,-5061.3 1155.21,-5068.27"/>
+<path fill="none" stroke="#13ff00" d="M1077.11,-797.96C1081.74,-795.45 1086.09,-792.49 1090,-789 1198.91,-691.86 1214.57,-498.39 1216.71,-433.1"/>
+<polygon fill="#13ff00" stroke="#13ff00" points="1220.21,-433.19 1216.96,-423.1 1213.21,-433.01 1220.21,-433.19"/>
 </g>
 <!-- proc~compute_dtgc_nurbs_2d_vector&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge191" class="edge">
 <title>proc~compute_dtgc_nurbs_2d_vector&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#13ff00" d="M1074.97,-5067.79C1080.29,-5065.34 1085.37,-5062.44 1090,-5059 1162.6,-5005.05 1198.8,-4896.7 1211.53,-4850.12"/>
-<polygon fill="#13ff00" stroke="#13ff00" points="1214.99,-4850.73 1214.15,-4840.17 1208.22,-4848.95 1214.99,-4850.73"/>
+<path fill="none" stroke="#13ff00" d="M1077.63,-822.22C1082.07,-824.69 1086.24,-827.59 1090,-831 1093.69,-834.35 1184.32,-1124.98 1210.18,-1208.05"/>
+<polygon fill="#13ff00" stroke="#13ff00" points="1206.88,-1209.23 1213.19,-1217.74 1213.56,-1207.15 1206.88,-1209.23"/>
 </g>
 <!-- proc~compute_dtgc_nurbs_3d_scalar -->
 <g id="call~~graph~~CallGraph_node118" class="node">
 <title>proc~compute_dtgc_nurbs_3d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node118"><a xlink:href="../proc/compute_dtgc_nurbs_3d_scalar.html" xlink:title="compute_dTgc_nurbs_3d_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="1082,-5050 899,-5050 899,-5026 1082,-5026 1082,-5050"/>
-<text text-anchor="middle" x="990.5" y="-5035.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_nurbs_3d_scalar</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1082,-780 899,-780 899,-756 1082,-756 1082,-780"/>
+<text text-anchor="middle" x="990.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_nurbs_3d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_dtgc_nurbs_3d_scalar&#45;&gt;proc~basis_bspline_der -->
 <g id="call~~graph~~CallGraph_edge192" class="edge">
 <title>proc~compute_dtgc_nurbs_3d_scalar&#45;&gt;proc~basis_bspline_der</title>
-<path fill="none" stroke="#0fff00" d="M1082.24,-5046.45C1106.55,-5048.71 1132.27,-5051.11 1154.66,-5053.19"/>
-<polygon fill="#0fff00" stroke="#0fff00" points="1154.41,-5056.69 1164.69,-5054.13 1155.06,-5049.72 1154.41,-5056.69"/>
+<path fill="none" stroke="#0fff00" d="M1076.96,-755.79C1081.62,-753.32 1086.02,-750.42 1090,-747 1188.21,-662.63 1210.65,-494.11 1215.63,-433.43"/>
+<polygon fill="#0fff00" stroke="#0fff00" points="1219.15,-433.32 1216.39,-423.09 1212.17,-432.8 1219.15,-433.32"/>
 </g>
 <!-- proc~compute_dtgc_nurbs_3d_scalar&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge193" class="edge">
 <title>proc~compute_dtgc_nurbs_3d_scalar&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#0fff00" d="M1073.15,-5025.94C1079.09,-5023.48 1084.79,-5020.53 1090,-5017 1152.83,-4974.51 1192.81,-4889.56 1208.91,-4849.65"/>
-<polygon fill="#0fff00" stroke="#0fff00" points="1212.26,-4850.68 1212.65,-4840.09 1205.75,-4848.13 1212.26,-4850.68"/>
+<path fill="none" stroke="#0fff00" d="M1078.36,-780.19C1082.56,-782.68 1086.49,-785.59 1090,-789 1138.27,-835.84 1108.05,-871.18 1126,-936 1154.37,-1038.45 1193.61,-1159.23 1209.68,-1207.97"/>
+<polygon fill="#0fff00" stroke="#0fff00" points="1206.46,-1209.36 1212.92,-1217.75 1213.1,-1207.16 1206.46,-1209.36"/>
 </g>
 <!-- proc~compute_dtgc_nurbs_3d_vector -->
 <g id="call~~graph~~CallGraph_node119" class="node">
 <title>proc~compute_dtgc_nurbs_3d_vector</title>
 <g id="a_call~~graph~~CallGraph_node119"><a xlink:href="../proc/compute_dtgc_nurbs_3d_vector.html" xlink:title="compute_dTgc_nurbs_3d_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="1082.5,-5008 898.5,-5008 898.5,-4984 1082.5,-4984 1082.5,-5008"/>
-<text text-anchor="middle" x="990.5" y="-4993.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_nurbs_3d_vector</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1082.5,-738 898.5,-738 898.5,-714 1082.5,-714 1082.5,-738"/>
+<text text-anchor="middle" x="990.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc_nurbs_3d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_dtgc_nurbs_3d_vector&#45;&gt;proc~basis_bspline_der -->
 <g id="call~~graph~~CallGraph_edge194" class="edge">
 <title>proc~compute_dtgc_nurbs_3d_vector&#45;&gt;proc~basis_bspline_der</title>
-<path fill="none" stroke="#0bff00" d="M1052.96,-5008.02C1065.29,-5010.73 1078.1,-5013.77 1090,-5017 1118.37,-5024.69 1149.73,-5035.04 1174.19,-5043.54"/>
-<polygon fill="#0bff00" stroke="#0bff00" points="1173.28,-5046.94 1183.88,-5046.94 1175.6,-5040.33 1173.28,-5046.94"/>
+<path fill="none" stroke="#0bff00" d="M1076.3,-713.81C1081.19,-711.35 1085.81,-708.44 1090,-705 1177.91,-632.96 1206.4,-488.51 1214.32,-433.22"/>
+<polygon fill="#0bff00" stroke="#0bff00" points="1217.81,-433.5 1215.67,-423.12 1210.87,-432.57 1217.81,-433.5"/>
 </g>
 <!-- proc~compute_dtgc_nurbs_3d_vector&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge195" class="edge">
 <title>proc~compute_dtgc_nurbs_3d_vector&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#0bff00" d="M1070.68,-4983.98C1077.44,-4981.52 1083.98,-4978.56 1090,-4975 1143.37,-4943.43 1185.58,-4881.39 1205.14,-4848.92"/>
-<polygon fill="#0bff00" stroke="#0bff00" points="1208.2,-4850.63 1210.26,-4840.23 1202.17,-4847.07 1208.2,-4850.63"/>
+<path fill="none" stroke="#0bff00" d="M1079.02,-738.25C1083,-740.73 1086.7,-743.63 1090,-747 1149.8,-808.12 1105.33,-853.03 1126,-936 1151.7,-1039.15 1192.42,-1159.54 1209.29,-1208.08"/>
+<polygon fill="#0bff00" stroke="#0bff00" points="1206.09,-1209.53 1212.69,-1217.82 1212.7,-1207.22 1206.09,-1209.53"/>
 </g>
 <!-- proc~compute_knot_vector -->
 <g id="call~~graph~~CallGraph_node120" class="node">
 <title>proc~compute_knot_vector</title>
 <g id="a_call~~graph~~CallGraph_node120"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1491,-2470 1364,-2470 1364,-2446 1491,-2446 1491,-2470"/>
-<text text-anchor="middle" x="1427.5" y="-2455.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1491,-4390 1364,-4390 1364,-4366 1491,-4366 1491,-4390"/>
+<text text-anchor="middle" x="1427.5" y="-4375.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
@@ -4920,938 +4920,938 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node282" class="node">
 <title>proc~repelem</title>
 <g id="a_call~~graph~~CallGraph_node282"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1662.5,-2512 1605.5,-2512 1605.5,-2488 1662.5,-2488 1662.5,-2512"/>
-<text text-anchor="middle" x="1634" y="-2497.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1662.5,-4390 1605.5,-4390 1605.5,-4366 1662.5,-4366 1662.5,-4390"/>
+<text text-anchor="middle" x="1634" y="-4375.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
 <g id="call~~graph~~CallGraph_edge196" class="edge">
 <title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#07ff00" d="M1487.1,-2470.04C1521.84,-2477.17 1564.85,-2486 1595.14,-2492.22"/>
-<polygon fill="#07ff00" stroke="#07ff00" points="1594.79,-2495.73 1605.29,-2494.31 1596.2,-2488.87 1594.79,-2495.73"/>
+<path fill="none" stroke="#07ff00" d="M1491.25,-4378C1525.23,-4378 1566.1,-4378 1595.2,-4378"/>
+<polygon fill="#07ff00" stroke="#07ff00" points="1595.36,-4381.5 1605.36,-4378 1595.35,-4374.5 1595.36,-4381.5"/>
 </g>
 <!-- proc~compute_tgc_bspline_1d_scalar -->
 <g id="call~~graph~~CallGraph_node123" class="node">
 <title>proc~compute_tgc_bspline_1d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node123"><a xlink:href="../proc/compute_tgc_bspline_1d_scalar.html" xlink:title="compute_Tgc_bspline_1d_scalar">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1082.5,-3874 898.5,-3874 898.5,-3850 1082.5,-3850 1082.5,-3874"/>
-<text text-anchor="middle" x="990.5" y="-3859.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_bspline_1d_scalar</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1082.5,-1998 898.5,-1998 898.5,-1974 1082.5,-1974 1082.5,-1998"/>
+<text text-anchor="middle" x="990.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_bspline_1d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_tgc_bspline_1d_scalar&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge197" class="edge">
 <title>proc~compute_tgc_bspline_1d_scalar&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff05" d="M1077.75,-3874.09C1082.16,-3876.59 1086.29,-3879.54 1090,-3883 1132.56,-3922.75 1108.79,-3953.36 1126,-4009 1155.11,-4103.09 1193.35,-4214.17 1209.4,-4260.27"/>
-<polygon fill="#00ff05" stroke="#00ff05" points="1206.13,-4261.53 1212.73,-4269.82 1212.74,-4259.22 1206.13,-4261.53"/>
+<path fill="none" stroke="#00ff05" d="M1075.72,-1973.91C1080.8,-1971.43 1085.62,-1968.49 1090,-1965 1172.83,-1899.01 1204.1,-1766.5 1213.54,-1714.07"/>
+<polygon fill="#00ff05" stroke="#00ff05" points="1217,-1714.6 1215.23,-1704.16 1210.1,-1713.42 1217,-1714.6"/>
 </g>
 <!-- proc~compute_tgc_bspline_1d_vector -->
 <g id="call~~graph~~CallGraph_node124" class="node">
 <title>proc~compute_tgc_bspline_1d_vector</title>
 <g id="a_call~~graph~~CallGraph_node124"><a xlink:href="../proc/compute_tgc_bspline_1d_vector.html" xlink:title="compute_Tgc_bspline_1d_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1083.5,-3832 897.5,-3832 897.5,-3808 1083.5,-3808 1083.5,-3832"/>
-<text text-anchor="middle" x="990.5" y="-3817.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_bspline_1d_vector</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1083.5,-1956 897.5,-1956 897.5,-1932 1083.5,-1932 1083.5,-1956"/>
+<text text-anchor="middle" x="990.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_bspline_1d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_tgc_bspline_1d_vector&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge198" class="edge">
 <title>proc~compute_tgc_bspline_1d_vector&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff09" d="M1078.48,-3832.07C1082.65,-3834.59 1086.54,-3837.54 1090,-3841 1144.02,-3894.97 1105.9,-3935.33 1126,-4009 1151.93,-4104.02 1191.89,-4214.59 1208.89,-4260.41"/>
-<polygon fill="#00ff09" stroke="#00ff09" points="1205.66,-4261.76 1212.43,-4269.9 1212.22,-4259.31 1205.66,-4261.76"/>
+<path fill="none" stroke="#00ff09" d="M1074.97,-1931.79C1080.29,-1929.34 1085.37,-1926.44 1090,-1923 1162.6,-1869.05 1198.8,-1760.7 1211.53,-1714.12"/>
+<polygon fill="#00ff09" stroke="#00ff09" points="1214.99,-1714.73 1214.15,-1704.17 1208.22,-1712.95 1214.99,-1714.73"/>
 </g>
 <!-- proc~compute_tgc_bspline_2d_scalar -->
 <g id="call~~graph~~CallGraph_node125" class="node">
 <title>proc~compute_tgc_bspline_2d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node125"><a xlink:href="../proc/compute_tgc_bspline_2d_scalar.html" xlink:title="compute_Tgc_bspline_2d_scalar">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1082.5,-4462 898.5,-4462 898.5,-4438 1082.5,-4438 1082.5,-4462"/>
-<text text-anchor="middle" x="990.5" y="-4447.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_bspline_2d_scalar</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1082.5,-1242 898.5,-1242 898.5,-1218 1082.5,-1218 1082.5,-1242"/>
+<text text-anchor="middle" x="990.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_bspline_2d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_tgc_bspline_2d_scalar&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge199" class="edge">
 <title>proc~compute_tgc_bspline_2d_scalar&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff0e" d="M1070.68,-4437.98C1077.44,-4435.52 1083.98,-4432.56 1090,-4429 1143.37,-4397.43 1185.58,-4335.39 1205.14,-4302.92"/>
-<polygon fill="#00ff0e" stroke="#00ff0e" points="1208.2,-4304.63 1210.26,-4294.23 1202.17,-4301.07 1208.2,-4304.63"/>
+<path fill="none" stroke="#00ff0e" d="M1077.74,-1242.1C1082.16,-1244.6 1086.29,-1247.54 1090,-1251 1153.6,-1310.28 1201.06,-1588.97 1213.68,-1669.91"/>
+<polygon fill="#00ff0e" stroke="#00ff0e" points="1210.24,-1670.62 1215.22,-1679.98 1217.16,-1669.56 1210.24,-1670.62"/>
 </g>
 <!-- proc~compute_tgc_bspline_2d_scalar&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge200" class="edge">
 <title>proc~compute_tgc_bspline_2d_scalar&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff0e" d="M1077.03,-4462.12C1081.68,-4464.61 1086.05,-4467.54 1090,-4471 1193.62,-4561.79 1212.7,-4742.95 1216.21,-4805.87"/>
-<polygon fill="#00ff0e" stroke="#00ff0e" points="1212.71,-4806.05 1216.69,-4815.87 1219.7,-4805.72 1212.71,-4806.05"/>
+<path fill="none" stroke="#00ff0e" d="M1082.57,-1230C1116.95,-1230 1154.12,-1230 1180.65,-1230"/>
+<polygon fill="#00ff0e" stroke="#00ff0e" points="1180.97,-1233.5 1190.97,-1230 1180.97,-1226.5 1180.97,-1233.5"/>
 </g>
 <!-- proc~compute_tgc_bspline_2d_vector -->
 <g id="call~~graph~~CallGraph_node126" class="node">
 <title>proc~compute_tgc_bspline_2d_vector</title>
 <g id="a_call~~graph~~CallGraph_node126"><a xlink:href="../proc/compute_tgc_bspline_2d_vector.html" xlink:title="compute_Tgc_bspline_2d_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1083.5,-4420 897.5,-4420 897.5,-4396 1083.5,-4396 1083.5,-4420"/>
-<text text-anchor="middle" x="990.5" y="-4405.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_bspline_2d_vector</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1083.5,-1200 897.5,-1200 897.5,-1176 1083.5,-1176 1083.5,-1200"/>
+<text text-anchor="middle" x="990.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_bspline_2d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_tgc_bspline_2d_vector&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge201" class="edge">
 <title>proc~compute_tgc_bspline_2d_vector&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff12" d="M1066.73,-4395.94C1074.77,-4393.49 1082.68,-4390.54 1090,-4387 1134.2,-4365.63 1176.21,-4325.73 1199.1,-4301.74"/>
-<polygon fill="#00ff12" stroke="#00ff12" points="1201.82,-4303.96 1206.11,-4294.27 1196.72,-4299.17 1201.82,-4303.96"/>
+<path fill="none" stroke="#00ff12" d="M1078.29,-1200.26C1082.51,-1202.73 1086.46,-1205.62 1090,-1209 1158.97,-1274.79 1203.15,-1583.84 1214.25,-1669.78"/>
+<polygon fill="#00ff12" stroke="#00ff12" points="1210.78,-1670.27 1215.51,-1679.75 1217.72,-1669.39 1210.78,-1670.27"/>
 </g>
 <!-- proc~compute_tgc_bspline_2d_vector&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge202" class="edge">
 <title>proc~compute_tgc_bspline_2d_vector&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff12" d="M1077.63,-4420.22C1082.07,-4422.69 1086.24,-4425.59 1090,-4429 1204.05,-4532.38 1216.32,-4737.72 1217.15,-4805.62"/>
-<polygon fill="#00ff12" stroke="#00ff12" points="1213.65,-4806 1217.2,-4815.98 1220.65,-4805.97 1213.65,-4806"/>
+<path fill="none" stroke="#00ff12" d="M1056.12,-1200.04C1096.52,-1207.56 1147.06,-1216.97 1180.61,-1223.22"/>
+<polygon fill="#00ff12" stroke="#00ff12" points="1180.39,-1226.74 1190.86,-1225.13 1181.67,-1219.86 1180.39,-1226.74"/>
 </g>
 <!-- proc~compute_tgc_bspline_3d_scalar -->
 <g id="call~~graph~~CallGraph_node127" class="node">
 <title>proc~compute_tgc_bspline_3d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node127"><a xlink:href="../proc/compute_tgc_bspline_3d_scalar.html" xlink:title="compute_Tgc_bspline_3d_scalar">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1082.5,-4378 898.5,-4378 898.5,-4354 1082.5,-4354 1082.5,-4378"/>
-<text text-anchor="middle" x="990.5" y="-4363.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_bspline_3d_scalar</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1082.5,-1830 898.5,-1830 898.5,-1806 1082.5,-1806 1082.5,-1830"/>
+<text text-anchor="middle" x="990.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_bspline_3d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_tgc_bspline_3d_scalar&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge203" class="edge">
 <title>proc~compute_tgc_bspline_3d_scalar&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff16" d="M1058.88,-4353.99C1069.42,-4351.44 1080.09,-4348.45 1090,-4345 1124.83,-4332.86 1162.4,-4313.35 1187.57,-4299.25"/>
-<polygon fill="#00ff16" stroke="#00ff16" points="1189.61,-4302.12 1196.58,-4294.14 1186.15,-4296.03 1189.61,-4302.12"/>
+<path fill="none" stroke="#00ff16" d="M1066.73,-1805.94C1074.77,-1803.49 1082.68,-1800.54 1090,-1797 1134.2,-1775.63 1176.21,-1735.73 1199.1,-1711.74"/>
+<polygon fill="#00ff16" stroke="#00ff16" points="1201.82,-1713.96 1206.11,-1704.27 1196.72,-1709.17 1201.82,-1713.96"/>
 </g>
 <!-- proc~compute_tgc_bspline_3d_scalar&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge204" class="edge">
 <title>proc~compute_tgc_bspline_3d_scalar&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff16" d="M1077.74,-4378.1C1082.16,-4380.6 1086.29,-4383.54 1090,-4387 1153.6,-4446.28 1201.06,-4724.97 1213.68,-4805.91"/>
-<polygon fill="#00ff16" stroke="#00ff16" points="1210.24,-4806.62 1215.22,-4815.98 1217.16,-4805.56 1210.24,-4806.62"/>
+<path fill="none" stroke="#00ff16" d="M1078.44,-1805.89C1082.62,-1803.39 1086.52,-1800.44 1090,-1797 1100.1,-1787.01 1190.78,-1355.48 1212.39,-1252.09"/>
+<polygon fill="#00ff16" stroke="#00ff16" points="1215.85,-1252.63 1214.47,-1242.13 1209,-1251.2 1215.85,-1252.63"/>
 </g>
 <!-- proc~compute_tgc_bspline_3d_vector -->
 <g id="call~~graph~~CallGraph_node128" class="node">
 <title>proc~compute_tgc_bspline_3d_vector</title>
 <g id="a_call~~graph~~CallGraph_node128"><a xlink:href="../proc/compute_tgc_bspline_3d_vector.html" xlink:title="compute_Tgc_bspline_3d_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1083.5,-4336 897.5,-4336 897.5,-4312 1083.5,-4312 1083.5,-4336"/>
-<text text-anchor="middle" x="990.5" y="-4321.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_bspline_3d_vector</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1083.5,-1788 897.5,-1788 897.5,-1764 1083.5,-1764 1083.5,-1788"/>
+<text text-anchor="middle" x="990.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_bspline_3d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_tgc_bspline_3d_vector&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge205" class="edge">
 <title>proc~compute_tgc_bspline_3d_vector&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff1a" d="M1056.12,-4311.96C1091,-4305.47 1133.44,-4297.56 1165.97,-4291.5"/>
-<polygon fill="#00ff1a" stroke="#00ff1a" points="1166.98,-4294.88 1176.17,-4289.61 1165.69,-4288 1166.98,-4294.88"/>
+<path fill="none" stroke="#00ff1a" d="M1058.88,-1763.99C1069.42,-1761.44 1080.09,-1758.45 1090,-1755 1124.83,-1742.86 1162.4,-1723.35 1187.57,-1709.25"/>
+<polygon fill="#00ff1a" stroke="#00ff1a" points="1189.61,-1712.12 1196.58,-1704.14 1186.15,-1706.03 1189.61,-1712.12"/>
 </g>
 <!-- proc~compute_tgc_bspline_3d_vector&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge206" class="edge">
 <title>proc~compute_tgc_bspline_3d_vector&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff1a" d="M1078.29,-4336.26C1082.51,-4338.73 1086.46,-4341.62 1090,-4345 1158.97,-4410.79 1203.15,-4719.84 1214.25,-4805.78"/>
-<polygon fill="#00ff1a" stroke="#00ff1a" points="1210.78,-4806.27 1215.51,-4815.75 1217.72,-4805.39 1210.78,-4806.27"/>
+<path fill="none" stroke="#00ff1a" d="M1078.37,-1763.82C1082.57,-1761.33 1086.49,-1758.41 1090,-1755 1127.41,-1718.59 1195.83,-1348.28 1213.01,-1252.51"/>
+<polygon fill="#00ff1a" stroke="#00ff1a" points="1216.49,-1252.92 1214.8,-1242.47 1209.6,-1251.69 1216.49,-1252.92"/>
 </g>
 <!-- proc~compute_tgc_nurbs_1d_scalar -->
 <g id="call~~graph~~CallGraph_node129" class="node">
 <title>proc~compute_tgc_nurbs_1d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node129"><a xlink:href="../proc/compute_tgc_nurbs_1d_scalar.html" xlink:title="compute_Tgc_nurbs_1d_scalar">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1078.5,-3790 902.5,-3790 902.5,-3766 1078.5,-3766 1078.5,-3790"/>
-<text text-anchor="middle" x="990.5" y="-3775.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_nurbs_1d_scalar</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1078.5,-1914 902.5,-1914 902.5,-1890 1078.5,-1890 1078.5,-1914"/>
+<text text-anchor="middle" x="990.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_nurbs_1d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_tgc_nurbs_1d_scalar&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge207" class="edge">
 <title>proc~compute_tgc_nurbs_1d_scalar&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff1e" d="M1078.65,-3789.9C1082.78,-3792.46 1086.61,-3795.47 1090,-3799 1155.6,-3867.29 1102.96,-3917.15 1126,-4009 1149.96,-4104.53 1190.99,-4214.83 1208.58,-4260.49"/>
-<polygon fill="#00ff1e" stroke="#00ff1e" points="1205.37,-4261.89 1212.25,-4269.95 1211.9,-4259.36 1205.37,-4261.89"/>
+<path fill="none" stroke="#00ff1e" d="M1073.15,-1889.94C1079.09,-1887.48 1084.79,-1884.53 1090,-1881 1152.83,-1838.51 1192.81,-1753.56 1208.91,-1713.65"/>
+<polygon fill="#00ff1e" stroke="#00ff1e" points="1212.26,-1714.68 1212.65,-1704.09 1205.75,-1712.13 1212.26,-1714.68"/>
 </g>
 <!-- proc~compute_tgc_nurbs_1d_vector -->
 <g id="call~~graph~~CallGraph_node130" class="node">
 <title>proc~compute_tgc_nurbs_1d_vector</title>
 <g id="a_call~~graph~~CallGraph_node130"><a xlink:href="../proc/compute_tgc_nurbs_1d_vector.html" xlink:title="compute_Tgc_nurbs_1d_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1079.5,-3748 901.5,-3748 901.5,-3724 1079.5,-3724 1079.5,-3748"/>
-<text text-anchor="middle" x="990.5" y="-3733.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_nurbs_1d_vector</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1079.5,-2166 901.5,-2166 901.5,-2142 1079.5,-2142 1079.5,-2166"/>
+<text text-anchor="middle" x="990.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_nurbs_1d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_tgc_nurbs_1d_vector&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge208" class="edge">
 <title>proc~compute_tgc_nurbs_1d_vector&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff23" d="M1079.21,-3748.07C1083.14,-3750.59 1086.78,-3753.55 1090,-3757 1128.61,-3798.34 1113,-3953.94 1126,-4009 1148.63,-4104.86 1190.37,-4214.98 1208.37,-4260.55"/>
-<polygon fill="#00ff23" stroke="#00ff23" points="1205.18,-4261.98 1212.12,-4269.98 1211.68,-4259.4 1205.18,-4261.98"/>
+<path fill="none" stroke="#00ff23" d="M1077.74,-2141.9C1082.16,-2139.4 1086.29,-2136.46 1090,-2133 1153.6,-2073.72 1201.06,-1795.03 1213.68,-1714.09"/>
+<polygon fill="#00ff23" stroke="#00ff23" points="1217.16,-1714.44 1215.22,-1704.02 1210.24,-1713.38 1217.16,-1714.44"/>
 </g>
 <!-- proc~compute_tgc_nurbs_2d_scalar -->
 <g id="call~~graph~~CallGraph_node131" class="node">
 <title>proc~compute_tgc_nurbs_2d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node131"><a xlink:href="../proc/compute_tgc_nurbs_2d_scalar.html" xlink:title="compute_Tgc_nurbs_2d_scalar">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1078.5,-4294 902.5,-4294 902.5,-4270 1078.5,-4270 1078.5,-4294"/>
-<text text-anchor="middle" x="990.5" y="-4279.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_nurbs_2d_scalar</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1078.5,-1746 902.5,-1746 902.5,-1722 1078.5,-1722 1078.5,-1746"/>
+<text text-anchor="middle" x="990.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_nurbs_2d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_tgc_nurbs_2d_scalar&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge209" class="edge">
 <title>proc~compute_tgc_nurbs_2d_scalar&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff27" d="M1078.68,-4282C1108.2,-4282 1140.19,-4282 1165.96,-4282"/>
-<polygon fill="#00ff27" stroke="#00ff27" points="1166.24,-4285.5 1176.24,-4282 1166.24,-4278.5 1166.24,-4285.5"/>
+<path fill="none" stroke="#00ff27" d="M1056.12,-1721.96C1091,-1715.47 1133.44,-1707.56 1165.97,-1701.5"/>
+<polygon fill="#00ff27" stroke="#00ff27" points="1166.98,-1704.88 1176.17,-1699.61 1165.69,-1698 1166.98,-1704.88"/>
 </g>
 <!-- proc~compute_tgc_nurbs_2d_scalar&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge210" class="edge">
 <title>proc~compute_tgc_nurbs_2d_scalar&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff27" d="M1078.37,-4294.18C1082.57,-4296.67 1086.49,-4299.59 1090,-4303 1164.36,-4375.35 1205.05,-4714.85 1214.73,-4805.63"/>
-<polygon fill="#00ff27" stroke="#00ff27" points="1211.25,-4806.07 1215.78,-4815.65 1218.22,-4805.34 1211.25,-4806.07"/>
+<path fill="none" stroke="#00ff27" d="M1078.29,-1721.74C1082.51,-1719.27 1086.46,-1716.38 1090,-1713 1158.97,-1647.21 1203.15,-1338.16 1214.25,-1252.22"/>
+<polygon fill="#00ff27" stroke="#00ff27" points="1217.72,-1252.61 1215.51,-1242.25 1210.78,-1251.73 1217.72,-1252.61"/>
 </g>
 <!-- proc~compute_tgc_nurbs_2d_vector -->
 <g id="call~~graph~~CallGraph_node132" class="node">
 <title>proc~compute_tgc_nurbs_2d_vector</title>
 <g id="a_call~~graph~~CallGraph_node132"><a xlink:href="../proc/compute_tgc_nurbs_2d_vector.html" xlink:title="compute_Tgc_nurbs_2d_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1079.5,-4252 901.5,-4252 901.5,-4228 1079.5,-4228 1079.5,-4252"/>
-<text text-anchor="middle" x="990.5" y="-4237.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_nurbs_2d_vector</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1079.5,-1704 901.5,-1704 901.5,-1680 1079.5,-1680 1079.5,-1704"/>
+<text text-anchor="middle" x="990.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_nurbs_2d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_tgc_nurbs_2d_vector&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge211" class="edge">
 <title>proc~compute_tgc_nurbs_2d_vector&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff2b" d="M1056.12,-4252.04C1091,-4258.53 1133.44,-4266.44 1165.97,-4272.5"/>
-<polygon fill="#00ff2b" stroke="#00ff2b" points="1165.69,-4276 1176.17,-4274.39 1166.98,-4269.12 1165.69,-4276"/>
+<path fill="none" stroke="#00ff2b" d="M1079.65,-1692C1108.97,-1692 1140.61,-1692 1166.13,-1692"/>
+<polygon fill="#00ff2b" stroke="#00ff2b" points="1166.31,-1695.5 1176.31,-1692 1166.31,-1688.5 1166.31,-1695.5"/>
 </g>
 <!-- proc~compute_tgc_nurbs_2d_vector&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge212" class="edge">
 <title>proc~compute_tgc_nurbs_2d_vector&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff2b" d="M1078.44,-4252.11C1082.62,-4254.61 1086.52,-4257.56 1090,-4261 1169.83,-4340.01 1206.87,-4710.59 1215.16,-4805.7"/>
-<polygon fill="#00ff2b" stroke="#00ff2b" points="1211.68,-4806.01 1216.01,-4815.67 1218.65,-4805.41 1211.68,-4806.01"/>
+<path fill="none" stroke="#00ff2b" d="M1077.74,-1679.9C1082.16,-1677.4 1086.29,-1674.46 1090,-1671 1153.6,-1611.72 1201.06,-1333.03 1213.68,-1252.09"/>
+<polygon fill="#00ff2b" stroke="#00ff2b" points="1217.16,-1252.44 1215.22,-1242.02 1210.24,-1251.38 1217.16,-1252.44"/>
 </g>
 <!-- proc~compute_tgc_nurbs_3d_scalar -->
 <g id="call~~graph~~CallGraph_node133" class="node">
 <title>proc~compute_tgc_nurbs_3d_scalar</title>
 <g id="a_call~~graph~~CallGraph_node133"><a xlink:href="../proc/compute_tgc_nurbs_3d_scalar.html" xlink:title="compute_Tgc_nurbs_3d_scalar">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1078.5,-4210 902.5,-4210 902.5,-4186 1078.5,-4186 1078.5,-4210"/>
-<text text-anchor="middle" x="990.5" y="-4195.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_nurbs_3d_scalar</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1078.5,-1662 902.5,-1662 902.5,-1638 1078.5,-1638 1078.5,-1662"/>
+<text text-anchor="middle" x="990.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_nurbs_3d_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_tgc_nurbs_3d_scalar&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge213" class="edge">
 <title>proc~compute_tgc_nurbs_3d_scalar&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff2f" d="M1058.88,-4210.01C1069.42,-4212.56 1080.09,-4215.55 1090,-4219 1124.83,-4231.14 1162.4,-4250.65 1187.57,-4264.75"/>
-<polygon fill="#00ff2f" stroke="#00ff2f" points="1186.15,-4267.97 1196.58,-4269.86 1189.61,-4261.88 1186.15,-4267.97"/>
+<path fill="none" stroke="#00ff2f" d="M1056.12,-1662.04C1091,-1668.53 1133.44,-1676.44 1165.97,-1682.5"/>
+<polygon fill="#00ff2f" stroke="#00ff2f" points="1165.69,-1686 1176.17,-1684.39 1166.98,-1679.12 1165.69,-1686"/>
 </g>
 <!-- proc~compute_tgc_nurbs_3d_scalar&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge214" class="edge">
 <title>proc~compute_tgc_nurbs_3d_scalar&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff2f" d="M1078.5,-4210.04C1082.67,-4212.57 1086.55,-4215.53 1090,-4219 1132.92,-4262.11 1198.65,-4701 1213.81,-4805.67"/>
-<polygon fill="#00ff2f" stroke="#00ff2f" points="1210.37,-4806.35 1215.26,-4815.75 1217.3,-4805.35 1210.37,-4806.35"/>
+<path fill="none" stroke="#00ff2f" d="M1077.63,-1637.78C1082.07,-1635.31 1086.24,-1632.41 1090,-1629 1204.05,-1525.62 1216.32,-1320.28 1217.15,-1252.38"/>
+<polygon fill="#00ff2f" stroke="#00ff2f" points="1220.65,-1252.03 1217.2,-1242.02 1213.65,-1252 1220.65,-1252.03"/>
 </g>
 <!-- proc~compute_tgc_nurbs_3d_vector -->
 <g id="call~~graph~~CallGraph_node134" class="node">
 <title>proc~compute_tgc_nurbs_3d_vector</title>
 <g id="a_call~~graph~~CallGraph_node134"><a xlink:href="../proc/compute_tgc_nurbs_3d_vector.html" xlink:title="compute_Tgc_nurbs_3d_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1079.5,-4168 901.5,-4168 901.5,-4144 1079.5,-4144 1079.5,-4168"/>
-<text text-anchor="middle" x="990.5" y="-4153.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_nurbs_3d_vector</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1079.5,-1452 901.5,-1452 901.5,-1428 1079.5,-1428 1079.5,-1452"/>
+<text text-anchor="middle" x="990.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc_nurbs_3d_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_tgc_nurbs_3d_vector&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge215" class="edge">
 <title>proc~compute_tgc_nurbs_3d_vector&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff34" d="M1066.73,-4168.06C1074.77,-4170.51 1082.68,-4173.46 1090,-4177 1134.2,-4198.37 1176.21,-4238.27 1199.1,-4262.26"/>
-<polygon fill="#00ff34" stroke="#00ff34" points="1196.72,-4264.83 1206.11,-4269.73 1201.82,-4260.04 1196.72,-4264.83"/>
+<path fill="none" stroke="#00ff34" d="M1074.97,-1452.21C1080.29,-1454.66 1085.37,-1457.56 1090,-1461 1162.6,-1514.95 1198.8,-1623.3 1211.53,-1669.88"/>
+<polygon fill="#00ff34" stroke="#00ff34" points="1208.22,-1671.05 1214.15,-1679.83 1214.99,-1669.27 1208.22,-1671.05"/>
 </g>
 <!-- proc~compute_tgc_nurbs_3d_vector&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge216" class="edge">
 <title>proc~compute_tgc_nurbs_3d_vector&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff34" d="M1079,-4168.27C1082.98,-4170.74 1086.69,-4173.63 1090,-4177 1112.9,-4200.3 1195.01,-4693.95 1213.35,-4805.66"/>
-<polygon fill="#00ff34" stroke="#00ff34" points="1209.94,-4806.48 1215.01,-4815.79 1216.85,-4805.35 1209.94,-4806.48"/>
+<path fill="none" stroke="#00ff34" d="M1073.15,-1427.94C1079.09,-1425.48 1084.79,-1422.53 1090,-1419 1152.83,-1376.51 1192.81,-1291.56 1208.91,-1251.65"/>
+<polygon fill="#00ff34" stroke="#00ff34" points="1212.26,-1252.68 1212.65,-1242.09 1205.75,-1250.13 1212.26,-1252.68"/>
 </g>
 <!-- proc~compute_xg_bspline_1d -->
 <g id="call~~graph~~CallGraph_node135" class="node">
 <title>proc~compute_xg_bspline_1d</title>
 <g id="a_call~~graph~~CallGraph_node135"><a xlink:href="../proc/compute_xg_bspline_1d.html" xlink:title="compute_Xg_bspline_1d">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1061.5,-4126 919.5,-4126 919.5,-4102 1061.5,-4102 1061.5,-4126"/>
-<text text-anchor="middle" x="990.5" y="-4111.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_bspline_1d</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1061.5,-2124 919.5,-2124 919.5,-2100 1061.5,-2100 1061.5,-2124"/>
+<text text-anchor="middle" x="990.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_bspline_1d</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_xg_bspline_1d&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge217" class="edge">
 <title>proc~compute_xg_bspline_1d&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff38" d="M1061.72,-4123.07C1071.61,-4126 1081.35,-4129.88 1090,-4135 1143.37,-4166.57 1185.58,-4228.61 1205.14,-4261.08"/>
-<polygon fill="#00ff38" stroke="#00ff38" points="1202.17,-4262.93 1210.26,-4269.77 1208.2,-4259.37 1202.17,-4262.93"/>
+<path fill="none" stroke="#00ff38" d="M1061.63,-2106.64C1072.05,-2103.27 1081.97,-2098.28 1090,-2091 1204.05,-1987.62 1216.32,-1782.28 1217.15,-1714.38"/>
+<polygon fill="#00ff38" stroke="#00ff38" points="1220.65,-1714.03 1217.2,-1704.02 1213.65,-1714 1220.65,-1714.03"/>
 </g>
 <!-- proc~compute_xg_bspline_1d_1point -->
 <g id="call~~graph~~CallGraph_node136" class="node">
 <title>proc~compute_xg_bspline_1d_1point</title>
 <g id="a_call~~graph~~CallGraph_node136"><a xlink:href="../proc/compute_xg_bspline_1d_1point.html" xlink:title="compute_Xg_bspline_1d_1point">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1081,-4084 900,-4084 900,-4060 1081,-4060 1081,-4084"/>
-<text text-anchor="middle" x="990.5" y="-4069.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_bspline_1d_1point</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1081,-2082 900,-2082 900,-2058 1081,-2058 1081,-2082"/>
+<text text-anchor="middle" x="990.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_bspline_1d_1point</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_xg_bspline_1d_1point&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge218" class="edge">
 <title>proc~compute_xg_bspline_1d_1point&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff3c" d="M1073.15,-4084.06C1079.09,-4086.52 1084.79,-4089.47 1090,-4093 1152.83,-4135.49 1192.81,-4220.44 1208.91,-4260.35"/>
-<polygon fill="#00ff3c" stroke="#00ff3c" points="1205.75,-4261.87 1212.65,-4269.91 1212.26,-4259.32 1205.75,-4261.87"/>
+<path fill="none" stroke="#00ff3c" d="M1077.03,-2057.88C1081.68,-2055.39 1086.05,-2052.46 1090,-2049 1193.62,-1958.21 1212.7,-1777.05 1216.21,-1714.13"/>
+<polygon fill="#00ff3c" stroke="#00ff3c" points="1219.7,-1714.28 1216.69,-1704.13 1212.71,-1713.95 1219.7,-1714.28"/>
 </g>
 <!-- proc~compute_xg_bspline_2d -->
 <g id="call~~graph~~CallGraph_node137" class="node">
 <title>proc~compute_xg_bspline_2d</title>
 <g id="a_call~~graph~~CallGraph_node137"><a xlink:href="../proc/compute_xg_bspline_2d.html" xlink:title="compute_Xg_bspline_2d">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1061.5,-4798 919.5,-4798 919.5,-4774 1061.5,-4774 1061.5,-4798"/>
-<text text-anchor="middle" x="990.5" y="-4783.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_bspline_2d</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1061.5,-1536 919.5,-1536 919.5,-1512 1061.5,-1512 1061.5,-1536"/>
+<text text-anchor="middle" x="990.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_bspline_2d</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_xg_bspline_2d&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge219" class="edge">
 <title>proc~compute_xg_bspline_2d&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff40" d="M1061.7,-4781.07C1072.18,-4777.66 1082.09,-4772.54 1090,-4765 1158.97,-4699.21 1203.15,-4390.16 1214.25,-4304.22"/>
-<polygon fill="#00ff40" stroke="#00ff40" points="1217.72,-4304.61 1215.51,-4294.25 1210.78,-4303.73 1217.72,-4304.61"/>
+<path fill="none" stroke="#00ff40" d="M1061.72,-1533.07C1071.61,-1536 1081.35,-1539.88 1090,-1545 1143.37,-1576.57 1185.58,-1638.61 1205.14,-1671.08"/>
+<polygon fill="#00ff40" stroke="#00ff40" points="1202.17,-1672.93 1210.26,-1679.77 1208.2,-1669.37 1202.17,-1672.93"/>
 </g>
 <!-- proc~compute_xg_bspline_2d&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge220" class="edge">
 <title>proc~compute_xg_bspline_2d&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff40" d="M1056.12,-4798.04C1096.52,-4805.56 1147.06,-4814.97 1180.61,-4821.22"/>
-<polygon fill="#00ff40" stroke="#00ff40" points="1180.39,-4824.74 1190.86,-4823.13 1181.67,-4817.86 1180.39,-4824.74"/>
+<path fill="none" stroke="#00ff40" d="M1061.62,-1517.5C1071.86,-1514.24 1081.73,-1509.59 1090,-1503 1172.83,-1437.01 1204.1,-1304.5 1213.54,-1252.07"/>
+<polygon fill="#00ff40" stroke="#00ff40" points="1217,-1252.6 1215.23,-1242.16 1210.1,-1251.42 1217,-1252.6"/>
 </g>
 <!-- proc~compute_xg_bspline_2d_1point -->
 <g id="call~~graph~~CallGraph_node138" class="node">
 <title>proc~compute_xg_bspline_2d_1point</title>
 <g id="a_call~~graph~~CallGraph_node138"><a xlink:href="../proc/compute_xg_bspline_2d_1point.html" xlink:title="compute_Xg_bspline_2d_1point">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1081,-4756 900,-4756 900,-4732 1081,-4732 1081,-4756"/>
-<text text-anchor="middle" x="990.5" y="-4741.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_bspline_2d_1point</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1081,-1494 900,-1494 900,-1470 1081,-1470 1081,-1494"/>
+<text text-anchor="middle" x="990.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_bspline_2d_1point</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_xg_bspline_2d_1point&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge221" class="edge">
 <title>proc~compute_xg_bspline_2d_1point&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff45" d="M1077.74,-4731.9C1082.16,-4729.4 1086.29,-4726.46 1090,-4723 1153.6,-4663.72 1201.06,-4385.03 1213.68,-4304.09"/>
-<polygon fill="#00ff45" stroke="#00ff45" points="1217.16,-4304.44 1215.22,-4294.02 1210.24,-4303.38 1217.16,-4304.44"/>
+<path fill="none" stroke="#00ff45" d="M1073.15,-1494.06C1079.09,-1496.52 1084.79,-1499.47 1090,-1503 1152.83,-1545.49 1192.81,-1630.44 1208.91,-1670.35"/>
+<polygon fill="#00ff45" stroke="#00ff45" points="1205.75,-1671.87 1212.65,-1679.91 1212.26,-1669.32 1205.75,-1671.87"/>
 </g>
 <!-- proc~compute_xg_bspline_2d_1point&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge222" class="edge">
 <title>proc~compute_xg_bspline_2d_1point&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff45" d="M1058.88,-4756.01C1069.42,-4758.56 1080.09,-4761.55 1090,-4765 1124.83,-4777.14 1162.4,-4796.65 1187.57,-4810.75"/>
-<polygon fill="#00ff45" stroke="#00ff45" points="1186.15,-4813.97 1196.58,-4815.86 1189.61,-4807.88 1186.15,-4813.97"/>
+<path fill="none" stroke="#00ff45" d="M1074.97,-1469.79C1080.29,-1467.34 1085.37,-1464.44 1090,-1461 1162.6,-1407.05 1198.8,-1298.7 1211.53,-1252.12"/>
+<polygon fill="#00ff45" stroke="#00ff45" points="1214.99,-1252.73 1214.15,-1242.17 1208.22,-1250.95 1214.99,-1252.73"/>
 </g>
 <!-- proc~compute_xg_bspline_3d -->
 <g id="call~~graph~~CallGraph_node139" class="node">
 <title>proc~compute_xg_bspline_3d</title>
 <g id="a_call~~graph~~CallGraph_node139"><a xlink:href="../proc/compute_xg_bspline_3d.html" xlink:title="compute_Xg_bspline_3d">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1061.5,-4714 919.5,-4714 919.5,-4690 1061.5,-4690 1061.5,-4714"/>
-<text text-anchor="middle" x="990.5" y="-4699.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_bspline_3d</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1061.5,-1620 919.5,-1620 919.5,-1596 1061.5,-1596 1061.5,-1620"/>
+<text text-anchor="middle" x="990.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_bspline_3d</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_xg_bspline_3d&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge223" class="edge">
 <title>proc~compute_xg_bspline_3d&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff49" d="M1061.63,-4696.64C1072.05,-4693.27 1081.97,-4688.28 1090,-4681 1204.05,-4577.62 1216.32,-4372.28 1217.15,-4304.38"/>
-<polygon fill="#00ff49" stroke="#00ff49" points="1220.65,-4304.03 1217.2,-4294.02 1213.65,-4304 1220.65,-4304.03"/>
+<path fill="none" stroke="#00ff49" d="M1058.88,-1620.01C1069.42,-1622.56 1080.09,-1625.55 1090,-1629 1124.83,-1641.14 1162.4,-1660.65 1187.57,-1674.75"/>
+<polygon fill="#00ff49" stroke="#00ff49" points="1186.15,-1677.97 1196.58,-1679.86 1189.61,-1671.88 1186.15,-1677.97"/>
 </g>
 <!-- proc~compute_xg_bspline_3d&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge224" class="edge">
 <title>proc~compute_xg_bspline_3d&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff49" d="M1061.52,-4712.55C1071.34,-4715.27 1081.11,-4718.7 1090,-4723 1134.2,-4744.37 1176.21,-4784.27 1199.1,-4808.26"/>
-<polygon fill="#00ff49" stroke="#00ff49" points="1196.72,-4810.83 1206.11,-4815.73 1201.82,-4806.04 1196.72,-4810.83"/>
+<path fill="none" stroke="#00ff49" d="M1061.67,-1602.33C1072.03,-1598.98 1081.91,-1594.09 1090,-1587 1193.62,-1496.21 1212.7,-1315.05 1216.21,-1252.13"/>
+<polygon fill="#00ff49" stroke="#00ff49" points="1219.7,-1252.28 1216.69,-1242.13 1212.71,-1251.95 1219.7,-1252.28"/>
 </g>
 <!-- proc~compute_xg_bspline_3d_1point -->
 <g id="call~~graph~~CallGraph_node140" class="node">
 <title>proc~compute_xg_bspline_3d_1point</title>
 <g id="a_call~~graph~~CallGraph_node140"><a xlink:href="../proc/compute_xg_bspline_3d_1point.html" xlink:title="compute_Xg_bspline_3d_1point">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1081,-4672 900,-4672 900,-4648 1081,-4648 1081,-4672"/>
-<text text-anchor="middle" x="990.5" y="-4657.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_bspline_3d_1point</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1081,-1578 900,-1578 900,-1554 1081,-1554 1081,-1578"/>
+<text text-anchor="middle" x="990.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_bspline_3d_1point</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_xg_bspline_3d_1point&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge225" class="edge">
 <title>proc~compute_xg_bspline_3d_1point&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff4d" d="M1077.03,-4647.88C1081.68,-4645.39 1086.05,-4642.46 1090,-4639 1193.62,-4548.21 1212.7,-4367.05 1216.21,-4304.13"/>
-<polygon fill="#00ff4d" stroke="#00ff4d" points="1219.7,-4304.28 1216.69,-4294.13 1212.71,-4303.95 1219.7,-4304.28"/>
+<path fill="none" stroke="#00ff4d" d="M1066.73,-1578.06C1074.77,-1580.51 1082.68,-1583.46 1090,-1587 1134.2,-1608.37 1176.21,-1648.27 1199.1,-1672.26"/>
+<polygon fill="#00ff4d" stroke="#00ff4d" points="1196.72,-1674.83 1206.11,-1679.73 1201.82,-1670.04 1196.72,-1674.83"/>
 </g>
 <!-- proc~compute_xg_bspline_3d_1point&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge226" class="edge">
 <title>proc~compute_xg_bspline_3d_1point&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff4d" d="M1070.68,-4672.02C1077.44,-4674.48 1083.98,-4677.44 1090,-4681 1143.37,-4712.57 1185.58,-4774.61 1205.14,-4807.08"/>
-<polygon fill="#00ff4d" stroke="#00ff4d" points="1202.17,-4808.93 1210.26,-4815.77 1208.2,-4805.37 1202.17,-4808.93"/>
+<path fill="none" stroke="#00ff4d" d="M1076.4,-1553.93C1081.26,-1551.44 1085.85,-1548.49 1090,-1545 1182.9,-1466.94 1208.51,-1310.84 1214.98,-1252.6"/>
+<polygon fill="#00ff4d" stroke="#00ff4d" points="1218.5,-1252.61 1216.03,-1242.31 1211.53,-1251.9 1218.5,-1252.61"/>
 </g>
 <!-- proc~compute_xg_nurbs_1d -->
 <g id="call~~graph~~CallGraph_node141" class="node">
 <title>proc~compute_xg_nurbs_1d</title>
 <g id="a_call~~graph~~CallGraph_node141"><a xlink:href="../proc/compute_xg_nurbs_1d.html" xlink:title="compute_Xg_nurbs_1d">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1057,-4042 924,-4042 924,-4018 1057,-4018 1057,-4042"/>
-<text text-anchor="middle" x="990.5" y="-4027.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_nurbs_1d</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1057,-2040 924,-2040 924,-2016 1057,-2016 1057,-2040"/>
+<text text-anchor="middle" x="990.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_nurbs_1d</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_xg_nurbs_1d&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge227" class="edge">
 <title>proc~compute_xg_nurbs_1d&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff51" d="M1057.15,-4035.8C1068.87,-4039.03 1080.39,-4043.86 1090,-4051 1162.6,-4104.95 1198.8,-4213.3 1211.53,-4259.88"/>
-<polygon fill="#00ff51" stroke="#00ff51" points="1208.22,-4261.05 1214.15,-4269.83 1214.99,-4259.27 1208.22,-4261.05"/>
+<path fill="none" stroke="#00ff51" d="M1057.09,-2023.32C1069.02,-2020.01 1080.63,-2014.87 1090,-2007 1182.9,-1928.94 1208.51,-1772.84 1214.98,-1714.6"/>
+<polygon fill="#00ff51" stroke="#00ff51" points="1218.5,-1714.61 1216.03,-1704.31 1211.53,-1713.9 1218.5,-1714.61"/>
 </g>
 <!-- proc~compute_xg_nurbs_1d_1point -->
 <g id="call~~graph~~CallGraph_node142" class="node">
 <title>proc~compute_xg_nurbs_1d_1point</title>
 <g id="a_call~~graph~~CallGraph_node142"><a xlink:href="../proc/compute_xg_nurbs_1d_1point.html" xlink:title="compute_Xg_nurbs_1d_1point">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1076.5,-3916 904.5,-3916 904.5,-3892 1076.5,-3892 1076.5,-3916"/>
-<text text-anchor="middle" x="990.5" y="-3901.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_nurbs_1d_1point</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1076.5,-1872 904.5,-1872 904.5,-1848 1076.5,-1848 1076.5,-1872"/>
+<text text-anchor="middle" x="990.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_nurbs_1d_1point</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_xg_nurbs_1d_1point&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge228" class="edge">
 <title>proc~compute_xg_nurbs_1d_1point&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff55" d="M1076.57,-3915.87C1081.39,-3918.41 1085.92,-3921.43 1090,-3925 1103.38,-3936.73 1184.86,-4183.63 1209.77,-4259.81"/>
-<polygon fill="#00ff55" stroke="#00ff55" points="1206.59,-4261.35 1213.02,-4269.77 1213.24,-4259.18 1206.59,-4261.35"/>
+<path fill="none" stroke="#00ff55" d="M1070.68,-1847.98C1077.44,-1845.52 1083.98,-1842.56 1090,-1839 1143.37,-1807.43 1185.58,-1745.39 1205.14,-1712.92"/>
+<polygon fill="#00ff55" stroke="#00ff55" points="1208.2,-1714.63 1210.26,-1704.23 1202.17,-1711.07 1208.2,-1714.63"/>
 </g>
 <!-- proc~compute_xg_nurbs_2d -->
 <g id="call~~graph~~CallGraph_node143" class="node">
 <title>proc~compute_xg_nurbs_2d</title>
 <g id="a_call~~graph~~CallGraph_node143"><a xlink:href="../proc/compute_xg_nurbs_2d.html" xlink:title="compute_Xg_nurbs_2d">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1057,-4630 924,-4630 924,-4606 1057,-4606 1057,-4630"/>
-<text text-anchor="middle" x="990.5" y="-4615.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_nurbs_2d</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1057,-1410 924,-1410 924,-1386 1057,-1386 1057,-1410"/>
+<text text-anchor="middle" x="990.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_nurbs_2d</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_xg_nurbs_2d&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge229" class="edge">
 <title>proc~compute_xg_nurbs_2d&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff5a" d="M1057.09,-4613.32C1069.02,-4610.01 1080.63,-4604.87 1090,-4597 1182.9,-4518.94 1208.51,-4362.84 1214.98,-4304.6"/>
-<polygon fill="#00ff5a" stroke="#00ff5a" points="1218.5,-4304.61 1216.03,-4294.31 1211.53,-4303.9 1218.5,-4304.61"/>
+<path fill="none" stroke="#00ff5a" d="M1057.03,-1403.14C1068.89,-1406.42 1080.5,-1411.43 1090,-1419 1172.83,-1484.99 1204.1,-1617.5 1213.54,-1669.93"/>
+<polygon fill="#00ff5a" stroke="#00ff5a" points="1210.1,-1670.58 1215.23,-1679.84 1217,-1669.4 1210.1,-1670.58"/>
 </g>
 <!-- proc~compute_xg_nurbs_2d&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge230" class="edge">
 <title>proc~compute_xg_nurbs_2d&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff5a" d="M1057.16,-4624.64C1068.75,-4627.8 1080.22,-4632.39 1090,-4639 1152.83,-4681.49 1192.81,-4766.44 1208.91,-4806.35"/>
-<polygon fill="#00ff5a" stroke="#00ff5a" points="1205.75,-4807.87 1212.65,-4815.91 1212.26,-4805.32 1205.75,-4807.87"/>
+<path fill="none" stroke="#00ff5a" d="M1057.06,-1390.25C1068.54,-1387.18 1079.99,-1382.92 1090,-1377 1143.37,-1345.43 1185.58,-1283.39 1205.14,-1250.92"/>
+<polygon fill="#00ff5a" stroke="#00ff5a" points="1208.2,-1252.63 1210.26,-1242.23 1202.17,-1249.07 1208.2,-1252.63"/>
 </g>
 <!-- proc~compute_xg_nurbs_2d_1point -->
 <g id="call~~graph~~CallGraph_node144" class="node">
 <title>proc~compute_xg_nurbs_2d_1point</title>
 <g id="a_call~~graph~~CallGraph_node144"><a xlink:href="../proc/compute_xg_nurbs_2d_1point.html" xlink:title="compute_Xg_nurbs_2d_1point">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1076.5,-4588 904.5,-4588 904.5,-4564 1076.5,-4564 1076.5,-4588"/>
-<text text-anchor="middle" x="990.5" y="-4573.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_nurbs_2d_1point</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1076.5,-1368 904.5,-1368 904.5,-1344 1076.5,-1344 1076.5,-1368"/>
+<text text-anchor="middle" x="990.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_nurbs_2d_1point</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_xg_nurbs_2d_1point&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge231" class="edge">
 <title>proc~compute_xg_nurbs_2d_1point&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff5e" d="M1075.72,-4563.91C1080.8,-4561.43 1085.62,-4558.49 1090,-4555 1172.83,-4489.01 1204.1,-4356.5 1213.54,-4304.07"/>
-<polygon fill="#00ff5e" stroke="#00ff5e" points="1217,-4304.6 1215.23,-4294.16 1210.1,-4303.42 1217,-4304.6"/>
+<path fill="none" stroke="#00ff5e" d="M1076.4,-1368.07C1081.26,-1370.56 1085.85,-1373.51 1090,-1377 1182.9,-1455.06 1208.51,-1611.16 1214.98,-1669.4"/>
+<polygon fill="#00ff5e" stroke="#00ff5e" points="1211.53,-1670.1 1216.03,-1679.69 1218.5,-1669.39 1211.53,-1670.1"/>
 </g>
 <!-- proc~compute_xg_nurbs_2d_1point&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge232" class="edge">
 <title>proc~compute_xg_nurbs_2d_1point&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff5e" d="M1074.97,-4588.21C1080.29,-4590.66 1085.37,-4593.56 1090,-4597 1162.6,-4650.95 1198.8,-4759.3 1211.53,-4805.88"/>
-<polygon fill="#00ff5e" stroke="#00ff5e" points="1208.22,-4807.05 1214.15,-4815.83 1214.99,-4805.27 1208.22,-4807.05"/>
+<path fill="none" stroke="#00ff5e" d="M1066.73,-1343.94C1074.77,-1341.49 1082.68,-1338.54 1090,-1335 1134.2,-1313.63 1176.21,-1273.73 1199.1,-1249.74"/>
+<polygon fill="#00ff5e" stroke="#00ff5e" points="1201.82,-1251.96 1206.11,-1242.27 1196.72,-1247.17 1201.82,-1251.96"/>
 </g>
 <!-- proc~compute_xg_nurbs_3d -->
 <g id="call~~graph~~CallGraph_node145" class="node">
 <title>proc~compute_xg_nurbs_3d</title>
 <g id="a_call~~graph~~CallGraph_node145"><a xlink:href="../proc/compute_xg_nurbs_3d.html" xlink:title="compute_Xg_nurbs_3d">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1057,-4546 924,-4546 924,-4522 1057,-4522 1057,-4546"/>
-<text text-anchor="middle" x="990.5" y="-4531.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_nurbs_3d</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1057,-1326 924,-1326 924,-1302 1057,-1302 1057,-1326"/>
+<text text-anchor="middle" x="990.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_nurbs_3d</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_xg_nurbs_3d&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge233" class="edge">
 <title>proc~compute_xg_nurbs_3d&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff62" d="M1057.15,-4528.2C1068.87,-4524.97 1080.39,-4520.14 1090,-4513 1162.6,-4459.05 1198.8,-4350.7 1211.53,-4304.12"/>
-<polygon fill="#00ff62" stroke="#00ff62" points="1214.99,-4304.73 1214.15,-4294.17 1208.22,-4302.95 1214.99,-4304.73"/>
+<path fill="none" stroke="#00ff62" d="M1057.1,-1318.3C1069.09,-1321.63 1080.73,-1326.88 1090,-1335 1193.62,-1425.79 1212.7,-1606.95 1216.21,-1669.87"/>
+<polygon fill="#00ff62" stroke="#00ff62" points="1212.71,-1670.05 1216.69,-1679.87 1219.7,-1669.72 1212.71,-1670.05"/>
 </g>
 <!-- proc~compute_xg_nurbs_3d&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge234" class="edge">
 <title>proc~compute_xg_nurbs_3d&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff62" d="M1057.03,-4539.14C1068.89,-4542.42 1080.5,-4547.43 1090,-4555 1172.83,-4620.99 1204.1,-4753.5 1213.54,-4805.93"/>
-<polygon fill="#00ff62" stroke="#00ff62" points="1210.1,-4806.58 1215.23,-4815.84 1217,-4805.4 1210.1,-4806.58"/>
+<path fill="none" stroke="#00ff62" d="M1057.04,-1302.43C1068.17,-1299.79 1079.52,-1296.65 1090,-1293 1124.83,-1280.86 1162.4,-1261.35 1187.57,-1247.25"/>
+<polygon fill="#00ff62" stroke="#00ff62" points="1189.61,-1250.12 1196.58,-1242.14 1186.15,-1244.03 1189.61,-1250.12"/>
 </g>
 <!-- proc~compute_xg_nurbs_3d_1point -->
 <g id="call~~graph~~CallGraph_node146" class="node">
 <title>proc~compute_xg_nurbs_3d_1point</title>
 <g id="a_call~~graph~~CallGraph_node146"><a xlink:href="../proc/compute_xg_nurbs_3d_1point.html" xlink:title="compute_Xg_nurbs_3d_1point">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1076.5,-4504 904.5,-4504 904.5,-4480 1076.5,-4480 1076.5,-4504"/>
-<text text-anchor="middle" x="990.5" y="-4489.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_nurbs_3d_1point</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1076.5,-1284 904.5,-1284 904.5,-1260 1076.5,-1260 1076.5,-1284"/>
+<text text-anchor="middle" x="990.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg_nurbs_3d_1point</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_xg_nurbs_3d_1point&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge235" class="edge">
 <title>proc~compute_xg_nurbs_3d_1point&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#00ff66" d="M1073.15,-4479.94C1079.09,-4477.48 1084.79,-4474.53 1090,-4471 1152.83,-4428.51 1192.81,-4343.56 1208.91,-4303.65"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="1212.26,-4304.68 1212.65,-4294.09 1205.75,-4302.13 1212.26,-4304.68"/>
+<path fill="none" stroke="#00ff66" d="M1076.71,-1283.71C1081.5,-1286.29 1085.98,-1289.36 1090,-1293 1204.05,-1396.38 1216.32,-1601.72 1217.15,-1669.62"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="1213.65,-1670 1217.2,-1679.98 1220.65,-1669.97 1213.65,-1670"/>
 </g>
 <!-- proc~compute_xg_nurbs_3d_1point&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge236" class="edge">
 <title>proc~compute_xg_nurbs_3d_1point&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff66" d="M1076.4,-4504.07C1081.26,-4506.56 1085.85,-4509.51 1090,-4513 1182.9,-4591.06 1208.51,-4747.16 1214.98,-4805.4"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="1211.53,-4806.1 1216.03,-4815.69 1218.5,-4805.39 1211.53,-4806.1"/>
+<path fill="none" stroke="#00ff66" d="M1056.12,-1259.96C1096.52,-1252.44 1147.06,-1243.03 1180.61,-1236.78"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="1181.67,-1240.14 1190.86,-1234.87 1180.39,-1233.26 1181.67,-1240.14"/>
 </g>
 <!-- proc~create -->
 <g id="call~~graph~~CallGraph_node147" class="node">
 <title>proc~create</title>
-<g id="a_call~~graph~~CallGraph_node147"><a xlink:href="../proc/create.html" xlink:title="nurbs_volume%create">
-<polygon fill="#d9534f" stroke="#d9534f" points="826.5,-4118 695.5,-4118 695.5,-4094 826.5,-4094 826.5,-4118"/>
-<text text-anchor="middle" x="761" y="-4103.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
+<g id="a_call~~graph~~CallGraph_node147"><a xlink:href="../proc/create.html" xlink:title="nurbs_curve%create">
+<polygon fill="#d9534f" stroke="#d9534f" points="821.5,-6432 700.5,-6432 700.5,-6408 821.5,-6408 821.5,-6432"/>
+<text text-anchor="middle" x="761" y="-6417.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%create</text>
 </a>
 </g>
 </g>
 <!-- proc~create&#45;&gt;interface~compute_xg -->
 <g id="call~~graph~~CallGraph_edge237" class="edge">
 <title>proc~create&#45;&gt;interface~compute_xg</title>
-<path fill="none" stroke="#00ff6b" d="M826.84,-4109.06C837.72,-4112.53 847.8,-4118.14 855,-4127 932.59,-4222.46 812.84,-6246.01 891,-6341 903,-6355.58 922.4,-6361.6 940.83,-6363.68"/>
-<polygon fill="#00ff6b" stroke="#00ff6b" points="940.67,-6367.18 950.92,-6364.46 941.22,-6360.2 940.67,-6367.18"/>
-</g>
-<!-- proc~create&#45;&gt;interface~ndgrid -->
-<g id="call~~graph~~CallGraph_edge238" class="edge">
-<title>proc~create&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#00ff6b" d="M826.81,-4109.08C837.69,-4112.55 847.78,-4118.15 855,-4127 917.26,-4203.28 827.23,-5823.98 891,-5899 893.36,-5901.78 1096.55,-5937.81 1180.91,-5952.66"/>
-<polygon fill="#00ff6b" stroke="#00ff6b" points="1180.37,-5956.12 1190.82,-5954.41 1181.58,-5949.23 1180.37,-5956.12"/>
+<path fill="none" stroke="#00ff6b" d="M821.77,-6420C858.76,-6420 905.65,-6420 940.45,-6420"/>
+<polygon fill="#00ff6b" stroke="#00ff6b" points="940.84,-6423.5 950.84,-6420 940.84,-6416.5 940.84,-6423.5"/>
 </g>
 <!-- proc~create&#45;&gt;proc~is_rational -->
-<g id="call~~graph~~CallGraph_edge239" class="edge">
+<g id="call~~graph~~CallGraph_edge238" class="edge">
 <title>proc~create&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#00ff6b" d="M826.83,-4109.07C837.71,-4112.54 847.79,-4118.14 855,-4127 924.27,-4212.05 827.98,-6011.23 891,-6101 945.4,-6178.49 1027.13,-6106.22 1090,-6177 1133.52,-6226 1095.3,-6262.1 1126,-6320 1143.47,-6352.95 1173.78,-6383.88 1194.58,-6402.85"/>
-<polygon fill="#00ff6b" stroke="#00ff6b" points="1192.52,-6405.71 1202.32,-6409.76 1197.19,-6400.49 1192.52,-6405.71"/>
+<path fill="none" stroke="#00ff6b" d="M821.55,-6408.99C843.34,-6405.31 868.22,-6401.51 891,-6399 974.44,-6389.8 1070.43,-6384.89 1136.53,-6382.38"/>
+<polygon fill="#00ff6b" stroke="#00ff6b" points="1137.01,-6385.86 1146.87,-6382 1136.75,-6378.87 1137.01,-6385.86"/>
 </g>
 <!-- proc~create~2 -->
 <g id="call~~graph~~CallGraph_node148" class="node">
 <title>proc~create~2</title>
-<g id="a_call~~graph~~CallGraph_node148"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
-<polygon fill="#d9534f" stroke="#d9534f" points="826.5,-2344 695.5,-2344 695.5,-2320 826.5,-2320 826.5,-2344"/>
-<text text-anchor="middle" x="761" y="-2329.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
+<g id="a_call~~graph~~CallGraph_node148"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_volume%create">
+<polygon fill="#d9534f" stroke="#d9534f" points="826.5,-4462 695.5,-4462 695.5,-4438 826.5,-4438 826.5,-4462"/>
+<text text-anchor="middle" x="761" y="-4447.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
 </a>
 </g>
 </g>
 <!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
-<g id="call~~graph~~CallGraph_edge240" class="edge">
+<g id="call~~graph~~CallGraph_edge239" class="edge">
 <title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
-<path fill="none" stroke="#00ff6f" d="M826.89,-2326.6C837.24,-2323.28 847.12,-2318.32 855,-2311 895.18,-2273.69 850.6,-2230.07 891,-2193 904.36,-2180.75 923.04,-2174.97 940.56,-2172.44"/>
-<polygon fill="#00ff6f" stroke="#00ff6f" points="941.14,-2175.9 950.69,-2171.3 940.36,-2168.94 941.14,-2175.9"/>
+<path fill="none" stroke="#00ff6f" d="M826.67,-4454.35C837.3,-4457.74 847.33,-4462.99 855,-4471 916.9,-4535.57 828.72,-4604.81 891,-4669 903.88,-4682.28 922.95,-4688.17 940.88,-4690.51"/>
+<polygon fill="#00ff6f" stroke="#00ff6f" points="940.67,-4694 950.96,-4691.49 941.35,-4687.04 940.67,-4694"/>
 </g>
 <!-- proc~create~2&#45;&gt;interface~ndgrid -->
-<g id="call~~graph~~CallGraph_edge241" class="edge">
+<g id="call~~graph~~CallGraph_edge240" class="edge">
 <title>proc~create~2&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#00ff6f" d="M826.93,-2336.11C837.52,-2339.53 847.48,-2344.85 855,-2353 931.73,-2436.14 812.89,-2523.15 891,-2605 953.16,-2670.14 1032.23,-2573.93 1090,-2643 1148.03,-2712.38 1082.68,-5819.6 1126,-5899 1137.89,-5920.8 1161.5,-5936.01 1181.69,-5945.67"/>
-<polygon fill="#00ff6f" stroke="#00ff6f" points="1180.41,-5948.93 1190.97,-5949.84 1183.28,-5942.55 1180.41,-5948.93"/>
+<path fill="none" stroke="#00ff6f" d="M826.62,-4456.41C836.88,-4459.63 846.8,-4464.3 855,-4471 885.19,-4495.67 860.69,-4526.47 891,-4551 961.34,-4607.92 1028.81,-4527.34 1090,-4594 1175.15,-4686.75 1041.5,-4781.66 1126,-4875 1139.59,-4890.01 1161.57,-4895.37 1180.53,-4896.93"/>
+<polygon fill="#00ff6f" stroke="#00ff6f" points="1180.51,-4900.43 1190.68,-4897.44 1180.86,-4893.44 1180.51,-4900.43"/>
 </g>
 <!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
-<g id="call~~graph~~CallGraph_edge242" class="edge">
+<g id="call~~graph~~CallGraph_edge241" class="edge">
 <title>proc~create~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#00ff6f" d="M826.73,-2338.28C836.97,-2341.52 846.86,-2346.22 855,-2353 886.22,-2378.98 857.09,-2414.64 891,-2437 964.84,-2485.69 1009.33,-2473.25 1090,-2437 1145.96,-2411.86 1187.3,-2348.52 1205.97,-2315.22"/>
-<polygon fill="#00ff6f" stroke="#00ff6f" points="1209.12,-2316.75 1210.83,-2306.3 1202.97,-2313.4 1209.12,-2316.75"/>
+<path fill="none" stroke="#00ff6f" d="M826.86,-4455.43C837.21,-4458.75 847.1,-4463.7 855,-4471 894.65,-4507.64 850.92,-4550.84 891,-4587 957.98,-4647.44 1030.52,-4559.17 1090,-4627 1168.41,-4716.43 1048.87,-5070.47 1126,-5161 1128.21,-5163.59 1130.67,-5165.9 1133.32,-5167.95"/>
+<polygon fill="#00ff6f" stroke="#00ff6f" points="1131.49,-5170.94 1141.8,-5173.38 1135.26,-5165.04 1131.49,-5170.94"/>
 </g>
 <!-- proc~create~3 -->
 <g id="call~~graph~~CallGraph_node149" class="node">
 <title>proc~create~3</title>
-<g id="a_call~~graph~~CallGraph_node149"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_curve%create">
-<polygon fill="#d9534f" stroke="#d9534f" points="821.5,-268 700.5,-268 700.5,-244 821.5,-244 821.5,-268"/>
-<text text-anchor="middle" x="761" y="-253.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%create</text>
+<g id="a_call~~graph~~CallGraph_node149"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
+<polygon fill="#d9534f" stroke="#d9534f" points="826.5,-2574 695.5,-2574 695.5,-2550 826.5,-2550 826.5,-2574"/>
+<text text-anchor="middle" x="761" y="-2559.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
 <!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
-<g id="call~~graph~~CallGraph_edge243" class="edge">
+<g id="call~~graph~~CallGraph_edge242" class="edge">
 <title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
-<path fill="none" stroke="#00ff73" d="M821.77,-250.48C858.76,-247.07 905.65,-242.74 940.45,-239.53"/>
-<polygon fill="#00ff73" stroke="#00ff73" points="941.2,-242.97 950.84,-238.57 940.56,-236 941.2,-242.97"/>
+<path fill="none" stroke="#00ff73" d="M826.58,-2552.35C862.89,-2546.92 907.48,-2540.26 940.83,-2535.27"/>
+<polygon fill="#00ff73" stroke="#00ff73" points="941.42,-2538.72 950.79,-2533.79 940.38,-2531.8 941.42,-2538.72"/>
+</g>
+<!-- proc~create~3&#45;&gt;interface~ndgrid -->
+<g id="call~~graph~~CallGraph_edge243" class="edge">
+<title>proc~create~3&#45;&gt;interface~ndgrid</title>
+<path fill="none" stroke="#00ff73" d="M826.63,-2572.28C919.76,-2587.39 1081.53,-2614.91 1090,-2625 1170.4,-2720.74 1047.39,-4777.79 1126,-4875 1138.96,-4891.03 1161.5,-4896.32 1180.9,-4897.58"/>
+<polygon fill="#00ff73" stroke="#00ff73" points="1180.87,-4901.08 1190.98,-4897.91 1181.1,-4894.08 1180.87,-4901.08"/>
 </g>
 <!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
 <g id="call~~graph~~CallGraph_edge244" class="edge">
 <title>proc~create~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#00ff73" d="M817.8,-268.07C830.36,-271.74 843.39,-276.35 855,-282 998.76,-352.01 1144.45,-480.5 1196.76,-528.89"/>
-<polygon fill="#00ff73" stroke="#00ff73" points="1194.64,-531.7 1204.34,-535.95 1199.41,-526.57 1194.64,-531.7"/>
+<path fill="none" stroke="#00ff73" d="M826.71,-2562.85C906.79,-2563.91 1043.4,-2565.71 1131.91,-2566.88"/>
+<polygon fill="#00ff73" stroke="#00ff73" points="1131.88,-2570.38 1141.92,-2567.01 1131.97,-2563.38 1131.88,-2570.38"/>
 </g>
 <!-- proc~derivative2_scalar&#45;&gt;interface~compute_d2tgc -->
 <g id="call~~graph~~CallGraph_edge245" class="edge">
 <title>proc~derivative2_scalar&#45;&gt;interface~compute_d2tgc</title>
-<path fill="none" stroke="#00ff77" d="M1079.01,-6513.97C1105.76,-6510.29 1134.52,-6506.34 1158.82,-6503"/>
-<polygon fill="#00ff77" stroke="#00ff77" points="1159.51,-6506.44 1168.94,-6501.61 1158.56,-6499.5 1159.51,-6506.44"/>
+<path fill="none" stroke="#00ff77" d="M1056.12,-6613.96C1088.53,-6607.93 1127.48,-6600.67 1158.93,-6594.82"/>
+<polygon fill="#00ff77" stroke="#00ff77" points="1159.67,-6598.24 1168.86,-6592.97 1158.39,-6591.36 1159.67,-6598.24"/>
 </g>
 <!-- proc~derivative2_scalar&#45;&gt;proc~is_rational -->
 <g id="call~~graph~~CallGraph_edge246" class="edge">
 <title>proc~derivative2_scalar&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#00ff77" d="M1067.32,-6513.93C1075.17,-6511.48 1082.87,-6508.54 1090,-6505 1108.92,-6495.62 1108.75,-6486.18 1126,-6474 1144.48,-6460.95 1166.47,-6448.31 1184.21,-6438.76"/>
-<polygon fill="#00ff77" stroke="#00ff77" points="1185.86,-6441.84 1193.05,-6434.06 1182.58,-6435.66 1185.86,-6441.84"/>
+<path fill="none" stroke="#00ff77" d="M1077.08,-6613.93C1081.72,-6611.43 1086.07,-6608.48 1090,-6605 1126.92,-6572.28 1102.8,-6543.54 1126,-6500 1146.48,-6461.57 1178.83,-6422.35 1198.93,-6399.64"/>
+<polygon fill="#00ff77" stroke="#00ff77" points="1201.67,-6401.83 1205.74,-6392.05 1196.46,-6397.16 1201.67,-6401.83"/>
 </g>
 <!-- proc~derivative2_scalar~2&#45;&gt;interface~compute_d2tgc~2 -->
 <g id="call~~graph~~CallGraph_edge247" class="edge">
 <title>proc~derivative2_scalar~2&#45;&gt;interface~compute_d2tgc~2</title>
-<path fill="none" stroke="#00ff7b" d="M1062.85,-1780.02C1093.78,-1785.24 1129.54,-1791.26 1158.83,-1796.2"/>
-<polygon fill="#00ff7b" stroke="#00ff7b" points="1158.46,-1799.68 1168.9,-1797.89 1159.62,-1792.78 1158.46,-1799.68"/>
+<path fill="none" stroke="#00ff7b" d="M1088.11,-4967.86C1112.05,-4965.84 1136.98,-4963.74 1158.46,-4961.93"/>
+<polygon fill="#00ff7b" stroke="#00ff7b" points="1159.04,-4965.4 1168.71,-4961.07 1158.45,-4958.42 1159.04,-4965.4"/>
 </g>
 <!-- proc~derivative2_scalar~2&#45;&gt;proc~is_rational~2 -->
 <g id="call~~graph~~CallGraph_edge248" class="edge">
 <title>proc~derivative2_scalar~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#00ff7b" d="M1079.83,-1780.18C1083.54,-1782.69 1086.97,-1785.61 1090,-1789 1145.02,-1850.62 1098.06,-2081.26 1126,-2159 1142.32,-2204.41 1177.34,-2249.28 1198.86,-2274.15"/>
-<polygon fill="#00ff7b" stroke="#00ff7b" points="1196.36,-2276.6 1205.6,-2281.78 1201.61,-2271.97 1196.36,-2276.6"/>
+<path fill="none" stroke="#00ff7b" d="M1078.46,-4988.09C1082.64,-4990.6 1086.53,-4993.55 1090,-4997 1142.93,-5049.61 1073.52,-5107.95 1126,-5161 1128.14,-5163.16 1130.45,-5165.12 1132.9,-5166.89"/>
+<polygon fill="#00ff7b" stroke="#00ff7b" points="1131.35,-5170.04 1141.71,-5172.22 1134.97,-5164.05 1131.35,-5170.04"/>
 </g>
 <!-- proc~derivative2_scalar~3&#45;&gt;interface~compute_d2tgc~3 -->
 <g id="call~~graph~~CallGraph_edge249" class="edge">
 <title>proc~derivative2_scalar~3&#45;&gt;interface~compute_d2tgc~3</title>
-<path fill="none" stroke="#00ff80" d="M1083.22,-30.54C1108.7,-32.91 1135.67,-35.43 1158.67,-37.57"/>
-<polygon fill="#00ff80" stroke="#00ff80" points="1158.65,-41.08 1168.94,-38.52 1159.3,-34.11 1158.65,-41.08"/>
+<path fill="none" stroke="#00ff80" d="M1088.11,-2331C1112.05,-2333.23 1136.98,-2335.55 1158.46,-2337.55"/>
+<polygon fill="#00ff80" stroke="#00ff80" points="1158.43,-2341.06 1168.71,-2338.5 1159.07,-2334.09 1158.43,-2341.06"/>
 </g>
 <!-- proc~derivative2_scalar~3&#45;&gt;proc~is_rational~3 -->
 <g id="call~~graph~~CallGraph_edge250" class="edge">
 <title>proc~derivative2_scalar~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#00ff80" d="M1078.34,-34.21C1082.54,-36.7 1086.48,-39.6 1090,-43 1161.77,-112.21 1204.14,-437.04 1214.5,-525.63"/>
-<polygon fill="#00ff80" stroke="#00ff80" points="1211.03,-526.13 1215.65,-535.66 1217.99,-525.33 1211.03,-526.13"/>
+<path fill="none" stroke="#00ff80" d="M1077.08,-2334.07C1081.72,-2336.57 1086.07,-2339.52 1090,-2343 1126.92,-2375.72 1102.8,-2404.46 1126,-2448 1146.48,-2486.43 1178.83,-2525.65 1198.93,-2548.36"/>
+<polygon fill="#00ff80" stroke="#00ff80" points="1196.46,-2550.84 1205.74,-2555.95 1201.67,-2546.17 1196.46,-2550.84"/>
 </g>
 <!-- proc~derivative2_vector&#45;&gt;interface~compute_d2tgc -->
 <g id="call~~graph~~CallGraph_edge251" class="edge">
 <title>proc~derivative2_vector&#45;&gt;interface~compute_d2tgc</title>
-<path fill="none" stroke="#00ff84" d="M1049.65,-6454.03C1062.93,-6456.88 1076.97,-6459.97 1090,-6463 1113.33,-6468.43 1138.97,-6474.81 1161.07,-6480.44"/>
-<polygon fill="#00ff84" stroke="#00ff84" points="1160.39,-6483.88 1170.95,-6482.96 1162.13,-6477.09 1160.39,-6483.88"/>
-</g>
-<!-- proc~derivative2_vector&#45;&gt;interface~ndgrid -->
-<g id="call~~graph~~CallGraph_edge252" class="edge">
-<title>proc~derivative2_vector&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#00ff84" d="M1027.51,-6429.92C1049.33,-6420.63 1075.64,-6405.52 1090,-6383 1172.87,-6253 1054.82,-6174.75 1126,-6038 1139.61,-6011.86 1165.8,-5990.56 1186.6,-5976.7"/>
-<polygon fill="#00ff84" stroke="#00ff84" points="1188.61,-5979.57 1195.13,-5971.22 1184.83,-5973.68 1188.61,-5979.57"/>
+<path fill="none" stroke="#00ff84" d="M1084.2,-6584C1109.37,-6584 1135.93,-6584 1158.62,-6584"/>
+<polygon fill="#00ff84" stroke="#00ff84" points="1158.76,-6587.5 1168.76,-6584 1158.76,-6580.5 1158.76,-6587.5"/>
 </g>
 <!-- proc~derivative2_vector&#45;&gt;proc~is_rational -->
-<g id="call~~graph~~CallGraph_edge253" class="edge">
+<g id="call~~graph~~CallGraph_edge252" class="edge">
 <title>proc~derivative2_vector&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#00ff84" d="M1088.77,-6433.37C1103.06,-6432.11 1117.69,-6430.81 1131.72,-6429.56"/>
-<polygon fill="#00ff84" stroke="#00ff84" points="1132.16,-6433.04 1141.81,-6428.67 1131.54,-6426.07 1132.16,-6433.04"/>
+<path fill="none" stroke="#00ff84" d="M1074.42,-6571.92C1079.94,-6569.45 1085.2,-6566.51 1090,-6563 1116.04,-6543.98 1108.22,-6526.9 1126,-6500 1150.14,-6463.48 1181.63,-6423.4 1200.53,-6400.03"/>
+<polygon fill="#00ff84" stroke="#00ff84" points="1203.29,-6402.19 1206.89,-6392.22 1197.86,-6397.77 1203.29,-6402.19"/>
 </g>
 <!-- proc~derivative2_vector~2&#45;&gt;interface~compute_d2tgc~2 -->
-<g id="call~~graph~~CallGraph_edge254" class="edge">
+<g id="call~~graph~~CallGraph_edge253" class="edge">
 <title>proc~derivative2_vector~2&#45;&gt;interface~compute_d2tgc~2</title>
-<path fill="none" stroke="#00ff88" d="M1088.77,-1808.27C1112.53,-1807.85 1137.24,-1807.41 1158.54,-1807.04"/>
-<polygon fill="#00ff88" stroke="#00ff88" points="1158.77,-1810.53 1168.71,-1806.86 1158.65,-1803.53 1158.77,-1810.53"/>
+<path fill="none" stroke="#00ff88" d="M1037.63,-4908.07C1054.16,-4912.42 1072.92,-4917.39 1090,-4922 1114.33,-4928.56 1141.25,-4935.96 1164.01,-4942.26"/>
+<polygon fill="#00ff88" stroke="#00ff88" points="1163.26,-4945.68 1173.83,-4944.98 1165.12,-4938.94 1163.26,-4945.68"/>
 </g>
 <!-- proc~derivative2_vector~2&#45;&gt;interface~ndgrid -->
-<g id="call~~graph~~CallGraph_edge255" class="edge">
+<g id="call~~graph~~CallGraph_edge254" class="edge">
 <title>proc~derivative2_vector~2&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#00ff88" d="M1029.24,-1822.05C1051.15,-1831.19 1076.93,-1846.17 1090,-1869 1145.63,-1966.15 1072.49,-5800.67 1126,-5899 1137.87,-5920.81 1161.48,-5936.03 1181.68,-5945.68"/>
-<polygon fill="#00ff88" stroke="#00ff88" points="1180.4,-5948.94 1190.95,-5949.85 1183.27,-5942.56 1180.4,-5948.94"/>
+<path fill="none" stroke="#00ff88" d="M1088.77,-4896C1121.31,-4896 1155.61,-4896 1180.53,-4896"/>
+<polygon fill="#00ff88" stroke="#00ff88" points="1180.61,-4899.5 1190.61,-4896 1180.61,-4892.5 1180.61,-4899.5"/>
 </g>
 <!-- proc~derivative2_vector~2&#45;&gt;proc~is_rational~2 -->
-<g id="call~~graph~~CallGraph_edge256" class="edge">
+<g id="call~~graph~~CallGraph_edge255" class="edge">
 <title>proc~derivative2_vector~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#00ff88" d="M1072.28,-1822.09C1078.95,-1825.68 1085.03,-1830.24 1090,-1836 1137.18,-1890.68 1101.1,-2091.21 1126,-2159 1142.64,-2204.29 1177.55,-2249.21 1198.97,-2274.11"/>
-<polygon fill="#00ff88" stroke="#00ff88" points="1196.44,-2276.54 1205.67,-2281.76 1201.71,-2271.93 1196.44,-2276.54"/>
+<path fill="none" stroke="#00ff88" d="M1071.58,-4908.04C1078.48,-4911.64 1084.8,-4916.21 1090,-4922 1161.72,-5001.97 1053.03,-5082.16 1126,-5161 1128.12,-5163.29 1130.43,-5165.35 1132.89,-5167.21"/>
+<polygon fill="#00ff88" stroke="#00ff88" points="1131.47,-5170.44 1141.81,-5172.77 1135.18,-5164.51 1131.47,-5170.44"/>
 </g>
 <!-- proc~derivative2_vector~3&#45;&gt;interface~compute_d2tgc~3 -->
-<g id="call~~graph~~CallGraph_edge257" class="edge">
+<g id="call~~graph~~CallGraph_edge256" class="edge">
 <title>proc~derivative2_vector~3&#45;&gt;interface~compute_d2tgc~3</title>
-<path fill="none" stroke="#00ff8c" d="M1084.2,-55.37C1109.37,-53.02 1135.93,-50.55 1158.62,-48.44"/>
-<polygon fill="#00ff8c" stroke="#00ff8c" points="1159.12,-51.91 1168.76,-47.49 1158.47,-44.94 1159.12,-51.91"/>
+<path fill="none" stroke="#00ff8c" d="M1088.77,-2354.94C1112.53,-2352.73 1137.24,-2350.43 1158.54,-2348.44"/>
+<polygon fill="#00ff8c" stroke="#00ff8c" points="1159.07,-2351.91 1168.71,-2347.5 1158.43,-2344.94 1159.07,-2351.91"/>
+</g>
+<!-- proc~derivative2_vector~3&#45;&gt;interface~ndgrid -->
+<g id="call~~graph~~CallGraph_edge257" class="edge">
+<title>proc~derivative2_vector~3&#45;&gt;interface~ndgrid</title>
+<path fill="none" stroke="#00ff8c" d="M1080.59,-2376.19C1084.05,-2378.7 1087.23,-2381.62 1090,-2385 1177.81,-2491.91 1039.09,-4767.36 1126,-4875 1138.95,-4891.04 1161.49,-4896.33 1180.89,-4897.59"/>
+<polygon fill="#00ff8c" stroke="#00ff8c" points="1180.86,-4901.09 1190.97,-4897.91 1181.09,-4894.09 1180.86,-4901.09"/>
 </g>
 <!-- proc~derivative2_vector~3&#45;&gt;proc~is_rational~3 -->
 <g id="call~~graph~~CallGraph_edge258" class="edge">
 <title>proc~derivative2_vector~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#00ff8c" d="M1038.14,-76.03C1056.59,-82.93 1076.55,-93.41 1090,-109 1200.23,-236.74 1214.96,-455.19 1216.79,-525.5"/>
-<polygon fill="#00ff8c" stroke="#00ff8c" points="1213.3,-525.89 1216.99,-535.82 1220.3,-525.76 1213.3,-525.89"/>
+<path fill="none" stroke="#00ff8c" d="M1074.42,-2376.08C1079.94,-2378.55 1085.2,-2381.49 1090,-2385 1116.04,-2404.02 1108.22,-2421.1 1126,-2448 1150.14,-2484.52 1181.63,-2524.6 1200.53,-2547.97"/>
+<polygon fill="#00ff8c" stroke="#00ff8c" points="1197.86,-2550.23 1206.89,-2555.78 1203.29,-2545.81 1197.86,-2550.23"/>
 </g>
 <!-- proc~derivative_scalar&#45;&gt;interface~compute_dtgc -->
 <g id="call~~graph~~CallGraph_edge259" class="edge">
 <title>proc~derivative_scalar&#45;&gt;interface~compute_dtgc</title>
-<path fill="none" stroke="#00ff91" d="M1084.52,-6311.34C1110.94,-6308.88 1138.85,-6306.28 1162.21,-6304.1"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="1162.63,-6307.58 1172.26,-6303.17 1161.98,-6300.61 1162.63,-6307.58"/>
+<path fill="none" stroke="#00ff91" d="M1079.65,-5774.21C1107.43,-5776.8 1137.3,-5779.58 1162.07,-5781.88"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="1162.07,-5785.4 1172.35,-5782.84 1162.72,-5778.43 1162.07,-5785.4"/>
 </g>
 <!-- proc~derivative_scalar&#45;&gt;proc~is_rational -->
 <g id="call~~graph~~CallGraph_edge260" class="edge">
 <title>proc~derivative_scalar&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#00ff91" d="M1062.91,-6332.04C1072.18,-6334.53 1081.42,-6337.49 1090,-6341 1129.18,-6357.05 1169.6,-6385.2 1194.02,-6403.72"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="1191.9,-6406.51 1201.96,-6409.84 1196.17,-6400.96 1191.9,-6406.51"/>
+<path fill="none" stroke="#00ff91" d="M1079.78,-5778.23C1083.51,-5780.72 1086.95,-5783.63 1090,-5787 1139.17,-5841.39 1109.99,-6043.44 1126,-6115 1146.83,-6208.15 1189.19,-6314.19 1207.84,-6358.63"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="1204.62,-6360.02 1211.74,-6367.86 1211.07,-6357.29 1204.62,-6360.02"/>
 </g>
 <!-- proc~derivative_scalar~2&#45;&gt;interface~compute_dtgc~2 -->
 <g id="call~~graph~~CallGraph_edge261" class="edge">
 <title>proc~derivative_scalar~2&#45;&gt;interface~compute_dtgc~2</title>
-<path fill="none" stroke="#00ff95" d="M1079.21,-3706.07C1083.14,-3708.59 1086.78,-3711.55 1090,-3715 1167.23,-3797.68 1049.47,-3883.68 1126,-3967 1135.44,-3977.28 1148.83,-3983.02 1162.44,-3986.11"/>
-<polygon fill="#00ff95" stroke="#00ff95" points="1161.86,-3989.57 1172.33,-3987.92 1163.12,-3982.68 1161.86,-3989.57"/>
+<path fill="none" stroke="#00ff95" d="M1056.12,-5253.96C1089.71,-5247.71 1130.31,-5240.15 1162.32,-5234.18"/>
+<polygon fill="#00ff95" stroke="#00ff95" points="1163.2,-5237.58 1172.39,-5232.31 1161.92,-5230.7 1163.2,-5237.58"/>
 </g>
 <!-- proc~derivative_scalar~2&#45;&gt;proc~is_rational~2 -->
 <g id="call~~graph~~CallGraph_edge262" class="edge">
 <title>proc~derivative_scalar~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#00ff95" d="M1080.53,-3681.76C1084.01,-3679.26 1087.2,-3676.36 1090,-3673 1133.99,-3620.23 1105.84,-2502.67 1126,-2437 1140.97,-2388.26 1177.35,-2340 1199.31,-2313.89"/>
-<polygon fill="#00ff95" stroke="#00ff95" points="1202.04,-2316.09 1205.89,-2306.22 1196.72,-2311.53 1202.04,-2316.09"/>
+<path fill="none" stroke="#00ff95" d="M1070.95,-5253.92C1077.61,-5251.47 1084.06,-5248.53 1090,-5245 1111.14,-5232.44 1104.97,-5215.73 1126,-5203 1129,-5201.18 1132.15,-5199.52 1135.39,-5198"/>
+<polygon fill="#00ff95" stroke="#00ff95" points="1136.88,-5201.18 1144.76,-5194.1 1134.18,-5194.72 1136.88,-5201.18"/>
 </g>
 <!-- proc~derivative_scalar~3&#45;&gt;interface~compute_dtgc~3 -->
 <g id="call~~graph~~CallGraph_edge263" class="edge">
 <title>proc~derivative_scalar~3&#45;&gt;interface~compute_dtgc~3</title>
-<path fill="none" stroke="#00ff99" d="M1056.12,-2596.04C1089.71,-2602.29 1130.31,-2609.85 1162.32,-2615.82"/>
-<polygon fill="#00ff99" stroke="#00ff99" points="1161.92,-2619.3 1172.39,-2617.69 1163.2,-2612.42 1161.92,-2619.3"/>
+<path fill="none" stroke="#00ff99" d="M1084.52,-4496.66C1110.94,-4499.12 1138.85,-4501.72 1162.21,-4503.9"/>
+<polygon fill="#00ff99" stroke="#00ff99" points="1161.98,-4507.39 1172.26,-4504.83 1162.63,-4500.42 1161.98,-4507.39"/>
 </g>
 <!-- proc~derivative_scalar~3&#45;&gt;proc~is_rational~3 -->
 <g id="call~~graph~~CallGraph_edge264" class="edge">
 <title>proc~derivative_scalar~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#00ff99" d="M1079.73,-2572.4C1083.53,-2569.75 1087,-2566.64 1090,-2563 1159.78,-2478.37 1065.63,-680.58 1126,-589 1133.07,-578.27 1143.69,-570.32 1155.2,-564.43"/>
-<polygon fill="#00ff99" stroke="#00ff99" points="1156.93,-567.48 1164.57,-560.14 1154.02,-561.12 1156.93,-567.48"/>
+<path fill="none" stroke="#00ff99" d="M1004.95,-4475.88C1027.58,-4454.5 1072.5,-4407.55 1090,-4357 1150.06,-4183.5 1071.03,-2880.18 1126,-2705 1140.59,-2658.49 1176.19,-2613.09 1198.28,-2588"/>
+<polygon fill="#00ff99" stroke="#00ff99" points="1201.13,-2590.08 1205.21,-2580.3 1195.92,-2585.4 1201.13,-2590.08"/>
 </g>
 <!-- proc~derivative_vector&#45;&gt;interface~compute_dtgc -->
 <g id="call~~graph~~CallGraph_edge265" class="edge">
 <title>proc~derivative_vector&#45;&gt;interface~compute_dtgc</title>
-<path fill="none" stroke="#00ff9d" d="M1085.83,-6286.78C1111.78,-6289.2 1139.08,-6291.74 1162.01,-6293.88"/>
-<polygon fill="#00ff9d" stroke="#00ff9d" points="1161.93,-6297.39 1172.21,-6294.83 1162.58,-6290.42 1161.93,-6297.39"/>
-</g>
-<!-- proc~derivative_vector&#45;&gt;interface~ndgrid -->
-<g id="call~~graph~~CallGraph_edge266" class="edge">
-<title>proc~derivative_vector&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#00ff9d" d="M1071.48,-6265.87C1078.4,-6262.29 1084.75,-6257.75 1090,-6252 1155.01,-6180.76 1078.81,-6122.11 1126,-6038 1140.51,-6012.14 1166.85,-5990.69 1187.47,-5976.71"/>
-<polygon fill="#00ff9d" stroke="#00ff9d" points="1189.47,-5979.59 1195.91,-5971.18 1185.63,-5973.73 1189.47,-5979.59"/>
+<path fill="none" stroke="#00ff9d" d="M1080.62,-5799.7C1108.2,-5797.13 1137.75,-5794.38 1162.27,-5792.1"/>
+<polygon fill="#00ff9d" stroke="#00ff9d" points="1162.82,-5795.56 1172.45,-5791.15 1162.17,-5788.59 1162.82,-5795.56"/>
 </g>
 <!-- proc~derivative_vector&#45;&gt;proc~is_rational -->
-<g id="call~~graph~~CallGraph_edge267" class="edge">
+<g id="call~~graph~~CallGraph_edge266" class="edge">
 <title>proc~derivative_vector&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#00ff9d" d="M1068.82,-6290.08C1076.18,-6292.52 1083.37,-6295.46 1090,-6299 1138.15,-6324.67 1180.67,-6373.99 1202.16,-6401.75"/>
-<polygon fill="#00ff9d" stroke="#00ff9d" points="1199.54,-6404.09 1208.38,-6409.94 1205.12,-6399.86 1199.54,-6404.09"/>
+<path fill="none" stroke="#00ff9d" d="M1072.18,-5820.17C1078.88,-5823.75 1084.98,-5828.28 1090,-5834 1131.51,-5881.33 1111.7,-6053.69 1126,-6115 1147.68,-6207.95 1189.58,-6314.1 1207.98,-6358.6"/>
+<polygon fill="#00ff9d" stroke="#00ff9d" points="1204.75,-6359.96 1211.82,-6367.84 1211.21,-6357.27 1204.75,-6359.96"/>
 </g>
 <!-- proc~derivative_vector~2&#45;&gt;interface~compute_dtgc~2 -->
-<g id="call~~graph~~CallGraph_edge268" class="edge">
+<g id="call~~graph~~CallGraph_edge267" class="edge">
 <title>proc~derivative_vector~2&#45;&gt;interface~compute_dtgc~2</title>
-<path fill="none" stroke="#00ffa2" d="M1085.83,-3988C1111.78,-3988 1139.08,-3988 1162.01,-3988"/>
-<polygon fill="#00ffa2" stroke="#00ffa2" points="1162.21,-3991.5 1172.21,-3988 1162.21,-3984.5 1162.21,-3991.5"/>
+<path fill="none" stroke="#00ffa2" d="M1085.83,-5224C1111.78,-5224 1139.08,-5224 1162.01,-5224"/>
+<polygon fill="#00ffa2" stroke="#00ffa2" points="1162.21,-5227.5 1172.21,-5224 1162.21,-5220.5 1162.21,-5227.5"/>
 </g>
 <!-- proc~derivative_vector~2&#45;&gt;interface~ndgrid -->
-<g id="call~~graph~~CallGraph_edge269" class="edge">
+<g id="call~~graph~~CallGraph_edge268" class="edge">
 <title>proc~derivative_vector~2&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#00ffa2" d="M1080.57,-4000.2C1084.04,-4002.72 1087.22,-4005.63 1090,-4009 1156.84,-4090 1075.33,-5807.01 1126,-5899 1137.9,-5920.61 1161.28,-5935.77 1181.36,-5945.44"/>
-<polygon fill="#00ffa2" stroke="#00ffa2" points="1180.04,-5948.69 1190.59,-5949.63 1182.93,-5942.31 1180.04,-5948.69"/>
+<path fill="none" stroke="#00ffa2" d="M1079.24,-5211.96C1083.16,-5209.43 1086.79,-5206.46 1090,-5203 1171.39,-5115.17 1053.98,-5031.66 1126,-4936 1139.17,-4918.51 1161.64,-4908.53 1180.96,-4902.91"/>
+<polygon fill="#00ffa2" stroke="#00ffa2" points="1181.92,-4906.28 1190.7,-4900.36 1180.14,-4899.51 1181.92,-4906.28"/>
 </g>
 <!-- proc~derivative_vector~2&#45;&gt;proc~is_rational~2 -->
-<g id="call~~graph~~CallGraph_edge270" class="edge">
+<g id="call~~graph~~CallGraph_edge269" class="edge">
 <title>proc~derivative_vector~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#00ffa2" d="M1080.55,-3975.78C1084.03,-3973.27 1087.21,-3970.37 1090,-3967 1144.26,-3901.54 1101.27,-2518.35 1126,-2437 1140.83,-2388.22 1177.26,-2339.97 1199.27,-2313.88"/>
-<polygon fill="#00ffa2" stroke="#00ffa2" points="1202,-2316.07 1205.86,-2306.21 1196.69,-2311.51 1202,-2316.07"/>
+<path fill="none" stroke="#00ffa2" d="M1056.12,-5211.96C1083.01,-5206.96 1114.4,-5201.11 1142.27,-5195.92"/>
+<polygon fill="#00ffa2" stroke="#00ffa2" points="1143.18,-5199.31 1152.37,-5194.04 1141.9,-5192.43 1143.18,-5199.31"/>
 </g>
 <!-- proc~derivative_vector~3&#45;&gt;interface~compute_dtgc~3 -->
-<g id="call~~graph~~CallGraph_edge271" class="edge">
+<g id="call~~graph~~CallGraph_edge270" class="edge">
 <title>proc~derivative_vector~3&#45;&gt;interface~compute_dtgc~3</title>
-<path fill="none" stroke="#00ffa6" d="M1070.95,-2554.08C1077.61,-2556.53 1084.06,-2559.47 1090,-2563 1111.14,-2575.56 1104.97,-2592.27 1126,-2605 1136.94,-2611.63 1149.79,-2616.16 1162.32,-2619.27"/>
-<polygon fill="#00ffa6" stroke="#00ffa6" points="1161.74,-2622.73 1172.26,-2621.47 1163.25,-2615.89 1161.74,-2622.73"/>
+<path fill="none" stroke="#00ffa6" d="M1085.83,-4521.22C1111.78,-4518.8 1139.08,-4516.26 1162.01,-4514.12"/>
+<polygon fill="#00ffa6" stroke="#00ffa6" points="1162.58,-4517.58 1172.21,-4513.17 1161.93,-4510.61 1162.58,-4517.58"/>
+</g>
+<!-- proc~derivative_vector~3&#45;&gt;interface~ndgrid -->
+<g id="call~~graph~~CallGraph_edge271" class="edge">
+<title>proc~derivative_vector~3&#45;&gt;interface~ndgrid</title>
+<path fill="none" stroke="#00ffa6" d="M1072.27,-4542.09C1078.95,-4545.69 1085.03,-4550.25 1090,-4556 1183.28,-4663.96 1031.05,-4768.51 1126,-4875 1139.47,-4890.11 1161.46,-4895.48 1180.44,-4897.01"/>
+<polygon fill="#00ffa6" stroke="#00ffa6" points="1180.45,-4900.51 1190.6,-4897.5 1180.79,-4893.52 1180.45,-4900.51"/>
 </g>
 <!-- proc~derivative_vector~3&#45;&gt;proc~is_rational~3 -->
 <g id="call~~graph~~CallGraph_edge272" class="edge">
 <title>proc~derivative_vector~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#00ffa6" d="M1075.07,-2529.92C1080.74,-2526.5 1085.83,-2522.25 1090,-2517 1156.56,-2433.06 1067.01,-678.43 1126,-589 1133.08,-578.27 1143.69,-570.32 1155.2,-564.43"/>
-<polygon fill="#00ffa6" stroke="#00ffa6" points="1156.94,-567.49 1164.57,-560.14 1154.02,-561.12 1156.94,-567.49"/>
+<path fill="none" stroke="#00ffa6" d="M1080.57,-4517.79C1084.04,-4515.28 1087.22,-4512.37 1090,-4509 1153.83,-4431.71 1096.08,-2800.67 1126,-2705 1140.55,-2658.48 1176.16,-2613.09 1198.27,-2588"/>
+<polygon fill="#00ffa6" stroke="#00ffa6" points="1201.11,-2590.07 1205.2,-2580.3 1195.91,-2585.39 1201.11,-2590.07"/>
 </g>
 <!-- proc~elevate_degree -->
 <g id="call~~graph~~CallGraph_node164" class="node">
 <title>proc~elevate_degree</title>
-<g id="a_call~~graph~~CallGraph_node164"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="851,-3424 671,-3424 671,-3400 851,-3400 851,-3424"/>
-<text text-anchor="middle" x="761" y="-3409.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
+<g id="a_call~~graph~~CallGraph_node164"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="846,-5906 676,-5906 676,-5882 846,-5882 846,-5906"/>
+<text text-anchor="middle" x="761" y="-5891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~elevate_degree&#45;&gt;none~get_knot -->
-<g id="call~~graph~~CallGraph_edge273" class="edge">
-<title>proc~elevate_degree&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#00ffb2" d="M843.74,-3399.81C847.83,-3397.33 851.63,-3394.42 855,-3391 909.24,-3336.02 836.43,-3275.65 891,-3221 896.31,-3215.68 902.61,-3211.56 909.42,-3208.38"/>
-<polygon fill="#00ffb2" stroke="#00ffb2" points="910.97,-3211.53 918.98,-3204.6 908.4,-3205.02 910.97,-3211.53"/>
-</g>
 <!-- proc~elevate_degree&#45;&gt;none~set -->
-<g id="call~~graph~~CallGraph_edge274" class="edge">
+<g id="call~~graph~~CallGraph_edge273" class="edge">
 <title>proc~elevate_degree&#45;&gt;none~set</title>
-<path fill="none" stroke="#00ffb2" d="M785.49,-3424.18C826.38,-3445.39 910.7,-3489.13 957.11,-3513.2"/>
-<polygon fill="#00ffb2" stroke="#00ffb2" points="955.65,-3516.39 966.14,-3517.88 958.87,-3510.17 955.65,-3516.39"/>
+<path fill="none" stroke="#00ffb2" d="M833.45,-5906.01C841.36,-5909.55 848.79,-5914.12 855,-5920 891.13,-5954.2 854.62,-5992.06 891,-6026 901.41,-6035.71 915,-6041.88 928.76,-6045.79"/>
+<polygon fill="#00ffb2" stroke="#00ffb2" points="928.21,-6049.25 938.75,-6048.24 929.88,-6042.46 928.21,-6049.25"/>
 </g>
 <!-- proc~elevate_degree_a_5_9 -->
 <g id="call~~graph~~CallGraph_node165" class="node">
 <title>proc~elevate_degree_a_5_9</title>
 <g id="a_call~~graph~~CallGraph_node165"><a xlink:href="../proc/elevate_degree_a_5_9.html" xlink:title="elevate_degree_A_5_9">
-<polygon fill="#d9534f" stroke="#d9534f" points="1056.5,-1738 924.5,-1738 924.5,-1714 1056.5,-1714 1056.5,-1738"/>
-<text text-anchor="middle" x="990.5" y="-1723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elevate_degree_A_5_9</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1056.5,-3911 924.5,-3911 924.5,-3887 1056.5,-3887 1056.5,-3911"/>
+<text text-anchor="middle" x="990.5" y="-3896.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elevate_degree_A_5_9</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree&#45;&gt;proc~elevate_degree_a_5_9 -->
-<g id="call~~graph~~CallGraph_edge275" class="edge">
+<g id="call~~graph~~CallGraph_edge274" class="edge">
 <title>proc~elevate_degree&#45;&gt;proc~elevate_degree_a_5_9</title>
-<path fill="none" stroke="#00ffb2" d="M845.32,-3399.96C848.91,-3397.42 852.17,-3394.46 855,-3391 912.82,-3320.27 832.76,-1817.38 891,-1747 897.29,-1739.4 905.59,-1734.13 914.71,-1730.53"/>
-<polygon fill="#00ffb2" stroke="#00ffb2" points="916.03,-1733.78 924.45,-1727.36 913.86,-1727.13 916.03,-1733.78"/>
+<path fill="none" stroke="#00ffb2" d="M845.33,-5881.97C848.91,-5879.43 852.18,-5876.46 855,-5873 919.55,-5793.85 858.56,-4131.84 891,-4035 906.79,-3987.86 945.26,-3943.17 969.18,-3918.59"/>
+<polygon fill="#00ffb2" stroke="#00ffb2" points="971.82,-3920.89 976.39,-3911.33 966.85,-3915.96 971.82,-3920.89"/>
+</g>
+<!-- proc~elevate_degree&#45;&gt;proc~is_rational -->
+<g id="call~~graph~~CallGraph_edge275" class="edge">
+<title>proc~elevate_degree&#45;&gt;proc~is_rational</title>
+<path fill="none" stroke="#00ffb2" d="M846.39,-5905.27C849.41,-5906.96 852.3,-5908.86 855,-5911 886.22,-5935.68 859.87,-5968.19 891,-5993 961.42,-6049.12 1021.44,-5972.63 1090,-6031 1103.25,-6042.28 1184.47,-6282.72 1209.6,-6357.81"/>
+<polygon fill="#00ffb2" stroke="#00ffb2" points="1206.39,-6359.26 1212.88,-6367.64 1213.03,-6357.04 1206.39,-6359.26"/>
 </g>
 <!-- proc~elevate_degree_a_5_9&#45;&gt;interface~compute_multiplicity -->
 <g id="call~~graph~~CallGraph_edge276" class="edge">
 <title>proc~elevate_degree_a_5_9&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00ffb7" d="M1056.73,-1723.03C1176.82,-1718.4 1428.02,-1712.86 1509,-1743 1623.62,-1785.67 1662.68,-1809.61 1723,-1916 1789.73,-2033.7 1814.13,-2474.75 1819.03,-2578.87"/>
-<polygon fill="#00ffb7" stroke="#00ffb7" points="1815.53,-2579.05 1819.49,-2588.88 1822.53,-2578.73 1815.53,-2579.05"/>
+<path fill="none" stroke="#00ffb7" d="M1043.66,-3886.99C1106.76,-3872.44 1216.21,-3847.11 1310,-3825 1473.03,-3786.56 1665.15,-3740.36 1760.34,-3717.4"/>
+<polygon fill="#00ffb7" stroke="#00ffb7" points="1761.18,-3720.8 1770.08,-3715.06 1759.53,-3714 1761.18,-3720.8"/>
 </g>
 <!-- proc~elevate_degree_a_5_9&#45;&gt;proc~bincoeff -->
 <g id="call~~graph~~CallGraph_edge277" class="edge">
 <title>proc~elevate_degree_a_5_9&#45;&gt;proc~bincoeff</title>
-<path fill="none" stroke="#00ffb7" d="M1056.72,-1736.99C1096.63,-1743.72 1146.26,-1752.08 1179.63,-1757.7"/>
-<polygon fill="#00ffb7" stroke="#00ffb7" points="1179.42,-1761.22 1189.86,-1759.43 1180.58,-1754.31 1179.42,-1761.22"/>
+<path fill="none" stroke="#00ffb7" d="M1056.72,-3899C1096.63,-3899 1146.26,-3899 1179.63,-3899"/>
+<polygon fill="#00ffb7" stroke="#00ffb7" points="1179.86,-3902.5 1189.86,-3899 1179.86,-3895.5 1179.86,-3902.5"/>
 </g>
 <!-- proc~elevate_degree~2 -->
 <g id="call~~graph~~CallGraph_node166" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_call~~graph~~CallGraph_node166"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="851,-1932 671,-1932 671,-1908 851,-1908 851,-1932"/>
-<text text-anchor="middle" x="761" y="-1917.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<g id="a_call~~graph~~CallGraph_node166"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="851,-3932 671,-3932 671,-3908 851,-3908 851,-3932"/>
+<text text-anchor="middle" x="761" y="-3917.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;none~get_knot~2 -->
 <g id="call~~graph~~CallGraph_edge278" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;none~get_knot~2</title>
-<path fill="none" stroke="#00ffbb" d="M851.26,-1908.23C870.25,-1905.72 890.2,-1903.09 908.85,-1900.63"/>
-<polygon fill="#00ffbb" stroke="#00ffbb" points="909.31,-1904.1 918.77,-1899.33 908.4,-1897.16 909.31,-1904.1"/>
+<path fill="none" stroke="#00ffbb" d="M819.51,-3907.97C831.59,-3904.34 844,-3899.74 855,-3894 901.49,-3869.72 946.66,-3827.46 971,-3802.68"/>
+<polygon fill="#00ffbb" stroke="#00ffbb" points="973.71,-3804.92 978.15,-3795.3 968.68,-3800.05 973.71,-3804.92"/>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;none~set~2 -->
 <g id="call~~graph~~CallGraph_edge279" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ffbb" d="M838.09,-1932.21C844.52,-1935.78 850.33,-1940.29 855,-1946 924.28,-2030.68 833.61,-2343.85 891,-2437 903,-2456.49 924.05,-2470.36 943.62,-2479.74"/>
-<polygon fill="#00ffbb" stroke="#00ffbb" points="942.21,-2482.94 952.76,-2483.86 945.09,-2476.56 942.21,-2482.94"/>
+<path fill="none" stroke="#00ffbb" d="M837.35,-3932.23C844.01,-3935.78 850.07,-3940.29 855,-3946 938.94,-4043.37 835.79,-4116.91 891,-4233 907.75,-4268.22 941.22,-4299.12 964.47,-4317.67"/>
+<polygon fill="#00ffbb" stroke="#00ffbb" points="962.48,-4320.55 972.52,-4323.93 966.77,-4315.03 962.48,-4320.55"/>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;proc~elevate_degree_a_5_9 -->
 <g id="call~~graph~~CallGraph_edge280" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;proc~elevate_degree_a_5_9</title>
-<path fill="none" stroke="#00ffbb" d="M791.49,-1907.92C812.02,-1898.1 838.56,-1882.37 855,-1861 887.39,-1818.88 851.67,-1782.73 891,-1747 897.84,-1740.78 906.06,-1736.24 914.79,-1732.94"/>
-<polygon fill="#00ffbb" stroke="#00ffbb" points="915.99,-1736.23 924.43,-1729.83 913.84,-1729.57 915.99,-1736.23"/>
-</g>
-<!-- proc~elevate_degree~2&#45;&gt;proc~is_rational~2 -->
-<g id="call~~graph~~CallGraph_edge281" class="edge">
-<title>proc~elevate_degree~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#00ffbb" d="M832.62,-1932.2C840.77,-1935.71 848.48,-1940.22 855,-1946 886.31,-1973.77 859.98,-2004.92 891,-2033 959.49,-2094.99 1018.29,-2034.76 1090,-2093 1115.94,-2114.07 1108.64,-2130.45 1126,-2159 1151.35,-2200.7 1183.9,-2247.55 1202.4,-2273.64"/>
-<polygon fill="#00ffbb" stroke="#00ffbb" points="1199.68,-2275.85 1208.33,-2281.97 1205.38,-2271.79 1199.68,-2275.85"/>
+<path fill="none" stroke="#00ffbb" d="M851.26,-3911.76C872.13,-3909.83 894.16,-3907.8 914.35,-3905.94"/>
+<polygon fill="#00ffbb" stroke="#00ffbb" points="914.77,-3909.41 924.41,-3905.01 914.13,-3902.44 914.77,-3909.41"/>
 </g>
 <!-- proc~elevate_degree~3 -->
 <g id="call~~graph~~CallGraph_node167" class="node">
 <title>proc~elevate_degree~3</title>
-<g id="a_call~~graph~~CallGraph_node167"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="846,-474 676,-474 676,-450 846,-450 846,-474"/>
-<text text-anchor="middle" x="761" y="-459.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+<g id="a_call~~graph~~CallGraph_node167"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="851,-2990 671,-2990 671,-2966 851,-2966 851,-2990"/>
+<text text-anchor="middle" x="761" y="-2975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
 </a>
 </g>
 </g>
+<!-- proc~elevate_degree~3&#45;&gt;none~get_knot~3 -->
+<g id="call~~graph~~CallGraph_edge281" class="edge">
+<title>proc~elevate_degree~3&#45;&gt;none~get_knot~3</title>
+<path fill="none" stroke="#00ffbf" d="M838.07,-2965.83C844.03,-2963.4 849.76,-2960.48 855,-2957 919.46,-2914.1 962.96,-2829.03 980.63,-2789.34"/>
+<polygon fill="#00ffbf" stroke="#00ffbf" points="983.88,-2790.62 984.65,-2780.06 977.46,-2787.84 983.88,-2790.62"/>
+</g>
 <!-- proc~elevate_degree~3&#45;&gt;none~set~3 -->
 <g id="call~~graph~~CallGraph_edge282" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#00ffbf" d="M843.73,-474.2C847.82,-476.68 851.62,-479.59 855,-483 908.7,-537.29 863.24,-579.86 891,-651 912.95,-707.27 952.52,-766.7 974.23,-797.22"/>
-<polygon fill="#00ffbf" stroke="#00ffbf" points="971.67,-799.66 980.35,-805.73 977.35,-795.57 971.67,-799.66"/>
+<path fill="none" stroke="#00ffbf" d="M819.11,-2990.05C850.96,-2996.77 890.76,-3005.17 923.89,-3012.16"/>
+<polygon fill="#00ffbf" stroke="#00ffbf" points="923.43,-3015.64 933.94,-3014.28 924.87,-3008.79 923.43,-3015.64"/>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;proc~elevate_degree_a_5_9 -->
 <g id="call~~graph~~CallGraph_edge283" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;proc~elevate_degree_a_5_9</title>
-<path fill="none" stroke="#00ffbf" d="M845.29,-474.07C848.88,-476.6 852.16,-479.55 855,-483 941.37,-587.84 804,-1600.68 891,-1705 897.28,-1712.52 905.52,-1717.76 914.58,-1721.35"/>
-<polygon fill="#00ffbf" stroke="#00ffbf" points="913.67,-1724.74 924.26,-1724.52 915.85,-1718.08 913.67,-1724.74"/>
+<path fill="none" stroke="#00ffbf" d="M796,-2990.12C816.88,-2999.49 842.04,-3014.68 855,-3037 940.7,-3184.55 820.61,-3648.56 891,-3804 905.86,-3836.82 937.67,-3864.09 961.14,-3880.87"/>
+<polygon fill="#00ffbf" stroke="#00ffbf" points="959.46,-3883.96 969.68,-3886.78 963.45,-3878.21 959.46,-3883.96"/>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;proc~is_rational~3 -->
 <g id="call~~graph~~CallGraph_edge284" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#00ffbf" d="M825.74,-474.05C909.23,-489.83 1055.3,-517.44 1143.4,-534.09"/>
-<polygon fill="#00ffbf" stroke="#00ffbf" points="1142.84,-537.55 1153.32,-535.96 1144.14,-530.67 1142.84,-537.55"/>
+<path fill="none" stroke="#00ffbf" d="M828.4,-2965.9C837.49,-2963.41 846.58,-2960.47 855,-2957 968.92,-2910.1 1013.4,-2906.48 1090,-2810 1120.68,-2771.36 1104.17,-2749.24 1126,-2705 1147.79,-2660.83 1181.53,-2613.98 1201.23,-2588.12"/>
+<polygon fill="#00ffbf" stroke="#00ffbf" points="1204.01,-2590.25 1207.33,-2580.19 1198.46,-2585.98 1204.01,-2590.25"/>
 </g>
 <!-- proc~export_xc -->
 <g id="call~~graph~~CallGraph_node168" class="node">
 <title>proc~export_xc</title>
-<g id="a_call~~graph~~CallGraph_node168"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_volume%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="836,-3866 686,-3866 686,-3842 836,-3842 836,-3866"/>
-<text text-anchor="middle" x="761" y="-3851.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
+<g id="a_call~~graph~~CallGraph_node168"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_curve%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="831,-6226 691,-6226 691,-6202 831,-6202 831,-6226"/>
+<text text-anchor="middle" x="761" y="-6211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
 <g id="call~~graph~~CallGraph_edge285" class="edge">
 <title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
-<path fill="none" stroke="#00ffc3" d="M836.06,-3846.78C843.23,-3843.46 849.77,-3838.98 855,-3833 914.63,-3764.82 830.96,-3494.82 891,-3427 891.75,-3426.15 892.53,-3425.33 893.33,-3424.54"/>
-<polygon fill="#00ffc3" stroke="#00ffc3" points="895.61,-3427.19 901.14,-3418.15 891.18,-3421.77 895.61,-3427.19"/>
+<path fill="none" stroke="#00ffc3" d="M831.15,-6207.77C840.04,-6204.43 848.34,-6199.68 855,-6193 907.06,-6140.76 847.85,-6090.82 891,-6031 904.79,-6011.88 926.86,-5997.83 946.62,-5988.25"/>
+<polygon fill="#00ffc3" stroke="#00ffc3" points="948.17,-5991.39 955.79,-5984.04 945.24,-5985.03 948.17,-5991.39"/>
 </g>
 <!-- proc~export_xc~2 -->
 <g id="call~~graph~~CallGraph_node169" class="node">
 <title>proc~export_xc~2</title>
-<g id="a_call~~graph~~CallGraph_node169"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_surface%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="836,-2550 686,-2550 686,-2526 836,-2526 836,-2550"/>
-<text text-anchor="middle" x="761" y="-2535.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
+<g id="a_call~~graph~~CallGraph_node169"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_volume%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="836,-4256 686,-4256 686,-4232 836,-4232 836,-4256"/>
+<text text-anchor="middle" x="761" y="-4241.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
 <g id="call~~graph~~CallGraph_edge286" class="edge">
 <title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
-<path fill="none" stroke="#00ffc8" d="M836.08,-2547.9C842.89,-2550.77 849.35,-2554.41 855,-2559 884.94,-2583.34 861.5,-2613.12 891,-2638 895.31,-2641.63 900.07,-2644.77 905.11,-2647.47"/>
-<polygon fill="#00ffc8" stroke="#00ffc8" points="903.9,-2650.76 914.43,-2651.87 906.89,-2644.44 903.9,-2650.76"/>
+<path fill="none" stroke="#00ffc8" d="M836.18,-4233.57C854.62,-4230.97 874.64,-4228.16 893.95,-4225.44"/>
+<polygon fill="#00ffc8" stroke="#00ffc8" points="894.55,-4228.89 903.97,-4224.03 893.58,-4221.96 894.55,-4228.89"/>
 </g>
 <!-- proc~export_xc~3 -->
 <g id="call~~graph~~CallGraph_node170" class="node">
 <title>proc~export_xc~3</title>
-<g id="a_call~~graph~~CallGraph_node170"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_curve%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="831,-768 691,-768 691,-744 831,-744 831,-768"/>
-<text text-anchor="middle" x="761" y="-753.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xc</text>
+<g id="a_call~~graph~~CallGraph_node170"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_surface%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="836,-3112 686,-3112 686,-3088 836,-3088 836,-3112"/>
+<text text-anchor="middle" x="761" y="-3097.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
 <g id="call~~graph~~CallGraph_edge287" class="edge">
 <title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
-<path fill="none" stroke="#00ffcc" d="M831.23,-761.53C840.22,-764.95 848.53,-769.91 855,-777 938.07,-868.07 807.39,-961.43 891,-1052 891.9,-1052.98 892.83,-1053.91 893.8,-1054.81"/>
-<polygon fill="#00ffcc" stroke="#00ffcc" points="891.7,-1057.61 901.74,-1060.98 895.99,-1052.08 891.7,-1057.61"/>
+<path fill="none" stroke="#00ffcc" d="M836,-3107.89C843.09,-3111.11 849.63,-3115.37 855,-3121 917.99,-3186.94 839.23,-3247.93 891,-3323 904.29,-3342.27 926.1,-3356.27 945.83,-3365.79"/>
+<polygon fill="#00ffcc" stroke="#00ffcc" points="944.46,-3369.01 955.01,-3369.97 947.36,-3362.64 944.46,-3369.01"/>
 </g>
 <!-- proc~export_xg -->
 <g id="call~~graph~~CallGraph_node171" class="node">
 <title>proc~export_xg</title>
-<g id="a_call~~graph~~CallGraph_node171"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_volume%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="836.5,-3824 685.5,-3824 685.5,-3800 836.5,-3800 836.5,-3824"/>
-<text text-anchor="middle" x="761" y="-3809.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
+<g id="a_call~~graph~~CallGraph_node171"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_curve%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="831.5,-6184 690.5,-6184 690.5,-6160 831.5,-6160 831.5,-6184"/>
+<text text-anchor="middle" x="761" y="-6169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
 <g id="call~~graph~~CallGraph_edge288" class="edge">
 <title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
-<path fill="none" stroke="#00ffd0" d="M779.23,-3799.84C801.04,-3783.38 837.84,-3751.79 855,-3715 917.37,-3581.3 811.4,-3509.22 891,-3385 903.44,-3365.59 924.75,-3351.67 944.38,-3342.25"/>
-<polygon fill="#00ffd0" stroke="#00ffd0" points="945.86,-3345.42 953.53,-3338.1 942.98,-3339.04 945.86,-3345.42"/>
+<path fill="none" stroke="#00ffd0" d="M831.86,-6165.84C840.54,-6162.47 848.59,-6157.7 855,-6151 917.44,-6085.75 828.16,-6015.88 891,-5951 891.92,-5950.05 892.88,-5949.13 893.86,-5948.25"/>
+<polygon fill="#00ffd0" stroke="#00ffd0" points="896.03,-5951 901.94,-5942.21 891.84,-5945.4 896.03,-5951"/>
 </g>
 <!-- proc~export_xg~2 -->
 <g id="call~~graph~~CallGraph_node172" class="node">
 <title>proc~export_xg~2</title>
-<g id="a_call~~graph~~CallGraph_node172"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_surface%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="836.5,-2592 685.5,-2592 685.5,-2568 836.5,-2568 836.5,-2592"/>
-<text text-anchor="middle" x="761" y="-2577.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
+<g id="a_call~~graph~~CallGraph_node172"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_volume%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="836.5,-4130 685.5,-4130 685.5,-4106 836.5,-4106 836.5,-4130"/>
+<text text-anchor="middle" x="761" y="-4115.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
 <g id="call~~graph~~CallGraph_edge289" class="edge">
 <title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
-<path fill="none" stroke="#00ffd4" d="M836.65,-2589.97C843.27,-2592.83 849.53,-2596.45 855,-2601 886.22,-2626.98 859.62,-2659.21 891,-2685 892.57,-2686.29 894.2,-2687.51 895.88,-2688.65"/>
-<polygon fill="#00ffd4" stroke="#00ffd4" points="894.29,-2691.78 904.69,-2693.83 897.84,-2685.74 894.29,-2691.78"/>
+<path fill="none" stroke="#00ffd4" d="M836.81,-4124.58C851.89,-4125.9 868.02,-4127.32 883.93,-4128.72"/>
+<polygon fill="#00ffd4" stroke="#00ffd4" points="884.07,-4132.24 894.34,-4129.63 884.68,-4125.27 884.07,-4132.24"/>
 </g>
 <!-- proc~export_xg~3 -->
 <g id="call~~graph~~CallGraph_node173" class="node">
 <title>proc~export_xg~3</title>
-<g id="a_call~~graph~~CallGraph_node173"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_curve%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="831.5,-726 690.5,-726 690.5,-702 831.5,-702 831.5,-726"/>
-<text text-anchor="middle" x="761" y="-711.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xg</text>
+<g id="a_call~~graph~~CallGraph_node173"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_surface%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="836.5,-3154 685.5,-3154 685.5,-3130 836.5,-3130 836.5,-3154"/>
+<text text-anchor="middle" x="761" y="-3139.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
 <g id="call~~graph~~CallGraph_edge290" class="edge">
 <title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
-<path fill="none" stroke="#00ffd8" d="M831.89,-721.46C840.35,-724.66 848.34,-729.04 855,-735 891.45,-767.61 871.79,-794.02 891,-839 918.3,-902.93 957.78,-975.05 977.43,-1009.91"/>
-<polygon fill="#00ffd8" stroke="#00ffd8" points="974.45,-1011.74 982.42,-1018.71 980.54,-1008.29 974.45,-1011.74"/>
+<path fill="none" stroke="#00ffd8" d="M836.61,-3149.95C843.49,-3153.17 849.82,-3157.42 855,-3163 928.43,-3242.01 817.1,-3324.44 891,-3403 891.91,-3403.97 892.85,-3404.9 893.82,-3405.79"/>
+<polygon fill="#00ffd8" stroke="#00ffd8" points="891.75,-3408.61 901.82,-3411.91 896.01,-3403.05 891.75,-3408.61"/>
 </g>
 <!-- proc~finalize -->
 <g id="call~~graph~~CallGraph_node175" class="node">
 <title>proc~finalize</title>
-<g id="a_call~~graph~~CallGraph_node175"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_volume%finalize">
-<polygon fill="#d9534f" stroke="#d9534f" points="829,-4034 693,-4034 693,-4010 829,-4010 829,-4034"/>
-<text text-anchor="middle" x="761" y="-4019.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%finalize</text>
+<g id="a_call~~graph~~CallGraph_node175"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_curve%finalize">
+<polygon fill="#d9534f" stroke="#d9534f" points="824,-6348 698,-6348 698,-6324 824,-6324 824,-6348"/>
+<text text-anchor="middle" x="761" y="-6333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%finalize</text>
 </a>
 </g>
 </g>
 <!-- proc~finalize~2 -->
 <g id="call~~graph~~CallGraph_node176" class="node">
 <title>proc~finalize~2</title>
-<g id="a_call~~graph~~CallGraph_node176"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_surface%finalize">
-<polygon fill="#d9534f" stroke="#d9534f" points="829,-2302 693,-2302 693,-2278 829,-2278 829,-2302"/>
-<text text-anchor="middle" x="761" y="-2287.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%finalize</text>
+<g id="a_call~~graph~~CallGraph_node176"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_volume%finalize">
+<polygon fill="#d9534f" stroke="#d9534f" points="829,-4336 693,-4336 693,-4312 829,-4312 829,-4336"/>
+<text text-anchor="middle" x="761" y="-4321.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%finalize</text>
 </a>
 </g>
 </g>
 <!-- proc~finalize~3 -->
 <g id="call~~graph~~CallGraph_node177" class="node">
 <title>proc~finalize~3</title>
-<g id="a_call~~graph~~CallGraph_node177"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_curve%finalize">
-<polygon fill="#d9534f" stroke="#d9534f" points="824,-348 698,-348 698,-324 824,-324 824,-348"/>
-<text text-anchor="middle" x="761" y="-333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%finalize</text>
+<g id="a_call~~graph~~CallGraph_node177"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_surface%finalize">
+<polygon fill="#d9534f" stroke="#d9534f" points="829,-2616 693,-2616 693,-2592 829,-2592 829,-2616"/>
+<text text-anchor="middle" x="761" y="-2601.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%finalize</text>
 </a>
 </g>
 </g>
@@ -5859,65 +5859,65 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node178" class="node">
 <title>proc~findspan</title>
 <g id="a_call~~graph~~CallGraph_node178"><a xlink:href="../proc/findspan.html" xlink:title="findspan">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1019.5,-2226 961.5,-2226 961.5,-2202 1019.5,-2202 1019.5,-2226"/>
-<text text-anchor="middle" x="990.5" y="-2211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">findspan</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1019.5,-3520 961.5,-3520 961.5,-3496 1019.5,-3496 1019.5,-3520"/>
+<text text-anchor="middle" x="990.5" y="-3505.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">findspan</text>
 </a>
 </g>
 </g>
 <!-- gauss_legendre -->
 <g id="call~~graph~~CallGraph_node366" class="node">
 <title>gauss_legendre</title>
-<polygon fill="#777777" stroke="#777777" points="1266,-5890 1170,-5890 1170,-5866 1266,-5866 1266,-5890"/>
-<text text-anchor="middle" x="1218" y="-5875.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre</text>
+<polygon fill="#777777" stroke="#777777" points="1266,-5152 1170,-5152 1170,-5128 1266,-5128 1266,-5152"/>
+<text text-anchor="middle" x="1218" y="-5137.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre</text>
 </g>
 <!-- proc~gauss_legendre_1d&#45;&gt;gauss_legendre -->
 <g id="call~~graph~~CallGraph_edge291" class="edge">
 <title>proc~gauss_legendre_1d&#45;&gt;gauss_legendre</title>
-<path fill="none" stroke="#00fff2" d="M1025.75,-5945.85C1065.3,-5931.82 1130.43,-5908.71 1173.52,-5893.42"/>
-<polygon fill="#00fff2" stroke="#00fff2" points="1174.91,-5896.64 1183.17,-5890 1172.57,-5890.05 1174.91,-5896.64"/>
+<path fill="none" stroke="#00fff2" d="M1048.69,-5171.35C1082.63,-5165.03 1125.52,-5157.04 1159.51,-5150.71"/>
+<polygon fill="#00fff2" stroke="#00fff2" points="1160.56,-5154.07 1169.75,-5148.8 1159.28,-5147.19 1160.56,-5154.07"/>
 </g>
 <!-- proc~gauss_legendre_2d&#45;&gt;interface~ndgrid -->
 <g id="call~~graph~~CallGraph_edge293" class="edge">
 <title>proc~gauss_legendre_2d&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#00fff6" d="M1043.06,-5890.05C1058.32,-5894.03 1074.96,-5898.79 1090,-5904 1122.21,-5915.16 1157.73,-5930.84 1182.99,-5942.6"/>
-<polygon fill="#00fff6" stroke="#00fff6" points="1181.6,-5945.82 1192.14,-5946.9 1184.58,-5939.48 1181.6,-5945.82"/>
+<path fill="none" stroke="#00fff6" d="M1048.63,-5139.01C1063.85,-5136.01 1079.08,-5130.09 1090,-5119 1148.15,-5059.92 1074.17,-5000.69 1126,-4936 1139.54,-4919.1 1161.66,-4909.16 1180.7,-4903.42"/>
+<polygon fill="#00fff6" stroke="#00fff6" points="1181.88,-4906.72 1190.6,-4900.71 1180.03,-4899.97 1181.88,-4906.72"/>
 </g>
 <!-- proc~gauss_legendre_2d&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge294" class="edge">
 <title>proc~gauss_legendre_2d&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00fff6" d="M1048.7,-5878.21C1064.3,-5875.31 1079.72,-5869.15 1090,-5857 1148.84,-5787.47 1105.55,-5126.76 1126,-5038 1142.79,-4965.14 1184.07,-4885.92 1204.76,-4849.06"/>
-<polygon fill="#00fff6" stroke="#00fff6" points="1207.88,-4850.65 1209.78,-4840.23 1201.8,-4847.19 1207.88,-4850.65"/>
+<path fill="none" stroke="#00fff6" d="M1048.7,-5140.47C1064.4,-5137.6 1079.87,-5131.38 1090,-5119 1120.32,-5081.93 1120.89,-1718.62 1126,-1671 1143.52,-1507.88 1193.47,-1315.84 1210.9,-1251.92"/>
+<polygon fill="#00fff6" stroke="#00fff6" points="1214.32,-1252.71 1213.59,-1242.14 1207.57,-1250.85 1214.32,-1252.71"/>
 </g>
 <!-- proc~gauss_legendre_2d&#45;&gt;gauss_legendre -->
 <g id="call~~graph~~CallGraph_edge292" class="edge">
 <title>proc~gauss_legendre_2d&#45;&gt;gauss_legendre</title>
-<path fill="none" stroke="#00fff6" d="M1048.69,-5878C1082.63,-5878 1125.52,-5878 1159.51,-5878"/>
-<polygon fill="#00fff6" stroke="#00fff6" points="1159.75,-5881.5 1169.75,-5878 1159.75,-5874.5 1159.75,-5881.5"/>
+<path fill="none" stroke="#00fff6" d="M1048.69,-5140C1082.63,-5140 1125.52,-5140 1159.51,-5140"/>
+<polygon fill="#00fff6" stroke="#00fff6" points="1159.75,-5143.5 1169.75,-5140 1159.75,-5136.5 1159.75,-5143.5"/>
 </g>
 <!-- proc~gauss_legendre_3d&#45;&gt;interface~ndgrid -->
 <g id="call~~graph~~CallGraph_edge296" class="edge">
 <title>proc~gauss_legendre_3d&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#00fffa" d="M1048.56,-5841.65C1062.78,-5844.77 1077.52,-5849.59 1090,-5857 1111.14,-5869.56 1107.56,-5882.74 1126,-5899 1144.58,-5915.38 1167.95,-5930.69 1186.35,-5941.75"/>
-<polygon fill="#00fffa" stroke="#00fffa" points="1184.82,-5944.91 1195.21,-5946.98 1188.37,-5938.88 1184.82,-5944.91"/>
+<path fill="none" stroke="#00fffa" d="M1048.6,-5093.38C1063.74,-5089.59 1078.93,-5083.06 1090,-5072 1134.23,-5027.8 1085.35,-4983.51 1126,-4936 1140.07,-4919.55 1162.21,-4909.62 1181.12,-4903.76"/>
+<polygon fill="#00fffa" stroke="#00fffa" points="1182.27,-4907.08 1190.94,-4900.99 1180.37,-4900.34 1182.27,-4907.08"/>
 </g>
 <!-- proc~gauss_legendre_3d&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge297" class="edge">
 <title>proc~gauss_legendre_3d&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00fffa" d="M1048.68,-5836.2C1064.29,-5833.29 1079.71,-5827.13 1090,-5815 1145.91,-5749.09 1106.5,-5122.2 1126,-5038 1142.87,-4965.16 1184.11,-4885.93 1204.78,-4849.07"/>
-<polygon fill="#00fffa" stroke="#00fffa" points="1207.9,-4850.66 1209.79,-4840.23 1201.81,-4847.2 1207.9,-4850.66"/>
+<path fill="none" stroke="#00fffa" d="M1029.23,-5085.95C1051.13,-5076.8 1076.91,-5061.82 1090,-5039 1136.56,-4957.85 1116,-1764.02 1126,-1671 1143.54,-1507.88 1193.47,-1315.84 1210.91,-1251.92"/>
+<polygon fill="#00fffa" stroke="#00fffa" points="1214.32,-1252.71 1213.59,-1242.14 1207.57,-1250.85 1214.32,-1252.71"/>
 </g>
 <!-- proc~gauss_legendre_3d&#45;&gt;gauss_legendre -->
 <g id="call~~graph~~CallGraph_edge295" class="edge">
 <title>proc~gauss_legendre_3d&#45;&gt;gauss_legendre</title>
-<path fill="none" stroke="#00fffa" d="M1048.69,-5846.65C1082.63,-5852.97 1125.52,-5860.96 1159.51,-5867.29"/>
-<polygon fill="#00fffa" stroke="#00fffa" points="1159.28,-5870.81 1169.75,-5869.2 1160.56,-5863.93 1159.28,-5870.81"/>
+<path fill="none" stroke="#00fffa" d="M1048.69,-5108.65C1082.63,-5114.97 1125.52,-5122.96 1159.51,-5129.29"/>
+<polygon fill="#00fffa" stroke="#00fffa" points="1159.28,-5132.81 1169.75,-5131.2 1160.56,-5125.93 1159.28,-5132.81"/>
 </g>
 <!-- proc~generate_xc -->
 <g id="call~~graph~~CallGraph_node182" class="node">
 <title>proc~generate_xc</title>
 <g id="a_call~~graph~~CallGraph_node182"><a xlink:href="../proc/generate_xc.html" xlink:title="generate_Xc">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="801,-4160 721,-4160 721,-4136 801,-4136 801,-4160"/>
-<text text-anchor="middle" x="761" y="-4145.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">generate_Xc</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="801,-6142 721,-6142 721,-6118 801,-6118 801,-6142"/>
+<text text-anchor="middle" x="761" y="-6127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">generate_Xc</text>
 </a>
 </g>
 </g>
@@ -5925,8 +5925,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node183" class="node">
 <title>proc~generate_xc~2</title>
 <g id="a_call~~graph~~CallGraph_node183"><a xlink:href="../proc/generate_xc~2.html" xlink:title="generate_Xc">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="801,-2092 721,-2092 721,-2068 801,-2068 801,-2092"/>
-<text text-anchor="middle" x="761" y="-2077.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">generate_Xc</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="801,-2906 721,-2906 721,-2882 801,-2882 801,-2906"/>
+<text text-anchor="middle" x="761" y="-2891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">generate_Xc</text>
 </a>
 </g>
 </g>
@@ -5934,8 +5934,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node184" class="node">
 <title>proc~generate_xc~3</title>
 <g id="a_call~~graph~~CallGraph_node184"><a xlink:href="../proc/generate_xc~3.html" xlink:title="generate_Xc">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="801,-226 721,-226 721,-202 801,-202 801,-226"/>
-<text text-anchor="middle" x="761" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">generate_Xc</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="801,-3238 721,-3238 721,-3214 801,-3214 801,-3238"/>
+<text text-anchor="middle" x="761" y="-3223.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">generate_Xc</text>
 </a>
 </g>
 </g>
@@ -5943,8 +5943,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node185" class="node">
 <title>proc~generate_xc~4</title>
 <g id="a_call~~graph~~CallGraph_node185"><a xlink:href="../proc/generate_xc~4.html" xlink:title="generate_Xc">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="801,-2714 721,-2714 721,-2690 801,-2690 801,-2714"/>
-<text text-anchor="middle" x="761" y="-2699.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">generate_Xc</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="801,-3646 721,-3646 721,-3622 801,-3622 801,-3646"/>
+<text text-anchor="middle" x="761" y="-3631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">generate_Xc</text>
 </a>
 </g>
 </g>
@@ -5952,236 +5952,236 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node186" class="node">
 <title>proc~generate_xc~5</title>
 <g id="a_call~~graph~~CallGraph_node186"><a xlink:href="../proc/generate_xc~5.html" xlink:title="generate_Xc">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="801,-3256 721,-3256 721,-3232 801,-3232 801,-3256"/>
-<text text-anchor="middle" x="761" y="-3241.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">generate_Xc</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="801,-4214 721,-4214 721,-4190 801,-4190 801,-4214"/>
+<text text-anchor="middle" x="761" y="-4199.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">generate_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~get_continuity -->
 <g id="call~~graph~~CallGraph_node187" class="node">
 <title>proc~get_continuity</title>
-<g id="a_call~~graph~~CallGraph_node187"><a xlink:href="../proc/get_continuity.html" xlink:title="nurbs_volume%get_continuity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1720,-2718 1548,-2718 1548,-2694 1720,-2694 1720,-2718"/>
-<text text-anchor="middle" x="1634" y="-2703.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_continuity</text>
+<g id="a_call~~graph~~CallGraph_node187"><a xlink:href="../proc/get_continuity.html" xlink:title="nurbs_curve%get_continuity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1715.5,-5778 1552.5,-5778 1552.5,-5754 1715.5,-5754 1715.5,-5778"/>
+<text text-anchor="middle" x="1634" y="-5763.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_continuity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_continuity&#45;&gt;interface~compute_multiplicity -->
 <g id="call~~graph~~CallGraph_edge298" class="edge">
 <title>proc~get_continuity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00e9ff" d="M1701.13,-2693.9C1708.7,-2691.45 1716.15,-2688.51 1723,-2685 1754.74,-2668.72 1784.72,-2639.94 1802.73,-2620.67"/>
-<polygon fill="#00e9ff" stroke="#00e9ff" points="1805.52,-2622.8 1809.68,-2613.06 1800.36,-2618.08 1805.52,-2622.8"/>
+<path fill="none" stroke="#00e9ff" d="M1713.39,-5753.76C1716.95,-5751.28 1720.19,-5748.39 1723,-5745 1790.86,-5663.12 1816.68,-3944.17 1819.7,-3725.76"/>
+<polygon fill="#00e9ff" stroke="#00e9ff" points="1823.2,-3725.54 1819.84,-3715.49 1816.2,-3725.44 1823.2,-3725.54"/>
 </g>
 <!-- proc~get_continuity~2 -->
 <g id="call~~graph~~CallGraph_node188" class="node">
 <title>proc~get_continuity~2</title>
-<g id="a_call~~graph~~CallGraph_node188"><a xlink:href="../proc/get_continuity~2.html" xlink:title="nurbs_surface%get_continuity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1720,-2676 1548,-2676 1548,-2652 1720,-2652 1720,-2676"/>
-<text text-anchor="middle" x="1634" y="-2661.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_continuity</text>
+<g id="a_call~~graph~~CallGraph_node188"><a xlink:href="../proc/get_continuity~2.html" xlink:title="nurbs_volume%get_continuity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1720,-5694 1548,-5694 1548,-5670 1720,-5670 1720,-5694"/>
+<text text-anchor="middle" x="1634" y="-5679.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_continuity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_continuity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="call~~graph~~CallGraph_edge299" class="edge">
 <title>proc~get_continuity~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00e5ff" d="M1691.75,-2652C1702.23,-2649.35 1713.02,-2646.32 1723,-2643 1744.5,-2635.84 1767.82,-2625.82 1786.21,-2617.36"/>
-<polygon fill="#00e5ff" stroke="#00e5ff" points="1787.76,-2620.5 1795.34,-2613.1 1784.8,-2614.15 1787.76,-2620.5"/>
+<path fill="none" stroke="#00e5ff" d="M1706.35,-5669.84C1712.73,-5666.29 1718.47,-5661.76 1723,-5656 1785.83,-5576.13 1815.99,-3936.77 1819.62,-3725.38"/>
+<polygon fill="#00e5ff" stroke="#00e5ff" points="1823.13,-3725.24 1819.8,-3715.18 1816.13,-3725.12 1823.13,-3725.24"/>
 </g>
 <!-- proc~get_continuity~3 -->
 <g id="call~~graph~~CallGraph_node189" class="node">
 <title>proc~get_continuity~3</title>
-<g id="a_call~~graph~~CallGraph_node189"><a xlink:href="../proc/get_continuity~3.html" xlink:title="nurbs_curve%get_continuity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1715.5,-2592 1552.5,-2592 1552.5,-2568 1715.5,-2568 1715.5,-2592"/>
-<text text-anchor="middle" x="1634" y="-2577.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_continuity</text>
+<g id="a_call~~graph~~CallGraph_node189"><a xlink:href="../proc/get_continuity~3.html" xlink:title="nurbs_surface%get_continuity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1720,-5606 1548,-5606 1548,-5582 1720,-5582 1720,-5606"/>
+<text text-anchor="middle" x="1634" y="-5591.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_continuity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_continuity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="call~~graph~~CallGraph_edge300" class="edge">
 <title>proc~get_continuity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00e1ff" d="M1715.61,-2589.15C1726.6,-2590.4 1737.82,-2591.67 1748.64,-2592.9"/>
-<polygon fill="#00e1ff" stroke="#00e1ff" points="1748.53,-2596.41 1758.86,-2594.06 1749.32,-2589.45 1748.53,-2596.41"/>
+<path fill="none" stroke="#00e1ff" d="M1706.34,-5581.83C1712.71,-5578.28 1718.46,-5573.75 1723,-5568 1782.97,-5491.95 1815.51,-3932.61 1819.57,-3725.62"/>
+<polygon fill="#00e1ff" stroke="#00e1ff" points="1823.07,-3725.42 1819.77,-3715.35 1816.07,-3725.28 1823.07,-3725.42"/>
 </g>
 <!-- proc~get_degree -->
 <g id="call~~graph~~CallGraph_node190" class="node">
 <title>proc~get_degree</title>
 <g id="a_call~~graph~~CallGraph_node190"><a xlink:href="../proc/get_degree.html" xlink:title="nurbs_curve%get_degree">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="835,-558 687,-558 687,-534 835,-534 835,-558"/>
-<text text-anchor="middle" x="761" y="-543.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_degree</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="835,-5612 687,-5612 687,-5588 835,-5588 835,-5612"/>
+<text text-anchor="middle" x="761" y="-5597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~get_elem -->
 <g id="call~~graph~~CallGraph_node195" class="node">
 <title>proc~get_elem</title>
-<g id="a_call~~graph~~CallGraph_node195"><a xlink:href="../proc/get_elem.html" xlink:title="nurbs_volume%get_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="182,-6522 35,-6522 35,-6498 182,-6498 182,-6522"/>
-<text text-anchor="middle" x="108.5" y="-6507.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_elem</text>
+<g id="a_call~~graph~~CallGraph_node195"><a xlink:href="../proc/get_elem.html" xlink:title="nurbs_curve%get_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="177,-6892 40,-6892 40,-6868 177,-6868 177,-6892"/>
+<text text-anchor="middle" x="108.5" y="-6877.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~get_elem_xc_vis -->
 <g id="call~~graph~~CallGraph_node196" class="node">
 <title>proc~get_elem_xc_vis</title>
-<g id="a_call~~graph~~CallGraph_node196"><a xlink:href="../proc/get_elem_xc_vis.html" xlink:title="nurbs_volume%get_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="201,-6564 16,-6564 16,-6540 201,-6540 201,-6564"/>
-<text text-anchor="middle" x="108.5" y="-6549.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_elem_Xc_vis</text>
+<g id="a_call~~graph~~CallGraph_node196"><a xlink:href="../proc/get_elem_xc_vis.html" xlink:title="nurbs_curve%get_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="196,-6934 21,-6934 21,-6910 196,-6910 196,-6934"/>
+<text text-anchor="middle" x="108.5" y="-6919.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~get_elem_xc_vis~2 -->
 <g id="call~~graph~~CallGraph_node197" class="node">
 <title>proc~get_elem_xc_vis~2</title>
-<g id="a_call~~graph~~CallGraph_node197"><a xlink:href="../proc/get_elem_xc_vis~2.html" xlink:title="nurbs_surface%get_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="201,-6606 16,-6606 16,-6582 201,-6582 201,-6606"/>
-<text text-anchor="middle" x="108.5" y="-6591.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_elem_Xc_vis</text>
+<g id="a_call~~graph~~CallGraph_node197"><a xlink:href="../proc/get_elem_xc_vis~2.html" xlink:title="nurbs_volume%get_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="201,-6976 16,-6976 16,-6952 201,-6952 201,-6976"/>
+<text text-anchor="middle" x="108.5" y="-6961.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~get_elem_xc_vis~3 -->
 <g id="call~~graph~~CallGraph_node198" class="node">
 <title>proc~get_elem_xc_vis~3</title>
-<g id="a_call~~graph~~CallGraph_node198"><a xlink:href="../proc/get_elem_xc_vis~3.html" xlink:title="nurbs_curve%get_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="196,-6648 21,-6648 21,-6624 196,-6624 196,-6648"/>
-<text text-anchor="middle" x="108.5" y="-6633.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_elem_Xc_vis</text>
+<g id="a_call~~graph~~CallGraph_node198"><a xlink:href="../proc/get_elem_xc_vis~3.html" xlink:title="nurbs_surface%get_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="201,-7018 16,-7018 16,-6994 201,-6994 201,-7018"/>
+<text text-anchor="middle" x="108.5" y="-7003.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~get_elem_xg_vis -->
 <g id="call~~graph~~CallGraph_node199" class="node">
 <title>proc~get_elem_xg_vis</title>
-<g id="a_call~~graph~~CallGraph_node199"><a xlink:href="../proc/get_elem_xg_vis.html" xlink:title="nurbs_volume%get_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="201.5,-6690 15.5,-6690 15.5,-6666 201.5,-6666 201.5,-6690"/>
-<text text-anchor="middle" x="108.5" y="-6675.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_elem_Xg_vis</text>
+<g id="a_call~~graph~~CallGraph_node199"><a xlink:href="../proc/get_elem_xg_vis.html" xlink:title="nurbs_curve%get_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="196.5,-7060 20.5,-7060 20.5,-7036 196.5,-7036 196.5,-7060"/>
+<text text-anchor="middle" x="108.5" y="-7045.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~get_elem_xg_vis~2 -->
 <g id="call~~graph~~CallGraph_node200" class="node">
 <title>proc~get_elem_xg_vis~2</title>
-<g id="a_call~~graph~~CallGraph_node200"><a xlink:href="../proc/get_elem_xg_vis~2.html" xlink:title="nurbs_surface%get_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="201.5,-6732 15.5,-6732 15.5,-6708 201.5,-6708 201.5,-6732"/>
-<text text-anchor="middle" x="108.5" y="-6717.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_elem_Xg_vis</text>
+<g id="a_call~~graph~~CallGraph_node200"><a xlink:href="../proc/get_elem_xg_vis~2.html" xlink:title="nurbs_volume%get_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="201.5,-7102 15.5,-7102 15.5,-7078 201.5,-7078 201.5,-7102"/>
+<text text-anchor="middle" x="108.5" y="-7087.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~get_elem_xg_vis~3 -->
 <g id="call~~graph~~CallGraph_node201" class="node">
 <title>proc~get_elem_xg_vis~3</title>
-<g id="a_call~~graph~~CallGraph_node201"><a xlink:href="../proc/get_elem_xg_vis~3.html" xlink:title="nurbs_curve%get_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="196.5,-6774 20.5,-6774 20.5,-6750 196.5,-6750 196.5,-6774"/>
-<text text-anchor="middle" x="108.5" y="-6759.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_elem_Xg_vis</text>
+<g id="a_call~~graph~~CallGraph_node201"><a xlink:href="../proc/get_elem_xg_vis~3.html" xlink:title="nurbs_surface%get_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="201.5,-7144 15.5,-7144 15.5,-7120 201.5,-7120 201.5,-7144"/>
+<text text-anchor="middle" x="108.5" y="-7129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~get_elem~2 -->
 <g id="call~~graph~~CallGraph_node202" class="node">
 <title>proc~get_elem~2</title>
-<g id="a_call~~graph~~CallGraph_node202"><a xlink:href="../proc/get_elem~2.html" xlink:title="nurbs_surface%get_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="182,-6816 35,-6816 35,-6792 182,-6792 182,-6816"/>
-<text text-anchor="middle" x="108.5" y="-6801.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_elem</text>
+<g id="a_call~~graph~~CallGraph_node202"><a xlink:href="../proc/get_elem~2.html" xlink:title="nurbs_volume%get_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="182,-7186 35,-7186 35,-7162 182,-7162 182,-7186"/>
+<text text-anchor="middle" x="108.5" y="-7171.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~get_elem~3 -->
 <g id="call~~graph~~CallGraph_node203" class="node">
 <title>proc~get_elem~3</title>
-<g id="a_call~~graph~~CallGraph_node203"><a xlink:href="../proc/get_elem~3.html" xlink:title="nurbs_curve%get_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="177,-6858 40,-6858 40,-6834 177,-6834 177,-6858"/>
-<text text-anchor="middle" x="108.5" y="-6843.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_elem</text>
+<g id="a_call~~graph~~CallGraph_node203"><a xlink:href="../proc/get_elem~3.html" xlink:title="nurbs_surface%get_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="182,-7228 35,-7228 35,-7204 182,-7204 182,-7228"/>
+<text text-anchor="middle" x="108.5" y="-7213.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="call~~graph~~CallGraph_edge301" class="edge">
 <title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#0088ff" d="M1641.28,-3500.72C1657.56,-3468.33 1701.34,-3377.55 1723,-3297 1792.65,-3037.97 1814.21,-2710.5 1818.91,-2623.21"/>
-<polygon fill="#0088ff" stroke="#0088ff" points="1822.41,-2623.31 1819.43,-2613.14 1815.42,-2622.94 1822.41,-2623.31"/>
+<path fill="none" stroke="#0088ff" d="M1713.39,-5711.75C1716.95,-5709.28 1720.19,-5706.38 1723,-5703 1789.5,-5622.83 1816.51,-3939.22 1819.68,-3725.29"/>
+<polygon fill="#0088ff" stroke="#0088ff" points="1823.18,-3725.28 1819.83,-3715.23 1816.18,-3725.18 1823.18,-3725.28"/>
 </g>
 <!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="call~~graph~~CallGraph_edge302" class="edge">
 <title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#0084ff" d="M1701.03,-2857.81C1709.05,-2854.3 1716.64,-2849.8 1723,-2844 1789.51,-2783.38 1811.17,-2671.05 1817.57,-2623.35"/>
-<polygon fill="#0084ff" stroke="#0084ff" points="1821.07,-2623.54 1818.83,-2613.19 1814.12,-2622.68 1821.07,-2623.54"/>
+<path fill="none" stroke="#0084ff" d="M1639.12,-4239.76C1662.82,-4169.45 1781.65,-3816.81 1812.61,-3724.92"/>
+<polygon fill="#0084ff" stroke="#0084ff" points="1815.99,-3725.86 1815.87,-3715.27 1809.36,-3723.62 1815.99,-3725.86"/>
 </g>
 <!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="call~~graph~~CallGraph_edge303" class="edge">
 <title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#0080ff" d="M1708.98,-2386.18C1713.99,-2388.62 1718.73,-2391.53 1723,-2395 1782.4,-2443.28 1807.44,-2536.39 1816.11,-2578.88"/>
-<polygon fill="#0080ff" stroke="#0080ff" points="1812.69,-2579.61 1818.02,-2588.76 1819.56,-2578.28 1812.69,-2579.61"/>
+<path fill="none" stroke="#0080ff" d="M1703.61,-3276.17C1710.84,-3279.69 1717.53,-3284.21 1723,-3290 1777.72,-3347.91 1809.23,-3602.93 1817.68,-3680.52"/>
+<polygon fill="#0080ff" stroke="#0080ff" points="1814.22,-3681.07 1818.76,-3690.64 1821.18,-3680.33 1814.22,-3681.07"/>
 </g>
 <!-- proc~get_nc -->
 <g id="call~~graph~~CallGraph_node213" class="node">
 <title>proc~get_nc</title>
 <g id="a_call~~graph~~CallGraph_node213"><a xlink:href="../proc/get_nc.html" xlink:title="nurbs_curve%get_nc">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="170,-6900 47,-6900 47,-6876 170,-6876 170,-6900"/>
-<text text-anchor="middle" x="108.5" y="-6885.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_nc</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="170,-7270 47,-7270 47,-7246 170,-7246 170,-7270"/>
+<text text-anchor="middle" x="108.5" y="-7255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_nc</text>
 </a>
 </g>
 </g>
 <!-- proc~get_nc_dir&#45;&gt;interface~compute_multiplicity -->
 <g id="call~~graph~~CallGraph_edge304" class="edge">
 <title>proc~get_nc_dir&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#006fff" d="M1710.25,-2613.46C1723.03,-2612.01 1736.28,-2610.5 1748.95,-2609.06"/>
-<polygon fill="#006fff" stroke="#006fff" points="1749.43,-2612.53 1758.98,-2607.93 1748.64,-2605.58 1749.43,-2612.53"/>
+<path fill="none" stroke="#006fff" d="M1710.08,-3144.99C1714.84,-3147.7 1719.23,-3151 1723,-3155 1796.55,-3233.03 1815.48,-3587.76 1819.21,-3680.67"/>
+<polygon fill="#006fff" stroke="#006fff" points="1815.72,-3680.81 1819.6,-3690.67 1822.71,-3680.54 1815.72,-3680.81"/>
 </g>
 <!-- proc~get_nc_dir~2&#45;&gt;interface~compute_multiplicity -->
 <g id="call~~graph~~CallGraph_edge305" class="edge">
 <title>proc~get_nc_dir~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#006bff" d="M1707.31,-2428.04C1712.88,-2430.5 1718.2,-2433.46 1723,-2437 1772.46,-2473.48 1801.22,-2543.38 1813.27,-2578.99"/>
-<polygon fill="#006bff" stroke="#006bff" points="1810.06,-2580.43 1816.48,-2588.86 1816.72,-2578.27 1810.06,-2580.43"/>
+<path fill="none" stroke="#006bff" d="M1710.35,-2858.74C1715.05,-2861.51 1719.35,-2864.89 1723,-2869 1778.67,-2931.69 1812.62,-3555.23 1818.93,-3680.97"/>
+<polygon fill="#006bff" stroke="#006bff" points="1815.43,-3681.15 1819.42,-3690.97 1822.42,-3680.81 1815.43,-3681.15"/>
 </g>
 <!-- proc~get_ng -->
 <g id="call~~graph~~CallGraph_node218" class="node">
 <title>proc~get_ng</title>
-<g id="a_call~~graph~~CallGraph_node218"><a xlink:href="../proc/get_ng.html" xlink:title="nurbs_volume%get_ng">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="175,-6942 42,-6942 42,-6918 175,-6918 175,-6942"/>
-<text text-anchor="middle" x="108.5" y="-6927.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_ng</text>
+<g id="a_call~~graph~~CallGraph_node218"><a xlink:href="../proc/get_ng.html" xlink:title="nurbs_curve%get_ng">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="170.5,-7312 46.5,-7312 46.5,-7288 170.5,-7288 170.5,-7312"/>
+<text text-anchor="middle" x="108.5" y="-7297.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_ng</text>
 </a>
 </g>
 </g>
 <!-- proc~get_ng~2 -->
 <g id="call~~graph~~CallGraph_node219" class="node">
 <title>proc~get_ng~2</title>
-<g id="a_call~~graph~~CallGraph_node219"><a xlink:href="../proc/get_ng~2.html" xlink:title="nurbs_surface%get_ng">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="827.5,-1432 694.5,-1432 694.5,-1408 827.5,-1408 827.5,-1432"/>
-<text text-anchor="middle" x="761" y="-1417.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_ng</text>
+<g id="a_call~~graph~~CallGraph_node219"><a xlink:href="../proc/get_ng~2.html" xlink:title="nurbs_volume%get_ng">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="175,-7354 42,-7354 42,-7330 175,-7330 175,-7354"/>
+<text text-anchor="middle" x="108.5" y="-7339.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_ng</text>
 </a>
 </g>
 </g>
 <!-- proc~get_ng~3 -->
 <g id="call~~graph~~CallGraph_node220" class="node">
 <title>proc~get_ng~3</title>
-<g id="a_call~~graph~~CallGraph_node220"><a xlink:href="../proc/get_ng~3.html" xlink:title="nurbs_curve%get_ng">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="170.5,-6984 46.5,-6984 46.5,-6960 170.5,-6960 170.5,-6984"/>
-<text text-anchor="middle" x="108.5" y="-6969.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_ng</text>
+<g id="a_call~~graph~~CallGraph_node220"><a xlink:href="../proc/get_ng~3.html" xlink:title="nurbs_surface%get_ng">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="827.5,-1944 694.5,-1944 694.5,-1920 827.5,-1920 827.5,-1944"/>
+<text text-anchor="middle" x="761" y="-1929.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_ng</text>
 </a>
 </g>
 </g>
 <!-- proc~get_xt -->
 <g id="call~~graph~~CallGraph_node245" class="node">
 <title>proc~get_xt</title>
-<g id="a_call~~graph~~CallGraph_node245"><a xlink:href="../proc/get_xt.html" xlink:title="nurbs_volume%get_Xt">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="174,-7026 43,-7026 43,-7002 174,-7002 174,-7026"/>
-<text text-anchor="middle" x="108.5" y="-7011.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xt</text>
+<g id="a_call~~graph~~CallGraph_node245"><a xlink:href="../proc/get_xt.html" xlink:title="nurbs_curve%get_Xt">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="169,-7396 48,-7396 48,-7372 169,-7372 169,-7396"/>
+<text text-anchor="middle" x="108.5" y="-7381.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xt</text>
 </a>
 </g>
 </g>
 <!-- proc~get_xt~2 -->
 <g id="call~~graph~~CallGraph_node246" class="node">
 <title>proc~get_xt~2</title>
-<g id="a_call~~graph~~CallGraph_node246"><a xlink:href="../proc/get_xt~2.html" xlink:title="nurbs_surface%get_Xt">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="174,-7068 43,-7068 43,-7044 174,-7044 174,-7068"/>
-<text text-anchor="middle" x="108.5" y="-7053.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xt</text>
+<g id="a_call~~graph~~CallGraph_node246"><a xlink:href="../proc/get_xt~2.html" xlink:title="nurbs_volume%get_Xt">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="174,-7438 43,-7438 43,-7414 174,-7414 174,-7438"/>
+<text text-anchor="middle" x="108.5" y="-7423.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xt</text>
 </a>
 </g>
 </g>
 <!-- proc~get_xt~3 -->
 <g id="call~~graph~~CallGraph_node247" class="node">
 <title>proc~get_xt~3</title>
-<g id="a_call~~graph~~CallGraph_node247"><a xlink:href="../proc/get_xt~3.html" xlink:title="nurbs_curve%get_Xt">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="169,-7110 48,-7110 48,-7086 169,-7086 169,-7110"/>
-<text text-anchor="middle" x="108.5" y="-7095.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xt</text>
+<g id="a_call~~graph~~CallGraph_node247"><a xlink:href="../proc/get_xt~3.html" xlink:title="nurbs_surface%get_Xt">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="174,-7480 43,-7480 43,-7456 174,-7456 174,-7480"/>
+<text text-anchor="middle" x="108.5" y="-7465.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xt</text>
 </a>
 </g>
 </g>
@@ -6189,8 +6189,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node248" class="node">
 <title>proc~hexahedron_xc</title>
 <g id="a_call~~graph~~CallGraph_node248"><a xlink:href="../proc/hexahedron_xc.html" xlink:title="hexahedron_Xc">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1037.5,-3254 943.5,-3254 943.5,-3230 1037.5,-3230 1037.5,-3254"/>
-<text text-anchor="middle" x="990.5" y="-3239.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">hexahedron_Xc</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1037.5,-4068 943.5,-4068 943.5,-4044 1037.5,-4044 1037.5,-4068"/>
+<text text-anchor="middle" x="990.5" y="-4053.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">hexahedron_Xc</text>
 </a>
 </g>
 </g>
@@ -6198,152 +6198,152 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node249" class="node">
 <title>proc~insert_knot_a_5_1</title>
 <g id="a_call~~graph~~CallGraph_node249"><a xlink:href="../proc/insert_knot_a_5_1.html" xlink:title="insert_knot_A_5_1">
-<polygon fill="#d9534f" stroke="#d9534f" points="1044.5,-2268 936.5,-2268 936.5,-2244 1044.5,-2244 1044.5,-2268"/>
-<text text-anchor="middle" x="990.5" y="-2253.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">insert_knot_A_5_1</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1044.5,-3478 936.5,-3478 936.5,-3454 1044.5,-3454 1044.5,-3478"/>
+<text text-anchor="middle" x="990.5" y="-3463.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">insert_knot_A_5_1</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots -->
 <g id="call~~graph~~CallGraph_node250" class="node">
 <title>proc~insert_knots</title>
-<g id="a_call~~graph~~CallGraph_node250"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="841.5,-3382 680.5,-3382 680.5,-3358 841.5,-3358 841.5,-3382"/>
-<text text-anchor="middle" x="761" y="-3367.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
+<g id="a_call~~graph~~CallGraph_node250"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_curve%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="836.5,-5570 685.5,-5570 685.5,-5546 836.5,-5546 836.5,-5570"/>
+<text text-anchor="middle" x="761" y="-5555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;interface~compute_multiplicity -->
 <g id="call~~graph~~CallGraph_edge306" class="edge">
 <title>proc~insert_knots&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#2000ff" d="M841.6,-3359.05C846.5,-3356.32 851.05,-3353.01 855,-3349 909.24,-3294.02 839.97,-3236.97 891,-3179 991.23,-3065.15 1065.32,-3078 1217,-3078 1217,-3078 1217,-3078 1428.5,-3078 1583.55,-3078 1627.46,-3013.11 1723,-2891 1788.98,-2806.67 1811.21,-2675.2 1817.67,-2623.22"/>
-<polygon fill="#2000ff" stroke="#2000ff" points="1821.16,-2623.45 1818.84,-2613.12 1814.21,-2622.64 1821.16,-2623.45"/>
-</g>
-<!-- proc~insert_knots&#45;&gt;none~get_knot -->
-<g id="call~~graph~~CallGraph_edge307" class="edge">
-<title>proc~insert_knots&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#2000ff" d="M841.74,-3358.52C846.55,-3355.9 851.04,-3352.76 855,-3349 897.86,-3308.32 847.89,-3261.43 891,-3221 896.39,-3215.94 902.69,-3211.98 909.45,-3208.9"/>
-<polygon fill="#2000ff" stroke="#2000ff" points="910.86,-3212.1 918.91,-3205.21 908.32,-3205.58 910.86,-3212.1"/>
+<path fill="none" stroke="#2000ff" d="M836.88,-5556.94C927.05,-5555.75 1083.1,-5554 1217,-5554 1217,-5554 1217,-5554 1428.5,-5554 1821.58,-5554 1821.86,-3935.99 1820.24,-3725.48"/>
+<polygon fill="#2000ff" stroke="#2000ff" points="1823.73,-3725.28 1820.15,-3715.31 1816.73,-3725.34 1823.73,-3725.28"/>
 </g>
 <!-- proc~insert_knots&#45;&gt;none~set -->
-<g id="call~~graph~~CallGraph_edge308" class="edge">
+<g id="call~~graph~~CallGraph_edge307" class="edge">
 <title>proc~insert_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#2000ff" d="M840.64,-3382C845.77,-3384.49 850.62,-3387.46 855,-3391 884.68,-3415.01 865.7,-3440.41 891,-3469 907.68,-3487.86 931.6,-3502.86 951.69,-3513.26"/>
-<polygon fill="#2000ff" stroke="#2000ff" points="950.39,-3516.53 960.9,-3517.86 953.52,-3510.26 950.39,-3516.53"/>
+<path fill="none" stroke="#2000ff" d="M836.52,-5565.42C843.51,-5568.72 849.88,-5573.14 855,-5579 915.73,-5648.57 842.03,-5914.71 891,-5993 903.14,-6012.4 924.2,-6026.27 943.74,-6035.66"/>
+<polygon fill="#2000ff" stroke="#2000ff" points="942.32,-6038.86 952.87,-6039.79 945.2,-6032.48 942.32,-6038.86"/>
 </g>
 <!-- proc~insert_knots&#45;&gt;proc~findspan -->
-<g id="call~~graph~~CallGraph_edge309" class="edge">
+<g id="call~~graph~~CallGraph_edge308" class="edge">
 <title>proc~insert_knots&#45;&gt;proc~findspan</title>
-<path fill="none" stroke="#2000ff" d="M841.59,-3360.31C846.64,-3357.31 851.2,-3353.59 855,-3349 933.88,-3253.53 811.55,-2330 891,-2235 905.46,-2217.71 930.33,-2212.51 951.47,-2211.6"/>
-<polygon fill="#2000ff" stroke="#2000ff" points="951.52,-2215.1 961.48,-2211.47 951.43,-2208.1 951.52,-2215.1"/>
+<path fill="none" stroke="#2000ff" d="M796.21,-5546C817.18,-5536.68 842.35,-5521.5 855,-5499 907.6,-5405.42 837.21,-3659.9 891,-3567 904.23,-3544.16 930.12,-3529.16 952.04,-3520.01"/>
+<polygon fill="#2000ff" stroke="#2000ff" points="953.42,-3523.22 961.46,-3516.32 950.87,-3516.71 953.42,-3523.22"/>
 </g>
 <!-- proc~insert_knots&#45;&gt;proc~insert_knot_a_5_1 -->
-<g id="call~~graph~~CallGraph_edge310" class="edge">
+<g id="call~~graph~~CallGraph_edge309" class="edge">
 <title>proc~insert_knots&#45;&gt;proc~insert_knot_a_5_1</title>
-<path fill="none" stroke="#2000ff" d="M841.57,-3360.29C846.62,-3357.3 851.2,-3353.59 855,-3349 925.7,-3263.76 846.39,-2454.36 891,-2353 905.81,-2319.35 938.17,-2291.24 961.77,-2274.09"/>
-<polygon fill="#2000ff" stroke="#2000ff" points="963.86,-2276.89 970.02,-2268.27 959.82,-2271.17 963.86,-2276.89"/>
+<path fill="none" stroke="#2000ff" d="M796.69,-5545.79C817.56,-5536.46 842.45,-5521.34 855,-5499 909.74,-5401.52 819.9,-3573.27 891,-3487 899.9,-3476.2 912.87,-3470.1 926.49,-3466.82"/>
+<polygon fill="#2000ff" stroke="#2000ff" points="927.32,-3470.22 936.48,-3464.9 926,-3463.35 927.32,-3470.22"/>
+</g>
+<!-- proc~insert_knots&#45;&gt;proc~is_rational -->
+<g id="call~~graph~~CallGraph_edge310" class="edge">
+<title>proc~insert_knots&#45;&gt;proc~is_rational</title>
+<path fill="none" stroke="#2000ff" d="M830.66,-5570.02C839.04,-5572.5 847.34,-5575.46 855,-5579 873.16,-5587.39 874.8,-5594.27 891,-5606 978.39,-5669.26 1035.55,-5651.86 1090,-5745 1131.69,-5816.32 1108.47,-6034.27 1126,-6115 1146.26,-6208.27 1188.92,-6314.24 1207.74,-6358.65"/>
+<polygon fill="#2000ff" stroke="#2000ff" points="1204.54,-6360.06 1211.69,-6367.88 1210.97,-6357.3 1204.54,-6360.06"/>
 </g>
 <!-- proc~insert_knots~2 -->
 <g id="call~~graph~~CallGraph_node251" class="node">
 <title>proc~insert_knots~2</title>
-<g id="a_call~~graph~~CallGraph_node251"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="841.5,-2134 680.5,-2134 680.5,-2110 841.5,-2110 841.5,-2134"/>
-<text text-anchor="middle" x="761" y="-2119.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+<g id="a_call~~graph~~CallGraph_node251"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="841.5,-3478 680.5,-3478 680.5,-3454 841.5,-3454 841.5,-3478"/>
+<text text-anchor="middle" x="761" y="-3463.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;interface~compute_multiplicity -->
 <g id="call~~graph~~CallGraph_edge311" class="edge">
 <title>proc~insert_knots~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#2400ff" d="M841.92,-2110.7C846.69,-2108.04 851.12,-2104.84 855,-2101 904.35,-2052.17 837.82,-1993.63 891,-1949 946.59,-1902.35 1144.43,-1930 1217,-1930 1217,-1930 1217,-1930 1428.5,-1930 1735.89,-1930 1806.25,-2461.83 1818,-2578.54"/>
-<polygon fill="#2400ff" stroke="#2400ff" points="1814.54,-2579.16 1818.98,-2588.78 1821.51,-2578.49 1814.54,-2579.16"/>
+<path fill="none" stroke="#2400ff" d="M841.2,-3453.91C846.14,-3451.44 850.8,-3448.49 855,-3445 886.22,-3419.02 857.76,-3384.34 891,-3361 950.39,-3319.31 1144.43,-3342 1217,-3342 1217,-3342 1217,-3342 1428.5,-3342 1630.24,-3342 1772.5,-3604.27 1810.11,-3681.72"/>
+<polygon fill="#2400ff" stroke="#2400ff" points="1807.07,-3683.47 1814.54,-3690.99 1813.39,-3680.46 1807.07,-3683.47"/>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;none~get_knot~2 -->
 <g id="call~~graph~~CallGraph_edge312" class="edge">
 <title>proc~insert_knots~2&#45;&gt;none~get_knot~2</title>
-<path fill="none" stroke="#2400ff" d="M841.67,-2111.12C846.56,-2108.37 851.08,-2105.04 855,-2101 913.34,-2040.89 833.75,-1977.15 891,-1916 896.24,-1910.41 902.52,-1905.96 909.35,-1902.44"/>
-<polygon fill="#2400ff" stroke="#2400ff" points="911.22,-1905.44 918.94,-1898.18 908.38,-1899.04 911.22,-1905.44"/>
+<path fill="none" stroke="#2400ff" d="M841.89,-3476.67C846.73,-3479.46 851.18,-3482.87 855,-3487 930.63,-3568.76 825.31,-3645.05 891,-3735 901.55,-3749.45 917.64,-3759.76 933.78,-3767.02"/>
+<polygon fill="#2400ff" stroke="#2400ff" points="932.67,-3770.35 943.25,-3770.95 935.35,-3763.88 932.67,-3770.35"/>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;none~set~2 -->
 <g id="call~~graph~~CallGraph_edge313" class="edge">
 <title>proc~insert_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#2400ff" d="M841.57,-2132.32C846.55,-2135.19 851.11,-2138.7 855,-2143 943.31,-2240.63 819.24,-2326.63 891,-2437 903.57,-2456.33 924.89,-2470.24 944.49,-2479.68"/>
-<polygon fill="#2400ff" stroke="#2400ff" points="943.08,-2482.88 953.63,-2483.83 945.97,-2476.51 943.08,-2482.88"/>
+<path fill="none" stroke="#2400ff" d="M841.51,-3475.76C846.57,-3478.74 851.17,-3482.44 855,-3487 908.36,-3550.55 858.25,-4156.75 891,-4233 906.3,-4268.64 939.8,-4299.25 963.47,-4317.63"/>
+<polygon fill="#2400ff" stroke="#2400ff" points="961.6,-4320.6 971.69,-4323.83 965.81,-4315.02 961.6,-4320.6"/>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;proc~findspan -->
 <g id="call~~graph~~CallGraph_edge314" class="edge">
 <title>proc~insert_knots~2&#45;&gt;proc~findspan</title>
-<path fill="none" stroke="#2400ff" d="M837.58,-2134.01C843.71,-2136.47 849.62,-2139.44 855,-2143 877.84,-2158.11 868.07,-2178.03 891,-2193 908.75,-2204.59 931.77,-2209.91 951.1,-2212.3"/>
-<polygon fill="#2400ff" stroke="#2400ff" points="950.8,-2215.79 961.11,-2213.33 951.51,-2208.83 950.8,-2215.79"/>
+<path fill="none" stroke="#2400ff" d="M827.19,-3478.04C867.41,-3485.46 917.6,-3494.73 951.44,-3500.97"/>
+<polygon fill="#2400ff" stroke="#2400ff" points="950.91,-3504.44 961.38,-3502.81 952.18,-3497.55 950.91,-3504.44"/>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;proc~insert_knot_a_5_1 -->
 <g id="call~~graph~~CallGraph_edge315" class="edge">
 <title>proc~insert_knots~2&#45;&gt;proc~insert_knot_a_5_1</title>
-<path fill="none" stroke="#2400ff" d="M841.78,-2134.17C846.52,-2136.63 850.98,-2139.55 855,-2143 888.3,-2171.62 857.53,-2206.58 891,-2235 901.04,-2243.52 913.69,-2248.85 926.56,-2252.12"/>
-<polygon fill="#2400ff" stroke="#2400ff" points="925.88,-2255.55 936.4,-2254.24 927.36,-2248.71 925.88,-2255.55"/>
-</g>
-<!-- proc~insert_knots~2&#45;&gt;proc~is_rational~2 -->
-<g id="call~~graph~~CallGraph_edge316" class="edge">
-<title>proc~insert_knots~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#2400ff" d="M840.72,-2109.99C923.79,-2098.86 1048.33,-2087.06 1090,-2109 1094.36,-2111.3 1171.25,-2225.66 1203.23,-2273.4"/>
-<polygon fill="#2400ff" stroke="#2400ff" points="1200.35,-2275.39 1208.82,-2281.76 1206.16,-2271.5 1200.35,-2275.39"/>
+<path fill="none" stroke="#2400ff" d="M841.57,-3466C869.28,-3466 899.98,-3466 926.2,-3466"/>
+<polygon fill="#2400ff" stroke="#2400ff" points="926.38,-3469.5 936.38,-3466 926.38,-3462.5 926.38,-3469.5"/>
 </g>
 <!-- proc~insert_knots~3 -->
 <g id="call~~graph~~CallGraph_node252" class="node">
 <title>proc~insert_knots~3</title>
-<g id="a_call~~graph~~CallGraph_node252"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_curve%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="836.5,-932 685.5,-932 685.5,-908 836.5,-908 836.5,-932"/>
-<text text-anchor="middle" x="761" y="-917.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
+<g id="a_call~~graph~~CallGraph_node252"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="841.5,-2738 680.5,-2738 680.5,-2714 841.5,-2714 841.5,-2738"/>
+<text text-anchor="middle" x="761" y="-2723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;interface~compute_multiplicity -->
-<g id="call~~graph~~CallGraph_edge317" class="edge">
+<g id="call~~graph~~CallGraph_edge316" class="edge">
 <title>proc~insert_knots~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#2800ff" d="M823.66,-932.04C929.45,-952.3 1141.45,-991 1217,-991 1217,-991 1217,-991 1428.5,-991 1771.18,-991 1815.11,-2385.52 1819.56,-2578.86"/>
-<polygon fill="#2800ff" stroke="#2800ff" points="1816.06,-2579.05 1819.78,-2588.97 1823.06,-2578.89 1816.06,-2579.05"/>
+<path fill="none" stroke="#2800ff" d="M836.31,-2738.15C842.85,-2740.58 849.19,-2743.5 855,-2747 876.06,-2759.69 868.97,-2778.08 891,-2789 956.02,-2821.23 1144.43,-2808 1217,-2808 1217,-2808 1217,-2808 1428.5,-2808 1559.66,-2808 1628.15,-2736.41 1723,-2827 1786.77,-2887.91 1814.35,-3549.55 1819.21,-3680.54"/>
+<polygon fill="#2800ff" stroke="#2800ff" points="1815.72,-3681.05 1819.58,-3690.92 1822.72,-3680.8 1815.72,-3681.05"/>
+</g>
+<!-- proc~insert_knots~3&#45;&gt;none~get_knot~3 -->
+<g id="call~~graph~~CallGraph_edge317" class="edge">
+<title>proc~insert_knots~3&#45;&gt;none~get_knot~3</title>
+<path fill="none" stroke="#2800ff" d="M827.19,-2738.04C854.32,-2743.04 885.99,-2748.89 914.11,-2754.08"/>
+<polygon fill="#2800ff" stroke="#2800ff" points="913.83,-2757.59 924.3,-2755.96 915.1,-2750.71 913.83,-2757.59"/>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;none~set~3 -->
 <g id="call~~graph~~CallGraph_edge318" class="edge">
 <title>proc~insert_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#2800ff" d="M836.51,-908.19C843.02,-905.69 849.29,-902.66 855,-899 877.16,-884.81 869.66,-867.39 891,-852 902.39,-843.78 915.94,-837.42 929.28,-832.55"/>
-<polygon fill="#2800ff" stroke="#2800ff" points="930.59,-835.8 938.93,-829.26 928.33,-829.17 930.59,-835.8"/>
+<path fill="none" stroke="#2800ff" d="M840.58,-2738.08C845.73,-2740.55 850.6,-2743.49 855,-2747 883.92,-2770.04 874.96,-2788.69 891,-2822 922.97,-2888.4 960.91,-2966.89 978.95,-3004.2"/>
+<polygon fill="#2800ff" stroke="#2800ff" points="975.99,-3006.11 983.49,-3013.59 982.29,-3003.06 975.99,-3006.11"/>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;proc~findspan -->
 <g id="call~~graph~~CallGraph_edge319" class="edge">
 <title>proc~insert_knots~3&#45;&gt;proc~findspan</title>
-<path fill="none" stroke="#2800ff" d="M836.86,-927.13C843.79,-930.49 850.06,-934.99 855,-941 943.45,-1048.45 801.91,-2086.09 891,-2193 905.43,-2210.32 930.3,-2215.52 951.44,-2216.41"/>
-<polygon fill="#2800ff" stroke="#2800ff" points="951.41,-2219.91 961.46,-2216.54 951.5,-2212.91 951.41,-2219.91"/>
+<path fill="none" stroke="#2800ff" d="M841.51,-2735.76C846.57,-2738.74 851.17,-2742.44 855,-2747 960.89,-2873.06 784.35,-3361.57 891,-3487 905.44,-3503.98 929.92,-3509.26 950.86,-3510.28"/>
+<polygon fill="#2800ff" stroke="#2800ff" points="951.04,-3513.78 961.11,-3510.46 951.17,-3506.78 951.04,-3513.78"/>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;proc~insert_knot_a_5_1 -->
 <g id="call~~graph~~CallGraph_edge320" class="edge">
 <title>proc~insert_knots~3&#45;&gt;proc~insert_knot_a_5_1</title>
-<path fill="none" stroke="#2800ff" d="M836.87,-927.12C843.8,-930.48 850.06,-934.99 855,-941 946.36,-1052.09 798.97,-2124.46 891,-2235 899.91,-2245.7 912.82,-2251.78 926.36,-2255.07"/>
-<polygon fill="#2800ff" stroke="#2800ff" points="925.81,-2258.53 936.3,-2257 927.15,-2251.66 925.81,-2258.53"/>
+<path fill="none" stroke="#2800ff" d="M841.91,-2736.02C846.82,-2738.96 851.27,-2742.57 855,-2747 955.07,-2865.78 790.21,-3326.82 891,-3445 900.04,-3455.6 912.99,-3461.63 926.54,-3464.92"/>
+<polygon fill="#2800ff" stroke="#2800ff" points="925.99,-3468.38 936.47,-3466.85 927.33,-3461.51 925.99,-3468.38"/>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;proc~is_rational~3 -->
 <g id="call~~graph~~CallGraph_edge321" class="edge">
 <title>proc~insert_knots~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#2800ff" d="M836.51,-923.85C912.02,-923.35 1026.5,-909.69 1090,-839 1165.02,-755.49 1058.49,-678.69 1126,-589 1134.14,-578.19 1145.78,-570.16 1158.03,-564.22"/>
-<polygon fill="#2800ff" stroke="#2800ff" points="1159.72,-567.3 1167.47,-560.07 1156.9,-560.89 1159.72,-567.3"/>
+<path fill="none" stroke="#2800ff" d="M838.63,-2738.01C907.8,-2745.25 1010.6,-2746.84 1090,-2709 1144.68,-2682.94 1186.32,-2621.59 1205.45,-2589.08"/>
+<polygon fill="#2800ff" stroke="#2800ff" points="1208.52,-2590.77 1210.45,-2580.35 1202.44,-2587.29 1208.52,-2590.77"/>
 </g>
 <!-- proc~inv&#45;&gt;proc~det -->
 <g id="call~~graph~~CallGraph_edge322" class="edge">
 <title>proc~inv&#45;&gt;proc~det</title>
-<path fill="none" stroke="#2d00ff" d="M788.17,-6115.15C807.09,-6123.51 833.08,-6135.6 855,-6148 871.74,-6157.47 873.47,-6164.11 891,-6172 910.82,-6180.92 934.32,-6187.27 953.39,-6191.46"/>
-<polygon fill="#2d00ff" stroke="#2d00ff" points="952.69,-6194.89 963.19,-6193.51 954.12,-6188.04 952.69,-6194.89"/>
+<path fill="none" stroke="#2d00ff" d="M788.1,-4854C828.7,-4854 907.11,-4854 953.21,-4854"/>
+<polygon fill="#2d00ff" stroke="#2d00ff" points="953.36,-4857.5 963.36,-4854 953.36,-4850.5 953.36,-4857.5"/>
 </g>
 <!-- proc~inv&#45;&gt;proc~inv -->
 <g id="call~~graph~~CallGraph_edge323" class="edge">
 <title>proc~inv&#45;&gt;proc~inv</title>
-<path fill="none" stroke="#2d00ff" d="M733.79,-6111.38C708.92,-6121.55 718,-6134 761,-6134 797.28,-6134 809.41,-6125.13 797.38,-6116.26"/>
-<polygon fill="#2d00ff" stroke="#2d00ff" points="798.69,-6112.99 788.21,-6111.38 795.4,-6119.17 798.69,-6112.99"/>
+<path fill="none" stroke="#2d00ff" d="M733.79,-4861.38C708.92,-4871.55 718,-4884 761,-4884 797.28,-4884 809.41,-4875.13 797.38,-4866.26"/>
+<polygon fill="#2d00ff" stroke="#2d00ff" points="798.69,-4862.99 788.21,-4861.38 795.4,-4869.17 798.69,-4862.99"/>
 </g>
 <!-- proc~isinf -->
 <g id="call~~graph~~CallGraph_node257" class="node">
 <title>proc~isinf</title>
 <g id="a_call~~graph~~CallGraph_node257"><a xlink:href="../proc/isinf.html" xlink:title="isinf">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="135.5,-7152 81.5,-7152 81.5,-7128 135.5,-7128 135.5,-7152"/>
-<text text-anchor="middle" x="108.5" y="-7137.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">isinf</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="135.5,-7522 81.5,-7522 81.5,-7498 135.5,-7498 135.5,-7522"/>
+<text text-anchor="middle" x="108.5" y="-7507.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">isinf</text>
 </a>
 </g>
 </g>
@@ -6351,377 +6351,377 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node258" class="node">
 <title>proc~isnan</title>
 <g id="a_call~~graph~~CallGraph_node258"><a xlink:href="../proc/isnan.html" xlink:title="isnan">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="135.5,-7194 81.5,-7194 81.5,-7170 135.5,-7170 135.5,-7194"/>
-<text text-anchor="middle" x="108.5" y="-7179.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">isnan</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="135.5,-7564 81.5,-7564 81.5,-7540 135.5,-7540 135.5,-7564"/>
+<text text-anchor="middle" x="108.5" y="-7549.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">isnan</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc -->
 <g id="call~~graph~~CallGraph_node260" class="node">
 <title>proc~modify_wc</title>
-<g id="a_call~~graph~~CallGraph_node260"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="839,-3542 683,-3542 683,-3518 839,-3518 839,-3542"/>
-<text text-anchor="middle" x="761" y="-3527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
+<g id="a_call~~graph~~CallGraph_node260"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="834,-6722 688,-6722 688,-6698 834,-6698 834,-6722"/>
+<text text-anchor="middle" x="761" y="-6707.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~get_knot -->
 <g id="call~~graph~~CallGraph_edge324" class="edge">
 <title>proc~modify_wc&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#4a00ff" d="M790.82,-3517.94C812.14,-3507.45 839.98,-3490.12 855,-3466 913.18,-3372.58 815.71,-3301.28 891,-3221 896.18,-3215.48 902.43,-3211.22 909.23,-3207.96"/>
-<polygon fill="#4a00ff" stroke="#4a00ff" points="910.84,-3211.09 918.81,-3204.11 908.22,-3204.59 910.84,-3211.09"/>
+<path fill="none" stroke="#4a00ff" d="M834.3,-6710C859.68,-6710 888.25,-6710 913.9,-6710"/>
+<polygon fill="#4a00ff" stroke="#4a00ff" points="913.95,-6713.5 923.95,-6710 913.95,-6706.5 913.95,-6713.5"/>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~get_wc -->
 <g id="call~~graph~~CallGraph_edge325" class="edge">
 <title>proc~modify_wc&#45;&gt;none~get_wc</title>
-<path fill="none" stroke="#4a00ff" d="M836.14,-3517.96C843.2,-3514.39 849.7,-3509.83 855,-3504 915.51,-3437.54 828.44,-3369.53 891,-3305 897.15,-3298.66 904.7,-3294 912.87,-3290.62"/>
-<polygon fill="#4a00ff" stroke="#4a00ff" points="914.03,-3293.92 922.3,-3287.3 911.71,-3287.31 914.03,-3293.92"/>
+<path fill="none" stroke="#4a00ff" d="M834.39,-6721.45C841.61,-6724.02 848.62,-6727.16 855,-6731 876.06,-6743.69 871.17,-6758.46 891,-6773 905.79,-6783.84 923.81,-6792.56 940.37,-6799.19"/>
+<polygon fill="#4a00ff" stroke="#4a00ff" points="939.32,-6802.54 949.91,-6802.85 941.83,-6796 939.32,-6802.54"/>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~get_xc -->
 <g id="call~~graph~~CallGraph_edge326" class="edge">
 <title>proc~modify_wc&#45;&gt;none~get_xc</title>
-<path fill="none" stroke="#4a00ff" d="M809.66,-3517.88C824.32,-3513.83 840.43,-3509.05 855,-3504 889.06,-3492.2 926.87,-3476.18 953.71,-3464.3"/>
-<polygon fill="#4a00ff" stroke="#4a00ff" points="955.37,-3467.4 963.08,-3460.13 952.52,-3461 955.37,-3467.4"/>
+<path fill="none" stroke="#4a00ff" d="M827.19,-6722.04C855.62,-6727.28 889.02,-6733.45 918.11,-6738.82"/>
+<polygon fill="#4a00ff" stroke="#4a00ff" points="917.74,-6742.31 928.2,-6740.68 919.01,-6735.43 917.74,-6742.31"/>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~set -->
 <g id="call~~graph~~CallGraph_edge327" class="edge">
 <title>proc~modify_wc&#45;&gt;none~set</title>
-<path fill="none" stroke="#4a00ff" d="M839.02,-3530C866.45,-3530 897.06,-3530 923.48,-3530"/>
-<polygon fill="#4a00ff" stroke="#4a00ff" points="923.77,-3533.5 933.77,-3530 923.77,-3526.5 923.77,-3533.5"/>
+<path fill="none" stroke="#4a00ff" d="M834.04,-6703.4C841.95,-6700.03 849.22,-6695.38 855,-6689 898.6,-6640.87 878.1,-6462.64 891,-6399 916.37,-6273.85 963.82,-6127.92 982.08,-6073.71"/>
+<polygon fill="#4a00ff" stroke="#4a00ff" points="985.43,-6074.72 985.32,-6064.13 978.8,-6072.47 985.43,-6074.72"/>
 </g>
 <!-- proc~modify_wc~2 -->
 <g id="call~~graph~~CallGraph_node261" class="node">
 <title>proc~modify_wc~2</title>
-<g id="a_call~~graph~~CallGraph_node261"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="839,-2508 683,-2508 683,-2484 839,-2484 839,-2508"/>
-<text text-anchor="middle" x="761" y="-2493.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+<g id="a_call~~graph~~CallGraph_node261"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="839,-4744 683,-4744 683,-4720 839,-4720 839,-4744"/>
+<text text-anchor="middle" x="761" y="-4729.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~get_knot~2 -->
 <g id="call~~graph~~CallGraph_edge328" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~get_knot~2</title>
-<path fill="none" stroke="#4e00ff" d="M838.12,-2483.81C844.54,-2480.24 850.34,-2475.72 855,-2470 928.3,-2380.02 830.33,-2047.94 891,-1949 902.96,-1929.49 924.01,-1915.61 943.58,-1906.24"/>
-<polygon fill="#4e00ff" stroke="#4e00ff" points="945.05,-1909.42 952.73,-1902.12 942.18,-1903.03 945.05,-1909.42"/>
+<path fill="none" stroke="#4e00ff" d="M839.4,-4723.46C845.31,-4720.29 850.65,-4716.21 855,-4711 914.39,-4639.9 852.94,-3962.46 891,-3878 905.86,-3845.01 937.9,-3817.65 961.42,-3800.9"/>
+<polygon fill="#4e00ff" stroke="#4e00ff" points="963.41,-3803.78 969.65,-3795.21 959.44,-3798.02 963.41,-3803.78"/>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~get_wc~2 -->
 <g id="call~~graph~~CallGraph_edge329" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~get_wc~2</title>
-<path fill="none" stroke="#4e00ff" d="M838.08,-2483.78C844.51,-2480.22 850.32,-2475.71 855,-2470 922.67,-2387.44 820.78,-2071.4 891,-1991 896.93,-1984.21 904.47,-1979.3 912.74,-1975.79"/>
-<polygon fill="#4e00ff" stroke="#4e00ff" points="914.06,-1979.03 922.32,-1972.4 911.73,-1972.44 914.06,-1979.03"/>
+<path fill="none" stroke="#4e00ff" d="M836.31,-4719.85C842.85,-4717.42 849.19,-4714.5 855,-4711 876.06,-4698.31 869.86,-4681.56 891,-4669 897.71,-4665.01 905.08,-4661.78 912.67,-4659.15"/>
+<polygon fill="#4e00ff" stroke="#4e00ff" points="913.85,-4662.45 922.37,-4656.14 911.78,-4655.76 913.85,-4662.45"/>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~get_xc~2 -->
 <g id="call~~graph~~CallGraph_edge330" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~get_xc~2</title>
-<path fill="none" stroke="#4e00ff" d="M837.5,-2483.9C844.13,-2480.32 850.15,-2475.78 855,-2470 906.86,-2408.28 856.21,-2181.73 891,-2109 906.96,-2075.64 939.39,-2047.3 962.68,-2030.02"/>
-<polygon fill="#4e00ff" stroke="#4e00ff" points="964.74,-2032.85 970.8,-2024.17 960.64,-2027.17 964.74,-2032.85"/>
+<path fill="none" stroke="#4e00ff" d="M833.98,-4744.02C859.38,-4748.27 888,-4753.05 913.71,-4757.34"/>
+<polygon fill="#4e00ff" stroke="#4e00ff" points="913.33,-4760.83 923.77,-4759.02 914.49,-4753.92 913.33,-4760.83"/>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~set~2 -->
 <g id="call~~graph~~CallGraph_edge331" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#4e00ff" d="M839.02,-2496C866.45,-2496 897.06,-2496 923.48,-2496"/>
-<polygon fill="#4e00ff" stroke="#4e00ff" points="923.77,-2499.5 933.77,-2496 923.77,-2492.5 923.77,-2499.5"/>
+<path fill="none" stroke="#4e00ff" d="M839.28,-4722.75C845.13,-4719.71 850.5,-4715.86 855,-4711 929.53,-4630.61 848.76,-4568.15 891,-4467 909.62,-4422.41 946.88,-4379.34 969.85,-4355.39"/>
+<polygon fill="#4e00ff" stroke="#4e00ff" points="972.56,-4357.62 977.05,-4348.02 967.56,-4352.73 972.56,-4357.62"/>
 </g>
 <!-- proc~modify_wc~3 -->
 <g id="call~~graph~~CallGraph_node262" class="node">
 <title>proc~modify_wc~3</title>
-<g id="a_call~~graph~~CallGraph_node262"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="834,-2924 688,-2924 688,-2900 834,-2900 834,-2924"/>
-<text text-anchor="middle" x="761" y="-2909.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
+<g id="a_call~~graph~~CallGraph_node262"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="839,-2406 683,-2406 683,-2382 839,-2382 839,-2406"/>
+<text text-anchor="middle" x="761" y="-2391.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~get_knot~3 -->
 <g id="call~~graph~~CallGraph_edge332" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~get_knot~3</title>
-<path fill="none" stroke="#5300ff" d="M834.11,-2902.74C841.63,-2899.78 848.79,-2895.95 855,-2891 883.92,-2867.96 862.5,-2839.55 891,-2816 897.88,-2810.31 905.88,-2805.85 914.29,-2802.37"/>
-<polygon fill="#5300ff" stroke="#5300ff" points="915.75,-2805.56 923.92,-2798.82 913.33,-2798.99 915.75,-2805.56"/>
+<path fill="none" stroke="#5300ff" d="M839.41,-2403.13C845.23,-2406.2 850.56,-2410.09 855,-2415 943.31,-2512.63 819.24,-2598.63 891,-2709 903.57,-2728.33 924.89,-2742.24 944.49,-2751.68"/>
+<polygon fill="#5300ff" stroke="#5300ff" points="943.08,-2754.88 953.63,-2755.83 945.97,-2748.51 943.08,-2754.88"/>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~get_wc~3 -->
 <g id="call~~graph~~CallGraph_edge333" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~get_wc~3</title>
-<path fill="none" stroke="#5300ff" d="M827.19,-2924.04C855.15,-2929.2 887.92,-2935.25 916.66,-2940.55"/>
-<polygon fill="#5300ff" stroke="#5300ff" points="916.18,-2944.02 926.65,-2942.4 917.45,-2937.14 916.18,-2944.02"/>
+<path fill="none" stroke="#5300ff" d="M839.39,-2383.51C845.07,-2380.71 850.37,-2377.26 855,-2373 894.11,-2337.04 851.67,-2294.73 891,-2259 897.33,-2253.25 904.83,-2248.94 912.82,-2245.71"/>
+<polygon fill="#5300ff" stroke="#5300ff" points="914.08,-2248.98 922.4,-2242.41 911.8,-2242.36 914.08,-2248.98"/>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~get_xc~3 -->
 <g id="call~~graph~~CallGraph_edge334" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~get_xc~3</title>
-<path fill="none" stroke="#5300ff" d="M834.3,-2912C861.18,-2912 891.64,-2912 918.41,-2912"/>
-<polygon fill="#5300ff" stroke="#5300ff" points="918.47,-2915.5 928.47,-2912 918.47,-2908.5 918.47,-2915.5"/>
+<path fill="none" stroke="#5300ff" d="M839.32,-2384.13C845.08,-2381.21 850.42,-2377.55 855,-2373 905.43,-2322.8 840.27,-2266.89 891,-2217 897.59,-2210.52 905.66,-2205.82 914.32,-2202.44"/>
+<polygon fill="#5300ff" stroke="#5300ff" points="915.51,-2205.73 923.9,-2199.27 913.31,-2199.09 915.51,-2205.73"/>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
 <g id="call~~graph~~CallGraph_edge335" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#5300ff" d="M834.24,-2906.15C842.22,-2902.68 849.46,-2897.8 855,-2891 921.04,-2809.99 865.49,-1111.36 891,-1010 907.88,-942.92 951.65,-872.72 974.74,-838.8"/>
-<polygon fill="#5300ff" stroke="#5300ff" points="977.86,-840.45 980.67,-830.23 972.1,-836.47 977.86,-840.45"/>
+<path fill="none" stroke="#5300ff" d="M839.11,-2402.78C845.08,-2405.91 850.51,-2409.91 855,-2415 910.2,-2477.64 870.75,-2708 891,-2789 911.76,-2872.07 956.85,-2963.96 978.05,-3004.63"/>
+<polygon fill="#5300ff" stroke="#5300ff" points="975.02,-3006.39 982.78,-3013.61 981.22,-3003.13 975.02,-3006.39"/>
 </g>
 <!-- proc~modify_xc -->
 <g id="call~~graph~~CallGraph_node263" class="node">
 <title>proc~modify_xc</title>
-<g id="a_call~~graph~~CallGraph_node263"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="837.5,-3584 684.5,-3584 684.5,-3560 837.5,-3560 837.5,-3584"/>
-<text text-anchor="middle" x="761" y="-3569.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
+<g id="a_call~~graph~~CallGraph_node263"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="832.5,-6764 689.5,-6764 689.5,-6740 832.5,-6740 832.5,-6764"/>
+<text text-anchor="middle" x="761" y="-6749.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~get_knot -->
 <g id="call~~graph~~CallGraph_edge336" class="edge">
 <title>proc~modify_xc&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#5700ff" d="M837.72,-3563.83C844.22,-3560.62 850.15,-3556.43 855,-3551 953.24,-3440.93 792.1,-3330.48 891,-3221 896.08,-3215.38 902.26,-3211.06 909.02,-3207.76"/>
-<polygon fill="#5700ff" stroke="#5700ff" points="910.61,-3210.89 918.55,-3203.87 907.97,-3204.41 910.61,-3210.89"/>
+<path fill="none" stroke="#5700ff" d="M827.19,-6739.96C854.32,-6734.96 885.99,-6729.11 914.11,-6723.92"/>
+<polygon fill="#5700ff" stroke="#5700ff" points="915.1,-6727.29 924.3,-6722.04 913.83,-6720.41 915.1,-6727.29"/>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~get_wc -->
 <g id="call~~graph~~CallGraph_edge337" class="edge">
 <title>proc~modify_xc&#45;&gt;none~get_wc</title>
-<path fill="none" stroke="#5700ff" d="M837.52,-3563.64C844.06,-3560.47 850.05,-3556.34 855,-3551 930.08,-3469.93 815.44,-3385.62 891,-3305 897.08,-3298.51 904.63,-3293.77 912.83,-3290.34"/>
-<polygon fill="#5700ff" stroke="#5700ff" points="914.05,-3293.63 922.32,-3287.01 911.73,-3287.02 914.05,-3293.63"/>
+<path fill="none" stroke="#5700ff" d="M805.6,-6764.07C842.82,-6774.38 896.5,-6789.25 936.26,-6800.26"/>
+<polygon fill="#5700ff" stroke="#5700ff" points="935.48,-6803.67 946.05,-6802.97 937.35,-6796.93 935.48,-6803.67"/>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~get_xc -->
 <g id="call~~graph~~CallGraph_edge338" class="edge">
 <title>proc~modify_xc&#45;&gt;none~get_xc</title>
-<path fill="none" stroke="#5700ff" d="M836.31,-3559.85C842.85,-3557.42 849.19,-3554.5 855,-3551 876.06,-3538.31 872.33,-3524.99 891,-3509 911.04,-3491.83 936.42,-3476.23 956.39,-3465.11"/>
-<polygon fill="#5700ff" stroke="#5700ff" points="958.34,-3468.04 965.44,-3460.17 954.98,-3461.89 958.34,-3468.04"/>
+<path fill="none" stroke="#5700ff" d="M832.74,-6752C859.92,-6752 890.94,-6752 918.17,-6752"/>
+<polygon fill="#5700ff" stroke="#5700ff" points="918.41,-6755.5 928.41,-6752 918.41,-6748.5 918.41,-6755.5"/>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~set -->
 <g id="call~~graph~~CallGraph_edge339" class="edge">
 <title>proc~modify_xc&#45;&gt;none~set</title>
-<path fill="none" stroke="#5700ff" d="M827.19,-3559.96C857.51,-3554.37 893.49,-3547.72 923.86,-3542.12"/>
-<polygon fill="#5700ff" stroke="#5700ff" points="924.73,-3545.52 933.93,-3540.26 923.46,-3538.63 924.73,-3545.52"/>
+<path fill="none" stroke="#5700ff" d="M832.76,-6746.06C841.19,-6742.64 848.94,-6737.79 855,-6731 904.4,-6675.62 876.82,-6471.84 891,-6399 915.4,-6273.66 963.42,-6127.84 981.96,-6073.69"/>
+<polygon fill="#5700ff" stroke="#5700ff" points="985.31,-6074.71 985.25,-6064.11 978.69,-6072.43 985.31,-6074.71"/>
 </g>
 <!-- proc~modify_xc~2 -->
 <g id="call~~graph~~CallGraph_node264" class="node">
 <title>proc~modify_xc~2</title>
-<g id="a_call~~graph~~CallGraph_node264"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="837.5,-1264 684.5,-1264 684.5,-1240 837.5,-1240 837.5,-1264"/>
-<text text-anchor="middle" x="761" y="-1249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+<g id="a_call~~graph~~CallGraph_node264"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="837.5,-4702 684.5,-4702 684.5,-4678 837.5,-4678 837.5,-4702"/>
+<text text-anchor="middle" x="761" y="-4687.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~get_knot~2 -->
 <g id="call~~graph~~CallGraph_edge340" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~get_knot~2</title>
-<path fill="none" stroke="#5b00ff" d="M837.53,-1259.74C844.15,-1263.01 850.16,-1267.33 855,-1273 935.67,-1367.51 826.29,-1724.92 891,-1831 902.92,-1850.54 923.96,-1864.42 943.54,-1873.79"/>
-<polygon fill="#5b00ff" stroke="#5b00ff" points="942.14,-1876.99 952.7,-1877.9 945.01,-1870.61 942.14,-1876.99"/>
+<path fill="none" stroke="#5b00ff" d="M837.64,-4682.36C844.24,-4679.06 850.22,-4674.71 855,-4669 911.48,-4601.55 854.77,-3958.17 891,-3878 905.9,-3845.03 937.93,-3817.66 961.44,-3800.91"/>
+<polygon fill="#5b00ff" stroke="#5b00ff" points="963.43,-3803.79 969.67,-3795.22 959.45,-3798.03 963.43,-3803.79"/>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~get_wc~2 -->
 <g id="call~~graph~~CallGraph_edge341" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~get_wc~2</title>
-<path fill="none" stroke="#5b00ff" d="M837.58,-1259.7C844.19,-1262.98 850.19,-1267.32 855,-1273 946.76,-1381.38 817.54,-1789.48 891,-1911 902.84,-1930.59 923.87,-1944.47 943.47,-1953.83"/>
-<polygon fill="#5b00ff" stroke="#5b00ff" points="942.08,-1957.04 952.63,-1957.94 944.94,-1950.65 942.08,-1957.04"/>
+<path fill="none" stroke="#5b00ff" d="M827.19,-4677.96C854.32,-4672.96 885.99,-4667.11 914.11,-4661.92"/>
+<polygon fill="#5b00ff" stroke="#5b00ff" points="915.1,-4665.29 924.3,-4660.04 913.83,-4658.41 915.1,-4665.29"/>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~get_xc~2 -->
 <g id="call~~graph~~CallGraph_edge342" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~get_xc~2</title>
-<path fill="none" stroke="#5b00ff" d="M837.62,-1259.67C844.22,-1262.96 850.2,-1267.3 855,-1273 957.85,-1395.25 787.42,-1869.37 891,-1991 897.27,-1998.36 905.42,-2003.52 914.36,-2007.09"/>
-<polygon fill="#5b00ff" stroke="#5b00ff" points="913.31,-2010.43 923.91,-2010.26 915.52,-2003.79 913.31,-2010.43"/>
+<path fill="none" stroke="#5b00ff" d="M822.99,-4702.01C833.75,-4704.63 844.78,-4707.64 855,-4711 890.6,-4722.71 929.64,-4740.41 956.45,-4753.38"/>
+<polygon fill="#5b00ff" stroke="#5b00ff" points="955.23,-4756.67 965.75,-4757.92 958.3,-4750.38 955.23,-4756.67"/>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~set~2 -->
 <g id="call~~graph~~CallGraph_edge343" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#5b00ff" d="M837.73,-1259.57C844.31,-1262.88 850.26,-1267.25 855,-1273 937.35,-1372.81 825.47,-2325.42 891,-2437 902.5,-2456.59 923.28,-2470.43 942.8,-2479.75"/>
-<polygon fill="#5b00ff" stroke="#5b00ff" points="941.38,-2482.95 951.94,-2483.85 944.24,-2476.57 941.38,-2482.95"/>
+<path fill="none" stroke="#5b00ff" d="M837.8,-4681.27C844.19,-4678.16 850.08,-4674.15 855,-4669 917.99,-4603.06 854.6,-4550.61 891,-4467 910.28,-4422.7 947.32,-4379.53 970.08,-4355.49"/>
+<polygon fill="#5b00ff" stroke="#5b00ff" points="972.79,-4357.72 977.2,-4348.09 967.74,-4352.86 972.79,-4357.72"/>
 </g>
 <!-- proc~modify_xc~3 -->
 <g id="call~~graph~~CallGraph_node265" class="node">
 <title>proc~modify_xc~3</title>
-<g id="a_call~~graph~~CallGraph_node265"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="832.5,-2966 689.5,-2966 689.5,-2942 832.5,-2942 832.5,-2966"/>
-<text text-anchor="middle" x="761" y="-2951.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
+<g id="a_call~~graph~~CallGraph_node265"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="837.5,-1734 684.5,-1734 684.5,-1710 837.5,-1710 837.5,-1734"/>
+<text text-anchor="middle" x="761" y="-1719.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~get_knot~3 -->
 <g id="call~~graph~~CallGraph_edge344" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~get_knot~3</title>
-<path fill="none" stroke="#5f00ff" d="M832.55,-2946.57C840.81,-2943.36 848.56,-2938.96 855,-2933 894.91,-2896.03 851.76,-2853.69 891,-2816 897.7,-2809.57 905.79,-2804.68 914.43,-2800.97"/>
-<polygon fill="#5f00ff" stroke="#5f00ff" points="915.83,-2804.18 923.97,-2797.4 913.38,-2797.63 915.83,-2804.18"/>
+<path fill="none" stroke="#5f00ff" d="M837.69,-1729.6C844.28,-1732.9 850.24,-1737.27 855,-1743 923.62,-1825.63 836.31,-2616.56 891,-2709 902.57,-2728.55 923.35,-2742.39 942.86,-2751.72"/>
+<polygon fill="#5f00ff" stroke="#5f00ff" points="941.43,-2754.92 951.99,-2755.82 944.3,-2748.53 941.43,-2754.92"/>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~get_wc~3 -->
 <g id="call~~graph~~CallGraph_edge345" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~get_wc~3</title>
-<path fill="none" stroke="#5f00ff" d="M832.74,-2954C859.45,-2954 889.88,-2954 916.78,-2954"/>
-<polygon fill="#5f00ff" stroke="#5f00ff" points="916.9,-2957.5 926.9,-2954 916.9,-2950.5 916.9,-2957.5"/>
+<path fill="none" stroke="#5f00ff" d="M837.91,-1730.01C844.37,-1733.25 850.24,-1737.49 855,-1743 924.04,-1822.96 821.48,-2137.46 891,-2217 896.94,-2223.79 904.48,-2228.7 912.74,-2232.2"/>
+<polygon fill="#5f00ff" stroke="#5f00ff" points="911.73,-2235.56 922.33,-2235.59 914.07,-2228.96 911.73,-2235.56"/>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~get_xc~3 -->
 <g id="call~~graph~~CallGraph_edge346" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~get_xc~3</title>
-<path fill="none" stroke="#5f00ff" d="M827.19,-2941.96C855.62,-2936.72 889.02,-2930.55 918.11,-2925.18"/>
-<polygon fill="#5f00ff" stroke="#5f00ff" points="919.01,-2928.57 928.2,-2923.32 917.74,-2921.69 919.01,-2928.57"/>
+<path fill="none" stroke="#5f00ff" d="M837.87,-1730.05C844.34,-1733.28 850.22,-1737.51 855,-1743 918.22,-1815.68 827.34,-2102.7 891,-2175 897.35,-2182.21 905.5,-2187.29 914.4,-2190.82"/>
+<polygon fill="#5f00ff" stroke="#5f00ff" points="913.3,-2194.15 923.9,-2193.97 915.51,-2187.5 913.3,-2194.15"/>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
 <g id="call~~graph~~CallGraph_edge347" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#5f00ff" d="M832.88,-2948.73C841.4,-2945.23 849.14,-2940.19 855,-2933 922.5,-2850.17 864.94,-1113.63 891,-1010 907.87,-942.92 951.65,-872.72 974.74,-838.8"/>
-<polygon fill="#5f00ff" stroke="#5f00ff" points="977.86,-840.44 980.66,-830.23 972.1,-836.46 977.86,-840.44"/>
+<path fill="none" stroke="#5f00ff" d="M837.71,-1729.59C844.3,-1732.89 850.25,-1737.26 855,-1743 892.08,-1787.79 878.64,-2732.18 891,-2789 909.2,-2872.67 955.57,-2964.26 977.57,-3004.74"/>
+<polygon fill="#5f00ff" stroke="#5f00ff" points="974.6,-3006.6 982.49,-3013.68 980.74,-3003.23 974.6,-3006.6"/>
 </g>
 <!-- proc~nearest_point -->
 <g id="call~~graph~~CallGraph_node268" class="node">
 <title>proc~nearest_point</title>
-<g id="a_call~~graph~~CallGraph_node268"><a xlink:href="../proc/nearest_point.html" xlink:title="nurbs_volume%nearest_point">
-<polygon fill="#d9534f" stroke="#d9534f" points="845.5,-6538 676.5,-6538 676.5,-6514 845.5,-6514 845.5,-6538"/>
-<text text-anchor="middle" x="761" y="-6523.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point</text>
+<g id="a_call~~graph~~CallGraph_node268"><a xlink:href="../proc/nearest_point.html" xlink:title="nurbs_curve%nearest_point">
+<polygon fill="#d9534f" stroke="#d9534f" points="841,-6680 681,-6680 681,-6656 841,-6656 841,-6680"/>
+<text text-anchor="middle" x="761" y="-6665.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point&#45;&gt;interface~nearest_point_help_3d -->
+<!-- proc~nearest_point&#45;&gt;interface~nearest_point_help_1d -->
 <g id="call~~graph~~CallGraph_edge348" class="edge">
-<title>proc~nearest_point&#45;&gt;interface~nearest_point_help_3d</title>
-<path fill="none" stroke="#6c00ff" d="M782.77,-6538.12C807.72,-6552.21 851.18,-6575.26 891,-6589 898.52,-6591.59 906.48,-6593.93 914.48,-6596.02"/>
-<polygon fill="#6c00ff" stroke="#6c00ff" points="913.69,-6599.43 924.24,-6598.44 915.38,-6592.63 913.69,-6599.43"/>
+<title>proc~nearest_point&#45;&gt;interface~nearest_point_help_1d</title>
+<path fill="none" stroke="#6c00ff" d="M841.25,-6668C864.93,-6668 890.82,-6668 914.23,-6668"/>
+<polygon fill="#6c00ff" stroke="#6c00ff" points="914.45,-6671.5 924.45,-6668 914.45,-6664.5 914.45,-6671.5"/>
 </g>
 <!-- proc~nearest_point2 -->
 <g id="call~~graph~~CallGraph_node269" class="node">
 <title>proc~nearest_point2</title>
-<g id="a_call~~graph~~CallGraph_node269"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_volume%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="631,-6144 455,-6144 455,-6120 631,-6120 631,-6144"/>
-<text text-anchor="middle" x="543" y="-6129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
+<g id="a_call~~graph~~CallGraph_node269"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_curve%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="626,-6554 460,-6554 460,-6530 626,-6530 626,-6554"/>
+<text text-anchor="middle" x="543" y="-6539.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2&#45;&gt;none~derivative2 -->
 <g id="call~~graph~~CallGraph_edge349" class="edge">
 <title>proc~nearest_point2&#45;&gt;none~derivative2</title>
-<path fill="none" stroke="#7000ff" d="M547.33,-6144.08C558.5,-6182.8 597.87,-6305.83 667,-6383 682.9,-6400.75 705.35,-6415.2 724.22,-6425.35"/>
-<polygon fill="#7000ff" stroke="#7000ff" points="722.66,-6428.49 733.14,-6429.99 725.88,-6422.27 722.66,-6428.49"/>
+<path fill="none" stroke="#7000ff" d="M563.75,-6554.1C587.49,-6568.15 628.88,-6591.18 667,-6605 673.38,-6607.31 680.1,-6609.42 686.89,-6611.33"/>
+<polygon fill="#7000ff" stroke="#7000ff" points="686.28,-6614.8 696.85,-6614 688.09,-6608.03 686.28,-6614.8"/>
 </g>
 <!-- proc~nearest_point2&#45;&gt;proc~cmp_xg -->
 <g id="call~~graph~~CallGraph_edge350" class="edge">
 <title>proc~nearest_point2&#45;&gt;proc~cmp_xg</title>
-<path fill="none" stroke="#7000ff" d="M551.11,-6144.43C568.3,-6173.76 614.56,-6248.59 667,-6299 685.69,-6316.97 710.05,-6333.26 729.15,-6344.78"/>
-<polygon fill="#7000ff" stroke="#7000ff" points="727.39,-6347.81 737.78,-6349.88 730.95,-6341.78 727.39,-6347.81"/>
+<path fill="none" stroke="#7000ff" d="M626.28,-6542C645.78,-6542 666.47,-6542 685.6,-6542"/>
+<polygon fill="#7000ff" stroke="#7000ff" points="685.75,-6545.5 695.75,-6542 685.75,-6538.5 685.75,-6545.5"/>
 </g>
 <!-- proc~nearest_point2&#45;&gt;proc~create -->
 <g id="call~~graph~~CallGraph_edge351" class="edge">
 <title>proc~nearest_point2&#45;&gt;proc~create</title>
-<path fill="none" stroke="#7000ff" d="M549.18,-6119.97C565.16,-6082.16 613.67,-5961.99 631,-5857 646.66,-5762.15 606.2,-4201.46 667,-4127 672.08,-4120.78 678.57,-4116.16 685.76,-4112.77"/>
-<polygon fill="#7000ff" stroke="#7000ff" points="687.15,-4115.98 695.19,-4109.08 684.6,-4109.46 687.15,-4115.98"/>
+<path fill="none" stroke="#7000ff" d="M558.19,-6529.72C587.85,-6504.14 654.71,-6447.01 667,-6441 674.29,-6437.43 682.21,-6434.46 690.24,-6431.99"/>
+<polygon fill="#7000ff" stroke="#7000ff" points="691.38,-6435.3 700.05,-6429.21 689.48,-6428.57 691.38,-6435.3"/>
 </g>
 <!-- proc~nearest_point2&#45;&gt;proc~finalize -->
 <g id="call~~graph~~CallGraph_edge352" class="edge">
 <title>proc~nearest_point2&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#7000ff" d="M549.19,-6119.97C565.18,-6082.17 613.72,-5962 631,-5857 647.37,-5757.54 603.28,-4121.11 667,-4043 671.5,-4037.48 677.11,-4033.23 683.33,-4029.97"/>
-<polygon fill="#7000ff" stroke="#7000ff" points="685.04,-4033.04 692.83,-4025.87 682.26,-4026.62 685.04,-4033.04"/>
-</g>
-<!-- proc~nearest_point2&#45;&gt;proc~inv -->
-<g id="call~~graph~~CallGraph_edge353" class="edge">
-<title>proc~nearest_point2&#45;&gt;proc~inv</title>
-<path fill="none" stroke="#7000ff" d="M631.23,-6120.69C663.4,-6116.52 698.13,-6112.02 723.4,-6108.74"/>
-<polygon fill="#7000ff" stroke="#7000ff" points="724.15,-6112.18 733.62,-6107.42 723.25,-6105.23 724.15,-6112.18"/>
+<path fill="none" stroke="#7000ff" d="M551.8,-6529.74C577.51,-6489.37 658.46,-6362.88 667,-6357 673.42,-6352.58 680.63,-6349.07 688.12,-6346.29"/>
+<polygon fill="#7000ff" stroke="#7000ff" points="689.3,-6349.59 697.71,-6343.15 687.12,-6342.94 689.3,-6349.59"/>
 </g>
 <!-- proc~nearest_point2&#45;&gt;proc~nearest_point -->
-<g id="call~~graph~~CallGraph_edge354" class="edge">
+<g id="call~~graph~~CallGraph_edge353" class="edge">
 <title>proc~nearest_point2&#45;&gt;proc~nearest_point</title>
-<path fill="none" stroke="#7000ff" d="M548.95,-6144.14C562.95,-6178.74 603.59,-6280.95 631,-6368 649.91,-6428.05 621.71,-6461.27 667,-6505 668.12,-6506.08 669.28,-6507.11 670.47,-6508.08"/>
-<polygon fill="#7000ff" stroke="#7000ff" points="668.66,-6511.08 678.88,-6513.86 672.62,-6505.32 668.66,-6511.08"/>
+<path fill="none" stroke="#7000ff" d="M560.49,-6554.18C578.33,-6567.56 607.4,-6589.96 631,-6611 647.89,-6626.06 647.18,-6636.08 667,-6647 670.49,-6648.92 674.14,-6650.67 677.9,-6652.26"/>
+<polygon fill="#7000ff" stroke="#7000ff" points="676.83,-6655.59 687.42,-6655.88 679.32,-6649.05 676.83,-6655.59"/>
 </g>
 <!-- proc~nearest_point2~2 -->
 <g id="call~~graph~~CallGraph_node270" class="node">
 <title>proc~nearest_point2~2</title>
-<g id="a_call~~graph~~CallGraph_node270"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_surface%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="631,-2052 455,-2052 455,-2028 631,-2028 631,-2052"/>
-<text text-anchor="middle" x="543" y="-2037.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
+<g id="a_call~~graph~~CallGraph_node270"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_volume%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="631,-4786 455,-4786 455,-4762 631,-4762 631,-4786"/>
+<text text-anchor="middle" x="543" y="-4771.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~2&#45;&gt;none~derivative2~2 -->
-<g id="call~~graph~~CallGraph_edge355" class="edge">
+<g id="call~~graph~~CallGraph_edge354" class="edge">
 <title>proc~nearest_point2~2&#45;&gt;none~derivative2~2</title>
-<path fill="none" stroke="#7400ff" d="M546.98,-2027.87C556.86,-1990.28 592.3,-1874.91 667,-1819 668.88,-1817.59 670.85,-1816.27 672.87,-1815.04"/>
-<polygon fill="#7400ff" stroke="#7400ff" points="674.9,-1817.93 682.11,-1810.17 671.63,-1811.74 674.9,-1817.93"/>
+<path fill="none" stroke="#7400ff" d="M556.12,-4786.35C582.33,-4812.95 643.77,-4874.71 667,-4893 686.75,-4908.56 710.75,-4923.7 729.42,-4934.74"/>
+<polygon fill="#7400ff" stroke="#7400ff" points="727.71,-4937.8 738.11,-4939.82 731.24,-4931.76 727.71,-4937.8"/>
 </g>
 <!-- proc~nearest_point2~2&#45;&gt;proc~cmp_xg~2 -->
-<g id="call~~graph~~CallGraph_edge356" class="edge">
+<g id="call~~graph~~CallGraph_edge355" class="edge">
 <title>proc~nearest_point2~2&#45;&gt;proc~cmp_xg~2</title>
-<path fill="none" stroke="#7400ff" d="M549.12,-2027.7C563.02,-1995.82 604.71,-1909.91 667,-1866 672.62,-1862.04 678.82,-1858.68 685.27,-1855.84"/>
-<polygon fill="#7400ff" stroke="#7400ff" points="686.87,-1858.97 694.87,-1852.02 684.29,-1852.46 686.87,-1858.97"/>
+<path fill="none" stroke="#7400ff" d="M631.23,-4774C647.46,-4774 664.35,-4774 680.34,-4774"/>
+<polygon fill="#7400ff" stroke="#7400ff" points="680.7,-4777.5 690.7,-4774 680.7,-4770.5 680.7,-4777.5"/>
 </g>
 <!-- proc~nearest_point2~2&#45;&gt;proc~create~2 -->
-<g id="call~~graph~~CallGraph_edge357" class="edge">
+<g id="call~~graph~~CallGraph_edge356" class="edge">
 <title>proc~nearest_point2~2&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#7400ff" d="M591.29,-2052.05C606.12,-2058.1 621.18,-2067 631,-2080 693.65,-2162.89 596.05,-2235.09 667,-2311 672.21,-2316.57 678.55,-2320.82 685.45,-2324.03"/>
-<polygon fill="#7400ff" stroke="#7400ff" points="684.57,-2327.45 695.16,-2327.81 687.11,-2320.92 684.57,-2327.45"/>
+<path fill="none" stroke="#7400ff" d="M545.02,-4761.88C549.58,-4716 572.2,-4551.44 667,-4471 672.55,-4466.29 678.94,-4462.58 685.72,-4459.66"/>
+<polygon fill="#7400ff" stroke="#7400ff" points="687.01,-4462.91 695.16,-4456.15 684.57,-4456.35 687.01,-4462.91"/>
 </g>
 <!-- proc~nearest_point2~2&#45;&gt;proc~finalize~2 -->
-<g id="call~~graph~~CallGraph_edge358" class="edge">
+<g id="call~~graph~~CallGraph_edge357" class="edge">
 <title>proc~nearest_point2~2&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#7400ff" d="M590.59,-2052.06C605.55,-2058.12 620.86,-2067.04 631,-2080 683.7,-2147.34 607.57,-2207.52 667,-2269 671.61,-2273.76 677.04,-2277.55 682.94,-2280.55"/>
-<polygon fill="#7400ff" stroke="#7400ff" points="681.97,-2283.94 692.54,-2284.64 684.72,-2277.5 681.97,-2283.94"/>
+<path fill="none" stroke="#7400ff" d="M545.79,-4761.9C555.39,-4698.55 602.78,-4405.65 667,-4345 671.74,-4340.52 677.22,-4336.93 683.1,-4334.05"/>
+<polygon fill="#7400ff" stroke="#7400ff" points="684.74,-4337.16 692.63,-4330.09 682.05,-4330.7 684.74,-4337.16"/>
 </g>
 <!-- proc~nearest_point2~2&#45;&gt;proc~inv -->
-<g id="call~~graph~~CallGraph_edge359" class="edge">
+<g id="call~~graph~~CallGraph_edge358" class="edge">
 <title>proc~nearest_point2~2&#45;&gt;proc~inv</title>
-<path fill="none" stroke="#7400ff" d="M594.22,-2052.02C608.52,-2058 622.51,-2066.88 631,-2080 690.85,-2172.46 613.49,-5948.73 667,-6045 679.32,-6067.17 703.85,-6082.21 724.63,-6091.55"/>
-<polygon fill="#7400ff" stroke="#7400ff" points="723.28,-6094.78 733.85,-6095.45 726,-6088.34 723.28,-6094.78"/>
+<path fill="none" stroke="#7400ff" d="M576.81,-4786.15C616.49,-4800.85 683.07,-4825.51 724.1,-4840.7"/>
+<polygon fill="#7400ff" stroke="#7400ff" points="723.1,-4844.07 733.7,-4844.26 725.53,-4837.5 723.1,-4844.07"/>
 </g>
 <!-- proc~nearest_point~2 -->
 <g id="call~~graph~~CallGraph_node275" class="node">
 <title>proc~nearest_point~2</title>
-<g id="a_call~~graph~~CallGraph_node275"><a xlink:href="../proc/nearest_point~2.html" xlink:title="nurbs_surface%nearest_point">
-<polygon fill="#d9534f" stroke="#d9534f" points="845.5,-1096 676.5,-1096 676.5,-1072 845.5,-1072 845.5,-1096"/>
-<text text-anchor="middle" x="761" y="-1081.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point</text>
+<g id="a_call~~graph~~CallGraph_node275"><a xlink:href="../proc/nearest_point~2.html" xlink:title="nurbs_volume%nearest_point">
+<polygon fill="#d9534f" stroke="#d9534f" points="845.5,-5006 676.5,-5006 676.5,-4982 845.5,-4982 845.5,-5006"/>
+<text text-anchor="middle" x="761" y="-4991.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~2&#45;&gt;proc~nearest_point~2 -->
-<g id="call~~graph~~CallGraph_edge360" class="edge">
+<g id="call~~graph~~CallGraph_edge359" class="edge">
 <title>proc~nearest_point2~2&#45;&gt;proc~nearest_point~2</title>
-<path fill="none" stroke="#7400ff" d="M546.46,-2027.7C557.78,-1970.76 605.33,-1726.94 631,-1525 636.91,-1478.54 636.22,-1140.3 667,-1105 667.64,-1104.26 668.3,-1103.55 668.99,-1102.86"/>
-<polygon fill="#7400ff" stroke="#7400ff" points="671.47,-1105.34 676.94,-1096.26 667,-1099.95 671.47,-1105.34"/>
+<path fill="none" stroke="#7400ff" d="M559.75,-4786.01C579.12,-4801.56 611.79,-4830.43 631,-4862 657.96,-4906.31 628.69,-4938.04 667,-4973 668.3,-4974.19 669.66,-4975.32 671.06,-4976.38"/>
+<polygon fill="#7400ff" stroke="#7400ff" points="669.25,-4979.38 679.55,-4981.86 673.05,-4973.5 669.25,-4979.38"/>
 </g>
 <!-- proc~nearest_point2~3 -->
 <g id="call~~graph~~CallGraph_node271" class="node">
 <title>proc~nearest_point2~3</title>
-<g id="a_call~~graph~~CallGraph_node271"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_curve%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="626,-184 460,-184 460,-160 626,-160 626,-184"/>
-<text text-anchor="middle" x="543" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
+<g id="a_call~~graph~~CallGraph_node271"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_surface%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="631,-2536 455,-2536 455,-2512 631,-2512 631,-2536"/>
+<text text-anchor="middle" x="543" y="-2521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;none~derivative2~3 -->
-<g id="call~~graph~~CallGraph_edge361" class="edge">
+<g id="call~~graph~~CallGraph_edge360" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;none~derivative2~3</title>
-<path fill="none" stroke="#7900ff" d="M551.12,-159.67C567.66,-132.2 611.53,-65.82 667,-33 670.25,-31.07 673.67,-29.33 677.19,-27.74"/>
-<polygon fill="#7900ff" stroke="#7900ff" points="678.75,-30.88 686.71,-23.89 676.13,-24.39 678.75,-30.88"/>
+<path fill="none" stroke="#7900ff" d="M554.93,-2511.81C572.51,-2491.81 607.47,-2450.3 631,-2411 651.03,-2377.55 636.81,-2355.67 667,-2331 669.02,-2329.35 671.14,-2327.82 673.35,-2326.41"/>
+<polygon fill="#7900ff" stroke="#7900ff" points="675.16,-2329.41 682.22,-2321.52 671.78,-2323.28 675.16,-2329.41"/>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;proc~cmp_xg~3 -->
-<g id="call~~graph~~CallGraph_edge362" class="edge">
+<g id="call~~graph~~CallGraph_edge361" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;proc~cmp_xg~3</title>
-<path fill="none" stroke="#7900ff" d="M566.3,-159.82C605.04,-138.65 684.85,-95.05 728.97,-70.95"/>
-<polygon fill="#7900ff" stroke="#7900ff" points="730.72,-73.98 737.82,-66.12 727.37,-67.84 730.72,-73.98"/>
+<path fill="none" stroke="#7900ff" d="M562.4,-2511.86C585.79,-2496.92 627.86,-2471.75 667,-2457 673,-2454.74 679.31,-2452.68 685.7,-2450.82"/>
+<polygon fill="#7900ff" stroke="#7900ff" points="687.06,-2454.07 695.78,-2448.05 685.21,-2447.32 687.06,-2454.07"/>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;proc~create~3 -->
-<g id="call~~graph~~CallGraph_edge363" class="edge">
+<g id="call~~graph~~CallGraph_edge362" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#7900ff" d="M563.75,-184.1C587.49,-198.15 628.88,-221.18 667,-235 674.52,-237.73 682.52,-240.17 690.55,-242.35"/>
-<polygon fill="#7900ff" stroke="#7900ff" points="689.76,-245.76 700.32,-244.86 691.51,-238.98 689.76,-245.76"/>
+<path fill="none" stroke="#7900ff" d="M612.34,-2536.02C635.6,-2540.11 661.69,-2544.71 685.41,-2548.88"/>
+<polygon fill="#7900ff" stroke="#7900ff" points="684.96,-2552.35 695.41,-2550.64 686.17,-2545.46 684.96,-2552.35"/>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;proc~finalize~3 -->
-<g id="call~~graph~~CallGraph_edge364" class="edge">
+<g id="call~~graph~~CallGraph_edge363" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;proc~finalize~3</title>
-<path fill="none" stroke="#7900ff" d="M557.14,-184.3C579.09,-204.61 624.99,-245.98 667,-277 687.49,-292.13 711.84,-307.49 730.48,-318.74"/>
-<polygon fill="#7900ff" stroke="#7900ff" points="728.75,-321.79 739.13,-323.92 732.34,-315.78 728.75,-321.79"/>
+<path fill="none" stroke="#7900ff" d="M565.59,-2536.2C589.66,-2549.36 630.09,-2570.16 667,-2583 673.51,-2585.26 680.37,-2587.35 687.28,-2589.25"/>
+<polygon fill="#7900ff" stroke="#7900ff" points="686.86,-2592.76 697.42,-2591.91 688.64,-2585.99 686.86,-2592.76"/>
+</g>
+<!-- proc~nearest_point2~3&#45;&gt;proc~inv -->
+<g id="call~~graph~~CallGraph_edge364" class="edge">
+<title>proc~nearest_point2~3&#45;&gt;proc~inv</title>
+<path fill="none" stroke="#7900ff" d="M549.42,-2536.08C565.68,-2573.02 613.92,-2688.02 631,-2789 649.59,-2898.9 612.42,-4697.81 667,-4795 679.42,-4817.12 703.95,-4832.16 724.7,-4841.52"/>
+<polygon fill="#7900ff" stroke="#7900ff" points="723.33,-4844.74 733.91,-4845.42 726.07,-4838.29 723.33,-4844.74"/>
 </g>
 <!-- proc~nearest_point~3 -->
 <g id="call~~graph~~CallGraph_node276" class="node">
 <title>proc~nearest_point~3</title>
-<g id="a_call~~graph~~CallGraph_node276"><a xlink:href="../proc/nearest_point~3.html" xlink:title="nurbs_curve%nearest_point">
-<polygon fill="#d9534f" stroke="#d9534f" points="841,-184 681,-184 681,-160 841,-160 841,-184"/>
-<text text-anchor="middle" x="761" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point</text>
+<g id="a_call~~graph~~CallGraph_node276"><a xlink:href="../proc/nearest_point~3.html" xlink:title="nurbs_surface%nearest_point">
+<polygon fill="#d9534f" stroke="#d9534f" points="845.5,-2280 676.5,-2280 676.5,-2256 845.5,-2256 845.5,-2280"/>
+<text text-anchor="middle" x="761" y="-2265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;proc~nearest_point~3 -->
 <g id="call~~graph~~CallGraph_edge365" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;proc~nearest_point~3</title>
-<path fill="none" stroke="#7900ff" d="M626.28,-172C640.81,-172 656,-172 670.71,-172"/>
-<polygon fill="#7900ff" stroke="#7900ff" points="670.8,-175.5 680.8,-172 670.8,-168.5 670.8,-175.5"/>
+<path fill="none" stroke="#7900ff" d="M555.86,-2511.84C574.42,-2492.21 610.31,-2451.59 631,-2411 656.68,-2360.64 625.75,-2327.66 667,-2289 668.29,-2287.79 669.63,-2286.65 671.02,-2285.57"/>
+<polygon fill="#7900ff" stroke="#7900ff" points="673.01,-2288.45 679.44,-2280.02 669.16,-2282.6 673.01,-2288.45"/>
 </g>
 <!-- proc~nearest_point_help_1d -->
 <g id="call~~graph~~CallGraph_node272" class="node">
 <title>proc~nearest_point_help_1d</title>
 <g id="a_call~~graph~~CallGraph_node272"><a xlink:href="../proc/nearest_point_help_1d.html" xlink:title="nearest_point_help_1d">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="174.5,-7236 42.5,-7236 42.5,-7212 174.5,-7212 174.5,-7236"/>
-<text text-anchor="middle" x="108.5" y="-7221.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_1d</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="174.5,-7606 42.5,-7606 42.5,-7582 174.5,-7582 174.5,-7606"/>
+<text text-anchor="middle" x="108.5" y="-7591.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_1d</text>
 </a>
 </g>
 </g>
@@ -6729,8 +6729,8 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node273" class="node">
 <title>proc~nearest_point_help_2d</title>
 <g id="a_call~~graph~~CallGraph_node273"><a xlink:href="../proc/nearest_point_help_2d.html" xlink:title="nearest_point_help_2d">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="174.5,-7278 42.5,-7278 42.5,-7254 174.5,-7254 174.5,-7278"/>
-<text text-anchor="middle" x="108.5" y="-7263.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_2d</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="174.5,-7648 42.5,-7648 42.5,-7624 174.5,-7624 174.5,-7648"/>
+<text text-anchor="middle" x="108.5" y="-7633.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_2d</text>
 </a>
 </g>
 </g>
@@ -6738,197 +6738,197 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node274" class="node">
 <title>proc~nearest_point_help_3d</title>
 <g id="a_call~~graph~~CallGraph_node274"><a xlink:href="../proc/nearest_point_help_3d.html" xlink:title="nearest_point_help_3d">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="174.5,-7320 42.5,-7320 42.5,-7296 174.5,-7296 174.5,-7320"/>
-<text text-anchor="middle" x="108.5" y="-7305.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_3d</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="174.5,-7690 42.5,-7690 42.5,-7666 174.5,-7666 174.5,-7690"/>
+<text text-anchor="middle" x="108.5" y="-7675.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_3d</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point~2&#45;&gt;interface~nearest_point_help_2d -->
+<!-- proc~nearest_point~2&#45;&gt;interface~nearest_point_help_3d -->
 <g id="call~~graph~~CallGraph_edge366" class="edge">
-<title>proc~nearest_point~2&#45;&gt;interface~nearest_point_help_2d</title>
-<path fill="none" stroke="#8a00ff" d="M845.74,-1095.41C868.27,-1098.48 892.48,-1101.78 914.49,-1104.78"/>
-<polygon fill="#8a00ff" stroke="#8a00ff" points="914.06,-1108.25 924.44,-1106.13 915,-1101.32 914.06,-1108.25"/>
+<title>proc~nearest_point~2&#45;&gt;interface~nearest_point_help_3d</title>
+<path fill="none" stroke="#8a00ff" d="M845.74,-5002.83C868.27,-5005.21 892.48,-5007.76 914.49,-5010.09"/>
+<polygon fill="#8a00ff" stroke="#8a00ff" points="914.13,-5013.57 924.44,-5011.14 914.86,-5006.61 914.13,-5013.57"/>
 </g>
-<!-- proc~nearest_point~3&#45;&gt;interface~nearest_point_help_1d -->
+<!-- proc~nearest_point~3&#45;&gt;interface~nearest_point_help_2d -->
 <g id="call~~graph~~CallGraph_edge367" class="edge">
-<title>proc~nearest_point~3&#45;&gt;interface~nearest_point_help_1d</title>
-<path fill="none" stroke="#8e00ff" d="M841.25,-172C864.93,-172 890.82,-172 914.23,-172"/>
-<polygon fill="#8e00ff" stroke="#8e00ff" points="914.45,-175.5 924.45,-172 914.45,-168.5 914.45,-175.5"/>
+<title>proc~nearest_point~3&#45;&gt;interface~nearest_point_help_2d</title>
+<path fill="none" stroke="#8e00ff" d="M845.74,-2272.42C868.16,-2273.6 892.26,-2274.87 914.2,-2276.03"/>
+<polygon fill="#8e00ff" stroke="#8e00ff" points="914.27,-2279.54 924.44,-2276.57 914.64,-2272.55 914.27,-2279.54"/>
 </g>
 <!-- proc~put_to_nurbs -->
 <g id="call~~graph~~CallGraph_node277" class="node">
 <title>proc~put_to_nurbs</title>
 <g id="a_call~~graph~~CallGraph_node277"><a xlink:href="../proc/put_to_nurbs.html" xlink:title="nurbs_volume%put_to_nurbs">
-<polygon fill="#d9534f" stroke="#d9534f" points="1073.5,-3958 907.5,-3958 907.5,-3934 1073.5,-3934 1073.5,-3958"/>
-<text text-anchor="middle" x="990.5" y="-3943.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%put_to_nurbs</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1073.5,-3726 907.5,-3726 907.5,-3702 1073.5,-3702 1073.5,-3726"/>
+<text text-anchor="middle" x="990.5" y="-3711.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%put_to_nurbs</text>
 </a>
 </g>
 </g>
 <!-- proc~put_to_nurbs&#45;&gt;proc~basis_bspline -->
 <g id="call~~graph~~CallGraph_edge368" class="edge">
 <title>proc~put_to_nurbs&#45;&gt;proc~basis_bspline</title>
-<path fill="none" stroke="#9200ff" d="M1073.55,-3956.67C1079.47,-3959.44 1085.05,-3962.84 1090,-3967 1137.58,-4006.98 1192.92,-4194.71 1210.97,-4259.75"/>
-<polygon fill="#9200ff" stroke="#9200ff" points="1207.7,-4261.04 1213.72,-4269.75 1214.45,-4259.18 1207.7,-4261.04"/>
+<path fill="none" stroke="#9200ff" d="M1073.56,-3706.13C1079.79,-3702.81 1085.43,-3698.52 1090,-3693 1146.78,-3624.43 1115.05,-2179.35 1126,-2091 1144.11,-1944.97 1192.48,-1774.07 1210.29,-1714.12"/>
+<polygon fill="#9200ff" stroke="#9200ff" points="1213.73,-1714.83 1213.25,-1704.25 1207.03,-1712.82 1213.73,-1714.83"/>
 </g>
 <!-- proc~put_to_nurbs&#45;&gt;proc~kron -->
 <g id="call~~graph~~CallGraph_edge369" class="edge">
 <title>proc~put_to_nurbs&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#9200ff" d="M1073.53,-3954.53C1079.69,-3957.72 1085.32,-3961.81 1090,-3967 1140.29,-4022.77 1115.58,-4228.63 1126,-4303 1153.41,-4498.66 1198.42,-4733.26 1212.59,-4805.64"/>
-<polygon fill="#9200ff" stroke="#9200ff" points="1209.23,-4806.7 1214.59,-4815.84 1216.1,-4805.35 1209.23,-4806.7"/>
+<path fill="none" stroke="#9200ff" d="M1073.58,-3706.15C1079.82,-3702.83 1085.44,-3698.53 1090,-3693 1125.73,-3649.65 1119.8,-1726.83 1126,-1671 1144.12,-1507.94 1193.68,-1315.87 1210.96,-1251.92"/>
+<polygon fill="#9200ff" stroke="#9200ff" points="1214.38,-1252.71 1213.62,-1242.14 1207.62,-1250.87 1214.38,-1252.71"/>
 </g>
-<!-- proc~set_elem_xg_vis -->
-<g id="call~~graph~~CallGraph_node311" class="node">
-<title>proc~set_elem_xg_vis</title>
-<g id="a_call~~graph~~CallGraph_node311"><a xlink:href="../proc/set_elem_xg_vis.html" xlink:title="nurbs_volume%set_elem_Xg_vis">
-<polygon fill="#d9534f" stroke="#d9534f" points="1310,-3958 1126,-3958 1126,-3934 1310,-3934 1310,-3958"/>
-<text text-anchor="middle" x="1218" y="-3943.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_elem_Xg_vis</text>
+<!-- proc~set_elem_xg_vis~2 -->
+<g id="call~~graph~~CallGraph_node312" class="node">
+<title>proc~set_elem_xg_vis~2</title>
+<g id="a_call~~graph~~CallGraph_node312"><a xlink:href="../proc/set_elem_xg_vis~2.html" xlink:title="nurbs_volume%set_elem_Xg_vis">
+<polygon fill="#d9534f" stroke="#d9534f" points="1310,-3726 1126,-3726 1126,-3702 1310,-3702 1310,-3726"/>
+<text text-anchor="middle" x="1218" y="-3711.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~put_to_nurbs&#45;&gt;proc~set_elem_xg_vis -->
+<!-- proc~put_to_nurbs&#45;&gt;proc~set_elem_xg_vis~2 -->
 <g id="call~~graph~~CallGraph_edge370" class="edge">
-<title>proc~put_to_nurbs&#45;&gt;proc~set_elem_xg_vis</title>
-<path fill="none" stroke="#9200ff" d="M1073.55,-3946C1087.23,-3946 1101.56,-3946 1115.65,-3946"/>
-<polygon fill="#9200ff" stroke="#9200ff" points="1115.86,-3949.5 1125.86,-3946 1115.86,-3942.5 1115.86,-3949.5"/>
+<title>proc~put_to_nurbs&#45;&gt;proc~set_elem_xg_vis~2</title>
+<path fill="none" stroke="#9200ff" d="M1073.55,-3714C1087.23,-3714 1101.56,-3714 1115.65,-3714"/>
+<polygon fill="#9200ff" stroke="#9200ff" points="1115.86,-3717.5 1125.86,-3714 1115.86,-3710.5 1115.86,-3717.5"/>
 </g>
 <!-- proc~remove_knots -->
 <g id="call~~graph~~CallGraph_node278" class="node">
 <title>proc~remove_knots</title>
-<g id="a_call~~graph~~CallGraph_node278"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="847,-3008 675,-3008 675,-2984 847,-2984 847,-3008"/>
-<text text-anchor="middle" x="761" y="-2993.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
+<g id="a_call~~graph~~CallGraph_node278"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_curve%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="842,-5696 680,-5696 680,-5672 842,-5672 842,-5696"/>
+<text text-anchor="middle" x="761" y="-5681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots&#45;&gt;interface~compute_multiplicity -->
 <g id="call~~graph~~CallGraph_edge371" class="edge">
 <title>proc~remove_knots&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#9600ff" d="M841.2,-2983.91C846.14,-2981.44 850.8,-2978.49 855,-2975 886.22,-2949.02 859.3,-2916.4 891,-2891 1006.04,-2798.84 1069.6,-2830 1217,-2830 1217,-2830 1217,-2830 1428.5,-2830 1494.08,-2830 1668.92,-2848.1 1723,-2811 1787.72,-2766.6 1810.16,-2667.6 1817.15,-2623.24"/>
-<polygon fill="#9600ff" stroke="#9600ff" points="1820.63,-2623.61 1818.61,-2613.21 1813.71,-2622.6 1820.63,-2623.61"/>
-</g>
-<!-- proc~remove_knots&#45;&gt;none~get_knot -->
-<g id="call~~graph~~CallGraph_edge372" class="edge">
-<title>proc~remove_knots&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#9600ff" d="M826.48,-3008.08C836.53,-3011.6 846.41,-3016.15 855,-3022 870.98,-3032.89 943.9,-3135.15 975.18,-3179.57"/>
-<polygon fill="#9600ff" stroke="#9600ff" points="972.41,-3181.71 981.02,-3187.87 978.14,-3177.68 972.41,-3181.71"/>
+<path fill="none" stroke="#9600ff" d="M842.28,-5684.19C1062.18,-5683.9 1661.96,-5677.33 1723,-5615 1792.57,-5543.95 1816.84,-3934.43 1819.71,-3725.32"/>
+<polygon fill="#9600ff" stroke="#9600ff" points="1823.21,-3725.26 1819.84,-3715.22 1816.21,-3725.17 1823.21,-3725.26"/>
 </g>
 <!-- proc~remove_knots&#45;&gt;none~set -->
-<g id="call~~graph~~CallGraph_edge373" class="edge">
+<g id="call~~graph~~CallGraph_edge372" class="edge">
 <title>proc~remove_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#9600ff" d="M837.61,-3008.01C844.22,-3011.6 850.2,-3016.18 855,-3022 918.38,-3098.9 839.05,-3383.96 891,-3469 903.4,-3489.3 925.37,-3503.86 945.41,-3513.66"/>
-<polygon fill="#9600ff" stroke="#9600ff" points="944.2,-3516.95 954.75,-3517.96 947.13,-3510.59 944.2,-3516.95"/>
+<path fill="none" stroke="#9600ff" d="M842.41,-5694.83C847.06,-5697.6 851.33,-5700.95 855,-5705 941.65,-5800.56 820.55,-5884.94 891,-5993 903.59,-6012.32 924.92,-6026.22 944.51,-6035.66"/>
+<polygon fill="#9600ff" stroke="#9600ff" points="943.1,-6038.87 953.65,-6039.82 945.99,-6032.49 943.1,-6038.87"/>
 </g>
 <!-- proc~remove_knots&#45;&gt;proc~findspan -->
-<g id="call~~graph~~CallGraph_edge374" class="edge">
+<g id="call~~graph~~CallGraph_edge373" class="edge">
 <title>proc~remove_knots&#45;&gt;proc~findspan</title>
-<path fill="none" stroke="#9600ff" d="M845.21,-2983.87C848.82,-2981.36 852.13,-2978.42 855,-2975 960.89,-2848.94 784.35,-2360.43 891,-2235 905.44,-2218.02 929.92,-2212.74 950.86,-2211.72"/>
-<polygon fill="#9600ff" stroke="#9600ff" points="951.17,-2215.22 961.11,-2211.54 951.04,-2208.22 951.17,-2215.22"/>
+<path fill="none" stroke="#9600ff" d="M842.09,-5674.12C846.95,-5671.15 851.34,-5667.49 855,-5663 928.5,-5572.66 832.71,-3667.83 891,-3567 904.21,-3544.15 930.1,-3529.15 952.03,-3520"/>
+<polygon fill="#9600ff" stroke="#9600ff" points="953.41,-3523.22 961.45,-3516.31 950.86,-3516.7 953.41,-3523.22"/>
+</g>
+<!-- proc~remove_knots&#45;&gt;proc~is_rational -->
+<g id="call~~graph~~CallGraph_edge374" class="edge">
+<title>proc~remove_knots&#45;&gt;proc~is_rational</title>
+<path fill="none" stroke="#9600ff" d="M842.15,-5695.76C846.8,-5698.32 851.14,-5701.37 855,-5705 896.79,-5744.33 848.56,-5790.37 891,-5829 957.59,-5889.61 1027.76,-5801.93 1090,-5867 1128.49,-5907.24 1112.9,-6060.87 1126,-6115 1148.45,-6207.77 1189.95,-6314.01 1208.1,-6358.57"/>
+<polygon fill="#9600ff" stroke="#9600ff" points="1204.87,-6359.9 1211.9,-6367.83 1211.34,-6357.25 1204.87,-6359.9"/>
 </g>
 <!-- proc~remove_knots_a_5_8 -->
 <g id="call~~graph~~CallGraph_node279" class="node">
 <title>proc~remove_knots_a_5_8</title>
 <g id="a_call~~graph~~CallGraph_node279"><a xlink:href="../proc/remove_knots_a_5_8.html" xlink:title="remove_knots_A_5_8">
-<polygon fill="#d9534f" stroke="#d9534f" points="1052.5,-2142 928.5,-2142 928.5,-2118 1052.5,-2118 1052.5,-2142"/>
-<text text-anchor="middle" x="990.5" y="-2127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">remove_knots_A_5_8</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1052.5,-3600 928.5,-3600 928.5,-3576 1052.5,-3576 1052.5,-3600"/>
+<text text-anchor="middle" x="990.5" y="-3585.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">remove_knots_A_5_8</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots&#45;&gt;proc~remove_knots_a_5_8 -->
 <g id="call~~graph~~CallGraph_edge375" class="edge">
 <title>proc~remove_knots&#45;&gt;proc~remove_knots_a_5_8</title>
-<path fill="none" stroke="#9600ff" d="M845.23,-2983.88C848.84,-2981.37 852.13,-2978.43 855,-2975 913.77,-2904.68 831.81,-2220.96 891,-2151 898.22,-2142.47 907.98,-2136.89 918.55,-2133.31"/>
-<polygon fill="#9600ff" stroke="#9600ff" points="919.74,-2136.62 928.45,-2130.57 917.88,-2129.87 919.74,-2136.62"/>
+<path fill="none" stroke="#9600ff" d="M842.08,-5674.12C846.95,-5671.15 851.34,-5667.49 855,-5663 927.04,-5574.48 818.43,-3697.08 891,-3609 898.11,-3600.37 907.81,-3594.74 918.36,-3591.16"/>
+<polygon fill="#9600ff" stroke="#9600ff" points="919.55,-3594.46 928.25,-3588.41 917.67,-3587.71 919.55,-3594.46"/>
 </g>
 <!-- proc~remove_knots~2 -->
 <g id="call~~graph~~CallGraph_node280" class="node">
 <title>proc~remove_knots~2</title>
-<g id="a_call~~graph~~CallGraph_node280"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="847,-2176 675,-2176 675,-2152 847,-2152 847,-2176"/>
-<text text-anchor="middle" x="761" y="-2161.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
+<g id="a_call~~graph~~CallGraph_node280"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="847,-3520 675,-3520 675,-3496 847,-3496 847,-3520"/>
+<text text-anchor="middle" x="761" y="-3505.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;interface~compute_multiplicity -->
 <g id="call~~graph~~CallGraph_edge376" class="edge">
 <title>proc~remove_knots~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#9f00ff" d="M843.05,-2176.21C847.36,-2178.68 851.4,-2181.58 855,-2185 897.86,-2225.68 845.07,-2275.82 891,-2313 947.43,-2358.67 1144.41,-2334 1217,-2334 1217,-2334 1217,-2334 1428.5,-2334 1559.66,-2334 1617.11,-2275.6 1723,-2353 1797.78,-2407.66 1814.92,-2528.66 1818.84,-2578.68"/>
-<polygon fill="#9f00ff" stroke="#9f00ff" points="1815.36,-2579.02 1819.52,-2588.76 1822.34,-2578.54 1815.36,-2579.02"/>
+<path fill="none" stroke="#9f00ff" d="M827.78,-3520.05C848,-3523.39 870.36,-3526.73 891,-3529 1035.26,-3544.9 1071.87,-3548 1217,-3548 1217,-3548 1217,-3548 1428.5,-3548 1575.91,-3548 1734,-3644.17 1794.49,-3685.01"/>
+<polygon fill="#9f00ff" stroke="#9f00ff" points="1792.78,-3688.08 1803.01,-3690.84 1796.73,-3682.3 1792.78,-3688.08"/>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;none~get_knot~2 -->
 <g id="call~~graph~~CallGraph_edge377" class="edge">
 <title>proc~remove_knots~2&#45;&gt;none~get_knot~2</title>
-<path fill="none" stroke="#9f00ff" d="M843.84,-2151.91C847.9,-2149.4 851.67,-2146.46 855,-2143 915.8,-2079.81 840.96,-2021.01 891,-1949 904.36,-1929.78 926.18,-1915.78 945.89,-1906.26"/>
-<polygon fill="#9f00ff" stroke="#9f00ff" points="947.42,-1909.41 955.06,-1902.06 944.51,-1903.04 947.42,-1909.41"/>
+<path fill="none" stroke="#9f00ff" d="M843.88,-3520.05C847.94,-3522.57 851.69,-3525.52 855,-3529 919.09,-3596.31 835.11,-3660.74 891,-3735 901.85,-3749.42 918.19,-3759.75 934.46,-3767.03"/>
+<polygon fill="#9f00ff" stroke="#9f00ff" points="933.41,-3770.38 943.99,-3770.98 936.09,-3763.92 933.41,-3770.38"/>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;none~set~2 -->
 <g id="call~~graph~~CallGraph_edge378" class="edge">
 <title>proc~remove_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#9f00ff" d="M844.43,-2176.2C848.29,-2178.68 851.86,-2181.59 855,-2185 931.73,-2268.14 828.38,-2342.77 891,-2437 903.86,-2456.35 925.42,-2470.31 945.1,-2479.78"/>
-<polygon fill="#9f00ff" stroke="#9f00ff" points="943.72,-2482.99 954.27,-2483.94 946.61,-2476.62 943.72,-2482.99"/>
+<path fill="none" stroke="#9f00ff" d="M845.2,-3520.14C848.82,-3522.65 852.12,-3525.58 855,-3529 905.45,-3588.91 859.99,-4161.08 891,-4233 906.36,-4268.61 939.84,-4299.23 963.49,-4317.62"/>
+<polygon fill="#9f00ff" stroke="#9f00ff" points="961.62,-4320.59 971.71,-4323.83 965.84,-4315.01 961.62,-4320.59"/>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;proc~findspan -->
 <g id="call~~graph~~CallGraph_edge379" class="edge">
 <title>proc~remove_knots~2&#45;&gt;proc~findspan</title>
-<path fill="none" stroke="#9f00ff" d="M815.4,-2176.07C844.15,-2182.55 876.59,-2189.84 891,-2193 910.94,-2197.37 933.18,-2202.12 951.47,-2205.99"/>
-<polygon fill="#9f00ff" stroke="#9f00ff" points="950.95,-2209.46 961.46,-2208.11 952.4,-2202.61 950.95,-2209.46"/>
-</g>
-<!-- proc~remove_knots~2&#45;&gt;proc~is_rational~2 -->
-<g id="call~~graph~~CallGraph_edge380" class="edge">
-<title>proc~remove_knots~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#9f00ff" d="M841.78,-2176.17C846.52,-2178.63 850.98,-2181.55 855,-2185 888.3,-2213.62 855.39,-2251.31 891,-2277 970.07,-2334.04 1090.1,-2322.1 1160.32,-2308.12"/>
-<polygon fill="#9f00ff" stroke="#9f00ff" points="1161.22,-2311.51 1170.31,-2306.05 1159.81,-2304.65 1161.22,-2311.51"/>
+<path fill="none" stroke="#9f00ff" d="M847.04,-3508C882.85,-3508 922.72,-3508 951.16,-3508"/>
+<polygon fill="#9f00ff" stroke="#9f00ff" points="951.46,-3511.5 961.46,-3508 951.46,-3504.5 951.46,-3511.5"/>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;proc~remove_knots_a_5_8 -->
-<g id="call~~graph~~CallGraph_edge381" class="edge">
+<g id="call~~graph~~CallGraph_edge380" class="edge">
 <title>proc~remove_knots~2&#45;&gt;proc~remove_knots_a_5_8</title>
-<path fill="none" stroke="#9f00ff" d="M842.53,-2151.97C867.25,-2148.27 894.26,-2144.23 918.3,-2140.64"/>
-<polygon fill="#9f00ff" stroke="#9f00ff" points="919.04,-2144.07 928.41,-2139.13 918.01,-2137.15 919.04,-2144.07"/>
+<path fill="none" stroke="#9f00ff" d="M833.45,-3520.08C840.93,-3522.53 848.25,-3525.47 855,-3529 874.23,-3539.06 871.95,-3551.59 891,-3562 899.61,-3566.71 909.12,-3570.59 918.73,-3573.8"/>
+<polygon fill="#9f00ff" stroke="#9f00ff" points="917.76,-3577.16 928.35,-3576.78 919.83,-3570.47 917.76,-3577.16"/>
 </g>
 <!-- proc~remove_knots~3 -->
 <g id="call~~graph~~CallGraph_node281" class="node">
 <title>proc~remove_knots~3</title>
-<g id="a_call~~graph~~CallGraph_node281"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_curve%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="842,-890 680,-890 680,-866 842,-866 842,-890"/>
-<text text-anchor="middle" x="761" y="-875.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
+<g id="a_call~~graph~~CallGraph_node281"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="847,-2780 675,-2780 675,-2756 847,-2756 847,-2780"/>
+<text text-anchor="middle" x="761" y="-2765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;interface~compute_multiplicity -->
-<g id="call~~graph~~CallGraph_edge382" class="edge">
+<g id="call~~graph~~CallGraph_edge381" class="edge">
 <title>proc~remove_knots~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#a300ff" d="M842.01,-887.32C932.78,-897.08 1085.33,-911 1217,-911 1217,-911 1217,-911 1428.5,-911 1573.43,-911 1641.8,-930.96 1723,-1051 1812.48,-1183.27 1819.42,-2398.27 1819.96,-2578.66"/>
-<polygon fill="#a300ff" stroke="#a300ff" points="1816.46,-2578.82 1819.98,-2588.81 1823.46,-2578.8 1816.46,-2578.82"/>
+<path fill="none" stroke="#a300ff" d="M827.31,-2780.07C836.74,-2782.59 846.22,-2785.54 855,-2789 872.24,-2795.79 874.23,-2802.13 891,-2810 1069.14,-2893.57 1597.41,-2961.53 1723,-3113 1796.93,-3202.17 1815.68,-3584.23 1819.27,-3680.77"/>
+<polygon fill="#a300ff" stroke="#a300ff" points="1815.78,-3680.99 1819.63,-3690.86 1822.77,-3680.74 1815.78,-3680.99"/>
+</g>
+<!-- proc~remove_knots~3&#45;&gt;none~get_knot~3 -->
+<g id="call~~graph~~CallGraph_edge382" class="edge">
+<title>proc~remove_knots~3&#45;&gt;none~get_knot~3</title>
+<path fill="none" stroke="#a300ff" d="M847.04,-2768C867.13,-2768 888.51,-2768 908.43,-2768"/>
+<polygon fill="#a300ff" stroke="#a300ff" points="908.69,-2771.5 918.69,-2768 908.69,-2764.5 908.69,-2771.5"/>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;none~set~3 -->
 <g id="call~~graph~~CallGraph_edge383" class="edge">
 <title>proc~remove_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#a300ff" d="M807.76,-865.93C844.09,-856.35 895.03,-842.91 933.74,-832.7"/>
-<polygon fill="#a300ff" stroke="#a300ff" points="935.03,-835.98 943.81,-830.05 933.25,-829.22 935.03,-835.98"/>
+<path fill="none" stroke="#a300ff" d="M843.75,-2780.18C847.84,-2782.66 851.63,-2785.58 855,-2789 910.06,-2845 846.66,-2897.18 891,-2962 905.38,-2983.02 929.17,-2998.76 949.76,-3009.37"/>
+<polygon fill="#a300ff" stroke="#a300ff" points="948.44,-3012.62 958.96,-3013.89 951.52,-3006.34 948.44,-3012.62"/>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;proc~findspan -->
 <g id="call~~graph~~CallGraph_edge384" class="edge">
 <title>proc~remove_knots~3&#45;&gt;proc~findspan</title>
-<path fill="none" stroke="#a300ff" d="M842.03,-887.93C846.91,-890.88 851.32,-894.53 855,-899 946.36,-1010.09 798.97,-2082.46 891,-2193 905.42,-2210.32 930.29,-2215.52 951.44,-2216.42"/>
-<polygon fill="#a300ff" stroke="#a300ff" points="951.41,-2219.92 961.45,-2216.55 951.5,-2212.92 951.41,-2219.92"/>
+<path fill="none" stroke="#a300ff" d="M845.2,-2780.14C848.81,-2782.65 852.12,-2785.58 855,-2789 955.07,-2907.78 790.21,-3368.82 891,-3487 905.46,-3503.96 929.94,-3509.23 950.88,-3510.26"/>
+<polygon fill="#a300ff" stroke="#a300ff" points="951.06,-3513.76 961.12,-3510.45 951.19,-3506.76 951.06,-3513.76"/>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;proc~is_rational~3 -->
 <g id="call~~graph~~CallGraph_edge385" class="edge">
 <title>proc~remove_knots~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#a300ff" d="M794.39,-865.87C815.15,-856.35 840.78,-841 855,-819 916.4,-723.98 807.72,-643.58 891,-567 925.54,-535.24 1051.7,-536.61 1136.56,-541.54"/>
-<polygon fill="#a300ff" stroke="#a300ff" points="1136.5,-545.04 1146.7,-542.16 1136.93,-538.06 1136.5,-545.04"/>
+<path fill="none" stroke="#a300ff" d="M820.91,-2780.06C903.19,-2795.52 1047.25,-2817.19 1090,-2789 1123.91,-2766.64 1106.68,-2740.73 1126,-2705 1149.32,-2661.86 1182.31,-2614.94 1201.5,-2588.73"/>
+<polygon fill="#a300ff" stroke="#a300ff" points="1204.55,-2590.49 1207.67,-2580.36 1198.92,-2586.33 1204.55,-2590.49"/>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;proc~remove_knots_a_5_8 -->
 <g id="call~~graph~~CallGraph_edge386" class="edge">
 <title>proc~remove_knots~3&#45;&gt;proc~remove_knots_a_5_8</title>
-<path fill="none" stroke="#a300ff" d="M842.01,-887.94C846.89,-890.89 851.31,-894.53 855,-899 935.27,-996.21 840.47,-1917.51 891,-2033 905.74,-2066.68 938.11,-2094.79 961.73,-2111.93"/>
-<polygon fill="#a300ff" stroke="#a300ff" points="959.8,-2114.85 969.99,-2117.74 963.82,-2109.12 959.8,-2114.85"/>
+<path fill="none" stroke="#a300ff" d="M845.21,-2780.13C848.82,-2782.64 852.13,-2785.58 855,-2789 907.95,-2852.03 848.69,-3458.39 891,-3529 902.76,-3548.63 923.79,-3562.52 943.4,-3571.87"/>
+<polygon fill="#a300ff" stroke="#a300ff" points="942.01,-3575.09 952.57,-3575.98 944.88,-3568.7 942.01,-3575.09"/>
 </g>
 <!-- proc~rotate_xc -->
 <g id="call~~graph~~CallGraph_node283" class="node">
 <title>proc~rotate_xc</title>
-<g id="a_call~~graph~~CallGraph_node283"><a xlink:href="../proc/rotate_xc.html" xlink:title="nurbs_volume%rotate_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="835,-2798 687,-2798 687,-2774 835,-2774 835,-2798"/>
-<text text-anchor="middle" x="761" y="-2783.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%rotate_Xc</text>
+<g id="a_call~~graph~~CallGraph_node283"><a xlink:href="../proc/rotate_xc.html" xlink:title="nurbs_curve%rotate_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="830,-5048 692,-5048 692,-5024 830,-5024 830,-5048"/>
+<text text-anchor="middle" x="761" y="-5033.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%rotate_Xc</text>
 </a>
 </g>
 </g>
@@ -6936,329 +6936,329 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node289" class="node">
 <title>proc~rotation</title>
 <g id="a_call~~graph~~CallGraph_node289"><a xlink:href="../proc/rotation.html" xlink:title="rotation">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1017.5,-1696 963.5,-1696 963.5,-1672 1017.5,-1672 1017.5,-1696"/>
-<text text-anchor="middle" x="990.5" y="-1681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rotation</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1017.5,-3314 963.5,-3314 963.5,-3290 1017.5,-3290 1017.5,-3314"/>
+<text text-anchor="middle" x="990.5" y="-3299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rotation</text>
 </a>
 </g>
 </g>
 <!-- proc~rotate_xc&#45;&gt;proc~rotation -->
 <g id="call~~graph~~CallGraph_edge387" class="edge">
 <title>proc~rotate_xc&#45;&gt;proc~rotation</title>
-<path fill="none" stroke="#ab00ff" d="M835.04,-2779.68C842.69,-2776.25 849.62,-2771.5 855,-2765 930.13,-2674.21 815.32,-1795.33 891,-1705 905.86,-1687.26 931.68,-1682.25 953.16,-1681.55"/>
-<polygon fill="#ab00ff" stroke="#ab00ff" points="953.3,-1685.05 963.28,-1681.51 953.27,-1678.05 953.3,-1685.05"/>
+<path fill="none" stroke="#ab00ff" d="M830.09,-5031.79C839.7,-5028.27 848.51,-5022.95 855,-5015 913.17,-4943.84 844.82,-3440.47 891,-3361 904.61,-3337.58 931.53,-3322.4 953.79,-3313.31"/>
+<polygon fill="#ab00ff" stroke="#ab00ff" points="955.22,-3316.51 963.3,-3309.67 952.71,-3309.97 955.22,-3316.51"/>
 </g>
 <!-- proc~rotate_xc~2 -->
 <g id="call~~graph~~CallGraph_node284" class="node">
 <title>proc~rotate_xc~2</title>
-<g id="a_call~~graph~~CallGraph_node284"><a xlink:href="../proc/rotate_xc~2.html" xlink:title="nurbs_surface%rotate_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="835,-1726 687,-1726 687,-1702 835,-1702 835,-1726"/>
-<text text-anchor="middle" x="761" y="-1711.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%rotate_Xc</text>
+<g id="a_call~~graph~~CallGraph_node284"><a xlink:href="../proc/rotate_xc~2.html" xlink:title="nurbs_volume%rotate_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="835,-3436 687,-3436 687,-3412 835,-3412 835,-3436"/>
+<text text-anchor="middle" x="761" y="-3421.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%rotate_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~rotate_xc~2&#45;&gt;proc~rotation -->
 <g id="call~~graph~~CallGraph_edge388" class="edge">
 <title>proc~rotate_xc~2&#45;&gt;proc~rotation</title>
-<path fill="none" stroke="#b000ff" d="M835.23,-1704.34C874.68,-1699.14 921.6,-1692.95 953.26,-1688.78"/>
-<polygon fill="#b000ff" stroke="#b000ff" points="953.92,-1692.22 963.37,-1687.45 953,-1685.28 953.92,-1692.22"/>
+<path fill="none" stroke="#b000ff" d="M835.05,-3414.37C842.23,-3411.46 849.04,-3407.74 855,-3403 883.92,-3379.96 862.5,-3351.55 891,-3328 908.41,-3313.61 932.97,-3307.1 953.21,-3304.2"/>
+<polygon fill="#b000ff" stroke="#b000ff" points="953.83,-3307.65 963.34,-3302.99 953,-3300.7 953.83,-3307.65"/>
 </g>
 <!-- proc~rotate_xc~3 -->
 <g id="call~~graph~~CallGraph_node285" class="node">
 <title>proc~rotate_xc~3</title>
-<g id="a_call~~graph~~CallGraph_node285"><a xlink:href="../proc/rotate_xc~3.html" xlink:title="nurbs_curve%rotate_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="830,-974 692,-974 692,-950 830,-950 830,-974"/>
-<text text-anchor="middle" x="761" y="-959.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%rotate_Xc</text>
+<g id="a_call~~graph~~CallGraph_node285"><a xlink:href="../proc/rotate_xc~3.html" xlink:title="nurbs_surface%rotate_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="835,-2532 687,-2532 687,-2508 835,-2508 835,-2532"/>
+<text text-anchor="middle" x="761" y="-2517.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%rotate_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~rotate_xc~3&#45;&gt;proc~rotation -->
 <g id="call~~graph~~CallGraph_edge389" class="edge">
 <title>proc~rotate_xc~3&#45;&gt;proc~rotation</title>
-<path fill="none" stroke="#b400ff" d="M830.25,-966.63C839.72,-970.12 848.44,-975.33 855,-983 894.23,-1028.87 872.56,-1467.53 891,-1525 908.62,-1579.92 949.21,-1635.17 972.41,-1663.86"/>
-<polygon fill="#b400ff" stroke="#b400ff" points="969.95,-1666.38 979.01,-1671.88 975.36,-1661.93 969.95,-1666.38"/>
+<path fill="none" stroke="#b400ff" d="M835.26,-2526.72C842.77,-2530.1 849.61,-2534.72 855,-2541 891.73,-2583.75 878.71,-2991.99 891,-3047 911.17,-3137.26 957.71,-3237.87 978.78,-3280.77"/>
+<polygon fill="#b400ff" stroke="#b400ff" points="975.75,-3282.54 983.34,-3289.94 982.03,-3279.42 975.75,-3282.54"/>
 </g>
 <!-- proc~rotate_xg -->
 <g id="call~~graph~~CallGraph_node286" class="node">
 <title>proc~rotate_xg</title>
-<g id="a_call~~graph~~CallGraph_node286"><a xlink:href="../proc/rotate_xg.html" xlink:title="nurbs_volume%rotate_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="835,-2756 687,-2756 687,-2732 835,-2732 835,-2756"/>
-<text text-anchor="middle" x="761" y="-2741.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%rotate_Xg</text>
+<g id="a_call~~graph~~CallGraph_node286"><a xlink:href="../proc/rotate_xg.html" xlink:title="nurbs_curve%rotate_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="830.5,-5128 691.5,-5128 691.5,-5104 830.5,-5104 830.5,-5128"/>
+<text text-anchor="middle" x="761" y="-5113.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%rotate_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~rotate_xg&#45;&gt;proc~rotation -->
 <g id="call~~graph~~CallGraph_edge390" class="edge">
 <title>proc~rotate_xg&#45;&gt;proc~rotation</title>
-<path fill="none" stroke="#b800ff" d="M835.04,-2737.67C842.68,-2734.24 849.61,-2729.5 855,-2723 927.22,-2635.86 818.26,-1791.71 891,-1705 905.87,-1687.27 931.69,-1682.26 953.17,-1681.56"/>
-<polygon fill="#b800ff" stroke="#b800ff" points="953.3,-1685.06 963.29,-1681.52 953.28,-1678.06 953.3,-1685.06"/>
+<path fill="none" stroke="#b800ff" d="M796.19,-5103.99C817.15,-5094.66 842.32,-5079.49 855,-5057 947.56,-4892.81 796.34,-3523.99 891,-3361 904.6,-3337.58 931.52,-3322.4 953.78,-3313.31"/>
+<polygon fill="#b800ff" stroke="#b800ff" points="955.21,-3316.51 963.3,-3309.67 952.71,-3309.97 955.21,-3316.51"/>
 </g>
 <!-- proc~rotate_xg~2 -->
 <g id="call~~graph~~CallGraph_node287" class="node">
 <title>proc~rotate_xg~2</title>
-<g id="a_call~~graph~~CallGraph_node287"><a xlink:href="../proc/rotate_xg~2.html" xlink:title="nurbs_surface%rotate_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="835,-1768 687,-1768 687,-1744 835,-1744 835,-1768"/>
-<text text-anchor="middle" x="761" y="-1753.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%rotate_Xg</text>
+<g id="a_call~~graph~~CallGraph_node287"><a xlink:href="../proc/rotate_xg~2.html" xlink:title="nurbs_volume%rotate_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="835,-3394 687,-3394 687,-3370 835,-3370 835,-3394"/>
+<text text-anchor="middle" x="761" y="-3379.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%rotate_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~rotate_xg~2&#45;&gt;proc~rotation -->
 <g id="call~~graph~~CallGraph_edge391" class="edge">
 <title>proc~rotate_xg~2&#45;&gt;proc~rotation</title>
-<path fill="none" stroke="#bc00ff" d="M832.31,-1743.9C840.15,-1741.45 847.88,-1738.52 855,-1735 873.68,-1725.78 872.27,-1714.1 891,-1705 910.37,-1695.58 933.91,-1690.37 953.12,-1687.49"/>
-<polygon fill="#bc00ff" stroke="#bc00ff" points="953.84,-1690.92 963.29,-1686.12 952.91,-1683.99 953.84,-1690.92"/>
+<path fill="none" stroke="#bc00ff" d="M818.89,-3369.87C831.14,-3366.23 843.77,-3361.66 855,-3356 873.1,-3346.88 872.83,-3336.99 891,-3328 910.62,-3318.29 934.29,-3311.89 953.51,-3307.87"/>
+<polygon fill="#bc00ff" stroke="#bc00ff" points="954.25,-3311.29 963.39,-3305.93 952.9,-3304.43 954.25,-3311.29"/>
 </g>
 <!-- proc~rotate_xg~3 -->
 <g id="call~~graph~~CallGraph_node288" class="node">
 <title>proc~rotate_xg~3</title>
-<g id="a_call~~graph~~CallGraph_node288"><a xlink:href="../proc/rotate_xg~3.html" xlink:title="nurbs_curve%rotate_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="830.5,-1016 691.5,-1016 691.5,-992 830.5,-992 830.5,-1016"/>
-<text text-anchor="middle" x="761" y="-1001.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%rotate_Xg</text>
+<g id="a_call~~graph~~CallGraph_node288"><a xlink:href="../proc/rotate_xg~3.html" xlink:title="nurbs_surface%rotate_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="835,-2864 687,-2864 687,-2840 835,-2840 835,-2864"/>
+<text text-anchor="middle" x="761" y="-2849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%rotate_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~rotate_xg~3&#45;&gt;proc~rotation -->
 <g id="call~~graph~~CallGraph_edge392" class="edge">
 <title>proc~rotate_xg~3&#45;&gt;proc~rotation</title>
-<path fill="none" stroke="#c100ff" d="M830.87,-1012.69C840.14,-1016.65 848.63,-1022.21 855,-1030 924.81,-1115.38 856.98,-1420.09 891,-1525 908.79,-1579.86 949.32,-1635.14 972.46,-1663.84"/>
-<polygon fill="#c100ff" stroke="#c100ff" points="969.99,-1666.36 979.04,-1671.87 975.41,-1661.92 969.99,-1666.36"/>
+<path fill="none" stroke="#c100ff" d="M835.39,-2859.84C842.68,-2863.05 849.43,-2867.33 855,-2873 910.33,-2929.34 868.7,-2971.24 891,-3047 917.12,-3135.72 960.55,-3237.13 979.8,-3280.5"/>
+<polygon fill="#c100ff" stroke="#c100ff" points="976.67,-3282.08 983.95,-3289.78 983.06,-3279.22 976.67,-3282.08"/>
 </g>
 <!-- cosd -->
 <g id="call~~graph~~CallGraph_node364" class="node">
 <title>cosd</title>
-<polygon fill="#777777" stroke="#777777" points="1245,-1696 1191,-1696 1191,-1672 1245,-1672 1245,-1696"/>
-<text text-anchor="middle" x="1218" y="-1681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cosd</text>
+<polygon fill="#777777" stroke="#777777" points="1245,-3272 1191,-3272 1191,-3248 1245,-3248 1245,-3272"/>
+<text text-anchor="middle" x="1218" y="-3257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cosd</text>
 </g>
 <!-- proc~rotation&#45;&gt;cosd -->
 <g id="call~~graph~~CallGraph_edge393" class="edge">
 <title>proc~rotation&#45;&gt;cosd</title>
-<path fill="none" stroke="#c500ff" d="M1017.81,-1684C1058.12,-1684 1135.27,-1684 1180.82,-1684"/>
-<polygon fill="#c500ff" stroke="#c500ff" points="1180.86,-1687.5 1190.86,-1684 1180.86,-1680.5 1180.86,-1687.5"/>
+<path fill="none" stroke="#c500ff" d="M1017.81,-3297.1C1058.12,-3289.59 1135.27,-3275.22 1180.82,-3266.74"/>
+<polygon fill="#c500ff" stroke="#c500ff" points="1181.67,-3270.14 1190.86,-3264.87 1180.39,-3263.26 1181.67,-3270.14"/>
 </g>
 <!-- sind -->
 <g id="call~~graph~~CallGraph_node372" class="node">
 <title>sind</title>
-<polygon fill="#777777" stroke="#777777" points="1245,-1654 1191,-1654 1191,-1630 1245,-1630 1245,-1654"/>
-<text text-anchor="middle" x="1218" y="-1639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">sind</text>
+<polygon fill="#777777" stroke="#777777" points="1245,-3314 1191,-3314 1191,-3290 1245,-3290 1245,-3314"/>
+<text text-anchor="middle" x="1218" y="-3299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">sind</text>
 </g>
 <!-- proc~rotation&#45;&gt;sind -->
 <g id="call~~graph~~CallGraph_edge394" class="edge">
 <title>proc~rotation&#45;&gt;sind</title>
-<path fill="none" stroke="#c500ff" d="M1017.81,-1679.1C1058.12,-1671.59 1135.27,-1657.22 1180.82,-1648.74"/>
-<polygon fill="#c500ff" stroke="#c500ff" points="1181.67,-1652.14 1190.86,-1646.87 1180.39,-1645.26 1181.67,-1652.14"/>
+<path fill="none" stroke="#c500ff" d="M1017.81,-3302C1058.12,-3302 1135.27,-3302 1180.82,-3302"/>
+<polygon fill="#c500ff" stroke="#c500ff" points="1180.86,-3305.5 1190.86,-3302 1180.86,-3298.5 1180.86,-3305.5"/>
 </g>
 <!-- proc~set1&#45;&gt;proc~cmp_degree -->
 <g id="call~~graph~~CallGraph_edge395" class="edge">
 <title>proc~set1&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#c900ff" d="M1278.18,-3497.99C1296.14,-3499.81 1316.29,-3501.85 1335.81,-3503.82"/>
-<polygon fill="#c900ff" stroke="#c900ff" points="1335.65,-3507.32 1345.95,-3504.85 1336.35,-3500.36 1335.65,-3507.32"/>
+<path fill="none" stroke="#c900ff" d="M1273.17,-6082.62C1285.36,-6079.75 1298.18,-6076.48 1310,-6073 1335.87,-6065.38 1364.36,-6055.14 1386.69,-6046.69"/>
+<polygon fill="#c900ff" stroke="#c900ff" points="1388.08,-6049.9 1396.17,-6043.06 1385.58,-6043.36 1388.08,-6049.9"/>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
 <g id="call~~graph~~CallGraph_edge396" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#c900ff" d="M1278.18,-3480.02C1302.72,-3475.05 1331.36,-3469.26 1356.89,-3464.09"/>
-<polygon fill="#c900ff" stroke="#c900ff" points="1357.77,-3467.48 1366.88,-3462.07 1356.38,-3460.62 1357.77,-3467.48"/>
-</g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
-<g id="call~~graph~~CallGraph_edge397" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#cd00ff" d="M1276.52,-865.18C1296.2,-863.19 1318.66,-860.91 1340.1,-858.74"/>
-<polygon fill="#cd00ff" stroke="#cd00ff" points="1340.6,-862.21 1350.2,-857.72 1339.89,-855.25 1340.6,-862.21"/>
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#cd00ff" d="M1276.52,-6046.18C1296.2,-6044.19 1318.66,-6041.91 1340.1,-6039.74"/>
+<polygon fill="#cd00ff" stroke="#cd00ff" points="1340.6,-6043.21 1350.2,-6038.72 1339.89,-6036.25 1340.6,-6043.21"/>
 </g>
 <!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
-<g id="call~~graph~~CallGraph_edge398" class="edge">
+<g id="call~~graph~~CallGraph_edge397" class="edge">
 <title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#d100ff" d="M1278.18,-2511.98C1302.72,-2516.95 1331.36,-2522.74 1356.89,-2527.91"/>
-<polygon fill="#d100ff" stroke="#d100ff" points="1356.38,-2531.38 1366.88,-2529.93 1357.77,-2524.52 1356.38,-2531.38"/>
+<path fill="none" stroke="#d100ff" d="M1278.18,-4282.02C1302.72,-4277.05 1331.36,-4271.26 1356.89,-4266.09"/>
+<polygon fill="#d100ff" stroke="#d100ff" points="1357.77,-4269.48 1366.88,-4264.07 1356.38,-4262.62 1357.77,-4269.48"/>
 </g>
 <!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
-<g id="call~~graph~~CallGraph_edge399" class="edge">
+<g id="call~~graph~~CallGraph_edge398" class="edge">
 <title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
-<path fill="none" stroke="#d100ff" d="M1278.18,-2500C1299.78,-2500 1324.56,-2500 1347.61,-2500"/>
-<polygon fill="#d100ff" stroke="#d100ff" points="1347.71,-2503.5 1357.71,-2500 1347.71,-2496.5 1347.71,-2503.5"/>
+<path fill="none" stroke="#d100ff" d="M1278.18,-4294C1299.78,-4294 1324.56,-4294 1347.61,-4294"/>
+<polygon fill="#d100ff" stroke="#d100ff" points="1347.71,-4297.5 1357.71,-4294 1347.71,-4290.5 1347.71,-4297.5"/>
 </g>
 <!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
-<g id="call~~graph~~CallGraph_edge400" class="edge">
+<g id="call~~graph~~CallGraph_edge399" class="edge">
 <title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#d600ff" d="M1273.25,-834.49C1293.75,-836.56 1317.62,-838.98 1340.33,-841.28"/>
-<polygon fill="#d600ff" stroke="#d600ff" points="1340.02,-844.77 1350.32,-842.29 1340.73,-837.8 1340.02,-844.77"/>
+<path fill="none" stroke="#d600ff" d="M1278.18,-3176C1296.14,-3176 1316.29,-3176 1335.81,-3176"/>
+<polygon fill="#d600ff" stroke="#d600ff" points="1335.95,-3179.5 1345.95,-3176 1335.95,-3172.5 1335.95,-3179.5"/>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
-<g id="call~~graph~~CallGraph_edge401" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#da00ff" d="M1278.18,-3450C1299.78,-3450 1324.56,-3450 1347.61,-3450"/>
-<polygon fill="#da00ff" stroke="#da00ff" points="1347.71,-3453.5 1357.71,-3450 1347.71,-3446.5 1347.71,-3453.5"/>
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
+<g id="call~~graph~~CallGraph_edge400" class="edge">
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#d600ff" d="M1278.18,-3187.98C1302.72,-3192.95 1331.36,-3198.74 1356.89,-3203.91"/>
+<polygon fill="#d600ff" stroke="#d600ff" points="1356.38,-3207.38 1366.88,-3205.93 1357.77,-3200.52 1356.38,-3207.38"/>
 </g>
 <!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
-<g id="call~~graph~~CallGraph_edge402" class="edge">
+<g id="call~~graph~~CallGraph_edge401" class="edge">
 <title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#da00ff" d="M1278.12,-3447.8C1290.34,-3444.5 1301.94,-3438.75 1310,-3429 1377.31,-3347.6 1279.85,-2561.35 1346,-2479 1348.62,-2475.74 1351.68,-2472.94 1355.05,-2470.55"/>
-<polygon fill="#da00ff" stroke="#da00ff" points="1357.05,-2473.44 1363.97,-2465.41 1353.55,-2467.37 1357.05,-2473.44"/>
+<path fill="none" stroke="#da00ff" d="M1245.82,-5864.88C1267.39,-5853.54 1296.27,-5834.38 1310,-5808 1358.97,-5713.91 1335.13,-4959.52 1346,-4854 1364.18,-4677.49 1407.35,-4467.37 1421.74,-4399.96"/>
+<polygon fill="#da00ff" stroke="#da00ff" points="1425.19,-4400.57 1423.87,-4390.06 1418.34,-4399.1 1425.19,-4400.57"/>
 </g>
 <!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
-<g id="call~~graph~~CallGraph_edge403" class="edge">
+<g id="call~~graph~~CallGraph_edge402" class="edge">
 <title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
-<path fill="none" stroke="#de00ff" d="M1278.18,-2469.98C1302.72,-2474.95 1331.36,-2480.74 1356.89,-2485.91"/>
-<polygon fill="#de00ff" stroke="#de00ff" points="1356.38,-2489.38 1366.88,-2487.93 1357.77,-2482.52 1356.38,-2489.38"/>
+<path fill="none" stroke="#de00ff" d="M1278.43,-4366.72C1289.09,-4364.01 1299.99,-4360.78 1310,-4357 1342.09,-4344.87 1376.35,-4325.48 1399.34,-4311.42"/>
+<polygon fill="#de00ff" stroke="#de00ff" points="1401.22,-4314.37 1407.88,-4306.12 1397.53,-4308.42 1401.22,-4314.37"/>
 </g>
 <!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
-<g id="call~~graph~~CallGraph_edge404" class="edge">
+<g id="call~~graph~~CallGraph_edge403" class="edge">
 <title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#de00ff" d="M1278.18,-2458C1301.77,-2458 1329.14,-2458 1353.91,-2458"/>
-<polygon fill="#de00ff" stroke="#de00ff" points="1353.98,-2461.5 1363.98,-2458 1353.98,-2454.5 1353.98,-2461.5"/>
+<path fill="none" stroke="#de00ff" d="M1278.18,-4378C1301.77,-4378 1329.14,-4378 1353.91,-4378"/>
+<polygon fill="#de00ff" stroke="#de00ff" points="1353.98,-4381.5 1363.98,-4378 1353.98,-4374.5 1353.98,-4381.5"/>
+</g>
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
+<g id="call~~graph~~CallGraph_edge404" class="edge">
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#e200ff" d="M1278.18,-3218C1299.78,-3218 1324.56,-3218 1347.61,-3218"/>
+<polygon fill="#e200ff" stroke="#e200ff" points="1347.71,-3221.5 1357.71,-3218 1347.71,-3214.5 1347.71,-3221.5"/>
 </g>
 <!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="call~~graph~~CallGraph_edge405" class="edge">
 <title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#e200ff" d="M1221.09,-963.28C1232.35,-1029.82 1286.01,-1353.84 1310,-1621 1314.06,-1666.2 1317.47,-2401.71 1346,-2437 1348.58,-2440.19 1351.58,-2442.94 1354.88,-2445.29"/>
-<polygon fill="#e200ff" stroke="#e200ff" points="1353.21,-2448.37 1363.61,-2450.37 1356.73,-2442.32 1353.21,-2448.37"/>
+<path fill="none" stroke="#e200ff" d="M1278.15,-3220.18C1290.37,-3223.47 1301.96,-3229.24 1310,-3239 1386.03,-3331.36 1291.81,-4208.35 1346,-4315 1355.99,-4334.67 1375.27,-4350.09 1392.45,-4360.76"/>
+<polygon fill="#e200ff" stroke="#e200ff" points="1390.79,-4363.84 1401.19,-4365.9 1394.34,-4357.81 1390.79,-4363.84"/>
 </g>
 <!-- proc~set3&#45;&gt;proc~cmp_degree -->
 <g id="call~~graph~~CallGraph_edge406" class="edge">
 <title>proc~set3&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#e700ff" d="M1278.18,-3528.01C1296.14,-3526.19 1316.29,-3524.15 1335.81,-3522.18"/>
-<polygon fill="#e700ff" stroke="#e700ff" points="1336.35,-3525.64 1345.95,-3521.15 1335.65,-3518.68 1336.35,-3525.64"/>
+<path fill="none" stroke="#e700ff" d="M1273.25,-6015.49C1293.75,-6017.56 1317.62,-6019.98 1340.33,-6022.28"/>
+<polygon fill="#e700ff" stroke="#e700ff" points="1340.02,-6025.77 1350.32,-6023.29 1340.73,-6018.8 1340.02,-6025.77"/>
 </g>
 <!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="call~~graph~~CallGraph_edge407" class="edge">
 <title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#eb00ff" d="M1278.18,-2542C1296.14,-2542 1316.29,-2542 1335.81,-2542"/>
-<polygon fill="#eb00ff" stroke="#eb00ff" points="1335.95,-2545.5 1345.95,-2542 1335.95,-2538.5 1335.95,-2545.5"/>
+<path fill="none" stroke="#eb00ff" d="M1278.18,-4252C1296.14,-4252 1316.29,-4252 1335.81,-4252"/>
+<polygon fill="#eb00ff" stroke="#eb00ff" points="1335.95,-4255.5 1345.95,-4252 1335.95,-4248.5 1335.95,-4255.5"/>
 </g>
 <!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="call~~graph~~CallGraph_edge408" class="edge">
 <title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ef00ff" d="M1273.17,-798.38C1285.36,-801.25 1298.18,-804.52 1310,-808 1335.87,-815.62 1364.36,-825.86 1386.69,-834.31"/>
-<polygon fill="#ef00ff" stroke="#ef00ff" points="1385.58,-837.64 1396.17,-837.94 1388.08,-831.1 1385.58,-837.64"/>
+<path fill="none" stroke="#ef00ff" d="M1244.35,-3113.09C1269.68,-3124.85 1309.94,-3142.71 1346,-3155 1352.34,-3157.16 1359.02,-3159.23 1365.71,-3161.16"/>
+<polygon fill="#ef00ff" stroke="#ef00ff" points="1364.92,-3164.58 1375.49,-3163.9 1366.81,-3157.84 1364.92,-3164.58"/>
 </g>
 <!-- proc~set_c -->
 <g id="call~~graph~~CallGraph_node303" class="node">
 <title>proc~set_c</title>
-<g id="a_call~~graph~~CallGraph_node303"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_volume%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="824,-3908 698,-3908 698,-3884 824,-3884 824,-3908"/>
-<text text-anchor="middle" x="761" y="-3893.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
+<g id="a_call~~graph~~CallGraph_node303"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_curve%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="819,-6474 703,-6474 703,-6450 819,-6450 819,-6474"/>
+<text text-anchor="middle" x="761" y="-6459.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c&#45;&gt;none~set -->
 <g id="call~~graph~~CallGraph_edge409" class="edge">
 <title>proc~set_c&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff00fd" d="M824.27,-3892.95C835.91,-3889.57 846.94,-3884 855,-3875 950.21,-3768.73 797.72,-3663.96 891,-3556 899.62,-3546.03 911.56,-3539.66 924.16,-3535.64"/>
-<polygon fill="#ff00fd" stroke="#ff00fd" points="925.15,-3539 933.89,-3533 923.32,-3532.24 925.15,-3539"/>
+<path fill="none" stroke="#ff00fd" d="M819.44,-6458.39C832.35,-6455.19 845.13,-6449.83 855,-6441 912.36,-6389.67 968.43,-6149.23 984.76,-6074.33"/>
+<polygon fill="#ff00fd" stroke="#ff00fd" points="988.27,-6074.67 986.96,-6064.16 981.43,-6073.19 988.27,-6074.67"/>
 </g>
 <!-- proc~set_circle -->
 <g id="call~~graph~~CallGraph_node304" class="node">
 <title>proc~set_circle</title>
 <g id="a_call~~graph~~CallGraph_node304"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="829.5,-390 692.5,-390 692.5,-366 829.5,-366 829.5,-390"/>
-<text text-anchor="middle" x="761" y="-375.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="829.5,-6390 692.5,-6390 692.5,-6366 829.5,-6366 829.5,-6390"/>
+<text text-anchor="middle" x="761" y="-6375.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_circle&#45;&gt;none~set -->
 <g id="call~~graph~~CallGraph_edge410" class="edge">
-<title>proc~set_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff00f9" d="M829.76,-383.08C839.29,-386.5 848.15,-391.58 855,-399 931.73,-482.14 853.55,-544.24 891,-651 911.08,-708.24 951.7,-767.65 973.99,-797.81"/>
-<polygon fill="#ff00f9" stroke="#ff00f9" points="971.22,-799.95 980.02,-805.85 976.83,-795.75 971.22,-799.95"/>
+<title>proc~set_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff00f9" d="M829.54,-6370.7C838.76,-6367.52 847.59,-6363.1 855,-6357 946.73,-6281.48 977.84,-6130.92 986.56,-6074.25"/>
+<polygon fill="#ff00f9" stroke="#ff00f9" points="990.04,-6074.62 988.02,-6064.22 983.11,-6073.62 990.04,-6074.62"/>
 </g>
 <!-- proc~set_c~2 -->
 <g id="call~~graph~~CallGraph_node305" class="node">
 <title>proc~set_c~2</title>
-<g id="a_call~~graph~~CallGraph_node305"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_surface%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="824,-2634 698,-2634 698,-2610 824,-2610 824,-2634"/>
-<text text-anchor="middle" x="761" y="-2619.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
+<g id="a_call~~graph~~CallGraph_node305"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_volume%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="824,-4504 698,-4504 698,-4480 824,-4480 824,-4504"/>
+<text text-anchor="middle" x="761" y="-4489.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c~2&#45;&gt;none~set~2 -->
 <g id="call~~graph~~CallGraph_edge411" class="edge">
 <title>proc~set_c~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff00f5" d="M824.22,-2616.32C835.32,-2613.08 846.16,-2608.23 855,-2601 885.19,-2576.33 861.14,-2546.07 891,-2521 900.4,-2513.11 911.95,-2507.67 923.81,-2503.92"/>
-<polygon fill="#ff00f5" stroke="#ff00f5" points="925.09,-2507.19 933.79,-2501.15 923.22,-2500.45 925.09,-2507.19"/>
+<path fill="none" stroke="#ff00f5" d="M824.33,-4483.06C834.95,-4480.12 845.58,-4476.2 855,-4471 907.23,-4442.15 952.62,-4386.95 974.89,-4356.84"/>
+<polygon fill="#ff00f5" stroke="#ff00f5" points="978,-4358.51 981.04,-4348.36 972.33,-4354.4 978,-4358.51"/>
 </g>
 <!-- proc~set_c~3 -->
 <g id="call~~graph~~CallGraph_node306" class="node">
 <title>proc~set_c~3</title>
-<g id="a_call~~graph~~CallGraph_node306"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_curve%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="819,-810 703,-810 703,-786 819,-786 819,-810"/>
-<text text-anchor="middle" x="761" y="-795.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
+<g id="a_call~~graph~~CallGraph_node306"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_surface%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="824,-3196 698,-3196 698,-3172 824,-3172 824,-3196"/>
+<text text-anchor="middle" x="761" y="-3181.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c~3&#45;&gt;none~set~3 -->
 <g id="call~~graph~~CallGraph_edge412" class="edge">
 <title>proc~set_c~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff00f0" d="M819.11,-803.02C852.51,-805.96 894.66,-809.66 928.68,-812.65"/>
-<polygon fill="#ff00f0" stroke="#ff00f0" points="928.68,-816.17 938.95,-813.56 929.3,-809.19 928.68,-816.17"/>
+<path fill="none" stroke="#ff00f0" d="M824.36,-3175.12C834.98,-3172.17 845.6,-3168.24 855,-3163 908,-3133.47 953.63,-3076.67 975.58,-3046.31"/>
+<polygon fill="#ff00f0" stroke="#ff00f0" points="978.44,-3048.32 981.37,-3038.14 972.73,-3044.27 978.44,-3048.32"/>
 </g>
 <!-- proc~set_elem -->
 <g id="call~~graph~~CallGraph_node307" class="node">
 <title>proc~set_elem</title>
-<g id="a_call~~graph~~CallGraph_node307"><a xlink:href="../proc/set_elem.html" xlink:title="nurbs_volume%set_elem">
-<polygon fill="#d9534f" stroke="#d9534f" points="833.5,-3130 688.5,-3130 688.5,-3106 833.5,-3106 833.5,-3130"/>
-<text text-anchor="middle" x="761" y="-3115.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_elem</text>
+<g id="a_call~~graph~~CallGraph_node307"><a xlink:href="../proc/set_elem.html" xlink:title="nurbs_curve%set_elem">
+<polygon fill="#d9534f" stroke="#d9534f" points="176.5,-7732 40.5,-7732 40.5,-7708 176.5,-7708 176.5,-7732"/>
+<text text-anchor="middle" x="108.5" y="-7717.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~set_elem_xc_vis -->
 <g id="call~~graph~~CallGraph_node308" class="node">
 <title>proc~set_elem_xc_vis</title>
-<g id="a_call~~graph~~CallGraph_node308"><a xlink:href="../proc/set_elem_xc_vis.html" xlink:title="nurbs_volume%set_elem_Xc_vis">
-<polygon fill="#d9534f" stroke="#d9534f" points="200.5,-7362 16.5,-7362 16.5,-7338 200.5,-7338 200.5,-7362"/>
-<text text-anchor="middle" x="108.5" y="-7347.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_elem_Xc_vis</text>
+<g id="a_call~~graph~~CallGraph_node308"><a xlink:href="../proc/set_elem_xc_vis.html" xlink:title="nurbs_curve%set_elem_Xc_vis">
+<polygon fill="#d9534f" stroke="#d9534f" points="195.5,-7774 21.5,-7774 21.5,-7750 195.5,-7750 195.5,-7774"/>
+<text text-anchor="middle" x="108.5" y="-7759.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~set_elem_xc_vis~2 -->
 <g id="call~~graph~~CallGraph_node309" class="node">
 <title>proc~set_elem_xc_vis~2</title>
-<g id="a_call~~graph~~CallGraph_node309"><a xlink:href="../proc/set_elem_xc_vis~2.html" xlink:title="nurbs_surface%set_elem_Xc_vis">
-<polygon fill="#d9534f" stroke="#d9534f" points="200.5,-7404 16.5,-7404 16.5,-7380 200.5,-7380 200.5,-7404"/>
-<text text-anchor="middle" x="108.5" y="-7389.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_elem_Xc_vis</text>
+<g id="a_call~~graph~~CallGraph_node309"><a xlink:href="../proc/set_elem_xc_vis~2.html" xlink:title="nurbs_volume%set_elem_Xc_vis">
+<polygon fill="#d9534f" stroke="#d9534f" points="200.5,-7816 16.5,-7816 16.5,-7792 200.5,-7792 200.5,-7816"/>
+<text text-anchor="middle" x="108.5" y="-7801.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~set_elem_xc_vis~3 -->
 <g id="call~~graph~~CallGraph_node310" class="node">
 <title>proc~set_elem_xc_vis~3</title>
-<g id="a_call~~graph~~CallGraph_node310"><a xlink:href="../proc/set_elem_xc_vis~3.html" xlink:title="nurbs_curve%set_elem_Xc_vis">
-<polygon fill="#d9534f" stroke="#d9534f" points="195.5,-7446 21.5,-7446 21.5,-7422 195.5,-7422 195.5,-7446"/>
-<text text-anchor="middle" x="108.5" y="-7431.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_elem_Xc_vis</text>
+<g id="a_call~~graph~~CallGraph_node310"><a xlink:href="../proc/set_elem_xc_vis~3.html" xlink:title="nurbs_surface%set_elem_Xc_vis">
+<polygon fill="#d9534f" stroke="#d9534f" points="200.5,-7858 16.5,-7858 16.5,-7834 200.5,-7834 200.5,-7858"/>
+<text text-anchor="middle" x="108.5" y="-7843.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~set_elem_xg_vis~2 -->
-<g id="call~~graph~~CallGraph_node312" class="node">
-<title>proc~set_elem_xg_vis~2</title>
-<g id="a_call~~graph~~CallGraph_node312"><a xlink:href="../proc/set_elem_xg_vis~2.html" xlink:title="nurbs_surface%set_elem_Xg_vis">
-<polygon fill="#d9534f" stroke="#d9534f" points="200.5,-7488 16.5,-7488 16.5,-7464 200.5,-7464 200.5,-7488"/>
-<text text-anchor="middle" x="108.5" y="-7473.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_elem_Xg_vis</text>
+<!-- proc~set_elem_xg_vis -->
+<g id="call~~graph~~CallGraph_node311" class="node">
+<title>proc~set_elem_xg_vis</title>
+<g id="a_call~~graph~~CallGraph_node311"><a xlink:href="../proc/set_elem_xg_vis.html" xlink:title="nurbs_curve%set_elem_Xg_vis">
+<polygon fill="#d9534f" stroke="#d9534f" points="196,-7900 21,-7900 21,-7876 196,-7876 196,-7900"/>
+<text text-anchor="middle" x="108.5" y="-7885.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~set_elem_xg_vis~3 -->
 <g id="call~~graph~~CallGraph_node313" class="node">
 <title>proc~set_elem_xg_vis~3</title>
-<g id="a_call~~graph~~CallGraph_node313"><a xlink:href="../proc/set_elem_xg_vis~3.html" xlink:title="nurbs_curve%set_elem_Xg_vis">
-<polygon fill="#d9534f" stroke="#d9534f" points="196,-7530 21,-7530 21,-7506 196,-7506 196,-7530"/>
-<text text-anchor="middle" x="108.5" y="-7515.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_elem_Xg_vis</text>
+<g id="a_call~~graph~~CallGraph_node313"><a xlink:href="../proc/set_elem_xg_vis~3.html" xlink:title="nurbs_surface%set_elem_Xg_vis">
+<polygon fill="#d9534f" stroke="#d9534f" points="200.5,-7942 16.5,-7942 16.5,-7918 200.5,-7918 200.5,-7942"/>
+<text text-anchor="middle" x="108.5" y="-7927.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~set_elem~2 -->
 <g id="call~~graph~~CallGraph_node314" class="node">
 <title>proc~set_elem~2</title>
-<g id="a_call~~graph~~CallGraph_node314"><a xlink:href="../proc/set_elem~2.html" xlink:title="nurbs_surface%set_elem">
-<polygon fill="#d9534f" stroke="#d9534f" points="181,-7572 36,-7572 36,-7548 181,-7548 181,-7572"/>
-<text text-anchor="middle" x="108.5" y="-7557.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_elem</text>
+<g id="a_call~~graph~~CallGraph_node314"><a xlink:href="../proc/set_elem~2.html" xlink:title="nurbs_volume%set_elem">
+<polygon fill="#d9534f" stroke="#d9534f" points="833.5,-3604 688.5,-3604 688.5,-3580 833.5,-3580 833.5,-3604"/>
+<text text-anchor="middle" x="761" y="-3589.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~set_elem~3 -->
 <g id="call~~graph~~CallGraph_node315" class="node">
 <title>proc~set_elem~3</title>
-<g id="a_call~~graph~~CallGraph_node315"><a xlink:href="../proc/set_elem~3.html" xlink:title="nurbs_curve%set_elem">
-<polygon fill="#d9534f" stroke="#d9534f" points="176.5,-7614 40.5,-7614 40.5,-7590 176.5,-7590 176.5,-7614"/>
-<text text-anchor="middle" x="108.5" y="-7599.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_elem</text>
+<g id="a_call~~graph~~CallGraph_node315"><a xlink:href="../proc/set_elem~3.html" xlink:title="nurbs_surface%set_elem">
+<polygon fill="#d9534f" stroke="#d9534f" points="181,-7984 36,-7984 36,-7960 181,-7960 181,-7984"/>
+<text text-anchor="middle" x="108.5" y="-7969.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_elem</text>
 </a>
 </g>
 </g>
@@ -7266,206 +7266,206 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node316" class="node">
 <title>proc~set_half_circle</title>
 <g id="a_call~~graph~~CallGraph_node316"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="842.5,-684 679.5,-684 679.5,-660 842.5,-660 842.5,-684"/>
-<text text-anchor="middle" x="761" y="-669.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="842.5,-6062 679.5,-6062 679.5,-6038 842.5,-6038 842.5,-6062"/>
+<text text-anchor="middle" x="761" y="-6047.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_half_circle&#45;&gt;none~set -->
 <g id="call~~graph~~CallGraph_edge413" class="edge">
-<title>proc~set_half_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff00c6" d="M833.48,-684.04C840.95,-686.49 848.27,-689.45 855,-693 905.34,-719.56 950.88,-769.87 973.83,-797.88"/>
-<polygon fill="#ff00c6" stroke="#ff00c6" points="971.22,-800.21 980.21,-805.81 976.67,-795.83 971.22,-800.21"/>
+<title>proc~set_half_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff00c6" d="M842.53,-6050.71C870.85,-6050.96 902.19,-6051.23 928.62,-6051.46"/>
+<polygon fill="#ff00c6" stroke="#ff00c6" points="928.84,-6054.97 938.87,-6051.55 928.9,-6047.97 928.84,-6054.97"/>
 </g>
 <!-- proc~set_half_ring -->
 <g id="call~~graph~~CallGraph_node317" class="node">
 <title>proc~set_half_ring</title>
 <g id="a_call~~graph~~CallGraph_node317"><a xlink:href="../proc/set_half_ring.html" xlink:title="nurbs_volume%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="843.5,-4076 678.5,-4076 678.5,-4052 843.5,-4052 843.5,-4076"/>
-<text text-anchor="middle" x="761" y="-4061.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="843.5,-4378 678.5,-4378 678.5,-4354 843.5,-4354 843.5,-4378"/>
+<text text-anchor="middle" x="761" y="-4363.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring&#45;&gt;none~set -->
+<!-- proc~set_half_ring&#45;&gt;none~set~2 -->
 <g id="call~~graph~~CallGraph_edge414" class="edge">
-<title>proc~set_half_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff00c2" d="M843.89,-4052.59C848,-4049.93 851.76,-4046.76 855,-4043 925.84,-3960.79 821.65,-3639.47 891,-3556 899.47,-3545.81 911.41,-3539.36 924.07,-3535.33"/>
-<polygon fill="#ff00c2" stroke="#ff00c2" points="925.11,-3538.67 933.85,-3532.7 923.29,-3531.91 925.11,-3538.67"/>
+<title>proc~set_half_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff00c2" d="M843.81,-4355.21C870.12,-4351.74 898.91,-4347.95 923.9,-4344.65"/>
+<polygon fill="#ff00c2" stroke="#ff00c2" points="924.54,-4348.1 934,-4343.32 923.63,-4341.16 924.54,-4348.1"/>
 </g>
 <!-- proc~set_half_ring~2 -->
 <g id="call~~graph~~CallGraph_node318" class="node">
 <title>proc~set_half_ring~2</title>
 <g id="a_call~~graph~~CallGraph_node318"><a xlink:href="../proc/set_half_ring~2.html" xlink:title="nurbs_surface%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="843.5,-2386 678.5,-2386 678.5,-2362 843.5,-2362 843.5,-2386"/>
-<text text-anchor="middle" x="761" y="-2371.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="843.5,-2822 678.5,-2822 678.5,-2798 843.5,-2798 843.5,-2822"/>
+<text text-anchor="middle" x="761" y="-2807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_half_ring~2&#45;&gt;none~set~3 -->
 <g id="call~~graph~~CallGraph_edge415" class="edge">
-<title>proc~set_half_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff00be" d="M840.58,-2386.08C845.73,-2388.55 850.6,-2391.49 855,-2395 883.92,-2418.04 862.5,-2446.45 891,-2470 900.57,-2477.91 912.31,-2483.44 924.3,-2487.3"/>
-<polygon fill="#ff00be" stroke="#ff00be" points="923.35,-2490.67 933.93,-2490.04 925.27,-2483.94 923.35,-2490.67"/>
+<title>proc~set_half_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff00be" d="M843.07,-2822.18C847.38,-2824.66 851.41,-2827.57 855,-2831 898.67,-2872.7 855.36,-2913.26 891,-2962 906.14,-2982.7 930.17,-2998.5 950.7,-3009.23"/>
+<polygon fill="#ff00be" stroke="#ff00be" points="949.34,-3012.46 959.85,-3013.8 952.47,-3006.2 949.34,-3012.46"/>
 </g>
 <!-- proc~set_hexahedron -->
 <g id="call~~graph~~CallGraph_node319" class="node">
 <title>proc~set_hexahedron</title>
 <g id="a_call~~graph~~CallGraph_node319"><a xlink:href="../proc/set_hexahedron.html" xlink:title="nurbs_volume%set_hexahedron">
-<polygon fill="#d9534f" stroke="#d9534f" points="851.5,-3626 670.5,-3626 670.5,-3602 851.5,-3602 851.5,-3626"/>
-<text text-anchor="middle" x="761" y="-3611.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="851.5,-4088 670.5,-4088 670.5,-4064 851.5,-4064 851.5,-4088"/>
+<text text-anchor="middle" x="761" y="-4073.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- proc~set_hexahedron&#45;&gt;none~set -->
+<!-- proc~set_hexahedron&#45;&gt;none~set~2 -->
 <g id="call~~graph~~CallGraph_edge416" class="edge">
-<title>proc~set_hexahedron&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff00b9" d="M834.63,-3601.97C841.73,-3599.52 848.65,-3596.56 855,-3593 875.02,-3581.79 871.19,-3567.57 891,-3556 901.2,-3550.04 912.79,-3545.42 924.34,-3541.85"/>
-<polygon fill="#ff00b9" stroke="#ff00b9" points="925.35,-3545.2 934,-3539.09 923.42,-3538.47 925.35,-3545.2"/>
+<title>proc~set_hexahedron&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff00b9" d="M843.11,-4088.14C847.41,-4090.63 851.42,-4093.55 855,-4097 900.02,-4140.39 860.43,-4178.46 891,-4233 910.18,-4267.22 943.38,-4298.55 965.88,-4317.46"/>
+<polygon fill="#ff00b9" stroke="#ff00b9" points="963.69,-4320.19 973.64,-4323.84 968.14,-4314.78 963.69,-4320.19"/>
 </g>
 <!-- proc~set_hexahedron&#45;&gt;proc~hexahedron_xc -->
 <g id="call~~graph~~CallGraph_edge417" class="edge">
 <title>proc~set_hexahedron&#45;&gt;proc~hexahedron_xc</title>
-<path fill="none" stroke="#ff00b9" d="M844.56,-3601.93C848.39,-3599.41 851.91,-3596.46 855,-3593 953.24,-3482.93 792.1,-3372.48 891,-3263 901.72,-3251.13 917.35,-3245.07 933.02,-3242.17"/>
-<polygon fill="#ff00b9" stroke="#ff00b9" points="933.87,-3245.58 943.27,-3240.69 932.88,-3238.65 933.87,-3245.58"/>
+<path fill="none" stroke="#ff00b9" d="M851.59,-4068.12C879.11,-4065.7 908.62,-4063.11 933.25,-4060.95"/>
+<polygon fill="#ff00b9" stroke="#ff00b9" points="933.83,-4064.41 943.48,-4060.05 933.21,-4057.43 933.83,-4064.41"/>
 </g>
 <!-- proc~set_ring -->
 <g id="call~~graph~~CallGraph_node320" class="node">
 <title>proc~set_ring</title>
 <g id="a_call~~graph~~CallGraph_node320"><a xlink:href="../proc/set_ring.html" xlink:title="nurbs_volume%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="830.5,-3992 691.5,-3992 691.5,-3968 830.5,-3968 830.5,-3992"/>
-<text text-anchor="middle" x="761" y="-3977.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="830.5,-4420 691.5,-4420 691.5,-4396 830.5,-4396 830.5,-4420"/>
+<text text-anchor="middle" x="761" y="-4405.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring&#45;&gt;none~set -->
+<!-- proc~set_ring&#45;&gt;none~set~2 -->
 <g id="call~~graph~~CallGraph_edge418" class="edge">
-<title>proc~set_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff00b5" d="M830.57,-3975.06C839.88,-3971.6 848.46,-3966.47 855,-3959 914.21,-3891.34 833.01,-3624.72 891,-3556 899.54,-3545.87 911.52,-3539.45 924.19,-3535.42"/>
-<polygon fill="#ff00b5" stroke="#ff00b5" points="925.22,-3538.77 933.97,-3532.79 923.4,-3532.01 925.22,-3538.77"/>
+<title>proc~set_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff00b5" d="M821.36,-4395.9C832.61,-4393.24 844.22,-4390.24 855,-4387 888.33,-4376.97 925.24,-4362.74 951.95,-4351.86"/>
+<polygon fill="#ff00b5" stroke="#ff00b5" points="953.38,-4355.06 961.3,-4348.02 950.72,-4348.58 953.38,-4355.06"/>
 </g>
 <!-- proc~set_ring~2 -->
 <g id="call~~graph~~CallGraph_node321" class="node">
 <title>proc~set_ring~2</title>
 <g id="a_call~~graph~~CallGraph_node321"><a xlink:href="../proc/set_ring~2.html" xlink:title="nurbs_surface%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="830.5,-2260 691.5,-2260 691.5,-2236 830.5,-2236 830.5,-2260"/>
-<text text-anchor="middle" x="761" y="-2245.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="830.5,-2490 691.5,-2490 691.5,-2466 830.5,-2466 830.5,-2490"/>
+<text text-anchor="middle" x="761" y="-2475.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_ring~2&#45;&gt;none~set~3 -->
 <g id="call~~graph~~CallGraph_edge419" class="edge">
-<title>proc~set_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff00b1" d="M830.73,-2254.01C839.78,-2257.36 848.25,-2262.17 855,-2269 908.7,-2323.29 846.56,-2374.9 891,-2437 904.62,-2456.03 926.46,-2470.02 946.13,-2479.58"/>
-<polygon fill="#ff00b1" stroke="#ff00b1" points="944.71,-2482.78 955.26,-2483.79 947.65,-2476.43 944.71,-2482.78"/>
+<title>proc~set_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff00b1" d="M830.81,-2483.31C839.97,-2486.75 848.44,-2491.76 855,-2499 898.6,-2547.13 874.39,-2726.22 891,-2789 912.9,-2871.77 957.42,-2963.81 978.26,-3004.58"/>
+<polygon fill="#ff00b1" stroke="#ff00b1" points="975.21,-3006.3 982.91,-3013.58 981.43,-3003.09 975.21,-3006.3"/>
 </g>
 <!-- proc~set_tetragon -->
 <g id="call~~graph~~CallGraph_node322" class="node">
 <title>proc~set_tetragon</title>
 <g id="a_call~~graph~~CallGraph_node322"><a xlink:href="../proc/set_tetragon.html" xlink:title="nurbs_surface%set_tetragon">
-<polygon fill="#d9534f" stroke="#d9534f" points="843,-1516 679,-1516 679,-1492 843,-1492 843,-1516"/>
-<text text-anchor="middle" x="761" y="-1501.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="843,-2238 679,-2238 679,-2214 843,-2214 843,-2238"/>
+<text text-anchor="middle" x="761" y="-2223.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
 </a>
 </g>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
 <g id="call~~graph~~CallGraph_edge420" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff00ad" d="M843.22,-1514.75C847.62,-1517.55 851.61,-1520.93 855,-1525 919.87,-1602.95 839.27,-2349.77 891,-2437 902.59,-2456.54 923.38,-2470.37 942.88,-2479.71"/>
-<polygon fill="#ff00ad" stroke="#ff00ad" points="941.45,-2482.9 952,-2483.81 944.32,-2476.52 941.45,-2482.9"/>
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff00ad" d="M843.1,-2236.85C847.52,-2239.63 851.56,-2242.97 855,-2247 894.23,-2292.87 877.23,-2730.24 891,-2789 910.53,-2872.36 956.24,-2964.11 977.82,-3004.69"/>
+<polygon fill="#ff00ad" stroke="#ff00ad" points="974.82,-3006.5 982.64,-3013.65 980.99,-3003.18 974.82,-3006.5"/>
 </g>
 <!-- proc~tetragon_xc -->
 <g id="call~~graph~~CallGraph_node326" class="node">
 <title>proc~tetragon_xc</title>
 <g id="a_call~~graph~~CallGraph_node326"><a xlink:href="../proc/tetragon_xc.html" xlink:title="tetragon_Xc">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1029,-1516 952,-1516 952,-1492 1029,-1492 1029,-1516"/>
-<text text-anchor="middle" x="990.5" y="-1501.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tetragon_Xc</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1029,-150 952,-150 952,-126 1029,-126 1029,-150"/>
+<text text-anchor="middle" x="990.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tetragon_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~set_tetragon&#45;&gt;proc~tetragon_xc -->
 <g id="call~~graph~~CallGraph_edge421" class="edge">
 <title>proc~set_tetragon&#45;&gt;proc~tetragon_xc</title>
-<path fill="none" stroke="#ff00ad" d="M843.17,-1504C876.13,-1504 913.07,-1504 941.59,-1504"/>
-<polygon fill="#ff00ad" stroke="#ff00ad" points="941.7,-1507.5 951.7,-1504 941.7,-1500.5 941.7,-1507.5"/>
+<path fill="none" stroke="#ff00ad" d="M843.32,-2215.34C847.7,-2212.52 851.66,-2209.11 855,-2205 926.76,-2116.83 818.71,-246.74 891,-159 903.2,-144.2 923.02,-138.23 941.7,-136.23"/>
+<polygon fill="#ff00ad" stroke="#ff00ad" points="942.18,-139.71 951.91,-135.5 941.68,-132.73 942.18,-139.71"/>
 </g>
 <!-- proc~show -->
 <g id="call~~graph~~CallGraph_node323" class="node">
 <title>proc~show</title>
-<g id="a_call~~graph~~CallGraph_node323"><a xlink:href="../proc/show.html" xlink:title="nurbs_volume%show">
-<polygon fill="#d9534f" stroke="#d9534f" points="823,-3950 699,-3950 699,-3926 823,-3926 823,-3950"/>
-<text text-anchor="middle" x="761" y="-3935.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%show</text>
+<g id="a_call~~graph~~CallGraph_node323"><a xlink:href="../proc/show.html" xlink:title="nurbs_curve%show">
+<polygon fill="#d9534f" stroke="#d9534f" points="818.5,-6268 703.5,-6268 703.5,-6244 818.5,-6244 818.5,-6268"/>
+<text text-anchor="middle" x="761" y="-6253.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%show</text>
 </a>
 </g>
 </g>
 <!-- proc~show~2 -->
 <g id="call~~graph~~CallGraph_node324" class="node">
 <title>proc~show~2</title>
-<g id="a_call~~graph~~CallGraph_node324"><a xlink:href="../proc/show~2.html" xlink:title="nurbs_surface%show">
-<polygon fill="#d9534f" stroke="#d9534f" points="823,-2428 699,-2428 699,-2404 823,-2404 823,-2428"/>
-<text text-anchor="middle" x="761" y="-2413.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%show</text>
+<g id="a_call~~graph~~CallGraph_node324"><a xlink:href="../proc/show~2.html" xlink:title="nurbs_volume%show">
+<polygon fill="#d9534f" stroke="#d9534f" points="823,-4172 699,-4172 699,-4148 823,-4148 823,-4172"/>
+<text text-anchor="middle" x="761" y="-4157.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%show</text>
 </a>
 </g>
 </g>
 <!-- proc~show~3 -->
 <g id="call~~graph~~CallGraph_node325" class="node">
 <title>proc~show~3</title>
-<g id="a_call~~graph~~CallGraph_node325"><a xlink:href="../proc/show~3.html" xlink:title="nurbs_curve%show">
-<polygon fill="#d9534f" stroke="#d9534f" points="818.5,-432 703.5,-432 703.5,-408 818.5,-408 818.5,-432"/>
-<text text-anchor="middle" x="761" y="-417.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%show</text>
+<g id="a_call~~graph~~CallGraph_node325"><a xlink:href="../proc/show~3.html" xlink:title="nurbs_surface%show">
+<polygon fill="#d9534f" stroke="#d9534f" points="823,-3070 699,-3070 699,-3046 823,-3046 823,-3070"/>
+<text text-anchor="middle" x="761" y="-3055.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%show</text>
 </a>
 </g>
 </g>
 <!-- proc~translate_xc -->
 <g id="call~~graph~~CallGraph_node327" class="node">
 <title>proc~translate_xc</title>
-<g id="a_call~~graph~~CallGraph_node327"><a xlink:href="../proc/translate_xc.html" xlink:title="nurbs_volume%translate_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="842.5,-3088 679.5,-3088 679.5,-3064 842.5,-3064 842.5,-3088"/>
-<text text-anchor="middle" x="761" y="-3073.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%translate_Xc</text>
+<g id="a_call~~graph~~CallGraph_node327"><a xlink:href="../proc/translate_xc.html" xlink:title="nurbs_curve%translate_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="838,-5738 684,-5738 684,-5714 838,-5714 838,-5738"/>
+<text text-anchor="middle" x="761" y="-5723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%translate_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~translate_xc~2 -->
 <g id="call~~graph~~CallGraph_node328" class="node">
 <title>proc~translate_xc~2</title>
-<g id="a_call~~graph~~CallGraph_node328"><a xlink:href="../proc/translate_xc~2.html" xlink:title="nurbs_surface%translate_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="842.5,-1684 679.5,-1684 679.5,-1660 842.5,-1660 842.5,-1684"/>
-<text text-anchor="middle" x="761" y="-1669.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%translate_Xc</text>
+<g id="a_call~~graph~~CallGraph_node328"><a xlink:href="../proc/translate_xc~2.html" xlink:title="nurbs_volume%translate_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="842.5,-3852 679.5,-3852 679.5,-3828 842.5,-3828 842.5,-3852"/>
+<text text-anchor="middle" x="761" y="-3837.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%translate_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~translate_xc~3 -->
 <g id="call~~graph~~CallGraph_node329" class="node">
 <title>proc~translate_xc~3</title>
-<g id="a_call~~graph~~CallGraph_node329"><a xlink:href="../proc/translate_xc~3.html" xlink:title="nurbs_curve%translate_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="838,-516 684,-516 684,-492 838,-492 838,-516"/>
-<text text-anchor="middle" x="761" y="-501.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%translate_Xc</text>
+<g id="a_call~~graph~~CallGraph_node329"><a xlink:href="../proc/translate_xc~3.html" xlink:title="nurbs_surface%translate_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="842.5,-2196 679.5,-2196 679.5,-2172 842.5,-2172 842.5,-2196"/>
+<text text-anchor="middle" x="761" y="-2181.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%translate_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~translate_xg -->
 <g id="call~~graph~~CallGraph_node330" class="node">
 <title>proc~translate_xg</title>
-<g id="a_call~~graph~~CallGraph_node330"><a xlink:href="../proc/translate_xg.html" xlink:title="nurbs_volume%translate_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="843,-3298 679,-3298 679,-3274 843,-3274 843,-3298"/>
-<text text-anchor="middle" x="761" y="-3283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%translate_Xg</text>
+<g id="a_call~~graph~~CallGraph_node330"><a xlink:href="../proc/translate_xg.html" xlink:title="nurbs_curve%translate_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="838,-5654 684,-5654 684,-5630 838,-5630 838,-5654"/>
+<text text-anchor="middle" x="761" y="-5639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%translate_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~translate_xg~2 -->
 <g id="call~~graph~~CallGraph_node331" class="node">
 <title>proc~translate_xg~2</title>
-<g id="a_call~~graph~~CallGraph_node331"><a xlink:href="../proc/translate_xg~2.html" xlink:title="nurbs_surface%translate_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="843,-2012 679,-2012 679,-1988 843,-1988 843,-2012"/>
-<text text-anchor="middle" x="761" y="-1997.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%translate_Xg</text>
+<g id="a_call~~graph~~CallGraph_node331"><a xlink:href="../proc/translate_xg~2.html" xlink:title="nurbs_volume%translate_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="843,-3810 679,-3810 679,-3786 843,-3786 843,-3810"/>
+<text text-anchor="middle" x="761" y="-3795.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%translate_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~translate_xg~3 -->
 <g id="call~~graph~~CallGraph_node332" class="node">
 <title>proc~translate_xg~3</title>
-<g id="a_call~~graph~~CallGraph_node332"><a xlink:href="../proc/translate_xg~3.html" xlink:title="nurbs_curve%translate_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="838,-600 684,-600 684,-576 838,-576 838,-600"/>
-<text text-anchor="middle" x="761" y="-585.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%translate_Xg</text>
+<g id="a_call~~graph~~CallGraph_node332"><a xlink:href="../proc/translate_xg~3.html" xlink:title="nurbs_surface%translate_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="843,-2948 679,-2948 679,-2924 843,-2924 843,-2948"/>
+<text text-anchor="middle" x="761" y="-2933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%translate_Xg</text>
 </a>
 </g>
 </g>
@@ -7473,1627 +7473,1627 @@ <h1>Procedures</h1>
 <g id="call~~graph~~CallGraph_node335" class="node">
 <title>program~compute_area</title>
 <g id="a_call~~graph~~CallGraph_node335"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="153,-4306 64,-4306 64,-4282 153,-4282 153,-4306"/>
-<text text-anchor="middle" x="108.5" y="-4291.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="153,-3928 64,-3928 64,-3904 153,-3904 153,-3928"/>
+<text text-anchor="middle" x="108.5" y="-3913.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;none~set~2 -->
+<!-- program~compute_area&#45;&gt;none~set~3 -->
 <g id="call~~graph~~CallGraph_edge422" class="edge">
-<title>program~compute_area&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0076" d="M153.15,-4289.9C305.73,-4275.16 808.44,-4222.81 855,-4169 914.92,-4099.75 833.99,-2592.66 891,-2521 899.27,-2510.6 911.2,-2504.16 923.92,-2500.24"/>
-<polygon fill="#ff0076" stroke="#ff0076" points="924.94,-2503.6 933.75,-2497.72 923.19,-2496.82 924.94,-2503.6"/>
+<title>program~compute_area&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0076" d="M118.14,-3903.71C165.29,-3837.57 399.14,-3521.12 667,-3361 741.94,-3316.2 788.63,-3360.73 855,-3304 937.57,-3233.42 973.68,-3100.45 985.16,-3048.04"/>
+<polygon fill="#ff0076" stroke="#ff0076" points="988.61,-3048.63 987.24,-3038.13 981.76,-3047.19 988.61,-3048.63"/>
 </g>
 <!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="call~~graph~~CallGraph_edge423" class="edge">
 <title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0076" d="M148.78,-4306.02C186.78,-4317.65 244.51,-4335.31 285.61,-4347.89"/>
-<polygon fill="#ff0076" stroke="#ff0076" points="284.83,-4351.31 295.41,-4350.89 286.88,-4344.61 284.83,-4351.31"/>
+<path fill="none" stroke="#ff0076" d="M111.44,-3928.33C122.51,-3997.93 179.78,-4348.62 253,-4629 275.82,-4716.4 311.43,-4817.96 327.12,-4861.45"/>
+<polygon fill="#ff0076" stroke="#ff0076" points="323.88,-4862.78 330.58,-4870.98 330.46,-4860.39 323.88,-4862.78"/>
 </g>
 <!-- program~compute_length -->
 <g id="call~~graph~~CallGraph_node336" class="node">
 <title>program~compute_length</title>
 <g id="a_call~~graph~~CallGraph_node336"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="158,-1577 59,-1577 59,-1553 158,-1553 158,-1577"/>
-<text text-anchor="middle" x="108.5" y="-1562.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="158,-5849 59,-5849 59,-5825 158,-5825 158,-5849"/>
+<text text-anchor="middle" x="108.5" y="-5834.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;none~set~3 -->
+<!-- program~compute_length&#45;&gt;none~set -->
 <g id="call~~graph~~CallGraph_edge424" class="edge">
-<title>program~compute_length&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0072" d="M109.98,-1552.97C115.23,-1424.31 163.35,-304.52 253,-191 368.94,-44.18 479.94,-117.21 667,-115 750.55,-114.01 793.97,-57.93 855,-115 898.6,-155.77 873.36,-593.98 891,-651 908.93,-708.95 950.42,-768.07 973.43,-797.99"/>
-<polygon fill="#ff0072" stroke="#ff0072" points="970.74,-800.24 979.66,-805.97 976.26,-795.94 970.74,-800.24"/>
+<title>program~compute_length&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0072" d="M151.25,-5849.07C243.71,-5875.59 472.95,-5940.25 667,-5986 757.69,-6007.38 863.66,-6028.29 928.67,-6040.67"/>
+<polygon fill="#ff0072" stroke="#ff0072" points="928.27,-6044.15 938.74,-6042.58 929.57,-6037.28 928.27,-6044.15"/>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="call~~graph~~CallGraph_edge425" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#ff0072" d="M111.52,-1577.42C132.13,-1704.3 304.24,-2763.65 331.4,-2930.83"/>
-<polygon fill="#ff0072" stroke="#ff0072" points="327.95,-2931.41 333.01,-2940.72 334.86,-2930.29 327.95,-2931.41"/>
+<path fill="none" stroke="#ff0072" d="M136.7,-5824.94C177.16,-5806.99 253.29,-5773.23 298.54,-5753.17"/>
+<polygon fill="#ff0072" stroke="#ff0072" points="299.98,-5756.36 307.7,-5749.11 297.14,-5749.96 299.98,-5756.36"/>
 </g>
 <!-- program~compute_volume -->
 <g id="call~~graph~~CallGraph_node337" class="node">
 <title>program~compute_volume</title>
 <g id="a_call~~graph~~CallGraph_node337"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="161,-4400 56,-4400 56,-4376 161,-4376 161,-4400"/>
-<text text-anchor="middle" x="108.5" y="-4385.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="161,-4896 56,-4896 56,-4872 161,-4872 161,-4896"/>
+<text text-anchor="middle" x="108.5" y="-4881.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;none~set -->
+<!-- program~compute_volume&#45;&gt;none~set~2 -->
 <g id="call~~graph~~CallGraph_edge426" class="edge">
-<title>program~compute_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff006d" d="M142.46,-4375.95C171.3,-4365.77 214.49,-4351.38 253,-4342 384.83,-4309.88 764.74,-4341.31 855,-4240 956.25,-4126.35 794.98,-3674.1 891,-3556 899.4,-3545.67 911.38,-3539.16 924.11,-3535.13"/>
-<polygon fill="#ff006d" stroke="#ff006d" points="925.19,-3538.46 933.95,-3532.5 923.38,-3531.7 925.19,-3538.46"/>
+<title>program~compute_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff006d" d="M111.24,-4871.76C118.51,-4825.46 151.04,-4660.02 253,-4587 362.58,-4508.52 738.14,-4580.17 855,-4513 857.11,-4511.79 939.62,-4402.3 974.34,-4356.15"/>
+<polygon fill="#ff006d" stroke="#ff006d" points="977.21,-4358.16 980.43,-4348.07 971.62,-4353.95 977.21,-4358.16"/>
 </g>
 <!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="call~~graph~~CallGraph_edge427" class="edge">
 <title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#ff006d" d="M161.23,-4399.7C194.13,-4407.14 236.95,-4416.83 271.85,-4424.72"/>
-<polygon fill="#ff006d" stroke="#ff006d" points="271.42,-4428.21 281.94,-4427 272.96,-4421.38 271.42,-4428.21"/>
+<path fill="none" stroke="#ff006d" d="M117,-4896.38C149.85,-4950.56 281.16,-5167.18 322.48,-5235.35"/>
+<polygon fill="#ff006d" stroke="#ff006d" points="319.52,-5237.22 327.7,-5243.95 325.51,-5233.59 319.52,-5237.22"/>
 </g>
 <!-- program~example1_curve -->
 <g id="call~~graph~~CallGraph_node338" class="node">
 <title>program~example1_curve</title>
 <g id="a_call~~graph~~CallGraph_node338"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="593,-726 493,-726 493,-702 593,-702 593,-726"/>
-<text text-anchor="middle" x="543" y="-711.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="593,-5906 493,-5906 493,-5882 593,-5882 593,-5906"/>
+<text text-anchor="middle" x="543" y="-5891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;none~get_knot~3 -->
+<!-- program~example1_curve&#45;&gt;none~get_knot -->
 <g id="call~~graph~~CallGraph_edge428" class="edge">
-<title>program~example1_curve&#45;&gt;none~get_knot~3</title>
-<path fill="none" stroke="#ff0069" d="M544.83,-726.18C548.7,-773.04 569.26,-943.21 667,-1025 732.37,-1079.71 800.33,-997.59 855,-1063 915.8,-1135.74 830.59,-2695.94 891,-2769 897.2,-2776.5 905.36,-2781.73 914.34,-2785.33"/>
-<polygon fill="#ff0069" stroke="#ff0069" points="913.35,-2788.69 923.94,-2788.51 915.55,-2782.04 913.35,-2788.69"/>
+<title>program~example1_curve&#45;&gt;none~get_knot</title>
+<path fill="none" stroke="#ff0069" d="M548.68,-5906.3C561.8,-5938.99 602.27,-6028.46 667,-6071 738.24,-6117.82 799,-6044.73 855,-6109 939.83,-6206.37 806.69,-6591.18 891,-6689 897.31,-6696.32 905.49,-6701.46 914.44,-6705.02"/>
+<polygon fill="#ff0069" stroke="#ff0069" points="913.4,-6708.36 924,-6708.18 915.6,-6701.72 913.4,-6708.36"/>
 </g>
-<!-- program~example1_curve&#45;&gt;none~set~3 -->
+<!-- program~example1_curve&#45;&gt;none~set -->
 <g id="call~~graph~~CallGraph_edge429" class="edge">
-<title>program~example1_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0069" d="M553.16,-726.18C571.61,-749.57 615.9,-800.15 667,-819 753.57,-850.92 862.32,-841.33 928.82,-830.45"/>
-<polygon fill="#ff0069" stroke="#ff0069" points="929.45,-833.89 938.72,-828.77 928.28,-826.99 929.45,-833.89"/>
+<title>program~example1_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0069" d="M568.5,-5906.18C592.98,-5918.01 631.94,-5935.92 667,-5948 748.53,-5976.09 778.21,-5956.76 855,-5996 873.55,-6005.48 872.49,-6016.45 891,-6026 902.77,-6032.08 916.09,-6036.82 929.04,-6040.5"/>
+<polygon fill="#ff0069" stroke="#ff0069" points="928.27,-6043.91 938.84,-6043.1 930.07,-6037.15 928.27,-6043.91"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~create~3 -->
+<!-- program~example1_curve&#45;&gt;proc~create -->
 <g id="call~~graph~~CallGraph_edge430" class="edge">
-<title>program~example1_curve&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#ff0069" d="M571.24,-701.93C591.33,-691.5 617.44,-674.39 631,-651 706.33,-521.07 587.72,-442.56 667,-315 678.74,-296.11 699.02,-282.2 717.65,-272.65"/>
-<polygon fill="#ff0069" stroke="#ff0069" points="719.42,-275.68 726.9,-268.18 716.38,-269.38 719.42,-275.68"/>
+<title>program~example1_curve&#45;&gt;proc~create</title>
+<path fill="none" stroke="#ff0069" d="M548.05,-5906.12C561.42,-5946.46 604.78,-6080.04 631,-6193 652.02,-6283.54 602.91,-6331.69 667,-6399 673.45,-6405.78 681.59,-6410.59 690.36,-6413.97"/>
+<polygon fill="#ff0069" stroke="#ff0069" points="689.48,-6417.36 700.07,-6417.1 691.63,-6410.7 689.48,-6417.36"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
 <g id="call~~graph~~CallGraph_edge431" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
-<path fill="none" stroke="#ff0069" d="M569.75,-701.95C589.57,-691.33 616.03,-673.97 631,-651 672.69,-587.02 613.3,-537.29 667,-483 667.95,-482.04 668.93,-481.12 669.95,-480.24"/>
-<polygon fill="#ff0069" stroke="#ff0069" points="672.23,-482.91 678.27,-474.2 668.12,-477.24 672.23,-482.91"/>
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
+<path fill="none" stroke="#ff0069" d="M593.01,-5894C614.57,-5894 640.64,-5894 665.71,-5894"/>
+<polygon fill="#ff0069" stroke="#ff0069" points="666,-5897.5 676,-5894 666,-5890.5 666,-5897.5"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~export_xc~3 -->
+<!-- program~example1_curve&#45;&gt;proc~export_xc -->
 <g id="call~~graph~~CallGraph_edge432" class="edge">
-<title>program~example1_curve&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#ff0069" d="M593.01,-723.53C621.09,-728.99 656.84,-735.94 688.06,-742.01"/>
-<polygon fill="#ff0069" stroke="#ff0069" points="687.53,-745.47 698.02,-743.95 688.87,-738.6 687.53,-745.47"/>
+<title>program~example1_curve&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0069" d="M545.11,-5906.27C549.94,-5952 573.3,-6113.87 667,-6193 671.35,-6196.67 676.2,-6199.74 681.35,-6202.29"/>
+<polygon fill="#ff0069" stroke="#ff0069" points="680.33,-6205.65 690.9,-6206.35 683.07,-6199.21 680.33,-6205.65"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~export_xg~3 -->
+<!-- program~example1_curve&#45;&gt;proc~export_xg -->
 <g id="call~~graph~~CallGraph_edge433" class="edge">
-<title>program~example1_curve&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff0069" d="M593.01,-714C618.73,-714 650.89,-714 680.1,-714"/>
-<polygon fill="#ff0069" stroke="#ff0069" points="680.3,-717.5 690.3,-714 680.3,-710.5 680.3,-717.5"/>
+<title>program~example1_curve&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#ff0069" d="M546,-5906.27C553.47,-5947.85 583.66,-6084.53 667,-6151 671.29,-6154.42 676.02,-6157.3 681.02,-6159.74"/>
+<polygon fill="#ff0069" stroke="#ff0069" points="679.67,-6162.97 690.25,-6163.65 682.4,-6156.52 679.67,-6162.97"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~finalize~3 -->
+<!-- program~example1_curve&#45;&gt;proc~finalize -->
 <g id="call~~graph~~CallGraph_edge434" class="edge">
-<title>program~example1_curve&#45;&gt;proc~finalize~3</title>
-<path fill="none" stroke="#ff0069" d="M571.14,-701.87C591.18,-691.41 617.26,-674.29 631,-651 697.88,-537.61 578.69,-454.63 667,-357 672.83,-350.56 680.17,-345.88 688.17,-342.5"/>
-<polygon fill="#ff0069" stroke="#ff0069" points="689.53,-345.73 697.8,-339.11 687.2,-339.13 689.53,-345.73"/>
+<title>program~example1_curve&#45;&gt;proc~finalize</title>
+<path fill="none" stroke="#ff0069" d="M547.33,-5906.02C564.45,-5967.53 642.71,-6245.58 667,-6277 681.17,-6295.33 702.76,-6309.53 721.57,-6319.4"/>
+<polygon fill="#ff0069" stroke="#ff0069" points="720.03,-6322.54 730.54,-6323.89 723.17,-6316.28 720.03,-6322.54"/>
 </g>
 <!-- program~example1_curve&#45;&gt;proc~get_degree -->
 <g id="call~~graph~~CallGraph_edge435" class="edge">
 <title>program~example1_curve&#45;&gt;proc~get_degree</title>
-<path fill="none" stroke="#ff0069" d="M567.03,-702C586.31,-690.96 613.42,-672.99 631,-651 656.37,-619.28 635.78,-592.98 667,-567 670.29,-564.26 673.87,-561.86 677.64,-559.76"/>
-<polygon fill="#ff0069" stroke="#ff0069" points="679.25,-562.87 686.74,-555.38 676.22,-556.56 679.25,-562.87"/>
+<path fill="none" stroke="#ff0069" d="M553.54,-5881.99C571.26,-5859.15 609.4,-5807.29 631,-5758 656.27,-5700.34 621.71,-5664.73 667,-5621 670.3,-5617.81 673.98,-5615.06 677.92,-5612.7"/>
+<polygon fill="#ff0069" stroke="#ff0069" points="679.58,-5615.79 686.9,-5608.13 676.4,-5609.55 679.58,-5615.79"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
 <g id="call~~graph~~CallGraph_edge436" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
-<path fill="none" stroke="#ff0069" d="M548.38,-726.27C561.02,-759.81 600.93,-853.5 667,-899 669.88,-900.98 672.92,-902.78 676.07,-904.42"/>
-<polygon fill="#ff0069" stroke="#ff0069" points="674.67,-907.62 685.22,-908.59 677.57,-901.25 674.67,-907.62"/>
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
+<path fill="none" stroke="#ff0069" d="M554.1,-5881.75C572.39,-5858.91 610.95,-5807.64 631,-5758 661.38,-5682.75 610.3,-5637.05 667,-5579 669.85,-5576.09 673,-5573.54 676.39,-5571.31"/>
+<polygon fill="#ff0069" stroke="#ff0069" points="678.17,-5574.33 685.22,-5566.42 674.77,-5568.21 678.17,-5574.33"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
 <g id="call~~graph~~CallGraph_edge437" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
-<path fill="none" stroke="#ff0069" d="M551.26,-726.04C568.1,-752.91 612.54,-818.03 667,-852 673.6,-856.12 680.86,-859.6 688.33,-862.53"/>
-<polygon fill="#ff0069" stroke="#ff0069" points="687.28,-865.87 697.87,-865.97 689.65,-859.29 687.28,-865.87"/>
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
+<path fill="none" stroke="#ff0069" d="M551.75,-5881.82C578.08,-5840.5 662.66,-5708.02 667,-5705 669.28,-5703.41 671.66,-5701.95 674.11,-5700.59"/>
+<polygon fill="#ff0069" stroke="#ff0069" points="675.83,-5703.64 683.3,-5696.13 672.78,-5697.35 675.83,-5703.64"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~rotate_xc~3 -->
+<!-- program~example1_curve&#45;&gt;proc~rotate_xc -->
 <g id="call~~graph~~CallGraph_edge438" class="edge">
-<title>program~example1_curve&#45;&gt;proc~rotate_xc~3</title>
-<path fill="none" stroke="#ff0069" d="M546.8,-726.18C556.28,-764.49 590.89,-883.36 667,-941 671.73,-944.58 676.97,-947.58 682.47,-950.07"/>
-<polygon fill="#ff0069" stroke="#ff0069" points="681.35,-953.39 691.93,-953.82 683.92,-946.89 681.35,-953.39"/>
+<title>program~example1_curve&#45;&gt;proc~rotate_xc</title>
+<path fill="none" stroke="#ff0069" d="M555.11,-5881.65C574.66,-5859.05 614.67,-5808.69 631,-5758 676.25,-5617.56 592.43,-5222.32 667,-5095 678.16,-5075.95 698.18,-5062.08 716.79,-5052.59"/>
+<polygon fill="#ff0069" stroke="#ff0069" points="718.55,-5055.63 726.05,-5048.15 715.52,-5049.32 718.55,-5055.63"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~rotate_xg~3 -->
+<!-- program~example1_curve&#45;&gt;proc~rotate_xg -->
 <g id="call~~graph~~CallGraph_edge439" class="edge">
-<title>program~example1_curve&#45;&gt;proc~rotate_xg~3</title>
-<path fill="none" stroke="#ff0069" d="M545.72,-726.23C552.39,-768.98 580.69,-912.92 667,-983 671.42,-986.59 676.32,-989.59 681.51,-992.1"/>
-<polygon fill="#ff0069" stroke="#ff0069" points="680.53,-995.48 691.1,-996.1 683.23,-989.02 680.53,-995.48"/>
+<title>program~example1_curve&#45;&gt;proc~rotate_xg</title>
+<path fill="none" stroke="#ff0069" d="M554.78,-5882C574.19,-5859.57 614.49,-5808.93 631,-5758 652.31,-5692.25 622.3,-5189.72 667,-5137 671.22,-5132.03 676.33,-5128.09 681.98,-5124.98"/>
+<polygon fill="#ff0069" stroke="#ff0069" points="683.58,-5128.1 691.23,-5120.76 680.68,-5121.73 683.58,-5128.1"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~show~3 -->
+<!-- program~example1_curve&#45;&gt;proc~show -->
 <g id="call~~graph~~CallGraph_edge440" class="edge">
-<title>program~example1_curve&#45;&gt;proc~show~3</title>
-<path fill="none" stroke="#ff0069" d="M570.41,-701.9C590.34,-691.35 616.61,-674.11 631,-651 681.05,-570.61 601.81,-509.69 667,-441 674.25,-433.36 683.65,-428.22 693.67,-424.81"/>
-<polygon fill="#ff0069" stroke="#ff0069" points="694.76,-428.14 703.43,-422.04 692.85,-421.4 694.76,-428.14"/>
+<title>program~example1_curve&#45;&gt;proc~show</title>
+<path fill="none" stroke="#ff0069" d="M546.72,-5906.09C559.38,-5961.25 614.05,-6188.24 667,-6235 674.54,-6241.66 683.73,-6246.34 693.38,-6249.6"/>
+<polygon fill="#ff0069" stroke="#ff0069" points="692.55,-6253 703.13,-6252.42 694.49,-6246.28 692.55,-6253"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~translate_xc~3 -->
+<!-- program~example1_curve&#45;&gt;proc~translate_xc -->
 <g id="call~~graph~~CallGraph_edge441" class="edge">
-<title>program~example1_curve&#45;&gt;proc~translate_xc~3</title>
-<path fill="none" stroke="#ff0069" d="M568.93,-701.89C588.56,-691.13 615.16,-673.6 631,-651 664.42,-603.3 624.68,-565.01 667,-525 669.47,-522.67 672.13,-520.58 674.95,-518.7"/>
-<polygon fill="#ff0069" stroke="#ff0069" points="676.84,-521.65 683.83,-513.69 673.4,-515.56 676.84,-521.65"/>
+<title>program~example1_curve&#45;&gt;proc~translate_xc</title>
+<path fill="none" stroke="#ff0069" d="M550.45,-5881.81C566.21,-5853.3 609.63,-5782.02 667,-5747 669.99,-5745.18 673.11,-5743.51 676.34,-5741.99"/>
+<polygon fill="#ff0069" stroke="#ff0069" points="677.79,-5745.18 685.65,-5738.07 675.07,-5738.73 677.79,-5745.18"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~translate_xg~3 -->
+<!-- program~example1_curve&#45;&gt;proc~translate_xg -->
 <g id="call~~graph~~CallGraph_edge442" class="edge">
-<title>program~example1_curve&#45;&gt;proc~translate_xg~3</title>
-<path fill="none" stroke="#ff0069" d="M563.31,-701.92C581.62,-690.04 609.47,-670.84 631,-651 649.08,-634.34 645.94,-621.69 667,-609 670,-607.19 673.13,-605.54 676.37,-604.04"/>
-<polygon fill="#ff0069" stroke="#ff0069" points="677.81,-607.23 685.69,-600.15 675.12,-600.76 677.81,-607.23"/>
+<title>program~example1_curve&#45;&gt;proc~translate_xg</title>
+<path fill="none" stroke="#ff0069" d="M553.06,-5881.77C569.98,-5858.54 606.84,-5806.09 631,-5758 651.27,-5717.66 632.92,-5692.61 667,-5663 669.42,-5660.9 672.01,-5658.99 674.72,-5657.27"/>
+<polygon fill="#ff0069" stroke="#ff0069" points="676.66,-5660.2 683.78,-5652.35 673.32,-5654.05 676.66,-5660.2"/>
 </g>
 <!-- program~example3_surface -->
 <g id="call~~graph~~CallGraph_node339" class="node">
 <title>program~example3_surface</title>
 <g id="a_call~~graph~~CallGraph_node339"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="598,-2113 488,-2113 488,-2089 598,-2089 598,-2113"/>
-<text text-anchor="middle" x="543" y="-2098.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="598,-2822 488,-2822 488,-2798 598,-2798 598,-2822"/>
+<text text-anchor="middle" x="543" y="-2807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;none~get_degree~2 -->
+<!-- program~example3_surface&#45;&gt;none~get_degree~3 -->
 <g id="call~~graph~~CallGraph_edge443" class="edge">
-<title>program~example3_surface&#45;&gt;none~get_degree~2</title>
-<path fill="none" stroke="#ff0065" d="M564.47,-2113.03C582.38,-2123.77 608.91,-2140.2 631,-2156 647.71,-2167.95 648.5,-2176.06 667,-2185 671.34,-2187.1 675.89,-2188.99 680.55,-2190.69"/>
-<polygon fill="#ff0065" stroke="#ff0065" points="679.65,-2194.08 690.24,-2193.93 681.87,-2187.44 679.65,-2194.08"/>
+<title>program~example3_surface&#45;&gt;none~get_degree~3</title>
+<path fill="none" stroke="#ff0065" d="M551.26,-2797.96C568.1,-2771.09 612.54,-2705.97 667,-2672 673.6,-2667.88 680.86,-2664.4 688.33,-2661.47"/>
+<polygon fill="#ff0065" stroke="#ff0065" points="689.65,-2664.71 697.87,-2658.03 687.28,-2658.13 689.65,-2664.71"/>
 </g>
-<!-- program~example3_surface&#45;&gt;none~get_knot~2 -->
+<!-- program~example3_surface&#45;&gt;none~get_knot~3 -->
 <g id="call~~graph~~CallGraph_edge444" class="edge">
-<title>program~example3_surface&#45;&gt;none~get_knot~2</title>
-<path fill="none" stroke="#ff0065" d="M589.91,-2088.95C605,-2082.87 620.56,-2073.93 631,-2061 677.33,-2003.61 610.12,-1945.95 667,-1899 702.49,-1869.71 825.29,-1874.31 908.7,-1881.37"/>
-<polygon fill="#ff0065" stroke="#ff0065" points="908.4,-1884.85 918.66,-1882.24 909.01,-1877.88 908.4,-1884.85"/>
+<title>program~example3_surface&#45;&gt;none~get_knot~3</title>
+<path fill="none" stroke="#ff0065" d="M553.16,-2797.82C571.61,-2774.43 615.9,-2723.85 667,-2705 745.39,-2676.09 773.44,-2686.85 855,-2705 894.18,-2713.72 935.43,-2735.13 961.76,-2750.57"/>
+<polygon fill="#ff0065" stroke="#ff0065" points="960.04,-2753.62 970.42,-2755.75 963.64,-2747.61 960.04,-2753.62"/>
 </g>
-<!-- program~example3_surface&#45;&gt;none~set~2 -->
+<!-- program~example3_surface&#45;&gt;none~set~3 -->
 <g id="call~~graph~~CallGraph_edge445" class="edge">
-<title>program~example3_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0065" d="M571.17,-2088.82C595.66,-2078.55 632.94,-2064.65 667,-2059 749.43,-2045.31 793.18,-2002.79 855,-2059 917.43,-2115.77 845.96,-2365.65 891,-2437 903.31,-2456.5 924.61,-2470.42 944.25,-2479.83"/>
-<polygon fill="#ff0065" stroke="#ff0065" points="942.87,-2483.04 953.42,-2483.96 945.75,-2476.66 942.87,-2483.04"/>
+<title>program~example3_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0065" d="M566.51,-2822.16C586.27,-2833.95 614.37,-2853.61 631,-2878 662.6,-2924.36 623.46,-2963.61 667,-2999 705.03,-3029.92 841.02,-3031.23 923.78,-3028.94"/>
+<polygon fill="#ff0065" stroke="#ff0065" points="923.96,-3032.43 933.85,-3028.63 923.75,-3025.44 923.96,-3032.43"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~create~2 -->
+<!-- program~example3_surface&#45;&gt;proc~create~3 -->
 <g id="call~~graph~~CallGraph_edge446" class="edge">
-<title>program~example3_surface&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0065" d="M551.11,-2113.17C577.23,-2157.89 666.42,-2310.57 667,-2311 672.66,-2315.14 678.98,-2318.48 685.61,-2321.18"/>
-<polygon fill="#ff0065" stroke="#ff0065" points="684.88,-2324.63 695.48,-2324.69 687.23,-2318.04 684.88,-2324.63"/>
+<title>program~example3_surface&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0065" d="M546.8,-2797.82C556.28,-2759.51 590.89,-2640.64 667,-2583 672.59,-2578.77 678.87,-2575.36 685.46,-2572.63"/>
+<polygon fill="#ff0065" stroke="#ff0065" points="687.08,-2575.76 695.3,-2569.08 684.71,-2569.18 687.08,-2575.76"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
 <g id="call~~graph~~CallGraph_edge447" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
-<path fill="none" stroke="#ff0065" d="M585.88,-2088.84C601.61,-2082.59 618.65,-2073.57 631,-2061 658.9,-2032.61 641.07,-2009.2 667,-1979 682.42,-1961.05 704.66,-1946.67 723.53,-1936.6"/>
-<polygon fill="#ff0065" stroke="#ff0065" points="725.18,-1939.68 732.47,-1932 721.98,-1933.46 725.18,-1939.68"/>
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#ff0065" d="M564.61,-2822.04C583.87,-2834.14 612.37,-2854.36 631,-2878 654.88,-2908.3 637.06,-2932.66 667,-2957 668.59,-2958.29 670.24,-2959.51 671.95,-2960.65"/>
+<polygon fill="#ff0065" stroke="#ff0065" points="670.47,-2963.84 680.89,-2965.8 673.97,-2957.78 670.47,-2963.84"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~export_xc~2 -->
+<!-- program~example3_surface&#45;&gt;proc~export_xc~3 -->
 <g id="call~~graph~~CallGraph_edge448" class="edge">
-<title>program~example3_surface&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff0065" d="M550.29,-2113.43C566.21,-2145.39 608.42,-2233.32 631,-2311 656.94,-2400.25 602.91,-2449.69 667,-2517 670.02,-2520.17 673.4,-2522.91 677.05,-2525.27"/>
-<polygon fill="#ff0065" stroke="#ff0065" points="675.52,-2528.42 685.98,-2530.13 678.87,-2522.28 675.52,-2528.42"/>
+<title>program~example3_surface&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff0065" d="M567.96,-2822.19C588.11,-2833.75 615.96,-2853.04 631,-2878 677.84,-2955.73 604.28,-3013.4 667,-3079 669.88,-3082.01 673.09,-3084.63 676.54,-3086.91"/>
+<polygon fill="#ff0065" stroke="#ff0065" points="675.11,-3090.12 685.55,-3091.9 678.5,-3083.99 675.11,-3090.12"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~export_xg~2 -->
+<!-- program~example3_surface&#45;&gt;proc~export_xg~3 -->
 <g id="call~~graph~~CallGraph_edge449" class="edge">
-<title>program~example3_surface&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff0065" d="M550.43,-2113.4C566.66,-2145.26 609.54,-2233 631,-2311 645.77,-2364.69 629.19,-2518.12 667,-2559 669.83,-2562.06 673,-2564.72 676.41,-2567.03"/>
-<polygon fill="#ff0065" stroke="#ff0065" points="674.94,-2570.21 685.37,-2572.07 678.38,-2564.11 674.94,-2570.21"/>
+<title>program~example3_surface&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff0065" d="M568.15,-2822.08C588.42,-2833.57 616.34,-2852.82 631,-2878 685.93,-2972.35 592.75,-3040.96 667,-3121 669.83,-3124.05 673.01,-3126.71 676.43,-3129.02"/>
+<polygon fill="#ff0065" stroke="#ff0065" points="674.95,-3132.2 685.38,-3134.06 678.39,-3126.1 674.95,-3132.2"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~finalize~2 -->
+<!-- program~example3_surface&#45;&gt;proc~finalize~3 -->
 <g id="call~~graph~~CallGraph_edge450" class="edge">
-<title>program~example3_surface&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0065" d="M573.22,-2113.05C592.17,-2122.24 616.03,-2136.63 631,-2156 663.22,-2197.71 628.16,-2233.37 667,-2269 671.8,-2273.41 677.33,-2276.95 683.24,-2279.8"/>
-<polygon fill="#ff0065" stroke="#ff0065" points="682.22,-2283.17 692.8,-2283.73 684.88,-2276.69 682.22,-2283.17"/>
+<title>program~example3_surface&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0065" d="M548.38,-2797.73C561.02,-2764.19 600.93,-2670.5 667,-2625 671.98,-2621.57 677.43,-2618.69 683.11,-2616.28"/>
+<polygon fill="#ff0065" stroke="#ff0065" points="684.72,-2619.42 692.86,-2612.64 682.27,-2612.86 684.72,-2619.42"/>
 </g>
 <!-- program~example3_surface&#45;&gt;proc~generate_xc~2 -->
 <g id="call~~graph~~CallGraph_edge451" class="edge">
 <title>program~example3_surface&#45;&gt;proc~generate_xc~2</title>
-<path fill="none" stroke="#ff0065" d="M598.23,-2095.73C632.77,-2092.37 677.16,-2088.05 710.71,-2084.79"/>
-<polygon fill="#ff0065" stroke="#ff0065" points="711.13,-2088.27 720.74,-2083.82 710.45,-2081.3 711.13,-2088.27"/>
+<path fill="none" stroke="#ff0065" d="M563.75,-2822.1C587.49,-2836.15 628.88,-2859.18 667,-2873 680.9,-2878.04 696.42,-2882.12 710.74,-2885.29"/>
+<polygon fill="#ff0065" stroke="#ff0065" points="710.41,-2888.8 720.92,-2887.45 711.86,-2881.95 710.41,-2888.8"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
 <g id="call~~graph~~CallGraph_edge452" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
-<path fill="none" stroke="#ff0065" d="M598.23,-2106.27C620.08,-2108.4 645.89,-2110.91 670.39,-2113.29"/>
-<polygon fill="#ff0065" stroke="#ff0065" points="670.14,-2116.78 680.43,-2114.26 670.81,-2109.81 670.14,-2116.78"/>
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#ff0065" d="M563.75,-2797.9C587.49,-2783.85 628.88,-2760.82 667,-2747 673.38,-2744.69 680.1,-2742.58 686.89,-2740.67"/>
+<polygon fill="#ff0065" stroke="#ff0065" points="688.09,-2743.97 696.85,-2738 686.28,-2737.2 688.09,-2743.97"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
 <g id="call~~graph~~CallGraph_edge453" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
-<path fill="none" stroke="#ff0065" d="M576.07,-2113.01C600.72,-2121.97 635.73,-2134.16 667,-2143 675.13,-2145.3 683.71,-2147.51 692.25,-2149.59"/>
-<polygon fill="#ff0065" stroke="#ff0065" points="691.67,-2153.05 702.21,-2151.96 693.29,-2146.24 691.67,-2153.05"/>
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#ff0065" d="M598.23,-2799.46C625.39,-2794.17 658.65,-2787.71 687.93,-2782.01"/>
+<polygon fill="#ff0065" stroke="#ff0065" points="688.96,-2785.38 698.1,-2780.04 687.62,-2778.51 688.96,-2785.38"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~rotate_xc~2 -->
+<!-- program~example3_surface&#45;&gt;proc~rotate_xc~3 -->
 <g id="call~~graph~~CallGraph_edge454" class="edge">
-<title>program~example3_surface&#45;&gt;proc~rotate_xc~2</title>
-<path fill="none" stroke="#ff0065" d="M592.53,-2088.82C607.09,-2082.8 621.66,-2073.94 631,-2061 716.28,-1942.78 569.86,-1843.69 667,-1735 670.27,-1731.34 674.04,-1728.24 678.14,-1725.63"/>
-<polygon fill="#ff0065" stroke="#ff0065" points="679.79,-1728.71 686.97,-1720.92 676.5,-1722.54 679.79,-1728.71"/>
+<title>program~example3_surface&#45;&gt;proc~rotate_xc~3</title>
+<path fill="none" stroke="#ff0065" d="M545.72,-2797.77C552.39,-2755.02 580.69,-2611.08 667,-2541 670.32,-2538.3 673.93,-2535.93 677.72,-2533.86"/>
+<polygon fill="#ff0065" stroke="#ff0065" points="679.32,-2536.97 686.86,-2529.52 676.33,-2530.64 679.32,-2536.97"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~rotate_xg~2 -->
+<!-- program~example3_surface&#45;&gt;proc~rotate_xg~3 -->
 <g id="call~~graph~~CallGraph_edge455" class="edge">
-<title>program~example3_surface&#45;&gt;proc~rotate_xg~2</title>
-<path fill="none" stroke="#ff0065" d="M591.95,-2088.92C606.66,-2082.89 621.46,-2074 631,-2061 706.26,-1958.42 581.45,-1871.18 667,-1777 670.15,-1773.53 673.75,-1770.57 677.65,-1768.05"/>
-<polygon fill="#ff0065" stroke="#ff0065" points="679.48,-1771.04 686.61,-1763.21 676.15,-1764.88 679.48,-1771.04"/>
+<title>program~example3_surface&#45;&gt;proc~rotate_xg~3</title>
+<path fill="none" stroke="#ff0065" d="M598.23,-2820.54C625.39,-2825.83 658.65,-2832.29 687.93,-2837.99"/>
+<polygon fill="#ff0065" stroke="#ff0065" points="687.62,-2841.49 698.1,-2839.96 688.96,-2834.62 687.62,-2841.49"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~show~2 -->
+<!-- program~example3_surface&#45;&gt;proc~show~3 -->
 <g id="call~~graph~~CallGraph_edge456" class="edge">
-<title>program~example3_surface&#45;&gt;proc~show~2</title>
-<path fill="none" stroke="#ff0065" d="M549.06,-2113.2C572.04,-2168.59 665.51,-2393.75 667,-2395 673.47,-2400.43 681.06,-2404.53 689.06,-2407.61"/>
-<polygon fill="#ff0065" stroke="#ff0065" points="688,-2410.95 698.59,-2410.79 690.21,-2404.31 688,-2410.95"/>
+<title>program~example3_surface&#45;&gt;proc~show~3</title>
+<path fill="none" stroke="#ff0065" d="M567.25,-2822.16C587.22,-2833.82 615.21,-2853.28 631,-2878 668.84,-2937.23 618.38,-2981.24 667,-3032 673.24,-3038.51 680.95,-3043.43 689.26,-3047.15"/>
+<polygon fill="#ff0065" stroke="#ff0065" points="688.24,-3050.51 698.83,-3050.85 690.77,-3043.98 688.24,-3050.51"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~translate_xc~2 -->
+<!-- program~example3_surface&#45;&gt;proc~translate_xc~3 -->
 <g id="call~~graph~~CallGraph_edge457" class="edge">
-<title>program~example3_surface&#45;&gt;proc~translate_xc~2</title>
-<path fill="none" stroke="#ff0065" d="M592.63,-2088.89C607.2,-2082.88 621.74,-2074 631,-2061 678.65,-1994.06 612.63,-1754.61 667,-1693 668.36,-1691.46 669.8,-1690.03 671.31,-1688.68"/>
-<polygon fill="#ff0065" stroke="#ff0065" points="673.46,-1691.45 679.47,-1682.72 669.33,-1685.8 673.46,-1691.45"/>
+<title>program~example3_surface&#45;&gt;proc~translate_xc~3</title>
+<path fill="none" stroke="#ff0065" d="M549.02,-2797.84C564.15,-2760.69 609.52,-2645.14 631,-2545 646.94,-2470.71 616.5,-2261.76 667,-2205 668.21,-2203.64 669.49,-2202.36 670.83,-2201.15"/>
+<polygon fill="#ff0065" stroke="#ff0065" points="673.15,-2203.78 679.08,-2195.01 668.97,-2198.17 673.15,-2203.78"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~translate_xg~2 -->
+<!-- program~example3_surface&#45;&gt;proc~translate_xg~3 -->
 <g id="call~~graph~~CallGraph_edge458" class="edge">
-<title>program~example3_surface&#45;&gt;proc~translate_xg~2</title>
-<path fill="none" stroke="#ff0065" d="M577.23,-2088.85C594.07,-2081.93 614.41,-2072.38 631,-2061 649.4,-2048.38 647.66,-2037.13 667,-2026 674.21,-2021.85 682.11,-2018.34 690.17,-2015.37"/>
-<polygon fill="#ff0065" stroke="#ff0065" points="691.35,-2018.66 699.68,-2012.12 689.08,-2012.04 691.35,-2018.66"/>
+<title>program~example3_surface&#45;&gt;proc~translate_xg~3</title>
+<path fill="none" stroke="#ff0065" d="M560.89,-2822.14C578.83,-2835.27 607.74,-2857.13 631,-2878 648.08,-2893.32 646.98,-2903.79 667,-2915 670.47,-2916.95 674.12,-2918.71 677.87,-2920.31"/>
+<polygon fill="#ff0065" stroke="#ff0065" points="676.78,-2923.65 687.37,-2923.97 679.29,-2917.11 676.78,-2923.65"/>
 </g>
 <!-- program~example3_volume -->
 <g id="call~~graph~~CallGraph_node340" class="node">
 <title>program~example3_volume</title>
 <g id="a_call~~graph~~CallGraph_node340"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="598,-3361 488,-3361 488,-3337 598,-3337 598,-3361"/>
-<text text-anchor="middle" x="543" y="-3346.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="598,-3789 488,-3789 488,-3765 598,-3765 598,-3789"/>
+<text text-anchor="middle" x="543" y="-3774.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;none~get_degree -->
+<!-- program~example3_volume&#45;&gt;none~get_degree~2 -->
 <g id="call~~graph~~CallGraph_edge459" class="edge">
-<title>program~example3_volume&#45;&gt;none~get_degree</title>
-<path fill="none" stroke="#ff0061" d="M598.23,-3343.73C620.63,-3341.55 647.19,-3338.97 672.23,-3336.53"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="672.87,-3339.99 682.48,-3335.54 672.19,-3333.02 672.87,-3339.99"/>
+<title>program~example3_volume&#45;&gt;none~get_degree~2</title>
+<path fill="none" stroke="#ff0061" d="M547.47,-3764.92C558.43,-3729.08 595.84,-3622.59 667,-3571 669.11,-3569.47 671.31,-3568.05 673.59,-3566.73"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="675.35,-3569.76 682.69,-3562.12 672.19,-3563.52 675.35,-3569.76"/>
 </g>
-<!-- program~example3_volume&#45;&gt;none~get_knot -->
+<!-- program~example3_volume&#45;&gt;none~get_knot~2 -->
 <g id="call~~graph~~CallGraph_edge460" class="edge">
-<title>program~example3_volume&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0061" d="M556.25,-3361.22C576.94,-3380.89 621.05,-3418.81 667,-3433 746.83,-3457.66 791.16,-3486.91 855,-3433 928.02,-3371.34 824.85,-3289.98 891,-3221 896.24,-3215.53 902.53,-3211.32 909.36,-3208.08"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="910.97,-3211.21 918.96,-3204.25 908.38,-3204.71 910.97,-3211.21"/>
+<title>program~example3_volume&#45;&gt;none~get_knot~2</title>
+<path fill="none" stroke="#ff0061" d="M556.25,-3764.78C576.94,-3745.11 621.05,-3707.19 667,-3693 746.83,-3668.34 779.09,-3658.09 855,-3693 877.34,-3703.27 871.54,-3719.97 891,-3735 907.92,-3748.07 928.97,-3758.92 947.27,-3766.98"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="945.97,-3770.23 956.54,-3770.93 948.72,-3763.79 945.97,-3770.23"/>
 </g>
-<!-- program~example3_volume&#45;&gt;none~set -->
+<!-- program~example3_volume&#45;&gt;none~set~2 -->
 <g id="call~~graph~~CallGraph_edge461" class="edge">
-<title>program~example3_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0061" d="M550.68,-3361.34C566.06,-3390.03 604.69,-3463.72 631,-3528 650.01,-3574.44 626.25,-3605.72 667,-3635 734.85,-3683.76 784.73,-3680.2 855,-3635 887.45,-3614.13 861.5,-3580.88 891,-3556 900.49,-3547.99 912.19,-3542.42 924.17,-3538.55"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="925.15,-3541.91 933.8,-3535.8 923.22,-3535.18 925.15,-3541.91"/>
+<title>program~example3_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0061" d="M550.35,-3789.41C566.2,-3819.32 610.34,-3896.17 667,-3941 738.49,-3997.56 798.78,-3951.25 855,-4023 913.41,-4097.54 848.42,-4148.42 891,-4233 908.54,-4267.84 941.83,-4298.83 964.82,-4317.5"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="962.76,-4320.33 972.78,-4323.8 967.11,-4314.85 962.76,-4320.33"/>
 </g>
 <!-- program~example3_volume&#45;&gt;proc~cmp_degreeface -->
 <g id="call~~graph~~CallGraph_edge462" class="edge">
 <title>program~example3_volume&#45;&gt;proc~cmp_degreeface</title>
-<path fill="none" stroke="#ff0061" d="M552.21,-3336.69C569.93,-3311.16 614.43,-3252.39 667,-3223 670.48,-3221.06 674.12,-3219.29 677.87,-3217.69"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="679.3,-3220.89 687.38,-3214.04 676.79,-3214.36 679.3,-3220.89"/>
+<path fill="none" stroke="#ff0061" d="M598.23,-3771.73C615.97,-3770 636.32,-3768.02 656.46,-3766.07"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="657.02,-3769.53 666.64,-3765.08 656.35,-3762.56 657.02,-3769.53"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~cmp_elem -->
+<!-- program~example3_volume&#45;&gt;proc~cmp_elemface -->
 <g id="call~~graph~~CallGraph_edge463" class="edge">
-<title>program~example3_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0061" d="M547.04,-3361.2C559.75,-3412.86 609.07,-3618.77 631,-3791 639.58,-3858.35 623.06,-4349.24 667,-4401 669.56,-4404.02 672.45,-4406.65 675.6,-4408.95"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="674.06,-4412.12 684.43,-4414.29 677.68,-4406.13 674.06,-4412.12"/>
+<title>program~example3_volume&#45;&gt;proc~cmp_elemface</title>
+<path fill="none" stroke="#ff0061" d="M576.07,-3764.99C600.72,-3756.03 635.73,-3743.84 667,-3735 675.13,-3732.7 683.71,-3730.49 692.25,-3728.41"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="693.29,-3731.76 702.21,-3726.04 691.67,-3724.95 693.29,-3731.76"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~cmp_elemface -->
+<!-- program~example3_volume&#45;&gt;proc~cmp_elem~2 -->
 <g id="call~~graph~~CallGraph_edge464" class="edge">
-<title>program~example3_volume&#45;&gt;proc~cmp_elemface</title>
-<path fill="none" stroke="#ff0061" d="M549.12,-3336.95C563.03,-3305.74 604.73,-3221.84 667,-3181 669.61,-3179.29 672.35,-3177.71 675.17,-3176.26"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="676.79,-3179.37 684.45,-3172.06 673.9,-3173 676.79,-3179.37"/>
+<title>program~example3_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#ff0061" d="M548.48,-3789.28C563.59,-3831.41 612.8,-3974.27 631,-4097 641.13,-4165.28 623.12,-5285.71 667,-5339 669.52,-5342.05 672.37,-5344.72 675.48,-5347.05"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="673.91,-5350.19 684.26,-5352.44 677.57,-5344.22 673.91,-5350.19"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~create -->
+<!-- program~example3_volume&#45;&gt;proc~create~2 -->
 <g id="call~~graph~~CallGraph_edge465" class="edge">
-<title>program~example3_volume&#45;&gt;proc~create</title>
-<path fill="none" stroke="#ff0061" d="M546.75,-3361.25C558.31,-3413.07 603.67,-3619.54 631,-3791 641.36,-3856 622.85,-4036.18 667,-4085 672.31,-4090.87 678.88,-4095.28 686.05,-4098.57"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="684.82,-4101.85 695.41,-4102.16 687.33,-4095.31 684.82,-4101.85"/>
+<title>program~example3_volume&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#ff0061" d="M548.02,-3789.05C561.85,-3831 607.91,-3974.81 631,-4097 644.78,-4169.92 617.6,-4373.62 667,-4429 672.27,-4434.91 678.81,-4439.34 685.97,-4442.64"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="684.73,-4445.91 695.32,-4446.25 687.25,-4439.38 684.73,-4445.91"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
 <g id="call~~graph~~CallGraph_edge466" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#ff0061" d="M576.07,-3361.01C600.72,-3369.97 635.73,-3382.16 667,-3391 675.13,-3393.3 683.71,-3395.51 692.25,-3397.59"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="691.67,-3401.05 702.21,-3399.96 693.29,-3394.24 691.67,-3401.05"/>
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
+<path fill="none" stroke="#ff0061" d="M561.39,-3789.15C585.11,-3805.65 628.99,-3835.97 667,-3861 688.68,-3875.28 713.53,-3891.01 732.08,-3902.63"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="730.31,-3905.65 740.64,-3907.99 734.02,-3899.72 730.31,-3905.65"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~export_xc -->
+<!-- program~example3_volume&#45;&gt;proc~export_xc~2 -->
 <g id="call~~graph~~CallGraph_edge467" class="edge">
-<title>program~example3_volume&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0061" d="M545.39,-3361.25C553.39,-3429.65 595.72,-3763.6 667,-3833 670.07,-3835.99 673.47,-3838.59 677.1,-3840.84"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="675.47,-3843.94 685.94,-3845.51 678.73,-3837.75 675.47,-3843.94"/>
+<title>program~example3_volume&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0061" d="M547.36,-3789.33C566.87,-3861.03 664.91,-4221 667,-4223 669.95,-4225.81 673.19,-4228.28 676.64,-4230.44"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="675.12,-4233.59 685.59,-4235.2 678.41,-4227.41 675.12,-4233.59"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~export_xg -->
+<!-- program~example3_volume&#45;&gt;proc~export_xg~2 -->
 <g id="call~~graph~~CallGraph_edge468" class="edge">
-<title>program~example3_volume&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0061" d="M546.08,-3361.19C554.68,-3409.22 590.64,-3588.84 667,-3715 685.77,-3746.01 716.01,-3775.11 736.89,-3793.2"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="734.77,-3795.99 744.66,-3799.79 739.3,-3790.65 734.77,-3795.99"/>
+<title>program~example3_volume&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0061" d="M544.74,-3789.12C548.3,-3836.58 567.95,-4011.36 667,-4097 669.86,-4099.47 672.95,-4101.67 676.21,-4103.63"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="674.68,-4106.78 685.17,-4108.25 677.89,-4100.55 674.68,-4106.78"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~finalize -->
+<!-- program~example3_volume&#45;&gt;proc~finalize~2 -->
 <g id="call~~graph~~CallGraph_edge469" class="edge">
-<title>program~example3_volume&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0061" d="M546.53,-3361.28C557.22,-3413.25 599.56,-3620.25 631,-3791 639.57,-3837.56 634.41,-3966.66 667,-4001 671.75,-4006 677.41,-4009.93 683.57,-4013.01"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="682.32,-4016.28 692.89,-4016.92 685.03,-4009.82 682.32,-4016.28"/>
+<title>program~example3_volume&#45;&gt;proc~finalize~2</title>
+<path fill="none" stroke="#ff0061" d="M547.56,-3789.15C559.89,-3831.42 601.65,-3976.16 631,-4097 649.02,-4171.2 623.36,-4202.33 667,-4265 680.05,-4283.74 701.17,-4297.84 719.99,-4307.55"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="718.48,-4310.7 729,-4311.96 721.56,-4304.42 718.48,-4310.7"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~generate_xc~5 -->
+<!-- program~example3_volume&#45;&gt;proc~generate_xc~4 -->
 <g id="call~~graph~~CallGraph_edge470" class="edge">
-<title>program~example3_volume&#45;&gt;proc~generate_xc~5</title>
-<path fill="none" stroke="#ff0061" d="M558.07,-3336.71C579.89,-3318.32 623.85,-3283.79 667,-3265 680.81,-3258.99 696.55,-3254.6 711.11,-3251.43"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="711.86,-3254.85 720.96,-3249.43 710.46,-3247.99 711.86,-3254.85"/>
+<title>program~example3_volume&#45;&gt;proc~generate_xc~4</title>
+<path fill="none" stroke="#ff0061" d="M553.4,-3764.7C572.28,-3740.87 617.28,-3688.24 667,-3660 680.38,-3652.4 696.13,-3646.91 710.82,-3642.99"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="711.92,-3646.32 720.78,-3640.52 710.24,-3639.53 711.92,-3646.32"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
 <g id="call~~graph~~CallGraph_edge471" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#ff0061" d="M598.23,-3354.27C620.08,-3356.4 645.89,-3358.91 670.39,-3361.29"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="670.14,-3364.78 680.43,-3362.26 670.81,-3357.81 670.14,-3364.78"/>
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
+<path fill="none" stroke="#ff0061" d="M545.28,-3764.78C550.64,-3719.99 575.5,-3563.43 667,-3487 668.57,-3485.69 670.21,-3484.45 671.9,-3483.29"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="673.93,-3486.16 680.78,-3478.07 670.39,-3480.12 673.93,-3486.16"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
 <g id="call~~graph~~CallGraph_edge472" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#ff0061" d="M546.3,-3337C555.03,-3294.2 589.58,-3146.76 667,-3055 682.15,-3037.04 704.19,-3022.73 723.01,-3012.7"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="724.64,-3015.8 731.94,-3008.12 721.45,-3009.57 724.64,-3015.8"/>
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
+<path fill="none" stroke="#ff0061" d="M546.2,-3764.87C554.22,-3724.38 585.77,-3592.86 667,-3529 668.8,-3527.59 670.67,-3526.27 672.61,-3525.03"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="674.4,-3528.04 681.47,-3520.14 671.02,-3521.91 674.4,-3528.04"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~rotate_xc -->
+<!-- program~example3_volume&#45;&gt;proc~rotate_xc~2 -->
 <g id="call~~graph~~CallGraph_edge473" class="edge">
-<title>program~example3_volume&#45;&gt;proc~rotate_xc</title>
-<path fill="none" stroke="#ff0061" d="M546.92,-3336.71C558.09,-3289.72 599.04,-3116.83 631,-2974 647.58,-2899.91 613.57,-2860.95 667,-2807 670.23,-2803.74 673.86,-2800.93 677.75,-2798.53"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="679.41,-2801.61 686.65,-2793.88 676.17,-2795.41 679.41,-2801.61"/>
+<title>program~example3_volume&#45;&gt;proc~rotate_xc~2</title>
+<path fill="none" stroke="#ff0061" d="M544.56,-3764.77C547.46,-3716.07 565.02,-3534.27 667,-3445 670.29,-3442.12 673.9,-3439.61 677.71,-3437.42"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="679.52,-3440.43 686.96,-3432.89 676.44,-3434.15 679.52,-3440.43"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~rotate_xg -->
+<!-- program~example3_volume&#45;&gt;proc~rotate_xg~2 -->
 <g id="call~~graph~~CallGraph_edge474" class="edge">
-<title>program~example3_volume&#45;&gt;proc~rotate_xg</title>
-<path fill="none" stroke="#ff0061" d="M547.11,-3336.75C558.96,-3289.91 602.03,-3117.47 631,-2974 649.66,-2881.61 602.09,-2833.34 667,-2765 670.23,-2761.6 673.88,-2758.7 677.83,-2756.22"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="679.66,-2759.21 686.87,-2751.45 676.39,-2753.02 679.66,-2759.21"/>
+<title>program~example3_volume&#45;&gt;proc~rotate_xg~2</title>
+<path fill="none" stroke="#ff0061" d="M543.99,-3764.72C544.63,-3712.29 554.44,-3505.27 667,-3403 670.24,-3400.06 673.8,-3397.5 677.58,-3395.28"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="679.39,-3398.28 686.77,-3390.68 676.26,-3392.02 679.39,-3398.28"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~set_elem -->
+<!-- program~example3_volume&#45;&gt;proc~set_elem~2 -->
 <g id="call~~graph~~CallGraph_edge475" class="edge">
-<title>program~example3_volume&#45;&gt;proc~set_elem</title>
-<path fill="none" stroke="#ff0061" d="M547.32,-3336.95C557.97,-3300.68 594.87,-3191.76 667,-3139 670.71,-3136.29 674.7,-3133.92 678.88,-3131.85"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="680.5,-3134.96 688.28,-3127.77 677.72,-3128.54 680.5,-3134.96"/>
+<title>program~example3_volume&#45;&gt;proc~set_elem~2</title>
+<path fill="none" stroke="#ff0061" d="M549.41,-3764.79C563.73,-3733.97 605.76,-3652.66 667,-3613 670.78,-3610.56 674.8,-3608.39 678.97,-3606.48"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="680.37,-3609.69 688.31,-3602.68 677.73,-3603.21 680.37,-3609.69"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~show -->
+<!-- program~example3_volume&#45;&gt;proc~show~2 -->
 <g id="call~~graph~~CallGraph_edge476" class="edge">
-<title>program~example3_volume&#45;&gt;proc~show</title>
-<path fill="none" stroke="#ff0061" d="M546.25,-3361.16C561.21,-3441.75 646.29,-3896.11 667,-3917 673.27,-3923.32 681,-3927.91 689.31,-3931.22"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="688.3,-3934.58 698.89,-3934.44 690.53,-3927.94 688.3,-3934.58"/>
+<title>program~example3_volume&#45;&gt;proc~show~2</title>
+<path fill="none" stroke="#ff0061" d="M546.45,-3789.06C558.31,-3846.19 611.37,-4088.94 667,-4139 673.37,-4144.73 680.96,-4149 689.03,-4152.17"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="688.07,-4155.54 698.66,-4155.4 690.3,-4148.9 688.07,-4155.54"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~translate_xc -->
+<!-- program~example3_volume&#45;&gt;proc~translate_xc~2 -->
 <g id="call~~graph~~CallGraph_edge477" class="edge">
-<title>program~example3_volume&#45;&gt;proc~translate_xc</title>
-<path fill="none" stroke="#ff0061" d="M546.08,-3336.96C553.81,-3296.17 584.73,-3162.1 667,-3097 668.79,-3095.58 670.66,-3094.25 672.6,-3093.01"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="674.39,-3096.02 681.44,-3088.11 671,-3089.9 674.39,-3096.02"/>
+<title>program~example3_volume&#45;&gt;proc~translate_xc~2</title>
+<path fill="none" stroke="#ff0061" d="M576.07,-3789.01C600.72,-3797.97 635.73,-3810.16 667,-3819 675.13,-3821.3 683.71,-3823.51 692.25,-3825.59"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="691.67,-3829.05 702.21,-3827.96 693.29,-3822.24 691.67,-3829.05"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~translate_xg -->
+<!-- program~example3_volume&#45;&gt;proc~translate_xg~2 -->
 <g id="call~~graph~~CallGraph_edge478" class="edge">
-<title>program~example3_volume&#45;&gt;proc~translate_xg</title>
-<path fill="none" stroke="#ff0061" d="M576.07,-3336.99C600.72,-3328.03 635.73,-3315.84 667,-3307 675.13,-3304.7 683.71,-3302.49 692.25,-3300.41"/>
-<polygon fill="#ff0061" stroke="#ff0061" points="693.29,-3303.76 702.21,-3298.04 691.67,-3296.95 693.29,-3303.76"/>
+<title>program~example3_volume&#45;&gt;proc~translate_xg~2</title>
+<path fill="none" stroke="#ff0061" d="M598.23,-3782.27C619.55,-3784.35 644.63,-3786.78 668.59,-3789.11"/>
+<polygon fill="#ff0061" stroke="#ff0061" points="668.48,-3792.62 678.77,-3790.1 669.16,-3785.65 668.48,-3792.62"/>
 </g>
 <!-- program~example_nurbs_curve -->
 <g id="call~~graph~~CallGraph_node341" class="node">
 <title>program~example_nurbs_curve</title>
 <g id="a_call~~graph~~CallGraph_node341"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="607.5,-348 478.5,-348 478.5,-324 607.5,-324 607.5,-348"/>
-<text text-anchor="middle" x="543" y="-333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="607.5,-6268 478.5,-6268 478.5,-6244 607.5,-6244 607.5,-6268"/>
+<text text-anchor="middle" x="543" y="-6253.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;none~set~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;none~set -->
 <g id="call~~graph~~CallGraph_edge479" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff005c" d="M568.82,-323.84C627.06,-297.25 773.69,-241.94 855,-315 910.86,-365.19 867.39,-579.71 891,-651 910.07,-708.58 951.1,-767.85 973.73,-797.9"/>
-<polygon fill="#ff005c" stroke="#ff005c" points="971,-800.09 979.85,-805.91 976.56,-795.84 971,-800.09"/>
+<title>program~example_nurbs_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff005c" d="M605.67,-6268.05C683.98,-6282.02 813.87,-6300.33 855,-6277 933.77,-6232.31 971.35,-6121.14 984.18,-6073.85"/>
+<polygon fill="#ff005c" stroke="#ff005c" points="987.61,-6074.58 986.74,-6064.02 980.83,-6072.82 987.61,-6074.58"/>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~create~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~create -->
 <g id="call~~graph~~CallGraph_edge480" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#ff005c" d="M568.55,-323.99C593.09,-312.29 632.08,-294.48 667,-282 678.22,-277.99 690.39,-274.2 702.1,-270.82"/>
-<polygon fill="#ff005c" stroke="#ff005c" points="703.13,-274.17 711.8,-268.08 701.23,-267.43 703.13,-274.17"/>
+<title>program~example_nurbs_curve&#45;&gt;proc~create</title>
+<path fill="none" stroke="#ff005c" d="M607.91,-6263.11C616.43,-6266.31 624.47,-6270.79 631,-6277 671.96,-6315.96 625.75,-6360.34 667,-6399 673.74,-6405.32 681.96,-6409.88 690.7,-6413.15"/>
+<polygon fill="#ff005c" stroke="#ff005c" points="689.75,-6416.52 700.34,-6416.21 691.87,-6409.85 689.75,-6416.52"/>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~export_xc~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~export_xc -->
 <g id="call~~graph~~CallGraph_edge481" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#ff005c" d="M589.92,-348.1C605.38,-354.47 621.19,-363.99 631,-378 676.73,-443.32 614.15,-675.3 667,-735 671.08,-739.61 675.93,-743.32 681.25,-746.29"/>
-<polygon fill="#ff005c" stroke="#ff005c" points="680.04,-749.59 690.58,-750.65 682.99,-743.25 680.04,-749.59"/>
+<title>program~example_nurbs_curve&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff005c" d="M605.9,-6243.96C631.54,-6238.98 661.46,-6233.16 688.07,-6227.99"/>
+<polygon fill="#ff005c" stroke="#ff005c" points="688.95,-6231.38 698.09,-6226.04 687.61,-6224.51 688.95,-6231.38"/>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~export_xg~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~export_xg -->
 <g id="call~~graph~~CallGraph_edge482" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff005c" d="M589.82,-348.17C605.27,-354.55 621.1,-364.05 631,-378 712.58,-492.9 572.9,-588.11 667,-693 671.04,-697.5 675.81,-701.14 681.04,-704.08"/>
-<polygon fill="#ff005c" stroke="#ff005c" points="679.66,-707.3 690.2,-708.39 682.64,-700.97 679.66,-707.3"/>
+<title>program~example_nurbs_curve&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#ff005c" d="M607.65,-6245.59C615.84,-6242.85 623.84,-6239.38 631,-6235 651.97,-6222.16 645.94,-6205.69 667,-6193 671.21,-6190.46 675.69,-6188.23 680.33,-6186.27"/>
+<polygon fill="#ff005c" stroke="#ff005c" points="681.91,-6189.42 690.03,-6182.61 679.44,-6182.87 681.91,-6189.42"/>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~finalize~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~finalize -->
 <g id="call~~graph~~CallGraph_edge483" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~finalize~3</title>
-<path fill="none" stroke="#ff005c" d="M607.64,-336C632.8,-336 661.84,-336 687.78,-336"/>
-<polygon fill="#ff005c" stroke="#ff005c" points="687.93,-339.5 697.93,-336 687.93,-332.5 687.93,-339.5"/>
+<title>program~example_nurbs_curve&#45;&gt;proc~finalize</title>
+<path fill="none" stroke="#ff005c" d="M607.65,-6267.37C615.74,-6269.96 623.73,-6273.13 631,-6277 650.16,-6287.2 648.03,-6299.46 667,-6310 674.56,-6314.2 682.85,-6317.77 691.27,-6320.78"/>
+<polygon fill="#ff005c" stroke="#ff005c" points="690.2,-6324.11 700.79,-6323.95 692.41,-6317.47 690.2,-6324.11"/>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~generate_xc~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~generate_xc -->
 <g id="call~~graph~~CallGraph_edge484" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~generate_xc~3</title>
-<path fill="none" stroke="#ff005c" d="M554.91,-323.92C574.93,-302.53 619.84,-258.06 667,-235 680.53,-228.38 696.19,-223.82 710.76,-220.68"/>
-<polygon fill="#ff005c" stroke="#ff005c" points="711.5,-224.1 720.64,-218.73 710.15,-217.23 711.5,-224.1"/>
+<title>program~example_nurbs_curve&#45;&gt;proc~generate_xc</title>
+<path fill="none" stroke="#ff005c" d="M607.72,-6248.02C616.17,-6244.93 624.23,-6240.71 631,-6235 662.03,-6208.79 635.78,-6176.98 667,-6151 679.21,-6140.84 695.34,-6135.35 710.73,-6132.45"/>
+<polygon fill="#ff005c" stroke="#ff005c" points="711.35,-6135.89 720.69,-6130.89 710.27,-6128.98 711.35,-6135.89"/>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~show~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~show -->
 <g id="call~~graph~~CallGraph_edge485" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~show~3</title>
-<path fill="none" stroke="#ff005c" d="M570.54,-348.15C587.91,-356.27 611.01,-367.37 631,-378 647.35,-386.7 649.76,-392.21 667,-399 675.37,-402.3 684.38,-405.14 693.37,-407.57"/>
-<polygon fill="#ff005c" stroke="#ff005c" points="692.55,-410.97 703.1,-410.05 694.28,-404.19 692.55,-410.97"/>
+<title>program~example_nurbs_curve&#45;&gt;proc~show</title>
+<path fill="none" stroke="#ff005c" d="M607.64,-6256C634.56,-6256 665.94,-6256 693.2,-6256"/>
+<polygon fill="#ff005c" stroke="#ff005c" points="693.42,-6259.5 703.42,-6256 693.42,-6252.5 693.42,-6259.5"/>
 </g>
 <!-- program~example_nurbs_surface -->
 <g id="call~~graph~~CallGraph_node342" class="node">
 <title>program~example_nurbs_surface</title>
 <g id="a_call~~graph~~CallGraph_node342"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="612.5,-2550 473.5,-2550 473.5,-2526 612.5,-2526 612.5,-2550"/>
-<text text-anchor="middle" x="543" y="-2535.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="612.5,-3112 473.5,-3112 473.5,-3088 612.5,-3088 612.5,-3112"/>
+<text text-anchor="middle" x="543" y="-3097.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;none~set~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;none~set~3 -->
 <g id="call~~graph~~CallGraph_edge486" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0058" d="M553.16,-2550.18C571.61,-2573.57 615.9,-2624.15 667,-2643 745.39,-2671.91 788.08,-2693.03 855,-2643 900.28,-2609.15 850.26,-2560.2 891,-2521 900.13,-2512.22 911.88,-2506.39 924.08,-2502.56"/>
-<polygon fill="#ff0058" stroke="#ff0058" points="925.17,-2505.89 933.91,-2499.89 923.34,-2499.13 925.17,-2505.89"/>
+<title>program~example_nurbs_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0058" d="M549.55,-3112.18C563.91,-3141.98 605.5,-3218.27 667,-3247 742.7,-3282.36 782.16,-3287.94 855,-3247 932.74,-3203.31 970.79,-3094.47 983.96,-3047.8"/>
+<polygon fill="#ff0058" stroke="#ff0058" points="987.36,-3048.66 986.59,-3038.09 980.6,-3046.83 987.36,-3048.66"/>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~create~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~create~3 -->
 <g id="call~~graph~~CallGraph_edge487" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0058" d="M589.28,-2525.99C604.49,-2519.89 620.29,-2510.93 631,-2498 673.35,-2446.86 619.55,-2399.45 667,-2353 672.37,-2347.75 678.75,-2343.69 685.63,-2340.58"/>
-<polygon fill="#ff0058" stroke="#ff0058" points="687.17,-2343.74 695.26,-2336.9 684.67,-2337.21 687.17,-2343.74"/>
+<title>program~example_nurbs_surface&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0058" d="M612.58,-3092.6C619.6,-3089.34 625.98,-3084.93 631,-3079 702.46,-2994.7 594.92,-2666.77 667,-2583 672.05,-2577.13 678.35,-2572.71 685.29,-2569.4"/>
+<polygon fill="#ff0058" stroke="#ff0058" points="687.06,-2572.46 695.08,-2565.54 684.49,-2565.95 687.06,-2572.46"/>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~export_xc~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~export_xc~3 -->
 <g id="call~~graph~~CallGraph_edge488" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff0058" d="M612.64,-2538C632.7,-2538 654.87,-2538 675.78,-2538"/>
-<polygon fill="#ff0058" stroke="#ff0058" points="675.93,-2541.5 685.93,-2538 675.93,-2534.5 675.93,-2541.5"/>
+<title>program~example_nurbs_surface&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff0058" d="M612.64,-3100C632.7,-3100 654.87,-3100 675.78,-3100"/>
+<polygon fill="#ff0058" stroke="#ff0058" points="675.93,-3103.5 685.93,-3100 675.93,-3096.5 675.93,-3103.5"/>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~export_xg~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~export_xg~3 -->
 <g id="call~~graph~~CallGraph_edge489" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff0058" d="M605.9,-2550.04C631.54,-2555.02 661.46,-2560.84 688.07,-2566.01"/>
-<polygon fill="#ff0058" stroke="#ff0058" points="687.61,-2569.49 698.09,-2567.96 688.95,-2562.62 687.61,-2569.49"/>
+<title>program~example_nurbs_surface&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff0058" d="M605.9,-3112.04C631.54,-3117.02 661.46,-3122.84 688.07,-3128.01"/>
+<polygon fill="#ff0058" stroke="#ff0058" points="687.61,-3131.49 698.09,-3129.96 688.95,-3124.62 687.61,-3131.49"/>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~finalize~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~finalize~3 -->
 <g id="call~~graph~~CallGraph_edge490" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0058" d="M590.57,-2525.93C605.53,-2519.87 620.84,-2510.95 631,-2498 683.23,-2431.4 608.11,-2371.79 667,-2311 671.61,-2306.24 677.05,-2302.46 682.95,-2299.46"/>
-<polygon fill="#ff0058" stroke="#ff0058" points="684.73,-2302.51 692.55,-2295.37 681.98,-2296.07 684.73,-2302.51"/>
+<title>program~example_nurbs_surface&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0058" d="M612.54,-3092.57C619.56,-3089.31 625.96,-3084.91 631,-3079 696.7,-3002.02 600.73,-2701.49 667,-2625 671.59,-2619.7 677.2,-2615.59 683.37,-2612.4"/>
+<polygon fill="#ff0058" stroke="#ff0058" points="684.96,-2615.53 692.77,-2608.37 682.2,-2609.1 684.96,-2615.53"/>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~generate_xc~4 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~generate_xc~3 -->
 <g id="call~~graph~~CallGraph_edge491" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~generate_xc~4</title>
-<path fill="none" stroke="#ff0058" d="M551.26,-2550.04C568.1,-2576.91 612.54,-2642.03 667,-2676 680.18,-2684.22 695.99,-2689.89 710.81,-2693.79"/>
-<polygon fill="#ff0058" stroke="#ff0058" points="710.33,-2697.27 720.87,-2696.21 711.97,-2690.47 710.33,-2697.27"/>
+<title>program~example_nurbs_surface&#45;&gt;proc~generate_xc~3</title>
+<path fill="none" stroke="#ff0058" d="M554.49,-3112.23C574.18,-3134.36 619.05,-3180.98 667,-3205 680.47,-3211.75 696.11,-3216.35 710.68,-3219.48"/>
+<polygon fill="#ff0058" stroke="#ff0058" points="710.07,-3222.93 720.56,-3221.42 711.42,-3216.06 710.07,-3222.93"/>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~show~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~show~3 -->
 <g id="call~~graph~~CallGraph_edge492" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~show~2</title>
-<path fill="none" stroke="#ff0058" d="M582.27,-2525.86C598.53,-2519.39 616.94,-2510.21 631,-2498 653.34,-2478.6 643.2,-2459.58 667,-2442 673.62,-2437.11 681.11,-2433.15 688.91,-2429.92"/>
-<polygon fill="#ff0058" stroke="#ff0058" points="690.37,-2433.12 698.52,-2426.35 687.93,-2426.55 690.37,-2433.12"/>
+<title>program~example_nurbs_surface&#45;&gt;proc~show~3</title>
+<path fill="none" stroke="#ff0058" d="M605.9,-3087.96C631.76,-3082.93 661.97,-3077.06 688.76,-3071.85"/>
+<polygon fill="#ff0058" stroke="#ff0058" points="689.69,-3075.24 698.84,-3069.89 688.36,-3068.37 689.69,-3075.24"/>
 </g>
 <!-- program~example_nurbs_volume -->
 <g id="call~~graph~~CallGraph_node343" class="node">
 <title>program~example_nurbs_volume</title>
 <g id="a_call~~graph~~CallGraph_node343"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="612.5,-4074 473.5,-4074 473.5,-4050 612.5,-4050 612.5,-4074"/>
-<text text-anchor="middle" x="543" y="-4059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="612.5,-4214 473.5,-4214 473.5,-4190 612.5,-4190 612.5,-4214"/>
+<text text-anchor="middle" x="543" y="-4199.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;none~set -->
+<!-- program~example_nurbs_volume&#45;&gt;none~set~2 -->
 <g id="call~~graph~~CallGraph_edge493" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0054" d="M552.82,-4074.04C571,-4097.7 615.31,-4149.66 667,-4169 745.26,-4198.28 794.21,-4226.32 855,-4169 954.28,-4075.38 804.59,-3661.62 891,-3556 899.43,-3545.69 911.43,-3539.2 924.16,-3535.17"/>
-<polygon fill="#ff0054" stroke="#ff0054" points="925.23,-3538.5 933.99,-3532.54 923.43,-3531.74 925.23,-3538.5"/>
+<title>program~example_nurbs_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0054" d="M612.18,-4214.01C618.77,-4216.47 625.17,-4219.43 631,-4223 651.97,-4235.84 645.8,-4252.55 667,-4265 740.52,-4308.15 771.81,-4284.4 855,-4303 880.56,-4308.72 908.72,-4315.54 932.64,-4321.5"/>
+<polygon fill="#ff0054" stroke="#ff0054" points="932.07,-4324.96 942.62,-4323.99 933.76,-4318.17 932.07,-4324.96"/>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~create -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~create~2 -->
 <g id="call~~graph~~CallGraph_edge494" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~create</title>
-<path fill="none" stroke="#ff0054" d="M603.02,-4074.02C630.29,-4079.58 662.83,-4086.21 691.2,-4091.99"/>
-<polygon fill="#ff0054" stroke="#ff0054" points="690.55,-4095.42 701.05,-4093.99 691.95,-4088.57 690.55,-4095.42"/>
+<title>program~example_nurbs_volume&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#ff0054" d="M612.87,-4210.29C619.65,-4213.42 625.9,-4217.56 631,-4223 694.59,-4290.78 602.91,-4361.69 667,-4429 672.26,-4434.52 678.63,-4438.74 685.56,-4441.94"/>
+<polygon fill="#ff0054" stroke="#ff0054" points="684.69,-4445.35 695.28,-4445.7 687.22,-4438.82 684.69,-4445.35"/>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~export_xc -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~export_xc~2 -->
 <g id="call~~graph~~CallGraph_edge495" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0054" d="M571.38,-4049.83C590.74,-4039.88 615.85,-4024.02 631,-4003 665.55,-3955.06 624.14,-3915.68 667,-3875 669.95,-3872.2 673.2,-3869.74 676.65,-3867.58"/>
-<polygon fill="#ff0054" stroke="#ff0054" points="678.42,-3870.61 685.62,-3862.83 675.15,-3864.42 678.42,-3870.61"/>
+<title>program~example_nurbs_volume&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0054" d="M605.9,-4214.04C631.54,-4219.02 661.46,-4224.84 688.07,-4230.01"/>
+<polygon fill="#ff0054" stroke="#ff0054" points="687.61,-4233.49 698.09,-4231.96 688.95,-4226.62 687.61,-4233.49"/>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~export_xg -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~export_xg~2 -->
 <g id="call~~graph~~CallGraph_edge496" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0054" d="M572.21,-4049.91C591.71,-4040.09 616.65,-4024.36 631,-4003 674.08,-3938.9 612.76,-3887.98 667,-3833 669.86,-3830.1 673.03,-3827.56 676.43,-3825.35"/>
-<polygon fill="#ff0054" stroke="#ff0054" points="678.2,-3828.37 685.27,-3820.48 674.82,-3822.23 678.2,-3828.37"/>
+<title>program~example_nurbs_volume&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0054" d="M612.18,-4189.99C618.77,-4187.53 625.17,-4184.57 631,-4181 651.97,-4168.16 645.94,-4151.69 667,-4139 670,-4137.19 673.13,-4135.54 676.37,-4134.04"/>
+<polygon fill="#ff0054" stroke="#ff0054" points="677.81,-4137.23 685.69,-4130.15 675.12,-4130.76 677.81,-4137.23"/>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~finalize -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~finalize~2 -->
 <g id="call~~graph~~CallGraph_edge497" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0054" d="M608.81,-4050C632.73,-4045.57 660.03,-4040.51 684.79,-4035.93"/>
-<polygon fill="#ff0054" stroke="#ff0054" points="685.67,-4039.32 694.87,-4034.06 684.4,-4032.44 685.67,-4039.32"/>
+<title>program~example_nurbs_volume&#45;&gt;proc~finalize~2</title>
+<path fill="none" stroke="#ff0054" d="M612.8,-4212.32C619.35,-4215.1 625.56,-4218.6 631,-4223 659.75,-4246.25 638.67,-4274.24 667,-4298 671.89,-4302.1 677.38,-4305.56 683.19,-4308.47"/>
+<polygon fill="#ff0054" stroke="#ff0054" points="681.97,-4311.76 692.53,-4312.61 684.81,-4305.36 681.97,-4311.76"/>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~generate_xc -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~generate_xc~5 -->
 <g id="call~~graph~~CallGraph_edge498" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~generate_xc</title>
-<path fill="none" stroke="#ff0054" d="M562.86,-4074C586.39,-4088.49 628.26,-4112.68 667,-4127 680.87,-4132.13 696.38,-4136.23 710.7,-4139.41"/>
-<polygon fill="#ff0054" stroke="#ff0054" points="710.37,-4142.91 720.88,-4141.55 711.81,-4136.06 710.37,-4142.91"/>
+<title>program~example_nurbs_volume&#45;&gt;proc~generate_xc~5</title>
+<path fill="none" stroke="#ff0054" d="M612.64,-4202C644.44,-4202 681.5,-4202 710.51,-4202"/>
+<polygon fill="#ff0054" stroke="#ff0054" points="710.81,-4205.5 720.81,-4202 710.81,-4198.5 710.81,-4205.5"/>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~show -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~show~2 -->
 <g id="call~~graph~~CallGraph_edge499" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~show</title>
-<path fill="none" stroke="#ff0054" d="M565.27,-4049.97C583.69,-4039.01 610.52,-4021.71 631,-4003 649.65,-3985.95 645.51,-3972.28 667,-3959 673.81,-3954.79 681.36,-3951.43 689.13,-3948.73"/>
-<polygon fill="#ff0054" stroke="#ff0054" points="690.18,-3952.07 698.69,-3945.77 688.1,-3945.39 690.18,-3952.07"/>
+<title>program~example_nurbs_volume&#45;&gt;proc~show~2</title>
+<path fill="none" stroke="#ff0054" d="M605.9,-4189.96C631.76,-4184.93 661.97,-4179.06 688.76,-4173.85"/>
+<polygon fill="#ff0054" stroke="#ff0054" points="689.69,-4177.24 698.84,-4171.89 688.36,-4170.37 689.69,-4177.24"/>
 </g>
 <!-- program~example_ppm1 -->
 <g id="call~~graph~~CallGraph_node344" class="node">
 <title>program~example_ppm1</title>
 <g id="a_call~~graph~~CallGraph_node344"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="590,-1474 496,-1474 496,-1450 590,-1450 590,-1474"/>
-<text text-anchor="middle" x="543" y="-1459.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="590,-2028 496,-2028 496,-2004 590,-2004 590,-2028"/>
+<text text-anchor="middle" x="543" y="-2013.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;none~get_xg~2 -->
+<!-- program~example_ppm1&#45;&gt;none~get_xg~3 -->
 <g id="call~~graph~~CallGraph_edge505" class="edge">
-<title>program~example_ppm1&#45;&gt;none~get_xg~2</title>
-<path fill="none" stroke="#ff0050" d="M590.18,-1460.67C605.1,-1457.92 620.49,-1452.24 631,-1441 695.68,-1371.83 601.81,-1299.69 667,-1231 671.9,-1225.84 677.78,-1221.82 684.17,-1218.7"/>
-<polygon fill="#ff0050" stroke="#ff0050" points="685.9,-1221.77 693.84,-1214.75 683.26,-1215.29 685.9,-1221.77"/>
+<title>program~example_ppm1&#45;&gt;none~get_xg~3</title>
+<path fill="none" stroke="#ff0050" d="M590.07,-2015.07C605.17,-2012.38 620.7,-2006.63 631,-1995 633.35,-1992.35 739.53,-1066.6 757.45,-910.29"/>
+<polygon fill="#ff0050" stroke="#ff0050" points="760.96,-910.36 758.62,-900.02 754.01,-909.56 760.96,-910.36"/>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~create~2 -->
+<!-- program~example_ppm1&#45;&gt;proc~create~3 -->
 <g id="call~~graph~~CallGraph_edge506" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0050" d="M590.09,-1462.45C605.38,-1465.06 621.03,-1470.88 631,-1483 689.52,-1554.1 607.95,-2240.34 667,-2311 672.15,-2317.16 678.69,-2321.74 685.9,-2325.12"/>
-<polygon fill="#ff0050" stroke="#ff0050" points="684.76,-2328.43 695.35,-2328.78 687.29,-2321.91 684.76,-2328.43"/>
+<title>program~example_ppm1&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0050" d="M590.36,-2016.68C605.49,-2019.34 620.96,-2025.14 631,-2037 703.56,-2122.69 593.81,-2455.85 667,-2541 672.04,-2546.87 678.35,-2551.29 685.28,-2554.61"/>
+<polygon fill="#ff0050" stroke="#ff0050" points="684.48,-2558.05 695.07,-2558.47 687.05,-2551.54 684.48,-2558.05"/>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~finalize~2 -->
+<!-- program~example_ppm1&#45;&gt;proc~finalize~3 -->
 <g id="call~~graph~~CallGraph_edge507" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0050" d="M590.08,-1462.46C605.36,-1465.07 621.01,-1470.9 631,-1483 686.64,-1550.43 610.86,-2201.98 667,-2269 671.5,-2274.37 677.05,-2278.54 683.19,-2281.76"/>
-<polygon fill="#ff0050" stroke="#ff0050" points="681.98,-2285.05 692.54,-2285.82 684.76,-2278.63 681.98,-2285.05"/>
+<title>program~example_ppm1&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0050" d="M590.4,-2016.65C605.53,-2019.31 620.99,-2025.11 631,-2037 709.32,-2130.01 587.99,-2490.57 667,-2583 671.55,-2588.33 677.14,-2592.46 683.3,-2595.66"/>
+<polygon fill="#ff0050" stroke="#ff0050" points="682.11,-2598.96 692.68,-2599.71 684.88,-2592.53 682.11,-2598.96"/>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~get_ng~2 -->
+<!-- program~example_ppm1&#45;&gt;proc~get_ng~3 -->
 <g id="call~~graph~~CallGraph_edge508" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~get_ng~2</title>
-<path fill="none" stroke="#ff0050" d="M590.07,-1453.04C618.59,-1447.5 655.82,-1440.26 688.15,-1433.97"/>
-<polygon fill="#ff0050" stroke="#ff0050" points="688.87,-1437.4 698.01,-1432.05 687.53,-1430.53 688.87,-1437.4"/>
+<title>program~example_ppm1&#45;&gt;proc~get_ng~3</title>
+<path fill="none" stroke="#ff0050" d="M590.36,-2010.38C604.14,-2007.28 618.81,-2002.47 631,-1995 651.97,-1982.16 645.94,-1965.69 667,-1953 672.49,-1949.69 678.45,-1946.91 684.6,-1944.56"/>
+<polygon fill="#ff0050" stroke="#ff0050" points="686.07,-1947.76 694.4,-1941.22 683.81,-1941.13 686.07,-1947.76"/>
 </g>
 <!-- program~example_ppm1&#45;&gt;proc~set_ring~2 -->
 <g id="call~~graph~~CallGraph_edge509" class="edge">
 <title>program~example_ppm1&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#ff0050" d="M590.06,-1462.47C605.34,-1465.09 621,-1470.91 631,-1483 736.51,-1610.54 560.55,-2100.24 667,-2227 671.19,-2231.99 676.29,-2235.94 681.93,-2239.06"/>
-<polygon fill="#ff0050" stroke="#ff0050" points="680.61,-2242.31 691.16,-2243.29 683.53,-2235.94 680.61,-2242.31"/>
+<path fill="none" stroke="#ff0050" d="M590.27,-2016.76C605.39,-2019.43 620.88,-2025.21 631,-2037 692.04,-2108.06 605.44,-2386.4 667,-2457 671.28,-2461.91 676.45,-2465.81 682.12,-2468.89"/>
+<polygon fill="#ff0050" stroke="#ff0050" points="680.86,-2472.16 691.41,-2473.08 683.74,-2465.78 680.86,-2472.16"/>
 </g>
 <!-- program~example_ppm1&#45;&gt;proc~set_tetragon -->
 <g id="call~~graph~~CallGraph_edge510" class="edge">
 <title>program~example_ppm1&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#ff0050" d="M590.07,-1470.96C618.59,-1476.5 655.82,-1483.74 688.15,-1490.03"/>
-<polygon fill="#ff0050" stroke="#ff0050" points="687.53,-1493.47 698.01,-1491.95 688.87,-1486.6 687.53,-1493.47"/>
+<path fill="none" stroke="#ff0050" d="M590.37,-2017.66C605.13,-2020.46 620.37,-2026.09 631,-2037 684.3,-2091.69 613.3,-2150.71 667,-2205 668.09,-2206.1 669.23,-2207.15 670.4,-2208.15"/>
+<polygon fill="#ff0050" stroke="#ff0050" points="668.52,-2211.11 678.7,-2214.05 672.58,-2205.4 668.52,-2211.11"/>
 </g>
 <!-- compute_rgb -->
 <g id="call~~graph~~CallGraph_node363" class="node">
 <title>compute_rgb</title>
-<polygon fill="#777777" stroke="#777777" points="802.5,-1390 719.5,-1390 719.5,-1366 802.5,-1366 802.5,-1390"/>
-<text text-anchor="middle" x="761" y="-1375.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_rgb</text>
+<polygon fill="#777777" stroke="#777777" points="802.5,-1902 719.5,-1902 719.5,-1878 802.5,-1878 802.5,-1902"/>
+<text text-anchor="middle" x="761" y="-1887.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_rgb</text>
 </g>
 <!-- program~example_ppm1&#45;&gt;compute_rgb -->
 <g id="call~~graph~~CallGraph_edge500" class="edge">
 <title>program~example_ppm1&#45;&gt;compute_rgb</title>
-<path fill="none" stroke="#ff0050" d="M590.36,-1456.38C604.14,-1453.28 618.81,-1448.47 631,-1441 651.97,-1428.16 645.94,-1411.69 667,-1399 679.79,-1391.3 695.11,-1386.42 709.59,-1383.32"/>
-<polygon fill="#ff0050" stroke="#ff0050" points="710.27,-1386.76 719.44,-1381.46 708.96,-1379.88 710.27,-1386.76"/>
+<path fill="none" stroke="#ff0050" d="M590.12,-2012.92C604.52,-2009.98 619.6,-2004.63 631,-1995 662.03,-1968.79 635.78,-1936.98 667,-1911 678.79,-1901.19 694.22,-1895.73 709.11,-1892.76"/>
+<polygon fill="#ff0050" stroke="#ff0050" points="710,-1896.16 719.29,-1891.08 708.85,-1889.26 710,-1896.16"/>
 </g>
 <!-- export_pnm -->
 <g id="call~~graph~~CallGraph_node365" class="node">
 <title>export_pnm</title>
-<polygon fill="#777777" stroke="#777777" points="799,-1348 723,-1348 723,-1324 799,-1324 799,-1348"/>
-<text text-anchor="middle" x="761" y="-1333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">export_pnm</text>
+<polygon fill="#777777" stroke="#777777" points="799,-1860 723,-1860 723,-1836 799,-1836 799,-1860"/>
+<text text-anchor="middle" x="761" y="-1845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">export_pnm</text>
 </g>
 <!-- program~example_ppm1&#45;&gt;export_pnm -->
 <g id="call~~graph~~CallGraph_edge501" class="edge">
 <title>program~example_ppm1&#45;&gt;export_pnm</title>
-<path fill="none" stroke="#ff0050" d="M590.12,-1458.92C604.52,-1455.98 619.6,-1450.63 631,-1441 662.03,-1414.79 635.78,-1382.98 667,-1357 679.73,-1346.4 696.72,-1340.88 712.7,-1338.09"/>
-<polygon fill="#ff0050" stroke="#ff0050" points="713.59,-1341.5 722.99,-1336.62 712.6,-1334.57 713.59,-1341.5"/>
+<path fill="none" stroke="#ff0050" d="M590.41,-2013.84C605,-2010.98 620.12,-2005.43 631,-1995 673.03,-1954.68 624.68,-1909.01 667,-1869 679.25,-1857.42 696.48,-1851.73 712.78,-1849.07"/>
+<polygon fill="#ff0050" stroke="#ff0050" points="713.29,-1852.54 722.76,-1847.79 712.39,-1845.6 713.29,-1852.54"/>
 </g>
 <!-- get_b -->
 <g id="call~~graph~~CallGraph_node367" class="node">
 <title>get_b</title>
-<polygon fill="#777777" stroke="#777777" points="788,-1306 734,-1306 734,-1282 788,-1282 788,-1306"/>
-<text text-anchor="middle" x="761" y="-1291.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_b</text>
+<polygon fill="#777777" stroke="#777777" points="788,-1818 734,-1818 734,-1794 788,-1794 788,-1818"/>
+<text text-anchor="middle" x="761" y="-1803.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_b</text>
 </g>
 <!-- program~example_ppm1&#45;&gt;get_b -->
 <g id="call~~graph~~CallGraph_edge502" class="edge">
 <title>program~example_ppm1&#45;&gt;get_b</title>
-<path fill="none" stroke="#ff0050" d="M590.41,-1459.84C605,-1456.98 620.12,-1451.43 631,-1441 673.03,-1400.68 624.68,-1355.01 667,-1315 682.02,-1300.8 704.52,-1295.46 723.62,-1293.71"/>
-<polygon fill="#ff0050" stroke="#ff0050" points="724.05,-1297.19 733.82,-1293.07 723.62,-1290.2 724.05,-1297.19"/>
+<path fill="none" stroke="#ff0050" d="M590.37,-2014.34C605.13,-2011.54 620.37,-2005.91 631,-1995 684.3,-1940.31 613.3,-1881.29 667,-1827 681.7,-1812.14 704.53,-1806.83 723.89,-1805.26"/>
+<polygon fill="#ff0050" stroke="#ff0050" points="724.12,-1808.76 733.93,-1804.75 723.76,-1801.77 724.12,-1808.76"/>
 </g>
 <!-- get_g -->
 <g id="call~~graph~~CallGraph_node368" class="node">
 <title>get_g</title>
-<polygon fill="#777777" stroke="#777777" points="788,-1642 734,-1642 734,-1618 788,-1618 788,-1642"/>
-<text text-anchor="middle" x="761" y="-1627.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_g</text>
+<polygon fill="#777777" stroke="#777777" points="788,-1776 734,-1776 734,-1752 788,-1752 788,-1776"/>
+<text text-anchor="middle" x="761" y="-1761.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_g</text>
 </g>
 <!-- program~example_ppm1&#45;&gt;get_g -->
 <g id="call~~graph~~CallGraph_edge503" class="edge">
 <title>program~example_ppm1&#45;&gt;get_g</title>
-<path fill="none" stroke="#ff0050" d="M590.41,-1464.16C605,-1467.02 620.12,-1472.57 631,-1483 673.03,-1523.32 624.68,-1568.99 667,-1609 682.02,-1623.2 704.52,-1628.54 723.62,-1630.29"/>
-<polygon fill="#ff0050" stroke="#ff0050" points="723.62,-1633.8 733.82,-1630.93 724.05,-1626.81 723.62,-1633.8"/>
+<path fill="none" stroke="#ff0050" d="M590.18,-2014.67C605.1,-2011.92 620.49,-2006.24 631,-1995 695.68,-1925.83 601.81,-1853.69 667,-1785 681.39,-1769.84 704.22,-1764.52 723.66,-1763.03"/>
+<polygon fill="#ff0050" stroke="#ff0050" points="723.91,-1766.52 733.74,-1762.56 723.59,-1759.53 723.91,-1766.52"/>
 </g>
 <!-- get_r -->
 <g id="call~~graph~~CallGraph_node369" class="node">
 <title>get_r</title>
-<polygon fill="#777777" stroke="#777777" points="788,-1600 734,-1600 734,-1576 788,-1576 788,-1600"/>
-<text text-anchor="middle" x="761" y="-1585.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_r</text>
+<polygon fill="#777777" stroke="#777777" points="788,-2070 734,-2070 734,-2046 788,-2046 788,-2070"/>
+<text text-anchor="middle" x="761" y="-2055.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_r</text>
 </g>
 <!-- program~example_ppm1&#45;&gt;get_r -->
 <g id="call~~graph~~CallGraph_edge504" class="edge">
 <title>program~example_ppm1&#45;&gt;get_r</title>
-<path fill="none" stroke="#ff0050" d="M590.12,-1465.08C604.52,-1468.02 619.6,-1473.37 631,-1483 662.03,-1509.21 635.78,-1541.02 667,-1567 682.78,-1580.13 705.1,-1585.47 723.92,-1587.48"/>
-<polygon fill="#ff0050" stroke="#ff0050" points="723.7,-1590.97 733.95,-1588.28 724.26,-1584 723.7,-1590.97"/>
+<path fill="none" stroke="#ff0050" d="M590.07,-2024.96C629.99,-2032.72 686.96,-2043.8 723.71,-2050.94"/>
+<polygon fill="#ff0050" stroke="#ff0050" points="723.49,-2054.47 733.97,-2052.94 724.82,-2047.59 723.49,-2054.47"/>
 </g>
 <!-- set -->
 <g id="call~~graph~~CallGraph_node370" class="node">
 <title>set</title>
-<polygon fill="#777777" stroke="#777777" points="788,-1558 734,-1558 734,-1534 788,-1534 788,-1558"/>
-<text text-anchor="middle" x="761" y="-1543.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">set</text>
+<polygon fill="#777777" stroke="#777777" points="788,-2028 734,-2028 734,-2004 788,-2004 788,-2028"/>
+<text text-anchor="middle" x="761" y="-2013.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">set</text>
 </g>
 <!-- program~example_ppm1&#45;&gt;set -->
 <g id="call~~graph~~CallGraph_edge511" class="edge">
 <title>program~example_ppm1&#45;&gt;set</title>
-<path fill="none" stroke="#ff0050" d="M590.36,-1467.62C604.14,-1470.72 618.81,-1475.53 631,-1483 651.97,-1495.84 645.94,-1512.31 667,-1525 684.15,-1535.33 705.85,-1540.58 723.97,-1543.26"/>
-<polygon fill="#ff0050" stroke="#ff0050" points="723.54,-1546.73 733.9,-1544.52 724.42,-1539.78 723.54,-1546.73"/>
+<path fill="none" stroke="#ff0050" d="M590.07,-2016C629.99,-2016 686.96,-2016 723.71,-2016"/>
+<polygon fill="#ff0050" stroke="#ff0050" points="723.97,-2019.5 733.97,-2016 723.97,-2012.5 723.97,-2019.5"/>
 </g>
 <!-- set_pnm -->
 <g id="call~~graph~~CallGraph_node371" class="node">
 <title>set_pnm</title>
-<polygon fill="#777777" stroke="#777777" points="790,-1474 732,-1474 732,-1450 790,-1450 790,-1474"/>
-<text text-anchor="middle" x="761" y="-1459.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">set_pnm</text>
+<polygon fill="#777777" stroke="#777777" points="790,-1986 732,-1986 732,-1962 790,-1962 790,-1986"/>
+<text text-anchor="middle" x="761" y="-1971.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">set_pnm</text>
 </g>
 <!-- program~example_ppm1&#45;&gt;set_pnm -->
 <g id="call~~graph~~CallGraph_edge512" class="edge">
 <title>program~example_ppm1&#45;&gt;set_pnm</title>
-<path fill="none" stroke="#ff0050" d="M590.07,-1462C629.2,-1462 684.72,-1462 721.51,-1462"/>
-<polygon fill="#ff0050" stroke="#ff0050" points="721.83,-1465.5 731.83,-1462 721.83,-1458.5 721.83,-1465.5"/>
+<path fill="none" stroke="#ff0050" d="M590.07,-2007.04C629.37,-1999.4 685.19,-1988.55 721.98,-1981.39"/>
+<polygon fill="#ff0050" stroke="#ff0050" points="722.68,-1984.82 731.83,-1979.48 721.34,-1977.95 722.68,-1984.82"/>
 </g>
 <!-- timer_start -->
 <g id="call~~graph~~CallGraph_node373" class="node">
 <title>timer_start</title>
-<polygon fill="#777777" stroke="#777777" points="796,-1138 726,-1138 726,-1114 796,-1114 796,-1138"/>
-<text text-anchor="middle" x="761" y="-1123.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">timer_start</text>
+<polygon fill="#777777" stroke="#777777" points="796,-2112 726,-2112 726,-2088 796,-2088 796,-2112"/>
+<text text-anchor="middle" x="761" y="-2097.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">timer_start</text>
 </g>
 <!-- program~example_ppm1&#45;&gt;timer_start -->
 <g id="call~~graph~~CallGraph_edge513" class="edge">
 <title>program~example_ppm1&#45;&gt;timer_start</title>
-<path fill="none" stroke="#ff0050" d="M590.03,-1461.03C605.13,-1458.34 620.66,-1452.6 631,-1441 718.58,-1342.72 578.69,-1244.63 667,-1147 679.25,-1133.45 698.22,-1127.68 715.84,-1125.5"/>
-<polygon fill="#ff0050" stroke="#ff0050" points="716.34,-1128.97 725.99,-1124.6 715.72,-1122 716.34,-1128.97"/>
+<path fill="none" stroke="#ff0050" d="M590.36,-2021.62C604.14,-2024.72 618.81,-2029.53 631,-2037 651.97,-2049.84 645.94,-2066.31 667,-2079 681.54,-2087.76 699.35,-2092.87 715.48,-2095.85"/>
+<polygon fill="#ff0050" stroke="#ff0050" points="715.36,-2099.37 725.79,-2097.52 716.48,-2092.46 715.36,-2099.37"/>
 </g>
 <!-- timer_stop -->
 <g id="call~~graph~~CallGraph_node374" class="node">
 <title>timer_stop</title>
-<polygon fill="#777777" stroke="#777777" points="795.5,-1180 726.5,-1180 726.5,-1156 795.5,-1156 795.5,-1180"/>
-<text text-anchor="middle" x="761" y="-1165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">timer_stop</text>
+<polygon fill="#777777" stroke="#777777" points="795.5,-2154 726.5,-2154 726.5,-2130 795.5,-2130 795.5,-2154"/>
+<text text-anchor="middle" x="761" y="-2139.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">timer_stop</text>
 </g>
 <!-- program~example_ppm1&#45;&gt;timer_stop -->
 <g id="call~~graph~~CallGraph_edge514" class="edge">
 <title>program~example_ppm1&#45;&gt;timer_stop</title>
-<path fill="none" stroke="#ff0050" d="M590.35,-1460.83C605.3,-1458.1 620.65,-1452.38 631,-1441 707.11,-1357.29 590.27,-1272.14 667,-1189 679.39,-1175.58 698.37,-1169.82 715.97,-1167.62"/>
-<polygon fill="#ff0050" stroke="#ff0050" points="716.46,-1171.09 726.11,-1166.71 715.83,-1164.12 716.46,-1171.09"/>
+<path fill="none" stroke="#ff0050" d="M590.12,-2019.08C604.52,-2022.02 619.6,-2027.37 631,-2037 662.03,-2063.21 635.78,-2095.02 667,-2121 680.59,-2132.31 699.04,-2137.84 715.91,-2140.44"/>
+<polygon fill="#ff0050" stroke="#ff0050" points="715.81,-2143.95 726.16,-2141.71 716.67,-2137.01 715.81,-2143.95"/>
 </g>
 <!-- program~example_ppm2 -->
 <g id="call~~graph~~CallGraph_node345" class="node">
 <title>program~example_ppm2</title>
 <g id="a_call~~graph~~CallGraph_node345"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="590,-1516 496,-1516 496,-1492 590,-1492 590,-1516"/>
-<text text-anchor="middle" x="543" y="-1501.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="590,-2070 496,-2070 496,-2046 590,-2046 590,-2070"/>
+<text text-anchor="middle" x="543" y="-2055.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;none~get_xg~2 -->
+<!-- program~example_ppm2&#45;&gt;none~get_xg~3 -->
 <g id="call~~graph~~CallGraph_edge520" class="edge">
-<title>program~example_ppm2&#45;&gt;none~get_xg~2</title>
-<path fill="none" stroke="#ff004c" d="M590.35,-1502.83C605.3,-1500.1 620.65,-1494.38 631,-1483 707.11,-1399.29 590.27,-1314.14 667,-1231 671.83,-1225.77 677.66,-1221.7 684.02,-1218.56"/>
-<polygon fill="#ff004c" stroke="#ff004c" points="685.75,-1221.63 693.66,-1214.58 683.08,-1215.16 685.75,-1221.63"/>
+<title>program~example_ppm2&#45;&gt;none~get_xg~3</title>
+<path fill="none" stroke="#ff004c" d="M590.13,-2057.12C605.23,-2054.44 620.75,-2048.68 631,-2037 680.54,-1980.56 658.73,-1775.64 667,-1701 701.75,-1387.24 746.24,-1005.65 757.38,-910.36"/>
+<polygon fill="#ff004c" stroke="#ff004c" points="760.86,-910.75 758.55,-900.41 753.91,-909.94 760.86,-910.75"/>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~create~2 -->
+<!-- program~example_ppm2&#45;&gt;proc~create~3 -->
 <g id="call~~graph~~CallGraph_edge521" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff004c" d="M546.29,-1516.32C556.85,-1573.37 601.58,-1817.57 631,-2019 640.45,-2083.69 623.12,-2262.53 667,-2311 672.31,-2316.87 678.88,-2321.28 686.06,-2324.56"/>
-<polygon fill="#ff004c" stroke="#ff004c" points="684.83,-2327.84 695.42,-2328.16 687.34,-2321.31 684.83,-2327.84"/>
+<title>program~example_ppm2&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff004c" d="M552.45,-2070.38C570.37,-2097.31 612.04,-2163.79 631,-2226 651.54,-2293.4 619.95,-2488.56 667,-2541 672.29,-2546.89 678.84,-2551.31 686.01,-2554.61"/>
+<polygon fill="#ff004c" stroke="#ff004c" points="684.77,-2557.89 695.36,-2558.21 687.29,-2551.35 684.77,-2557.89"/>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~finalize~2 -->
+<!-- program~example_ppm2&#45;&gt;proc~finalize~3 -->
 <g id="call~~graph~~CallGraph_edge522" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff004c" d="M546.2,-1516.34C556.35,-1573.45 599.54,-1817.88 631,-2019 639.68,-2074.45 628.91,-2227.77 667,-2269 671.68,-2274.06 677.3,-2278.04 683.43,-2281.14"/>
-<polygon fill="#ff004c" stroke="#ff004c" points="682.15,-2284.4 692.72,-2285.09 684.88,-2277.95 682.15,-2284.4"/>
+<title>program~example_ppm2&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff004c" d="M552.52,-2070.36C570.55,-2097.26 612.46,-2163.67 631,-2226 653.74,-2302.43 614.15,-2523.3 667,-2583 671.64,-2588.25 677.29,-2592.33 683.49,-2595.5"/>
+<polygon fill="#ff004c" stroke="#ff004c" points="682.34,-2598.81 692.91,-2599.5 685.08,-2592.37 682.34,-2598.81"/>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~get_ng~2 -->
+<!-- program~example_ppm2&#45;&gt;proc~get_ng~3 -->
 <g id="call~~graph~~CallGraph_edge523" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~get_ng~2</title>
-<path fill="none" stroke="#ff004c" d="M590.36,-1498.38C604.14,-1495.28 618.81,-1490.47 631,-1483 651.97,-1470.16 645.94,-1453.69 667,-1441 672.49,-1437.69 678.45,-1434.91 684.6,-1432.56"/>
-<polygon fill="#ff004c" stroke="#ff004c" points="686.07,-1435.76 694.4,-1429.22 683.81,-1429.13 686.07,-1435.76"/>
+<title>program~example_ppm2&#45;&gt;proc~get_ng~3</title>
+<path fill="none" stroke="#ff004c" d="M590.12,-2054.92C604.52,-2051.98 619.6,-2046.63 631,-2037 662.03,-2010.79 635.78,-1978.98 667,-1953 672.3,-1948.59 678.34,-1945.06 684.73,-1942.24"/>
+<polygon fill="#ff004c" stroke="#ff004c" points="686.21,-1945.42 694.31,-1938.59 683.72,-1938.88 686.21,-1945.42"/>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~rotate_xc~2 -->
+<!-- program~example_ppm2&#45;&gt;proc~rotate_xc~3 -->
 <g id="call~~graph~~CallGraph_edge524" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~rotate_xc~2</title>
-<path fill="none" stroke="#ff004c" d="M548.12,-1516.05C560.36,-1549.87 599.84,-1646.26 667,-1693 670.27,-1695.28 673.75,-1697.31 677.36,-1699.12"/>
-<polygon fill="#ff004c" stroke="#ff004c" points="676.04,-1702.36 686.6,-1703.21 678.87,-1695.96 676.04,-1702.36"/>
+<title>program~example_ppm2&#45;&gt;proc~rotate_xc~3</title>
+<path fill="none" stroke="#ff004c" d="M552.1,-2070C569.7,-2096.72 611.41,-2163.64 631,-2226 649.34,-2284.38 625.74,-2453.81 667,-2499 670.16,-2502.46 673.76,-2505.42 677.67,-2507.93"/>
+<polygon fill="#ff004c" stroke="#ff004c" points="676.18,-2511.11 686.64,-2512.76 679.5,-2504.94 676.18,-2511.11"/>
 </g>
 <!-- program~example_ppm2&#45;&gt;proc~set_half_ring~2 -->
 <g id="call~~graph~~CallGraph_edge525" class="edge">
 <title>program~example_ppm2&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#ff004c" d="M546.36,-1516.31C557.23,-1573.32 603.13,-1817.35 631,-2019 641.22,-2092.95 617.33,-2297.27 667,-2353 668.03,-2354.16 669.11,-2355.26 670.24,-2356.31"/>
-<polygon fill="#ff004c" stroke="#ff004c" points="668.19,-2359.15 678.26,-2362.46 672.46,-2353.6 668.19,-2359.15"/>
+<path fill="none" stroke="#ff004c" d="M552.69,-2070.31C571.07,-2097.11 613.6,-2163.34 631,-2226 647.77,-2286.4 626.32,-2741.31 667,-2789 668.04,-2790.22 669.14,-2791.38 670.28,-2792.48"/>
+<polygon fill="#ff004c" stroke="#ff004c" points="668.45,-2795.49 678.48,-2798.9 672.76,-2789.97 668.45,-2795.49"/>
 </g>
 <!-- program~example_ppm2&#45;&gt;proc~set_tetragon -->
 <g id="call~~graph~~CallGraph_edge526" class="edge">
 <title>program~example_ppm2&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#ff004c" d="M590.07,-1504C612.92,-1504 641.36,-1504 668.4,-1504"/>
-<polygon fill="#ff004c" stroke="#ff004c" points="668.68,-1507.5 678.68,-1504 668.68,-1500.5 668.68,-1507.5"/>
+<path fill="none" stroke="#ff004c" d="M550.45,-2070.19C566.21,-2098.7 609.63,-2169.98 667,-2205 669.99,-2206.82 673.11,-2208.49 676.34,-2210.01"/>
+<polygon fill="#ff004c" stroke="#ff004c" points="675.07,-2213.27 685.65,-2213.93 677.79,-2206.82 675.07,-2213.27"/>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~translate_xc~2 -->
+<!-- program~example_ppm2&#45;&gt;proc~translate_xc~3 -->
 <g id="call~~graph~~CallGraph_edge527" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~translate_xc~2</title>
-<path fill="none" stroke="#ff004c" d="M550.45,-1516.19C566.21,-1544.7 609.63,-1615.98 667,-1651 669.99,-1652.82 673.11,-1654.49 676.34,-1656.01"/>
-<polygon fill="#ff004c" stroke="#ff004c" points="675.07,-1659.27 685.65,-1659.93 677.79,-1652.82 675.07,-1659.27"/>
+<title>program~example_ppm2&#45;&gt;proc~translate_xc~3</title>
+<path fill="none" stroke="#ff004c" d="M554.49,-2070.23C574.18,-2092.36 619.05,-2138.98 667,-2163 671.22,-2165.11 675.65,-2167.02 680.19,-2168.73"/>
+<polygon fill="#ff004c" stroke="#ff004c" points="679.06,-2172.04 689.65,-2171.98 681.34,-2165.42 679.06,-2172.04"/>
 </g>
 <!-- program~example_ppm2&#45;&gt;compute_rgb -->
 <g id="call~~graph~~CallGraph_edge515" class="edge">
 <title>program~example_ppm2&#45;&gt;compute_rgb</title>
-<path fill="none" stroke="#ff004c" d="M590.12,-1500.92C604.52,-1497.98 619.6,-1492.63 631,-1483 662.03,-1456.79 635.78,-1424.98 667,-1399 678.79,-1389.19 694.22,-1383.73 709.11,-1380.76"/>
-<polygon fill="#ff004c" stroke="#ff004c" points="710,-1384.16 719.29,-1379.08 708.85,-1377.26 710,-1384.16"/>
+<path fill="none" stroke="#ff004c" d="M590.41,-2055.84C605,-2052.98 620.12,-2047.43 631,-2037 673.03,-1996.68 624.68,-1951.01 667,-1911 678.45,-1900.18 694.23,-1894.5 709.55,-1891.64"/>
+<polygon fill="#ff004c" stroke="#ff004c" points="710.13,-1895.09 719.5,-1890.14 709.09,-1888.17 710.13,-1895.09"/>
 </g>
 <!-- program~example_ppm2&#45;&gt;export_pnm -->
 <g id="call~~graph~~CallGraph_edge516" class="edge">
 <title>program~example_ppm2&#45;&gt;export_pnm</title>
-<path fill="none" stroke="#ff004c" d="M590.41,-1501.84C605,-1498.98 620.12,-1493.43 631,-1483 673.03,-1442.68 624.68,-1397.01 667,-1357 679.25,-1345.42 696.48,-1339.73 712.78,-1337.07"/>
-<polygon fill="#ff004c" stroke="#ff004c" points="713.29,-1340.54 722.76,-1335.79 712.39,-1333.6 713.29,-1340.54"/>
+<path fill="none" stroke="#ff004c" d="M590.37,-2056.34C605.13,-2053.54 620.37,-2047.91 631,-2037 684.3,-1982.31 613.3,-1923.29 667,-1869 678.95,-1856.92 696.28,-1851.15 712.75,-1848.57"/>
+<polygon fill="#ff004c" stroke="#ff004c" points="713.33,-1852.03 722.83,-1847.35 712.49,-1845.08 713.33,-1852.03"/>
 </g>
 <!-- program~example_ppm2&#45;&gt;get_b -->
 <g id="call~~graph~~CallGraph_edge517" class="edge">
 <title>program~example_ppm2&#45;&gt;get_b</title>
-<path fill="none" stroke="#ff004c" d="M590.37,-1502.34C605.13,-1499.54 620.37,-1493.91 631,-1483 684.3,-1428.31 613.3,-1369.29 667,-1315 681.7,-1300.14 704.53,-1294.83 723.89,-1293.26"/>
-<polygon fill="#ff004c" stroke="#ff004c" points="724.12,-1296.76 733.93,-1292.75 723.76,-1289.77 724.12,-1296.76"/>
+<path fill="none" stroke="#ff004c" d="M590.18,-2056.67C605.1,-2053.92 620.49,-2048.24 631,-2037 695.68,-1967.83 601.81,-1895.69 667,-1827 681.39,-1811.84 704.22,-1806.52 723.66,-1805.03"/>
+<polygon fill="#ff004c" stroke="#ff004c" points="723.91,-1808.52 733.74,-1804.56 723.59,-1801.53 723.91,-1808.52"/>
 </g>
 <!-- program~example_ppm2&#45;&gt;get_g -->
 <g id="call~~graph~~CallGraph_edge518" class="edge">
 <title>program~example_ppm2&#45;&gt;get_g</title>
-<path fill="none" stroke="#ff004c" d="M554.49,-1516.23C574.18,-1538.36 619.05,-1584.98 667,-1609 684.57,-1617.8 705.84,-1622.95 723.6,-1625.95"/>
-<polygon fill="#ff004c" stroke="#ff004c" points="723.19,-1629.43 733.6,-1627.48 724.24,-1622.51 723.19,-1629.43"/>
+<path fill="none" stroke="#ff004c" d="M590.35,-2056.83C605.3,-2054.1 620.65,-2048.38 631,-2037 707.11,-1953.29 590.27,-1868.14 667,-1785 681.18,-1769.64 704,-1764.32 723.49,-1762.88"/>
+<polygon fill="#ff004c" stroke="#ff004c" points="723.77,-1766.37 733.61,-1762.44 723.46,-1759.38 723.77,-1766.37"/>
 </g>
 <!-- program~example_ppm2&#45;&gt;get_r -->
 <g id="call~~graph~~CallGraph_edge519" class="edge">
 <title>program~example_ppm2&#45;&gt;get_r</title>
-<path fill="none" stroke="#ff004c" d="M563.75,-1516.1C587.49,-1530.15 628.88,-1553.18 667,-1567 685.34,-1573.65 706.51,-1578.63 724.01,-1582.06"/>
-<polygon fill="#ff004c" stroke="#ff004c" points="723.37,-1585.5 733.84,-1583.91 724.66,-1578.62 723.37,-1585.5"/>
+<path fill="none" stroke="#ff004c" d="M590.07,-2058C629.99,-2058 686.96,-2058 723.71,-2058"/>
+<polygon fill="#ff004c" stroke="#ff004c" points="723.97,-2061.5 733.97,-2058 723.97,-2054.5 723.97,-2061.5"/>
 </g>
 <!-- program~example_ppm2&#45;&gt;set -->
 <g id="call~~graph~~CallGraph_edge528" class="edge">
 <title>program~example_ppm2&#45;&gt;set</title>
-<path fill="none" stroke="#ff004c" d="M590.07,-1512.96C629.99,-1520.72 686.96,-1531.8 723.71,-1538.94"/>
-<polygon fill="#ff004c" stroke="#ff004c" points="723.49,-1542.47 733.97,-1540.94 724.82,-1535.59 723.49,-1542.47"/>
+<path fill="none" stroke="#ff004c" d="M590.07,-2049.04C629.99,-2041.28 686.96,-2030.2 723.71,-2023.06"/>
+<polygon fill="#ff004c" stroke="#ff004c" points="724.82,-2026.41 733.97,-2021.06 723.49,-2019.53 724.82,-2026.41"/>
 </g>
 <!-- program~example_ppm2&#45;&gt;set_pnm -->
 <g id="call~~graph~~CallGraph_edge529" class="edge">
 <title>program~example_ppm2&#45;&gt;set_pnm</title>
-<path fill="none" stroke="#ff004c" d="M590.07,-1495.04C629.37,-1487.4 685.19,-1476.55 721.98,-1469.39"/>
-<polygon fill="#ff004c" stroke="#ff004c" points="722.68,-1472.82 731.83,-1467.48 721.34,-1465.95 722.68,-1472.82"/>
+<path fill="none" stroke="#ff004c" d="M590.36,-2052.38C604.14,-2049.28 618.81,-2044.47 631,-2037 651.97,-2024.16 645.94,-2007.69 667,-1995 683.48,-1985.08 704.15,-1979.84 721.83,-1977.07"/>
+<polygon fill="#ff004c" stroke="#ff004c" points="722.39,-1980.53 731.83,-1975.71 721.45,-1973.59 722.39,-1980.53"/>
 </g>
 <!-- program~example_ppm2&#45;&gt;timer_start -->
 <g id="call~~graph~~CallGraph_edge530" class="edge">
 <title>program~example_ppm2&#45;&gt;timer_start</title>
-<path fill="none" stroke="#ff004c" d="M590.13,-1503.12C605.23,-1500.44 620.75,-1494.68 631,-1483 730.07,-1370.12 567.1,-1259.14 667,-1147 679.15,-1133.36 698.1,-1127.58 715.74,-1125.41"/>
-<polygon fill="#ff004c" stroke="#ff004c" points="716.25,-1128.88 725.91,-1124.52 715.64,-1121.91 716.25,-1128.88"/>
+<path fill="none" stroke="#ff004c" d="M590.07,-2066.96C627.22,-2074.18 679.13,-2084.28 715.77,-2091.4"/>
+<polygon fill="#ff004c" stroke="#ff004c" points="715.2,-2094.85 725.68,-2093.33 716.53,-2087.98 715.2,-2094.85"/>
 </g>
 <!-- program~example_ppm2&#45;&gt;timer_stop -->
 <g id="call~~graph~~CallGraph_edge531" class="edge">
 <title>program~example_ppm2&#45;&gt;timer_stop</title>
-<path fill="none" stroke="#ff004c" d="M590.03,-1503.03C605.13,-1500.34 620.66,-1494.6 631,-1483 718.58,-1384.72 578.69,-1286.63 667,-1189 679.34,-1175.35 698.51,-1169.6 716.24,-1167.45"/>
-<polygon fill="#ff004c" stroke="#ff004c" points="716.79,-1170.92 726.45,-1166.58 716.19,-1163.95 716.79,-1170.92"/>
+<path fill="none" stroke="#ff004c" d="M563.75,-2070.1C587.49,-2084.15 628.88,-2107.18 667,-2121 682.7,-2126.69 700.47,-2131.16 716.24,-2134.48"/>
+<polygon fill="#ff004c" stroke="#ff004c" points="715.78,-2137.96 726.28,-2136.5 717.16,-2131.1 715.78,-2137.96"/>
 </g>
 <!-- program~example_ppm3 -->
 <g id="call~~graph~~CallGraph_node346" class="node">
 <title>program~example_ppm3</title>
 <g id="a_call~~graph~~CallGraph_node346"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="590,-1432 496,-1432 496,-1408 590,-1408 590,-1432"/>
-<text text-anchor="middle" x="543" y="-1417.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="590,-1986 496,-1986 496,-1962 590,-1962 590,-1986"/>
+<text text-anchor="middle" x="543" y="-1971.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;none~get_xg~2 -->
+<!-- program~example_ppm3&#45;&gt;none~get_xg~3 -->
 <g id="call~~graph~~CallGraph_edge537" class="edge">
-<title>program~example_ppm3&#45;&gt;none~get_xg~2</title>
-<path fill="none" stroke="#ff0047" d="M560.72,-1407.86C580.14,-1392.96 611.95,-1365.94 631,-1336 657.48,-1294.38 630.28,-1263.95 667,-1231 672.13,-1226.4 678.06,-1222.73 684.38,-1219.83"/>
-<polygon fill="#ff0047" stroke="#ff0047" points="685.86,-1223.01 693.88,-1216.09 683.3,-1216.49 685.86,-1223.01"/>
+<title>program~example_ppm3&#45;&gt;none~get_xg~3</title>
+<path fill="none" stroke="#ff0047" d="M546.43,-1961.8C568.02,-1853.24 727.13,-1053.24 755.64,-909.94"/>
+<polygon fill="#ff0047" stroke="#ff0047" points="759.07,-910.59 757.59,-900.1 752.21,-909.23 759.07,-910.59"/>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~create~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~create~3 -->
 <g id="call~~graph~~CallGraph_edge538" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0047" d="M590.1,-1420.44C605.4,-1423.05 621.04,-1428.87 631,-1441 692.41,-1515.76 605.04,-2236.69 667,-2311 672.14,-2317.17 678.68,-2321.75 685.89,-2325.13"/>
-<polygon fill="#ff0047" stroke="#ff0047" points="684.75,-2328.44 695.33,-2328.8 687.28,-2321.92 684.75,-2328.44"/>
+<title>program~example_ppm3&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0047" d="M590.4,-1974.65C605.53,-1977.31 620.99,-1983.11 631,-1995 709.32,-2088.01 587.99,-2448.57 667,-2541 672.03,-2546.88 678.32,-2551.32 685.25,-2554.63"/>
+<polygon fill="#ff0047" stroke="#ff0047" points="684.45,-2558.08 695.03,-2558.5 687.02,-2551.57 684.45,-2558.08"/>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~finalize~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~finalize~3 -->
 <g id="call~~graph~~CallGraph_edge539" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0047" d="M590.09,-1420.45C605.38,-1423.06 621.03,-1428.88 631,-1441 689.52,-1512.1 607.95,-2198.34 667,-2269 671.56,-2274.46 677.22,-2278.68 683.47,-2281.92"/>
-<polygon fill="#ff0047" stroke="#ff0047" points="682.42,-2285.28 692.99,-2286 685.18,-2278.85 682.42,-2285.28"/>
+<title>program~example_ppm3&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0047" d="M590.43,-1974.62C605.56,-1977.28 621.02,-1983.09 631,-1995 715.09,-2095.33 582.17,-2483.29 667,-2583 671.54,-2588.34 677.12,-2592.48 683.27,-2595.69"/>
+<polygon fill="#ff0047" stroke="#ff0047" points="682.08,-2598.98 692.65,-2599.73 684.85,-2592.55 682.08,-2598.98"/>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~get_ng~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~get_ng~3 -->
 <g id="call~~graph~~CallGraph_edge540" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~get_ng~2</title>
-<path fill="none" stroke="#ff0047" d="M590.07,-1420C617.46,-1420 652.88,-1420 684.29,-1420"/>
-<polygon fill="#ff0047" stroke="#ff0047" points="684.33,-1423.5 694.33,-1420 684.33,-1416.5 684.33,-1423.5"/>
+<title>program~example_ppm3&#45;&gt;proc~get_ng~3</title>
+<path fill="none" stroke="#ff0047" d="M590.07,-1965.04C618.59,-1959.5 655.82,-1952.26 688.15,-1945.97"/>
+<polygon fill="#ff0047" stroke="#ff0047" points="688.87,-1949.4 698.01,-1944.05 687.53,-1942.53 688.87,-1949.4"/>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
 <g id="call~~graph~~CallGraph_edge541" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#ff0047" d="M559.11,-1407.74C577.54,-1392.3 608.96,-1364.34 631,-1336 650.8,-1310.54 641.07,-1292.18 667,-1273 669.66,-1271.03 672.47,-1269.24 675.4,-1267.62"/>
-<polygon fill="#ff0047" stroke="#ff0047" points="677,-1270.73 684.47,-1263.21 673.95,-1264.43 677,-1270.73"/>
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#ff0047" d="M546.67,-1961.88C555.84,-1923.21 589.88,-1801.84 667,-1743 669.63,-1740.99 672.42,-1739.17 675.32,-1737.52"/>
+<polygon fill="#ff0047" stroke="#ff0047" points="676.94,-1740.62 684.34,-1733.04 673.83,-1734.35 676.94,-1740.62"/>
 </g>
 <!-- program~example_ppm3&#45;&gt;proc~set_tetragon -->
 <g id="call~~graph~~CallGraph_edge542" class="edge">
 <title>program~example_ppm3&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#ff0047" d="M590.36,-1425.62C604.14,-1428.72 618.81,-1433.53 631,-1441 651.97,-1453.84 645.94,-1470.31 667,-1483 670,-1484.81 673.13,-1486.46 676.37,-1487.96"/>
-<polygon fill="#ff0047" stroke="#ff0047" points="675.12,-1491.24 685.69,-1491.85 677.81,-1484.77 675.12,-1491.24"/>
+<path fill="none" stroke="#ff0047" d="M590.18,-1975.33C605.1,-1978.08 620.49,-1983.76 631,-1995 695.68,-2064.17 601.81,-2136.31 667,-2205 668.21,-2206.28 669.49,-2207.49 670.82,-2208.63"/>
+<polygon fill="#ff0047" stroke="#ff0047" points="668.78,-2211.48 678.95,-2214.47 672.87,-2205.8 668.78,-2211.48"/>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~translate_xc~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~translate_xc~3 -->
 <g id="call~~graph~~CallGraph_edge543" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~translate_xc~2</title>
-<path fill="none" stroke="#ff0047" d="M590.18,-1421.33C605.1,-1424.08 620.49,-1429.76 631,-1441 695.68,-1510.17 601.81,-1582.31 667,-1651 668.25,-1652.32 669.57,-1653.57 670.94,-1654.74"/>
-<polygon fill="#ff0047" stroke="#ff0047" points="669.19,-1657.79 679.37,-1660.73 673.24,-1652.08 669.19,-1657.79"/>
+<title>program~example_ppm3&#45;&gt;proc~translate_xc~3</title>
+<path fill="none" stroke="#ff0047" d="M590.37,-1975.66C605.13,-1978.46 620.37,-1984.09 631,-1995 684.3,-2049.69 613.3,-2108.71 667,-2163 668.24,-2164.25 669.54,-2165.44 670.89,-2166.56"/>
+<polygon fill="#ff0047" stroke="#ff0047" points="668.92,-2169.46 679.12,-2172.3 672.92,-2163.71 668.92,-2169.46"/>
 </g>
 <!-- program~example_ppm3&#45;&gt;compute_rgb -->
 <g id="call~~graph~~CallGraph_edge532" class="edge">
 <title>program~example_ppm3&#45;&gt;compute_rgb</title>
-<path fill="none" stroke="#ff0047" d="M590.07,-1411.04C625.18,-1404.21 673.48,-1394.82 709.61,-1387.8"/>
-<polygon fill="#ff0047" stroke="#ff0047" points="710.31,-1391.23 719.46,-1385.88 708.97,-1384.36 710.31,-1391.23"/>
+<path fill="none" stroke="#ff0047" d="M563.75,-1961.9C587.49,-1947.85 628.88,-1924.82 667,-1911 680.4,-1906.14 695.3,-1902.18 709.19,-1899.05"/>
+<polygon fill="#ff0047" stroke="#ff0047" points="710.04,-1902.45 719.08,-1896.93 708.57,-1895.61 710.04,-1902.45"/>
 </g>
 <!-- program~example_ppm3&#45;&gt;export_pnm -->
 <g id="call~~graph~~CallGraph_edge533" class="edge">
 <title>program~example_ppm3&#45;&gt;export_pnm</title>
-<path fill="none" stroke="#ff0047" d="M563.75,-1407.9C587.49,-1393.85 628.88,-1370.82 667,-1357 681.54,-1351.73 697.86,-1347.51 712.71,-1344.27"/>
-<polygon fill="#ff0047" stroke="#ff0047" points="713.65,-1347.65 722.73,-1342.19 712.22,-1340.8 713.65,-1347.65"/>
+<path fill="none" stroke="#ff0047" d="M554.49,-1961.77C574.18,-1939.64 619.05,-1893.02 667,-1869 681.07,-1861.95 697.51,-1857.24 712.63,-1854.11"/>
+<polygon fill="#ff0047" stroke="#ff0047" points="713.66,-1857.48 722.84,-1852.18 712.36,-1850.6 713.66,-1857.48"/>
 </g>
 <!-- program~example_ppm3&#45;&gt;get_b -->
 <g id="call~~graph~~CallGraph_edge534" class="edge">
 <title>program~example_ppm3&#45;&gt;get_b</title>
-<path fill="none" stroke="#ff0047" d="M554.49,-1407.77C574.18,-1385.64 619.05,-1339.02 667,-1315 684.57,-1306.2 705.84,-1301.05 723.6,-1298.05"/>
-<polygon fill="#ff0047" stroke="#ff0047" points="724.24,-1301.49 733.6,-1296.52 723.19,-1294.57 724.24,-1301.49"/>
+<path fill="none" stroke="#ff0047" d="M550.45,-1961.81C566.21,-1933.3 609.63,-1862.02 667,-1827 684.09,-1816.57 705.78,-1811.31 723.92,-1808.66"/>
+<polygon fill="#ff0047" stroke="#ff0047" points="724.37,-1812.13 733.86,-1807.41 723.5,-1805.18 724.37,-1812.13"/>
 </g>
 <!-- program~example_ppm3&#45;&gt;get_g -->
 <g id="call~~graph~~CallGraph_edge535" class="edge">
 <title>program~example_ppm3&#45;&gt;get_g</title>
-<path fill="none" stroke="#ff0047" d="M590.37,-1421.66C605.13,-1424.46 620.37,-1430.09 631,-1441 684.3,-1495.69 613.3,-1554.71 667,-1609 681.7,-1623.86 704.53,-1629.17 723.89,-1630.74"/>
-<polygon fill="#ff0047" stroke="#ff0047" points="723.76,-1634.23 733.93,-1631.25 724.12,-1627.24 723.76,-1634.23"/>
+<path fill="none" stroke="#ff0047" d="M548.12,-1961.95C560.36,-1928.13 599.84,-1831.74 667,-1785 683.55,-1773.49 705.39,-1768.17 723.76,-1765.77"/>
+<polygon fill="#ff0047" stroke="#ff0047" points="724.25,-1769.24 733.82,-1764.69 723.5,-1762.28 724.25,-1769.24"/>
 </g>
 <!-- program~example_ppm3&#45;&gt;get_r -->
 <g id="call~~graph~~CallGraph_edge536" class="edge">
 <title>program~example_ppm3&#45;&gt;get_r</title>
-<path fill="none" stroke="#ff0047" d="M590.41,-1422.16C605,-1425.02 620.12,-1430.57 631,-1441 673.03,-1481.32 624.68,-1526.99 667,-1567 682.02,-1581.2 704.52,-1586.54 723.62,-1588.29"/>
-<polygon fill="#ff0047" stroke="#ff0047" points="723.62,-1591.8 733.82,-1588.93 724.05,-1584.81 723.62,-1591.8"/>
+<path fill="none" stroke="#ff0047" d="M590.36,-1979.62C604.14,-1982.72 618.81,-1987.53 631,-1995 651.97,-2007.84 645.94,-2024.31 667,-2037 684.15,-2047.33 705.85,-2052.58 723.97,-2055.26"/>
+<polygon fill="#ff0047" stroke="#ff0047" points="723.54,-2058.73 733.9,-2056.52 724.42,-2051.78 723.54,-2058.73"/>
 </g>
 <!-- program~example_ppm3&#45;&gt;set -->
 <g id="call~~graph~~CallGraph_edge544" class="edge">
 <title>program~example_ppm3&#45;&gt;set</title>
-<path fill="none" stroke="#ff0047" d="M590.12,-1423.08C604.52,-1426.02 619.6,-1431.37 631,-1441 662.03,-1467.21 635.78,-1499.02 667,-1525 682.78,-1538.13 705.1,-1543.47 723.92,-1545.48"/>
-<polygon fill="#ff0047" stroke="#ff0047" points="723.7,-1548.97 733.95,-1546.28 724.26,-1542 723.7,-1548.97"/>
+<path fill="none" stroke="#ff0047" d="M590.07,-1982.96C629.99,-1990.72 686.96,-2001.8 723.71,-2008.94"/>
+<polygon fill="#ff0047" stroke="#ff0047" points="723.49,-2012.47 733.97,-2010.94 724.82,-2005.59 723.49,-2012.47"/>
 </g>
 <!-- program~example_ppm3&#45;&gt;set_pnm -->
 <g id="call~~graph~~CallGraph_edge545" class="edge">
 <title>program~example_ppm3&#45;&gt;set_pnm</title>
-<path fill="none" stroke="#ff0047" d="M590.07,-1428.96C629.37,-1436.6 685.19,-1447.45 721.98,-1454.61"/>
-<polygon fill="#ff0047" stroke="#ff0047" points="721.34,-1458.05 731.83,-1456.52 722.68,-1451.18 721.34,-1458.05"/>
+<path fill="none" stroke="#ff0047" d="M590.07,-1974C629.2,-1974 684.72,-1974 721.51,-1974"/>
+<polygon fill="#ff0047" stroke="#ff0047" points="721.83,-1977.5 731.83,-1974 721.83,-1970.5 721.83,-1977.5"/>
 </g>
 <!-- program~example_ppm3&#45;&gt;timer_start -->
 <g id="call~~graph~~CallGraph_edge546" class="edge">
 <title>program~example_ppm3&#45;&gt;timer_start</title>
-<path fill="none" stroke="#ff0047" d="M562.19,-1407.79C582.38,-1393.19 614.33,-1366.84 631,-1336 671.66,-1260.78 607.57,-1208.48 667,-1147 679.6,-1133.97 698.44,-1128.24 715.87,-1125.96"/>
-<polygon fill="#ff0047" stroke="#ff0047" points="716.3,-1129.43 725.91,-1124.98 715.62,-1122.46 716.3,-1129.43"/>
+<path fill="none" stroke="#ff0047" d="M590.12,-1977.08C604.52,-1980.02 619.6,-1985.37 631,-1995 662.03,-2021.21 635.78,-2053.02 667,-2079 680.49,-2090.22 698.75,-2095.75 715.52,-2098.38"/>
+<polygon fill="#ff0047" stroke="#ff0047" points="715.36,-2101.88 725.71,-2099.66 716.23,-2094.94 715.36,-2101.88"/>
 </g>
 <!-- program~example_ppm3&#45;&gt;timer_stop -->
 <g id="call~~graph~~CallGraph_edge547" class="edge">
 <title>program~example_ppm3&#45;&gt;timer_stop</title>
-<path fill="none" stroke="#ff0047" d="M561.54,-1407.89C581.45,-1393.2 613.43,-1366.58 631,-1336 664.51,-1277.68 619.01,-1236.13 667,-1189 679.93,-1176.3 698.82,-1170.62 716.2,-1168.28"/>
-<polygon fill="#ff0047" stroke="#ff0047" points="716.61,-1171.76 726.2,-1167.26 715.9,-1164.8 716.61,-1171.76"/>
+<path fill="none" stroke="#ff0047" d="M590.41,-1976.16C605,-1979.02 620.12,-1984.57 631,-1995 673.03,-2035.32 624.68,-2080.99 667,-2121 680.17,-2133.45 699.09,-2139.09 716.43,-2141.47"/>
+<polygon fill="#ff0047" stroke="#ff0047" points="716.09,-2144.96 726.41,-2142.52 716.83,-2137.99 716.09,-2144.96"/>
 </g>
 <!-- program~example_put_to_nurbs -->
 <g id="call~~graph~~CallGraph_node347" class="node">
 <title>program~example_put_to_nurbs</title>
 <g id="a_call~~graph~~CallGraph_node347"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="609,-3824 477,-3824 477,-3800 609,-3800 609,-3824"/>
-<text text-anchor="middle" x="543" y="-3809.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="609,-4130 477,-4130 477,-4106 609,-4106 609,-4130"/>
+<text text-anchor="middle" x="543" y="-4115.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;none~set -->
+<!-- program~example_put_to_nurbs&#45;&gt;none~set~2 -->
 <g id="call~~graph~~CallGraph_edge548" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0043" d="M566.05,-3799.94C590.2,-3787.17 630.38,-3767.21 667,-3755 748.04,-3727.98 794.2,-3775.01 855,-3715 906.57,-3664.1 840.68,-3608.13 891,-3556 899.92,-3546.76 911.7,-3540.67 924,-3536.69"/>
-<polygon fill="#ff0043" stroke="#ff0043" points="925.24,-3539.98 933.93,-3533.93 923.36,-3533.23 925.24,-3539.98"/>
+<title>program~example_put_to_nurbs&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0043" d="M561.47,-4105.78C612.82,-4071.5 765.24,-3981.58 855,-4055 917.47,-4106.1 853.63,-4161.46 891,-4233 909.06,-4267.57 942.23,-4298.62 965.05,-4317.38"/>
+<polygon fill="#ff0043" stroke="#ff0043" points="962.95,-4320.19 972.94,-4323.72 967.33,-4314.73 962.95,-4320.19"/>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xc -->
+<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xc~2 -->
 <g id="call~~graph~~CallGraph_edge549" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0043" d="M605.9,-3824.04C631.54,-3829.02 661.46,-3834.84 688.07,-3840.01"/>
-<polygon fill="#ff0043" stroke="#ff0043" points="687.61,-3843.49 698.09,-3841.96 688.95,-3836.62 687.61,-3843.49"/>
+<title>program~example_put_to_nurbs&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0043" d="M609.05,-4126.48C617.01,-4129.52 624.59,-4133.59 631,-4139 662.03,-4165.21 635.78,-4197.02 667,-4223 670.06,-4225.55 673.37,-4227.8 676.85,-4229.8"/>
+<polygon fill="#ff0043" stroke="#ff0043" points="675.3,-4232.93 685.82,-4234.23 678.41,-4226.66 675.3,-4232.93"/>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xg -->
+<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xg~2 -->
 <g id="call~~graph~~CallGraph_edge550" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0043" d="M609.1,-3812C629.8,-3812 653,-3812 674.89,-3812"/>
-<polygon fill="#ff0043" stroke="#ff0043" points="675.18,-3815.5 685.18,-3812 675.18,-3808.5 675.18,-3815.5"/>
+<title>program~example_put_to_nurbs&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0043" d="M609.1,-4118C629.8,-4118 653,-4118 674.89,-4118"/>
+<polygon fill="#ff0043" stroke="#ff0043" points="675.18,-4121.5 685.18,-4118 675.18,-4114.5 675.18,-4121.5"/>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~finalize -->
+<!-- program~example_put_to_nurbs&#45;&gt;proc~finalize~2 -->
 <g id="call~~graph~~CallGraph_edge551" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0043" d="M609.24,-3819.81C617.37,-3823.14 624.94,-3827.72 631,-3834 683.73,-3888.63 613.57,-3947.05 667,-4001 671.66,-4005.71 677.14,-4009.46 683.07,-4012.43"/>
-<polygon fill="#ff0043" stroke="#ff0043" points="682.12,-4015.83 692.69,-4016.5 684.84,-4009.38 682.12,-4015.83"/>
+<title>program~example_put_to_nurbs&#45;&gt;proc~finalize~2</title>
+<path fill="none" stroke="#ff0043" d="M609.27,-4125.57C617.3,-4128.74 624.83,-4133.08 631,-4139 673.03,-4179.32 632.13,-4218.35 667,-4265 680.77,-4283.43 702.14,-4297.56 720.92,-4307.38"/>
+<polygon fill="#ff0043" stroke="#ff0043" points="719.38,-4310.52 729.89,-4311.84 722.5,-4304.25 719.38,-4310.52"/>
 </g>
 <!-- program~example_put_to_nurbs&#45;&gt;proc~hexahedron_xc -->
 <g id="call~~graph~~CallGraph_edge552" class="edge">
 <title>program~example_put_to_nurbs&#45;&gt;proc~hexahedron_xc</title>
-<path fill="none" stroke="#ff0043" d="M545.07,-3799.94C549.79,-3754.24 572.92,-3590.29 667,-3509 732.09,-3452.76 796.08,-3525.68 855,-3463 916.86,-3397.19 828.16,-3327.88 891,-3263 902.08,-3251.56 917.73,-3245.61 933.31,-3242.68"/>
-<polygon fill="#ff0043" stroke="#ff0043" points="934.12,-3246.1 943.49,-3241.16 933.09,-3239.17 934.12,-3246.1"/>
+<path fill="none" stroke="#ff0043" d="M554.3,-4105.83C573.69,-4083.99 618.08,-4038.83 667,-4022 763.77,-3988.71 885.72,-4019.84 948.29,-4040.69"/>
+<polygon fill="#ff0043" stroke="#ff0043" points="947.22,-4044.02 957.81,-4043.93 949.48,-4037.39 947.22,-4044.02"/>
 </g>
 <!-- program~example_put_to_nurbs&#45;&gt;proc~put_to_nurbs -->
 <g id="call~~graph~~CallGraph_edge553" class="edge">
 <title>program~example_put_to_nurbs&#45;&gt;proc~put_to_nurbs</title>
-<path fill="none" stroke="#ff0043" d="M569.81,-3799.97C627.6,-3775 769.11,-3725.14 855,-3791 903.94,-3828.52 846.27,-3882.55 891,-3925 893.33,-3927.22 895.84,-3929.22 898.49,-3931.03"/>
-<polygon fill="#ff0043" stroke="#ff0043" points="896.95,-3934.19 907.35,-3936.2 900.47,-3928.14 896.95,-3934.19"/>
+<path fill="none" stroke="#ff0043" d="M546.96,-4105.9C556.79,-4068.43 592.08,-3953.54 667,-3899 735.92,-3848.83 790.39,-3916.61 855,-3861 890.48,-3830.46 859.67,-3796.79 891,-3762 903.78,-3747.81 921.69,-3737.36 938.74,-3729.91"/>
+<polygon fill="#ff0043" stroke="#ff0043" points="940.16,-3733.11 948.08,-3726.07 937.5,-3726.63 940.16,-3733.11"/>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~show -->
+<!-- program~example_put_to_nurbs&#45;&gt;proc~show~2 -->
 <g id="call~~graph~~CallGraph_edge554" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~show</title>
-<path fill="none" stroke="#ff0043" d="M609.05,-3821.3C617.01,-3824.42 624.59,-3828.55 631,-3834 661.63,-3860.05 636.04,-3891.35 667,-3917 673.5,-3922.39 681.11,-3926.46 689.12,-3929.53"/>
-<polygon fill="#ff0043" stroke="#ff0043" points="688.08,-3932.87 698.67,-3932.7 690.28,-3926.23 688.08,-3932.87"/>
+<title>program~example_put_to_nurbs&#45;&gt;proc~show~2</title>
+<path fill="none" stroke="#ff0043" d="M605.9,-4130.04C631.76,-4135.07 661.97,-4140.94 688.76,-4146.15"/>
+<polygon fill="#ff0043" stroke="#ff0043" points="688.36,-4149.63 698.84,-4148.11 689.69,-4142.76 688.36,-4149.63"/>
 </g>
 <!-- program~nearest_point_1d -->
 <g id="call~~graph~~CallGraph_node348" class="node">
 <title>program~nearest_point_1d</title>
 <g id="a_call~~graph~~CallGraph_node348"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="387.5,-224 284.5,-224 284.5,-200 387.5,-200 387.5,-224"/>
-<text text-anchor="middle" x="336" y="-209.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="387.5,-6514 284.5,-6514 284.5,-6490 387.5,-6490 387.5,-6514"/>
+<text text-anchor="middle" x="336" y="-6499.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;none~set~3 -->
+<!-- program~nearest_point_1d&#45;&gt;none~set -->
 <g id="call~~graph~~CallGraph_edge555" class="edge">
-<title>program~nearest_point_1d&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff003f" d="M353.94,-199.89C375.97,-184.97 416.23,-160.43 455,-151 541.37,-130 789.93,-90.45 855,-151 895.78,-188.94 874.41,-597.83 891,-651 909.06,-708.91 950.51,-768.04 973.46,-797.98"/>
-<polygon fill="#ff003f" stroke="#ff003f" points="970.77,-800.23 979.68,-805.97 976.3,-795.92 970.77,-800.23"/>
+<title>program~nearest_point_1d&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff003f" d="M387.64,-6507.27C503.4,-6518.21 782.96,-6538.05 855,-6483 872.17,-6469.88 959.6,-6159.42 983.47,-6073.73"/>
+<polygon fill="#ff003f" stroke="#ff003f" points="986.87,-6074.58 986.17,-6064.01 980.12,-6072.71 986.87,-6074.58"/>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~create~3 -->
+<!-- program~nearest_point_1d&#45;&gt;proc~create -->
 <g id="call~~graph~~CallGraph_edge556" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#ff003f" d="M387.6,-217.26C462.94,-225.1 604.83,-239.86 690.05,-248.72"/>
-<polygon fill="#ff003f" stroke="#ff003f" points="689.84,-252.22 700.15,-249.77 690.57,-245.26 689.84,-252.22"/>
+<title>program~nearest_point_1d&#45;&gt;proc~create</title>
+<path fill="none" stroke="#ff003f" d="M387.6,-6492.19C463.01,-6477.57 605.12,-6450.02 690.31,-6433.51"/>
+<polygon fill="#ff003f" stroke="#ff003f" points="691,-6436.94 700.15,-6431.6 689.67,-6430.07 691,-6436.94"/>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~finalize~3 -->
+<!-- program~nearest_point_1d&#45;&gt;proc~finalize -->
 <g id="call~~graph~~CallGraph_edge557" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~finalize~3</title>
-<path fill="none" stroke="#ff003f" d="M376.02,-224.07C398.99,-231.13 428.61,-240.17 455,-248 543.58,-274.29 646.96,-303.89 707.76,-321.19"/>
-<polygon fill="#ff003f" stroke="#ff003f" points="706.93,-324.59 717.51,-323.96 708.85,-317.86 706.93,-324.59"/>
+<title>program~nearest_point_1d&#45;&gt;proc~finalize</title>
+<path fill="none" stroke="#ff003f" d="M359.33,-6489.89C382.85,-6477.32 421.09,-6457.38 455,-6442 547.45,-6400.06 570.07,-6387.16 667,-6357 674.45,-6354.68 682.3,-6352.51 690.16,-6350.5"/>
+<polygon fill="#ff003f" stroke="#ff003f" points="691.22,-6353.84 700.09,-6348.05 689.54,-6347.05 691.22,-6353.84"/>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2~3 -->
+<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point -->
 <g id="call~~graph~~CallGraph_edge558" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2~3</title>
-<path fill="none" stroke="#ff003f" d="M387.67,-202.11C412.6,-197.25 443.06,-191.3 470.32,-185.99"/>
-<polygon fill="#ff003f" stroke="#ff003f" points="471.06,-189.41 480.21,-184.06 469.72,-182.54 471.06,-189.41"/>
+<title>program~nearest_point_1d&#45;&gt;proc~nearest_point</title>
+<path fill="none" stroke="#ff003f" d="M387.87,-6510.09C398.63,-6513.13 409.57,-6517.29 419,-6523 439.46,-6535.39 435.36,-6549.35 455,-6563 538.21,-6620.86 570.17,-6617.08 667,-6647 674.45,-6649.3 682.31,-6651.47 690.17,-6653.47"/>
+<polygon fill="#ff003f" stroke="#ff003f" points="689.56,-6656.92 700.1,-6655.92 691.23,-6650.13 689.56,-6656.92"/>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point~3 -->
+<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2 -->
 <g id="call~~graph~~CallGraph_edge559" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~nearest_point~3</title>
-<path fill="none" stroke="#ff003f" d="M387.59,-210.22C446.28,-207.81 545.87,-202.66 631,-193 648.15,-191.05 666.5,-188.41 683.82,-185.66"/>
-<polygon fill="#ff003f" stroke="#ff003f" points="684.57,-189.08 693.88,-184.03 683.45,-182.17 684.57,-189.08"/>
+<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2</title>
+<path fill="none" stroke="#ff003f" d="M387.67,-6511.89C412.6,-6516.75 443.06,-6522.7 470.32,-6528.01"/>
+<polygon fill="#ff003f" stroke="#ff003f" points="469.72,-6531.46 480.21,-6529.94 471.06,-6524.59 469.72,-6531.46"/>
 </g>
 <!-- program~nearest_point_2d -->
 <g id="call~~graph~~CallGraph_node349" class="node">
 <title>program~nearest_point_2d</title>
 <g id="a_call~~graph~~CallGraph_node349"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="387.5,-2052 284.5,-2052 284.5,-2028 387.5,-2028 387.5,-2052"/>
-<text text-anchor="middle" x="336" y="-2037.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="387.5,-2576 284.5,-2576 284.5,-2552 387.5,-2552 387.5,-2576"/>
+<text text-anchor="middle" x="336" y="-2561.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;none~set~2 -->
+<!-- program~nearest_point_2d&#45;&gt;none~set~3 -->
 <g id="call~~graph~~CallGraph_edge560" class="edge">
-<title>program~nearest_point_2d&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff003b" d="M376.33,-2027.98C484.95,-1995.88 785.6,-1914.84 855,-1979 929.96,-2048.3 837.22,-2350.22 891,-2437 903.06,-2456.45 924.11,-2470.33 943.67,-2479.71"/>
-<polygon fill="#ff003b" stroke="#ff003b" points="942.25,-2482.91 952.81,-2483.83 945.13,-2476.53 942.25,-2482.91"/>
+<title>program~nearest_point_2d&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff003b" d="M336.52,-2576.15C334.62,-2639.07 332.87,-2932.18 455,-3121 518.39,-3219.01 556.05,-3239.77 667,-3276 746.43,-3301.94 783.27,-3318.86 855,-3276 940.33,-3225.01 974.69,-3099.18 985.43,-3048.09"/>
+<polygon fill="#ff003b" stroke="#ff003b" points="988.9,-3048.6 987.42,-3038.11 982.03,-3047.23 988.9,-3048.6"/>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~create~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~create~3 -->
 <g id="call~~graph~~CallGraph_edge561" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff003b" d="M343.09,-2052.32C358.29,-2082.02 400.64,-2158.57 455,-2205 535.11,-2273.41 567.79,-2275.58 667,-2311 673.39,-2313.28 680.12,-2315.37 686.91,-2317.27"/>
-<polygon fill="#ff003b" stroke="#ff003b" points="686.31,-2320.73 696.88,-2319.92 688.11,-2313.97 686.31,-2320.73"/>
+<title>program~nearest_point_2d&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff003b" d="M387.6,-2563.76C461.46,-2563.41 599.3,-2562.76 684.98,-2562.35"/>
+<polygon fill="#ff003b" stroke="#ff003b" points="685.18,-2565.85 695.16,-2562.31 685.14,-2558.85 685.18,-2565.85"/>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~finalize~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~finalize~3 -->
 <g id="call~~graph~~CallGraph_edge562" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff003b" d="M352.82,-2052.2C408.78,-2095.18 597.74,-2238.55 667,-2269 672.11,-2271.25 677.5,-2273.27 682.99,-2275.08"/>
-<polygon fill="#ff003b" stroke="#ff003b" points="682.37,-2278.55 692.95,-2278.13 684.41,-2271.86 682.37,-2278.55"/>
+<title>program~nearest_point_2d&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff003b" d="M387.78,-2570.4C408.6,-2572.92 432.94,-2575.75 455,-2578 532.38,-2585.89 620.96,-2593.25 682.66,-2598.12"/>
+<polygon fill="#ff003b" stroke="#ff003b" points="682.46,-2601.61 692.7,-2598.91 683.01,-2594.63 682.46,-2601.61"/>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
 <g id="call~~graph~~CallGraph_edge563" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
-<path fill="none" stroke="#ff003b" d="M387.67,-2040C404.94,-2040 424.87,-2040 444.55,-2040"/>
-<polygon fill="#ff003b" stroke="#ff003b" points="444.8,-2043.5 454.8,-2040 444.8,-2036.5 444.8,-2043.5"/>
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
+<path fill="none" stroke="#ff003b" d="M387.67,-2554.11C412.6,-2549.25 443.06,-2543.3 470.32,-2537.99"/>
+<polygon fill="#ff003b" stroke="#ff003b" points="471.06,-2541.41 480.21,-2536.06 469.72,-2534.54 471.06,-2541.41"/>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point~3 -->
 <g id="call~~graph~~CallGraph_edge564" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point~2</title>
-<path fill="none" stroke="#ff003b" d="M337.8,-2027.95C343.61,-1942.62 381.32,-1428.94 455,-1294 515.49,-1183.21 554.75,-1162.74 667,-1105 671,-1102.94 675.2,-1101.09 679.51,-1099.41"/>
-<polygon fill="#ff003b" stroke="#ff003b" points="680.83,-1102.66 689.09,-1096.02 678.49,-1096.06 680.83,-1102.66"/>
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point~3</title>
+<path fill="none" stroke="#ff003b" d="M347.54,-2551.78C385.67,-2508.41 521.88,-2360.61 667,-2289 671.23,-2286.91 675.67,-2285.03 680.22,-2283.33"/>
+<polygon fill="#ff003b" stroke="#ff003b" points="681.36,-2286.64 689.69,-2280.1 679.1,-2280.02 681.36,-2286.64"/>
 </g>
 <!-- program~nearest_point_2d_bench -->
 <g id="call~~graph~~CallGraph_node350" class="node">
 <title>program~nearest_point_2d_bench</title>
 <g id="a_call~~graph~~CallGraph_node350"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-1327 472,-1327 472,-1303 614,-1303 614,-1327"/>
-<text text-anchor="middle" x="543" y="-1312.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-2259 472,-2259 472,-2235 614,-2235 614,-2259"/>
+<text text-anchor="middle" x="543" y="-2244.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~create~2 -->
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~create~3 -->
 <g id="call~~graph~~CallGraph_edge565" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0036" d="M563.41,-1327.05C584.4,-1341.32 616.75,-1367.19 631,-1399 672.46,-1491.55 602.13,-2233.05 667,-2311 672.14,-2317.17 678.67,-2321.76 685.88,-2325.14"/>
-<polygon fill="#ff0036" stroke="#ff0036" points="684.73,-2328.45 695.32,-2328.81 687.27,-2321.93 684.73,-2328.45"/>
+<title>program~nearest_point_2d_bench&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0036" d="M545.18,-2259.07C550.27,-2304.05 574.41,-2463.27 667,-2541 672.58,-2545.68 678.99,-2549.38 685.77,-2552.28"/>
+<polygon fill="#ff0036" stroke="#ff0036" points="684.63,-2555.59 695.22,-2555.77 687.06,-2549.02 684.63,-2555.59"/>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~finalize~2 -->
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~finalize~3 -->
 <g id="call~~graph~~CallGraph_edge566" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0036" d="M563.4,-1327.06C584.38,-1341.33 616.72,-1367.21 631,-1399 670.64,-1487.26 605.04,-2194.69 667,-2269 671.56,-2274.47 677.21,-2278.69 683.46,-2281.93"/>
-<polygon fill="#ff0036" stroke="#ff0036" points="682.41,-2285.29 692.98,-2286.01 685.17,-2278.86 682.41,-2285.29"/>
+<title>program~nearest_point_2d_bench&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0036" d="M548.13,-2259.28C568.05,-2318.42 653.82,-2571.42 667,-2583 671.81,-2587.23 677.3,-2590.66 683.14,-2593.44"/>
+<polygon fill="#ff0036" stroke="#ff0036" points="681.99,-2596.75 692.57,-2597.28 684.64,-2590.27 681.99,-2596.75"/>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~nearest_point~2 -->
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~nearest_point~3 -->
 <g id="call~~graph~~CallGraph_edge567" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~nearest_point~2</title>
-<path fill="none" stroke="#ff0036" d="M551.02,-1302.72C576.43,-1258.29 662.35,-1108.4 667,-1105 669.1,-1103.46 671.3,-1102.03 673.57,-1100.7"/>
-<polygon fill="#ff0036" stroke="#ff0036" points="675.33,-1103.74 682.66,-1096.08 672.16,-1097.5 675.33,-1103.74"/>
+<title>program~nearest_point_2d_bench&#45;&gt;proc~nearest_point~3</title>
+<path fill="none" stroke="#ff0036" d="M614.13,-2253.82C630.71,-2255.43 648.65,-2257.17 666.09,-2258.87"/>
+<polygon fill="#ff0036" stroke="#ff0036" points="666,-2262.38 676.29,-2259.86 666.68,-2255.41 666,-2262.38"/>
 </g>
 <!-- program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon -->
 <g id="call~~graph~~CallGraph_edge568" class="edge">
 <title>program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#ff0036" d="M560,-1327.12C579.02,-1342.22 610.73,-1369.62 631,-1399 654.07,-1432.43 635.78,-1457.02 667,-1483 668.57,-1484.31 670.21,-1485.54 671.91,-1486.7"/>
-<polygon fill="#ff0036" stroke="#ff0036" points="670.4,-1489.87 680.8,-1491.91 673.94,-1483.83 670.4,-1489.87"/>
+<path fill="none" stroke="#ff0036" d="M614.13,-2240.18C631.59,-2238.48 650.56,-2236.64 668.87,-2234.86"/>
+<polygon fill="#ff0036" stroke="#ff0036" points="669.35,-2238.33 678.96,-2233.88 668.67,-2231.36 669.35,-2238.33"/>
 </g>
 <!-- program~nearest_point_2d_bench&#45;&gt;timer_start -->
 <g id="call~~graph~~CallGraph_edge569" class="edge">
 <title>program~nearest_point_2d_bench&#45;&gt;timer_start</title>
-<path fill="none" stroke="#ff0036" d="M549.12,-1302.95C563.03,-1271.74 604.73,-1187.84 667,-1147 681.44,-1137.53 699.56,-1132.29 715.96,-1129.41"/>
-<polygon fill="#ff0036" stroke="#ff0036" points="716.54,-1132.86 725.9,-1127.9 715.49,-1125.94 716.54,-1132.86"/>
+<path fill="none" stroke="#ff0036" d="M552.21,-2234.69C569.93,-2209.16 614.43,-2150.39 667,-2121 681.7,-2112.78 699.4,-2107.78 715.39,-2104.74"/>
+<polygon fill="#ff0036" stroke="#ff0036" points="716.34,-2108.13 725.61,-2103 715.17,-2101.22 716.34,-2108.13"/>
 </g>
 <!-- program~nearest_point_2d_bench&#45;&gt;timer_stop -->
 <g id="call~~graph~~CallGraph_edge570" class="edge">
 <title>program~nearest_point_2d_bench&#45;&gt;timer_stop</title>
-<path fill="none" stroke="#ff0036" d="M552.21,-1302.69C569.93,-1277.16 614.43,-1218.39 667,-1189 681.93,-1180.65 699.97,-1175.62 716.17,-1172.59"/>
-<polygon fill="#ff0036" stroke="#ff0036" points="717.2,-1175.97 726.49,-1170.87 716.05,-1169.06 717.2,-1175.97"/>
+<path fill="none" stroke="#ff0036" d="M558.07,-2234.71C579.89,-2216.32 623.85,-2181.79 667,-2163 682.44,-2156.28 700.29,-2151.58 716.2,-2148.37"/>
+<polygon fill="#ff0036" stroke="#ff0036" points="717.15,-2151.75 726.33,-2146.46 715.86,-2144.87 717.15,-2151.75"/>
 </g>
 <!-- program~nearest_point_3d -->
 <g id="call~~graph~~CallGraph_node351" class="node">
 <title>program~nearest_point_3d</title>
 <g id="a_call~~graph~~CallGraph_node351"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="387.5,-6144 284.5,-6144 284.5,-6120 387.5,-6120 387.5,-6144"/>
-<text text-anchor="middle" x="336" y="-6129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="387.5,-4620 284.5,-4620 284.5,-4596 387.5,-4596 387.5,-4620"/>
+<text text-anchor="middle" x="336" y="-4605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;none~set -->
+<!-- program~nearest_point_3d&#45;&gt;none~set~2 -->
 <g id="call~~graph~~CallGraph_edge571" class="edge">
-<title>program~nearest_point_3d&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0032" d="M387.54,-6141.89C505.09,-6163.55 791.67,-6208.29 855,-6143 904.4,-6092.07 855.59,-3650.48 891,-3589 902.34,-3569.32 923.1,-3555.47 942.65,-3546.16"/>
-<polygon fill="#ff0032" stroke="#ff0032" points="944.1,-3549.34 951.8,-3542.07 941.24,-3542.95 944.1,-3549.34"/>
+<title>program~nearest_point_3d&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0032" d="M387.7,-4616.98C487.65,-4631.73 712.78,-4649.95 855,-4546 886.15,-4523.23 871.29,-4500.17 891,-4467 915.94,-4425.02 951.71,-4380.46 972.57,-4355.64"/>
+<polygon fill="#ff0032" stroke="#ff0032" points="975.25,-4357.9 979.04,-4348.01 969.91,-4353.37 975.25,-4357.9"/>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~create -->
+<!-- program~nearest_point_3d&#45;&gt;proc~create~2 -->
 <g id="call~~graph~~CallGraph_edge572" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~create</title>
-<path fill="none" stroke="#ff0032" d="M337.18,-6119.79C339.26,-5988.94 359.97,-4844.09 455,-4519 510.57,-4328.89 509.15,-4246.64 667,-4127 672.58,-4122.77 678.86,-4119.36 685.46,-4116.62"/>
-<polygon fill="#ff0032" stroke="#ff0032" points="687.08,-4119.76 695.3,-4113.07 684.7,-4113.17 687.08,-4119.76"/>
+<title>program~nearest_point_3d&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#ff0032" d="M362.12,-4595.82C416.55,-4569.82 549.95,-4508.21 667,-4471 674.32,-4468.67 682.04,-4466.5 689.78,-4464.5"/>
+<polygon fill="#ff0032" stroke="#ff0032" points="690.7,-4467.88 699.56,-4462.06 689.01,-4461.08 690.7,-4467.88"/>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~finalize -->
+<!-- program~nearest_point_3d&#45;&gt;proc~finalize~2 -->
 <g id="call~~graph~~CallGraph_edge573" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0032" d="M337.57,-6119.84C345.6,-5950.13 435.41,-4060.7 455,-4041 485.76,-4010.06 602.88,-4011.03 682.7,-4015.68"/>
-<polygon fill="#ff0032" stroke="#ff0032" points="682.53,-4019.18 692.73,-4016.3 682.96,-4012.19 682.53,-4019.18"/>
+<title>program~nearest_point_3d&#45;&gt;proc~finalize~2</title>
+<path fill="none" stroke="#ff0032" d="M346.5,-4595.73C365.45,-4571.73 410.02,-4517.62 455,-4480 540.69,-4408.34 563.88,-4387.94 667,-4345 672.38,-4342.76 678.05,-4340.74 683.81,-4338.91"/>
+<polygon fill="#ff0032" stroke="#ff0032" points="684.97,-4342.22 693.58,-4336.04 682.99,-4335.51 684.97,-4342.22"/>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
 <g id="call~~graph~~CallGraph_edge574" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point</title>
-<path fill="none" stroke="#ff0032" d="M387.51,-6138.36C398.64,-6141.48 409.83,-6146.12 419,-6153 444.17,-6171.91 437.71,-6187.69 455,-6214 542.88,-6347.73 533.3,-6417.09 667,-6505 669.61,-6506.72 672.35,-6508.3 675.17,-6509.75"/>
-<polygon fill="#ff0032" stroke="#ff0032" points="673.89,-6513.01 684.44,-6513.96 676.79,-6506.64 673.89,-6513.01"/>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
+<path fill="none" stroke="#ff0032" d="M352.07,-4620.21C387.63,-4649 476.9,-4721.28 519.15,-4755.5"/>
+<polygon fill="#ff0032" stroke="#ff0032" points="517.21,-4758.43 527.18,-4762 521.61,-4752.99 517.21,-4758.43"/>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point~2 -->
 <g id="call~~graph~~CallGraph_edge575" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
-<path fill="none" stroke="#ff0032" d="M387.67,-6132C404.94,-6132 424.87,-6132 444.55,-6132"/>
-<polygon fill="#ff0032" stroke="#ff0032" points="444.8,-6135.5 454.8,-6132 444.8,-6128.5 444.8,-6135.5"/>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point~2</title>
+<path fill="none" stroke="#ff0032" d="M338.21,-4620.18C343.31,-4664.87 367.01,-4821.52 455,-4904 512.18,-4957.6 599.74,-4979.43 666.39,-4988.24"/>
+<polygon fill="#ff0032" stroke="#ff0032" points="666.13,-4991.74 676.49,-4989.5 667,-4984.79 666.13,-4991.74"/>
 </g>
 <!-- program~shape_c_1d -->
 <g id="call~~graph~~CallGraph_node352" class="node">
 <title>program~shape_c_1d</title>
 <g id="a_call~~graph~~CallGraph_node352"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="581,-642 505,-642 505,-618 581,-618 581,-642"/>
-<text text-anchor="middle" x="543" y="-627.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="581,-6352 505,-6352 505,-6328 581,-6328 581,-6352"/>
+<text text-anchor="middle" x="543" y="-6337.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~create~3 -->
+<!-- program~shape_c_1d&#45;&gt;proc~create -->
 <g id="call~~graph~~CallGraph_edge576" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#ff002e" d="M557.74,-617.97C577.42,-599.9 613.2,-563.72 631,-525 670.55,-438.96 614.5,-393.81 667,-315 679.57,-296.13 700.45,-282.08 719.25,-272.43"/>
-<polygon fill="#ff002e" stroke="#ff002e" points="720.8,-275.57 728.26,-268.05 717.74,-269.28 720.8,-275.57"/>
+<title>program~shape_c_1d&#45;&gt;proc~create</title>
+<path fill="none" stroke="#ff002e" d="M565.59,-6352.2C589.66,-6365.36 630.09,-6386.16 667,-6399 674.56,-6401.63 682.58,-6404.01 690.62,-6406.15"/>
+<polygon fill="#ff002e" stroke="#ff002e" points="689.85,-6409.57 700.4,-6408.64 691.57,-6402.78 689.85,-6409.57"/>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~export_xc~3 -->
+<!-- program~shape_c_1d&#45;&gt;proc~export_xc -->
 <g id="call~~graph~~CallGraph_edge577" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#ff002e" d="M563.31,-642.08C581.62,-653.96 609.47,-673.16 631,-693 649.08,-709.66 645.94,-722.31 667,-735 671.49,-737.71 676.3,-740.06 681.27,-742.12"/>
-<polygon fill="#ff002e" stroke="#ff002e" points="680.41,-745.53 691,-745.71 682.83,-738.96 680.41,-745.53"/>
+<title>program~shape_c_1d&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff002e" d="M581.25,-6338.46C598.08,-6336.03 617.23,-6330.63 631,-6319 662.03,-6292.79 635.78,-6260.98 667,-6235 671.37,-6231.36 676.25,-6228.32 681.41,-6225.78"/>
+<polygon fill="#ff002e" stroke="#ff002e" points="683.13,-6228.86 690.98,-6221.74 680.4,-6222.41 683.13,-6228.86"/>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~export_xg~3 -->
+<!-- program~shape_c_1d&#45;&gt;proc~export_xg -->
 <g id="call~~graph~~CallGraph_edge578" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff002e" d="M563.75,-642.1C587.49,-656.15 628.88,-679.18 667,-693 673.38,-695.31 680.1,-697.42 686.89,-699.33"/>
-<polygon fill="#ff002e" stroke="#ff002e" points="686.28,-702.8 696.85,-702 688.09,-696.03 686.28,-702.8"/>
+<title>program~shape_c_1d&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#ff002e" d="M581.05,-6339.34C598.25,-6337.15 617.77,-6331.69 631,-6319 673.03,-6278.68 624.68,-6233.01 667,-6193 671.13,-6189.09 675.84,-6185.85 680.88,-6183.18"/>
+<polygon fill="#ff002e" stroke="#ff002e" points="682.59,-6186.24 690.27,-6178.94 679.71,-6179.86 682.59,-6186.24"/>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~finalize~3 -->
+<!-- program~shape_c_1d&#45;&gt;proc~finalize -->
 <g id="call~~graph~~CallGraph_edge579" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~finalize~3</title>
-<path fill="none" stroke="#ff002e" d="M557.53,-617.87C576.95,-599.68 612.41,-563.34 631,-525 664.32,-456.29 613.3,-411.29 667,-357 673.02,-350.91 680.41,-346.42 688.37,-343.14"/>
-<polygon fill="#ff002e" stroke="#ff002e" points="689.62,-346.41 697.92,-339.82 687.32,-339.8 689.62,-346.41"/>
+<title>program~shape_c_1d&#45;&gt;proc~finalize</title>
+<path fill="none" stroke="#ff002e" d="M581.13,-6339.31C610.22,-6338.77 651.6,-6338.01 687.23,-6337.35"/>
+<polygon fill="#ff002e" stroke="#ff002e" points="687.66,-6340.84 697.6,-6337.16 687.53,-6333.84 687.66,-6340.84"/>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~set_c~3 -->
+<!-- program~shape_c_1d&#45;&gt;proc~set_c -->
 <g id="call~~graph~~CallGraph_edge580" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~set_c~3</title>
-<path fill="none" stroke="#ff002e" d="M567.03,-642C586.31,-653.04 613.42,-671.01 631,-693 656.37,-724.72 635.78,-751.02 667,-777 674.46,-783.21 683.38,-787.67 692.7,-790.87"/>
-<polygon fill="#ff002e" stroke="#ff002e" points="691.94,-794.29 702.52,-793.76 693.91,-787.58 691.94,-794.29"/>
+<title>program~shape_c_1d&#45;&gt;proc~set_c</title>
+<path fill="none" stroke="#ff002e" d="M554.91,-6352.08C574.93,-6373.47 619.84,-6417.94 667,-6441 675.19,-6445 684.16,-6448.26 693.2,-6450.9"/>
+<polygon fill="#ff002e" stroke="#ff002e" points="692.43,-6454.32 702.99,-6453.53 694.24,-6447.56 692.43,-6454.32"/>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~show~3 -->
+<!-- program~shape_c_1d&#45;&gt;proc~show -->
 <g id="call~~graph~~CallGraph_edge581" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~show~3</title>
-<path fill="none" stroke="#ff002e" d="M555.98,-617.97C574.04,-599.33 608.54,-561.77 631,-525 652.18,-490.34 635.78,-466.98 667,-441 674.73,-434.57 684.03,-430.01 693.72,-426.79"/>
-<polygon fill="#ff002e" stroke="#ff002e" points="694.83,-430.11 703.49,-424 692.91,-423.38 694.83,-430.11"/>
+<title>program~shape_c_1d&#45;&gt;proc~show</title>
+<path fill="none" stroke="#ff002e" d="M581.35,-6332.85C596.93,-6329.4 615.06,-6324.74 631,-6319 666.09,-6306.37 704.23,-6286.98 729.86,-6273.05"/>
+<polygon fill="#ff002e" stroke="#ff002e" points="731.64,-6276.07 738.72,-6268.19 728.27,-6269.93 731.64,-6276.07"/>
 </g>
 <!-- program~shape_c_2d -->
 <g id="call~~graph~~CallGraph_node353" class="node">
 <title>program~shape_c_2d</title>
 <g id="a_call~~graph~~CallGraph_node353"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="581,-2489 505,-2489 505,-2465 581,-2465 581,-2489"/>
-<text text-anchor="middle" x="543" y="-2474.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="581,-3070 505,-3070 505,-3046 581,-3046 581,-3070"/>
+<text text-anchor="middle" x="543" y="-3055.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~create~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~create~3 -->
 <g id="call~~graph~~CallGraph_edge582" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff002a" d="M581.09,-2466.75C598.09,-2460.48 617.43,-2450.93 631,-2437 659.34,-2407.91 635.78,-2378.98 667,-2353 672.6,-2348.34 679.02,-2344.66 685.82,-2341.77"/>
-<polygon fill="#ff002a" stroke="#ff002a" points="687.1,-2345.03 695.27,-2338.28 684.68,-2338.46 687.1,-2345.03"/>
+<title>program~shape_c_2d&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff002a" d="M581.06,-3056.31C598.91,-3053.45 619,-3046.83 631,-3032 693.96,-2954.18 601.42,-2658.63 667,-2583 672.18,-2577.02 678.68,-2572.54 685.81,-2569.21"/>
+<polygon fill="#ff002a" stroke="#ff002a" points="687.08,-2572.47 695.13,-2565.58 684.54,-2565.95 687.08,-2572.47"/>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~export_xc~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~export_xc~3 -->
 <g id="call~~graph~~CallGraph_edge583" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff002a" d="M578.21,-2489.06C602.74,-2497.49 636.69,-2508.67 667,-2517 675.35,-2519.29 684.17,-2521.53 692.92,-2523.63"/>
-<polygon fill="#ff002a" stroke="#ff002a" points="692.2,-2527.06 702.74,-2525.94 693.81,-2520.24 692.2,-2527.06"/>
+<title>program~shape_c_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff002a" d="M581.13,-3065.22C610.46,-3070.92 652.27,-3079.05 688.09,-3086.02"/>
+<polygon fill="#ff002a" stroke="#ff002a" points="687.54,-3089.48 698.02,-3087.95 688.88,-3082.6 687.54,-3089.48"/>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~export_xg~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~export_xg~3 -->
 <g id="call~~graph~~CallGraph_edge584" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff002a" d="M578.94,-2489.04C595.64,-2495.76 615.34,-2505.18 631,-2517 650.62,-2531.81 645.94,-2546.31 667,-2559 670,-2560.81 673.13,-2562.46 676.37,-2563.96"/>
-<polygon fill="#ff002a" stroke="#ff002a" points="675.12,-2567.24 685.69,-2567.85 677.81,-2560.77 675.12,-2567.24"/>
+<title>program~shape_c_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff002a" d="M581.1,-3061.75C597.32,-3064.66 616.03,-3069.83 631,-3079 651.97,-3091.84 645.94,-3108.31 667,-3121 670,-3122.81 673.13,-3124.46 676.37,-3125.96"/>
+<polygon fill="#ff002a" stroke="#ff002a" points="675.12,-3129.24 685.69,-3129.85 677.81,-3122.77 675.12,-3129.24"/>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~finalize~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~finalize~3 -->
 <g id="call~~graph~~CallGraph_edge585" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff002a" d="M581.01,-2467.79C598.41,-2461.71 618.12,-2452.01 631,-2437 668.92,-2392.8 624.68,-2351.01 667,-2311 671.74,-2306.52 677.22,-2302.93 683.1,-2300.04"/>
-<polygon fill="#ff002a" stroke="#ff002a" points="684.73,-2303.15 692.62,-2296.08 682.05,-2296.69 684.73,-2303.15"/>
+<title>program~shape_c_2d&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff002a" d="M581.01,-3056.27C598.85,-3053.4 618.94,-3046.78 631,-3032 688.4,-2961.64 607.23,-2693.35 667,-2625 671.61,-2619.73 677.24,-2615.62 683.43,-2612.44"/>
+<polygon fill="#ff002a" stroke="#ff002a" points="685.01,-2615.57 692.83,-2608.42 682.26,-2609.14 685.01,-2615.57"/>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~set_c~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~set_c~3 -->
 <g id="call~~graph~~CallGraph_edge586" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~set_c~2</title>
-<path fill="none" stroke="#ff002a" d="M581.09,-2487.25C598.09,-2493.52 617.43,-2503.07 631,-2517 659.34,-2546.09 635.78,-2575.02 667,-2601 673.24,-2606.19 680.51,-2610.17 688.17,-2613.2"/>
-<polygon fill="#ff002a" stroke="#ff002a" points="687.09,-2616.53 697.68,-2616.45 689.35,-2609.9 687.09,-2616.53"/>
+<title>program~shape_c_2d&#45;&gt;proc~set_c~3</title>
+<path fill="none" stroke="#ff002a" d="M581.25,-3059.54C598.08,-3061.97 617.23,-3067.37 631,-3079 662.03,-3105.21 635.78,-3137.02 667,-3163 673.24,-3168.19 680.51,-3172.17 688.17,-3175.2"/>
+<polygon fill="#ff002a" stroke="#ff002a" points="687.09,-3178.53 697.68,-3178.45 689.35,-3171.9 687.09,-3178.53"/>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~show~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~show~3 -->
 <g id="call~~graph~~CallGraph_edge587" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~show~2</title>
-<path fill="none" stroke="#ff002a" d="M581.13,-2466.39C605.53,-2459.42 638.15,-2450.14 667,-2442 679.86,-2438.37 693.72,-2434.49 706.72,-2430.85"/>
-<polygon fill="#ff002a" stroke="#ff002a" points="707.77,-2434.19 716.46,-2428.13 705.89,-2427.45 707.77,-2434.19"/>
+<title>program~shape_c_2d&#45;&gt;proc~show~3</title>
+<path fill="none" stroke="#ff002a" d="M581.13,-3058C610.55,-3058 652.54,-3058 688.44,-3058"/>
+<polygon fill="#ff002a" stroke="#ff002a" points="688.87,-3061.5 698.87,-3058 688.87,-3054.5 688.87,-3061.5"/>
 </g>
 <!-- program~shape_c_3d -->
 <g id="call~~graph~~CallGraph_node354" class="node">
 <title>program~shape_c_3d</title>
 <g id="a_call~~graph~~CallGraph_node354"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="581,-3909 505,-3909 505,-3885 581,-3885 581,-3909"/>
-<text text-anchor="middle" x="543" y="-3894.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="581,-4340 505,-4340 505,-4316 581,-4316 581,-4340"/>
+<text text-anchor="middle" x="543" y="-4325.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~create -->
+<!-- program~shape_c_3d&#45;&gt;proc~create~2 -->
 <g id="call~~graph~~CallGraph_edge588" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~create</title>
-<path fill="none" stroke="#ff0026" d="M581.42,-3897.29C598.71,-3899.39 618.2,-3904.88 631,-3918 684.03,-3972.34 613.57,-4031.05 667,-4085 672.28,-4090.34 678.62,-4094.44 685.46,-4097.58"/>
-<polygon fill="#ff0026" stroke="#ff0026" points="684.47,-4100.95 695.06,-4101.3 687,-4094.42 684.47,-4100.95"/>
+<title>program~shape_c_3d&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#ff0026" d="M554.91,-4340.08C574.93,-4361.47 619.84,-4405.94 667,-4429 672.76,-4431.82 678.9,-4434.26 685.18,-4436.38"/>
+<polygon fill="#ff0026" stroke="#ff0026" points="684.54,-4439.85 695.13,-4439.45 686.61,-4433.16 684.54,-4439.85"/>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~export_xc -->
+<!-- program~shape_c_3d&#45;&gt;proc~export_xc~2 -->
 <g id="call~~graph~~CallGraph_edge589" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0026" d="M581.13,-3889.61C610.79,-3883.7 653.21,-3875.26 689.3,-3868.07"/>
-<polygon fill="#ff0026" stroke="#ff0026" points="690.17,-3871.47 699.3,-3866.08 688.81,-3864.6 690.17,-3871.47"/>
+<title>program~shape_c_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0026" d="M581.35,-4320.85C596.93,-4317.4 615.06,-4312.74 631,-4307 666.09,-4294.37 704.23,-4274.98 729.86,-4261.05"/>
+<polygon fill="#ff0026" stroke="#ff0026" points="731.64,-4264.07 738.72,-4256.19 728.27,-4257.93 731.64,-4264.07"/>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~export_xg -->
+<!-- program~shape_c_3d&#45;&gt;proc~export_xg~2 -->
 <g id="call~~graph~~CallGraph_edge590" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0026" d="M581.15,-3893.33C597.38,-3890.43 616.08,-3885.26 631,-3876 652.18,-3862.86 645.72,-3845.98 667,-3833 669.99,-3831.18 673.11,-3829.51 676.34,-3827.99"/>
-<polygon fill="#ff0026" stroke="#ff0026" points="677.79,-3831.18 685.65,-3824.08 675.08,-3824.73 677.79,-3831.18"/>
+<title>program~shape_c_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0026" d="M581.43,-4327.72C598.72,-4325.62 618.2,-4320.13 631,-4307 684.3,-4252.31 613.3,-4193.29 667,-4139 669.86,-4136.1 673.04,-4133.57 676.43,-4131.36"/>
+<polygon fill="#ff0026" stroke="#ff0026" points="678.21,-4134.37 685.29,-4126.49 674.84,-4128.24 678.21,-4134.37"/>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~finalize -->
+<!-- program~shape_c_3d&#45;&gt;proc~finalize~2 -->
 <g id="call~~graph~~CallGraph_edge591" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0026" d="M581.22,-3898.56C598.05,-3901 617.21,-3906.4 631,-3918 661.77,-3943.88 636.04,-3975.35 667,-4001 671.94,-4005.09 677.51,-4008.42 683.4,-4011.13"/>
-<polygon fill="#ff0026" stroke="#ff0026" points="682.32,-4014.47 692.9,-4014.9 684.9,-4007.96 682.32,-4014.47"/>
+<title>program~shape_c_3d&#45;&gt;proc~finalize~2</title>
+<path fill="none" stroke="#ff0026" d="M581.13,-4327.31C609.02,-4326.8 648.19,-4326.07 682.77,-4325.43"/>
+<polygon fill="#ff0026" stroke="#ff0026" points="682.92,-4328.93 692.86,-4325.24 682.79,-4321.93 682.92,-4328.93"/>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~set_c -->
+<!-- program~shape_c_3d&#45;&gt;proc~set_c~2 -->
 <g id="call~~graph~~CallGraph_edge592" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~set_c</title>
-<path fill="none" stroke="#ff0026" d="M581.13,-3896.83C610.22,-3896.69 651.6,-3896.5 687.23,-3896.34"/>
-<polygon fill="#ff0026" stroke="#ff0026" points="687.61,-3899.84 697.6,-3896.29 687.58,-3892.84 687.61,-3899.84"/>
+<title>program~shape_c_3d&#45;&gt;proc~set_c~2</title>
+<path fill="none" stroke="#ff0026" d="M550.78,-4340.27C566.93,-4368.27 610.59,-4437.09 667,-4471 673.44,-4474.87 680.51,-4478.03 687.8,-4480.6"/>
+<polygon fill="#ff0026" stroke="#ff0026" points="687.24,-4484.1 697.83,-4483.77 689.35,-4477.42 687.24,-4484.1"/>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~show -->
+<!-- program~shape_c_3d&#45;&gt;proc~show~2 -->
 <g id="call~~graph~~CallGraph_edge593" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~show</title>
-<path fill="none" stroke="#ff0026" d="M581.13,-3904.05C610.68,-3909.66 652.9,-3917.67 688.9,-3924.5"/>
-<polygon fill="#ff0026" stroke="#ff0026" points="688.4,-3927.97 698.87,-3926.4 689.7,-3921.09 688.4,-3927.97"/>
+<title>program~shape_c_3d&#45;&gt;proc~show~2</title>
+<path fill="none" stroke="#ff0026" d="M581.05,-4327.34C598.25,-4325.15 617.77,-4319.69 631,-4307 673.03,-4266.68 624.68,-4221.01 667,-4181 673.31,-4175.03 680.94,-4170.63 689.09,-4167.4"/>
+<polygon fill="#ff0026" stroke="#ff0026" points="690.47,-4170.63 698.83,-4164.13 688.24,-4163.99 690.47,-4170.63"/>
 </g>
 <!-- program~shape_circle -->
 <g id="call~~graph~~CallGraph_node355" class="node">
 <title>program~shape_circle</title>
 <g id="a_call~~graph~~CallGraph_node355"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="582.5,-411 503.5,-411 503.5,-387 582.5,-387 582.5,-411"/>
-<text text-anchor="middle" x="543" y="-396.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="582.5,-6310 503.5,-6310 503.5,-6286 582.5,-6286 582.5,-6310"/>
+<text text-anchor="middle" x="543" y="-6295.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~create~3 -->
+<!-- program~shape_circle&#45;&gt;proc~create -->
 <g id="call~~graph~~CallGraph_edge594" class="edge">
-<title>program~shape_circle&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#ff0021" d="M576.81,-386.96C593.93,-379.77 614.65,-369.58 631,-357 650.48,-342 648.42,-331.1 667,-315 685.76,-298.76 709.39,-283.82 728.14,-273.04"/>
-<polygon fill="#ff0021" stroke="#ff0021" points="729.92,-276.06 736.91,-268.09 726.48,-269.96 729.92,-276.06"/>
+<title>program~shape_circle&#45;&gt;proc~create</title>
+<path fill="none" stroke="#ff0021" d="M582.9,-6299.91C599.28,-6302.48 617.6,-6307.89 631,-6319 661.01,-6343.89 636.81,-6374.33 667,-6399 673.89,-6404.63 681.99,-6408.82 690.49,-6411.93"/>
+<polygon fill="#ff0021" stroke="#ff0021" points="689.61,-6415.33 700.2,-6415 691.72,-6408.65 689.61,-6415.33"/>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~export_xc~3 -->
+<!-- program~shape_circle&#45;&gt;proc~export_xc -->
 <g id="call~~graph~~CallGraph_edge595" class="edge">
-<title>program~shape_circle&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#ff0021" d="M562.45,-411.08C582.88,-425.54 615.05,-451.78 631,-483 682.48,-583.75 590.27,-651.86 667,-735 671.17,-739.52 676.09,-743.17 681.45,-746.11"/>
-<polygon fill="#ff0021" stroke="#ff0021" points="680.29,-749.43 690.84,-750.41 683.21,-743.06 680.29,-749.43"/>
+<title>program~shape_circle&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0021" d="M582.83,-6293.93C598.64,-6290.97 616.56,-6285.85 631,-6277 651.97,-6264.16 645.94,-6247.69 667,-6235 671.49,-6232.29 676.3,-6229.94 681.27,-6227.88"/>
+<polygon fill="#ff0021" stroke="#ff0021" points="682.83,-6231.04 691,-6224.29 680.41,-6224.47 682.83,-6231.04"/>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~export_xg~3 -->
+<!-- program~shape_circle&#45;&gt;proc~export_xg -->
 <g id="call~~graph~~CallGraph_edge596" class="edge">
-<title>program~shape_circle&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff0021" d="M562.29,-411.16C582.58,-425.7 614.61,-452 631,-483 675.26,-566.71 601.81,-624.31 667,-693 670.99,-697.2 675.62,-700.65 680.66,-703.47"/>
-<polygon fill="#ff0021" stroke="#ff0021" points="679.55,-706.81 690.09,-707.89 682.52,-700.47 679.55,-706.81"/>
+<title>program~shape_circle&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#ff0021" d="M582.56,-6296.27C599.06,-6293.75 617.59,-6288.33 631,-6277 662.03,-6250.79 635.78,-6218.98 667,-6193 671.21,-6189.49 675.9,-6186.54 680.85,-6184.06"/>
+<polygon fill="#ff0021" stroke="#ff0021" points="682.24,-6187.27 690.03,-6180.09 679.46,-6180.85 682.24,-6187.27"/>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~finalize~3 -->
+<!-- program~shape_circle&#45;&gt;proc~finalize -->
 <g id="call~~graph~~CallGraph_edge597" class="edge">
-<title>program~shape_circle&#45;&gt;proc~finalize~3</title>
-<path fill="none" stroke="#ff0021" d="M576.07,-386.99C600.72,-378.03 635.73,-365.84 667,-357 675.13,-354.7 683.71,-352.49 692.25,-350.41"/>
-<polygon fill="#ff0021" stroke="#ff0021" points="693.29,-353.76 702.21,-348.04 691.67,-346.95 693.29,-353.76"/>
+<title>program~shape_circle&#45;&gt;proc~finalize</title>
+<path fill="none" stroke="#ff0021" d="M582.62,-6304.79C611.66,-6309.9 652.32,-6317.06 687.39,-6323.23"/>
+<polygon fill="#ff0021" stroke="#ff0021" points="687.13,-6326.73 697.59,-6325.02 688.35,-6319.84 687.13,-6326.73"/>
 </g>
 <!-- program~shape_circle&#45;&gt;proc~set_circle -->
 <g id="call~~graph~~CallGraph_edge598" class="edge">
 <title>program~shape_circle&#45;&gt;proc~set_circle</title>
-<path fill="none" stroke="#ff0021" d="M582.62,-395.25C610.22,-392.56 648.31,-388.86 682.12,-385.57"/>
-<polygon fill="#ff0021" stroke="#ff0021" points="682.84,-389.02 692.45,-384.57 682.16,-382.05 682.84,-389.02"/>
+<path fill="none" stroke="#ff0021" d="M582.61,-6302.43C598.39,-6305.45 616.34,-6310.52 631,-6319 651.14,-6330.65 646.78,-6345.5 667,-6357 671.86,-6359.76 677.05,-6362.16 682.4,-6364.24"/>
+<polygon fill="#ff0021" stroke="#ff0021" points="681.58,-6367.67 692.18,-6367.66 683.9,-6361.06 681.58,-6367.67"/>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~show~3 -->
+<!-- program~shape_circle&#45;&gt;proc~show -->
 <g id="call~~graph~~CallGraph_edge599" class="edge">
-<title>program~shape_circle&#45;&gt;proc~show~3</title>
-<path fill="none" stroke="#ff0021" d="M582.62,-402.75C613.34,-405.74 657.06,-409.99 693.4,-413.53"/>
-<polygon fill="#ff0021" stroke="#ff0021" points="693.15,-417.02 703.44,-414.5 693.83,-410.05 693.15,-417.02"/>
+<title>program~shape_circle&#45;&gt;proc~show</title>
+<path fill="none" stroke="#ff0021" d="M582.62,-6290.49C613.34,-6284.52 657.06,-6276.02 693.4,-6268.95"/>
+<polygon fill="#ff0021" stroke="#ff0021" points="694.29,-6272.34 703.44,-6267 692.96,-6265.47 694.29,-6272.34"/>
 </g>
 <!-- program~shape_half_circle -->
 <g id="call~~graph~~CallGraph_node356" class="node">
 <title>program~shape_half_circle</title>
 <g id="a_call~~graph~~CallGraph_node356"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="595,-516 491,-516 491,-492 595,-492 595,-516"/>
-<text text-anchor="middle" x="543" y="-501.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="595,-6226 491,-6226 491,-6202 595,-6202 595,-6226"/>
+<text text-anchor="middle" x="543" y="-6211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~create~3 -->
+<!-- program~shape_half_circle&#45;&gt;proc~create -->
 <g id="call~~graph~~CallGraph_edge600" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#ff001d" d="M560.72,-491.86C580.14,-476.96 611.95,-449.94 631,-420 657.48,-378.38 636.45,-353.73 667,-315 681.35,-296.81 702.95,-282.62 721.72,-272.72"/>
-<polygon fill="#ff001d" stroke="#ff001d" points="723.32,-275.84 730.67,-268.21 720.16,-269.59 723.32,-275.84"/>
+<title>program~shape_half_circle&#45;&gt;proc~create</title>
+<path fill="none" stroke="#ff001d" d="M595.32,-6216.75C608.46,-6219.82 621.54,-6225.34 631,-6235 683.22,-6288.31 614.39,-6346.07 667,-6399 673.6,-6405.64 681.82,-6410.37 690.62,-6413.71"/>
+<polygon fill="#ff001d" stroke="#ff001d" points="689.77,-6417.11 700.36,-6416.81 691.9,-6410.44 689.77,-6417.11"/>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~export_xc~3 -->
+<!-- program~shape_half_circle&#45;&gt;proc~export_xc -->
 <g id="call~~graph~~CallGraph_edge601" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#ff001d" d="M557.2,-516.3C576.19,-534.71 611.13,-571.3 631,-609 658.16,-660.52 624.68,-694.99 667,-735 671.32,-739.08 676.25,-742.43 681.54,-745.17"/>
-<polygon fill="#ff001d" stroke="#ff001d" points="680.18,-748.39 690.74,-749.23 683.01,-741.99 680.18,-748.39"/>
+<title>program~shape_half_circle&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff001d" d="M595.19,-6214C620.63,-6214 651.96,-6214 680.44,-6214"/>
+<polygon fill="#ff001d" stroke="#ff001d" points="680.79,-6217.5 690.79,-6214 680.79,-6210.5 680.79,-6217.5"/>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~export_xg~3 -->
+<!-- program~shape_half_circle&#45;&gt;proc~export_xg -->
 <g id="call~~graph~~CallGraph_edge602" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff001d" d="M555.98,-516.03C574.04,-534.67 608.54,-572.23 631,-609 652.18,-643.66 635.78,-667.02 667,-693 671.21,-696.51 675.9,-699.46 680.85,-701.94"/>
-<polygon fill="#ff001d" stroke="#ff001d" points="679.46,-705.15 690.03,-705.91 682.24,-698.73 679.46,-705.15"/>
+<title>program~shape_half_circle&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#ff001d" d="M595.19,-6204.05C622.87,-6198.66 657.52,-6191.93 687.89,-6186.02"/>
+<polygon fill="#ff001d" stroke="#ff001d" points="688.87,-6189.4 698.01,-6184.05 687.53,-6182.53 688.87,-6189.4"/>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~finalize~3 -->
+<!-- program~shape_half_circle&#45;&gt;proc~finalize -->
 <g id="call~~graph~~CallGraph_edge603" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~finalize~3</title>
-<path fill="none" stroke="#ff001d" d="M559.11,-491.74C577.54,-476.3 608.96,-448.34 631,-420 650.8,-394.54 641.07,-376.18 667,-357 673.36,-352.29 680.59,-348.61 688.14,-345.74"/>
-<polygon fill="#ff001d" stroke="#ff001d" points="689.46,-348.99 697.84,-342.51 687.25,-342.35 689.46,-348.99"/>
+<title>program~shape_half_circle&#45;&gt;proc~finalize</title>
+<path fill="none" stroke="#ff001d" d="M595.34,-6220.81C607.62,-6223.91 620.27,-6228.43 631,-6235 651.97,-6247.84 648.42,-6260.9 667,-6277 685.76,-6293.24 709.39,-6308.18 728.14,-6318.96"/>
+<polygon fill="#ff001d" stroke="#ff001d" points="726.48,-6322.04 736.91,-6323.91 729.92,-6315.94 726.48,-6322.04"/>
 </g>
 <!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
 <g id="call~~graph~~CallGraph_edge604" class="edge">
 <title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
-<path fill="none" stroke="#ff001d" d="M554.31,-516.42C583.56,-551.67 665.14,-649.86 667,-651 669.99,-652.82 673.11,-654.49 676.34,-656.01"/>
-<polygon fill="#ff001d" stroke="#ff001d" points="675.07,-659.27 685.65,-659.93 677.79,-652.82 675.07,-659.27"/>
+<path fill="none" stroke="#ff001d" d="M557.14,-6201.7C579.09,-6181.39 624.99,-6140.02 667,-6109 687.49,-6093.87 711.84,-6078.51 730.48,-6067.26"/>
+<polygon fill="#ff001d" stroke="#ff001d" points="732.34,-6070.22 739.13,-6062.08 728.75,-6064.21 732.34,-6070.22"/>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~show~3 -->
+<!-- program~shape_half_circle&#45;&gt;proc~show -->
 <g id="call~~graph~~CallGraph_edge605" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~show~3</title>
-<path fill="none" stroke="#ff001d" d="M563.75,-491.9C587.49,-477.85 628.88,-454.82 667,-441 675.46,-437.93 684.51,-435.22 693.54,-432.86"/>
-<polygon fill="#ff001d" stroke="#ff001d" points="694.43,-436.24 703.28,-430.42 692.73,-429.45 694.43,-436.24"/>
+<title>program~shape_half_circle&#45;&gt;proc~show</title>
+<path fill="none" stroke="#ff001d" d="M595.19,-6223.95C624.57,-6229.67 661.79,-6236.9 693.43,-6243.06"/>
+<polygon fill="#ff001d" stroke="#ff001d" points="693,-6246.54 703.48,-6245.01 694.34,-6239.67 693,-6246.54"/>
 </g>
 <!-- program~shape_half_ring_2d -->
 <g id="call~~graph~~CallGraph_node357" class="node">
 <title>program~shape_half_ring_2d</title>
 <g id="a_call~~graph~~CallGraph_node357"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="600.5,-2428 485.5,-2428 485.5,-2404 600.5,-2404 600.5,-2428"/>
-<text text-anchor="middle" x="543" y="-2413.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="600.5,-3023 485.5,-3023 485.5,-2999 600.5,-2999 600.5,-3023"/>
+<text text-anchor="middle" x="543" y="-3008.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~create~2 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~create~3 -->
 <g id="call~~graph~~CallGraph_edge606" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0019" d="M600.81,-2407.72C611.32,-2404.71 621.86,-2400.6 631,-2395 651.97,-2382.16 645.94,-2365.69 667,-2353 672.81,-2349.5 679.15,-2346.58 685.69,-2344.15"/>
-<polygon fill="#ff0019" stroke="#ff0019" points="687,-2347.4 695.38,-2340.92 684.79,-2340.76 687,-2347.4"/>
+<title>program~shape_half_ring_2d&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0019" d="M600.55,-3001.89C612.24,-2997.43 623.32,-2990.81 631,-2981 685.76,-2911.09 608.48,-2649.8 667,-2583 672.22,-2577.05 678.73,-2572.59 685.87,-2569.27"/>
+<polygon fill="#ff0019" stroke="#ff0019" points="687.14,-2572.53 695.2,-2565.64 684.61,-2566 687.14,-2572.53"/>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xc~2 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xc~3 -->
 <g id="call~~graph~~CallGraph_edge607" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff0019" d="M582.93,-2428.06C599.13,-2434.47 617.3,-2443.64 631,-2456 654.37,-2477.09 641.56,-2498.46 667,-2517 670.06,-2519.23 673.31,-2521.22 676.69,-2523.01"/>
-<polygon fill="#ff0019" stroke="#ff0019" points="675.39,-2526.27 685.94,-2527.29 678.33,-2519.91 675.39,-2526.27"/>
+<title>program~shape_half_ring_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff0019" d="M600.85,-3022.86C611.36,-3026.45 621.88,-3031.07 631,-3037 651.61,-3050.4 645.94,-3066.31 667,-3079 670,-3080.81 673.13,-3082.46 676.37,-3083.96"/>
+<polygon fill="#ff0019" stroke="#ff0019" points="675.12,-3087.24 685.69,-3087.85 677.81,-3080.77 675.12,-3087.24"/>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xg~2 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xg~3 -->
 <g id="call~~graph~~CallGraph_edge608" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff0019" d="M587.29,-2428.03C602.83,-2434.21 619.37,-2443.21 631,-2456 663.63,-2491.87 630.81,-2526.72 667,-2559 669.89,-2561.58 673.02,-2563.86 676.34,-2565.87"/>
-<polygon fill="#ff0019" stroke="#ff0019" points="674.99,-2569.12 685.48,-2570.62 678.22,-2562.91 674.99,-2569.12"/>
+<title>program~shape_half_ring_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff0019" d="M600.64,-3020.12C611.65,-3023.94 622.41,-3029.34 631,-3037 661.32,-3064.03 635.78,-3095.02 667,-3121 669.91,-3123.42 673.03,-3125.57 676.32,-3127.49"/>
+<polygon fill="#ff0019" stroke="#ff0019" points="674.85,-3130.67 685.35,-3132.03 677.99,-3124.41 674.85,-3130.67"/>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~finalize~2 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~finalize~3 -->
 <g id="call~~graph~~CallGraph_edge609" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0019" d="M600.53,-2410.37C611.54,-2407.17 622.33,-2402.32 631,-2395 662.03,-2368.79 635.78,-2336.98 667,-2311 671.93,-2306.9 677.49,-2303.56 683.39,-2300.85"/>
-<polygon fill="#ff0019" stroke="#ff0019" points="684.88,-2304.02 692.88,-2297.07 682.29,-2297.51 684.88,-2304.02"/>
+<title>program~shape_half_ring_2d&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0019" d="M600.92,-3001.66C612.45,-2997.2 623.36,-2990.64 631,-2981 680.36,-2918.66 614.29,-2684.53 667,-2625 671.64,-2619.75 677.3,-2615.67 683.49,-2612.5"/>
+<polygon fill="#ff0019" stroke="#ff0019" points="685.08,-2615.63 692.91,-2608.5 682.34,-2609.19 685.08,-2615.63"/>
 </g>
 <!-- program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2 -->
 <g id="call~~graph~~CallGraph_edge610" class="edge">
 <title>program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#ff0019" d="M600.75,-2404.96C627.47,-2399.77 659.65,-2393.51 688.06,-2387.99"/>
-<polygon fill="#ff0019" stroke="#ff0019" points="688.79,-2391.41 697.94,-2386.07 687.45,-2384.54 688.79,-2391.41"/>
+<path fill="none" stroke="#ff0019" d="M600.89,-3000.52C612.14,-2996.12 622.95,-2989.87 631,-2981 677.08,-2930.24 618.2,-2879.15 667,-2831 668.1,-2829.91 669.25,-2828.87 670.44,-2827.88"/>
+<polygon fill="#ff0019" stroke="#ff0019" points="672.6,-2830.64 678.8,-2822.05 668.59,-2824.9 672.6,-2830.64"/>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~show~2 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~show~3 -->
 <g id="call~~graph~~CallGraph_edge611" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~show~2</title>
-<path fill="none" stroke="#ff0019" d="M600.75,-2416C627.58,-2416 659.9,-2416 688.4,-2416"/>
-<polygon fill="#ff0019" stroke="#ff0019" points="688.7,-2419.5 698.7,-2416 688.7,-2412.5 688.7,-2419.5"/>
+<title>program~shape_half_ring_2d&#45;&gt;proc~show~3</title>
+<path fill="none" stroke="#ff0019" d="M599.34,-3023.04C628.43,-3029.37 664.26,-3037.17 694.7,-3043.79"/>
+<polygon fill="#ff0019" stroke="#ff0019" points="694.28,-3047.28 704.8,-3045.99 695.77,-3040.44 694.28,-3047.28"/>
 </g>
 <!-- program~shape_half_ring_3d -->
 <g id="call~~graph~~CallGraph_node358" class="node">
 <title>program~shape_half_ring_3d</title>
 <g id="a_call~~graph~~CallGraph_node358"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="600.5,-3994 485.5,-3994 485.5,-3970 600.5,-3970 600.5,-3994"/>
-<text text-anchor="middle" x="543" y="-3979.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="600.5,-4256 485.5,-4256 485.5,-4232 600.5,-4232 600.5,-4256"/>
+<text text-anchor="middle" x="543" y="-4241.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~create -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~create~2 -->
 <g id="call~~graph~~CallGraph_edge612" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~create</title>
-<path fill="none" stroke="#ff0015" d="M565.27,-3994.03C583.69,-4004.99 610.52,-4022.29 631,-4041 649.65,-4058.05 645.51,-4071.72 667,-4085 672.77,-4088.57 679.08,-4091.53 685.6,-4093.99"/>
-<polygon fill="#ff0015" stroke="#ff0015" points="684.68,-4097.37 695.27,-4097.25 686.92,-4090.74 684.68,-4097.37"/>
+<title>program~shape_half_ring_3d&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#ff0015" d="M600.74,-4248.16C612,-4251.42 622.85,-4256.67 631,-4265 683.22,-4318.31 614.39,-4376.07 667,-4429 672.29,-4434.33 678.63,-4438.42 685.48,-4441.56"/>
+<polygon fill="#ff0015" stroke="#ff0015" points="684.49,-4444.93 695.08,-4445.27 687.02,-4438.4 684.49,-4444.93"/>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xc -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xc~2 -->
 <g id="call~~graph~~CallGraph_edge613" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0015" d="M600.58,-3975.7C611.58,-3972.37 622.37,-3967.4 631,-3960 662.14,-3933.29 635.52,-3901.31 667,-3875 670.06,-3872.45 673.36,-3870.19 676.84,-3868.19"/>
-<polygon fill="#ff0015" stroke="#ff0015" points="678.39,-3871.32 685.8,-3863.74 675.28,-3865.05 678.39,-3871.32"/>
+<title>program~shape_half_ring_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0015" d="M600.75,-4244C623.6,-4244 650.44,-4244 675.5,-4244"/>
+<polygon fill="#ff0015" stroke="#ff0015" points="675.74,-4247.5 685.74,-4244 675.74,-4240.5 675.74,-4247.5"/>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xg -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xg~2 -->
 <g id="call~~graph~~CallGraph_edge614" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0015" d="M600.86,-3976.64C611.97,-3973.26 622.73,-3968.04 631,-3960 673.07,-3919.11 624.41,-3873.35 667,-3833 669.81,-3830.34 672.88,-3827.99 676.14,-3825.92"/>
-<polygon fill="#ff0015" stroke="#ff0015" points="678.03,-3828.87 685.18,-3821.05 674.71,-3822.71 678.03,-3828.87"/>
+<title>program~shape_half_ring_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0015" d="M600.53,-4238.37C611.54,-4235.17 622.33,-4230.32 631,-4223 662.03,-4196.79 635.78,-4164.98 667,-4139 669.91,-4136.58 673.03,-4134.43 676.32,-4132.51"/>
+<polygon fill="#ff0015" stroke="#ff0015" points="677.99,-4135.59 685.35,-4127.97 674.85,-4129.33 677.99,-4135.59"/>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~finalize -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~finalize~2 -->
 <g id="call~~graph~~CallGraph_edge615" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0015" d="M600.75,-3992.51C626.47,-3997.27 657.23,-4002.97 684.83,-4008.08"/>
-<polygon fill="#ff0015" stroke="#ff0015" points="684.37,-4011.55 694.84,-4009.93 685.64,-4004.67 684.37,-4011.55"/>
+<title>program~shape_half_ring_3d&#45;&gt;proc~finalize~2</title>
+<path fill="none" stroke="#ff0015" d="M600.76,-4253.31C611.16,-4256.22 621.67,-4260.03 631,-4265 650.16,-4275.2 648.03,-4287.46 667,-4298 674.56,-4302.2 682.85,-4305.77 691.27,-4308.78"/>
+<polygon fill="#ff0015" stroke="#ff0015" points="690.2,-4312.11 700.79,-4311.95 692.41,-4305.47 690.2,-4312.11"/>
 </g>
 <!-- program~shape_half_ring_3d&#45;&gt;proc~set_half_ring -->
 <g id="call~~graph~~CallGraph_edge616" class="edge">
 <title>program~shape_half_ring_3d&#45;&gt;proc~set_half_ring</title>
-<path fill="none" stroke="#ff0015" d="M564.66,-3994.16C588.58,-4007.78 629.49,-4029.68 667,-4043 673.39,-4045.27 680.12,-4047.35 686.92,-4049.25"/>
-<polygon fill="#ff0015" stroke="#ff0015" points="686.32,-4052.71 696.89,-4051.89 688.12,-4045.94 686.32,-4052.71"/>
+<path fill="none" stroke="#ff0015" d="M600.88,-4249.88C611.74,-4253.07 622.39,-4257.86 631,-4265 661.01,-4289.89 636.81,-4320.33 667,-4345 668.59,-4346.3 670.24,-4347.52 671.94,-4348.66"/>
+<polygon fill="#ff0015" stroke="#ff0015" points="670.46,-4351.85 680.87,-4353.82 673.96,-4345.79 670.46,-4351.85"/>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~show -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~show~2 -->
 <g id="call~~graph~~CallGraph_edge617" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~show</title>
-<path fill="none" stroke="#ff0015" d="M600.75,-3970.44C628.37,-3964.81 661.81,-3958 690.9,-3952.08"/>
-<polygon fill="#ff0015" stroke="#ff0015" points="691.89,-3955.45 700.99,-3950.02 690.49,-3948.59 691.89,-3955.45"/>
+<title>program~shape_half_ring_3d&#45;&gt;proc~show~2</title>
+<path fill="none" stroke="#ff0015" d="M600.81,-4235.72C611.32,-4232.71 621.86,-4228.6 631,-4223 651.97,-4210.16 645.94,-4193.69 667,-4181 673.85,-4176.87 681.44,-4173.55 689.23,-4170.89"/>
+<polygon fill="#ff0015" stroke="#ff0015" points="690.27,-4174.23 698.8,-4167.95 688.21,-4167.54 690.27,-4174.23"/>
 </g>
 <!-- program~shape_hexahedron -->
 <g id="call~~graph~~CallGraph_node359" class="node">
 <title>program~shape_hexahedron</title>
 <g id="a_call~~graph~~CallGraph_node359"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="599.5,-3867 486.5,-3867 486.5,-3843 599.5,-3843 599.5,-3867"/>
-<text text-anchor="middle" x="543" y="-3852.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="599.5,-4172 486.5,-4172 486.5,-4148 599.5,-4148 599.5,-4172"/>
+<text text-anchor="middle" x="543" y="-4157.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~create -->
+<!-- program~shape_hexahedron&#45;&gt;proc~create~2 -->
 <g id="call~~graph~~CallGraph_edge618" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~create</title>
-<path fill="none" stroke="#ff0010" d="M599.68,-3858.5C611.41,-3861.74 622.72,-3867.15 631,-3876 695.4,-3944.82 602.09,-4016.66 667,-4085 672.25,-4090.53 678.62,-4094.75 685.54,-4097.95"/>
-<polygon fill="#ff0010" stroke="#ff0010" points="684.68,-4101.37 695.26,-4101.71 687.2,-4094.84 684.68,-4101.37"/>
+<title>program~shape_hexahedron&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#ff0010" d="M599.85,-4163.35C611.57,-4166.59 622.84,-4172.04 631,-4181 706.02,-4263.32 591.37,-4347.24 667,-4429 672.18,-4434.6 678.5,-4438.86 685.39,-4442.09"/>
+<polygon fill="#ff0010" stroke="#ff0010" points="684.5,-4445.5 695.09,-4445.87 687.05,-4438.98 684.5,-4445.5"/>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~export_xc -->
+<!-- program~shape_hexahedron&#45;&gt;proc~export_xc~2 -->
 <g id="call~~graph~~CallGraph_edge619" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0010" d="M599.63,-3854.74C622.8,-3854.64 650.22,-3854.51 675.77,-3854.39"/>
-<polygon fill="#ff0010" stroke="#ff0010" points="675.85,-3857.89 685.83,-3854.34 675.81,-3850.89 675.85,-3857.89"/>
+<title>program~shape_hexahedron&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0010" d="M599.9,-4168.02C610.71,-4171.06 621.59,-4175.24 631,-4181 651.97,-4193.84 645.94,-4210.31 667,-4223 670,-4224.81 673.13,-4226.46 676.37,-4227.96"/>
+<polygon fill="#ff0010" stroke="#ff0010" points="675.12,-4231.24 685.69,-4231.85 677.81,-4224.77 675.12,-4231.24"/>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~export_xg -->
+<!-- program~shape_hexahedron&#45;&gt;proc~export_xg~2 -->
 <g id="call~~graph~~CallGraph_edge620" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0010" d="M599.63,-3843.93C627.02,-3838.47 660.35,-3831.84 689.51,-3826.03"/>
-<polygon fill="#ff0010" stroke="#ff0010" points="690.51,-3829.4 699.63,-3824.02 689.14,-3822.54 690.51,-3829.4"/>
+<title>program~shape_hexahedron&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0010" d="M599.63,-4149.18C626.57,-4143.94 659.26,-4137.59 688.08,-4131.99"/>
+<polygon fill="#ff0010" stroke="#ff0010" points="688.94,-4135.38 698.09,-4130.04 687.61,-4128.51 688.94,-4135.38"/>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~finalize -->
+<!-- program~shape_hexahedron&#45;&gt;proc~finalize~2 -->
 <g id="call~~graph~~CallGraph_edge621" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0010" d="M599.9,-3859.43C611.34,-3862.67 622.47,-3867.83 631,-3876 672.76,-3915.98 624.94,-3961.33 667,-4001 671.74,-4005.47 677.22,-4009.07 683.11,-4011.94"/>
-<polygon fill="#ff0010" stroke="#ff0010" points="682.06,-4015.3 692.64,-4015.9 684.74,-4008.83 682.06,-4015.3"/>
+<title>program~shape_hexahedron&#45;&gt;proc~finalize~2</title>
+<path fill="none" stroke="#ff0010" d="M599.62,-4165.37C610.94,-4168.56 622.1,-4173.48 631,-4181 662.03,-4207.21 640.67,-4234.07 667,-4265 682.23,-4282.89 704.27,-4297.2 723.07,-4307.25"/>
+<polygon fill="#ff0010" stroke="#ff0010" points="721.5,-4310.38 732,-4311.83 724.7,-4304.15 721.5,-4310.38"/>
 </g>
 <!-- program~shape_hexahedron&#45;&gt;proc~set_hexahedron -->
 <g id="call~~graph~~CallGraph_edge622" class="edge">
 <title>program~shape_hexahedron&#45;&gt;proc~set_hexahedron</title>
-<path fill="none" stroke="#ff0010" d="M599.85,-3850.38C611.42,-3847.01 622.63,-3841.59 631,-3833 681.86,-3780.78 625.04,-3732.6 667,-3673 680.15,-3654.32 701.27,-3640.23 720.07,-3630.51"/>
-<polygon fill="#ff0010" stroke="#ff0010" points="721.64,-3633.64 729.07,-3626.09 718.55,-3627.36 721.64,-3633.64"/>
+<path fill="none" stroke="#ff0010" d="M599.9,-4151.98C610.71,-4148.94 621.59,-4144.76 631,-4139 651.97,-4126.16 645.94,-4109.69 667,-4097 670,-4095.19 673.13,-4093.54 676.37,-4092.04"/>
+<polygon fill="#ff0010" stroke="#ff0010" points="677.81,-4095.23 685.69,-4088.15 675.12,-4088.76 677.81,-4095.23"/>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~show -->
+<!-- program~shape_hexahedron&#45;&gt;proc~show~2 -->
 <g id="call~~graph~~CallGraph_edge623" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~show</title>
-<path fill="none" stroke="#ff0010" d="M599.84,-3863.11C610.66,-3866.14 621.56,-3870.29 631,-3876 651.75,-3888.54 646.15,-3904.61 667,-3917 673.88,-3921.09 681.48,-3924.38 689.28,-3927.03"/>
-<polygon fill="#ff0010" stroke="#ff0010" points="688.27,-3930.38 698.85,-3929.96 690.31,-3923.69 688.27,-3930.38"/>
+<title>program~shape_hexahedron&#45;&gt;proc~show~2</title>
+<path fill="none" stroke="#ff0010" d="M599.63,-4160C626.8,-4160 659.8,-4160 688.79,-4160"/>
+<polygon fill="#ff0010" stroke="#ff0010" points="688.86,-4163.5 698.86,-4160 688.86,-4156.5 688.86,-4163.5"/>
 </g>
 <!-- program~shape_ring_2d -->
 <g id="call~~graph~~CallGraph_node360" class="node">
 <title>program~shape_ring_2d</title>
 <g id="a_call~~graph~~CallGraph_node360"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="588,-2386 498,-2386 498,-2362 588,-2362 588,-2386"/>
-<text text-anchor="middle" x="543" y="-2371.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="588,-2972 498,-2972 498,-2948 588,-2948 588,-2972"/>
+<text text-anchor="middle" x="543" y="-2957.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~create~2 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~create~3 -->
 <g id="call~~graph~~CallGraph_edge624" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff000c" d="M588.23,-2365.4C616.98,-2359.81 655.12,-2352.39 688.15,-2345.97"/>
-<polygon fill="#ff000c" stroke="#ff000c" points="689.08,-2349.36 698.22,-2344.01 687.74,-2342.49 689.08,-2349.36"/>
+<title>program~shape_ring_2d&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff000c" d="M588.01,-2949.63C604.03,-2943.63 620.72,-2934.31 631,-2920 718.91,-2797.68 566.82,-2695.49 667,-2583 672.26,-2577.09 678.8,-2572.65 685.96,-2569.35"/>
+<polygon fill="#ff000c" stroke="#ff000c" points="687.24,-2572.61 695.31,-2565.74 684.72,-2566.08 687.24,-2572.61"/>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~export_xc~2 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~export_xc~3 -->
 <g id="call~~graph~~CallGraph_edge625" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff000c" d="M588.1,-2375.8C603.37,-2378.52 619.52,-2384.08 631,-2395 671.96,-2433.96 625.75,-2478.34 667,-2517 669.97,-2519.79 673.23,-2522.23 676.7,-2524.37"/>
-<polygon fill="#ff000c" stroke="#ff000c" points="675.21,-2527.54 685.69,-2529.1 678.47,-2521.35 675.21,-2527.54"/>
+<title>program~shape_ring_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff000c" d="M588.19,-2967.46C603.28,-2971.88 619.3,-2978.89 631,-2990 661.95,-3019.37 634.48,-3051.37 667,-3079 669.95,-3081.51 673.13,-3083.73 676.49,-3085.7"/>
+<polygon fill="#ff000c" stroke="#ff000c" points="675.21,-3088.97 685.72,-3090.35 678.36,-3082.72 675.21,-3088.97"/>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~export_xg~2 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~export_xg~3 -->
 <g id="call~~graph~~CallGraph_edge626" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff000c" d="M588.08,-2375.29C603.53,-2377.93 619.8,-2383.57 631,-2395 683.22,-2448.31 614.39,-2506.07 667,-2559 669.87,-2561.89 673.05,-2564.42 676.45,-2566.63"/>
-<polygon fill="#ff000c" stroke="#ff000c" points="674.86,-2569.75 685.31,-2571.48 678.23,-2563.61 674.86,-2569.75"/>
+<title>program~shape_ring_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff000c" d="M588.02,-2966.48C603.46,-2970.8 619.74,-2978 631,-2990 672.31,-3034.04 623.33,-3079.3 667,-3121 669.8,-3123.67 672.86,-3126.03 676.12,-3128.11"/>
+<polygon fill="#ff000c" stroke="#ff000c" points="674.67,-3131.31 685.13,-3133 678.01,-3125.16 674.67,-3131.31"/>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~finalize~2 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~finalize~3 -->
 <g id="call~~graph~~CallGraph_edge627" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff000c" d="M588.12,-2368.87C602.54,-2365.79 618.15,-2360.87 631,-2353 651.97,-2340.16 645.94,-2323.69 667,-2311 672.09,-2307.94 677.57,-2305.32 683.25,-2303.08"/>
-<polygon fill="#ff000c" stroke="#ff000c" points="684.67,-2306.29 692.94,-2299.67 682.35,-2299.69 684.67,-2306.29"/>
+<title>program~shape_ring_2d&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff000c" d="M588.36,-2949.38C604.22,-2943.36 620.71,-2934.1 631,-2920 708.88,-2813.32 578.42,-2722.98 667,-2625 671.62,-2619.89 677.21,-2615.88 683.31,-2612.76"/>
+<polygon fill="#ff000c" stroke="#ff000c" points="684.77,-2615.94 692.58,-2608.79 682.01,-2609.51 684.77,-2615.94"/>
 </g>
 <!-- program~shape_ring_2d&#45;&gt;proc~set_ring~2 -->
 <g id="call~~graph~~CallGraph_edge628" class="edge">
 <title>program~shape_ring_2d&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#ff000c" d="M588.32,-2371.28C603.26,-2368.42 619.13,-2363.03 631,-2353 662.03,-2326.79 635.78,-2294.98 667,-2269 671.56,-2265.2 676.68,-2262.06 682.09,-2259.45"/>
-<polygon fill="#ff000c" stroke="#ff000c" points="683.56,-2262.64 691.45,-2255.57 680.87,-2256.17 683.56,-2262.64"/>
+<path fill="none" stroke="#ff000c" d="M588.17,-2949.74C604.21,-2943.75 620.87,-2934.42 631,-2920 684.99,-2843.18 605.3,-2569.78 667,-2499 671.28,-2494.09 676.45,-2490.19 682.12,-2487.11"/>
+<polygon fill="#ff000c" stroke="#ff000c" points="683.74,-2490.22 691.41,-2482.92 680.85,-2483.84 683.74,-2490.22"/>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~show~2 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~show~3 -->
 <g id="call~~graph~~CallGraph_edge629" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~show~2</title>
-<path fill="none" stroke="#ff000c" d="M588.23,-2382.6C617.09,-2388.21 655.41,-2395.66 688.54,-2402.1"/>
-<polygon fill="#ff000c" stroke="#ff000c" points="688.15,-2405.59 698.63,-2404.07 689.49,-2398.72 688.15,-2405.59"/>
+<title>program~shape_ring_2d&#45;&gt;proc~show~3</title>
+<path fill="none" stroke="#ff000c" d="M588.16,-2970.26C602.59,-2974.87 618.18,-2981.29 631,-2990 651.33,-3003.82 646.27,-3018.79 667,-3032 673.83,-3036.36 681.4,-3039.99 689.19,-3043.03"/>
+<polygon fill="#ff000c" stroke="#ff000c" points="688.16,-3046.38 698.75,-3046.44 690.51,-3039.79 688.16,-3046.38"/>
 </g>
 <!-- program~shape_ring_3d -->
 <g id="call~~graph~~CallGraph_node361" class="node">
 <title>program~shape_ring_3d</title>
 <g id="a_call~~graph~~CallGraph_node361"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="588,-3951 498,-3951 498,-3927 588,-3927 588,-3951"/>
-<text text-anchor="middle" x="543" y="-3936.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="588,-4298 498,-4298 498,-4274 588,-4274 588,-4298"/>
+<text text-anchor="middle" x="543" y="-4283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~create -->
+<!-- program~shape_ring_3d&#45;&gt;proc~create~2 -->
 <g id="call~~graph~~CallGraph_edge630" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~create</title>
-<path fill="none" stroke="#ff0008" d="M588.16,-3941.32C603.44,-3944.23 619.57,-3949.96 631,-3961 672.28,-4000.86 625.21,-4045.67 667,-4085 672.39,-4090.07 678.73,-4094.01 685.52,-4097.06"/>
-<polygon fill="#ff0008" stroke="#ff0008" points="684.43,-4100.39 695.03,-4100.69 686.93,-4093.85 684.43,-4100.39"/>
+<title>program~shape_ring_3d&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#ff0008" d="M588.1,-4287.8C603.37,-4290.52 619.52,-4296.08 631,-4307 671.96,-4345.96 625.75,-4390.34 667,-4429 672.4,-4434.06 678.74,-4437.99 685.54,-4441.04"/>
+<polygon fill="#ff0008" stroke="#ff0008" points="684.46,-4444.37 695.05,-4444.66 686.96,-4437.83 684.46,-4444.37"/>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~export_xc -->
+<!-- program~shape_ring_3d&#45;&gt;proc~export_xc~2 -->
 <g id="call~~graph~~CallGraph_edge631" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0008" d="M588.17,-3933.96C602.6,-3930.89 618.19,-3925.95 631,-3918 652.18,-3904.86 645.72,-3887.98 667,-3875 669.99,-3873.18 673.11,-3871.51 676.34,-3869.99"/>
-<polygon fill="#ff0008" stroke="#ff0008" points="677.79,-3873.18 685.65,-3866.08 675.08,-3866.73 677.79,-3873.18"/>
+<title>program~shape_ring_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0008" d="M588.23,-4277.4C616.98,-4271.81 655.12,-4264.39 688.15,-4257.97"/>
+<polygon fill="#ff0008" stroke="#ff0008" points="689.08,-4261.36 698.22,-4256.01 687.74,-4254.49 689.08,-4261.36"/>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~export_xg -->
+<!-- program~shape_ring_3d&#45;&gt;proc~export_xg~2 -->
 <g id="call~~graph~~CallGraph_edge632" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0008" d="M588.35,-3936.31C603.28,-3933.45 619.15,-3928.05 631,-3918 662.29,-3891.46 635.52,-3859.31 667,-3833 669.9,-3830.58 673.03,-3828.42 676.31,-3826.49"/>
-<polygon fill="#ff0008" stroke="#ff0008" points="677.98,-3829.57 685.33,-3821.94 674.83,-3823.32 677.98,-3829.57"/>
+<title>program~shape_ring_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0008" d="M588.16,-4284.26C603.43,-4281.53 619.56,-4275.97 631,-4265 673.03,-4224.68 624.68,-4179.01 667,-4139 669.81,-4136.34 672.89,-4133.99 676.15,-4131.92"/>
+<polygon fill="#ff0008" stroke="#ff0008" points="678.04,-4134.88 685.19,-4127.06 674.72,-4128.72 678.04,-4134.88"/>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~finalize -->
+<!-- program~shape_ring_3d&#45;&gt;proc~finalize~2 -->
 <g id="call~~graph~~CallGraph_edge633" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0008" d="M588.02,-3944.88C602.44,-3948.14 618.06,-3953.19 631,-3961 651.48,-3973.35 646.36,-3988.91 667,-4001 672.03,-4003.95 677.44,-4006.48 683.03,-4008.66"/>
-<polygon fill="#ff0008" stroke="#ff0008" points="681.97,-4012 692.56,-4012 684.28,-4005.39 681.97,-4012"/>
+<title>program~shape_ring_3d&#45;&gt;proc~finalize~2</title>
+<path fill="none" stroke="#ff0008" d="M588.23,-4293.78C615.41,-4298.56 650.97,-4304.82 682.69,-4310.4"/>
+<polygon fill="#ff0008" stroke="#ff0008" points="682.38,-4313.9 692.84,-4312.18 683.59,-4307 682.38,-4313.9"/>
 </g>
 <!-- program~shape_ring_3d&#45;&gt;proc~set_ring -->
 <g id="call~~graph~~CallGraph_edge634" class="edge">
 <title>program~shape_ring_3d&#45;&gt;proc~set_ring</title>
-<path fill="none" stroke="#ff0008" d="M588.23,-3947.4C616.53,-3952.77 653.93,-3959.87 686.61,-3966.07"/>
-<polygon fill="#ff0008" stroke="#ff0008" points="686.1,-3969.54 696.58,-3967.96 687.41,-3962.66 686.1,-3969.54"/>
+<path fill="none" stroke="#ff0008" d="M588.22,-4288.84C603.15,-4291.71 619.04,-4297.08 631,-4307 661.01,-4331.89 636.81,-4362.33 667,-4387 671.41,-4390.6 676.31,-4393.61 681.49,-4396.13"/>
+<polygon fill="#ff0008" stroke="#ff0008" points="680.5,-4399.51 691.07,-4400.14 683.2,-4393.05 680.5,-4399.51"/>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~show -->
+<!-- program~shape_ring_3d&#45;&gt;proc~show~2 -->
 <g id="call~~graph~~CallGraph_edge635" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~show</title>
-<path fill="none" stroke="#ff0008" d="M588.23,-3938.8C617.09,-3938.66 655.41,-3938.48 688.54,-3938.33"/>
-<polygon fill="#ff0008" stroke="#ff0008" points="688.65,-3941.83 698.63,-3938.28 688.62,-3934.83 688.65,-3941.83"/>
+<title>program~shape_ring_3d&#45;&gt;proc~show~2</title>
+<path fill="none" stroke="#ff0008" d="M588.32,-4283.28C603.26,-4280.42 619.13,-4275.03 631,-4265 662.03,-4238.79 635.78,-4206.98 667,-4181 673.49,-4175.6 681.09,-4171.51 689.1,-4168.44"/>
+<polygon fill="#ff0008" stroke="#ff0008" points="690.26,-4171.74 698.65,-4165.27 688.05,-4165.1 690.26,-4171.74"/>
 </g>
 <!-- program~shape_tetragon -->
 <g id="call~~graph~~CallGraph_node362" class="node">
 <title>program~shape_tetragon</title>
 <g id="a_call~~graph~~CallGraph_node362"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="591,-2344 495,-2344 495,-2320 591,-2320 591,-2344"/>
-<text text-anchor="middle" x="543" y="-2329.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="591,-2911 495,-2911 495,-2887 591,-2887 591,-2911"/>
+<text text-anchor="middle" x="543" y="-2896.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~create~2 -->
+<!-- program~shape_tetragon&#45;&gt;proc~create~3 -->
 <g id="call~~graph~~CallGraph_edge636" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0004" d="M591.14,-2332C618.57,-2332 653.79,-2332 684.95,-2332"/>
-<polygon fill="#ff0004" stroke="#ff0004" points="685.35,-2335.5 695.35,-2332 685.35,-2328.5 685.35,-2335.5"/>
+<title>program~shape_tetragon&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0004" d="M568.17,-2886.93C588.45,-2875.45 616.38,-2856.2 631,-2831 686.9,-2734.67 591.37,-2664.76 667,-2583 672.18,-2577.4 678.5,-2573.14 685.39,-2569.91"/>
+<polygon fill="#ff0004" stroke="#ff0004" points="687.05,-2573.02 695.09,-2566.13 684.5,-2566.5 687.05,-2573.02"/>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~export_xc~2 -->
+<!-- program~shape_tetragon&#45;&gt;proc~export_xc~3 -->
 <g id="call~~graph~~CallGraph_edge637" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff0004" d="M591.24,-2333.87C605.72,-2336.73 620.56,-2342.34 631,-2353 683.22,-2406.31 614.39,-2464.07 667,-2517 669.94,-2519.95 673.19,-2522.53 676.68,-2524.77"/>
-<polygon fill="#ff0004" stroke="#ff0004" points="675.3,-2528.01 685.77,-2529.69 678.64,-2521.85 675.3,-2528.01"/>
+<title>program~shape_tetragon&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff0004" d="M589.22,-2911.06C604.43,-2917.17 620.24,-2926.11 631,-2939 672.18,-2988.31 620.9,-3034.25 667,-3079 670.07,-3081.98 673.47,-3084.58 677.11,-3086.83"/>
+<polygon fill="#ff0004" stroke="#ff0004" points="675.48,-3089.93 685.96,-3091.5 678.74,-3083.74 675.48,-3089.93"/>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~export_xg~2 -->
+<!-- program~shape_tetragon&#45;&gt;proc~export_xg~3 -->
 <g id="call~~graph~~CallGraph_edge638" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff0004" d="M591.06,-2333.52C605.7,-2336.33 620.69,-2342.01 631,-2353 694.59,-2420.78 602.91,-2491.69 667,-2559 669.81,-2561.95 672.94,-2564.53 676.3,-2566.78"/>
-<polygon fill="#ff0004" stroke="#ff0004" points="674.65,-2569.86 685.08,-2571.71 678.08,-2563.76 674.65,-2569.86"/>
+<title>program~shape_tetragon&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff0004" d="M590.53,-2911.1C605.49,-2917.16 620.81,-2926.08 631,-2939 682.05,-3003.76 609.48,-3061.92 667,-3121 669.84,-3123.92 673,-3126.47 676.38,-3128.7"/>
+<polygon fill="#ff0004" stroke="#ff0004" points="674.76,-3131.8 685.2,-3133.6 678.16,-3125.68 674.76,-3131.8"/>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~finalize~2 -->
+<!-- program~shape_tetragon&#45;&gt;proc~finalize~3 -->
 <g id="call~~graph~~CallGraph_edge639" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0004" d="M591.14,-2322.83C619.47,-2317.32 656.11,-2310.2 688.02,-2304"/>
-<polygon fill="#ff0004" stroke="#ff0004" points="689.04,-2307.36 698.19,-2302.02 687.71,-2300.49 689.04,-2307.36"/>
+<title>program~shape_tetragon&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0004" d="M567.99,-2886.82C588.15,-2875.28 616.01,-2855.99 631,-2831 678.8,-2751.29 602.91,-2692.31 667,-2625 671.75,-2620.01 677.42,-2616.08 683.59,-2613.01"/>
+<polygon fill="#ff0004" stroke="#ff0004" points="685.05,-2616.19 692.91,-2609.1 682.34,-2609.74 685.05,-2616.19"/>
 </g>
 <!-- program~shape_tetragon&#45;&gt;proc~set_tetragon -->
 <g id="call~~graph~~CallGraph_edge640" class="edge">
 <title>program~shape_tetragon&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#ff0004" d="M550.82,-2319.7C567.97,-2288.07 612.83,-2200.83 631,-2122 645.92,-2057.24 623.96,-1575.63 667,-1525 668.18,-1523.61 669.43,-1522.31 670.74,-1521.08"/>
-<polygon fill="#ff0004" stroke="#ff0004" points="673.08,-1523.69 678.88,-1514.83 668.81,-1518.14 673.08,-1523.69"/>
+<path fill="none" stroke="#ff0004" d="M569.1,-2886.99C589.67,-2875.67 617.52,-2856.62 631,-2831 691.56,-2715.94 582.73,-2346.02 667,-2247 668.18,-2245.61 669.43,-2244.31 670.74,-2243.08"/>
+<polygon fill="#ff0004" stroke="#ff0004" points="673.08,-2245.7 678.88,-2236.83 668.82,-2240.14 673.08,-2245.7"/>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~show~2 -->
+<!-- program~shape_tetragon&#45;&gt;proc~show~3 -->
 <g id="call~~graph~~CallGraph_edge641" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~show~2</title>
-<path fill="none" stroke="#ff0004" d="M591.26,-2337.83C604.78,-2340.93 619.07,-2345.7 631,-2353 651.97,-2365.84 645.94,-2382.31 667,-2395 673.85,-2399.13 681.44,-2402.45 689.23,-2405.11"/>
-<polygon fill="#ff0004" stroke="#ff0004" points="688.21,-2408.46 698.8,-2408.05 690.27,-2401.77 688.21,-2408.46"/>
+<title>program~shape_tetragon&#45;&gt;proc~show~3</title>
+<path fill="none" stroke="#ff0004" d="M586.62,-2911.06C602.26,-2917.27 619.04,-2926.28 631,-2939 661.36,-2971.29 634.18,-3002.21 667,-3032 673.49,-3037.89 681.22,-3042.47 689.4,-3046.01"/>
+<polygon fill="#ff0004" stroke="#ff0004" points="688.19,-3049.29 698.78,-3049.59 690.69,-3042.75 688.19,-3049.29"/>
 </g>
 </g>
 </svg>
@@ -9197,7 +9197,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/lists/programs.html b/lists/programs.html
index 5c7a6b96b..936f57e13 100644
--- a/lists/programs.html
+++ b/lists/programs.html
@@ -252,7 +252,7 @@ <h1>Programs</h1>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/lists/types.html b/lists/types.html
index 70d863ae3..3637cb7a4 100644
--- a/lists/types.html
+++ b/lists/types.html
@@ -197,7 +197,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/module/forcad.html b/module/forcad.html
index 847bc702e..e7cb96cbf 100644
--- a/module/forcad.html
+++ b/module/forcad.html
@@ -888,7 +888,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/module/forcad_nurbs_curve.html b/module/forcad_nurbs_curve.html
index 0244cb386..663f18be7 100644
--- a/module/forcad_nurbs_curve.html
+++ b/module/forcad_nurbs_curve.html
@@ -124,10 +124,10 @@ <h4 class="card-header bg-primary text-white">Interfaces</h4>
       </a>
       <div id="inters-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#interface-compute_tgc~3">compute_Tgc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#interface-compute_xg~3">compute_Xg</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#interface-compute_d2tgc~3">compute_d2Tgc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#interface-compute_dtgc~3">compute_dTgc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#interface-compute_tgc">compute_Tgc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#interface-compute_xg">compute_Xg</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#interface-compute_d2tgc">compute_d2Tgc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#interface-compute_dtgc">compute_dTgc</a>
             <a class="list-group-item" href="../module/forcad_nurbs_curve.html#interface-nearest_point_help_1d">nearest_point_help_1d</a>
         </div>
       </div>
@@ -153,30 +153,30 @@ <h4 class="card-header bg-primary text-white">Functions</h4>
       </a>
       <div id="funcs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-cmp_xg~3">cmp_Xg</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-cmp_elem~3">cmp_elem</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-cmp_elem_xc_vis~3">cmp_elem_Xc_vis</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-cmp_elem_xg_vis~3">cmp_elem_Xg_vis</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_wc_all~3">get_Wc_all</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_wci~3">get_Wci</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_xc_all~3">get_Xc_all</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_xci~3">get_Xci</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_xcid~3">get_Xcid</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_xg_all~3">get_Xg_all</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_xgi~3">get_Xgi</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_xgid~3">get_Xgid</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_xt~3">get_Xt</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_continuity~3">get_continuity</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-cmp_xg">cmp_Xg</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-cmp_elem">cmp_elem</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-cmp_elem_xc_vis">cmp_elem_Xc_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-cmp_elem_xg_vis">cmp_elem_Xg_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_wc_all">get_Wc_all</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_wci">get_Wci</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_xc_all">get_Xc_all</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_xci">get_Xci</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_xcid">get_Xcid</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_xg_all">get_Xg_all</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_xgi">get_Xgi</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_xgid">get_Xgid</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_xt">get_Xt</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_continuity">get_continuity</a>
             <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_degree">get_degree</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_elem~3">get_elem</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_elem_xc_vis~3">get_elem_Xc_vis</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_elem_xg_vis~3">get_elem_Xg_vis</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_knot_all~3">get_knot_all</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_knoti~3">get_knoti</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_multiplicity~3">get_multiplicity</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_elem">get_elem</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_elem_xc_vis">get_elem_Xc_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_elem_xg_vis">get_elem_Xg_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_knot_all">get_knot_all</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_knoti">get_knoti</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_multiplicity">get_multiplicity</a>
             <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_nc">get_nc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_ng~3">get_ng</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-is_rational~3">is_rational</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-get_ng">get_ng</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-is_rational">is_rational</a>
         </div>
       </div>
     </div>
@@ -188,43 +188,43 @@ <h4 class="card-header bg-primary text-white">Subroutines</h4>
       </a>
       <div id="subs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-ansatz~3">ansatz</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-basis_scalar~3">basis_scalar</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-basis_vector~3">basis_vector</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-cmp_degree~3">cmp_degree</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-ansatz">ansatz</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-basis_scalar">basis_scalar</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-basis_vector">basis_vector</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-cmp_degree">cmp_degree</a>
             <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-cmp_length">cmp_length</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-cmp_nc~3">cmp_nc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-create~3">create</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-derivative2_scalar~3">derivative2_scalar</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-derivative2_vector~3">derivative2_vector</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-derivative_scalar~3">derivative_scalar</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-derivative_vector~3">derivative_vector</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-elevate_degree~3">elevate_degree</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-export_xc~3">export_Xc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-export_xg~3">export_Xg</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-finalize~3">finalize</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-insert_knots~3">insert_knots</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-modify_wc~3">modify_Wc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-modify_xc~3">modify_Xc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-nearest_point~3">nearest_point</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-nearest_point2~3">nearest_point2</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-remove_knots~3">remove_knots</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-rotate_xc~3">rotate_Xc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-rotate_xg~3">rotate_Xg</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set1~3">set1</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-cmp_nc">cmp_nc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-create">create</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-derivative2_scalar">derivative2_scalar</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-derivative2_vector">derivative2_vector</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-derivative_scalar">derivative_scalar</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-derivative_vector">derivative_vector</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-elevate_degree">elevate_degree</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-export_xc">export_Xc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-export_xg">export_Xg</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-finalize">finalize</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-insert_knots">insert_knots</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-modify_wc">modify_Wc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-modify_xc">modify_Xc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-nearest_point">nearest_point</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-nearest_point2">nearest_point2</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-remove_knots">remove_knots</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-rotate_xc">rotate_Xc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-rotate_xg">rotate_Xg</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set1">set1</a>
             <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set1a">set1a</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set2~3">set2</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set3~3">set3</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set4~3">set4</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set_c~3">set_C</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set2">set2</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set3">set3</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set4">set4</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set_c">set_C</a>
             <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set_circle">set_circle</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set_elem~3">set_elem</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set_elem_xc_vis~3">set_elem_Xc_vis</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set_elem_xg_vis~3">set_elem_Xg_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set_elem">set_elem</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set_elem_xc_vis">set_elem_Xc_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set_elem_xg_vis">set_elem_Xg_vis</a>
             <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-set_half_circle">set_half_circle</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-show~3">show</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-translate_xc~3">translate_Xc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-translate_xg~3">translate_Xg</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-show">show</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-translate_xc">translate_Xc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_curve.html#proc-translate_xg">translate_Xg</a>
         </div>
       </div>
     </div>
@@ -922,8 +922,8 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
           <h2>Interfaces</h2>
               <div class="card">
     <div class="card-header bg-light codesum">
-      <span class="anchor" id="interface-compute_tgc~3"></span>
-      <h3>private        interface <a href='../interface/compute_tgc~3.html'>compute_Tgc</a> 
+      <span class="anchor" id="interface-compute_tgc"></span>
+      <h3>private        interface <a href='../interface/compute_tgc.html'>compute_Tgc</a> 
       </h3>
     </div>
     <ul class="list-group">
@@ -947,7 +947,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~48"></span>
+              <span class="anchor" id="variable-f_xt~16"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -977,7 +977,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~48"></span>
+              <span class="anchor" id="variable-f_degree~16"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -992,7 +992,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~44"></span>
+              <span class="anchor" id="variable-f_nc~16"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1035,7 +1035,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~46"></span>
+              <span class="anchor" id="variable-f_xt~14"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1065,7 +1065,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~46"></span>
+              <span class="anchor" id="variable-f_degree~14"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1080,7 +1080,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~42"></span>
+              <span class="anchor" id="variable-f_nc~14"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1095,7 +1095,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~26"></span>
+              <span class="anchor" id="variable-f_ng~8"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1138,7 +1138,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~47"></span>
+              <span class="anchor" id="variable-f_xt~15"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -1168,7 +1168,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~47"></span>
+              <span class="anchor" id="variable-f_degree~15"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1183,7 +1183,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~43"></span>
+              <span class="anchor" id="variable-f_nc~15"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1198,7 +1198,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~24"></span>
+              <span class="anchor" id="variable-f_wc~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1241,7 +1241,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~45"></span>
+              <span class="anchor" id="variable-f_xt~13"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1271,7 +1271,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~45"></span>
+              <span class="anchor" id="variable-f_degree~13"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1286,7 +1286,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~41"></span>
+              <span class="anchor" id="variable-f_nc~13"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1301,7 +1301,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~25"></span>
+              <span class="anchor" id="variable-f_ng~7"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1316,7 +1316,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~23"></span>
+              <span class="anchor" id="variable-f_wc~7"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1344,8 +1344,8 @@ <h4>
 
               <div class="card">
     <div class="card-header bg-light codesum">
-      <span class="anchor" id="interface-compute_xg~3"></span>
-      <h3>private        interface <a href='../interface/compute_xg~3.html'>compute_Xg</a> 
+      <span class="anchor" id="interface-compute_xg"></span>
+      <h3>private        interface <a href='../interface/compute_xg.html'>compute_Xg</a> 
       </h3>
     </div>
     <ul class="list-group">
@@ -1369,7 +1369,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~34"></span>
+              <span class="anchor" id="variable-f_xt~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1399,7 +1399,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~34"></span>
+              <span class="anchor" id="variable-f_degree~2"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1414,7 +1414,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~30"></span>
+              <span class="anchor" id="variable-f_nc~2"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1429,7 +1429,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~20"></span>
+              <span class="anchor" id="variable-f_ng~2"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1444,7 +1444,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xc~10"></span>
+              <span class="anchor" id="variable-f_xc~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1487,7 +1487,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~36"></span>
+              <span class="anchor" id="variable-f_xt~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -1517,7 +1517,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~36"></span>
+              <span class="anchor" id="variable-f_degree~4"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1532,7 +1532,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~32"></span>
+              <span class="anchor" id="variable-f_nc~4"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1547,7 +1547,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xc~12"></span>
+              <span class="anchor" id="variable-f_xc~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1590,7 +1590,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~33"></span>
+              <span class="anchor" id="variable-f_xt"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1620,7 +1620,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~33"></span>
+              <span class="anchor" id="variable-f_degree"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1635,7 +1635,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~29"></span>
+              <span class="anchor" id="variable-f_nc"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1650,7 +1650,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~19"></span>
+              <span class="anchor" id="variable-f_ng"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1665,7 +1665,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xc~9"></span>
+              <span class="anchor" id="variable-f_xc"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1680,7 +1680,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~17"></span>
+              <span class="anchor" id="variable-f_wc"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1723,7 +1723,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~35"></span>
+              <span class="anchor" id="variable-f_xt~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -1753,7 +1753,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~35"></span>
+              <span class="anchor" id="variable-f_degree~3"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1768,7 +1768,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~31"></span>
+              <span class="anchor" id="variable-f_nc~3"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1783,7 +1783,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xc~11"></span>
+              <span class="anchor" id="variable-f_xc~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1798,7 +1798,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~18"></span>
+              <span class="anchor" id="variable-f_wc~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1826,8 +1826,8 @@ <h4>
 
               <div class="card">
     <div class="card-header bg-light codesum">
-      <span class="anchor" id="interface-compute_d2tgc~3"></span>
-      <h3>private        interface <a href='../interface/compute_d2tgc~3.html'>compute_d2Tgc</a> 
+      <span class="anchor" id="interface-compute_d2tgc"></span>
+      <h3>private        interface <a href='../interface/compute_d2tgc.html'>compute_d2Tgc</a> 
       </h3>
     </div>
     <ul class="list-group">
@@ -1851,7 +1851,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~40"></span>
+              <span class="anchor" id="variable-f_xt~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -1881,7 +1881,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~40"></span>
+              <span class="anchor" id="variable-f_degree~8"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1896,7 +1896,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~36"></span>
+              <span class="anchor" id="variable-f_nc~8"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1911,7 +1911,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_d2tgc~12"></span>
+              <span class="anchor" id="variable-f_d2tgc~4"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -1926,7 +1926,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~20"></span>
+              <span class="anchor" id="variable-f_dtgc~4"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -1941,7 +1941,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~28"></span>
+              <span class="anchor" id="variable-f_tgc~4"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -1979,7 +1979,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~38"></span>
+              <span class="anchor" id="variable-f_xt~6"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2009,7 +2009,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~38"></span>
+              <span class="anchor" id="variable-f_degree~6"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2024,7 +2024,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~34"></span>
+              <span class="anchor" id="variable-f_nc~6"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2039,7 +2039,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~22"></span>
+              <span class="anchor" id="variable-f_ng~4"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2054,7 +2054,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_d2tgc~10"></span>
+              <span class="anchor" id="variable-f_d2tgc~2"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2069,7 +2069,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~18"></span>
+              <span class="anchor" id="variable-f_dtgc~2"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2084,7 +2084,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~26"></span>
+              <span class="anchor" id="variable-f_tgc~2"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2122,7 +2122,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~39"></span>
+              <span class="anchor" id="variable-f_xt~7"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -2152,7 +2152,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~39"></span>
+              <span class="anchor" id="variable-f_degree~7"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2167,7 +2167,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~35"></span>
+              <span class="anchor" id="variable-f_nc~7"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2182,7 +2182,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~20"></span>
+              <span class="anchor" id="variable-f_wc~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2197,7 +2197,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_d2tgc~11"></span>
+              <span class="anchor" id="variable-f_d2tgc~3"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2212,7 +2212,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~19"></span>
+              <span class="anchor" id="variable-f_dtgc~3"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2227,7 +2227,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~27"></span>
+              <span class="anchor" id="variable-f_tgc~3"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2265,7 +2265,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~37"></span>
+              <span class="anchor" id="variable-f_xt~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2295,7 +2295,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~37"></span>
+              <span class="anchor" id="variable-f_degree~5"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2310,7 +2310,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~33"></span>
+              <span class="anchor" id="variable-f_nc~5"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2325,7 +2325,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~21"></span>
+              <span class="anchor" id="variable-f_ng~3"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2340,7 +2340,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~19"></span>
+              <span class="anchor" id="variable-f_wc~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2355,7 +2355,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_d2tgc~9"></span>
+              <span class="anchor" id="variable-f_d2tgc"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2370,7 +2370,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~17"></span>
+              <span class="anchor" id="variable-f_dtgc"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2385,7 +2385,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~25"></span>
+              <span class="anchor" id="variable-f_tgc"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2408,8 +2408,8 @@ <h4>Arguments</h4>
 
               <div class="card">
     <div class="card-header bg-light codesum">
-      <span class="anchor" id="interface-compute_dtgc~3"></span>
-      <h3>private        interface <a href='../interface/compute_dtgc~3.html'>compute_dTgc</a> 
+      <span class="anchor" id="interface-compute_dtgc"></span>
+      <h3>private        interface <a href='../interface/compute_dtgc.html'>compute_dTgc</a> 
       </h3>
     </div>
     <ul class="list-group">
@@ -2433,7 +2433,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~44"></span>
+              <span class="anchor" id="variable-f_xt~12"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -2463,7 +2463,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~44"></span>
+              <span class="anchor" id="variable-f_degree~12"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2478,7 +2478,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~40"></span>
+              <span class="anchor" id="variable-f_nc~12"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2493,7 +2493,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~24"></span>
+              <span class="anchor" id="variable-f_dtgc~8"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2508,7 +2508,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~32"></span>
+              <span class="anchor" id="variable-f_tgc~8"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2523,7 +2523,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_elem~4"></span>
+              <span class="anchor" id="variable-f_elem~2"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -2561,7 +2561,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~42"></span>
+              <span class="anchor" id="variable-f_xt~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2591,7 +2591,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~42"></span>
+              <span class="anchor" id="variable-f_degree~10"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2606,7 +2606,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~38"></span>
+              <span class="anchor" id="variable-f_nc~10"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2621,7 +2621,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~24"></span>
+              <span class="anchor" id="variable-f_ng~6"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2636,7 +2636,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~22"></span>
+              <span class="anchor" id="variable-f_dtgc~6"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2651,7 +2651,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~30"></span>
+              <span class="anchor" id="variable-f_tgc~6"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2689,7 +2689,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~43"></span>
+              <span class="anchor" id="variable-f_xt~11"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -2719,7 +2719,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~43"></span>
+              <span class="anchor" id="variable-f_degree~11"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2734,7 +2734,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~39"></span>
+              <span class="anchor" id="variable-f_nc~11"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2749,7 +2749,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~22"></span>
+              <span class="anchor" id="variable-f_wc~6"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2764,7 +2764,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~23"></span>
+              <span class="anchor" id="variable-f_dtgc~7"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2779,7 +2779,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~31"></span>
+              <span class="anchor" id="variable-f_tgc~7"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2794,7 +2794,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_elem~3"></span>
+              <span class="anchor" id="variable-f_elem"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -2832,7 +2832,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~41"></span>
+              <span class="anchor" id="variable-f_xt~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2862,7 +2862,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~41"></span>
+              <span class="anchor" id="variable-f_degree~9"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2877,7 +2877,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~37"></span>
+              <span class="anchor" id="variable-f_nc~9"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2892,7 +2892,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~23"></span>
+              <span class="anchor" id="variable-f_ng~5"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2907,7 +2907,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~21"></span>
+              <span class="anchor" id="variable-f_wc~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2922,7 +2922,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~21"></span>
+              <span class="anchor" id="variable-f_dtgc~5"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2937,7 +2937,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~29"></span>
+              <span class="anchor" id="variable-f_tgc~5"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2985,7 +2985,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~27"></span>
+              <span class="anchor" id="variable-f_ng~9"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3000,7 +3000,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xg~15"></span>
+              <span class="anchor" id="variable-f_xg~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -3015,7 +3015,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_point_xg~3"></span>
+              <span class="anchor" id="variable-f_point_xg"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -3072,7 +3072,7 @@ <h4>Components</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~48"></span>
+              <span class="anchor" id="variable-wc~7"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3089,7 +3089,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~51"></span>
+              <span class="anchor" id="variable-xc~7"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3106,7 +3106,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xg~26"></span>
+              <span class="anchor" id="variable-xg"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3123,7 +3123,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~62"></span>
+              <span class="anchor" id="variable-xt"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3140,7 +3140,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~54"></span>
+              <span class="anchor" id="variable-degree"></span>
               integer,
             </td>
               <td>private</td>
@@ -3157,7 +3157,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~35"></span>
+              <span class="anchor" id="variable-elemconn"></span>
               integer,
             </td>
               <td>private,</td>
@@ -3174,7 +3174,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn_xc_vis~3"></span>
+              <span class="anchor" id="variable-elemconn_xc_vis"></span>
               integer,
             </td>
               <td>private,</td>
@@ -3191,7 +3191,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn_xg_vis~3"></span>
+              <span class="anchor" id="variable-elemconn_xg_vis"></span>
               integer,
             </td>
               <td>private,</td>
@@ -3208,7 +3208,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~16"></span>
+              <span class="anchor" id="variable-knot~2"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3225,7 +3225,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~59"></span>
+              <span class="anchor" id="variable-nc"></span>
               integer,
             </td>
               <td>private</td>
@@ -3242,7 +3242,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~28"></span>
+              <span class="anchor" id="variable-ng"></span>
               integer,
             </td>
               <td>private</td>
@@ -3268,38 +3268,38 @@ <h4>Type-Bound Procedures</h4>
           <tbody>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-ansatz~3'>ansatz</a></strong></td>
-                <td><p>Compute the shape functions, derivative of shape functions and dL</p><a href="../type/nurbs_curve.html#boundprocedure-ansatz~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-ansatz'>ansatz</a></strong></td>
+                <td><p>Compute the shape functions, derivative of shape functions and dL</p><a href="../type/nurbs_curve.html#boundprocedure-ansatz" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-basis~3'>basis</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-basis_vector~3'>basis_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-basis_scalar~3'>basis_scalar</a></td>
-                <td><p>Compute the basis functions of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-basis~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-basis'>basis</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-basis_vector'>basis_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-basis_scalar'>basis_scalar</a></td>
+                <td><p>Compute the basis functions of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-basis" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-cmp_xg~3'>cmp_Xg</a></strong></td>
-                <td><p>Compute geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-cmp_xg~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-cmp_xg'>cmp_Xg</a></strong></td>
+                <td><p>Compute geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-cmp_xg" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-cmp_degree~3'>cmp_degree</a></strong></td>
-                <td><p>Compute degree of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-cmp_degree~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-cmp_degree'>cmp_degree</a></strong></td>
+                <td><p>Compute degree of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-cmp_degree" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-cmp_elem~3'>cmp_elem</a></strong></td>
-                <td><p>Generate IGA element connectivity</p><a href="../type/nurbs_curve.html#boundprocedure-cmp_elem~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-cmp_elem'>cmp_elem</a></strong></td>
+                <td><p>Generate IGA element connectivity</p><a href="../type/nurbs_curve.html#boundprocedure-cmp_elem" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-cmp_elem_xc_vis~3'>cmp_elem_Xc_vis</a></strong></td>
-                <td><p>Generate connectivity for control points</p><a href="../type/nurbs_curve.html#boundprocedure-cmp_elem_xc_vis~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-cmp_elem_xc_vis'>cmp_elem_Xc_vis</a></strong></td>
+                <td><p>Generate connectivity for control points</p><a href="../type/nurbs_curve.html#boundprocedure-cmp_elem_xc_vis" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-cmp_elem_xg_vis~3'>cmp_elem_Xg_vis</a></strong></td>
-                <td><p>Generate connectivity for geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-cmp_elem_xg_vis~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-cmp_elem_xg_vis'>cmp_elem_Xg_vis</a></strong></td>
+                <td><p>Generate connectivity for geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-cmp_elem_xg_vis" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
@@ -3308,163 +3308,163 @@ <h4>Type-Bound Procedures</h4>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-cmp_nc~3'>cmp_nc</a></strong></td>
-                <td><p>Compute number of required control points</p><a href="../type/nurbs_curve.html#boundprocedure-cmp_nc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-cmp_nc'>cmp_nc</a></strong></td>
+                <td><p>Compute number of required control points</p><a href="../type/nurbs_curve.html#boundprocedure-cmp_nc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-create~3'>create</a></strong></td>
-                <td><p>Generate geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-create~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-create'>create</a></strong></td>
+                <td><p>Generate geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-create" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-derivative~3'>derivative</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-derivative_vector~3'>derivative_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-derivative_scalar~3'>derivative_scalar</a></td>
-                <td><p>Compute the derivative of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-derivative~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-derivative'>derivative</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-derivative_vector'>derivative_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-derivative_scalar'>derivative_scalar</a></td>
+                <td><p>Compute the derivative of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-derivative" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-derivative2~3'>derivative2</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-derivative2_vector~3'>derivative2_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-derivative2_scalar~3'>derivative2_scalar</a></td>
-                <td><p>Compute the second derivative of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-derivative2~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-derivative2'>derivative2</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-derivative2_vector'>derivative2_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-derivative2_scalar'>derivative2_scalar</a></td>
+                <td><p>Compute the second derivative of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-derivative2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-elevate_degree~3'>elevate_degree</a></strong></td>
-                <td><p>Elevate the degree of the curve</p><a href="../type/nurbs_curve.html#boundprocedure-elevate_degree~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-elevate_degree'>elevate_degree</a></strong></td>
+                <td><p>Elevate the degree of the curve</p><a href="../type/nurbs_curve.html#boundprocedure-elevate_degree" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-export_xc~3'>export_Xc</a></strong></td>
-                <td><p>Export control points to VTK file</p><a href="../type/nurbs_curve.html#boundprocedure-export_xc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-export_xc'>export_Xc</a></strong></td>
+                <td><p>Export control points to VTK file</p><a href="../type/nurbs_curve.html#boundprocedure-export_xc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-export_xg~3'>export_Xg</a></strong></td>
-                <td><p>Export geometry points to VTK file</p><a href="../type/nurbs_curve.html#boundprocedure-export_xg~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-export_xg'>export_Xg</a></strong></td>
+                <td><p>Export geometry points to VTK file</p><a href="../type/nurbs_curve.html#boundprocedure-export_xg" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-finalize~3'>finalize</a></strong></td>
-                <td><p>Finalize the NURBS curve object</p><a href="../type/nurbs_curve.html#boundprocedure-finalize~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-finalize'>finalize</a></strong></td>
+                <td><p>Finalize the NURBS curve object</p><a href="../type/nurbs_curve.html#boundprocedure-finalize" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_wc~3'>get_Wc</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_wc_all~3'>get_Wc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_wci~3'>get_Wci</a></td>
-                <td><p>Get weights</p><a href="../type/nurbs_curve.html#boundprocedure-get_wc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_wc'>get_Wc</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_wc_all'>get_Wc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_wci'>get_Wci</a></td>
+                <td><p>Get weights</p><a href="../type/nurbs_curve.html#boundprocedure-get_wc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xc~3'>get_Xc</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xc_all~3'>get_Xc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xci~3'>get_Xci</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xcid~3'>get_Xcid</a></td>
-                <td><p>Get control points</p><a href="../type/nurbs_curve.html#boundprocedure-get_xc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xc'>get_Xc</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xc_all'>get_Xc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xci'>get_Xci</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xcid'>get_Xcid</a></td>
+                <td><p>Get control points</p><a href="../type/nurbs_curve.html#boundprocedure-get_xc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xg~3'>get_Xg</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xg_all~3'>get_Xg_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xgi~3'>get_Xgi</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xgid~3'>get_Xgid</a></td>
-                <td><p>Get geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-get_xg~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xg'>get_Xg</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xg_all'>get_Xg_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xgi'>get_Xgi</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xgid'>get_Xgid</a></td>
+                <td><p>Get geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-get_xg" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xt~3'>get_Xt</a></strong></td>
-                <td><p>Get parameter values</p><a href="../type/nurbs_curve.html#boundprocedure-get_xt~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xt'>get_Xt</a></strong></td>
+                <td><p>Get parameter values</p><a href="../type/nurbs_curve.html#boundprocedure-get_xt" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_continuity~3'>get_continuity</a></strong></td>
-                <td><p>Compute and return the continuity of the curve</p><a href="../type/nurbs_curve.html#boundprocedure-get_continuity~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_continuity'>get_continuity</a></strong></td>
+                <td><p>Compute and return the continuity of the curve</p><a href="../type/nurbs_curve.html#boundprocedure-get_continuity" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_degree~3'>get_degree</a></strong></td>
-                <td><p>Get degree of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-get_degree~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_degree'>get_degree</a></strong></td>
+                <td><p>Get degree of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-get_degree" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_elem~3'>get_elem</a></strong></td>
-                <td><p>Get IGA element connectivity</p><a href="../type/nurbs_curve.html#boundprocedure-get_elem~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_elem'>get_elem</a></strong></td>
+                <td><p>Get IGA element connectivity</p><a href="../type/nurbs_curve.html#boundprocedure-get_elem" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_elem_xc_vis~3'>get_elem_Xc_vis</a></strong></td>
-                <td><p>Get connectivity for control points</p><a href="../type/nurbs_curve.html#boundprocedure-get_elem_xc_vis~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_elem_xc_vis'>get_elem_Xc_vis</a></strong></td>
+                <td><p>Get connectivity for control points</p><a href="../type/nurbs_curve.html#boundprocedure-get_elem_xc_vis" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_elem_xg_vis~3'>get_elem_Xg_vis</a></strong></td>
-                <td><p>Get connectivity for geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-get_elem_xg_vis~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_elem_xg_vis'>get_elem_Xg_vis</a></strong></td>
+                <td><p>Get connectivity for geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-get_elem_xg_vis" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_knot~3'>get_knot</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_knoti~3'>get_knoti</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_knot_all~3'>get_knot_all</a></td>
-                <td><p>Get knot vector</p><a href="../type/nurbs_curve.html#boundprocedure-get_knot~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_knot'>get_knot</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_knoti'>get_knoti</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_knot_all'>get_knot_all</a></td>
+                <td><p>Get knot vector</p><a href="../type/nurbs_curve.html#boundprocedure-get_knot" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_multiplicity~3'>get_multiplicity</a></strong></td>
-                <td><p>Compute and return the multiplicity of the knots</p><a href="../type/nurbs_curve.html#boundprocedure-get_multiplicity~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_multiplicity'>get_multiplicity</a></strong></td>
+                <td><p>Compute and return the multiplicity of the knots</p><a href="../type/nurbs_curve.html#boundprocedure-get_multiplicity" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_nc~3'>get_nc</a></strong></td>
-                <td><p>Get number of control points</p><a href="../type/nurbs_curve.html#boundprocedure-get_nc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_nc'>get_nc</a></strong></td>
+                <td><p>Get number of control points</p><a href="../type/nurbs_curve.html#boundprocedure-get_nc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_ng~3'>get_ng</a></strong></td>
-                <td><p>Get number of geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-get_ng~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_ng'>get_ng</a></strong></td>
+                <td><p>Get number of geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-get_ng" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-insert_knots~3'>insert_knots</a></strong></td>
-                <td><p>Insert knots into the knot vector</p><a href="../type/nurbs_curve.html#boundprocedure-insert_knots~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-insert_knots'>insert_knots</a></strong></td>
+                <td><p>Insert knots into the knot vector</p><a href="../type/nurbs_curve.html#boundprocedure-insert_knots" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-is_rational~3'>is_rational</a></strong></td>
-                <td><p>Check if the NURBS curve is rational</p><a href="../type/nurbs_curve.html#boundprocedure-is_rational~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-is_rational'>is_rational</a></strong></td>
+                <td><p>Check if the NURBS curve is rational</p><a href="../type/nurbs_curve.html#boundprocedure-is_rational" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-modify_wc~3'>modify_Wc</a></strong></td>
-                <td><p>Modify weights</p><a href="../type/nurbs_curve.html#boundprocedure-modify_wc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-modify_wc'>modify_Wc</a></strong></td>
+                <td><p>Modify weights</p><a href="../type/nurbs_curve.html#boundprocedure-modify_wc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-modify_xc~3'>modify_Xc</a></strong></td>
-                <td><p>Modify control points</p><a href="../type/nurbs_curve.html#boundprocedure-modify_xc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-modify_xc'>modify_Xc</a></strong></td>
+                <td><p>Modify control points</p><a href="../type/nurbs_curve.html#boundprocedure-modify_xc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-nearest_point~3'>nearest_point</a></strong></td>
-                <td><p>Find the nearest point on the NURBS curve (Approximation)</p><a href="../type/nurbs_curve.html#boundprocedure-nearest_point~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-nearest_point'>nearest_point</a></strong></td>
+                <td><p>Find the nearest point on the NURBS curve (Approximation)</p><a href="../type/nurbs_curve.html#boundprocedure-nearest_point" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-nearest_point2~3'>nearest_point2</a></strong></td>
-                <td><p>Find the nearest point on the NURBS curve (Minimization - Newton's method)</p><a href="../type/nurbs_curve.html#boundprocedure-nearest_point2~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-nearest_point2'>nearest_point2</a></strong></td>
+                <td><p>Find the nearest point on the NURBS curve (Minimization - Newton's method)</p><a href="../type/nurbs_curve.html#boundprocedure-nearest_point2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-remove_knots~3'>remove_knots</a></strong></td>
-                <td><p>Remove knots from the knot vector</p><a href="../type/nurbs_curve.html#boundprocedure-remove_knots~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-remove_knots'>remove_knots</a></strong></td>
+                <td><p>Remove knots from the knot vector</p><a href="../type/nurbs_curve.html#boundprocedure-remove_knots" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-rotate_xc~3'>rotate_Xc</a></strong></td>
-                <td><p>Rotate control points</p><a href="../type/nurbs_curve.html#boundprocedure-rotate_xc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-rotate_xc'>rotate_Xc</a></strong></td>
+                <td><p>Rotate control points</p><a href="../type/nurbs_curve.html#boundprocedure-rotate_xc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-rotate_xg~3'>rotate_Xg</a></strong></td>
-                <td><p>Rotate geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-rotate_xg~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-rotate_xg'>rotate_Xg</a></strong></td>
+                <td><p>Rotate geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-rotate_xg" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-set~3'>set</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set1~3'>set1</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set1a'>set1a</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set2~3'>set2</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set3~3'>set3</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set4~3'>set4</a></td>
-                <td><p>Set NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-set~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-set'>set</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set1'>set1</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set1a'>set1a</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set2'>set2</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set3'>set3</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set4'>set4</a></td>
+                <td><p>Set NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-set" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-set1~3'>set1</a></strong></td>
-                <td><p>Set knot vector, control points and weights for the NURBS curve object</p><a href="../type/nurbs_curve.html#boundprocedure-set1~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-set1'>set1</a></strong></td>
+                <td><p>Set knot vector, control points and weights for the NURBS curve object</p><a href="../type/nurbs_curve.html#boundprocedure-set1" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
@@ -3473,23 +3473,23 @@ <h4>Type-Bound Procedures</h4>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-set2~3'>set2</a></strong></td>
-                <td><p>Set NURBS curve using nodes of parameter space, degree, continuity, control points and weights</p><a href="../type/nurbs_curve.html#boundprocedure-set2~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-set2'>set2</a></strong></td>
+                <td><p>Set NURBS curve using nodes of parameter space, degree, continuity, control points and weights</p><a href="../type/nurbs_curve.html#boundprocedure-set2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-set3~3'>set3</a></strong></td>
-                <td><p>Set Bezier or Rational Bezier curve using control points and weights</p><a href="../type/nurbs_curve.html#boundprocedure-set3~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-set3'>set3</a></strong></td>
+                <td><p>Set Bezier or Rational Bezier curve using control points and weights</p><a href="../type/nurbs_curve.html#boundprocedure-set3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-set4~3'>set4</a></strong></td>
-                <td><p>Set NURBS curve using degree, number of control points, control points and weights</p><a href="../type/nurbs_curve.html#boundprocedure-set4~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-set4'>set4</a></strong></td>
+                <td><p>Set NURBS curve using degree, number of control points, control points and weights</p><a href="../type/nurbs_curve.html#boundprocedure-set4" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-set_c~3'>set_C</a></strong></td>
-                <td><p>Set a C-shape</p><a href="../type/nurbs_curve.html#boundprocedure-set_c~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-set_c'>set_C</a></strong></td>
+                <td><p>Set a C-shape</p><a href="../type/nurbs_curve.html#boundprocedure-set_c" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
@@ -3498,18 +3498,18 @@ <h4>Type-Bound Procedures</h4>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-set_elem~3'>set_elem</a></strong></td>
-                <td><p>Set IGA element connectivity</p><a href="../type/nurbs_curve.html#boundprocedure-set_elem~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-set_elem'>set_elem</a></strong></td>
+                <td><p>Set IGA element connectivity</p><a href="../type/nurbs_curve.html#boundprocedure-set_elem" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-set_elem_xc_vis~3'>set_elem_Xc_vis</a></strong></td>
-                <td><p>Set connectivity for control points</p><a href="../type/nurbs_curve.html#boundprocedure-set_elem_xc_vis~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-set_elem_xc_vis'>set_elem_Xc_vis</a></strong></td>
+                <td><p>Set connectivity for control points</p><a href="../type/nurbs_curve.html#boundprocedure-set_elem_xc_vis" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-set_elem_xg_vis~3'>set_elem_Xg_vis</a></strong></td>
-                <td><p>Set connectivity for geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-set_elem_xg_vis~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-set_elem_xg_vis'>set_elem_Xg_vis</a></strong></td>
+                <td><p>Set connectivity for geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-set_elem_xg_vis" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
@@ -3518,98 +3518,98 @@ <h4>Type-Bound Procedures</h4>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-show~3'>show</a></strong></td>
-                <td><p>Show the NURBS object using PyVista</p><a href="../type/nurbs_curve.html#boundprocedure-show~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-show'>show</a></strong></td>
+                <td><p>Show the NURBS object using PyVista</p><a href="../type/nurbs_curve.html#boundprocedure-show" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-translate_xc~3'>translate_Xc</a></strong></td>
-                <td><p>Translate control points</p><a href="../type/nurbs_curve.html#boundprocedure-translate_xc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-translate_xc'>translate_Xc</a></strong></td>
+                <td><p>Translate control points</p><a href="../type/nurbs_curve.html#boundprocedure-translate_xc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-translate_xg~3'>translate_Xg</a></strong></td>
-                <td><p>Translate geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-translate_xg~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-translate_xg'>translate_Xg</a></strong></td>
+                <td><p>Translate geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-translate_xg" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-basis_scalar~3'>basis_scalar</a></strong></td>
-                <td><p>Compute the basis functions of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-basis_scalar~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-basis_scalar'>basis_scalar</a></strong></td>
+                <td><p>Compute the basis functions of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-basis_scalar" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-basis_vector~3'>basis_vector</a></strong></td>
-                <td><p>Compute the basis functions of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-basis_vector~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-basis_vector'>basis_vector</a></strong></td>
+                <td><p>Compute the basis functions of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-basis_vector" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-derivative2_scalar~3'>derivative2_scalar</a></strong></td>
-                <td><p>Compute the second derivative of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-derivative2_scalar~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-derivative2_scalar'>derivative2_scalar</a></strong></td>
+                <td><p>Compute the second derivative of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-derivative2_scalar" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-derivative2_vector~3'>derivative2_vector</a></strong></td>
-                <td><p>Compute the second derivative of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-derivative2_vector~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-derivative2_vector'>derivative2_vector</a></strong></td>
+                <td><p>Compute the second derivative of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-derivative2_vector" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-derivative_scalar~3'>derivative_scalar</a></strong></td>
-                <td><p>Compute the derivative of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-derivative_scalar~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-derivative_scalar'>derivative_scalar</a></strong></td>
+                <td><p>Compute the derivative of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-derivative_scalar" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-derivative_vector~3'>derivative_vector</a></strong></td>
-                <td><p>Compute the derivative of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-derivative_vector~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-derivative_vector'>derivative_vector</a></strong></td>
+                <td><p>Compute the derivative of the NURBS curve</p><a href="../type/nurbs_curve.html#boundprocedure-derivative_vector" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_wc_all~3'>get_Wc_all</a></strong></td>
-                <td><p>Get all weights</p><a href="../type/nurbs_curve.html#boundprocedure-get_wc_all~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_wc_all'>get_Wc_all</a></strong></td>
+                <td><p>Get all weights</p><a href="../type/nurbs_curve.html#boundprocedure-get_wc_all" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_wci~3'>get_Wci</a></strong></td>
-                <td><p>Get i-th weight</p><a href="../type/nurbs_curve.html#boundprocedure-get_wci~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_wci'>get_Wci</a></strong></td>
+                <td><p>Get i-th weight</p><a href="../type/nurbs_curve.html#boundprocedure-get_wci" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xc_all~3'>get_Xc_all</a></strong></td>
-                <td><p>Get all control points</p><a href="../type/nurbs_curve.html#boundprocedure-get_xc_all~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xc_all'>get_Xc_all</a></strong></td>
+                <td><p>Get all control points</p><a href="../type/nurbs_curve.html#boundprocedure-get_xc_all" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xci~3'>get_Xci</a></strong></td>
-                <td><p>Get i-th control point</p><a href="../type/nurbs_curve.html#boundprocedure-get_xci~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xci'>get_Xci</a></strong></td>
+                <td><p>Get i-th control point</p><a href="../type/nurbs_curve.html#boundprocedure-get_xci" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xcid~3'>get_Xcid</a></strong></td>
-                <td><p>Get i-th control point in a specific direction</p><a href="../type/nurbs_curve.html#boundprocedure-get_xcid~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xcid'>get_Xcid</a></strong></td>
+                <td><p>Get i-th control point in a specific direction</p><a href="../type/nurbs_curve.html#boundprocedure-get_xcid" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xg_all~3'>get_Xg_all</a></strong></td>
-                <td><p>Get all geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-get_xg_all~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xg_all'>get_Xg_all</a></strong></td>
+                <td><p>Get all geometry points</p><a href="../type/nurbs_curve.html#boundprocedure-get_xg_all" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xgi~3'>get_Xgi</a></strong></td>
-                <td><p>Get i-th geometry point</p><a href="../type/nurbs_curve.html#boundprocedure-get_xgi~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xgi'>get_Xgi</a></strong></td>
+                <td><p>Get i-th geometry point</p><a href="../type/nurbs_curve.html#boundprocedure-get_xgi" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xgid~3'>get_Xgid</a></strong></td>
-                <td><p>Get i-th geometry point in a specific direction</p><a href="../type/nurbs_curve.html#boundprocedure-get_xgid~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_xgid'>get_Xgid</a></strong></td>
+                <td><p>Get i-th geometry point in a specific direction</p><a href="../type/nurbs_curve.html#boundprocedure-get_xgid" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_knot_all~3'>get_knot_all</a></strong></td>
-                <td><p>Get all knot vectors</p><a href="../type/nurbs_curve.html#boundprocedure-get_knot_all~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_knot_all'>get_knot_all</a></strong></td>
+                <td><p>Get all knot vectors</p><a href="../type/nurbs_curve.html#boundprocedure-get_knot_all" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_knoti~3'>get_knoti</a></strong></td>
-                <td><p>Get i-th knot value</p><a href="../type/nurbs_curve.html#boundprocedure-get_knoti~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_curve.html#boundprocedure-get_knoti'>get_knoti</a></strong></td>
+                <td><p>Get i-th knot value</p><a href="../type/nurbs_curve.html#boundprocedure-get_knoti" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
           </tbody>
         </table>
@@ -3622,7 +3622,7 @@ <h4>Type-Bound Procedures</h4>
         <section>
           <h2>Functions</h2>
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_xg~3"></span> <h3>private pure function <a href='../proc/cmp_xg~3.html'>cmp_Xg</a>(this, Xt) result(Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_xg"></span> <h3>private pure function <a href='../proc/cmp_xg.html'>cmp_Xg</a>(this, Xt) result(Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -3645,7 +3645,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~138"></span>
+              <span class="anchor" id="variable-this~7"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -3660,7 +3660,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~64"></span>
+              <span class="anchor" id="variable-xt~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -3686,7 +3686,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem~3"></span> <h3>private pure function <a href='../proc/cmp_elem~3.html'>cmp_elem</a>(this) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem"></span> <h3>private pure function <a href='../proc/cmp_elem.html'>cmp_elem</a>(this) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -3709,7 +3709,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~182"></span>
+              <span class="anchor" id="variable-this~51"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -3735,7 +3735,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem_xc_vis~3"></span> <h3>private pure function <a href='../proc/cmp_elem_xc_vis~3.html'>cmp_elem_Xc_vis</a>(this, p) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem_xc_vis"></span> <h3>private pure function <a href='../proc/cmp_elem_xc_vis.html'>cmp_elem_Xc_vis</a>(this, p) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -3758,7 +3758,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~154"></span>
+              <span class="anchor" id="variable-this~23"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -3773,7 +3773,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-p~13"></span>
+              <span class="anchor" id="variable-p"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -3799,7 +3799,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem_xg_vis~3"></span> <h3>private pure function <a href='../proc/cmp_elem_xg_vis~3.html'>cmp_elem_Xg_vis</a>(this, p) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem_xg_vis"></span> <h3>private pure function <a href='../proc/cmp_elem_xg_vis.html'>cmp_elem_Xg_vis</a>(this, p) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -3822,7 +3822,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~155"></span>
+              <span class="anchor" id="variable-this~24"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -3837,7 +3837,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-p~14"></span>
+              <span class="anchor" id="variable-p~2"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -3863,7 +3863,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_wc_all~3"></span> <h3>private pure function <a href='../proc/get_wc_all~3.html'>get_Wc_all</a>(this) result(Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_wc_all"></span> <h3>private pure function <a href='../proc/get_wc_all.html'>get_Wc_all</a>(this) result(Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -3886,7 +3886,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~145"></span>
+              <span class="anchor" id="variable-this~14"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -3912,7 +3912,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_wci~3"></span> <h3>private pure function <a href='../proc/get_wci~3.html'>get_Wci</a>(this, n) result(Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_wci"></span> <h3>private pure function <a href='../proc/get_wci.html'>get_Wci</a>(this, n) result(Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -3935,7 +3935,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~146"></span>
+              <span class="anchor" id="variable-this~15"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -3950,7 +3950,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~27"></span>
+              <span class="anchor" id="variable-n~5"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3976,7 +3976,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xc_all~3"></span> <h3>private pure function <a href='../proc/get_xc_all~3.html'>get_Xc_all</a>(this) result(Xc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xc_all"></span> <h3>private pure function <a href='../proc/get_xc_all.html'>get_Xc_all</a>(this) result(Xc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -3999,7 +3999,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~139"></span>
+              <span class="anchor" id="variable-this~8"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4025,7 +4025,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xci~3"></span> <h3>private pure function <a href='../proc/get_xci~3.html'>get_Xci</a>(this, n) result(Xc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xci"></span> <h3>private pure function <a href='../proc/get_xci.html'>get_Xci</a>(this, n) result(Xc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4048,7 +4048,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~140"></span>
+              <span class="anchor" id="variable-this~9"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4063,7 +4063,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~23"></span>
+              <span class="anchor" id="variable-n"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4089,7 +4089,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xcid~3"></span> <h3>private pure function <a href='../proc/get_xcid~3.html'>get_Xcid</a>(this, n, dir) result(Xc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xcid"></span> <h3>private pure function <a href='../proc/get_xcid.html'>get_Xcid</a>(this, n, dir) result(Xc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4112,7 +4112,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~141"></span>
+              <span class="anchor" id="variable-this~10"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4127,7 +4127,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~24"></span>
+              <span class="anchor" id="variable-n~2"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4142,7 +4142,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~31"></span>
+              <span class="anchor" id="variable-dir"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4168,7 +4168,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xg_all~3"></span> <h3>private pure function <a href='../proc/get_xg_all~3.html'>get_Xg_all</a>(this) result(Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xg_all"></span> <h3>private pure function <a href='../proc/get_xg_all.html'>get_Xg_all</a>(this) result(Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4191,7 +4191,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~142"></span>
+              <span class="anchor" id="variable-this~11"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4217,7 +4217,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xgi~3"></span> <h3>private pure function <a href='../proc/get_xgi~3.html'>get_Xgi</a>(this, n) result(Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xgi"></span> <h3>private pure function <a href='../proc/get_xgi.html'>get_Xgi</a>(this, n) result(Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4240,7 +4240,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~143"></span>
+              <span class="anchor" id="variable-this~12"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4255,7 +4255,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~25"></span>
+              <span class="anchor" id="variable-n~3"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4281,7 +4281,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xgid~3"></span> <h3>private pure function <a href='../proc/get_xgid~3.html'>get_Xgid</a>(this, n, dir) result(Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xgid"></span> <h3>private pure function <a href='../proc/get_xgid.html'>get_Xgid</a>(this, n, dir) result(Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4304,7 +4304,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~144"></span>
+              <span class="anchor" id="variable-this~13"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4319,7 +4319,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~26"></span>
+              <span class="anchor" id="variable-n~4"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4334,7 +4334,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~32"></span>
+              <span class="anchor" id="variable-dir~2"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4360,7 +4360,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xt~3"></span> <h3>private pure function <a href='../proc/get_xt~3.html'>get_Xt</a>(this) result(Xt)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xt"></span> <h3>private pure function <a href='../proc/get_xt.html'>get_Xt</a>(this) result(Xt)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4383,7 +4383,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~147"></span>
+              <span class="anchor" id="variable-this~16"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4409,7 +4409,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_continuity~3"></span> <h3>private pure function <a href='../proc/get_continuity~3.html'>get_continuity</a>(this) result(c)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_continuity"></span> <h3>private pure function <a href='../proc/get_continuity.html'>get_continuity</a>(this) result(c)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4432,7 +4432,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~161"></span>
+              <span class="anchor" id="variable-this~30"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4481,7 +4481,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~150"></span>
+              <span class="anchor" id="variable-this~19"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4507,7 +4507,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_elem~3"></span> <h3>private pure function <a href='../proc/get_elem~3.html'>get_elem</a>(this) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_elem"></span> <h3>private pure function <a href='../proc/get_elem.html'>get_elem</a>(this) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4530,7 +4530,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~178"></span>
+              <span class="anchor" id="variable-this~47"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4556,7 +4556,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_elem_xc_vis~3"></span> <h3>private pure function <a href='../proc/get_elem_xc_vis~3.html'>get_elem_Xc_vis</a>(this) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_elem_xc_vis"></span> <h3>private pure function <a href='../proc/get_elem_xc_vis.html'>get_elem_Xc_vis</a>(this) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4579,7 +4579,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~176"></span>
+              <span class="anchor" id="variable-this~45"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4605,7 +4605,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_elem_xg_vis~3"></span> <h3>private pure function <a href='../proc/get_elem_xg_vis~3.html'>get_elem_Xg_vis</a>(this) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_elem_xg_vis"></span> <h3>private pure function <a href='../proc/get_elem_xg_vis.html'>get_elem_Xg_vis</a>(this) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4628,7 +4628,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~177"></span>
+              <span class="anchor" id="variable-this~46"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4654,7 +4654,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_knot_all~3"></span> <h3>private pure function <a href='../proc/get_knot_all~3.html'>get_knot_all</a>(this) result(knot)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_knot_all"></span> <h3>private pure function <a href='../proc/get_knot_all.html'>get_knot_all</a>(this) result(knot)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4677,7 +4677,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~151"></span>
+              <span class="anchor" id="variable-this~20"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4703,7 +4703,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_knoti~3"></span> <h3>private pure function <a href='../proc/get_knoti~3.html'>get_knoti</a>(this, i) result(knot)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_knoti"></span> <h3>private pure function <a href='../proc/get_knoti.html'>get_knoti</a>(this, i) result(knot)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4726,7 +4726,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~152"></span>
+              <span class="anchor" id="variable-this~21"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4741,7 +4741,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-i~87"></span>
+              <span class="anchor" id="variable-i~7"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4767,7 +4767,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_multiplicity~3"></span> <h3>private pure function <a href='../proc/get_multiplicity~3.html'>get_multiplicity</a>(this) result(m)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_multiplicity"></span> <h3>private pure function <a href='../proc/get_multiplicity.html'>get_multiplicity</a>(this) result(m)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4790,7 +4790,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~160"></span>
+              <span class="anchor" id="variable-this~29"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4839,7 +4839,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~163"></span>
+              <span class="anchor" id="variable-this~32"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4865,7 +4865,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_ng~3"></span> <h3>private pure function <a href='../proc/get_ng~3.html'>get_ng</a>(this) result(ng)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_ng"></span> <h3>private pure function <a href='../proc/get_ng.html'>get_ng</a>(this) result(ng)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4888,7 +4888,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~148"></span>
+              <span class="anchor" id="variable-this~17"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4914,7 +4914,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-is_rational~3"></span> <h3>private pure function <a href='../proc/is_rational~3.html'>is_rational</a>(this) result(r)  
+    <div class="card-header codesum"><span class="anchor" id="proc-is_rational"></span> <h3>private pure function <a href='../proc/is_rational.html'>is_rational</a>(this) result(r)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4937,7 +4937,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~172"></span>
+              <span class="anchor" id="variable-this~41"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -4968,7 +4968,7 @@ <h4>
         <section>
           <h2>Subroutines</h2>
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-ansatz~3"></span> <h3>private pure subroutine <a href='../proc/ansatz~3.html'>ansatz</a>(this, ie, ig, Tgc, dTgc_dXg, dL)  
+    <div class="card-header codesum"><span class="anchor" id="proc-ansatz"></span> <h3>private pure subroutine <a href='../proc/ansatz.html'>ansatz</a>(this, ie, ig, Tgc, dTgc_dXg, dL)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4991,7 +4991,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~191"></span>
+              <span class="anchor" id="variable-this~60"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -5006,7 +5006,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ie~5"></span>
+              <span class="anchor" id="variable-ie"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5021,7 +5021,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ig~5"></span>
+              <span class="anchor" id="variable-ig"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5036,7 +5036,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~55"></span>
+              <span class="anchor" id="variable-tgc~8"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5051,7 +5051,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc_dxg~5"></span>
+              <span class="anchor" id="variable-dtgc_dxg"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5087,7 +5087,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-basis_scalar~3"></span> <h3>private pure subroutine <a href='../proc/basis_scalar~3.html'>basis_scalar</a>(this, Xt, Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-basis_scalar"></span> <h3>private pure subroutine <a href='../proc/basis_scalar.html'>basis_scalar</a>(this, Xt, Tgc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5110,7 +5110,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~171"></span>
+              <span class="anchor" id="variable-this~40"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -5125,7 +5125,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~71"></span>
+              <span class="anchor" id="variable-xt~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -5140,7 +5140,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~53"></span>
+              <span class="anchor" id="variable-tgc~6"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5161,7 +5161,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-basis_vector~3"></span> <h3>private pure subroutine <a href='../proc/basis_vector~3.html'>basis_vector</a>(this, res, Xt, Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-basis_vector"></span> <h3>private pure subroutine <a href='../proc/basis_vector.html'>basis_vector</a>(this, res, Xt, Tgc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5184,7 +5184,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~170"></span>
+              <span class="anchor" id="variable-this~39"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -5214,7 +5214,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~70"></span>
+              <span class="anchor" id="variable-xt~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -5229,7 +5229,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~52"></span>
+              <span class="anchor" id="variable-tgc~5"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5250,7 +5250,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_degree~3"></span> <h3>private pure subroutine <a href='../proc/cmp_degree~3.html'>cmp_degree</a>(this)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_degree"></span> <h3>private pure subroutine <a href='../proc/cmp_degree.html'>cmp_degree</a>(this)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5273,7 +5273,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~149"></span>
+              <span class="anchor" id="variable-this~18"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -5317,7 +5317,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~192"></span>
+              <span class="anchor" id="variable-this~61"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -5332,7 +5332,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-length~5"></span>
+              <span class="anchor" id="variable-length"></span>
               real(kind=rk),
             </td>
 <td>intent(out)</td>
@@ -5353,7 +5353,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_nc~3"></span> <h3>private pure subroutine <a href='../proc/cmp_nc~3.html'>cmp_nc</a>(this)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_nc"></span> <h3>private pure subroutine <a href='../proc/cmp_nc.html'>cmp_nc</a>(this)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5376,7 +5376,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~162"></span>
+              <span class="anchor" id="variable-this~31"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -5397,7 +5397,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-create~3"></span> <h3>private pure subroutine <a href='../proc/create~3.html'>create</a>(this, res, Xt)  
+    <div class="card-header codesum"><span class="anchor" id="proc-create"></span> <h3>private pure subroutine <a href='../proc/create.html'>create</a>(this, res, Xt)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5420,7 +5420,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~137"></span>
+              <span class="anchor" id="variable-this~6"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -5450,7 +5450,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~63"></span>
+              <span class="anchor" id="variable-xt~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -5471,7 +5471,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-derivative2_scalar~3"></span> <h3>private pure subroutine <a href='../proc/derivative2_scalar~3.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-derivative2_scalar"></span> <h3>private pure subroutine <a href='../proc/derivative2_scalar.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5494,7 +5494,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~169"></span>
+              <span class="anchor" id="variable-this~38"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -5509,7 +5509,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~69"></span>
+              <span class="anchor" id="variable-xt~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -5524,7 +5524,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc~16"></span>
+              <span class="anchor" id="variable-d2tgc~2"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5539,7 +5539,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~30"></span>
+              <span class="anchor" id="variable-dtgc~4"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5554,7 +5554,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~51"></span>
+              <span class="anchor" id="variable-tgc~4"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5575,7 +5575,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-derivative2_vector~3"></span> <h3>private pure subroutine <a href='../proc/derivative2_vector~3.html'>derivative2_vector</a>(this, res, Xt, d2Tgc, dTgc, Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-derivative2_vector"></span> <h3>private pure subroutine <a href='../proc/derivative2_vector.html'>derivative2_vector</a>(this, res, Xt, d2Tgc, dTgc, Tgc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5598,7 +5598,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~168"></span>
+              <span class="anchor" id="variable-this~37"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -5628,7 +5628,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~68"></span>
+              <span class="anchor" id="variable-xt~7"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -5643,7 +5643,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc~15"></span>
+              <span class="anchor" id="variable-d2tgc"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5658,7 +5658,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~29"></span>
+              <span class="anchor" id="variable-dtgc~3"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5673,7 +5673,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~50"></span>
+              <span class="anchor" id="variable-tgc~3"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5694,7 +5694,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-derivative_scalar~3"></span> <h3>private pure subroutine <a href='../proc/derivative_scalar~3.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
+    <div class="card-header codesum"><span class="anchor" id="proc-derivative_scalar"></span> <h3>private pure subroutine <a href='../proc/derivative_scalar.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5717,7 +5717,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~167"></span>
+              <span class="anchor" id="variable-this~36"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -5732,7 +5732,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~67"></span>
+              <span class="anchor" id="variable-xt~6"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -5747,7 +5747,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~28"></span>
+              <span class="anchor" id="variable-dtgc~2"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5762,7 +5762,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~49"></span>
+              <span class="anchor" id="variable-tgc~2"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5777,7 +5777,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~13"></span>
+              <span class="anchor" id="variable-elem~2"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -5798,7 +5798,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-derivative_vector~3"></span> <h3>private pure subroutine <a href='../proc/derivative_vector~3.html'>derivative_vector</a>(this, res, Xt, dTgc, Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-derivative_vector"></span> <h3>private pure subroutine <a href='../proc/derivative_vector.html'>derivative_vector</a>(this, res, Xt, dTgc, Tgc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5821,7 +5821,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~166"></span>
+              <span class="anchor" id="variable-this~35"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -5851,7 +5851,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~66"></span>
+              <span class="anchor" id="variable-xt~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -5866,7 +5866,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~27"></span>
+              <span class="anchor" id="variable-dtgc"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5881,7 +5881,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~48"></span>
+              <span class="anchor" id="variable-tgc"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5902,7 +5902,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-elevate_degree~3"></span> <h3>private pure subroutine <a href='../proc/elevate_degree~3.html'>elevate_degree</a>(this, t)  
+    <div class="card-header codesum"><span class="anchor" id="proc-elevate_degree"></span> <h3>private pure subroutine <a href='../proc/elevate_degree.html'>elevate_degree</a>(this, t)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5925,7 +5925,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~165"></span>
+              <span class="anchor" id="variable-this~34"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -5940,7 +5940,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-t~11"></span>
+              <span class="anchor" id="variable-t"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5961,7 +5961,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-export_xc~3"></span> <h3>private impure subroutine <a href='../proc/export_xc~3.html'>export_Xc</a>(this, filename)  
+    <div class="card-header codesum"><span class="anchor" id="proc-export_xc"></span> <h3>private impure subroutine <a href='../proc/export_xc.html'>export_Xc</a>(this, filename)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5984,7 +5984,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~156"></span>
+              <span class="anchor" id="variable-this~25"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -5999,7 +5999,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-filename~5"></span>
+              <span class="anchor" id="variable-filename"></span>
               character(len=*),
             </td>
 <td>intent(in)</td>
@@ -6020,7 +6020,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-export_xg~3"></span> <h3>private impure subroutine <a href='../proc/export_xg~3.html'>export_Xg</a>(this, filename)  
+    <div class="card-header codesum"><span class="anchor" id="proc-export_xg"></span> <h3>private impure subroutine <a href='../proc/export_xg.html'>export_Xg</a>(this, filename)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6043,7 +6043,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~157"></span>
+              <span class="anchor" id="variable-this~26"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -6058,7 +6058,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-filename~6"></span>
+              <span class="anchor" id="variable-filename~2"></span>
               character(len=*),
             </td>
 <td>intent(in)</td>
@@ -6079,7 +6079,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-finalize~3"></span> <h3>private pure subroutine <a href='../proc/finalize~3.html'>finalize</a>(this)  
+    <div class="card-header codesum"><span class="anchor" id="proc-finalize"></span> <h3>private pure subroutine <a href='../proc/finalize.html'>finalize</a>(this)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6102,7 +6102,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~153"></span>
+              <span class="anchor" id="variable-this~22"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -6123,7 +6123,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-insert_knots~3"></span> <h3>private pure subroutine <a href='../proc/insert_knots~3.html'>insert_knots</a>(this, Xth, r)  
+    <div class="card-header codesum"><span class="anchor" id="proc-insert_knots"></span> <h3>private pure subroutine <a href='../proc/insert_knots.html'>insert_knots</a>(this, Xth, r)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6146,7 +6146,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~164"></span>
+              <span class="anchor" id="variable-this~33"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -6161,7 +6161,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth~10"></span>
+              <span class="anchor" id="variable-xth"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -6176,7 +6176,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-r~10"></span>
+              <span class="anchor" id="variable-r"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6197,7 +6197,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-modify_wc~3"></span> <h3>private pure subroutine <a href='../proc/modify_wc~3.html'>modify_Wc</a>(this, W, num)  
+    <div class="card-header codesum"><span class="anchor" id="proc-modify_wc"></span> <h3>private pure subroutine <a href='../proc/modify_wc.html'>modify_Wc</a>(this, W, num)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6220,7 +6220,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~159"></span>
+              <span class="anchor" id="variable-this~28"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -6235,7 +6235,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-w~3"></span>
+              <span class="anchor" id="variable-w"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -6250,7 +6250,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-num~7"></span>
+              <span class="anchor" id="variable-num~2"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -6271,7 +6271,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-modify_xc~3"></span> <h3>private pure subroutine <a href='../proc/modify_xc~3.html'>modify_Xc</a>(this, X, num, dir)  
+    <div class="card-header codesum"><span class="anchor" id="proc-modify_xc"></span> <h3>private pure subroutine <a href='../proc/modify_xc.html'>modify_Xc</a>(this, X, num, dir)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6294,7 +6294,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~158"></span>
+              <span class="anchor" id="variable-this~27"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -6309,7 +6309,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-x~5"></span>
+              <span class="anchor" id="variable-x~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -6324,7 +6324,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-num~6"></span>
+              <span class="anchor" id="variable-num"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -6339,7 +6339,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~33"></span>
+              <span class="anchor" id="variable-dir~3"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -6360,7 +6360,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-nearest_point~3"></span> <h3>private pure subroutine <a href='../proc/nearest_point~3.html'>nearest_point</a>(this, point_Xg, nearest_Xg, nearest_Xt, id)  
+    <div class="card-header codesum"><span class="anchor" id="proc-nearest_point"></span> <h3>private pure subroutine <a href='../proc/nearest_point.html'>nearest_point</a>(this, point_Xg, nearest_Xg, nearest_Xt, id)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6383,7 +6383,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~189"></span>
+              <span class="anchor" id="variable-this~58"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -6398,7 +6398,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-point_xg~7"></span>
+              <span class="anchor" id="variable-point_xg"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -6413,7 +6413,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xg~9"></span>
+              <span class="anchor" id="variable-nearest_xg~2"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6428,7 +6428,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xt~9"></span>
+              <span class="anchor" id="variable-nearest_xt~2"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6443,7 +6443,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-id~7"></span>
+              <span class="anchor" id="variable-id~2"></span>
               integer,
             </td>
 <td>intent(out),</td>
@@ -6464,7 +6464,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-nearest_point2~3"></span> <h3>private impure subroutine <a href='../proc/nearest_point2~3.html'>nearest_point2</a>(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-nearest_point2"></span> <h3>private impure subroutine <a href='../proc/nearest_point2.html'>nearest_point2</a>(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6487,7 +6487,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~190"></span>
+              <span class="anchor" id="variable-this~59"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -6502,7 +6502,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-point_xg~8"></span>
+              <span class="anchor" id="variable-point_xg~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -6517,7 +6517,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tol~4"></span>
+              <span class="anchor" id="variable-tol"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -6532,7 +6532,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-maxit~3"></span>
+              <span class="anchor" id="variable-maxit"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -6547,7 +6547,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xt~10"></span>
+              <span class="anchor" id="variable-nearest_xt~3"></span>
               real(kind=rk),
             </td>
 <td>intent(out)</td>
@@ -6562,7 +6562,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xg~10"></span>
+              <span class="anchor" id="variable-nearest_xg~3"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6583,7 +6583,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-remove_knots~3"></span> <h3>private pure subroutine <a href='../proc/remove_knots~3.html'>remove_knots</a>(this, Xth, r)  
+    <div class="card-header codesum"><span class="anchor" id="proc-remove_knots"></span> <h3>private pure subroutine <a href='../proc/remove_knots.html'>remove_knots</a>(this, Xth, r)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6606,7 +6606,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~179"></span>
+              <span class="anchor" id="variable-this~48"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -6621,7 +6621,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth~11"></span>
+              <span class="anchor" id="variable-xth~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -6636,7 +6636,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-r~12"></span>
+              <span class="anchor" id="variable-r~3"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6657,7 +6657,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-rotate_xc~3"></span> <h3>private pure subroutine <a href='../proc/rotate_xc~3.html'>rotate_Xc</a>(this, alpha, beta, theta)  
+    <div class="card-header codesum"><span class="anchor" id="proc-rotate_xc"></span> <h3>private pure subroutine <a href='../proc/rotate_xc.html'>rotate_Xc</a>(this, alpha, beta, theta)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6680,7 +6680,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~183"></span>
+              <span class="anchor" id="variable-this~52"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -6695,7 +6695,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-alpha~7"></span>
+              <span class="anchor" id="variable-alpha"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -6710,7 +6710,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-beta~8"></span>
+              <span class="anchor" id="variable-beta"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -6725,7 +6725,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-theta~7"></span>
+              <span class="anchor" id="variable-theta~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -6746,7 +6746,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-rotate_xg~3"></span> <h3>private pure subroutine <a href='../proc/rotate_xg~3.html'>rotate_Xg</a>(this, alpha, beta, theta)  
+    <div class="card-header codesum"><span class="anchor" id="proc-rotate_xg"></span> <h3>private pure subroutine <a href='../proc/rotate_xg.html'>rotate_Xg</a>(this, alpha, beta, theta)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6769,7 +6769,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~184"></span>
+              <span class="anchor" id="variable-this~53"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -6784,7 +6784,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-alpha~8"></span>
+              <span class="anchor" id="variable-alpha~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -6799,7 +6799,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-beta~9"></span>
+              <span class="anchor" id="variable-beta~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -6814,7 +6814,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-theta~8"></span>
+              <span class="anchor" id="variable-theta~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -6835,7 +6835,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set1~3"></span> <h3>private pure subroutine <a href='../proc/set1~3.html'>set1</a>(this, knot, Xc, Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set1"></span> <h3>private pure subroutine <a href='../proc/set1.html'>set1</a>(this, knot, Xc, Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6858,7 +6858,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~132"></span>
+              <span class="anchor" id="variable-this"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -6873,7 +6873,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~17"></span>
+              <span class="anchor" id="variable-knot~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -6888,7 +6888,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~52"></span>
+              <span class="anchor" id="variable-xc~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -6903,7 +6903,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~49"></span>
+              <span class="anchor" id="variable-wc~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -6947,7 +6947,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~133"></span>
+              <span class="anchor" id="variable-this~2"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -6962,7 +6962,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~18"></span>
+              <span class="anchor" id="variable-knot~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -6977,7 +6977,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~53"></span>
+              <span class="anchor" id="variable-xc~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -6992,7 +6992,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~50"></span>
+              <span class="anchor" id="variable-wc~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7013,7 +7013,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set2~3"></span> <h3>private pure subroutine <a href='../proc/set2~3.html'>set2</a>(this, Xth_dir, degree, continuity, Xc, Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set2"></span> <h3>private pure subroutine <a href='../proc/set2.html'>set2</a>(this, Xth_dir, degree, continuity, Xc, Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7036,7 +7036,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~134"></span>
+              <span class="anchor" id="variable-this~3"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -7051,7 +7051,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth_dir~2"></span>
+              <span class="anchor" id="variable-xth_dir"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7066,7 +7066,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~55"></span>
+              <span class="anchor" id="variable-degree~2"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -7081,7 +7081,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-continuity~2"></span>
+              <span class="anchor" id="variable-continuity"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -7096,7 +7096,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~54"></span>
+              <span class="anchor" id="variable-xc~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7111,7 +7111,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~51"></span>
+              <span class="anchor" id="variable-wc~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7132,7 +7132,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set3~3"></span> <h3>private pure subroutine <a href='../proc/set3~3.html'>set3</a>(this, Xc, Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set3"></span> <h3>private pure subroutine <a href='../proc/set3.html'>set3</a>(this, Xc, Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7155,7 +7155,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~135"></span>
+              <span class="anchor" id="variable-this~4"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -7170,7 +7170,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~55"></span>
+              <span class="anchor" id="variable-xc~11"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7185,7 +7185,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~52"></span>
+              <span class="anchor" id="variable-wc~11"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7206,7 +7206,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set4~3"></span> <h3>private pure subroutine <a href='../proc/set4~3.html'>set4</a>(this, degree, nc, Xc, Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set4"></span> <h3>private pure subroutine <a href='../proc/set4.html'>set4</a>(this, degree, nc, Xc, Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7229,7 +7229,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~136"></span>
+              <span class="anchor" id="variable-this~5"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -7244,7 +7244,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~56"></span>
+              <span class="anchor" id="variable-degree~3"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -7259,7 +7259,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~60"></span>
+              <span class="anchor" id="variable-nc~2"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -7274,7 +7274,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~56"></span>
+              <span class="anchor" id="variable-xc~12"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7289,7 +7289,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~53"></span>
+              <span class="anchor" id="variable-wc~12"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7310,7 +7310,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set_c~3"></span> <h3>private pure subroutine <a href='../proc/set_c~3.html'>set_C</a>(this, center, radius)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set_c"></span> <h3>private pure subroutine <a href='../proc/set_c.html'>set_C</a>(this, center, radius)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7333,7 +7333,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~181"></span>
+              <span class="anchor" id="variable-this~50"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -7348,7 +7348,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center~10"></span>
+              <span class="anchor" id="variable-center~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7407,7 +7407,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~180"></span>
+              <span class="anchor" id="variable-this~49"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -7422,7 +7422,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center~9"></span>
+              <span class="anchor" id="variable-center"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7458,7 +7458,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set_elem~3"></span> <h3>private pure subroutine <a href='../proc/set_elem~3.html'>set_elem</a>(this, elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set_elem"></span> <h3>private pure subroutine <a href='../proc/set_elem.html'>set_elem</a>(this, elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7481,7 +7481,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~175"></span>
+              <span class="anchor" id="variable-this~44"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -7496,7 +7496,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~42"></span>
+              <span class="anchor" id="variable-elemconn~8"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -7517,7 +7517,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set_elem_xc_vis~3"></span> <h3>private pure subroutine <a href='../proc/set_elem_xc_vis~3.html'>set_elem_Xc_vis</a>(this, elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set_elem_xc_vis"></span> <h3>private pure subroutine <a href='../proc/set_elem_xc_vis.html'>set_elem_Xc_vis</a>(this, elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7540,7 +7540,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~173"></span>
+              <span class="anchor" id="variable-this~42"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -7555,7 +7555,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~40"></span>
+              <span class="anchor" id="variable-elemconn~6"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -7576,7 +7576,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set_elem_xg_vis~3"></span> <h3>private pure subroutine <a href='../proc/set_elem_xg_vis~3.html'>set_elem_Xg_vis</a>(this, elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set_elem_xg_vis"></span> <h3>private pure subroutine <a href='../proc/set_elem_xg_vis.html'>set_elem_Xg_vis</a>(this, elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7599,7 +7599,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~174"></span>
+              <span class="anchor" id="variable-this~43"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -7614,7 +7614,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~41"></span>
+              <span class="anchor" id="variable-elemconn~7"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -7658,7 +7658,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~188"></span>
+              <span class="anchor" id="variable-this~57"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -7673,7 +7673,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center~11"></span>
+              <span class="anchor" id="variable-center~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7709,7 +7709,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-show~3"></span> <h3>private impure subroutine <a href='../proc/show~3.html'>show</a>(this, vtkfile_Xc, vtkfile_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-show"></span> <h3>private impure subroutine <a href='../proc/show.html'>show</a>(this, vtkfile_Xc, vtkfile_Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7732,7 +7732,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~187"></span>
+              <span class="anchor" id="variable-this~56"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -7747,7 +7747,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-vtkfile_xc~3"></span>
+              <span class="anchor" id="variable-vtkfile_xc"></span>
               character(len=*),
             </td>
 <td>intent(in)</td>
@@ -7762,7 +7762,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-vtkfile_xg~3"></span>
+              <span class="anchor" id="variable-vtkfile_xg"></span>
               character(len=*),
             </td>
 <td>intent(in)</td>
@@ -7783,7 +7783,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-translate_xc~3"></span> <h3>private pure subroutine <a href='../proc/translate_xc~3.html'>translate_Xc</a>(this, vec)  
+    <div class="card-header codesum"><span class="anchor" id="proc-translate_xc"></span> <h3>private pure subroutine <a href='../proc/translate_xc.html'>translate_Xc</a>(this, vec)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7806,7 +7806,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~185"></span>
+              <span class="anchor" id="variable-this~54"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -7821,7 +7821,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-vec~7"></span>
+              <span class="anchor" id="variable-vec"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -7842,7 +7842,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-translate_xg~3"></span> <h3>private pure subroutine <a href='../proc/translate_xg~3.html'>translate_Xg</a>(this, vec)  
+    <div class="card-header codesum"><span class="anchor" id="proc-translate_xg"></span> <h3>private pure subroutine <a href='../proc/translate_xg.html'>translate_Xg</a>(this, vec)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7865,7 +7865,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~186"></span>
+              <span class="anchor" id="variable-this~55"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -7880,7 +7880,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-vec~8"></span>
+              <span class="anchor" id="variable-vec~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -7923,7 +7923,7 @@ <h4>Arguments</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/module/forcad_nurbs_surface.html b/module/forcad_nurbs_surface.html
index e8b59af5c..5365f088f 100644
--- a/module/forcad_nurbs_surface.html
+++ b/module/forcad_nurbs_surface.html
@@ -124,10 +124,10 @@ <h4 class="card-header bg-primary text-white">Interfaces</h4>
       </a>
       <div id="inters-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#interface-compute_tgc~2">compute_Tgc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#interface-compute_xg~2">compute_Xg</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#interface-compute_d2tgc~2">compute_d2Tgc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#interface-compute_dtgc~2">compute_dTgc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#interface-compute_tgc~3">compute_Tgc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#interface-compute_xg~3">compute_Xg</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#interface-compute_d2tgc~3">compute_d2Tgc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#interface-compute_dtgc~3">compute_dTgc</a>
             <a class="list-group-item" href="../module/forcad_nurbs_surface.html#interface-nearest_point_help_2d">nearest_point_help_2d</a>
         </div>
       </div>
@@ -153,32 +153,32 @@ <h4 class="card-header bg-primary text-white">Functions</h4>
       </a>
       <div id="funcs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-cmp_xg~2">cmp_Xg</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-cmp_elem~2">cmp_elem</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-cmp_elem_xc_vis~2">cmp_elem_Xc_vis</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-cmp_elem_xg_vis~2">cmp_elem_Xg_vis</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_wc_all~2">get_Wc_all</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_wci~2">get_Wci</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_xc_all~2">get_Xc_all</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_xci~2">get_Xci</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_xcid~2">get_Xcid</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_xg_all~2">get_Xg_all</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_xgi~2">get_Xgi</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_xgid~2">get_Xgid</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_xt~2">get_Xt</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_continuity~2">get_continuity</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-cmp_xg~3">cmp_Xg</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-cmp_elem~3">cmp_elem</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-cmp_elem_xc_vis~3">cmp_elem_Xc_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-cmp_elem_xg_vis~3">cmp_elem_Xg_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_wc_all~3">get_Wc_all</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_wci~3">get_Wci</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_xc_all~3">get_Xc_all</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_xci~3">get_Xci</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_xcid~3">get_Xcid</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_xg_all~3">get_Xg_all</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_xgi~3">get_Xgi</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_xgid~3">get_Xgid</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_xt~3">get_Xt</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_continuity~3">get_continuity</a>
             <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_degree_all~2">get_degree_all</a>
             <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_degree_dir~2">get_degree_dir</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_elem~2">get_elem</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_elem_xc_vis~2">get_elem_Xc_vis</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_elem_xg_vis~2">get_elem_Xg_vis</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_knot_all~2">get_knot_all</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_knoti~2">get_knoti</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_multiplicity~2">get_multiplicity</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_elem~3">get_elem</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_elem_xc_vis~3">get_elem_Xc_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_elem_xg_vis~3">get_elem_Xg_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_knot_all~3">get_knot_all</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_knoti~3">get_knoti</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_multiplicity~3">get_multiplicity</a>
             <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_nc_all~2">get_nc_all</a>
             <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_nc_dir~2">get_nc_dir</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_ng~2">get_ng</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-is_rational~2">is_rational</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-get_ng~3">get_ng</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-is_rational~3">is_rational</a>
         </div>
       </div>
     </div>
@@ -190,43 +190,43 @@ <h4 class="card-header bg-primary text-white">Subroutines</h4>
       </a>
       <div id="subs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-ansatz~2">ansatz</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-basis_scalar~2">basis_scalar</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-basis_vector~2">basis_vector</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-ansatz~3">ansatz</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-basis_scalar~3">basis_scalar</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-basis_vector~3">basis_vector</a>
             <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-cmp_area">cmp_area</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-cmp_degree~2">cmp_degree</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-cmp_nc~2">cmp_nc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-create~2">create</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-derivative2_scalar~2">derivative2_scalar</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-derivative2_vector~2">derivative2_vector</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-derivative_scalar~2">derivative_scalar</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-derivative_vector~2">derivative_vector</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-elevate_degree~2">elevate_degree</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-export_xc~2">export_Xc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-export_xg~2">export_Xg</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-finalize~2">finalize</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-insert_knots~2">insert_knots</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-modify_wc~2">modify_Wc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-modify_xc~2">modify_Xc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-nearest_point~2">nearest_point</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-nearest_point2~2">nearest_point2</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-remove_knots~2">remove_knots</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-rotate_xc~2">rotate_Xc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-rotate_xg~2">rotate_Xg</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set1~2">set1</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set2~2">set2</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set3~2">set3</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set4~2">set4</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set_c~2">set_C</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set_elem~2">set_elem</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set_elem_xc_vis~2">set_elem_Xc_vis</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set_elem_xg_vis~2">set_elem_Xg_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-cmp_degree~3">cmp_degree</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-cmp_nc~3">cmp_nc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-create~3">create</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-derivative2_scalar~3">derivative2_scalar</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-derivative2_vector~3">derivative2_vector</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-derivative_scalar~3">derivative_scalar</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-derivative_vector~3">derivative_vector</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-elevate_degree~3">elevate_degree</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-export_xc~3">export_Xc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-export_xg~3">export_Xg</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-finalize~3">finalize</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-insert_knots~3">insert_knots</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-modify_wc~3">modify_Wc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-modify_xc~3">modify_Xc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-nearest_point~3">nearest_point</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-nearest_point2~3">nearest_point2</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-remove_knots~3">remove_knots</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-rotate_xc~3">rotate_Xc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-rotate_xg~3">rotate_Xg</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set1~3">set1</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set2~3">set2</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set3~3">set3</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set4~3">set4</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set_c~3">set_C</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set_elem~3">set_elem</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set_elem_xc_vis~3">set_elem_Xc_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set_elem_xg_vis~3">set_elem_Xg_vis</a>
             <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set_half_ring~2">set_half_ring</a>
             <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set_ring~2">set_ring</a>
             <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-set_tetragon">set_tetragon</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-show~2">show</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-translate_xc~2">translate_Xc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-translate_xg~2">translate_Xg</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-show~3">show</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-translate_xc~3">translate_Xc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_surface.html#proc-translate_xg~3">translate_Xg</a>
         </div>
       </div>
     </div>
@@ -924,8 +924,8 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
           <h2>Interfaces</h2>
               <div class="card">
     <div class="card-header bg-light codesum">
-      <span class="anchor" id="interface-compute_tgc~2"></span>
-      <h3>private        interface <a href='../interface/compute_tgc~2.html'>compute_Tgc</a> 
+      <span class="anchor" id="interface-compute_tgc~3"></span>
+      <h3>private        interface <a href='../interface/compute_tgc~3.html'>compute_Tgc</a> 
       </h3>
     </div>
     <ul class="list-group">
@@ -949,7 +949,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~32"></span>
+              <span class="anchor" id="variable-f_xt~48"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -994,7 +994,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~32"></span>
+              <span class="anchor" id="variable-f_degree~48"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1009,7 +1009,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~28"></span>
+              <span class="anchor" id="variable-f_nc~44"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1052,7 +1052,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~30"></span>
+              <span class="anchor" id="variable-f_xt~46"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1097,7 +1097,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~30"></span>
+              <span class="anchor" id="variable-f_degree~46"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1112,7 +1112,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~26"></span>
+              <span class="anchor" id="variable-f_nc~42"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1127,7 +1127,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~17"></span>
+              <span class="anchor" id="variable-f_ng~26"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1170,7 +1170,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~31"></span>
+              <span class="anchor" id="variable-f_xt~47"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1215,7 +1215,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~31"></span>
+              <span class="anchor" id="variable-f_degree~47"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1230,7 +1230,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~27"></span>
+              <span class="anchor" id="variable-f_nc~43"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1245,7 +1245,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~16"></span>
+              <span class="anchor" id="variable-f_wc~24"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1288,7 +1288,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~29"></span>
+              <span class="anchor" id="variable-f_xt~45"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1333,7 +1333,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~29"></span>
+              <span class="anchor" id="variable-f_degree~45"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1348,7 +1348,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~25"></span>
+              <span class="anchor" id="variable-f_nc~41"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1363,7 +1363,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~16"></span>
+              <span class="anchor" id="variable-f_ng~25"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1378,7 +1378,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~15"></span>
+              <span class="anchor" id="variable-f_wc~23"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1406,8 +1406,8 @@ <h4>
 
               <div class="card">
     <div class="card-header bg-light codesum">
-      <span class="anchor" id="interface-compute_xg~2"></span>
-      <h3>private        interface <a href='../interface/compute_xg~2.html'>compute_Xg</a> 
+      <span class="anchor" id="interface-compute_xg~3"></span>
+      <h3>private        interface <a href='../interface/compute_xg~3.html'>compute_Xg</a> 
       </h3>
     </div>
     <ul class="list-group">
@@ -1431,7 +1431,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~18"></span>
+              <span class="anchor" id="variable-f_xt~34"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1476,7 +1476,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~18"></span>
+              <span class="anchor" id="variable-f_degree~34"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1491,7 +1491,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~18"></span>
+              <span class="anchor" id="variable-f_nc~34"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1506,7 +1506,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~11"></span>
+              <span class="anchor" id="variable-f_ng~20"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1521,7 +1521,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xc~6"></span>
+              <span class="anchor" id="variable-f_xc~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1564,7 +1564,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~20"></span>
+              <span class="anchor" id="variable-f_xt~36"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1609,7 +1609,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~20"></span>
+              <span class="anchor" id="variable-f_degree~36"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1624,7 +1624,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~20"></span>
+              <span class="anchor" id="variable-f_nc~36"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1639,7 +1639,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xc~8"></span>
+              <span class="anchor" id="variable-f_xc~12"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1682,7 +1682,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~17"></span>
+              <span class="anchor" id="variable-f_xt~33"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1727,7 +1727,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~17"></span>
+              <span class="anchor" id="variable-f_degree~33"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1742,7 +1742,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~17"></span>
+              <span class="anchor" id="variable-f_nc~33"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1757,7 +1757,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~10"></span>
+              <span class="anchor" id="variable-f_ng~19"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1772,7 +1772,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xc~5"></span>
+              <span class="anchor" id="variable-f_xc~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1787,7 +1787,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~9"></span>
+              <span class="anchor" id="variable-f_wc~17"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1830,7 +1830,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~19"></span>
+              <span class="anchor" id="variable-f_xt~35"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1875,7 +1875,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~19"></span>
+              <span class="anchor" id="variable-f_degree~35"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1890,7 +1890,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~19"></span>
+              <span class="anchor" id="variable-f_nc~35"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1905,7 +1905,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xc~7"></span>
+              <span class="anchor" id="variable-f_xc~11"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1920,7 +1920,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~10"></span>
+              <span class="anchor" id="variable-f_wc~18"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1948,8 +1948,8 @@ <h4>
 
               <div class="card">
     <div class="card-header bg-light codesum">
-      <span class="anchor" id="interface-compute_d2tgc~2"></span>
-      <h3>private        interface <a href='../interface/compute_d2tgc~2.html'>compute_d2Tgc</a> 
+      <span class="anchor" id="interface-compute_d2tgc~3"></span>
+      <h3>private        interface <a href='../interface/compute_d2tgc~3.html'>compute_d2Tgc</a> 
       </h3>
     </div>
     <ul class="list-group">
@@ -1973,7 +1973,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~28"></span>
+              <span class="anchor" id="variable-f_xt~44"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2018,7 +2018,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~28"></span>
+              <span class="anchor" id="variable-f_degree~44"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2033,7 +2033,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~28"></span>
+              <span class="anchor" id="variable-nc~56"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2048,7 +2048,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_d2tgc~8"></span>
+              <span class="anchor" id="variable-f_d2tgc~12"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2063,7 +2063,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~16"></span>
+              <span class="anchor" id="variable-f_dtgc~24"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2078,7 +2078,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~20"></span>
+              <span class="anchor" id="variable-f_tgc~32"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2116,7 +2116,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~26"></span>
+              <span class="anchor" id="variable-f_xt~42"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2161,7 +2161,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~26"></span>
+              <span class="anchor" id="variable-f_degree~42"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2176,7 +2176,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~27"></span>
+              <span class="anchor" id="variable-nc~55"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2191,7 +2191,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~15"></span>
+              <span class="anchor" id="variable-f_ng~24"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2206,7 +2206,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_d2tgc~6"></span>
+              <span class="anchor" id="variable-f_d2tgc~10"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2221,7 +2221,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~14"></span>
+              <span class="anchor" id="variable-f_dtgc~22"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2236,7 +2236,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~18"></span>
+              <span class="anchor" id="variable-f_tgc~30"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2274,7 +2274,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~27"></span>
+              <span class="anchor" id="variable-f_xt~43"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2319,7 +2319,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~27"></span>
+              <span class="anchor" id="variable-f_degree~43"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2334,7 +2334,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~24"></span>
+              <span class="anchor" id="variable-f_nc~40"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2349,7 +2349,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~14"></span>
+              <span class="anchor" id="variable-f_wc~22"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2364,7 +2364,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_d2tgc~7"></span>
+              <span class="anchor" id="variable-f_d2tgc~11"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2379,7 +2379,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~15"></span>
+              <span class="anchor" id="variable-f_dtgc~23"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2394,7 +2394,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~19"></span>
+              <span class="anchor" id="variable-f_tgc~31"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2432,7 +2432,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~25"></span>
+              <span class="anchor" id="variable-f_xt~41"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2477,7 +2477,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~25"></span>
+              <span class="anchor" id="variable-f_degree~41"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2492,7 +2492,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~23"></span>
+              <span class="anchor" id="variable-f_nc~39"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2507,7 +2507,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~14"></span>
+              <span class="anchor" id="variable-f_ng~23"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2522,7 +2522,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~13"></span>
+              <span class="anchor" id="variable-f_wc~21"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2537,7 +2537,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_d2tgc~5"></span>
+              <span class="anchor" id="variable-f_d2tgc~9"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2552,7 +2552,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~13"></span>
+              <span class="anchor" id="variable-f_dtgc~21"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2567,7 +2567,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~17"></span>
+              <span class="anchor" id="variable-f_tgc~29"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2590,8 +2590,8 @@ <h4>Arguments</h4>
 
               <div class="card">
     <div class="card-header bg-light codesum">
-      <span class="anchor" id="interface-compute_dtgc~2"></span>
-      <h3>private        interface <a href='../interface/compute_dtgc~2.html'>compute_dTgc</a> 
+      <span class="anchor" id="interface-compute_dtgc~3"></span>
+      <h3>private        interface <a href='../interface/compute_dtgc~3.html'>compute_dTgc</a> 
       </h3>
     </div>
     <ul class="list-group">
@@ -2615,7 +2615,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~24"></span>
+              <span class="anchor" id="variable-f_xt~40"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2660,7 +2660,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~24"></span>
+              <span class="anchor" id="variable-f_degree~40"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2675,7 +2675,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~26"></span>
+              <span class="anchor" id="variable-nc~54"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2690,7 +2690,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~12"></span>
+              <span class="anchor" id="variable-f_dtgc~20"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2705,7 +2705,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~16"></span>
+              <span class="anchor" id="variable-f_tgc~28"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2720,7 +2720,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~9"></span>
+              <span class="anchor" id="variable-elem~12"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2758,7 +2758,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~22"></span>
+              <span class="anchor" id="variable-f_xt~38"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2803,7 +2803,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~22"></span>
+              <span class="anchor" id="variable-f_degree~38"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2818,7 +2818,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~25"></span>
+              <span class="anchor" id="variable-nc~53"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2833,7 +2833,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~13"></span>
+              <span class="anchor" id="variable-f_ng~22"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2848,7 +2848,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~10"></span>
+              <span class="anchor" id="variable-f_dtgc~18"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2863,7 +2863,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~14"></span>
+              <span class="anchor" id="variable-f_tgc~26"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2901,7 +2901,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~23"></span>
+              <span class="anchor" id="variable-f_xt~39"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2946,7 +2946,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~23"></span>
+              <span class="anchor" id="variable-f_degree~39"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2961,7 +2961,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~22"></span>
+              <span class="anchor" id="variable-f_nc~38"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2976,7 +2976,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~12"></span>
+              <span class="anchor" id="variable-f_wc~20"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2991,7 +2991,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~11"></span>
+              <span class="anchor" id="variable-f_dtgc~19"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -3006,7 +3006,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~15"></span>
+              <span class="anchor" id="variable-f_tgc~27"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -3021,7 +3021,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~8"></span>
+              <span class="anchor" id="variable-elem~11"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3059,7 +3059,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~21"></span>
+              <span class="anchor" id="variable-f_xt~37"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -3104,7 +3104,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~21"></span>
+              <span class="anchor" id="variable-f_degree~37"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3119,7 +3119,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~21"></span>
+              <span class="anchor" id="variable-f_nc~37"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3134,7 +3134,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~12"></span>
+              <span class="anchor" id="variable-f_ng~21"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3149,7 +3149,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~11"></span>
+              <span class="anchor" id="variable-f_wc~19"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -3164,7 +3164,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~9"></span>
+              <span class="anchor" id="variable-f_dtgc~17"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -3179,7 +3179,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~13"></span>
+              <span class="anchor" id="variable-f_tgc~25"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -3227,7 +3227,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~18"></span>
+              <span class="anchor" id="variable-f_ng~27"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3242,7 +3242,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xg~10"></span>
+              <span class="anchor" id="variable-f_xg~15"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -3257,7 +3257,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_point_xg~2"></span>
+              <span class="anchor" id="variable-f_point_xg~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -3314,7 +3314,7 @@ <h4>Components</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~26"></span>
+              <span class="anchor" id="variable-wc~46"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3331,7 +3331,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~27"></span>
+              <span class="anchor" id="variable-xc~45"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3348,7 +3348,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xg~13"></span>
+              <span class="anchor" id="variable-xg~25"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3365,7 +3365,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~29"></span>
+              <span class="anchor" id="variable-xt~62"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3416,7 +3416,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~23"></span>
+              <span class="anchor" id="variable-degree~53"></span>
               integer,
             </td>
               <td>private</td>
@@ -3433,7 +3433,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~17"></span>
+              <span class="anchor" id="variable-elemconn~35"></span>
               integer,
             </td>
               <td>private,</td>
@@ -3450,7 +3450,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn_xc_vis~2"></span>
+              <span class="anchor" id="variable-elemconn_xc_vis~3"></span>
               integer,
             </td>
               <td>private,</td>
@@ -3467,7 +3467,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn_xg_vis~2"></span>
+              <span class="anchor" id="variable-elemconn_xg_vis~3"></span>
               integer,
             </td>
               <td>private,</td>
@@ -3484,7 +3484,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~23"></span>
+              <span class="anchor" id="variable-knot1~24"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3501,7 +3501,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~23"></span>
+              <span class="anchor" id="variable-knot2~24"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3518,7 +3518,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~24"></span>
+              <span class="anchor" id="variable-nc~52"></span>
               integer,
             </td>
               <td>private</td>
@@ -3535,7 +3535,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~14"></span>
+              <span class="anchor" id="variable-ng~27"></span>
               integer,
             </td>
               <td>private</td>
@@ -3561,18 +3561,18 @@ <h4>Type-Bound Procedures</h4>
           <tbody>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-ansatz~2'>ansatz</a></strong></td>
-                <td><p>Compute the shape functions, derivative of shape functions and dA</p><a href="../type/nurbs_surface.html#boundprocedure-ansatz~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-ansatz~3'>ansatz</a></strong></td>
+                <td><p>Compute the shape functions, derivative of shape functions and dA</p><a href="../type/nurbs_surface.html#boundprocedure-ansatz~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-basis~2'>basis</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-basis_vector~2'>basis_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-basis_scalar~2'>basis_scalar</a></td>
-                <td><p>Compute the basis functions of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-basis~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-basis~3'>basis</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-basis_vector~3'>basis_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-basis_scalar~3'>basis_scalar</a></td>
+                <td><p>Compute the basis functions of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-basis~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-cmp_xg~2'>cmp_Xg</a></strong></td>
-                <td><p>Compute geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-cmp_xg~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-cmp_xg~3'>cmp_Xg</a></strong></td>
+                <td><p>Compute geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-cmp_xg~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
@@ -3581,218 +3581,218 @@ <h4>Type-Bound Procedures</h4>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-cmp_degree~2'>cmp_degree</a></strong></td>
-                <td><p>Compute degree of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-cmp_degree~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-cmp_degree~3'>cmp_degree</a></strong></td>
+                <td><p>Compute degree of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-cmp_degree~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-cmp_elem~2'>cmp_elem</a></strong></td>
-                <td><p>Generate IGA element connectivity</p><a href="../type/nurbs_surface.html#boundprocedure-cmp_elem~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-cmp_elem~3'>cmp_elem</a></strong></td>
+                <td><p>Generate IGA element connectivity</p><a href="../type/nurbs_surface.html#boundprocedure-cmp_elem~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-cmp_elem_xc_vis~2'>cmp_elem_Xc_vis</a></strong></td>
-                <td><p>Generate connectivity for control points</p><a href="../type/nurbs_surface.html#boundprocedure-cmp_elem_xc_vis~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-cmp_elem_xc_vis~3'>cmp_elem_Xc_vis</a></strong></td>
+                <td><p>Generate connectivity for control points</p><a href="../type/nurbs_surface.html#boundprocedure-cmp_elem_xc_vis~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-cmp_elem_xg_vis~2'>cmp_elem_Xg_vis</a></strong></td>
-                <td><p>Generate connectivity for geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-cmp_elem_xg_vis~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-cmp_elem_xg_vis~3'>cmp_elem_Xg_vis</a></strong></td>
+                <td><p>Generate connectivity for geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-cmp_elem_xg_vis~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-cmp_nc~2'>cmp_nc</a></strong></td>
-                <td><p>Compute number of required control points</p><a href="../type/nurbs_surface.html#boundprocedure-cmp_nc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-cmp_nc~3'>cmp_nc</a></strong></td>
+                <td><p>Compute number of required control points</p><a href="../type/nurbs_surface.html#boundprocedure-cmp_nc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-create~2'>create</a></strong></td>
-                <td><p>Generate geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-create~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-create~3'>create</a></strong></td>
+                <td><p>Generate geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-create~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-derivative~2'>derivative</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-derivative_vector~2'>derivative_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-derivative_scalar~2'>derivative_scalar</a></td>
-                <td><p>Compute the derivative of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-derivative~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-derivative~3'>derivative</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-derivative_vector~3'>derivative_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-derivative_scalar~3'>derivative_scalar</a></td>
+                <td><p>Compute the derivative of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-derivative~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-derivative2~2'>derivative2</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-derivative2_vector~2'>derivative2_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-derivative2_scalar~2'>derivative2_scalar</a></td>
-                <td><p>Compute the second derivative of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-derivative2~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-derivative2~3'>derivative2</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-derivative2_vector~3'>derivative2_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-derivative2_scalar~3'>derivative2_scalar</a></td>
+                <td><p>Compute the second derivative of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-derivative2~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-elevate_degree~2'>elevate_degree</a></strong></td>
-                <td><p>Elevate degree</p><a href="../type/nurbs_surface.html#boundprocedure-elevate_degree~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-elevate_degree~3'>elevate_degree</a></strong></td>
+                <td><p>Elevate degree</p><a href="../type/nurbs_surface.html#boundprocedure-elevate_degree~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-export_xc~2'>export_Xc</a></strong></td>
-                <td><p>Export control points to VTK file</p><a href="../type/nurbs_surface.html#boundprocedure-export_xc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-export_xc~3'>export_Xc</a></strong></td>
+                <td><p>Export control points to VTK file</p><a href="../type/nurbs_surface.html#boundprocedure-export_xc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-export_xg~2'>export_Xg</a></strong></td>
-                <td><p>Export geometry points to VTK file</p><a href="../type/nurbs_surface.html#boundprocedure-export_xg~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-export_xg~3'>export_Xg</a></strong></td>
+                <td><p>Export geometry points to VTK file</p><a href="../type/nurbs_surface.html#boundprocedure-export_xg~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-finalize~2'>finalize</a></strong></td>
-                <td><p>Finalize the NURBS surface object</p><a href="../type/nurbs_surface.html#boundprocedure-finalize~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-finalize~3'>finalize</a></strong></td>
+                <td><p>Finalize the NURBS surface object</p><a href="../type/nurbs_surface.html#boundprocedure-finalize~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_wc~2'>get_Wc</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_wc_all~2'>get_Wc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_wci~2'>get_Wci</a></td>
-                <td><p>Get weights</p><a href="../type/nurbs_surface.html#boundprocedure-get_wc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_wc~3'>get_Wc</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_wc_all~3'>get_Wc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_wci~3'>get_Wci</a></td>
+                <td><p>Get weights</p><a href="../type/nurbs_surface.html#boundprocedure-get_wc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xc~2'>get_Xc</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xc_all~2'>get_Xc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xci~2'>get_Xci</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xcid~2'>get_Xcid</a></td>
-                <td><p>Get control points</p><a href="../type/nurbs_surface.html#boundprocedure-get_xc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xc~3'>get_Xc</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xc_all~3'>get_Xc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xci~3'>get_Xci</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xcid~3'>get_Xcid</a></td>
+                <td><p>Get control points</p><a href="../type/nurbs_surface.html#boundprocedure-get_xc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xg~2'>get_Xg</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xg_all~2'>get_Xg_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xgi~2'>get_Xgi</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xgid~2'>get_Xgid</a></td>
-                <td><p>Get geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-get_xg~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xg~3'>get_Xg</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xg_all~3'>get_Xg_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xgi~3'>get_Xgi</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xgid~3'>get_Xgid</a></td>
+                <td><p>Get geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-get_xg~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xt~2'>get_Xt</a></strong></td>
-                <td><p>Get parameter values</p><a href="../type/nurbs_surface.html#boundprocedure-get_xt~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xt~3'>get_Xt</a></strong></td>
+                <td><p>Get parameter values</p><a href="../type/nurbs_surface.html#boundprocedure-get_xt~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_continuity~2'>get_continuity</a></strong></td>
-                <td><p>Compute and return the continuity of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-get_continuity~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_continuity~3'>get_continuity</a></strong></td>
+                <td><p>Compute and return the continuity of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-get_continuity~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_degree~2'>get_degree</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_degree_all~2'>get_degree_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_degree_dir~2'>get_degree_dir</a></td>
-                <td><p>Get degree of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-get_degree~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_degree~3'>get_degree</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_degree_all~2'>get_degree_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_degree_dir~2'>get_degree_dir</a></td>
+                <td><p>Get degree of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-get_degree~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_elem~2'>get_elem</a></strong></td>
-                <td><p>Get IGA element connectivity</p><a href="../type/nurbs_surface.html#boundprocedure-get_elem~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_elem~3'>get_elem</a></strong></td>
+                <td><p>Get IGA element connectivity</p><a href="../type/nurbs_surface.html#boundprocedure-get_elem~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_elem_xc_vis~2'>get_elem_Xc_vis</a></strong></td>
-                <td><p>Get connectivity for control points</p><a href="../type/nurbs_surface.html#boundprocedure-get_elem_xc_vis~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_elem_xc_vis~3'>get_elem_Xc_vis</a></strong></td>
+                <td><p>Get connectivity for control points</p><a href="../type/nurbs_surface.html#boundprocedure-get_elem_xc_vis~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_elem_xg_vis~2'>get_elem_Xg_vis</a></strong></td>
-                <td><p>Get connectivity for geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-get_elem_xg_vis~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_elem_xg_vis~3'>get_elem_Xg_vis</a></strong></td>
+                <td><p>Get connectivity for geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-get_elem_xg_vis~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_knot~2'>get_knot</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_knoti~2'>get_knoti</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_knot_all~2'>get_knot_all</a></td>
-                <td><p>Get knot vector</p><a href="../type/nurbs_surface.html#boundprocedure-get_knot~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_knot~3'>get_knot</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_knoti~3'>get_knoti</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_knot_all~3'>get_knot_all</a></td>
+                <td><p>Get knot vector</p><a href="../type/nurbs_surface.html#boundprocedure-get_knot~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_multiplicity~2'>get_multiplicity</a></strong></td>
-                <td><p>Compute and return the multiplicity of the knot vector</p><a href="../type/nurbs_surface.html#boundprocedure-get_multiplicity~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_multiplicity~3'>get_multiplicity</a></strong></td>
+                <td><p>Compute and return the multiplicity of the knot vector</p><a href="../type/nurbs_surface.html#boundprocedure-get_multiplicity~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_nc~2'>get_nc</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_nc_all~2'>get_nc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_nc_dir~2'>get_nc_dir</a></td>
-                <td><p>Get number of control points</p><a href="../type/nurbs_surface.html#boundprocedure-get_nc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_nc~3'>get_nc</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_nc_all~2'>get_nc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_nc_dir~2'>get_nc_dir</a></td>
+                <td><p>Get number of control points</p><a href="../type/nurbs_surface.html#boundprocedure-get_nc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_ng~2'>get_ng</a></strong></td>
-                <td><p>Get number of geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-get_ng~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_ng~3'>get_ng</a></strong></td>
+                <td><p>Get number of geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-get_ng~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-insert_knots~2'>insert_knots</a></strong></td>
-                <td><p>Insert knots into the knot vector</p><a href="../type/nurbs_surface.html#boundprocedure-insert_knots~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-insert_knots~3'>insert_knots</a></strong></td>
+                <td><p>Insert knots into the knot vector</p><a href="../type/nurbs_surface.html#boundprocedure-insert_knots~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-is_rational~2'>is_rational</a></strong></td>
-                <td><p>Check if the NURBS surface is rational</p><a href="../type/nurbs_surface.html#boundprocedure-is_rational~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-is_rational~3'>is_rational</a></strong></td>
+                <td><p>Check if the NURBS surface is rational</p><a href="../type/nurbs_surface.html#boundprocedure-is_rational~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-modify_wc~2'>modify_Wc</a></strong></td>
-                <td><p>Modify weights</p><a href="../type/nurbs_surface.html#boundprocedure-modify_wc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-modify_wc~3'>modify_Wc</a></strong></td>
+                <td><p>Modify weights</p><a href="../type/nurbs_surface.html#boundprocedure-modify_wc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-modify_xc~2'>modify_Xc</a></strong></td>
-                <td><p>Modify control points</p><a href="../type/nurbs_surface.html#boundprocedure-modify_xc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-modify_xc~3'>modify_Xc</a></strong></td>
+                <td><p>Modify control points</p><a href="../type/nurbs_surface.html#boundprocedure-modify_xc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-nearest_point~2'>nearest_point</a></strong></td>
-                <td><p>Find the nearest point on the NURBS surface (Approximation)</p><a href="../type/nurbs_surface.html#boundprocedure-nearest_point~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-nearest_point~3'>nearest_point</a></strong></td>
+                <td><p>Find the nearest point on the NURBS surface (Approximation)</p><a href="../type/nurbs_surface.html#boundprocedure-nearest_point~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-nearest_point2~2'>nearest_point2</a></strong></td>
-                <td><p>Find the nearest point on the NURBS surface (Minimization - Newton's method)</p><a href="../type/nurbs_surface.html#boundprocedure-nearest_point2~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-nearest_point2~3'>nearest_point2</a></strong></td>
+                <td><p>Find the nearest point on the NURBS surface (Minimization - Newton's method)</p><a href="../type/nurbs_surface.html#boundprocedure-nearest_point2~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-remove_knots~2'>remove_knots</a></strong></td>
-                <td><p>Remove knots from the knot vector</p><a href="../type/nurbs_surface.html#boundprocedure-remove_knots~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-remove_knots~3'>remove_knots</a></strong></td>
+                <td><p>Remove knots from the knot vector</p><a href="../type/nurbs_surface.html#boundprocedure-remove_knots~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-rotate_xc~2'>rotate_Xc</a></strong></td>
-                <td><p>Rotate control points</p><a href="../type/nurbs_surface.html#boundprocedure-rotate_xc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-rotate_xc~3'>rotate_Xc</a></strong></td>
+                <td><p>Rotate control points</p><a href="../type/nurbs_surface.html#boundprocedure-rotate_xc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-rotate_xg~2'>rotate_Xg</a></strong></td>
-                <td><p>Rotate geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-rotate_xg~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-rotate_xg~3'>rotate_Xg</a></strong></td>
+                <td><p>Rotate geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-rotate_xg~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-set~2'>set</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-set1~2'>set1</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-set2~2'>set2</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-set3~2'>set3</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-set4~2'>set4</a></td>
-                <td><p>Set NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-set~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-set~3'>set</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-set1~3'>set1</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-set2~3'>set2</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-set3~3'>set3</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-set4~3'>set4</a></td>
+                <td><p>Set NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-set~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-set1~2'>set1</a></strong></td>
-                <td><p>Set knot vectors, control points and weights for the NURBS surface object</p><a href="../type/nurbs_surface.html#boundprocedure-set1~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-set1~3'>set1</a></strong></td>
+                <td><p>Set knot vectors, control points and weights for the NURBS surface object</p><a href="../type/nurbs_surface.html#boundprocedure-set1~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-set2~2'>set2</a></strong></td>
-                <td><p>Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights</p><a href="../type/nurbs_surface.html#boundprocedure-set2~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-set2~3'>set2</a></strong></td>
+                <td><p>Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights</p><a href="../type/nurbs_surface.html#boundprocedure-set2~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-set3~2'>set3</a></strong></td>
-                <td><p>Set Bezier or Rational Bezier surface using control points and weights</p><a href="../type/nurbs_surface.html#boundprocedure-set3~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-set3~3'>set3</a></strong></td>
+                <td><p>Set Bezier or Rational Bezier surface using control points and weights</p><a href="../type/nurbs_surface.html#boundprocedure-set3~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-set4~2'>set4</a></strong></td>
-                <td><p>Set NURBS surface using degree, number of control points, control points and weights</p><a href="../type/nurbs_surface.html#boundprocedure-set4~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-set4~3'>set4</a></strong></td>
+                <td><p>Set NURBS surface using degree, number of control points, control points and weights</p><a href="../type/nurbs_surface.html#boundprocedure-set4~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-set_c~2'>set_C</a></strong></td>
-                <td><p>Set a C-shape</p><a href="../type/nurbs_surface.html#boundprocedure-set_c~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-set_c~3'>set_C</a></strong></td>
+                <td><p>Set a C-shape</p><a href="../type/nurbs_surface.html#boundprocedure-set_c~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-set_elem~2'>set_elem</a></strong></td>
-                <td><p>Set IGA element connectivity</p><a href="../type/nurbs_surface.html#boundprocedure-set_elem~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-set_elem~3'>set_elem</a></strong></td>
+                <td><p>Set IGA element connectivity</p><a href="../type/nurbs_surface.html#boundprocedure-set_elem~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-set_elem_xc_vis~2'>set_elem_Xc_vis</a></strong></td>
-                <td><p>Set connectivity for control points</p><a href="../type/nurbs_surface.html#boundprocedure-set_elem_xc_vis~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-set_elem_xc_vis~3'>set_elem_Xc_vis</a></strong></td>
+                <td><p>Set connectivity for control points</p><a href="../type/nurbs_surface.html#boundprocedure-set_elem_xc_vis~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-set_elem_xg_vis~2'>set_elem_Xg_vis</a></strong></td>
-                <td><p>Set connectivity for geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-set_elem_xg_vis~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-set_elem_xg_vis~3'>set_elem_Xg_vis</a></strong></td>
+                <td><p>Set connectivity for geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-set_elem_xg_vis~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
@@ -3811,88 +3811,88 @@ <h4>Type-Bound Procedures</h4>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-show~2'>show</a></strong></td>
-                <td><p>Show the NURBS object using PyVista</p><a href="../type/nurbs_surface.html#boundprocedure-show~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-show~3'>show</a></strong></td>
+                <td><p>Show the NURBS object using PyVista</p><a href="../type/nurbs_surface.html#boundprocedure-show~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-translate_xc~2'>translate_Xc</a></strong></td>
-                <td><p>Translate control points</p><a href="../type/nurbs_surface.html#boundprocedure-translate_xc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-translate_xc~3'>translate_Xc</a></strong></td>
+                <td><p>Translate control points</p><a href="../type/nurbs_surface.html#boundprocedure-translate_xc~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-translate_xg~2'>translate_Xg</a></strong></td>
-                <td><p>Translate geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-translate_xg~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-translate_xg~3'>translate_Xg</a></strong></td>
+                <td><p>Translate geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-translate_xg~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-basis_scalar~2'>basis_scalar</a></strong></td>
-                <td><p>Compute the basis functions of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-basis_scalar~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-basis_scalar~3'>basis_scalar</a></strong></td>
+                <td><p>Compute the basis functions of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-basis_scalar~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-basis_vector~2'>basis_vector</a></strong></td>
-                <td><p>Compute the basis functions of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-basis_vector~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-basis_vector~3'>basis_vector</a></strong></td>
+                <td><p>Compute the basis functions of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-basis_vector~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-derivative2_scalar~2'>derivative2_scalar</a></strong></td>
-                <td><p>Compute the second derivative of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-derivative2_scalar~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-derivative2_scalar~3'>derivative2_scalar</a></strong></td>
+                <td><p>Compute the second derivative of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-derivative2_scalar~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-derivative2_vector~2'>derivative2_vector</a></strong></td>
-                <td><p>Compute the second derivative of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-derivative2_vector~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-derivative2_vector~3'>derivative2_vector</a></strong></td>
+                <td><p>Compute the second derivative of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-derivative2_vector~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-derivative_scalar~2'>derivative_scalar</a></strong></td>
-                <td><p>Compute the derivative of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-derivative_scalar~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-derivative_scalar~3'>derivative_scalar</a></strong></td>
+                <td><p>Compute the derivative of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-derivative_scalar~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-derivative_vector~2'>derivative_vector</a></strong></td>
-                <td><p>Compute the derivative of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-derivative_vector~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-derivative_vector~3'>derivative_vector</a></strong></td>
+                <td><p>Compute the derivative of the NURBS surface</p><a href="../type/nurbs_surface.html#boundprocedure-derivative_vector~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_wc_all~2'>get_Wc_all</a></strong></td>
-                <td><p>Get all weights</p><a href="../type/nurbs_surface.html#boundprocedure-get_wc_all~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_wc_all~3'>get_Wc_all</a></strong></td>
+                <td><p>Get all weights</p><a href="../type/nurbs_surface.html#boundprocedure-get_wc_all~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_wci~2'>get_Wci</a></strong></td>
-                <td><p>Get i-th weight</p><a href="../type/nurbs_surface.html#boundprocedure-get_wci~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_wci~3'>get_Wci</a></strong></td>
+                <td><p>Get i-th weight</p><a href="../type/nurbs_surface.html#boundprocedure-get_wci~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xc_all~2'>get_Xc_all</a></strong></td>
-                <td><p>Get all control points</p><a href="../type/nurbs_surface.html#boundprocedure-get_xc_all~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xc_all~3'>get_Xc_all</a></strong></td>
+                <td><p>Get all control points</p><a href="../type/nurbs_surface.html#boundprocedure-get_xc_all~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xci~2'>get_Xci</a></strong></td>
-                <td><p>Get i-th control point</p><a href="../type/nurbs_surface.html#boundprocedure-get_xci~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xci~3'>get_Xci</a></strong></td>
+                <td><p>Get i-th control point</p><a href="../type/nurbs_surface.html#boundprocedure-get_xci~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xcid~2'>get_Xcid</a></strong></td>
-                <td><p>Get i-th control point in a specific direction</p><a href="../type/nurbs_surface.html#boundprocedure-get_xcid~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xcid~3'>get_Xcid</a></strong></td>
+                <td><p>Get i-th control point in a specific direction</p><a href="../type/nurbs_surface.html#boundprocedure-get_xcid~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xg_all~2'>get_Xg_all</a></strong></td>
-                <td><p>Get all geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-get_xg_all~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xg_all~3'>get_Xg_all</a></strong></td>
+                <td><p>Get all geometry points</p><a href="../type/nurbs_surface.html#boundprocedure-get_xg_all~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xgi~2'>get_Xgi</a></strong></td>
-                <td><p>Get i-th geometry point</p><a href="../type/nurbs_surface.html#boundprocedure-get_xgi~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xgi~3'>get_Xgi</a></strong></td>
+                <td><p>Get i-th geometry point</p><a href="../type/nurbs_surface.html#boundprocedure-get_xgi~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xgid~2'>get_Xgid</a></strong></td>
-                <td><p>Get i-th geometry point in a specific direction</p><a href="../type/nurbs_surface.html#boundprocedure-get_xgid~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_xgid~3'>get_Xgid</a></strong></td>
+                <td><p>Get i-th geometry point in a specific direction</p><a href="../type/nurbs_surface.html#boundprocedure-get_xgid~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
@@ -3906,13 +3906,13 @@ <h4>Type-Bound Procedures</h4>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_knot_all~2'>get_knot_all</a></strong></td>
-                <td><p>Get all knot vectors</p><a href="../type/nurbs_surface.html#boundprocedure-get_knot_all~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_knot_all~3'>get_knot_all</a></strong></td>
+                <td><p>Get all knot vectors</p><a href="../type/nurbs_surface.html#boundprocedure-get_knot_all~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_knoti~2'>get_knoti</a></strong></td>
-                <td><p>Get i-th knot value</p><a href="../type/nurbs_surface.html#boundprocedure-get_knoti~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_surface.html#boundprocedure-get_knoti~3'>get_knoti</a></strong></td>
+                <td><p>Get i-th knot value</p><a href="../type/nurbs_surface.html#boundprocedure-get_knoti~3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
@@ -3935,7 +3935,7 @@ <h4>Type-Bound Procedures</h4>
         <section>
           <h2>Functions</h2>
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_xg~2"></span> <h3>private pure function <a href='../proc/cmp_xg~2.html'>cmp_Xg</a>(this, Xt) result(Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_xg~3"></span> <h3>private pure function <a href='../proc/cmp_xg~3.html'>cmp_Xg</a>(this, Xt) result(Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -3958,7 +3958,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~74"></span>
+              <span class="anchor" id="variable-this~135"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -3973,7 +3973,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~31"></span>
+              <span class="anchor" id="variable-xt~64"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -3999,7 +3999,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem~2"></span> <h3>private pure function <a href='../proc/cmp_elem~2.html'>cmp_elem</a>(this) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem~3"></span> <h3>private pure function <a href='../proc/cmp_elem~3.html'>cmp_elem</a>(this) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4022,7 +4022,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~119"></span>
+              <span class="anchor" id="variable-this~180"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -4048,7 +4048,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem_xc_vis~2"></span> <h3>private pure function <a href='../proc/cmp_elem_xc_vis~2.html'>cmp_elem_Xc_vis</a>(this, p) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem_xc_vis~3"></span> <h3>private pure function <a href='../proc/cmp_elem_xc_vis~3.html'>cmp_elem_Xc_vis</a>(this, p) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4071,7 +4071,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~91"></span>
+              <span class="anchor" id="variable-this~152"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -4086,7 +4086,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-p~3"></span>
+              <span class="anchor" id="variable-p~13"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -4112,7 +4112,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem_xg_vis~2"></span> <h3>private pure function <a href='../proc/cmp_elem_xg_vis~2.html'>cmp_elem_Xg_vis</a>(this, p) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem_xg_vis~3"></span> <h3>private pure function <a href='../proc/cmp_elem_xg_vis~3.html'>cmp_elem_Xg_vis</a>(this, p) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4135,7 +4135,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~92"></span>
+              <span class="anchor" id="variable-this~153"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -4150,7 +4150,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-p~4"></span>
+              <span class="anchor" id="variable-p~14"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -4176,7 +4176,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_wc_all~2"></span> <h3>private pure function <a href='../proc/get_wc_all~2.html'>get_Wc_all</a>(this) result(Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_wc_all~3"></span> <h3>private pure function <a href='../proc/get_wc_all~3.html'>get_Wc_all</a>(this) result(Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4199,7 +4199,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~81"></span>
+              <span class="anchor" id="variable-this~142"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -4225,7 +4225,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_wci~2"></span> <h3>private pure function <a href='../proc/get_wci~2.html'>get_Wci</a>(this, n) result(Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_wci~3"></span> <h3>private pure function <a href='../proc/get_wci~3.html'>get_Wci</a>(this, n) result(Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4248,7 +4248,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~82"></span>
+              <span class="anchor" id="variable-this~143"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -4263,7 +4263,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~13"></span>
+              <span class="anchor" id="variable-n~27"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4289,7 +4289,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xc_all~2"></span> <h3>private pure function <a href='../proc/get_xc_all~2.html'>get_Xc_all</a>(this) result(Xc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xc_all~3"></span> <h3>private pure function <a href='../proc/get_xc_all~3.html'>get_Xc_all</a>(this) result(Xc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4312,7 +4312,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~75"></span>
+              <span class="anchor" id="variable-this~136"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -4338,7 +4338,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xci~2"></span> <h3>private pure function <a href='../proc/get_xci~2.html'>get_Xci</a>(this, n) result(Xc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xci~3"></span> <h3>private pure function <a href='../proc/get_xci~3.html'>get_Xci</a>(this, n) result(Xc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4361,7 +4361,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~76"></span>
+              <span class="anchor" id="variable-this~137"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -4376,7 +4376,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~9"></span>
+              <span class="anchor" id="variable-n~23"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4402,7 +4402,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xcid~2"></span> <h3>private pure function <a href='../proc/get_xcid~2.html'>get_Xcid</a>(this, n, dir) result(Xc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xcid~3"></span> <h3>private pure function <a href='../proc/get_xcid~3.html'>get_Xcid</a>(this, n, dir) result(Xc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4425,7 +4425,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~77"></span>
+              <span class="anchor" id="variable-this~138"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -4440,7 +4440,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~10"></span>
+              <span class="anchor" id="variable-n~24"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4455,7 +4455,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~16"></span>
+              <span class="anchor" id="variable-dir~19"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4481,7 +4481,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xg_all~2"></span> <h3>private pure function <a href='../proc/get_xg_all~2.html'>get_Xg_all</a>(this) result(Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xg_all~3"></span> <h3>private pure function <a href='../proc/get_xg_all~3.html'>get_Xg_all</a>(this) result(Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4504,7 +4504,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~78"></span>
+              <span class="anchor" id="variable-this~139"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -4530,7 +4530,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xgi~2"></span> <h3>private pure function <a href='../proc/get_xgi~2.html'>get_Xgi</a>(this, n) result(Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xgi~3"></span> <h3>private pure function <a href='../proc/get_xgi~3.html'>get_Xgi</a>(this, n) result(Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4553,7 +4553,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~79"></span>
+              <span class="anchor" id="variable-this~140"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -4568,7 +4568,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~11"></span>
+              <span class="anchor" id="variable-n~25"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4594,7 +4594,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xgid~2"></span> <h3>private pure function <a href='../proc/get_xgid~2.html'>get_Xgid</a>(this, n, dir) result(Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xgid~3"></span> <h3>private pure function <a href='../proc/get_xgid~3.html'>get_Xgid</a>(this, n, dir) result(Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4617,7 +4617,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~80"></span>
+              <span class="anchor" id="variable-this~141"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -4632,7 +4632,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~12"></span>
+              <span class="anchor" id="variable-n~26"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4647,7 +4647,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~17"></span>
+              <span class="anchor" id="variable-dir~20"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4673,7 +4673,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xt~2"></span> <h3>private pure function <a href='../proc/get_xt~2.html'>get_Xt</a>(this, dir) result(Xt)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xt~3"></span> <h3>private pure function <a href='../proc/get_xt~3.html'>get_Xt</a>(this, dir) result(Xt)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4696,7 +4696,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~83"></span>
+              <span class="anchor" id="variable-this~144"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -4711,7 +4711,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~18"></span>
+              <span class="anchor" id="variable-dir~21"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4737,7 +4737,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_continuity~2"></span> <h3>private pure function <a href='../proc/get_continuity~2.html'>get_continuity</a>(this, dir) result(c)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_continuity~3"></span> <h3>private pure function <a href='../proc/get_continuity~3.html'>get_continuity</a>(this, dir) result(c)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4760,7 +4760,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~98"></span>
+              <span class="anchor" id="variable-this~159"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -4775,7 +4775,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~25"></span>
+              <span class="anchor" id="variable-dir~28"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4824,7 +4824,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~86"></span>
+              <span class="anchor" id="variable-this~147"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -4873,7 +4873,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~87"></span>
+              <span class="anchor" id="variable-this~148"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -4888,7 +4888,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~20"></span>
+              <span class="anchor" id="variable-dir~23"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4914,7 +4914,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_elem~2"></span> <h3>private pure function <a href='../proc/get_elem~2.html'>get_elem</a>(this) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_elem~3"></span> <h3>private pure function <a href='../proc/get_elem~3.html'>get_elem</a>(this) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4937,7 +4937,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~116"></span>
+              <span class="anchor" id="variable-this~177"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -4963,7 +4963,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_elem_xc_vis~2"></span> <h3>private pure function <a href='../proc/get_elem_xc_vis~2.html'>get_elem_Xc_vis</a>(this) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_elem_xc_vis~3"></span> <h3>private pure function <a href='../proc/get_elem_xc_vis~3.html'>get_elem_Xc_vis</a>(this) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4986,7 +4986,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~114"></span>
+              <span class="anchor" id="variable-this~175"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -5012,7 +5012,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_elem_xg_vis~2"></span> <h3>private pure function <a href='../proc/get_elem_xg_vis~2.html'>get_elem_Xg_vis</a>(this) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_elem_xg_vis~3"></span> <h3>private pure function <a href='../proc/get_elem_xg_vis~3.html'>get_elem_Xg_vis</a>(this) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5035,7 +5035,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~115"></span>
+              <span class="anchor" id="variable-this~176"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -5061,7 +5061,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_knot_all~2"></span> <h3>private pure function <a href='../proc/get_knot_all~2.html'>get_knot_all</a>(this, dir) result(knot)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_knot_all~3"></span> <h3>private pure function <a href='../proc/get_knot_all~3.html'>get_knot_all</a>(this, dir) result(knot)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5084,7 +5084,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~88"></span>
+              <span class="anchor" id="variable-this~149"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -5099,7 +5099,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~21"></span>
+              <span class="anchor" id="variable-dir~24"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5125,7 +5125,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_knoti~2"></span> <h3>private pure function <a href='../proc/get_knoti~2.html'>get_knoti</a>(this, dir, i) result(knot)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_knoti~3"></span> <h3>private pure function <a href='../proc/get_knoti~3.html'>get_knoti</a>(this, dir, i) result(knot)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5148,7 +5148,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~89"></span>
+              <span class="anchor" id="variable-this~150"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -5163,7 +5163,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~22"></span>
+              <span class="anchor" id="variable-dir~25"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5178,7 +5178,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-i~34"></span>
+              <span class="anchor" id="variable-i~86"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5204,7 +5204,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_multiplicity~2"></span> <h3>private pure function <a href='../proc/get_multiplicity~2.html'>get_multiplicity</a>(this, dir) result(m)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_multiplicity~3"></span> <h3>private pure function <a href='../proc/get_multiplicity~3.html'>get_multiplicity</a>(this, dir) result(m)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5227,7 +5227,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~97"></span>
+              <span class="anchor" id="variable-this~158"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -5242,7 +5242,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~24"></span>
+              <span class="anchor" id="variable-dir~27"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5291,7 +5291,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~100"></span>
+              <span class="anchor" id="variable-this~161"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -5340,7 +5340,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~101"></span>
+              <span class="anchor" id="variable-this~162"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -5355,7 +5355,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~27"></span>
+              <span class="anchor" id="variable-dir~30"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5381,7 +5381,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_ng~2"></span> <h3>private pure function <a href='../proc/get_ng~2.html'>get_ng</a>(this) result(ng)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_ng~3"></span> <h3>private pure function <a href='../proc/get_ng~3.html'>get_ng</a>(this) result(ng)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5404,7 +5404,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~84"></span>
+              <span class="anchor" id="variable-this~145"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -5430,7 +5430,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-is_rational~2"></span> <h3>private pure function <a href='../proc/is_rational~2.html'>is_rational</a>(this) result(r)  
+    <div class="card-header codesum"><span class="anchor" id="proc-is_rational~3"></span> <h3>private pure function <a href='../proc/is_rational~3.html'>is_rational</a>(this) result(r)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5453,7 +5453,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~110"></span>
+              <span class="anchor" id="variable-this~171"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -5484,7 +5484,7 @@ <h4>
         <section>
           <h2>Subroutines</h2>
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-ansatz~2"></span> <h3>private pure subroutine <a href='../proc/ansatz~2.html'>ansatz</a>(this, ie, ig, Tgc, dTgc_dXg, dA)  
+    <div class="card-header codesum"><span class="anchor" id="proc-ansatz~3"></span> <h3>private pure subroutine <a href='../proc/ansatz~3.html'>ansatz</a>(this, ie, ig, Tgc, dTgc_dXg, dA)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5507,7 +5507,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~130"></span>
+              <span class="anchor" id="variable-this~191"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -5522,7 +5522,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ie~3"></span>
+              <span class="anchor" id="variable-ie~5"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5537,7 +5537,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ig~3"></span>
+              <span class="anchor" id="variable-ig~5"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5552,7 +5552,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~32"></span>
+              <span class="anchor" id="variable-tgc~55"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5567,7 +5567,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc_dxg~3"></span>
+              <span class="anchor" id="variable-dtgc_dxg~5"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5603,7 +5603,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-basis_scalar~2"></span> <h3>private pure subroutine <a href='../proc/basis_scalar~2.html'>basis_scalar</a>(this, Xt, Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-basis_scalar~3"></span> <h3>private pure subroutine <a href='../proc/basis_scalar~3.html'>basis_scalar</a>(this, Xt, Tgc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5626,7 +5626,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~107"></span>
+              <span class="anchor" id="variable-this~168"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -5641,7 +5641,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~38"></span>
+              <span class="anchor" id="variable-xt~71"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -5656,7 +5656,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~30"></span>
+              <span class="anchor" id="variable-tgc~53"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5677,7 +5677,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-basis_vector~2"></span> <h3>private pure subroutine <a href='../proc/basis_vector~2.html'>basis_vector</a>(this, res1, res2, Xt1, Xt2, Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-basis_vector~3"></span> <h3>private pure subroutine <a href='../proc/basis_vector~3.html'>basis_vector</a>(this, res1, res2, Xt1, Xt2, Tgc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5700,7 +5700,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~106"></span>
+              <span class="anchor" id="variable-this~167"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -5715,7 +5715,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1~9"></span>
+              <span class="anchor" id="variable-res1~10"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -5730,7 +5730,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2~9"></span>
+              <span class="anchor" id="variable-res2~10"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -5775,7 +5775,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~29"></span>
+              <span class="anchor" id="variable-tgc~52"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5819,7 +5819,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~131"></span>
+              <span class="anchor" id="variable-this~192"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -5855,7 +5855,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_degree~2"></span> <h3>private pure subroutine <a href='../proc/cmp_degree~2.html'>cmp_degree</a>(this, dir)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_degree~3"></span> <h3>private pure subroutine <a href='../proc/cmp_degree~3.html'>cmp_degree</a>(this, dir)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5878,7 +5878,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~85"></span>
+              <span class="anchor" id="variable-this~146"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -5893,7 +5893,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~19"></span>
+              <span class="anchor" id="variable-dir~22"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -5914,7 +5914,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_nc~2"></span> <h3>private pure subroutine <a href='../proc/cmp_nc~2.html'>cmp_nc</a>(this, dir)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_nc~3"></span> <h3>private pure subroutine <a href='../proc/cmp_nc~3.html'>cmp_nc</a>(this, dir)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5937,7 +5937,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~99"></span>
+              <span class="anchor" id="variable-this~160"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -5952,7 +5952,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~26"></span>
+              <span class="anchor" id="variable-dir~29"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -5973,7 +5973,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-create~2"></span> <h3>private pure subroutine <a href='../proc/create~2.html'>create</a>(this, res1, res2, Xt1, Xt2, Xt)  
+    <div class="card-header codesum"><span class="anchor" id="proc-create~3"></span> <h3>private pure subroutine <a href='../proc/create~3.html'>create</a>(this, res1, res2, Xt1, Xt2, Xt)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5996,7 +5996,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~73"></span>
+              <span class="anchor" id="variable-this~134"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -6011,7 +6011,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1~6"></span>
+              <span class="anchor" id="variable-res1~7"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6026,7 +6026,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2~6"></span>
+              <span class="anchor" id="variable-res2~7"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6071,7 +6071,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~30"></span>
+              <span class="anchor" id="variable-xt~63"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -6092,7 +6092,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-derivative2_scalar~2"></span> <h3>private pure subroutine <a href='../proc/derivative2_scalar~2.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-derivative2_scalar~3"></span> <h3>private pure subroutine <a href='../proc/derivative2_scalar~3.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6115,7 +6115,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~105"></span>
+              <span class="anchor" id="variable-this~166"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -6130,7 +6130,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~36"></span>
+              <span class="anchor" id="variable-xt~69"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -6145,7 +6145,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc~9"></span>
+              <span class="anchor" id="variable-d2tgc~16"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6160,7 +6160,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~17"></span>
+              <span class="anchor" id="variable-dtgc~30"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6175,7 +6175,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~28"></span>
+              <span class="anchor" id="variable-tgc~51"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6196,7 +6196,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-derivative2_vector~2"></span> <h3>private pure subroutine <a href='../proc/derivative2_vector~2.html'>derivative2_vector</a>(this, res1, res2, Xt1, Xt2, d2Tgc, dTgc, Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-derivative2_vector~3"></span> <h3>private pure subroutine <a href='../proc/derivative2_vector~3.html'>derivative2_vector</a>(this, res1, res2, Xt1, Xt2, d2Tgc, dTgc, Tgc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6219,7 +6219,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~104"></span>
+              <span class="anchor" id="variable-this~165"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -6234,7 +6234,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1~8"></span>
+              <span class="anchor" id="variable-res1~9"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6249,7 +6249,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2~8"></span>
+              <span class="anchor" id="variable-res2~9"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6294,7 +6294,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc~8"></span>
+              <span class="anchor" id="variable-d2tgc~15"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6309,7 +6309,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~16"></span>
+              <span class="anchor" id="variable-dtgc~29"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6324,7 +6324,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~27"></span>
+              <span class="anchor" id="variable-tgc~50"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6345,7 +6345,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-derivative_scalar~2"></span> <h3>private pure subroutine <a href='../proc/derivative_scalar~2.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
+    <div class="card-header codesum"><span class="anchor" id="proc-derivative_scalar~3"></span> <h3>private pure subroutine <a href='../proc/derivative_scalar~3.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6368,7 +6368,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~103"></span>
+              <span class="anchor" id="variable-this~164"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -6383,7 +6383,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~34"></span>
+              <span class="anchor" id="variable-xt~67"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -6398,7 +6398,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~15"></span>
+              <span class="anchor" id="variable-dtgc~28"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6413,7 +6413,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~26"></span>
+              <span class="anchor" id="variable-tgc~49"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6428,7 +6428,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~10"></span>
+              <span class="anchor" id="variable-elem~13"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6449,7 +6449,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-derivative_vector~2"></span> <h3>private pure subroutine <a href='../proc/derivative_vector~2.html'>derivative_vector</a>(this, res1, res2, Xt1, Xt2, dTgc, Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-derivative_vector~3"></span> <h3>private pure subroutine <a href='../proc/derivative_vector~3.html'>derivative_vector</a>(this, res1, res2, Xt1, Xt2, dTgc, Tgc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6472,7 +6472,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~102"></span>
+              <span class="anchor" id="variable-this~163"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -6487,7 +6487,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1~7"></span>
+              <span class="anchor" id="variable-res1~8"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6502,7 +6502,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2~7"></span>
+              <span class="anchor" id="variable-res2~8"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6547,7 +6547,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~14"></span>
+              <span class="anchor" id="variable-dtgc~27"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6562,7 +6562,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~25"></span>
+              <span class="anchor" id="variable-tgc~48"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6583,7 +6583,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-elevate_degree~2"></span> <h3>private pure subroutine <a href='../proc/elevate_degree~2.html'>elevate_degree</a>(this, dir, t)  
+    <div class="card-header codesum"><span class="anchor" id="proc-elevate_degree~3"></span> <h3>private pure subroutine <a href='../proc/elevate_degree~3.html'>elevate_degree</a>(this, dir, t)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6606,7 +6606,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~109"></span>
+              <span class="anchor" id="variable-this~170"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -6621,7 +6621,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~29"></span>
+              <span class="anchor" id="variable-dir~32"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -6636,7 +6636,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-t~4"></span>
+              <span class="anchor" id="variable-t~10"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -6657,7 +6657,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-export_xc~2"></span> <h3>private impure subroutine <a href='../proc/export_xc~2.html'>export_Xc</a>(this, filename)  
+    <div class="card-header codesum"><span class="anchor" id="proc-export_xc~3"></span> <h3>private impure subroutine <a href='../proc/export_xc~3.html'>export_Xc</a>(this, filename)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6680,7 +6680,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~93"></span>
+              <span class="anchor" id="variable-this~154"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -6695,7 +6695,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-filename~3"></span>
+              <span class="anchor" id="variable-filename~5"></span>
               character(len=*),
             </td>
 <td>intent(in)</td>
@@ -6716,7 +6716,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-export_xg~2"></span> <h3>private impure subroutine <a href='../proc/export_xg~2.html'>export_Xg</a>(this, filename)  
+    <div class="card-header codesum"><span class="anchor" id="proc-export_xg~3"></span> <h3>private impure subroutine <a href='../proc/export_xg~3.html'>export_Xg</a>(this, filename)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6739,7 +6739,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~94"></span>
+              <span class="anchor" id="variable-this~155"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -6754,7 +6754,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-filename~4"></span>
+              <span class="anchor" id="variable-filename~6"></span>
               character(len=*),
             </td>
 <td>intent(in)</td>
@@ -6775,7 +6775,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-finalize~2"></span> <h3>private pure subroutine <a href='../proc/finalize~2.html'>finalize</a>(this)  
+    <div class="card-header codesum"><span class="anchor" id="proc-finalize~3"></span> <h3>private pure subroutine <a href='../proc/finalize~3.html'>finalize</a>(this)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6798,7 +6798,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~90"></span>
+              <span class="anchor" id="variable-this~151"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -6819,7 +6819,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-insert_knots~2"></span> <h3>private pure subroutine <a href='../proc/insert_knots~2.html'>insert_knots</a>(this, dir, Xth, r)  
+    <div class="card-header codesum"><span class="anchor" id="proc-insert_knots~3"></span> <h3>private pure subroutine <a href='../proc/insert_knots~3.html'>insert_knots</a>(this, dir, Xth, r)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6842,7 +6842,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~108"></span>
+              <span class="anchor" id="variable-this~169"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -6857,7 +6857,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~28"></span>
+              <span class="anchor" id="variable-dir~31"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -6872,7 +6872,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth~4"></span>
+              <span class="anchor" id="variable-xth~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -6887,7 +6887,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-r~4"></span>
+              <span class="anchor" id="variable-r~10"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6908,7 +6908,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-modify_wc~2"></span> <h3>private pure subroutine <a href='../proc/modify_wc~2.html'>modify_Wc</a>(this, W, num)  
+    <div class="card-header codesum"><span class="anchor" id="proc-modify_wc~3"></span> <h3>private pure subroutine <a href='../proc/modify_wc~3.html'>modify_Wc</a>(this, W, num)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6931,7 +6931,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~96"></span>
+              <span class="anchor" id="variable-this~157"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -6946,7 +6946,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-w~2"></span>
+              <span class="anchor" id="variable-w~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -6961,7 +6961,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-num~4"></span>
+              <span class="anchor" id="variable-num~7"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -6982,7 +6982,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-modify_xc~2"></span> <h3>private pure subroutine <a href='../proc/modify_xc~2.html'>modify_Xc</a>(this, X, num, dir)  
+    <div class="card-header codesum"><span class="anchor" id="proc-modify_xc~3"></span> <h3>private pure subroutine <a href='../proc/modify_xc~3.html'>modify_Xc</a>(this, X, num, dir)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7005,7 +7005,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~95"></span>
+              <span class="anchor" id="variable-this~156"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -7020,7 +7020,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-x~4"></span>
+              <span class="anchor" id="variable-x~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -7035,7 +7035,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-num~3"></span>
+              <span class="anchor" id="variable-num~6"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -7050,7 +7050,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~23"></span>
+              <span class="anchor" id="variable-dir~26"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -7071,7 +7071,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-nearest_point~2"></span> <h3>private pure subroutine <a href='../proc/nearest_point~2.html'>nearest_point</a>(this, point_Xg, nearest_Xg, nearest_Xt, id)  
+    <div class="card-header codesum"><span class="anchor" id="proc-nearest_point~3"></span> <h3>private pure subroutine <a href='../proc/nearest_point~3.html'>nearest_point</a>(this, point_Xg, nearest_Xg, nearest_Xt, id)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7094,7 +7094,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~128"></span>
+              <span class="anchor" id="variable-this~189"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -7109,7 +7109,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-point_xg~4"></span>
+              <span class="anchor" id="variable-point_xg~7"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -7124,7 +7124,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xg~6"></span>
+              <span class="anchor" id="variable-nearest_xg~8"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -7139,7 +7139,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xt~6"></span>
+              <span class="anchor" id="variable-nearest_xt~8"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -7154,7 +7154,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-id~5"></span>
+              <span class="anchor" id="variable-id~6"></span>
               integer,
             </td>
 <td>intent(out),</td>
@@ -7175,7 +7175,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-nearest_point2~2"></span> <h3>private impure subroutine <a href='../proc/nearest_point2~2.html'>nearest_point2</a>(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-nearest_point2~3"></span> <h3>private impure subroutine <a href='../proc/nearest_point2~3.html'>nearest_point2</a>(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7198,7 +7198,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~129"></span>
+              <span class="anchor" id="variable-this~190"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -7213,7 +7213,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-point_xg~5"></span>
+              <span class="anchor" id="variable-point_xg~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -7228,7 +7228,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tol~2"></span>
+              <span class="anchor" id="variable-tol~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -7243,7 +7243,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-maxit~2"></span>
+              <span class="anchor" id="variable-maxit~3"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -7258,7 +7258,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xt~7"></span>
+              <span class="anchor" id="variable-nearest_xt~9"></span>
               real(kind=rk),
             </td>
 <td>intent(out)</td>
@@ -7273,7 +7273,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xg~7"></span>
+              <span class="anchor" id="variable-nearest_xg~9"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -7294,7 +7294,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-remove_knots~2"></span> <h3>private pure subroutine <a href='../proc/remove_knots~2.html'>remove_knots</a>(this, dir, Xth, r)  
+    <div class="card-header codesum"><span class="anchor" id="proc-remove_knots~3"></span> <h3>private pure subroutine <a href='../proc/remove_knots~3.html'>remove_knots</a>(this, dir, Xth, r)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7317,7 +7317,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~117"></span>
+              <span class="anchor" id="variable-this~178"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -7332,7 +7332,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~30"></span>
+              <span class="anchor" id="variable-dir~33"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -7347,7 +7347,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth~5"></span>
+              <span class="anchor" id="variable-xth~11"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7362,7 +7362,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-r~6"></span>
+              <span class="anchor" id="variable-r~12"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -7383,7 +7383,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-rotate_xc~2"></span> <h3>private pure subroutine <a href='../proc/rotate_xc~2.html'>rotate_Xc</a>(this, alpha, beta, theta)  
+    <div class="card-header codesum"><span class="anchor" id="proc-rotate_xc~3"></span> <h3>private pure subroutine <a href='../proc/rotate_xc~3.html'>rotate_Xc</a>(this, alpha, beta, theta)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7406,7 +7406,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~120"></span>
+              <span class="anchor" id="variable-this~181"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -7421,7 +7421,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-alpha~3"></span>
+              <span class="anchor" id="variable-alpha~7"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -7436,7 +7436,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-beta~4"></span>
+              <span class="anchor" id="variable-beta~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -7451,7 +7451,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-theta~4"></span>
+              <span class="anchor" id="variable-theta~7"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -7472,7 +7472,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-rotate_xg~2"></span> <h3>private pure subroutine <a href='../proc/rotate_xg~2.html'>rotate_Xg</a>(this, alpha, beta, theta)  
+    <div class="card-header codesum"><span class="anchor" id="proc-rotate_xg~3"></span> <h3>private pure subroutine <a href='../proc/rotate_xg~3.html'>rotate_Xg</a>(this, alpha, beta, theta)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7495,7 +7495,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~121"></span>
+              <span class="anchor" id="variable-this~182"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -7510,7 +7510,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-alpha~4"></span>
+              <span class="anchor" id="variable-alpha~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -7525,7 +7525,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-beta~5"></span>
+              <span class="anchor" id="variable-beta~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -7540,7 +7540,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-theta~5"></span>
+              <span class="anchor" id="variable-theta~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -7561,7 +7561,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set1~2"></span> <h3>private pure subroutine <a href='../proc/set1~2.html'>set1</a>(this, knot1, knot2, Xc, Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set1~3"></span> <h3>private pure subroutine <a href='../proc/set1~3.html'>set1</a>(this, knot1, knot2, Xc, Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7584,7 +7584,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~69"></span>
+              <span class="anchor" id="variable-this~130"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -7599,7 +7599,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~24"></span>
+              <span class="anchor" id="variable-knot1~25"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7614,7 +7614,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~24"></span>
+              <span class="anchor" id="variable-knot2~25"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7629,7 +7629,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~28"></span>
+              <span class="anchor" id="variable-xc~46"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7644,7 +7644,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~27"></span>
+              <span class="anchor" id="variable-wc~47"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7665,7 +7665,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set2~2"></span> <h3>private pure subroutine <a href='../proc/set2~2.html'>set2</a>(this, Xth_dir1, Xth_dir2, degree, continuity1, continuity2, Xc, Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set2~3"></span> <h3>private pure subroutine <a href='../proc/set2~3.html'>set2</a>(this, Xth_dir1, Xth_dir2, degree, continuity1, continuity2, Xc, Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7688,7 +7688,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~70"></span>
+              <span class="anchor" id="variable-this~131"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -7733,7 +7733,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~24"></span>
+              <span class="anchor" id="variable-degree~54"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -7778,7 +7778,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~29"></span>
+              <span class="anchor" id="variable-xc~47"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7793,7 +7793,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~28"></span>
+              <span class="anchor" id="variable-wc~48"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7814,7 +7814,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set3~2"></span> <h3>private pure subroutine <a href='../proc/set3~2.html'>set3</a>(this, nc, Xc, Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set3~3"></span> <h3>private pure subroutine <a href='../proc/set3~3.html'>set3</a>(this, nc, Xc, Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7837,7 +7837,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~71"></span>
+              <span class="anchor" id="variable-this~132"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -7852,7 +7852,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~29"></span>
+              <span class="anchor" id="variable-nc~57"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -7867,7 +7867,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~30"></span>
+              <span class="anchor" id="variable-xc~48"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7882,7 +7882,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~29"></span>
+              <span class="anchor" id="variable-wc~49"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7903,7 +7903,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set4~2"></span> <h3>private pure subroutine <a href='../proc/set4~2.html'>set4</a>(this, degree, nc, Xc, Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set4~3"></span> <h3>private pure subroutine <a href='../proc/set4~3.html'>set4</a>(this, degree, nc, Xc, Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7926,7 +7926,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~72"></span>
+              <span class="anchor" id="variable-this~133"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -7941,7 +7941,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~25"></span>
+              <span class="anchor" id="variable-degree~55"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -7956,7 +7956,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~30"></span>
+              <span class="anchor" id="variable-nc~58"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -7971,7 +7971,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~31"></span>
+              <span class="anchor" id="variable-xc~49"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7986,7 +7986,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~30"></span>
+              <span class="anchor" id="variable-wc~50"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8007,7 +8007,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set_c~2"></span> <h3>private pure subroutine <a href='../proc/set_c~2.html'>set_C</a>(this, center, radius1, radius2)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set_c~3"></span> <h3>private pure subroutine <a href='../proc/set_c~3.html'>set_C</a>(this, center, radius1, radius2)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -8030,7 +8030,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~126"></span>
+              <span class="anchor" id="variable-this~187"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -8045,7 +8045,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center~6"></span>
+              <span class="anchor" id="variable-center~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8096,7 +8096,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set_elem~2"></span> <h3>private pure subroutine <a href='../proc/set_elem~2.html'>set_elem</a>(this, elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set_elem~3"></span> <h3>private pure subroutine <a href='../proc/set_elem~3.html'>set_elem</a>(this, elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -8119,7 +8119,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~113"></span>
+              <span class="anchor" id="variable-this~174"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -8134,7 +8134,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~24"></span>
+              <span class="anchor" id="variable-elemconn~42"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -8155,7 +8155,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set_elem_xc_vis~2"></span> <h3>private pure subroutine <a href='../proc/set_elem_xc_vis~2.html'>set_elem_Xc_vis</a>(this, elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set_elem_xc_vis~3"></span> <h3>private pure subroutine <a href='../proc/set_elem_xc_vis~3.html'>set_elem_Xc_vis</a>(this, elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -8178,7 +8178,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~111"></span>
+              <span class="anchor" id="variable-this~172"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -8193,7 +8193,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~22"></span>
+              <span class="anchor" id="variable-elemconn~40"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -8214,7 +8214,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set_elem_xg_vis~2"></span> <h3>private pure subroutine <a href='../proc/set_elem_xg_vis~2.html'>set_elem_Xg_vis</a>(this, elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set_elem_xg_vis~3"></span> <h3>private pure subroutine <a href='../proc/set_elem_xg_vis~3.html'>set_elem_Xg_vis</a>(this, elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -8237,7 +8237,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~112"></span>
+              <span class="anchor" id="variable-this~173"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -8252,7 +8252,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~23"></span>
+              <span class="anchor" id="variable-elemconn~41"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -8296,7 +8296,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~127"></span>
+              <span class="anchor" id="variable-this~188"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -8311,7 +8311,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center~7"></span>
+              <span class="anchor" id="variable-center~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8385,7 +8385,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~125"></span>
+              <span class="anchor" id="variable-this~186"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -8400,7 +8400,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center~5"></span>
+              <span class="anchor" id="variable-center~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8474,7 +8474,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~118"></span>
+              <span class="anchor" id="variable-this~179"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -8489,7 +8489,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-l~3"></span>
+              <span class="anchor" id="variable-l~7"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -8504,7 +8504,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~34"></span>
+              <span class="anchor" id="variable-nc~62"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -8519,7 +8519,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~33"></span>
+              <span class="anchor" id="variable-wc~53"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8540,7 +8540,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-show~2"></span> <h3>private impure subroutine <a href='../proc/show~2.html'>show</a>(this, vtkfile_Xc, vtkfile_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-show~3"></span> <h3>private impure subroutine <a href='../proc/show~3.html'>show</a>(this, vtkfile_Xc, vtkfile_Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -8563,7 +8563,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~124"></span>
+              <span class="anchor" id="variable-this~185"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -8578,7 +8578,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-vtkfile_xc~2"></span>
+              <span class="anchor" id="variable-vtkfile_xc~3"></span>
               character(len=*),
             </td>
 <td>intent(in)</td>
@@ -8593,7 +8593,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-vtkfile_xg~2"></span>
+              <span class="anchor" id="variable-vtkfile_xg~3"></span>
               character(len=*),
             </td>
 <td>intent(in)</td>
@@ -8614,7 +8614,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-translate_xc~2"></span> <h3>private pure subroutine <a href='../proc/translate_xc~2.html'>translate_Xc</a>(this, vec)  
+    <div class="card-header codesum"><span class="anchor" id="proc-translate_xc~3"></span> <h3>private pure subroutine <a href='../proc/translate_xc~3.html'>translate_Xc</a>(this, vec)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -8637,7 +8637,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~122"></span>
+              <span class="anchor" id="variable-this~183"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -8652,7 +8652,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-vec~3"></span>
+              <span class="anchor" id="variable-vec~7"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -8673,7 +8673,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-translate_xg~2"></span> <h3>private pure subroutine <a href='../proc/translate_xg~2.html'>translate_Xg</a>(this, vec)  
+    <div class="card-header codesum"><span class="anchor" id="proc-translate_xg~3"></span> <h3>private pure subroutine <a href='../proc/translate_xg~3.html'>translate_Xg</a>(this, vec)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -8696,7 +8696,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~123"></span>
+              <span class="anchor" id="variable-this~184"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -8711,7 +8711,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-vec~4"></span>
+              <span class="anchor" id="variable-vec~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -8754,7 +8754,7 @@ <h4>Arguments</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/module/forcad_nurbs_volume.html b/module/forcad_nurbs_volume.html
index 0b30370b3..71db6aabf 100644
--- a/module/forcad_nurbs_volume.html
+++ b/module/forcad_nurbs_volume.html
@@ -124,10 +124,10 @@ <h4 class="card-header bg-primary text-white">Interfaces</h4>
       </a>
       <div id="inters-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#interface-compute_tgc">compute_Tgc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#interface-compute_xg">compute_Xg</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#interface-compute_d2tgc">compute_d2Tgc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#interface-compute_dtgc">compute_dTgc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#interface-compute_tgc~2">compute_Tgc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#interface-compute_xg~2">compute_Xg</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#interface-compute_d2tgc~2">compute_d2Tgc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#interface-compute_dtgc~2">compute_dTgc</a>
             <a class="list-group-item" href="../module/forcad_nurbs_volume.html#interface-nearest_point_help_3d">nearest_point_help_3d</a>
         </div>
       </div>
@@ -153,36 +153,36 @@ <h4 class="card-header bg-primary text-white">Functions</h4>
       </a>
       <div id="funcs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-cmp_xg">cmp_Xg</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-cmp_xg~2">cmp_Xg</a>
             <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-cmp_degreeface">cmp_degreeFace</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-cmp_elem">cmp_elem</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-cmp_elem~2">cmp_elem</a>
             <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-cmp_elemface">cmp_elemFace</a>
             <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-cmp_elemface_xc_vis">cmp_elemFace_Xc_vis</a>
             <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-cmp_elemface_xg_vis">cmp_elemFace_Xg_vis</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-cmp_elem_xc_vis">cmp_elem_Xc_vis</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-cmp_elem_xg_vis">cmp_elem_Xg_vis</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_wc_all">get_Wc_all</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_wci">get_Wci</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_xc_all">get_Xc_all</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_xci">get_Xci</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_xcid">get_Xcid</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_xg_all">get_Xg_all</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_xgi">get_Xgi</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_xgid">get_Xgid</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_xt">get_Xt</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_continuity">get_continuity</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-cmp_elem_xc_vis~2">cmp_elem_Xc_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-cmp_elem_xg_vis~2">cmp_elem_Xg_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_wc_all~2">get_Wc_all</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_wci~2">get_Wci</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_xc_all~2">get_Xc_all</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_xci~2">get_Xci</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_xcid~2">get_Xcid</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_xg_all~2">get_Xg_all</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_xgi~2">get_Xgi</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_xgid~2">get_Xgid</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_xt~2">get_Xt</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_continuity~2">get_continuity</a>
             <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_degree_all">get_degree_all</a>
             <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_degree_dir">get_degree_dir</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_elem">get_elem</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_elem_xc_vis">get_elem_Xc_vis</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_elem_xg_vis">get_elem_Xg_vis</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_knot_all">get_knot_all</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_knoti">get_knoti</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_multiplicity">get_multiplicity</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_elem~2">get_elem</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_elem_xc_vis~2">get_elem_Xc_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_elem_xg_vis~2">get_elem_Xg_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_knot_all~2">get_knot_all</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_knoti~2">get_knoti</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_multiplicity~2">get_multiplicity</a>
             <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_nc_all">get_nc_all</a>
             <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_nc_dir">get_nc_dir</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_ng">get_ng</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-is_rational">is_rational</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-get_ng~2">get_ng</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-is_rational~2">is_rational</a>
         </div>
       </div>
     </div>
@@ -194,44 +194,44 @@ <h4 class="card-header bg-primary text-white">Subroutines</h4>
       </a>
       <div id="subs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-ansatz">ansatz</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-basis_scalar">basis_scalar</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-basis_vector">basis_vector</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-cmp_degree">cmp_degree</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-cmp_nc">cmp_nc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-ansatz~2">ansatz</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-basis_scalar~2">basis_scalar</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-basis_vector~2">basis_vector</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-cmp_degree~2">cmp_degree</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-cmp_nc~2">cmp_nc</a>
             <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-cmp_volume">cmp_volume</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-create">create</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-derivative2_scalar">derivative2_scalar</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-derivative2_vector">derivative2_vector</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-derivative_scalar">derivative_scalar</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-derivative_vector">derivative_vector</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-elevate_degree">elevate_degree</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-export_xc">export_Xc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-export_xg">export_Xg</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-finalize">finalize</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-insert_knots">insert_knots</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-modify_wc">modify_Wc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-modify_xc">modify_Xc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-nearest_point">nearest_point</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-nearest_point2">nearest_point2</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-create~2">create</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-derivative2_scalar~2">derivative2_scalar</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-derivative2_vector~2">derivative2_vector</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-derivative_scalar~2">derivative_scalar</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-derivative_vector~2">derivative_vector</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-elevate_degree~2">elevate_degree</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-export_xc~2">export_Xc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-export_xg~2">export_Xg</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-finalize~2">finalize</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-insert_knots~2">insert_knots</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-modify_wc~2">modify_Wc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-modify_xc~2">modify_Xc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-nearest_point~2">nearest_point</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-nearest_point2~2">nearest_point2</a>
             <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-put_to_nurbs">put_to_nurbs</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-remove_knots">remove_knots</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-rotate_xc">rotate_Xc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-rotate_xg">rotate_Xg</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set1">set1</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set2">set2</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set3">set3</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set4">set4</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set_c">set_C</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set_elem">set_elem</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set_elem_xc_vis">set_elem_Xc_vis</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set_elem_xg_vis">set_elem_Xg_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-remove_knots~2">remove_knots</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-rotate_xc~2">rotate_Xc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-rotate_xg~2">rotate_Xg</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set1~2">set1</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set2~2">set2</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set3~2">set3</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set4~2">set4</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set_c~2">set_C</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set_elem~2">set_elem</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set_elem_xc_vis~2">set_elem_Xc_vis</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set_elem_xg_vis~2">set_elem_Xg_vis</a>
             <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set_half_ring">set_half_ring</a>
             <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set_hexahedron">set_hexahedron</a>
             <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-set_ring">set_ring</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-show">show</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-translate_xc">translate_Xc</a>
-            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-translate_xg">translate_Xg</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-show~2">show</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-translate_xc~2">translate_Xc</a>
+            <a class="list-group-item" href="../module/forcad_nurbs_volume.html#proc-translate_xg~2">translate_Xg</a>
         </div>
       </div>
     </div>
@@ -929,8 +929,8 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
           <h2>Interfaces</h2>
               <div class="card">
     <div class="card-header bg-light codesum">
-      <span class="anchor" id="interface-compute_tgc"></span>
-      <h3>private        interface <a href='../interface/compute_tgc.html'>compute_Tgc</a> 
+      <span class="anchor" id="interface-compute_tgc~2"></span>
+      <h3>private        interface <a href='../interface/compute_tgc~2.html'>compute_Tgc</a> 
       </h3>
     </div>
     <ul class="list-group">
@@ -954,7 +954,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~16"></span>
+              <span class="anchor" id="variable-f_xt~32"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1014,7 +1014,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~16"></span>
+              <span class="anchor" id="variable-f_degree~32"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1029,7 +1029,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~16"></span>
+              <span class="anchor" id="variable-f_nc~32"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1072,7 +1072,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~14"></span>
+              <span class="anchor" id="variable-f_xt~30"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1132,7 +1132,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~14"></span>
+              <span class="anchor" id="variable-f_degree~30"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1147,7 +1147,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~14"></span>
+              <span class="anchor" id="variable-f_nc~30"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1162,7 +1162,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~8"></span>
+              <span class="anchor" id="variable-f_ng~17"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1205,7 +1205,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~15"></span>
+              <span class="anchor" id="variable-f_xt~31"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1265,7 +1265,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~15"></span>
+              <span class="anchor" id="variable-f_degree~31"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1280,7 +1280,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~15"></span>
+              <span class="anchor" id="variable-f_nc~31"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1295,7 +1295,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~8"></span>
+              <span class="anchor" id="variable-f_wc~16"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1338,7 +1338,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~13"></span>
+              <span class="anchor" id="variable-f_xt~29"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1398,7 +1398,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~13"></span>
+              <span class="anchor" id="variable-f_degree~29"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1413,7 +1413,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~13"></span>
+              <span class="anchor" id="variable-f_nc~29"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1428,7 +1428,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~7"></span>
+              <span class="anchor" id="variable-f_ng~16"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1443,7 +1443,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~7"></span>
+              <span class="anchor" id="variable-f_wc~15"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1471,8 +1471,8 @@ <h4>
 
               <div class="card">
     <div class="card-header bg-light codesum">
-      <span class="anchor" id="interface-compute_xg"></span>
-      <h3>private        interface <a href='../interface/compute_xg.html'>compute_Xg</a> 
+      <span class="anchor" id="interface-compute_xg~2"></span>
+      <h3>private        interface <a href='../interface/compute_xg~2.html'>compute_Xg</a> 
       </h3>
     </div>
     <ul class="list-group">
@@ -1496,7 +1496,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~2"></span>
+              <span class="anchor" id="variable-f_xt~18"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1556,7 +1556,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~2"></span>
+              <span class="anchor" id="variable-f_degree~18"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1571,7 +1571,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~2"></span>
+              <span class="anchor" id="variable-f_nc~18"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1586,7 +1586,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~2"></span>
+              <span class="anchor" id="variable-f_ng~11"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1601,7 +1601,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xc~2"></span>
+              <span class="anchor" id="variable-f_xc~6"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1644,7 +1644,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~4"></span>
+              <span class="anchor" id="variable-f_xt~20"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1704,7 +1704,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~4"></span>
+              <span class="anchor" id="variable-f_degree~20"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1719,7 +1719,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~4"></span>
+              <span class="anchor" id="variable-f_nc~20"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1734,7 +1734,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xc~4"></span>
+              <span class="anchor" id="variable-f_xc~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1777,7 +1777,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt"></span>
+              <span class="anchor" id="variable-f_xt~17"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1837,7 +1837,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree"></span>
+              <span class="anchor" id="variable-f_degree~17"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1852,7 +1852,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc"></span>
+              <span class="anchor" id="variable-f_nc~17"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1867,7 +1867,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng"></span>
+              <span class="anchor" id="variable-f_ng~10"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -1882,7 +1882,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xc"></span>
+              <span class="anchor" id="variable-f_xc~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1897,7 +1897,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc"></span>
+              <span class="anchor" id="variable-f_wc~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1940,7 +1940,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~3"></span>
+              <span class="anchor" id="variable-f_xt~19"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2000,7 +2000,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~3"></span>
+              <span class="anchor" id="variable-f_degree~19"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2015,7 +2015,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~3"></span>
+              <span class="anchor" id="variable-f_nc~19"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2030,7 +2030,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xc~3"></span>
+              <span class="anchor" id="variable-f_xc~7"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2045,7 +2045,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~2"></span>
+              <span class="anchor" id="variable-f_wc~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2073,8 +2073,8 @@ <h4>
 
               <div class="card">
     <div class="card-header bg-light codesum">
-      <span class="anchor" id="interface-compute_d2tgc"></span>
-      <h3>private        interface <a href='../interface/compute_d2tgc.html'>compute_d2Tgc</a> 
+      <span class="anchor" id="interface-compute_d2tgc~2"></span>
+      <h3>private        interface <a href='../interface/compute_d2tgc~2.html'>compute_d2Tgc</a> 
       </h3>
     </div>
     <ul class="list-group">
@@ -2098,7 +2098,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~12"></span>
+              <span class="anchor" id="variable-f_xt~28"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2158,7 +2158,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~12"></span>
+              <span class="anchor" id="variable-f_degree~28"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2173,7 +2173,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~12"></span>
+              <span class="anchor" id="variable-f_nc~28"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2188,7 +2188,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_d2tgc~4"></span>
+              <span class="anchor" id="variable-f_d2tgc~8"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2203,7 +2203,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~8"></span>
+              <span class="anchor" id="variable-f_dtgc~16"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2218,7 +2218,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~8"></span>
+              <span class="anchor" id="variable-f_tgc~20"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2256,7 +2256,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~10"></span>
+              <span class="anchor" id="variable-f_xt~26"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2316,7 +2316,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~10"></span>
+              <span class="anchor" id="variable-f_degree~26"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2331,7 +2331,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~10"></span>
+              <span class="anchor" id="variable-f_nc~26"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2346,7 +2346,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~6"></span>
+              <span class="anchor" id="variable-f_ng~15"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2361,7 +2361,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_d2tgc~2"></span>
+              <span class="anchor" id="variable-f_d2tgc~6"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2376,7 +2376,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~6"></span>
+              <span class="anchor" id="variable-f_dtgc~14"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2391,7 +2391,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~6"></span>
+              <span class="anchor" id="variable-f_tgc~18"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2429,7 +2429,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~11"></span>
+              <span class="anchor" id="variable-f_xt~27"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2489,7 +2489,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~11"></span>
+              <span class="anchor" id="variable-f_degree~27"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2504,7 +2504,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~11"></span>
+              <span class="anchor" id="variable-f_nc~27"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2519,7 +2519,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~6"></span>
+              <span class="anchor" id="variable-f_wc~14"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2534,7 +2534,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_d2tgc~3"></span>
+              <span class="anchor" id="variable-f_d2tgc~7"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2549,7 +2549,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~7"></span>
+              <span class="anchor" id="variable-f_dtgc~15"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2564,7 +2564,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~7"></span>
+              <span class="anchor" id="variable-f_tgc~19"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2602,7 +2602,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~9"></span>
+              <span class="anchor" id="variable-f_xt~25"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2662,7 +2662,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~9"></span>
+              <span class="anchor" id="variable-f_degree~25"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2677,7 +2677,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~9"></span>
+              <span class="anchor" id="variable-f_nc~25"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2692,7 +2692,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~5"></span>
+              <span class="anchor" id="variable-f_ng~14"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2707,7 +2707,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~5"></span>
+              <span class="anchor" id="variable-f_wc~13"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2722,7 +2722,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_d2tgc"></span>
+              <span class="anchor" id="variable-f_d2tgc~5"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2737,7 +2737,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~5"></span>
+              <span class="anchor" id="variable-f_dtgc~13"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2752,7 +2752,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~5"></span>
+              <span class="anchor" id="variable-f_tgc~17"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2775,8 +2775,8 @@ <h4>Arguments</h4>
 
               <div class="card">
     <div class="card-header bg-light codesum">
-      <span class="anchor" id="interface-compute_dtgc"></span>
-      <h3>private        interface <a href='../interface/compute_dtgc.html'>compute_dTgc</a> 
+      <span class="anchor" id="interface-compute_dtgc~2"></span>
+      <h3>private        interface <a href='../interface/compute_dtgc~2.html'>compute_dTgc</a> 
       </h3>
     </div>
     <ul class="list-group">
@@ -2800,7 +2800,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~8"></span>
+              <span class="anchor" id="variable-f_xt~24"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2860,7 +2860,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~8"></span>
+              <span class="anchor" id="variable-f_degree~24"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2875,7 +2875,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~8"></span>
+              <span class="anchor" id="variable-f_nc~24"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2890,7 +2890,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~4"></span>
+              <span class="anchor" id="variable-f_dtgc~12"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2905,7 +2905,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~4"></span>
+              <span class="anchor" id="variable-f_tgc~16"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -2920,7 +2920,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_elem~2"></span>
+              <span class="anchor" id="variable-f_elem~4"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -2958,7 +2958,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~6"></span>
+              <span class="anchor" id="variable-f_xt~22"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -3018,7 +3018,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~6"></span>
+              <span class="anchor" id="variable-f_degree~22"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3033,7 +3033,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~6"></span>
+              <span class="anchor" id="variable-f_nc~22"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3048,7 +3048,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~4"></span>
+              <span class="anchor" id="variable-f_ng~13"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3063,7 +3063,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~2"></span>
+              <span class="anchor" id="variable-f_dtgc~10"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -3078,7 +3078,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~2"></span>
+              <span class="anchor" id="variable-f_tgc~14"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -3116,7 +3116,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~7"></span>
+              <span class="anchor" id="variable-f_xt~23"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -3176,7 +3176,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~7"></span>
+              <span class="anchor" id="variable-f_degree~23"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3191,7 +3191,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~7"></span>
+              <span class="anchor" id="variable-f_nc~23"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3206,7 +3206,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~4"></span>
+              <span class="anchor" id="variable-f_wc~12"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -3221,7 +3221,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc~3"></span>
+              <span class="anchor" id="variable-f_dtgc~11"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -3236,7 +3236,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc~3"></span>
+              <span class="anchor" id="variable-f_tgc~15"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -3251,7 +3251,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_elem"></span>
+              <span class="anchor" id="variable-f_elem~3"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -3289,7 +3289,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xt~5"></span>
+              <span class="anchor" id="variable-f_xt~21"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -3349,7 +3349,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_degree~5"></span>
+              <span class="anchor" id="variable-f_degree~21"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3364,7 +3364,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_nc~5"></span>
+              <span class="anchor" id="variable-f_nc~21"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3379,7 +3379,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~3"></span>
+              <span class="anchor" id="variable-f_ng~12"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3394,7 +3394,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_wc~3"></span>
+              <span class="anchor" id="variable-f_wc~11"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -3409,7 +3409,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_dtgc"></span>
+              <span class="anchor" id="variable-f_dtgc~9"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -3424,7 +3424,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_tgc"></span>
+              <span class="anchor" id="variable-f_tgc~13"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -3472,7 +3472,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_ng~9"></span>
+              <span class="anchor" id="variable-f_ng~18"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3487,7 +3487,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_xg~5"></span>
+              <span class="anchor" id="variable-f_xg~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -3502,7 +3502,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-f_point_xg"></span>
+              <span class="anchor" id="variable-f_point_xg~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -3559,7 +3559,7 @@ <h4>Components</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~2"></span>
+              <span class="anchor" id="variable-wc~26"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3576,7 +3576,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~3"></span>
+              <span class="anchor" id="variable-xc~23"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3593,7 +3593,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xg"></span>
+              <span class="anchor" id="variable-xg~14"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3610,7 +3610,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt"></span>
+              <span class="anchor" id="variable-xt~28"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3678,7 +3678,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree"></span>
+              <span class="anchor" id="variable-degree~21"></span>
               integer,
             </td>
               <td>private</td>
@@ -3695,7 +3695,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn"></span>
+              <span class="anchor" id="variable-elemconn~13"></span>
               integer,
             </td>
               <td>private,</td>
@@ -3712,7 +3712,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn_xc_vis"></span>
+              <span class="anchor" id="variable-elemconn_xc_vis~2"></span>
               integer,
             </td>
               <td>private,</td>
@@ -3729,7 +3729,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn_xg_vis"></span>
+              <span class="anchor" id="variable-elemconn_xg_vis~2"></span>
               integer,
             </td>
               <td>private,</td>
@@ -3746,7 +3746,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1"></span>
+              <span class="anchor" id="variable-knot1~3"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3763,7 +3763,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2"></span>
+              <span class="anchor" id="variable-knot2~3"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3780,7 +3780,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3"></span>
+              <span class="anchor" id="variable-knot3~2"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -3797,7 +3797,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc"></span>
+              <span class="anchor" id="variable-nc~21"></span>
               integer,
             </td>
               <td>private</td>
@@ -3814,7 +3814,7 @@ <h4>Components</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng"></span>
+              <span class="anchor" id="variable-ng~15"></span>
               integer,
             </td>
               <td>private</td>
@@ -3840,23 +3840,23 @@ <h4>Type-Bound Procedures</h4>
           <tbody>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-ansatz'>ansatz</a></strong></td>
-                <td><p>Compute the shape functions, derivative of shape functions and dV</p><a href="../type/nurbs_volume.html#boundprocedure-ansatz" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-ansatz~2'>ansatz</a></strong></td>
+                <td><p>Compute the shape functions, derivative of shape functions and dV</p><a href="../type/nurbs_volume.html#boundprocedure-ansatz~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-basis'>basis</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-basis_vector'>basis_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-basis_scalar'>basis_scalar</a></td>
-                <td><p>Compute the basis functions of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-basis" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-basis~2'>basis</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-basis_vector~2'>basis_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-basis_scalar~2'>basis_scalar</a></td>
+                <td><p>Compute the basis functions of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-basis~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-cmp_xg'>cmp_Xg</a></strong></td>
-                <td><p>Compute geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-cmp_xg" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-cmp_xg~2'>cmp_Xg</a></strong></td>
+                <td><p>Compute geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-cmp_xg~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-cmp_degree'>cmp_degree</a></strong></td>
-                <td><p>Compute degree of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-cmp_degree" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-cmp_degree~2'>cmp_degree</a></strong></td>
+                <td><p>Compute degree of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-cmp_degree~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
@@ -3865,8 +3865,8 @@ <h4>Type-Bound Procedures</h4>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-cmp_elem'>cmp_elem</a></strong></td>
-                <td><p>Generate IGA element connectivity</p><a href="../type/nurbs_volume.html#boundprocedure-cmp_elem" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-cmp_elem~2'>cmp_elem</a></strong></td>
+                <td><p>Generate IGA element connectivity</p><a href="../type/nurbs_volume.html#boundprocedure-cmp_elem~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
@@ -3885,18 +3885,18 @@ <h4>Type-Bound Procedures</h4>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-cmp_elem_xc_vis'>cmp_elem_Xc_vis</a></strong></td>
-                <td><p>Generate connectivity for control points</p><a href="../type/nurbs_volume.html#boundprocedure-cmp_elem_xc_vis" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-cmp_elem_xc_vis~2'>cmp_elem_Xc_vis</a></strong></td>
+                <td><p>Generate connectivity for control points</p><a href="../type/nurbs_volume.html#boundprocedure-cmp_elem_xc_vis~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-cmp_elem_xg_vis'>cmp_elem_Xg_vis</a></strong></td>
-                <td><p>Generate connectivity for geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-cmp_elem_xg_vis" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-cmp_elem_xg_vis~2'>cmp_elem_Xg_vis</a></strong></td>
+                <td><p>Generate connectivity for geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-cmp_elem_xg_vis~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-cmp_nc'>cmp_nc</a></strong></td>
-                <td><p>Compute number of required control points</p><a href="../type/nurbs_volume.html#boundprocedure-cmp_nc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-cmp_nc~2'>cmp_nc</a></strong></td>
+                <td><p>Compute number of required control points</p><a href="../type/nurbs_volume.html#boundprocedure-cmp_nc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
@@ -3905,133 +3905,133 @@ <h4>Type-Bound Procedures</h4>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-create'>create</a></strong></td>
-                <td><p>Generate geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-create" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-create~2'>create</a></strong></td>
+                <td><p>Generate geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-create~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-derivative'>derivative</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-derivative_vector'>derivative_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-derivative_scalar'>derivative_scalar</a></td>
-                <td><p>Compute the derivative of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-derivative" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-derivative~2'>derivative</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-derivative_vector~2'>derivative_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-derivative_scalar~2'>derivative_scalar</a></td>
+                <td><p>Compute the derivative of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-derivative~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-derivative2'>derivative2</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-derivative2_vector'>derivative2_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-derivative2_scalar'>derivative2_scalar</a></td>
-                <td><p>Compute the second derivative of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-derivative2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-derivative2~2'>derivative2</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-derivative2_vector~2'>derivative2_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-derivative2_scalar~2'>derivative2_scalar</a></td>
+                <td><p>Compute the second derivative of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-derivative2~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-elevate_degree'>elevate_degree</a></strong></td>
-                <td><p>Elevate the degree of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-elevate_degree" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-elevate_degree~2'>elevate_degree</a></strong></td>
+                <td><p>Elevate the degree of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-elevate_degree~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-export_xc'>export_Xc</a></strong></td>
-                <td><p>Export control points to VTK file</p><a href="../type/nurbs_volume.html#boundprocedure-export_xc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-export_xc~2'>export_Xc</a></strong></td>
+                <td><p>Export control points to VTK file</p><a href="../type/nurbs_volume.html#boundprocedure-export_xc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-export_xg'>export_Xg</a></strong></td>
-                <td><p>Export geometry points to VTK file</p><a href="../type/nurbs_volume.html#boundprocedure-export_xg" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-export_xg~2'>export_Xg</a></strong></td>
+                <td><p>Export geometry points to VTK file</p><a href="../type/nurbs_volume.html#boundprocedure-export_xg~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-finalize'>finalize</a></strong></td>
-                <td><p>Finalize the NURBS volume object</p><a href="../type/nurbs_volume.html#boundprocedure-finalize" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-finalize~2'>finalize</a></strong></td>
+                <td><p>Finalize the NURBS volume object</p><a href="../type/nurbs_volume.html#boundprocedure-finalize~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_wc'>get_Wc</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_wc_all'>get_Wc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_wci'>get_Wci</a></td>
-                <td><p>Get weights</p><a href="../type/nurbs_volume.html#boundprocedure-get_wc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_wc~2'>get_Wc</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_wc_all~2'>get_Wc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_wci~2'>get_Wci</a></td>
+                <td><p>Get weights</p><a href="../type/nurbs_volume.html#boundprocedure-get_wc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xc'>get_Xc</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xc_all'>get_Xc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xci'>get_Xci</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xcid'>get_Xcid</a></td>
-                <td><p>Get control points</p><a href="../type/nurbs_volume.html#boundprocedure-get_xc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xc~2'>get_Xc</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xc_all~2'>get_Xc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xci~2'>get_Xci</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xcid~2'>get_Xcid</a></td>
+                <td><p>Get control points</p><a href="../type/nurbs_volume.html#boundprocedure-get_xc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xg'>get_Xg</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xg_all'>get_Xg_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xgi'>get_Xgi</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xgid'>get_Xgid</a></td>
-                <td><p>Get geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-get_xg" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xg~2'>get_Xg</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xg_all~2'>get_Xg_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xgi~2'>get_Xgi</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xgid~2'>get_Xgid</a></td>
+                <td><p>Get geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-get_xg~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xt'>get_Xt</a></strong></td>
-                <td><p>Get parameter values</p><a href="../type/nurbs_volume.html#boundprocedure-get_xt" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xt~2'>get_Xt</a></strong></td>
+                <td><p>Get parameter values</p><a href="../type/nurbs_volume.html#boundprocedure-get_xt~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_continuity'>get_continuity</a></strong></td>
-                <td><p>Compute and return the continuity of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-get_continuity" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_continuity~2'>get_continuity</a></strong></td>
+                <td><p>Compute and return the continuity of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-get_continuity~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_degree'>get_degree</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_degree_all'>get_degree_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_degree_dir'>get_degree_dir</a></td>
-                <td><p>Get degree of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-get_degree" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_degree~2'>get_degree</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_degree_all'>get_degree_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_degree_dir'>get_degree_dir</a></td>
+                <td><p>Get degree of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-get_degree~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_elem'>get_elem</a></strong></td>
-                <td><p>Get IGA element connectivity</p><a href="../type/nurbs_volume.html#boundprocedure-get_elem" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_elem~2'>get_elem</a></strong></td>
+                <td><p>Get IGA element connectivity</p><a href="../type/nurbs_volume.html#boundprocedure-get_elem~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_elem_xc_vis'>get_elem_Xc_vis</a></strong></td>
-                <td><p>Get connectivity for control points</p><a href="../type/nurbs_volume.html#boundprocedure-get_elem_xc_vis" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_elem_xc_vis~2'>get_elem_Xc_vis</a></strong></td>
+                <td><p>Get connectivity for control points</p><a href="../type/nurbs_volume.html#boundprocedure-get_elem_xc_vis~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_elem_xg_vis'>get_elem_Xg_vis</a></strong></td>
-                <td><p>Get connectivity for geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-get_elem_xg_vis" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_elem_xg_vis~2'>get_elem_Xg_vis</a></strong></td>
+                <td><p>Get connectivity for geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-get_elem_xg_vis~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_knot'>get_knot</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_knoti'>get_knoti</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_knot_all'>get_knot_all</a></td>
-                <td><p>Get knot vector</p><a href="../type/nurbs_volume.html#boundprocedure-get_knot" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_knot~2'>get_knot</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_knoti~2'>get_knoti</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_knot_all~2'>get_knot_all</a></td>
+                <td><p>Get knot vector</p><a href="../type/nurbs_volume.html#boundprocedure-get_knot~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_multiplicity'>get_multiplicity</a></strong></td>
-                <td><p>Compute and return the multiplicity of the knots</p><a href="../type/nurbs_volume.html#boundprocedure-get_multiplicity" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_multiplicity~2'>get_multiplicity</a></strong></td>
+                <td><p>Compute and return the multiplicity of the knots</p><a href="../type/nurbs_volume.html#boundprocedure-get_multiplicity~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_nc'>get_nc</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_nc_all'>get_nc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_nc_dir'>get_nc_dir</a></td>
-                <td><p>Get number of control points</p><a href="../type/nurbs_volume.html#boundprocedure-get_nc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_nc~2'>get_nc</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_nc_all'>get_nc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_nc_dir'>get_nc_dir</a></td>
+                <td><p>Get number of control points</p><a href="../type/nurbs_volume.html#boundprocedure-get_nc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_ng'>get_ng</a></strong></td>
-                <td><p>Get number of geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-get_ng" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_ng~2'>get_ng</a></strong></td>
+                <td><p>Get number of geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-get_ng~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-insert_knots'>insert_knots</a></strong></td>
-                <td><p>Insert knots into the knot vector</p><a href="../type/nurbs_volume.html#boundprocedure-insert_knots" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-insert_knots~2'>insert_knots</a></strong></td>
+                <td><p>Insert knots into the knot vector</p><a href="../type/nurbs_volume.html#boundprocedure-insert_knots~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-is_rational'>is_rational</a></strong></td>
-                <td><p>Check if the NURBS volume is rational</p><a href="../type/nurbs_volume.html#boundprocedure-is_rational" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-is_rational~2'>is_rational</a></strong></td>
+                <td><p>Check if the NURBS volume is rational</p><a href="../type/nurbs_volume.html#boundprocedure-is_rational~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-modify_wc'>modify_Wc</a></strong></td>
-                <td><p>Modify weights</p><a href="../type/nurbs_volume.html#boundprocedure-modify_wc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-modify_wc~2'>modify_Wc</a></strong></td>
+                <td><p>Modify weights</p><a href="../type/nurbs_volume.html#boundprocedure-modify_wc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-modify_xc'>modify_Xc</a></strong></td>
-                <td><p>Modify control points</p><a href="../type/nurbs_volume.html#boundprocedure-modify_xc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-modify_xc~2'>modify_Xc</a></strong></td>
+                <td><p>Modify control points</p><a href="../type/nurbs_volume.html#boundprocedure-modify_xc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-nearest_point'>nearest_point</a></strong></td>
-                <td><p>Find the nearest point on the NURBS volume (Approximation)</p><a href="../type/nurbs_volume.html#boundprocedure-nearest_point" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-nearest_point~2'>nearest_point</a></strong></td>
+                <td><p>Find the nearest point on the NURBS volume (Approximation)</p><a href="../type/nurbs_volume.html#boundprocedure-nearest_point~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-nearest_point2'>nearest_point2</a></strong></td>
-                <td><p>Find the nearest point on the NURBS volume (Minimization - Newton's method)</p><a href="../type/nurbs_volume.html#boundprocedure-nearest_point2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-nearest_point2~2'>nearest_point2</a></strong></td>
+                <td><p>Find the nearest point on the NURBS volume (Minimization - Newton's method)</p><a href="../type/nurbs_volume.html#boundprocedure-nearest_point2~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
@@ -4040,63 +4040,63 @@ <h4>Type-Bound Procedures</h4>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-remove_knots'>remove_knots</a></strong></td>
-                <td><p>Remove knots from the knot vector</p><a href="../type/nurbs_volume.html#boundprocedure-remove_knots" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-remove_knots~2'>remove_knots</a></strong></td>
+                <td><p>Remove knots from the knot vector</p><a href="../type/nurbs_volume.html#boundprocedure-remove_knots~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-rotate_xc'>rotate_Xc</a></strong></td>
-                <td><p>Rotate control points</p><a href="../type/nurbs_volume.html#boundprocedure-rotate_xc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-rotate_xc~2'>rotate_Xc</a></strong></td>
+                <td><p>Rotate control points</p><a href="../type/nurbs_volume.html#boundprocedure-rotate_xc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-rotate_xg'>rotate_Xg</a></strong></td>
-                <td><p>Rotate geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-rotate_xg" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-rotate_xg~2'>rotate_Xg</a></strong></td>
+                <td><p>Rotate geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-rotate_xg~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  generic, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-set'>set</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-set1'>set1</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-set2'>set2</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-set3'>set3</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-set4'>set4</a></td>
-                <td><p>Set NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-set" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-set~2'>set</a></strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-set1~2'>set1</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-set2~2'>set2</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-set3~2'>set3</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-set4~2'>set4</a></td>
+                <td><p>Set NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-set~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-set1'>set1</a></strong></td>
-                <td><p>Set knot vectors, control points and weights for the NURBS volume object</p><a href="../type/nurbs_volume.html#boundprocedure-set1" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-set1~2'>set1</a></strong></td>
+                <td><p>Set knot vectors, control points and weights for the NURBS volume object</p><a href="../type/nurbs_volume.html#boundprocedure-set1~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-set2'>set2</a></strong></td>
-                <td><p>Set NURBS volume using nodes of parameter space, degree, continuity, control points and weights</p><a href="../type/nurbs_volume.html#boundprocedure-set2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-set2~2'>set2</a></strong></td>
+                <td><p>Set NURBS volume using nodes of parameter space, degree, continuity, control points and weights</p><a href="../type/nurbs_volume.html#boundprocedure-set2~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-set3'>set3</a></strong></td>
-                <td><p>Set Bezier or Rational Bezier volume using control points and weights</p><a href="../type/nurbs_volume.html#boundprocedure-set3" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-set3~2'>set3</a></strong></td>
+                <td><p>Set Bezier or Rational Bezier volume using control points and weights</p><a href="../type/nurbs_volume.html#boundprocedure-set3~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-set4'>set4</a></strong></td>
-                <td><p>Set NURBS volume using degree, number of control points, control points and weights</p><a href="../type/nurbs_volume.html#boundprocedure-set4" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-set4~2'>set4</a></strong></td>
+                <td><p>Set NURBS volume using degree, number of control points, control points and weights</p><a href="../type/nurbs_volume.html#boundprocedure-set4~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-set_c'>set_C</a></strong></td>
-                <td><p>Set a C-shape</p><a href="../type/nurbs_volume.html#boundprocedure-set_c" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-set_c~2'>set_C</a></strong></td>
+                <td><p>Set a C-shape</p><a href="../type/nurbs_volume.html#boundprocedure-set_c~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-set_elem'>set_elem</a></strong></td>
-                <td><p>Set IGA element connectivity</p><a href="../type/nurbs_volume.html#boundprocedure-set_elem" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-set_elem~2'>set_elem</a></strong></td>
+                <td><p>Set IGA element connectivity</p><a href="../type/nurbs_volume.html#boundprocedure-set_elem~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-set_elem_xc_vis'>set_elem_Xc_vis</a></strong></td>
-                <td><p>Set connectivity for control points</p><a href="../type/nurbs_volume.html#boundprocedure-set_elem_xc_vis" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-set_elem_xc_vis~2'>set_elem_Xc_vis</a></strong></td>
+                <td><p>Set connectivity for control points</p><a href="../type/nurbs_volume.html#boundprocedure-set_elem_xc_vis~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-set_elem_xg_vis'>set_elem_Xg_vis</a></strong></td>
-                <td><p>Set connectivity for geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-set_elem_xg_vis" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-set_elem_xg_vis~2'>set_elem_Xg_vis</a></strong></td>
+                <td><p>Set connectivity for geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-set_elem_xg_vis~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
@@ -4115,88 +4115,88 @@ <h4>Type-Bound Procedures</h4>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-show'>show</a></strong></td>
-                <td><p>Show the NURBS object using PyVista</p><a href="../type/nurbs_volume.html#boundprocedure-show" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-show~2'>show</a></strong></td>
+                <td><p>Show the NURBS object using PyVista</p><a href="../type/nurbs_volume.html#boundprocedure-show~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-translate_xc'>translate_Xc</a></strong></td>
-                <td><p>Translate control points</p><a href="../type/nurbs_volume.html#boundprocedure-translate_xc" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-translate_xc~2'>translate_Xc</a></strong></td>
+                <td><p>Translate control points</p><a href="../type/nurbs_volume.html#boundprocedure-translate_xc~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, public ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-translate_xg'>translate_Xg</a></strong></td>
-                <td><p>Translate geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-translate_xg" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-translate_xg~2'>translate_Xg</a></strong></td>
+                <td><p>Translate geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-translate_xg~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-basis_scalar'>basis_scalar</a></strong></td>
-                <td><p>Compute the basis functions of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-basis_scalar" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-basis_scalar~2'>basis_scalar</a></strong></td>
+                <td><p>Compute the basis functions of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-basis_scalar~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-basis_vector'>basis_vector</a></strong></td>
-                <td><p>Compute the basis functions of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-basis_vector" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-basis_vector~2'>basis_vector</a></strong></td>
+                <td><p>Compute the basis functions of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-basis_vector~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-derivative2_scalar'>derivative2_scalar</a></strong></td>
-                <td><p>Compute the second derivative of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-derivative2_scalar" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-derivative2_scalar~2'>derivative2_scalar</a></strong></td>
+                <td><p>Compute the second derivative of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-derivative2_scalar~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-derivative2_vector'>derivative2_vector</a></strong></td>
-                <td><p>Compute the second derivative of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-derivative2_vector" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-derivative2_vector~2'>derivative2_vector</a></strong></td>
+                <td><p>Compute the second derivative of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-derivative2_vector~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-derivative_scalar'>derivative_scalar</a></strong></td>
-                <td><p>Compute the derivative of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-derivative_scalar" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-derivative_scalar~2'>derivative_scalar</a></strong></td>
+                <td><p>Compute the derivative of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-derivative_scalar~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-derivative_vector'>derivative_vector</a></strong></td>
-                <td><p>Compute the derivative of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-derivative_vector" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-derivative_vector~2'>derivative_vector</a></strong></td>
+                <td><p>Compute the derivative of the NURBS volume</p><a href="../type/nurbs_volume.html#boundprocedure-derivative_vector~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_wc_all'>get_Wc_all</a></strong></td>
-                <td><p>Get all weights</p><a href="../type/nurbs_volume.html#boundprocedure-get_wc_all" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_wc_all~2'>get_Wc_all</a></strong></td>
+                <td><p>Get all weights</p><a href="../type/nurbs_volume.html#boundprocedure-get_wc_all~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_wci'>get_Wci</a></strong></td>
-                <td><p>Get i-th weight</p><a href="../type/nurbs_volume.html#boundprocedure-get_wci" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_wci~2'>get_Wci</a></strong></td>
+                <td><p>Get i-th weight</p><a href="../type/nurbs_volume.html#boundprocedure-get_wci~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xc_all'>get_Xc_all</a></strong></td>
-                <td><p>Get all control points</p><a href="../type/nurbs_volume.html#boundprocedure-get_xc_all" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xc_all~2'>get_Xc_all</a></strong></td>
+                <td><p>Get all control points</p><a href="../type/nurbs_volume.html#boundprocedure-get_xc_all~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xci'>get_Xci</a></strong></td>
-                <td><p>Get i-th control point</p><a href="../type/nurbs_volume.html#boundprocedure-get_xci" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xci~2'>get_Xci</a></strong></td>
+                <td><p>Get i-th control point</p><a href="../type/nurbs_volume.html#boundprocedure-get_xci~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xcid'>get_Xcid</a></strong></td>
-                <td><p>Get i-th control point in a specific direction</p><a href="../type/nurbs_volume.html#boundprocedure-get_xcid" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xcid~2'>get_Xcid</a></strong></td>
+                <td><p>Get i-th control point in a specific direction</p><a href="../type/nurbs_volume.html#boundprocedure-get_xcid~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xg_all'>get_Xg_all</a></strong></td>
-                <td><p>Get all geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-get_xg_all" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xg_all~2'>get_Xg_all</a></strong></td>
+                <td><p>Get all geometry points</p><a href="../type/nurbs_volume.html#boundprocedure-get_xg_all~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xgi'>get_Xgi</a></strong></td>
-                <td><p>Get i-th geometry point</p><a href="../type/nurbs_volume.html#boundprocedure-get_xgi" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xgi~2'>get_Xgi</a></strong></td>
+                <td><p>Get i-th geometry point</p><a href="../type/nurbs_volume.html#boundprocedure-get_xgi~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xgid'>get_Xgid</a></strong></td>
-                <td><p>Get i-th geometry point in a specific direction</p><a href="../type/nurbs_volume.html#boundprocedure-get_xgid" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_xgid~2'>get_Xgid</a></strong></td>
+                <td><p>Get i-th geometry point in a specific direction</p><a href="../type/nurbs_volume.html#boundprocedure-get_xgid~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
@@ -4210,13 +4210,13 @@ <h4>Type-Bound Procedures</h4>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_knot_all'>get_knot_all</a></strong></td>
-                <td><p>Get all knot vectors</p><a href="../type/nurbs_volume.html#boundprocedure-get_knot_all" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_knot_all~2'>get_knot_all</a></strong></td>
+                <td><p>Get all knot vectors</p><a href="../type/nurbs_volume.html#boundprocedure-get_knot_all~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
-  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_knoti'>get_knoti</a></strong></td>
-                <td><p>Get i-th knot value</p><a href="../type/nurbs_volume.html#boundprocedure-get_knoti" class="pull-right"><emph>Read more&hellip;</emph></a></td>
+  <strong><a href='../type/nurbs_volume.html#boundprocedure-get_knoti~2'>get_knoti</a></strong></td>
+                <td><p>Get i-th knot value</p><a href="../type/nurbs_volume.html#boundprocedure-get_knoti~2" class="pull-right"><emph>Read more&hellip;</emph></a></td>
               </tr>
               <tr>
                 <td>  procedure, private ::
@@ -4239,7 +4239,7 @@ <h4>Type-Bound Procedures</h4>
         <section>
           <h2>Functions</h2>
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_xg"></span> <h3>private pure function <a href='../proc/cmp_xg.html'>cmp_Xg</a>(this, Xt) result(Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_xg~2"></span> <h3>private pure function <a href='../proc/cmp_xg~2.html'>cmp_Xg</a>(this, Xt) result(Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4262,7 +4262,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~6"></span>
+              <span class="anchor" id="variable-this~67"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -4277,7 +4277,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~3"></span>
+              <span class="anchor" id="variable-xt~30"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -4326,7 +4326,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~66"></span>
+              <span class="anchor" id="variable-this~127"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -4367,7 +4367,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem"></span> <h3>private pure function <a href='../proc/cmp_elem.html'>cmp_elem</a>(this) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem~2"></span> <h3>private pure function <a href='../proc/cmp_elem~2.html'>cmp_elem</a>(this) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4390,7 +4390,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~52"></span>
+              <span class="anchor" id="variable-this~113"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -4439,7 +4439,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~63"></span>
+              <span class="anchor" id="variable-this~124"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -4454,7 +4454,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~2"></span>
+              <span class="anchor" id="variable-elem~6"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4518,7 +4518,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~64"></span>
+              <span class="anchor" id="variable-this~125"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -4533,7 +4533,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~3"></span>
+              <span class="anchor" id="variable-elem~7"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4597,7 +4597,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~65"></span>
+              <span class="anchor" id="variable-this~126"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -4612,7 +4612,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~4"></span>
+              <span class="anchor" id="variable-elem~8"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4653,7 +4653,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem_xc_vis"></span> <h3>private pure function <a href='../proc/cmp_elem_xc_vis.html'>cmp_elem_Xc_vis</a>(this, p) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem_xc_vis~2"></span> <h3>private pure function <a href='../proc/cmp_elem_xc_vis~2.html'>cmp_elem_Xc_vis</a>(this, p) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4676,7 +4676,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~23"></span>
+              <span class="anchor" id="variable-this~84"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -4691,7 +4691,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-p"></span>
+              <span class="anchor" id="variable-p~3"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -4717,7 +4717,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem_xg_vis"></span> <h3>private pure function <a href='../proc/cmp_elem_xg_vis.html'>cmp_elem_Xg_vis</a>(this, p) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_elem_xg_vis~2"></span> <h3>private pure function <a href='../proc/cmp_elem_xg_vis~2.html'>cmp_elem_Xg_vis</a>(this, p) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4740,7 +4740,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~24"></span>
+              <span class="anchor" id="variable-this~85"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -4755,7 +4755,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-p~2"></span>
+              <span class="anchor" id="variable-p~4"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -4781,7 +4781,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_wc_all"></span> <h3>private pure function <a href='../proc/get_wc_all.html'>get_Wc_all</a>(this) result(Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_wc_all~2"></span> <h3>private pure function <a href='../proc/get_wc_all~2.html'>get_Wc_all</a>(this) result(Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4804,7 +4804,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~13"></span>
+              <span class="anchor" id="variable-this~74"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -4830,7 +4830,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_wci"></span> <h3>private pure function <a href='../proc/get_wci.html'>get_Wci</a>(this, n) result(Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_wci~2"></span> <h3>private pure function <a href='../proc/get_wci~2.html'>get_Wci</a>(this, n) result(Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4853,7 +4853,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~14"></span>
+              <span class="anchor" id="variable-this~75"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -4868,7 +4868,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~5"></span>
+              <span class="anchor" id="variable-n~10"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4894,7 +4894,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xc_all"></span> <h3>private pure function <a href='../proc/get_xc_all.html'>get_Xc_all</a>(this) result(Xc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xc_all~2"></span> <h3>private pure function <a href='../proc/get_xc_all~2.html'>get_Xc_all</a>(this) result(Xc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4917,7 +4917,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~7"></span>
+              <span class="anchor" id="variable-this~68"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -4943,7 +4943,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xci"></span> <h3>private pure function <a href='../proc/get_xci.html'>get_Xci</a>(this, n) result(Xc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xci~2"></span> <h3>private pure function <a href='../proc/get_xci~2.html'>get_Xci</a>(this, n) result(Xc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -4966,7 +4966,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~8"></span>
+              <span class="anchor" id="variable-this~69"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -4981,7 +4981,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n"></span>
+              <span class="anchor" id="variable-n~6"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5007,7 +5007,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xcid"></span> <h3>private pure function <a href='../proc/get_xcid.html'>get_Xcid</a>(this, n, dir) result(Xc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xcid~2"></span> <h3>private pure function <a href='../proc/get_xcid~2.html'>get_Xcid</a>(this, n, dir) result(Xc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5030,7 +5030,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~9"></span>
+              <span class="anchor" id="variable-this~70"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -5045,7 +5045,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~2"></span>
+              <span class="anchor" id="variable-n~7"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5060,7 +5060,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir"></span>
+              <span class="anchor" id="variable-dir~4"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5086,7 +5086,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xg_all"></span> <h3>private pure function <a href='../proc/get_xg_all.html'>get_Xg_all</a>(this) result(Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xg_all~2"></span> <h3>private pure function <a href='../proc/get_xg_all~2.html'>get_Xg_all</a>(this) result(Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5109,7 +5109,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~10"></span>
+              <span class="anchor" id="variable-this~71"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -5135,7 +5135,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xgi"></span> <h3>private pure function <a href='../proc/get_xgi.html'>get_Xgi</a>(this, n) result(Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xgi~2"></span> <h3>private pure function <a href='../proc/get_xgi~2.html'>get_Xgi</a>(this, n) result(Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5158,7 +5158,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~11"></span>
+              <span class="anchor" id="variable-this~72"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -5173,7 +5173,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~3"></span>
+              <span class="anchor" id="variable-n~8"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5199,7 +5199,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xgid"></span> <h3>private pure function <a href='../proc/get_xgid.html'>get_Xgid</a>(this, n, dir) result(Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xgid~2"></span> <h3>private pure function <a href='../proc/get_xgid~2.html'>get_Xgid</a>(this, n, dir) result(Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5222,7 +5222,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~12"></span>
+              <span class="anchor" id="variable-this~73"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -5237,7 +5237,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~4"></span>
+              <span class="anchor" id="variable-n~9"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5252,7 +5252,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~2"></span>
+              <span class="anchor" id="variable-dir~5"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5278,7 +5278,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_xt"></span> <h3>private pure function <a href='../proc/get_xt.html'>get_Xt</a>(this, dir) result(Xt)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_xt~2"></span> <h3>private pure function <a href='../proc/get_xt~2.html'>get_Xt</a>(this, dir) result(Xt)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5301,7 +5301,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~15"></span>
+              <span class="anchor" id="variable-this~76"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -5316,7 +5316,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~3"></span>
+              <span class="anchor" id="variable-dir~6"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5342,7 +5342,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_continuity"></span> <h3>private pure function <a href='../proc/get_continuity.html'>get_continuity</a>(this, dir) result(c)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_continuity~2"></span> <h3>private pure function <a href='../proc/get_continuity~2.html'>get_continuity</a>(this, dir) result(c)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5365,7 +5365,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~30"></span>
+              <span class="anchor" id="variable-this~91"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -5380,7 +5380,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~10"></span>
+              <span class="anchor" id="variable-dir~13"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5429,7 +5429,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~18"></span>
+              <span class="anchor" id="variable-this~79"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -5478,7 +5478,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~19"></span>
+              <span class="anchor" id="variable-this~80"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -5493,7 +5493,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~5"></span>
+              <span class="anchor" id="variable-dir~8"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5519,7 +5519,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_elem"></span> <h3>private pure function <a href='../proc/get_elem.html'>get_elem</a>(this) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_elem~2"></span> <h3>private pure function <a href='../proc/get_elem~2.html'>get_elem</a>(this) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5542,7 +5542,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~48"></span>
+              <span class="anchor" id="variable-this~109"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -5568,7 +5568,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_elem_xc_vis"></span> <h3>private pure function <a href='../proc/get_elem_xc_vis.html'>get_elem_Xc_vis</a>(this) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_elem_xc_vis~2"></span> <h3>private pure function <a href='../proc/get_elem_xc_vis~2.html'>get_elem_Xc_vis</a>(this) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5591,7 +5591,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~46"></span>
+              <span class="anchor" id="variable-this~107"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -5617,7 +5617,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_elem_xg_vis"></span> <h3>private pure function <a href='../proc/get_elem_xg_vis.html'>get_elem_Xg_vis</a>(this) result(elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_elem_xg_vis~2"></span> <h3>private pure function <a href='../proc/get_elem_xg_vis~2.html'>get_elem_Xg_vis</a>(this) result(elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5640,7 +5640,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~47"></span>
+              <span class="anchor" id="variable-this~108"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -5666,7 +5666,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_knot_all"></span> <h3>private pure function <a href='../proc/get_knot_all.html'>get_knot_all</a>(this, dir) result(knot)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_knot_all~2"></span> <h3>private pure function <a href='../proc/get_knot_all~2.html'>get_knot_all</a>(this, dir) result(knot)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5689,7 +5689,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~20"></span>
+              <span class="anchor" id="variable-this~81"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -5704,7 +5704,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~6"></span>
+              <span class="anchor" id="variable-dir~9"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5730,7 +5730,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_knoti"></span> <h3>private pure function <a href='../proc/get_knoti.html'>get_knoti</a>(this, dir, i) result(knot)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_knoti~2"></span> <h3>private pure function <a href='../proc/get_knoti~2.html'>get_knoti</a>(this, dir, i) result(knot)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5753,7 +5753,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~21"></span>
+              <span class="anchor" id="variable-this~82"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -5768,7 +5768,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~7"></span>
+              <span class="anchor" id="variable-dir~10"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5783,7 +5783,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-i~3"></span>
+              <span class="anchor" id="variable-i~35"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5809,7 +5809,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_multiplicity"></span> <h3>private pure function <a href='../proc/get_multiplicity.html'>get_multiplicity</a>(this, dir) result(m)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_multiplicity~2"></span> <h3>private pure function <a href='../proc/get_multiplicity~2.html'>get_multiplicity</a>(this, dir) result(m)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -5832,7 +5832,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~29"></span>
+              <span class="anchor" id="variable-this~90"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -5847,7 +5847,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~9"></span>
+              <span class="anchor" id="variable-dir~12"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5896,7 +5896,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~32"></span>
+              <span class="anchor" id="variable-this~93"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -5945,7 +5945,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~33"></span>
+              <span class="anchor" id="variable-this~94"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -5960,7 +5960,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~12"></span>
+              <span class="anchor" id="variable-dir~15"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5986,7 +5986,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-get_ng"></span> <h3>private pure function <a href='../proc/get_ng.html'>get_ng</a>(this) result(ng)  
+    <div class="card-header codesum"><span class="anchor" id="proc-get_ng~2"></span> <h3>private pure function <a href='../proc/get_ng~2.html'>get_ng</a>(this) result(ng)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6009,7 +6009,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~16"></span>
+              <span class="anchor" id="variable-this~77"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -6035,7 +6035,7 @@ <h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-is_rational"></span> <h3>private pure function <a href='../proc/is_rational.html'>is_rational</a>(this) result(r)  
+    <div class="card-header codesum"><span class="anchor" id="proc-is_rational~2"></span> <h3>private pure function <a href='../proc/is_rational~2.html'>is_rational</a>(this) result(r)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6058,7 +6058,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~42"></span>
+              <span class="anchor" id="variable-this~103"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -6089,7 +6089,7 @@ <h4>
         <section>
           <h2>Subroutines</h2>
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-ansatz"></span> <h3>private pure subroutine <a href='../proc/ansatz.html'>ansatz</a>(this, ie, ig, Tgc, dTgc_dXg, dV)  
+    <div class="card-header codesum"><span class="anchor" id="proc-ansatz~2"></span> <h3>private pure subroutine <a href='../proc/ansatz~2.html'>ansatz</a>(this, ie, ig, Tgc, dTgc_dXg, dV)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6112,7 +6112,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~67"></span>
+              <span class="anchor" id="variable-this~128"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -6127,7 +6127,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ie"></span>
+              <span class="anchor" id="variable-ie~3"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -6142,7 +6142,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ig"></span>
+              <span class="anchor" id="variable-ig~3"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -6157,7 +6157,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~9"></span>
+              <span class="anchor" id="variable-tgc~32"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6172,7 +6172,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc_dxg"></span>
+              <span class="anchor" id="variable-dtgc_dxg~3"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6208,7 +6208,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-basis_scalar"></span> <h3>private pure subroutine <a href='../proc/basis_scalar.html'>basis_scalar</a>(this, Xt, Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-basis_scalar~2"></span> <h3>private pure subroutine <a href='../proc/basis_scalar~2.html'>basis_scalar</a>(this, Xt, Tgc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6231,7 +6231,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~39"></span>
+              <span class="anchor" id="variable-this~100"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -6246,7 +6246,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~10"></span>
+              <span class="anchor" id="variable-xt~37"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -6261,7 +6261,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~6"></span>
+              <span class="anchor" id="variable-tgc~29"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6282,7 +6282,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-basis_vector"></span> <h3>private pure subroutine <a href='../proc/basis_vector.html'>basis_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-basis_vector~2"></span> <h3>private pure subroutine <a href='../proc/basis_vector~2.html'>basis_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, Tgc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6305,7 +6305,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~38"></span>
+              <span class="anchor" id="variable-this~99"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -6320,7 +6320,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1~4"></span>
+              <span class="anchor" id="variable-res1~6"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6335,7 +6335,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2~4"></span>
+              <span class="anchor" id="variable-res2~6"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6410,7 +6410,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~5"></span>
+              <span class="anchor" id="variable-tgc~28"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6431,7 +6431,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_degree"></span> <h3>private pure subroutine <a href='../proc/cmp_degree.html'>cmp_degree</a>(this, dir)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_degree~2"></span> <h3>private pure subroutine <a href='../proc/cmp_degree~2.html'>cmp_degree</a>(this, dir)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6454,7 +6454,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~17"></span>
+              <span class="anchor" id="variable-this~78"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -6469,7 +6469,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~4"></span>
+              <span class="anchor" id="variable-dir~7"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6490,7 +6490,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-cmp_nc"></span> <h3>private pure subroutine <a href='../proc/cmp_nc.html'>cmp_nc</a>(this, dir)  
+    <div class="card-header codesum"><span class="anchor" id="proc-cmp_nc~2"></span> <h3>private pure subroutine <a href='../proc/cmp_nc~2.html'>cmp_nc</a>(this, dir)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6513,7 +6513,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~31"></span>
+              <span class="anchor" id="variable-this~92"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -6528,7 +6528,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~11"></span>
+              <span class="anchor" id="variable-dir~14"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6572,7 +6572,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~68"></span>
+              <span class="anchor" id="variable-this~129"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -6587,7 +6587,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-volume~2"></span>
+              <span class="anchor" id="variable-volume"></span>
               real(kind=rk),
             </td>
 <td>intent(out)</td>
@@ -6608,7 +6608,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-create"></span> <h3>private pure subroutine <a href='../proc/create.html'>create</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, Xt)  
+    <div class="card-header codesum"><span class="anchor" id="proc-create~2"></span> <h3>private pure subroutine <a href='../proc/create~2.html'>create</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, Xt)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6631,7 +6631,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~5"></span>
+              <span class="anchor" id="variable-this~66"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -6646,7 +6646,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1"></span>
+              <span class="anchor" id="variable-res1~3"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6661,7 +6661,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2"></span>
+              <span class="anchor" id="variable-res2~3"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6736,7 +6736,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~2"></span>
+              <span class="anchor" id="variable-xt~29"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -6757,7 +6757,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-derivative2_scalar"></span> <h3>private pure subroutine <a href='../proc/derivative2_scalar.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-derivative2_scalar~2"></span> <h3>private pure subroutine <a href='../proc/derivative2_scalar~2.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6780,7 +6780,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~37"></span>
+              <span class="anchor" id="variable-this~98"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -6795,7 +6795,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~8"></span>
+              <span class="anchor" id="variable-xt~35"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -6810,7 +6810,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc~2"></span>
+              <span class="anchor" id="variable-d2tgc~9"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6825,7 +6825,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~4"></span>
+              <span class="anchor" id="variable-dtgc~17"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6840,7 +6840,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~4"></span>
+              <span class="anchor" id="variable-tgc~27"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -6861,7 +6861,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-derivative2_vector"></span> <h3>private pure subroutine <a href='../proc/derivative2_vector.html'>derivative2_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, d2Tgc, dTgc, Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-derivative2_vector~2"></span> <h3>private pure subroutine <a href='../proc/derivative2_vector~2.html'>derivative2_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, d2Tgc, dTgc, Tgc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -6884,7 +6884,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~36"></span>
+              <span class="anchor" id="variable-this~97"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -6899,7 +6899,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1~3"></span>
+              <span class="anchor" id="variable-res1~5"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6914,7 +6914,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2~3"></span>
+              <span class="anchor" id="variable-res2~5"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -6989,7 +6989,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc"></span>
+              <span class="anchor" id="variable-d2tgc~8"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -7004,7 +7004,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~3"></span>
+              <span class="anchor" id="variable-dtgc~16"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -7019,7 +7019,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~3"></span>
+              <span class="anchor" id="variable-tgc~26"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -7040,7 +7040,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-derivative_scalar"></span> <h3>private pure subroutine <a href='../proc/derivative_scalar.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
+    <div class="card-header codesum"><span class="anchor" id="proc-derivative_scalar~2"></span> <h3>private pure subroutine <a href='../proc/derivative_scalar~2.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7063,7 +7063,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~35"></span>
+              <span class="anchor" id="variable-this~96"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -7078,7 +7078,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~6"></span>
+              <span class="anchor" id="variable-xt~33"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7093,7 +7093,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~2"></span>
+              <span class="anchor" id="variable-dtgc~15"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -7108,7 +7108,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~2"></span>
+              <span class="anchor" id="variable-tgc~25"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -7123,7 +7123,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem"></span>
+              <span class="anchor" id="variable-elem~5"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -7144,7 +7144,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-derivative_vector"></span> <h3>private pure subroutine <a href='../proc/derivative_vector.html'>derivative_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, dTgc, Tgc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-derivative_vector~2"></span> <h3>private pure subroutine <a href='../proc/derivative_vector~2.html'>derivative_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, dTgc, Tgc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7167,7 +7167,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~34"></span>
+              <span class="anchor" id="variable-this~95"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -7182,7 +7182,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1~2"></span>
+              <span class="anchor" id="variable-res1~4"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -7197,7 +7197,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2~2"></span>
+              <span class="anchor" id="variable-res2~4"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -7272,7 +7272,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc"></span>
+              <span class="anchor" id="variable-dtgc~14"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -7287,7 +7287,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc"></span>
+              <span class="anchor" id="variable-tgc~24"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -7308,7 +7308,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-elevate_degree"></span> <h3>private pure subroutine <a href='../proc/elevate_degree.html'>elevate_degree</a>(this, dir, t)  
+    <div class="card-header codesum"><span class="anchor" id="proc-elevate_degree~2"></span> <h3>private pure subroutine <a href='../proc/elevate_degree~2.html'>elevate_degree</a>(this, dir, t)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7331,7 +7331,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~41"></span>
+              <span class="anchor" id="variable-this~102"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -7346,7 +7346,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~14"></span>
+              <span class="anchor" id="variable-dir~17"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -7361,7 +7361,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-t"></span>
+              <span class="anchor" id="variable-t~5"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -7382,7 +7382,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-export_xc"></span> <h3>private impure subroutine <a href='../proc/export_xc.html'>export_Xc</a>(this, filename)  
+    <div class="card-header codesum"><span class="anchor" id="proc-export_xc~2"></span> <h3>private impure subroutine <a href='../proc/export_xc~2.html'>export_Xc</a>(this, filename)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7405,7 +7405,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~25"></span>
+              <span class="anchor" id="variable-this~86"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -7420,7 +7420,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-filename"></span>
+              <span class="anchor" id="variable-filename~3"></span>
               character(len=*),
             </td>
 <td>intent(in)</td>
@@ -7441,7 +7441,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-export_xg"></span> <h3>private impure subroutine <a href='../proc/export_xg.html'>export_Xg</a>(this, filename)  
+    <div class="card-header codesum"><span class="anchor" id="proc-export_xg~2"></span> <h3>private impure subroutine <a href='../proc/export_xg~2.html'>export_Xg</a>(this, filename)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7464,7 +7464,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~26"></span>
+              <span class="anchor" id="variable-this~87"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -7479,7 +7479,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-filename~2"></span>
+              <span class="anchor" id="variable-filename~4"></span>
               character(len=*),
             </td>
 <td>intent(in)</td>
@@ -7500,7 +7500,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-finalize"></span> <h3>private pure subroutine <a href='../proc/finalize.html'>finalize</a>(this)  
+    <div class="card-header codesum"><span class="anchor" id="proc-finalize~2"></span> <h3>private pure subroutine <a href='../proc/finalize~2.html'>finalize</a>(this)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7523,7 +7523,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~22"></span>
+              <span class="anchor" id="variable-this~83"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -7544,7 +7544,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-insert_knots"></span> <h3>private pure subroutine <a href='../proc/insert_knots.html'>insert_knots</a>(this, dir, Xth, r)  
+    <div class="card-header codesum"><span class="anchor" id="proc-insert_knots~2"></span> <h3>private pure subroutine <a href='../proc/insert_knots~2.html'>insert_knots</a>(this, dir, Xth, r)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7567,7 +7567,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~40"></span>
+              <span class="anchor" id="variable-this~101"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -7582,7 +7582,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~13"></span>
+              <span class="anchor" id="variable-dir~16"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -7597,7 +7597,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth"></span>
+              <span class="anchor" id="variable-xth~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -7612,7 +7612,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-r"></span>
+              <span class="anchor" id="variable-r~4"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -7633,7 +7633,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-modify_wc"></span> <h3>private pure subroutine <a href='../proc/modify_wc.html'>modify_Wc</a>(this, W, num)  
+    <div class="card-header codesum"><span class="anchor" id="proc-modify_wc~2"></span> <h3>private pure subroutine <a href='../proc/modify_wc~2.html'>modify_Wc</a>(this, W, num)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7656,7 +7656,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~28"></span>
+              <span class="anchor" id="variable-this~89"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -7671,7 +7671,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-w"></span>
+              <span class="anchor" id="variable-w~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -7686,7 +7686,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-num~2"></span>
+              <span class="anchor" id="variable-num~4"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -7707,7 +7707,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-modify_xc"></span> <h3>private pure subroutine <a href='../proc/modify_xc.html'>modify_Xc</a>(this, X, num, dir)  
+    <div class="card-header codesum"><span class="anchor" id="proc-modify_xc~2"></span> <h3>private pure subroutine <a href='../proc/modify_xc~2.html'>modify_Xc</a>(this, X, num, dir)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7730,7 +7730,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~27"></span>
+              <span class="anchor" id="variable-this~88"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -7745,7 +7745,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-x"></span>
+              <span class="anchor" id="variable-x~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -7760,7 +7760,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-num"></span>
+              <span class="anchor" id="variable-num~3"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -7775,7 +7775,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~8"></span>
+              <span class="anchor" id="variable-dir~11"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -7796,7 +7796,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-nearest_point"></span> <h3>private pure subroutine <a href='../proc/nearest_point.html'>nearest_point</a>(this, point_Xg, nearest_Xg, nearest_Xt, id)  
+    <div class="card-header codesum"><span class="anchor" id="proc-nearest_point~2"></span> <h3>private pure subroutine <a href='../proc/nearest_point~2.html'>nearest_point</a>(this, point_Xg, nearest_Xg, nearest_Xt, id)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7819,7 +7819,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~61"></span>
+              <span class="anchor" id="variable-this~122"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -7834,7 +7834,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-point_xg"></span>
+              <span class="anchor" id="variable-point_xg~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -7849,7 +7849,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xg~2"></span>
+              <span class="anchor" id="variable-nearest_xg~4"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -7864,7 +7864,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xt~2"></span>
+              <span class="anchor" id="variable-nearest_xt~4"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -7879,7 +7879,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-id~2"></span>
+              <span class="anchor" id="variable-id~3"></span>
               integer,
             </td>
 <td>intent(out),</td>
@@ -7900,7 +7900,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-nearest_point2"></span> <h3>private impure subroutine <a href='../proc/nearest_point2.html'>nearest_point2</a>(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-nearest_point2~2"></span> <h3>private impure subroutine <a href='../proc/nearest_point2~2.html'>nearest_point2</a>(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -7923,7 +7923,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~62"></span>
+              <span class="anchor" id="variable-this~123"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -7938,7 +7938,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-point_xg~2"></span>
+              <span class="anchor" id="variable-point_xg~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -7953,7 +7953,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tol"></span>
+              <span class="anchor" id="variable-tol~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -7968,7 +7968,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-maxit"></span>
+              <span class="anchor" id="variable-maxit~2"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -7983,7 +7983,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xt~3"></span>
+              <span class="anchor" id="variable-nearest_xt~5"></span>
               real(kind=rk),
             </td>
 <td>intent(out)</td>
@@ -7998,7 +7998,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xg~3"></span>
+              <span class="anchor" id="variable-nearest_xg~5"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -8042,7 +8042,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~50"></span>
+              <span class="anchor" id="variable-this~111"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -8057,7 +8057,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-x~2"></span>
+              <span class="anchor" id="variable-x~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8072,7 +8072,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~12"></span>
+              <span class="anchor" id="variable-elemconn~24"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -8093,7 +8093,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-remove_knots"></span> <h3>private pure subroutine <a href='../proc/remove_knots.html'>remove_knots</a>(this, dir, Xth, r)  
+    <div class="card-header codesum"><span class="anchor" id="proc-remove_knots~2"></span> <h3>private pure subroutine <a href='../proc/remove_knots~2.html'>remove_knots</a>(this, dir, Xth, r)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -8116,7 +8116,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~51"></span>
+              <span class="anchor" id="variable-this~112"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -8131,7 +8131,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~15"></span>
+              <span class="anchor" id="variable-dir~18"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -8146,7 +8146,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth~2"></span>
+              <span class="anchor" id="variable-xth~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8161,7 +8161,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-r~3"></span>
+              <span class="anchor" id="variable-r~6"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -8182,7 +8182,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-rotate_xc"></span> <h3>private pure subroutine <a href='../proc/rotate_xc.html'>rotate_Xc</a>(this, alpha, beta, theta)  
+    <div class="card-header codesum"><span class="anchor" id="proc-rotate_xc~2"></span> <h3>private pure subroutine <a href='../proc/rotate_xc~2.html'>rotate_Xc</a>(this, alpha, beta, theta)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -8205,7 +8205,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~53"></span>
+              <span class="anchor" id="variable-this~114"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -8220,7 +8220,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-alpha"></span>
+              <span class="anchor" id="variable-alpha~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -8235,7 +8235,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-beta"></span>
+              <span class="anchor" id="variable-beta~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -8250,7 +8250,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-theta"></span>
+              <span class="anchor" id="variable-theta~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -8271,7 +8271,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-rotate_xg"></span> <h3>private pure subroutine <a href='../proc/rotate_xg.html'>rotate_Xg</a>(this, alpha, beta, theta)  
+    <div class="card-header codesum"><span class="anchor" id="proc-rotate_xg~2"></span> <h3>private pure subroutine <a href='../proc/rotate_xg~2.html'>rotate_Xg</a>(this, alpha, beta, theta)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -8294,7 +8294,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~54"></span>
+              <span class="anchor" id="variable-this~115"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -8309,7 +8309,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-alpha~2"></span>
+              <span class="anchor" id="variable-alpha~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -8324,7 +8324,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-beta~2"></span>
+              <span class="anchor" id="variable-beta~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -8339,7 +8339,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-theta~2"></span>
+              <span class="anchor" id="variable-theta~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -8360,7 +8360,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set1"></span> <h3>private pure subroutine <a href='../proc/set1.html'>set1</a>(this, knot1, knot2, knot3, Xc, Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set1~2"></span> <h3>private pure subroutine <a href='../proc/set1~2.html'>set1</a>(this, knot1, knot2, knot3, Xc, Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -8383,7 +8383,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this"></span>
+              <span class="anchor" id="variable-this~62"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -8398,7 +8398,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~2"></span>
+              <span class="anchor" id="variable-knot1~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8413,7 +8413,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~2"></span>
+              <span class="anchor" id="variable-knot2~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8428,7 +8428,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~2"></span>
+              <span class="anchor" id="variable-knot3~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8443,7 +8443,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~4"></span>
+              <span class="anchor" id="variable-xc~24"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8458,7 +8458,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~3"></span>
+              <span class="anchor" id="variable-wc~27"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8479,7 +8479,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set2"></span> <h3>private pure subroutine <a href='../proc/set2.html'>set2</a>(this, Xth_dir1, Xth_dir2, Xth_dir3, degree, continuity1, continuity2, continuity3, Xc, Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set2~2"></span> <h3>private pure subroutine <a href='../proc/set2~2.html'>set2</a>(this, Xth_dir1, Xth_dir2, Xth_dir3, degree, continuity1, continuity2, continuity3, Xc, Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -8502,7 +8502,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~2"></span>
+              <span class="anchor" id="variable-this~63"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -8562,7 +8562,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~2"></span>
+              <span class="anchor" id="variable-degree~22"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -8622,7 +8622,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~5"></span>
+              <span class="anchor" id="variable-xc~25"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8637,7 +8637,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~4"></span>
+              <span class="anchor" id="variable-wc~28"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8658,7 +8658,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set3"></span> <h3>private pure subroutine <a href='../proc/set3.html'>set3</a>(this, nc, Xc, Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set3~2"></span> <h3>private pure subroutine <a href='../proc/set3~2.html'>set3</a>(this, nc, Xc, Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -8681,7 +8681,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~3"></span>
+              <span class="anchor" id="variable-this~64"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -8696,7 +8696,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~2"></span>
+              <span class="anchor" id="variable-nc~22"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -8711,7 +8711,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~6"></span>
+              <span class="anchor" id="variable-xc~26"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8726,7 +8726,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~5"></span>
+              <span class="anchor" id="variable-wc~29"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8747,7 +8747,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set4"></span> <h3>private pure subroutine <a href='../proc/set4.html'>set4</a>(this, degree, nc, Xc, Wc)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set4~2"></span> <h3>private pure subroutine <a href='../proc/set4~2.html'>set4</a>(this, degree, nc, Xc, Wc)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -8770,7 +8770,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~4"></span>
+              <span class="anchor" id="variable-this~65"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -8785,7 +8785,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~3"></span>
+              <span class="anchor" id="variable-degree~23"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -8800,7 +8800,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~3"></span>
+              <span class="anchor" id="variable-nc~23"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -8815,7 +8815,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~7"></span>
+              <span class="anchor" id="variable-xc~27"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8830,7 +8830,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~6"></span>
+              <span class="anchor" id="variable-wc~30"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8851,7 +8851,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set_c"></span> <h3>private pure subroutine <a href='../proc/set_c.html'>set_C</a>(this, center, radius1, radius2, length)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set_c~2"></span> <h3>private pure subroutine <a href='../proc/set_c~2.html'>set_C</a>(this, center, radius1, radius2, length)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -8874,7 +8874,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~59"></span>
+              <span class="anchor" id="variable-this~120"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -8889,7 +8889,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center~2"></span>
+              <span class="anchor" id="variable-center~6"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -8934,7 +8934,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-length~2"></span>
+              <span class="anchor" id="variable-length~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -8955,7 +8955,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set_elem"></span> <h3>private pure subroutine <a href='../proc/set_elem.html'>set_elem</a>(this, elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set_elem~2"></span> <h3>private pure subroutine <a href='../proc/set_elem~2.html'>set_elem</a>(this, elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -8978,7 +8978,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~45"></span>
+              <span class="anchor" id="variable-this~106"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -8993,7 +8993,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~8"></span>
+              <span class="anchor" id="variable-elemconn~20"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -9014,7 +9014,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set_elem_xc_vis"></span> <h3>private pure subroutine <a href='../proc/set_elem_xc_vis.html'>set_elem_Xc_vis</a>(this, elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set_elem_xc_vis~2"></span> <h3>private pure subroutine <a href='../proc/set_elem_xc_vis~2.html'>set_elem_Xc_vis</a>(this, elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -9037,7 +9037,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~43"></span>
+              <span class="anchor" id="variable-this~104"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -9052,7 +9052,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~6"></span>
+              <span class="anchor" id="variable-elemconn~18"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -9073,7 +9073,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-set_elem_xg_vis"></span> <h3>private pure subroutine <a href='../proc/set_elem_xg_vis.html'>set_elem_Xg_vis</a>(this, elemConn)  
+    <div class="card-header codesum"><span class="anchor" id="proc-set_elem_xg_vis~2"></span> <h3>private pure subroutine <a href='../proc/set_elem_xg_vis~2.html'>set_elem_Xg_vis</a>(this, elemConn)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -9096,7 +9096,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~44"></span>
+              <span class="anchor" id="variable-this~105"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -9111,7 +9111,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~7"></span>
+              <span class="anchor" id="variable-elemconn~19"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -9155,7 +9155,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~60"></span>
+              <span class="anchor" id="variable-this~121"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -9170,7 +9170,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center~3"></span>
+              <span class="anchor" id="variable-center~7"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -9215,7 +9215,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-length~3"></span>
+              <span class="anchor" id="variable-length~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -9259,7 +9259,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~49"></span>
+              <span class="anchor" id="variable-this~110"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -9274,7 +9274,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-l"></span>
+              <span class="anchor" id="variable-l~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -9289,7 +9289,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~7"></span>
+              <span class="anchor" id="variable-nc~27"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -9304,7 +9304,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~9"></span>
+              <span class="anchor" id="variable-wc~33"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -9348,7 +9348,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~58"></span>
+              <span class="anchor" id="variable-this~119"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -9363,7 +9363,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center"></span>
+              <span class="anchor" id="variable-center~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -9408,7 +9408,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-length"></span>
+              <span class="anchor" id="variable-length~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -9429,7 +9429,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-show"></span> <h3>private impure subroutine <a href='../proc/show.html'>show</a>(this, vtkfile_Xc, vtkfile_Xg)  
+    <div class="card-header codesum"><span class="anchor" id="proc-show~2"></span> <h3>private impure subroutine <a href='../proc/show~2.html'>show</a>(this, vtkfile_Xc, vtkfile_Xg)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -9452,7 +9452,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~57"></span>
+              <span class="anchor" id="variable-this~118"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -9467,7 +9467,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-vtkfile_xc"></span>
+              <span class="anchor" id="variable-vtkfile_xc~2"></span>
               character(len=*),
             </td>
 <td>intent(in)</td>
@@ -9482,7 +9482,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-vtkfile_xg"></span>
+              <span class="anchor" id="variable-vtkfile_xg~2"></span>
               character(len=*),
             </td>
 <td>intent(in)</td>
@@ -9503,7 +9503,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-translate_xc"></span> <h3>private pure subroutine <a href='../proc/translate_xc.html'>translate_Xc</a>(this, vec)  
+    <div class="card-header codesum"><span class="anchor" id="proc-translate_xc~2"></span> <h3>private pure subroutine <a href='../proc/translate_xc~2.html'>translate_Xc</a>(this, vec)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -9526,7 +9526,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~55"></span>
+              <span class="anchor" id="variable-this~116"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -9541,7 +9541,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-vec"></span>
+              <span class="anchor" id="variable-vec~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -9562,7 +9562,7 @@ <h4>Arguments</h4>
   </div>
 
               <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-translate_xg"></span> <h3>private pure subroutine <a href='../proc/translate_xg.html'>translate_Xg</a>(this, vec)  
+    <div class="card-header codesum"><span class="anchor" id="proc-translate_xg~2"></span> <h3>private pure subroutine <a href='../proc/translate_xg~2.html'>translate_Xg</a>(this, vec)  
 </h3></div>
     <div class="card-body">
               <dl class="dl-horizontal">
@@ -9585,7 +9585,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~56"></span>
+              <span class="anchor" id="variable-this~117"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -9600,7 +9600,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-vec~2"></span>
+              <span class="anchor" id="variable-vec~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -9643,7 +9643,7 @@ <h4>Arguments</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/module/forcad_utils.html b/module/forcad_utils.html
index aac75071c..81dfcdbf0 100644
--- a/module/forcad_utils.html
+++ b/module/forcad_utils.html
@@ -1782,7 +1782,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~10"></span>
+              <span class="anchor" id="variable-knot~31"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -1830,7 +1830,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~11"></span>
+              <span class="anchor" id="variable-knot~32"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2428,7 +2428,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth1~3"></span>
+              <span class="anchor" id="variable-xth1~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2443,7 +2443,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth2~3"></span>
+              <span class="anchor" id="variable-xth2~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2621,7 +2621,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth1~4"></span>
+              <span class="anchor" id="variable-xth1~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2636,7 +2636,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth2~4"></span>
+              <span class="anchor" id="variable-xth2~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -2779,7 +2779,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~51"></span>
+              <span class="anchor" id="variable-degree~50"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -2882,7 +2882,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~52"></span>
+              <span class="anchor" id="variable-degree~51"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3000,7 +3000,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~53"></span>
+              <span class="anchor" id="variable-degree~52"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3374,7 +3374,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~54"></span>
+              <span class="anchor" id="variable-nc~47"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3438,7 +3438,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~7"></span>
+              <span class="anchor" id="variable-knot~28"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -3453,7 +3453,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~51"></span>
+              <span class="anchor" id="variable-nc~44"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3468,7 +3468,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~44"></span>
+              <span class="anchor" id="variable-degree~43"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3517,7 +3517,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth_dir"></span>
+              <span class="anchor" id="variable-xth_dir~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -3532,7 +3532,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~48"></span>
+              <span class="anchor" id="variable-degree~47"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3547,7 +3547,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-continuity"></span>
+              <span class="anchor" id="variable-continuity~2"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -3660,7 +3660,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~49"></span>
+              <span class="anchor" id="variable-degree~48"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3690,7 +3690,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~13"></span>
+              <span class="anchor" id="variable-knot~34"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -3739,7 +3739,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-l~6"></span>
+              <span class="anchor" id="variable-l~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -3754,7 +3754,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~56"></span>
+              <span class="anchor" id="variable-nc~49"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -3995,7 +3995,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-l~7"></span>
+              <span class="anchor" id="variable-l~6"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -4010,7 +4010,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~57"></span>
+              <span class="anchor" id="variable-nc~50"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4405,7 +4405,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~10"></span>
+              <span class="anchor" id="variable-knot~31"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -4454,7 +4454,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~11"></span>
+              <span class="anchor" id="variable-knot~32"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -4911,7 +4911,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~9"></span>
+              <span class="anchor" id="variable-knot~30"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -4926,7 +4926,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~53"></span>
+              <span class="anchor" id="variable-nc~46"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4941,7 +4941,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~46"></span>
+              <span class="anchor" id="variable-degree~45"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -4971,7 +4971,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-db~2"></span>
+              <span class="anchor" id="variable-db~3"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -4986,7 +4986,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-b~3"></span>
+              <span class="anchor" id="variable-b~4"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5045,7 +5045,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~8"></span>
+              <span class="anchor" id="variable-knot~29"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -5060,7 +5060,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~52"></span>
+              <span class="anchor" id="variable-nc~45"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5075,7 +5075,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~45"></span>
+              <span class="anchor" id="variable-degree~44"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5090,7 +5090,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-db"></span>
+              <span class="anchor" id="variable-db~2"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5105,7 +5105,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-b~2"></span>
+              <span class="anchor" id="variable-b~3"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -5149,7 +5149,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-t~9"></span>
+              <span class="anchor" id="variable-t~8"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5164,7 +5164,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~14"></span>
+              <span class="anchor" id="variable-knot~35"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -5179,7 +5179,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~50"></span>
+              <span class="anchor" id="variable-degree~49"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -5477,7 +5477,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~15"></span>
+              <span class="anchor" id="variable-knot~36"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -5567,7 +5567,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-t~10"></span>
+              <span class="anchor" id="variable-t~9"></span>
               integer,
             </td>
 <td>intent(out)</td>
@@ -5805,7 +5805,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth1~3"></span>
+              <span class="anchor" id="variable-xth1~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -5820,7 +5820,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth2~3"></span>
+              <span class="anchor" id="variable-xth2~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -5999,7 +5999,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth1~4"></span>
+              <span class="anchor" id="variable-xth1~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -6014,7 +6014,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth2~4"></span>
+              <span class="anchor" id="variable-xth2~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -6148,7 +6148,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~51"></span>
+              <span class="anchor" id="variable-degree~50"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -6252,7 +6252,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~52"></span>
+              <span class="anchor" id="variable-degree~51"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -6371,7 +6371,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~53"></span>
+              <span class="anchor" id="variable-degree~52"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -6607,7 +6607,7 @@ <h4>Arguments</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/ansatz.html b/proc/ansatz.html
index 696492fc4..9a48f9b54 100644
--- a/proc/ansatz.html
+++ b/proc/ansatz.html
@@ -78,20 +78,20 @@ <h1>ansatz
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.5% of total for procedures.">34 statements</a>
+                 title=" 0.5% of total for procedures.">31 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">ansatz</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine ansatz(this, ie, ig, Tgc, dTgc_dXg, dV)  
+    <h2>private pure subroutine ansatz(this, ie, ig, Tgc, dTgc_dXg, dL)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~67"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~60"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -203,7 +203,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~9"></span>
+              <span class="anchor" id="variable-tgc~8"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -233,7 +233,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dv"></span>
+              <span class="anchor" id="variable-dl"></span>
               real(kind=rk),
             </td>
 <td>intent(out)</td>
@@ -241,7 +241,7 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>dV</strong></td>
+            <td><strong>dL</strong></td>
             <td>
                 
             </td>
@@ -261,658 +261,628 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~ansatz~~CallsGraph Pages: 1 -->
-<svg id="procansatzCallsGraph" width="641pt" height="335pt"
- viewBox="0.00 0.00 641.00 335.36" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~ansatz~~CallsGraph" class="graph" transform="scale(2.02 2.02) rotate(0) translate(4 673)">
+<svg id="procansatzCallsGraph" width="641pt" height="328pt"
+ viewBox="0.00 0.00 641.00 327.70" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~ansatz~~CallsGraph" class="graph" transform="scale(1.94 1.94) rotate(0) translate(4 633)">
 <title>proc~~ansatz~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-673 1290,-673 1290,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-633 1242,-633 1242,4 -4,4"/>
 <!-- proc~ansatz -->
 <g id="proc~~ansatz~~CallsGraph_node1" class="node">
 <title>proc~ansatz</title>
-<polygon fill="none" stroke="black" points="132,-382 0,-382 0,-358 132,-358 132,-382"/>
-<text text-anchor="middle" x="66" y="-367.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%ansatz</text>
+<polygon fill="none" stroke="black" points="122,-408 0,-408 0,-384 122,-384 122,-408"/>
+<text text-anchor="middle" x="61" y="-393.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%ansatz</text>
 </g>
-<!-- interface~gauss_leg -->
+<!-- interface~dyad -->
 <g id="proc~~ansatz~~CallsGraph_node2" class="node">
-<title>interface~gauss_leg</title>
-<g id="a_proc~~ansatz~~CallsGraph_node2"><a xlink:href="../interface/gauss_leg.html" xlink:title="gauss_leg">
-<polygon fill="#a7506f" stroke="#a7506f" points="277,-606 212,-606 212,-582 277,-582 277,-606"/>
-<text text-anchor="middle" x="244.5" y="-591.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_leg</text>
+<title>interface~dyad</title>
+<g id="a_proc~~ansatz~~CallsGraph_node2"><a xlink:href="../interface/dyad.html" xlink:title="dyad">
+<polygon fill="#a7506f" stroke="#a7506f" points="256.5,-576 202.5,-576 202.5,-552 256.5,-552 256.5,-576"/>
+<text text-anchor="middle" x="229.5" y="-561.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dyad</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;interface~gauss_leg -->
+<!-- proc~ansatz&#45;&gt;interface~dyad -->
 <g id="proc~~ansatz~~CallsGraph_edge1" class="edge">
-<title>proc~ansatz&#45;&gt;interface~gauss_leg</title>
-<path fill="none" stroke="#ff0000" d="M71.44,-382.05C83.19,-412.68 117.7,-494.74 168,-547 179.59,-559.05 194.89,-569.31 208.68,-577.14"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="207.01,-580.22 217.47,-581.94 210.36,-574.08 207.01,-580.22"/>
+<title>proc~ansatz&#45;&gt;interface~dyad</title>
+<path fill="none" stroke="#ff0000" d="M70.41,-408C86.14,-430.01 121.72,-477.69 158,-512 171.23,-524.52 187.52,-536.7 201.1,-546.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="199.34,-549.16 209.57,-551.9 203.28,-543.38 199.34,-549.16"/>
 </g>
-<!-- interface~ndgrid -->
+<!-- interface~gauss_leg -->
 <g id="proc~~ansatz~~CallsGraph_node3" class="node">
-<title>interface~ndgrid</title>
-<g id="a_proc~~ansatz~~CallsGraph_node3"><a xlink:href="../interface/ndgrid.html" xlink:title="ndgrid">
-<polygon fill="#a7506f" stroke="#a7506f" points="691.5,-566 637.5,-566 637.5,-542 691.5,-542 691.5,-566"/>
-<text text-anchor="middle" x="664.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid</text>
+<title>interface~gauss_leg</title>
+<g id="a_proc~~ansatz~~CallsGraph_node3"><a xlink:href="../interface/gauss_leg.html" xlink:title="gauss_leg">
+<polygon fill="#a7506f" stroke="#a7506f" points="262,-503 197,-503 197,-479 262,-479 262,-503"/>
+<text text-anchor="middle" x="229.5" y="-488.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_leg</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;interface~ndgrid -->
+<!-- proc~ansatz&#45;&gt;interface~gauss_leg -->
 <g id="proc~~ansatz~~CallsGraph_edge2" class="edge">
-<title>proc~ansatz&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#ff0000" d="M75.41,-382.28C90.99,-404.01 126.55,-449.11 168,-472 247.63,-515.97 526.61,-542.74 627.09,-551.13"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="627.09,-554.65 637.34,-551.98 627.66,-547.67 627.09,-554.65"/>
+<title>proc~ansatz&#45;&gt;interface~gauss_leg</title>
+<path fill="none" stroke="#ff0000" d="M83.09,-408.03C112.28,-424.69 165.17,-454.87 198.48,-473.87"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="196.9,-477 207.32,-478.92 200.37,-470.92 196.9,-477"/>
 </g>
 <!-- interface~unique -->
 <g id="proc~~ansatz~~CallsGraph_node4" class="node">
 <title>interface~unique</title>
 <g id="a_proc~~ansatz~~CallsGraph_node4"><a xlink:href="../interface/unique.html" xlink:title="unique">
-<polygon fill="#a7506f" stroke="#a7506f" points="479,-395 425,-395 425,-371 479,-371 479,-395"/>
-<text text-anchor="middle" x="452" y="-380.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="454,-429 400,-429 400,-405 454,-405 454,-429"/>
+<text text-anchor="middle" x="427" y="-414.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;interface~unique -->
 <g id="proc~~ansatz~~CallsGraph_edge3" class="edge">
 <title>proc~ansatz&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M132.14,-372.21C213.42,-374.96 349.6,-379.57 414.49,-381.76"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="414.52,-385.27 424.64,-382.11 414.76,-378.27 414.52,-385.27"/>
+<path fill="none" stroke="#ff0000" d="M122.11,-399.47C198.27,-403.86 327.14,-411.3 389.73,-414.91"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="389.71,-418.41 399.9,-415.49 390.12,-411.42 389.71,-418.41"/>
 </g>
 <!-- none~derivative -->
 <g id="proc~~ansatz~~CallsGraph_node5" class="node">
 <title>none~derivative</title>
-<g id="a_proc~~ansatz~~CallsGraph_node5"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative" xlink:title="nurbs_volume%derivative">
-<polygon fill="#a7506f" stroke="#a7506f" points="320,-463 169,-463 169,-439 320,-439 320,-463"/>
-<text text-anchor="middle" x="244.5" y="-448.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative</text>
+<g id="a_proc~~ansatz~~CallsGraph_node5"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative" xlink:title="nurbs_curve%derivative">
+<polygon fill="#a7506f" stroke="#a7506f" points="300,-66 159,-66 159,-42 300,-42 300,-66"/>
+<text text-anchor="middle" x="229.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;none~derivative -->
 <g id="proc~~ansatz~~CallsGraph_edge4" class="edge">
 <title>proc~ansatz&#45;&gt;none~derivative</title>
-<path fill="none" stroke="#ff0000" d="M93.42,-382.13C123.8,-396.06 173.8,-419.01 207.66,-434.55"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="206.64,-437.93 217.18,-438.92 209.56,-431.57 206.64,-437.93"/>
+<path fill="none" stroke="#ff0000" d="M67.03,-383.64C80.67,-350.3 119.97,-255.96 158,-180 176.82,-142.4 201.25,-99.98 215.85,-75.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="219.03,-76.7 221.11,-66.31 213,-73.14 219.03,-76.7"/>
 </g>
 <!-- none~set -->
 <g id="proc~~ansatz~~CallsGraph_node6" class="node">
 <title>none~set</title>
-<g id="a_proc~~ansatz~~CallsGraph_node6"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="301,-150 188,-150 188,-126 301,-126 301,-150"/>
-<text text-anchor="middle" x="244.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<g id="a_proc~~ansatz~~CallsGraph_node6"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="281,-213 178,-213 178,-189 281,-189 281,-213"/>
+<text text-anchor="middle" x="229.5" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;none~set -->
 <g id="proc~~ansatz~~CallsGraph_edge5" class="edge">
 <title>proc~ansatz&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M76.24,-357.85C104.89,-320.19 192.45,-205.1 228.13,-158.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="231.08,-160.1 234.35,-150.03 225.51,-155.87 231.08,-160.1"/>
+<path fill="none" stroke="#ff0000" d="M72.42,-383.8C100.33,-351.11 177.03,-261.28 211.42,-221"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="214.26,-223.07 218.09,-213.19 208.93,-218.53 214.26,-223.07"/>
 </g>
 <!-- proc~cmp_elem -->
 <g id="proc~~ansatz~~CallsGraph_node7" class="node">
 <title>proc~cmp_elem</title>
-<g id="a_proc~~ansatz~~CallsGraph_node7"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_volume%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="321,-340 168,-340 168,-316 321,-316 321,-340"/>
-<text text-anchor="middle" x="244.5" y="-325.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
+<g id="a_proc~~ansatz~~CallsGraph_node7"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_curve%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="301,-388 158,-388 158,-364 301,-364 301,-388"/>
+<text text-anchor="middle" x="229.5" y="-373.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
 <g id="proc~~ansatz~~CallsGraph_edge6" class="edge">
 <title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0000" d="M117.58,-357.96C137.98,-353.11 161.69,-347.47 183,-342.4"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="184,-345.76 192.91,-340.04 182.38,-338.95 184,-345.76"/>
+<path fill="none" stroke="#ff0000" d="M122.11,-388.78C130.48,-387.77 139.19,-386.73 147.86,-385.69"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="148.48,-389.14 157.99,-384.47 147.65,-382.19 148.48,-389.14"/>
 </g>
-<!-- proc~det -->
-<g id="proc~~ansatz~~CallsGraph_node8" class="node">
-<title>proc~det</title>
-<g id="a_proc~~ansatz~~CallsGraph_node8"><a xlink:href="../proc/det.html" xlink:title="det">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="479,-24 425,-24 425,0 479,0 479,-24"/>
-<text text-anchor="middle" x="452" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">det</text>
+<!-- proc~dyad_t1_t1 -->
+<g id="proc~~ansatz~~CallsGraph_node11" class="node">
+<title>proc~dyad_t1_t1</title>
+<g id="a_proc~~ansatz~~CallsGraph_node11"><a xlink:href="../proc/dyad_t1_t1.html" xlink:title="dyad_t1_t1">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="462,-608 392,-608 392,-584 462,-584 462,-608"/>
+<text text-anchor="middle" x="427" y="-593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dyad_t1_t1</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;proc~det -->
+<!-- interface~dyad&#45;&gt;proc~dyad_t1_t1 -->
 <g id="proc~~ansatz~~CallsGraph_edge7" class="edge">
-<title>proc~ansatz&#45;&gt;proc~det</title>
-<path fill="none" stroke="#ff0000" d="M68.41,-357.83C73.7,-317.74 95.85,-188.31 168,-117 219.84,-65.77 256.61,-92.14 321,-58 338.21,-48.88 339.16,-40.83 357,-33 375.18,-25.03 396.71,-19.93 414.57,-16.76"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="415.32,-20.19 424.62,-15.11 414.18,-13.28 415.32,-20.19"/>
-</g>
-<!-- proc~inv -->
-<g id="proc~~ansatz~~CallsGraph_node9" class="node">
-<title>proc~inv</title>
-<g id="a_proc~~ansatz~~CallsGraph_node9"><a xlink:href="../proc/inv.html" xlink:title="inv">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="271.5,-31 217.5,-31 217.5,-7 271.5,-7 271.5,-31"/>
-<text text-anchor="middle" x="244.5" y="-16.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">inv</text>
-</a>
-</g>
-</g>
-<!-- proc~ansatz&#45;&gt;proc~inv -->
-<g id="proc~~ansatz~~CallsGraph_edge8" class="edge">
-<title>proc~ansatz&#45;&gt;proc~inv</title>
-<path fill="none" stroke="#ff0000" d="M68.61,-357.98C74.76,-315.73 99.95,-171.55 168,-77 179.78,-60.63 197.49,-46.68 212.8,-36.57"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="214.9,-39.39 221.47,-31.07 211.15,-33.47 214.9,-39.39"/>
+<title>interface~dyad&#45;&gt;proc~dyad_t1_t1</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M256.87,-568.32C288.92,-573.56 343.48,-582.49 381.95,-588.79"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="381.42,-592.25 391.85,-590.41 382.55,-585.34 381.42,-592.25"/>
 </g>
 <!-- proc~gauss_legendre_1d -->
-<g id="proc~~ansatz~~CallsGraph_node13" class="node">
+<g id="proc~~ansatz~~CallsGraph_node12" class="node">
 <title>proc~gauss_legendre_1d</title>
-<g id="a_proc~~ansatz~~CallsGraph_node13"><a xlink:href="../proc/gauss_legendre_1d.html" xlink:title="gauss_legendre_1D">
-<polygon fill="#d9534f" stroke="#d9534f" points="510,-669 394,-669 394,-645 510,-645 510,-669"/>
-<text text-anchor="middle" x="452" y="-654.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_1D</text>
+<g id="a_proc~~ansatz~~CallsGraph_node12"><a xlink:href="../proc/gauss_legendre_1d.html" xlink:title="gauss_legendre_1D">
+<polygon fill="#d9534f" stroke="#d9534f" points="485,-482 369,-482 369,-458 485,-458 485,-482"/>
+<text text-anchor="middle" x="427" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_1D</text>
 </a>
 </g>
 </g>
 <!-- interface~gauss_leg&#45;&gt;proc~gauss_legendre_1d -->
-<g id="proc~~ansatz~~CallsGraph_edge9" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge8" class="edge">
 <title>interface~gauss_leg&#45;&gt;proc~gauss_legendre_1d</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M274,-606C296.3,-615.09 328.26,-627.42 357,-636 365.59,-638.56 374.7,-640.97 383.75,-643.18"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="382.96,-646.6 393.5,-645.5 384.58,-639.78 382.96,-646.6"/>
+<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M262.35,-487.58C288.43,-484.78 326.23,-480.72 358.93,-477.2"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="359.33,-480.68 368.9,-476.13 358.58,-473.72 359.33,-480.68"/>
 </g>
 <!-- proc~gauss_legendre_2d -->
-<g id="proc~~ansatz~~CallsGraph_node14" class="node">
+<g id="proc~~ansatz~~CallsGraph_node13" class="node">
 <title>proc~gauss_legendre_2d</title>
-<g id="a_proc~~ansatz~~CallsGraph_node14"><a xlink:href="../proc/gauss_legendre_2d.html" xlink:title="gauss_legendre_2D">
-<polygon fill="#d9534f" stroke="#d9534f" points="510,-627 394,-627 394,-603 510,-603 510,-627"/>
-<text text-anchor="middle" x="452" y="-612.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_2D</text>
+<g id="a_proc~~ansatz~~CallsGraph_node13"><a xlink:href="../proc/gauss_legendre_2d.html" xlink:title="gauss_legendre_2D">
+<polygon fill="#d9534f" stroke="#d9534f" points="485,-524 369,-524 369,-500 485,-500 485,-524"/>
+<text text-anchor="middle" x="427" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_2D</text>
 </a>
 </g>
 </g>
 <!-- interface~gauss_leg&#45;&gt;proc~gauss_legendre_2d -->
-<g id="proc~~ansatz~~CallsGraph_edge10" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge9" class="edge">
 <title>interface~gauss_leg&#45;&gt;proc~gauss_legendre_2d</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M277.16,-597.24C305.34,-600.11 347.51,-604.42 383.26,-608.08"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="383.34,-611.6 393.64,-609.14 384.05,-604.64 383.34,-611.6"/>
+<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M262.35,-494.42C288.43,-497.22 326.23,-501.28 358.93,-504.8"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="358.58,-508.28 368.9,-505.87 359.33,-501.32 358.58,-508.28"/>
 </g>
 <!-- proc~gauss_legendre_3d -->
-<g id="proc~~ansatz~~CallsGraph_node15" class="node">
+<g id="proc~~ansatz~~CallsGraph_node14" class="node">
 <title>proc~gauss_legendre_3d</title>
-<g id="a_proc~~ansatz~~CallsGraph_node15"><a xlink:href="../proc/gauss_legendre_3d.html" xlink:title="gauss_legendre_3D">
-<polygon fill="#d9534f" stroke="#d9534f" points="510,-585 394,-585 394,-561 510,-561 510,-585"/>
-<text text-anchor="middle" x="452" y="-570.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_3D</text>
+<g id="a_proc~~ansatz~~CallsGraph_node14"><a xlink:href="../proc/gauss_legendre_3d.html" xlink:title="gauss_legendre_3D">
+<polygon fill="#d9534f" stroke="#d9534f" points="485,-566 369,-566 369,-542 485,-542 485,-566"/>
+<text text-anchor="middle" x="427" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_3D</text>
 </a>
 </g>
 </g>
 <!-- interface~gauss_leg&#45;&gt;proc~gauss_legendre_3d -->
-<g id="proc~~ansatz~~CallsGraph_edge11" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge10" class="edge">
 <title>interface~gauss_leg&#45;&gt;proc~gauss_legendre_3d</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M277.16,-590.76C305.34,-587.89 347.51,-583.58 383.26,-579.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="384.05,-583.36 393.64,-578.86 383.34,-576.4 384.05,-583.36"/>
-</g>
-<!-- proc~ndgrid2 -->
-<g id="proc~~ansatz~~CallsGraph_node17" class="node">
-<title>proc~ndgrid2</title>
-<g id="a_proc~~ansatz~~CallsGraph_node17"><a xlink:href="../proc/ndgrid2.html" xlink:title="ndgrid2">
-<polygon fill="#d9534f" stroke="#d9534f" points="898,-587 844,-587 844,-563 898,-563 898,-587"/>
-<text text-anchor="middle" x="871" y="-572.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid2</text>
-</a>
-</g>
-</g>
-<!-- interface~ndgrid&#45;&gt;proc~ndgrid2 -->
-<g id="proc~~ansatz~~CallsGraph_edge12" class="edge">
-<title>interface~ndgrid&#45;&gt;proc~ndgrid2</title>
-<path fill="none" stroke="#ffbf00" stroke-dasharray="5,2" d="M691.82,-556.7C727.94,-560.41 793.03,-567.1 833.74,-571.28"/>
-<polygon fill="#ffbf00" stroke="#ffbf00" points="833.48,-574.77 843.78,-572.31 834.19,-567.8 833.48,-574.77"/>
-</g>
-<!-- proc~ndgrid3 -->
-<g id="proc~~ansatz~~CallsGraph_node18" class="node">
-<title>proc~ndgrid3</title>
-<g id="a_proc~~ansatz~~CallsGraph_node18"><a xlink:href="../proc/ndgrid3.html" xlink:title="ndgrid3">
-<polygon fill="#d9534f" stroke="#d9534f" points="898,-545 844,-545 844,-521 898,-521 898,-545"/>
-<text text-anchor="middle" x="871" y="-530.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid3</text>
-</a>
-</g>
-</g>
-<!-- interface~ndgrid&#45;&gt;proc~ndgrid3 -->
-<g id="proc~~ansatz~~CallsGraph_edge13" class="edge">
-<title>interface~ndgrid&#45;&gt;proc~ndgrid3</title>
-<path fill="none" stroke="#ffbf00" stroke-dasharray="5,2" d="M691.82,-551.3C727.94,-547.59 793.03,-540.9 833.74,-536.72"/>
-<polygon fill="#ffbf00" stroke="#ffbf00" points="834.19,-540.2 843.78,-535.69 833.48,-533.23 834.19,-540.2"/>
+<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M258.14,-503.17C279.41,-512.22 309.69,-524.44 337,-533 344.35,-535.3 352.11,-537.49 359.86,-539.52"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="359.09,-542.93 369.64,-542 360.81,-536.15 359.09,-542.93"/>
 </g>
 <!-- proc~unique_integer -->
-<g id="proc~~ansatz~~CallsGraph_node23" class="node">
+<g id="proc~~ansatz~~CallsGraph_node21" class="node">
 <title>proc~unique_integer</title>
-<g id="a_proc~~ansatz~~CallsGraph_node23"><a xlink:href="../proc/unique_integer.html" xlink:title="unique_integer">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="711,-440 618,-440 618,-416 711,-416 711,-440"/>
-<text text-anchor="middle" x="664.5" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_integer</text>
+<g id="a_proc~~ansatz~~CallsGraph_node21"><a xlink:href="../proc/unique_integer.html" xlink:title="unique_integer">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="676.5,-440 583.5,-440 583.5,-416 676.5,-416 676.5,-440"/>
+<text text-anchor="middle" x="630" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_integer</text>
 </a>
 </g>
 </g>
 <!-- interface~unique&#45;&gt;proc~unique_integer -->
-<g id="proc~~ansatz~~CallsGraph_edge14" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge11" class="edge">
 <title>interface~unique&#45;&gt;proc~unique_integer</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M479.23,-388.61C511.2,-395.44 566.1,-407.18 607.68,-416.07"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="607.16,-419.53 617.67,-418.2 608.62,-412.69 607.16,-419.53"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M454.28,-418.44C484.36,-420.08 534.5,-422.83 573.37,-424.96"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="573.32,-428.46 583.5,-425.51 573.71,-421.47 573.32,-428.46"/>
 </g>
 <!-- proc~unique_real -->
-<g id="proc~~ansatz~~CallsGraph_node24" class="node">
+<g id="proc~~ansatz~~CallsGraph_node22" class="node">
 <title>proc~unique_real</title>
-<g id="a_proc~~ansatz~~CallsGraph_node24"><a xlink:href="../proc/unique_real.html" xlink:title="unique_real">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="702,-398 627,-398 627,-374 702,-374 702,-398"/>
-<text text-anchor="middle" x="664.5" y="-383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_real</text>
+<g id="a_proc~~ansatz~~CallsGraph_node22"><a xlink:href="../proc/unique_real.html" xlink:title="unique_real">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="667.5,-482 592.5,-482 592.5,-458 667.5,-458 667.5,-482"/>
+<text text-anchor="middle" x="630" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_real</text>
 </a>
 </g>
 </g>
 <!-- interface~unique&#45;&gt;proc~unique_real -->
-<g id="proc~~ansatz~~CallsGraph_edge15" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge12" class="edge">
 <title>interface~unique&#45;&gt;proc~unique_real</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M479.23,-383.37C513.55,-383.86 574.26,-384.73 616.58,-385.33"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="616.6,-388.83 626.65,-385.47 616.7,-381.83 616.6,-388.83"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M454.28,-423.93C486.85,-432.52 542.91,-447.3 582.75,-457.8"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="581.94,-461.21 592.5,-460.38 583.72,-454.44 581.94,-461.21"/>
 </g>
 <!-- proc~derivative_scalar -->
-<g id="proc~~ansatz~~CallsGraph_node11" class="node">
+<g id="proc~~ansatz~~CallsGraph_node9" class="node">
 <title>proc~derivative_scalar</title>
-<g id="a_proc~~ansatz~~CallsGraph_node11"><a xlink:href="../proc/derivative_scalar.html" xlink:title="nurbs_volume%derivative_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="546,-463 358,-463 358,-439 546,-439 546,-463"/>
-<text text-anchor="middle" x="452" y="-448.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_scalar</text>
+<g id="a_proc~~ansatz~~CallsGraph_node9"><a xlink:href="../proc/derivative_scalar.html" xlink:title="nurbs_curve%derivative_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="516,-66 338,-66 338,-42 516,-42 516,-66"/>
+<text text-anchor="middle" x="427" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_scalar</text>
 </a>
 </g>
 </g>
 <!-- none~derivative&#45;&gt;proc~derivative_scalar -->
-<g id="proc~~ansatz~~CallsGraph_edge16" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge13" class="edge">
 <title>none~derivative&#45;&gt;proc~derivative_scalar</title>
-<path fill="none" stroke="#00ff3f" stroke-dasharray="5,2" d="M320.27,-451C329.2,-451 338.44,-451 347.69,-451"/>
-<polygon fill="#00ff3f" stroke="#00ff3f" points="347.71,-454.5 357.71,-451 347.71,-447.5 347.71,-454.5"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M300.25,-54C309.19,-54 318.47,-54 327.76,-54"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="327.82,-57.5 337.82,-54 327.82,-50.5 327.82,-57.5"/>
 </g>
 <!-- proc~derivative_vector -->
-<g id="proc~~ansatz~~CallsGraph_node12" class="node">
+<g id="proc~~ansatz~~CallsGraph_node10" class="node">
 <title>proc~derivative_vector</title>
-<g id="a_proc~~ansatz~~CallsGraph_node12"><a xlink:href="../proc/derivative_vector.html" xlink:title="nurbs_volume%derivative_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="547,-505 357,-505 357,-481 547,-481 547,-505"/>
-<text text-anchor="middle" x="452" y="-490.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_vector</text>
+<g id="a_proc~~ansatz~~CallsGraph_node10"><a xlink:href="../proc/derivative_vector.html" xlink:title="nurbs_curve%derivative_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="517,-24 337,-24 337,0 517,0 517,-24"/>
+<text text-anchor="middle" x="427" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_vector</text>
 </a>
 </g>
 </g>
 <!-- none~derivative&#45;&gt;proc~derivative_vector -->
-<g id="proc~~ansatz~~CallsGraph_edge17" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge14" class="edge">
 <title>none~derivative&#45;&gt;proc~derivative_vector</title>
-<path fill="none" stroke="#00ff3f" stroke-dasharray="5,2" d="M304.39,-463.04C328.68,-468 357,-473.79 382.23,-478.95"/>
-<polygon fill="#00ff3f" stroke="#00ff3f" points="381.61,-482.39 392.1,-480.96 383.01,-475.53 381.61,-482.39"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M286.52,-41.96C309.43,-37.04 336.1,-31.31 359.94,-26.19"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="360.93,-29.56 369.97,-24.04 359.46,-22.72 360.93,-29.56"/>
 </g>
 <!-- proc~set1 -->
-<g id="proc~~ansatz~~CallsGraph_node19" class="node">
+<g id="proc~~ansatz~~CallsGraph_node16" class="node">
 <title>proc~set1</title>
-<g id="a_proc~~ansatz~~CallsGraph_node19"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="512,-150 392,-150 392,-126 512,-126 512,-150"/>
-<text text-anchor="middle" x="452" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
+<g id="a_proc~~ansatz~~CallsGraph_node16"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="482,-276 372,-276 372,-252 482,-252 482,-276"/>
+<text text-anchor="middle" x="427" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set1 -->
-<g id="proc~~ansatz~~CallsGraph_edge18" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge15" class="edge">
 <title>none~set&#45;&gt;proc~set1</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M301.11,-138C325.88,-138 355.31,-138 381.5,-138"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="381.75,-141.5 391.75,-138 381.75,-134.5 381.75,-141.5"/>
+<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M258.14,-213.17C279.41,-222.22 309.69,-234.44 337,-243 344.95,-245.49 353.38,-247.84 361.76,-250.01"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="360.99,-253.42 371.54,-252.46 362.69,-246.63 360.99,-253.42"/>
+</g>
+<!-- proc~set1a -->
+<g id="proc~~ansatz~~CallsGraph_node17" class="node">
+<title>proc~set1a</title>
+<g id="a_proc~~ansatz~~CallsGraph_node17"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="485.5,-234 368.5,-234 368.5,-210 485.5,-210 485.5,-234"/>
+<text text-anchor="middle" x="427" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+</a>
+</g>
+</g>
+<!-- none~set&#45;&gt;proc~set1a -->
+<g id="proc~~ansatz~~CallsGraph_edge16" class="edge">
+<title>none~set&#45;&gt;proc~set1a</title>
+<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M281.1,-206.44C304.57,-208.96 332.8,-211.99 358.09,-214.71"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="358.04,-218.22 368.35,-215.81 358.78,-211.26 358.04,-218.22"/>
 </g>
 <!-- proc~set2 -->
-<g id="proc~~ansatz~~CallsGraph_node20" class="node">
+<g id="proc~~ansatz~~CallsGraph_node18" class="node">
 <title>proc~set2</title>
-<g id="a_proc~~ansatz~~CallsGraph_node20"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="512,-108 392,-108 392,-84 512,-84 512,-108"/>
-<text text-anchor="middle" x="452" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
+<g id="a_proc~~ansatz~~CallsGraph_node18"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="482,-108 372,-108 372,-84 482,-84 482,-108"/>
+<text text-anchor="middle" x="427" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set2 -->
-<g id="proc~~ansatz~~CallsGraph_edge19" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge17" class="edge">
 <title>none~set&#45;&gt;proc~set2</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M301.11,-126.63C326.09,-121.53 355.82,-115.45 382.18,-110.06"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="383.01,-113.47 392.11,-108.04 381.61,-106.61 383.01,-113.47"/>
+<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M242.07,-188.97C260.45,-170.61 298.19,-135.74 337,-117 344.89,-113.19 353.52,-110.04 362.2,-107.46"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="363.28,-110.79 371.99,-104.77 361.42,-104.04 363.28,-110.79"/>
 </g>
 <!-- proc~set3 -->
-<g id="proc~~ansatz~~CallsGraph_node21" class="node">
+<g id="proc~~ansatz~~CallsGraph_node19" class="node">
 <title>proc~set3</title>
-<g id="a_proc~~ansatz~~CallsGraph_node21"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="512,-192 392,-192 392,-168 512,-168 512,-192"/>
-<text text-anchor="middle" x="452" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
+<g id="a_proc~~ansatz~~CallsGraph_node19"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="482,-192 372,-192 372,-168 482,-168 482,-192"/>
+<text text-anchor="middle" x="427" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set3 -->
-<g id="proc~~ansatz~~CallsGraph_edge20" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge18" class="edge">
 <title>none~set&#45;&gt;proc~set3</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M301.11,-149.37C326.09,-154.47 355.82,-160.55 382.18,-165.94"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="381.61,-169.39 392.11,-167.96 383.01,-162.53 381.61,-169.39"/>
+<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M281.1,-195.56C305.67,-192.93 335.47,-189.72 361.63,-186.91"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="362.27,-190.37 371.84,-185.82 361.53,-183.41 362.27,-190.37"/>
 </g>
 <!-- proc~set4 -->
-<g id="proc~~ansatz~~CallsGraph_node22" class="node">
+<g id="proc~~ansatz~~CallsGraph_node20" class="node">
 <title>proc~set4</title>
-<g id="a_proc~~ansatz~~CallsGraph_node22"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="512,-66 392,-66 392,-42 512,-42 512,-66"/>
-<text text-anchor="middle" x="452" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
+<g id="a_proc~~ansatz~~CallsGraph_node20"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="482,-150 372,-150 372,-126 482,-126 482,-150"/>
+<text text-anchor="middle" x="427" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set4 -->
-<g id="proc~~ansatz~~CallsGraph_edge21" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge19" class="edge">
 <title>none~set&#45;&gt;proc~set4</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M278.47,-125.96C292.08,-120.39 307.73,-113.2 321,-105 338.72,-94.05 338.31,-84.2 357,-75 364.85,-71.14 373.42,-67.98 382.08,-65.39"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="383.15,-68.73 391.87,-62.71 381.3,-61.98 383.15,-68.73"/>
+<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M258.14,-188.83C279.41,-179.78 309.69,-167.56 337,-159 344.95,-156.51 353.38,-154.16 361.76,-151.99"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="362.69,-155.37 371.54,-149.54 360.99,-148.58 362.69,-155.37"/>
 </g>
 <!-- proc~cmp_elem&#45;&gt;interface~unique -->
-<g id="proc~~ansatz~~CallsGraph_edge23" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge21" class="edge">
 <title>proc~cmp_elem&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#003fff" d="M290.34,-340C327.75,-350.01 380.36,-364.09 415.04,-373.38"/>
-<polygon fill="#003fff" stroke="#003fff" points="414.19,-376.77 424.76,-375.98 416,-370.01 414.19,-376.77"/>
+<path fill="none" stroke="#ff00ff" d="M287.84,-388.02C320.85,-394.95 361.33,-403.44 389.91,-409.43"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="389.37,-412.89 399.87,-411.52 390.8,-406.04 389.37,-412.89"/>
 </g>
 <!-- interface~elemconn_cn -->
-<g id="proc~~ansatz~~CallsGraph_node10" class="node">
+<g id="proc~~ansatz~~CallsGraph_node8" class="node">
 <title>interface~elemconn_cn</title>
-<g id="a_proc~~ansatz~~CallsGraph_node10"><a xlink:href="../interface/elemconn_cn.html" xlink:title="elemConn_Cn">
-<polygon fill="#a7506f" stroke="#a7506f" points="495.5,-319 408.5,-319 408.5,-295 495.5,-295 495.5,-319"/>
-<text text-anchor="middle" x="452" y="-304.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_Cn</text>
+<g id="a_proc~~ansatz~~CallsGraph_node8"><a xlink:href="../interface/elemconn_cn.html" xlink:title="elemConn_Cn">
+<polygon fill="#a7506f" stroke="#a7506f" points="470.5,-366 383.5,-366 383.5,-342 470.5,-342 470.5,-366"/>
+<text text-anchor="middle" x="427" y="-351.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_Cn</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem&#45;&gt;interface~elemconn_cn -->
-<g id="proc~~ansatz~~CallsGraph_edge22" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge20" class="edge">
 <title>proc~cmp_elem&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#003fff" d="M321.15,-320.27C346.77,-317.65 374.81,-314.79 398.25,-312.39"/>
-<polygon fill="#003fff" stroke="#003fff" points="398.75,-315.86 408.34,-311.36 398.04,-308.89 398.75,-315.86"/>
+<path fill="none" stroke="#ff00ff" d="M301.08,-368.06C324.87,-365.38 351,-362.44 373.18,-359.94"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="373.85,-363.39 383.4,-358.79 373.07,-356.43 373.85,-363.39"/>
 </g>
 <!-- proc~get_multiplicity -->
-<g id="proc~~ansatz~~CallsGraph_node16" class="node">
+<g id="proc~~ansatz~~CallsGraph_node15" class="node">
 <title>proc~get_multiplicity</title>
-<g id="a_proc~~ansatz~~CallsGraph_node16"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="960,-192 782,-192 782,-168 960,-168 960,-192"/>
-<text text-anchor="middle" x="871" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
+<g id="a_proc~~ansatz~~CallsGraph_node15"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="912,-254 743,-254 743,-230 912,-230 912,-254"/>
+<text text-anchor="middle" x="827.5" y="-239.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem&#45;&gt;proc~get_multiplicity -->
-<g id="proc~~ansatz~~CallsGraph_edge24" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge22" class="edge">
 <title>proc~cmp_elem&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#003fff" d="M273.96,-315.88C296.25,-306.73 328.2,-294.37 357,-286 438.44,-262.35 673.5,-216.9 795.12,-193.96"/>
-<polygon fill="#003fff" stroke="#003fff" points="795.92,-197.37 805.1,-192.08 794.63,-190.5 795.92,-197.37"/>
-</g>
-<!-- proc~inv&#45;&gt;proc~det -->
-<g id="proc~~ansatz~~CallsGraph_edge25" class="edge">
-<title>proc~inv&#45;&gt;proc~det</title>
-<path fill="none" stroke="#ff00bf" d="M271.53,-18.11C307.79,-16.88 373.68,-14.63 414.74,-13.24"/>
-<polygon fill="#ff00bf" stroke="#ff00bf" points="414.99,-16.73 424.86,-12.89 414.75,-9.73 414.99,-16.73"/>
-</g>
-<!-- proc~inv&#45;&gt;proc~inv -->
-<g id="proc~~ansatz~~CallsGraph_edge26" class="edge">
-<title>proc~inv&#45;&gt;proc~inv</title>
-<path fill="none" stroke="#ff00bf" d="M217.07,-29.45C203.72,-38.89 212.86,-49 244.5,-49 266.74,-49 277.87,-44 277.87,-37.75"/>
-<polygon fill="#ff00bf" stroke="#ff00bf" points="280.6,-35.55 271.93,-29.45 274.91,-39.62 280.6,-35.55"/>
+<path fill="none" stroke="#ff00ff" d="M257.24,-363.92C278.53,-354.62 309.28,-341.88 337,-333 471.1,-290.04 632.75,-264.91 732.58,-252.31"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="733.16,-255.76 742.65,-251.05 732.29,-248.82 733.16,-255.76"/>
 </g>
 <!-- proc~cmp_elemconn_cn_l -->
-<g id="proc~~ansatz~~CallsGraph_node29" class="node">
+<g id="proc~~ansatz~~CallsGraph_node28" class="node">
 <title>proc~cmp_elemconn_cn_l</title>
-<g id="a_proc~~ansatz~~CallsGraph_node29"><a xlink:href="../proc/cmp_elemconn_cn_l.html" xlink:title="cmp_elemConn_Cn_L">
-<polygon fill="#d9534f" stroke="#d9534f" points="728,-356 601,-356 601,-332 728,-332 728,-356"/>
-<text text-anchor="middle" x="664.5" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_L</text>
+<g id="a_proc~~ansatz~~CallsGraph_node28"><a xlink:href="../proc/cmp_elemconn_cn_l.html" xlink:title="cmp_elemConn_Cn_L">
+<polygon fill="#d9534f" stroke="#d9534f" points="693.5,-398 566.5,-398 566.5,-374 693.5,-374 693.5,-398"/>
+<text text-anchor="middle" x="630" y="-383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_L</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_l -->
-<g id="proc~~ansatz~~CallsGraph_edge27" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge23" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_l</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M495.6,-314.49C522.81,-319.27 558.8,-325.6 590.48,-331.17"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="590.14,-334.66 600.6,-332.94 591.35,-327.77 590.14,-334.66"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M470.63,-360.79C495.47,-364.74 527.47,-369.84 556.2,-374.41"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="555.78,-377.89 566.2,-376 556.88,-370.97 555.78,-377.89"/>
 </g>
 <!-- proc~cmp_elemconn_cn_s -->
-<g id="proc~~ansatz~~CallsGraph_node30" class="node">
+<g id="proc~~ansatz~~CallsGraph_node29" class="node">
 <title>proc~cmp_elemconn_cn_s</title>
-<g id="a_proc~~ansatz~~CallsGraph_node30"><a xlink:href="../proc/cmp_elemconn_cn_s.html" xlink:title="cmp_elemConn_Cn_S">
-<polygon fill="#d9534f" stroke="#d9534f" points="728,-314 601,-314 601,-290 728,-290 728,-314"/>
-<text text-anchor="middle" x="664.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_S</text>
+<g id="a_proc~~ansatz~~CallsGraph_node29"><a xlink:href="../proc/cmp_elemconn_cn_s.html" xlink:title="cmp_elemConn_Cn_S">
+<polygon fill="#d9534f" stroke="#d9534f" points="693.5,-356 566.5,-356 566.5,-332 693.5,-332 693.5,-356"/>
+<text text-anchor="middle" x="630" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_S</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_s -->
-<g id="proc~~ansatz~~CallsGraph_edge28" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge24" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_s</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M495.6,-305.99C522.81,-305.34 558.8,-304.49 590.48,-303.73"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="590.68,-307.23 600.6,-303.49 590.52,-300.23 590.68,-307.23"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M470.63,-351.88C495.47,-350.64 527.47,-349.05 556.2,-347.62"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="556.39,-351.12 566.2,-347.12 556.04,-344.13 556.39,-351.12"/>
 </g>
 <!-- proc~cmp_elemconn_cn_v -->
-<g id="proc~~ansatz~~CallsGraph_node31" class="node">
+<g id="proc~~ansatz~~CallsGraph_node30" class="node">
 <title>proc~cmp_elemconn_cn_v</title>
-<g id="a_proc~~ansatz~~CallsGraph_node31"><a xlink:href="../proc/cmp_elemconn_cn_v.html" xlink:title="cmp_elemConn_Cn_V">
-<polygon fill="#d9534f" stroke="#d9534f" points="728.5,-272 600.5,-272 600.5,-248 728.5,-248 728.5,-272"/>
-<text text-anchor="middle" x="664.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_V</text>
+<g id="a_proc~~ansatz~~CallsGraph_node30"><a xlink:href="../proc/cmp_elemconn_cn_v.html" xlink:title="cmp_elemConn_Cn_V">
+<polygon fill="#d9534f" stroke="#d9534f" points="694,-314 566,-314 566,-290 694,-290 694,-314"/>
+<text text-anchor="middle" x="630" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_V</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_v -->
-<g id="proc~~ansatz~~CallsGraph_edge29" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge25" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_v</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M495.6,-297.49C525.56,-290.8 566.17,-281.73 599.94,-274.19"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="600.73,-277.6 609.73,-272.01 599.2,-270.77 600.73,-277.6"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M470.63,-342.97C500.39,-335.27 540.43,-324.91 572.8,-316.54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="573.77,-319.9 582.58,-314.01 572.02,-313.13 573.77,-319.9"/>
 </g>
 <!-- interface~compute_dtgc -->
-<g id="proc~~ansatz~~CallsGraph_node26" class="node">
+<g id="proc~~ansatz~~CallsGraph_node24" class="node">
 <title>interface~compute_dtgc</title>
-<g id="a_proc~~ansatz~~CallsGraph_node26"><a xlink:href="../interface/compute_dtgc.html" xlink:title="compute_dTgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="710,-524 619,-524 619,-500 710,-500 710,-524"/>
-<text text-anchor="middle" x="664.5" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
+<g id="a_proc~~ansatz~~CallsGraph_node24"><a xlink:href="../interface/compute_dtgc.html" xlink:title="compute_dTgc">
+<polygon fill="#a7506f" stroke="#a7506f" points="675.5,-24 584.5,-24 584.5,0 675.5,0 675.5,-24"/>
+<text text-anchor="middle" x="630" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_scalar&#45;&gt;interface~compute_dtgc -->
-<g id="proc~~ansatz~~CallsGraph_edge30" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge26" class="edge">
 <title>proc~derivative_scalar&#45;&gt;interface~compute_dtgc</title>
-<path fill="none" stroke="#ff6600" d="M517.62,-463.05C527.59,-465.59 537.66,-468.56 547,-472 563.98,-478.25 566.14,-484.45 583,-491 591.22,-494.19 600.09,-497.05 608.84,-499.56"/>
-<polygon fill="#ff6600" stroke="#ff6600" points="608.06,-502.98 618.63,-502.25 609.91,-496.23 608.06,-502.98"/>
+<path fill="none" stroke="#ff6600" d="M485.6,-41.96C513.6,-36.11 547.07,-29.12 574.63,-23.36"/>
+<polygon fill="#ff6600" stroke="#ff6600" points="575.42,-26.77 584.49,-21.3 573.99,-19.92 575.42,-26.77"/>
 </g>
 <!-- proc~is_rational -->
-<g id="proc~~ansatz~~CallsGraph_node34" class="node">
+<g id="proc~~ansatz~~CallsGraph_node32" class="node">
 <title>proc~is_rational</title>
-<g id="a_proc~~ansatz~~CallsGraph_node34"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="740.5,-482 588.5,-482 588.5,-458 740.5,-458 740.5,-482"/>
-<text text-anchor="middle" x="664.5" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
+<g id="a_proc~~ansatz~~CallsGraph_node32"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="701,-66 559,-66 559,-42 701,-42 701,-66"/>
+<text text-anchor="middle" x="630" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_scalar&#45;&gt;proc~is_rational -->
-<g id="proc~~ansatz~~CallsGraph_edge31" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge27" class="edge">
 <title>proc~derivative_scalar&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ff6600" d="M546.25,-459.42C556.91,-460.38 567.75,-461.36 578.3,-462.31"/>
-<polygon fill="#ff6600" stroke="#ff6600" points="578.05,-465.8 588.32,-463.21 578.68,-458.83 578.05,-465.8"/>
-</g>
-<!-- proc~derivative_vector&#45;&gt;interface~ndgrid -->
-<g id="proc~~ansatz~~CallsGraph_edge33" class="edge">
-<title>proc~derivative_vector&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#ffcc00" d="M500.14,-505.04C515.21,-509.15 531.89,-513.99 547,-519 563.29,-524.41 566.67,-527.71 583,-533 597.37,-537.65 613.44,-542.01 627.42,-545.54"/>
-<polygon fill="#ffcc00" stroke="#ffcc00" points="626.63,-548.94 637.18,-547.95 628.31,-542.15 626.63,-548.94"/>
+<path fill="none" stroke="#ff6600" d="M516.16,-54C526.95,-54 537.94,-54 548.61,-54"/>
+<polygon fill="#ff6600" stroke="#ff6600" points="548.72,-57.5 558.72,-54 548.72,-50.5 548.72,-57.5"/>
 </g>
 <!-- proc~derivative_vector&#45;&gt;interface~compute_dtgc -->
-<g id="proc~~ansatz~~CallsGraph_edge32" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge28" class="edge">
 <title>proc~derivative_vector&#45;&gt;interface~compute_dtgc</title>
-<path fill="none" stroke="#ffcc00" d="M547.17,-501.5C568.23,-503.4 589.88,-505.36 608.72,-507.06"/>
-<polygon fill="#ffcc00" stroke="#ffcc00" points="608.59,-510.56 618.87,-507.97 609.22,-503.59 608.59,-510.56"/>
+<path fill="none" stroke="#ffcc00" d="M517.04,-12C536.53,-12 556.6,-12 574.27,-12"/>
+<polygon fill="#ffcc00" stroke="#ffcc00" points="574.37,-15.5 584.37,-12 574.37,-8.5 574.37,-15.5"/>
 </g>
 <!-- proc~derivative_vector&#45;&gt;proc~is_rational -->
-<g id="proc~~ansatz~~CallsGraph_edge34" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge29" class="edge">
 <title>proc~derivative_vector&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ffcc00" d="M547.17,-482.71C557.51,-481.58 568,-480.43 578.23,-479.32"/>
-<polygon fill="#ffcc00" stroke="#ffcc00" points="578.79,-482.78 588.35,-478.21 578.03,-475.82 578.79,-482.78"/>
+<path fill="none" stroke="#ffcc00" d="M485.6,-24.04C509.25,-28.98 536.81,-34.74 561.41,-39.88"/>
+<polygon fill="#ffcc00" stroke="#ffcc00" points="560.89,-43.34 571.39,-41.96 562.32,-36.49 560.89,-43.34"/>
 </g>
 <!-- gauss_legendre -->
-<g id="proc~~ansatz~~CallsGraph_node25" class="node">
+<g id="proc~~ansatz~~CallsGraph_node23" class="node">
 <title>gauss_legendre</title>
-<polygon fill="#777777" stroke="#777777" points="712.5,-650 616.5,-650 616.5,-626 712.5,-626 712.5,-650"/>
-<text text-anchor="middle" x="664.5" y="-635.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre</text>
+<polygon fill="#777777" stroke="#777777" points="678,-524 582,-524 582,-500 678,-500 678,-524"/>
+<text text-anchor="middle" x="630" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre</text>
 </g>
 <!-- proc~gauss_legendre_1d&#45;&gt;gauss_legendre -->
-<g id="proc~~ansatz~~CallsGraph_edge35" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge30" class="edge">
 <title>proc~gauss_legendre_1d&#45;&gt;gauss_legendre</title>
-<path fill="none" stroke="#cbff00" d="M510.24,-651.83C539.97,-649.15 576.21,-645.88 605.98,-643.19"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="606.57,-646.65 616.22,-642.27 605.95,-639.68 606.57,-646.65"/>
-</g>
-<!-- proc~gauss_legendre_2d&#45;&gt;interface~ndgrid -->
-<g id="proc~~ansatz~~CallsGraph_edge37" class="edge">
-<title>proc~gauss_legendre_2d&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#65ff00" d="M510.37,-604.73C522.63,-601.83 535.39,-598.27 547,-594 563.98,-587.75 566.14,-581.55 583,-575 597.19,-569.49 613.35,-564.96 627.44,-561.53"/>
-<polygon fill="#65ff00" stroke="#65ff00" points="628.34,-564.91 637.28,-559.23 626.75,-558.1 628.34,-564.91"/>
+<path fill="none" stroke="#65ff00" d="M485.06,-481.92C512.23,-487.6 544.65,-494.37 571.83,-500.05"/>
+<polygon fill="#65ff00" stroke="#65ff00" points="571.47,-503.55 581.97,-502.17 572.9,-496.7 571.47,-503.55"/>
 </g>
 <!-- proc~gauss_legendre_2d&#45;&gt;gauss_legendre -->
-<g id="proc~~ansatz~~CallsGraph_edge36" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge31" class="edge">
 <title>proc~gauss_legendre_2d&#45;&gt;gauss_legendre</title>
-<path fill="none" stroke="#65ff00" d="M510.24,-621.25C539.97,-624.5 576.21,-628.46 605.98,-631.72"/>
-<polygon fill="#65ff00" stroke="#65ff00" points="605.9,-635.23 616.22,-632.83 606.66,-628.27 605.9,-635.23"/>
+<path fill="none" stroke="#00ff00" d="M485.06,-512C512.23,-512 544.65,-512 571.83,-512"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="571.97,-515.5 581.97,-512 571.97,-508.5 571.97,-515.5"/>
+</g>
+<!-- interface~ndgrid -->
+<g id="proc~~ansatz~~CallsGraph_node26" class="node">
+<title>interface~ndgrid</title>
+<g id="a_proc~~ansatz~~CallsGraph_node26"><a xlink:href="../interface/ndgrid.html" xlink:title="ndgrid">
+<polygon fill="#a7506f" stroke="#a7506f" points="657,-608 603,-608 603,-584 657,-584 657,-608"/>
+<text text-anchor="middle" x="630" y="-593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid</text>
+</a>
+</g>
+</g>
+<!-- proc~gauss_legendre_2d&#45;&gt;interface~ndgrid -->
+<g id="proc~~ansatz~~CallsGraph_edge32" class="edge">
+<title>proc~gauss_legendre_2d&#45;&gt;interface~ndgrid</title>
+<path fill="none" stroke="#00ff00" d="M485.18,-519.87C496.24,-522.91 507.37,-527.14 517,-533 538,-545.79 532.25,-561.82 553,-575 564.97,-582.6 579.7,-587.49 592.99,-590.62"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="592.3,-594.05 602.81,-592.68 593.74,-587.2 592.3,-594.05"/>
 </g>
 <!-- proc~kron -->
-<g id="proc~~ansatz~~CallsGraph_node35" class="node">
+<g id="proc~~ansatz~~CallsGraph_node33" class="node">
 <title>proc~kron</title>
-<g id="a_proc~~ansatz~~CallsGraph_node35"><a xlink:href="../proc/kron.html" xlink:title="kron">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="691.5,-608 637.5,-608 637.5,-584 691.5,-584 691.5,-608"/>
-<text text-anchor="middle" x="664.5" y="-593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kron</text>
+<g id="a_proc~~ansatz~~CallsGraph_node33"><a xlink:href="../proc/kron.html" xlink:title="kron">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="657,-566 603,-566 603,-542 657,-542 657,-566"/>
+<text text-anchor="middle" x="630" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kron</text>
 </a>
 </g>
 </g>
 <!-- proc~gauss_legendre_2d&#45;&gt;proc~kron -->
-<g id="proc~~ansatz~~CallsGraph_edge38" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge33" class="edge">
 <title>proc~gauss_legendre_2d&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#65ff00" d="M510.24,-609.83C547.43,-606.48 594.8,-602.2 626.96,-599.3"/>
-<polygon fill="#65ff00" stroke="#65ff00" points="627.6,-602.75 637.25,-598.37 626.97,-595.78 627.6,-602.75"/>
-</g>
-<!-- proc~gauss_legendre_3d&#45;&gt;interface~ndgrid -->
-<g id="proc~~ansatz~~CallsGraph_edge40" class="edge">
-<title>proc~gauss_legendre_3d&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#00ff00" d="M510.24,-567.83C547.43,-564.48 594.8,-560.2 626.96,-557.3"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="627.6,-560.75 637.25,-556.37 626.97,-553.78 627.6,-560.75"/>
+<path fill="none" stroke="#00ff00" d="M485.06,-523.92C519.74,-531.17 562.96,-540.2 592.94,-546.47"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="592.46,-549.94 602.96,-548.56 593.89,-543.09 592.46,-549.94"/>
 </g>
 <!-- proc~gauss_legendre_3d&#45;&gt;gauss_legendre -->
-<g id="proc~~ansatz~~CallsGraph_edge39" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge34" class="edge">
 <title>proc~gauss_legendre_3d&#45;&gt;gauss_legendre</title>
-<path fill="none" stroke="#00ff00" d="M510.16,-582.43C522.56,-585.39 535.42,-589.18 547,-594 564.53,-601.29 565.6,-609.4 583,-617 590.43,-620.25 598.48,-623.08 606.51,-625.53"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="605.69,-628.93 616.26,-628.32 607.61,-622.2 605.69,-628.93"/>
+<path fill="none" stroke="#00ff66" d="M485.06,-542.08C512.23,-536.4 544.65,-529.63 571.83,-523.95"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="572.9,-527.3 581.97,-521.83 571.47,-520.45 572.9,-527.3"/>
+</g>
+<!-- proc~gauss_legendre_3d&#45;&gt;interface~ndgrid -->
+<g id="proc~~ansatz~~CallsGraph_edge35" class="edge">
+<title>proc~gauss_legendre_3d&#45;&gt;interface~ndgrid</title>
+<path fill="none" stroke="#00ff66" d="M485.06,-565.92C519.74,-573.17 562.96,-582.2 592.94,-588.47"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="592.46,-591.94 602.96,-590.56 593.89,-585.09 592.46,-591.94"/>
 </g>
 <!-- proc~gauss_legendre_3d&#45;&gt;proc~kron -->
-<g id="proc~~ansatz~~CallsGraph_edge41" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge36" class="edge">
 <title>proc~gauss_legendre_3d&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff00" d="M510.24,-579.25C547.43,-583.32 594.8,-588.49 626.96,-592.01"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="626.93,-595.52 637.25,-593.13 627.69,-588.57 626.93,-595.52"/>
+<path fill="none" stroke="#00ff66" d="M485.06,-554C519.74,-554 562.96,-554 592.94,-554"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="592.96,-557.5 602.96,-554 592.96,-550.5 592.96,-557.5"/>
 </g>
 <!-- interface~compute_multiplicity -->
-<g id="proc~~ansatz~~CallsGraph_node27" class="node">
+<g id="proc~~ansatz~~CallsGraph_node25" class="node">
 <title>interface~compute_multiplicity</title>
-<g id="a_proc~~ansatz~~CallsGraph_node27"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1120,-171 996,-171 996,-147 1120,-147 1120,-171"/>
-<text text-anchor="middle" x="1058" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<g id="a_proc~~ansatz~~CallsGraph_node25"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
+<polygon fill="#a7506f" stroke="#a7506f" points="1072,-254 948,-254 948,-230 1072,-230 1072,-254"/>
+<text text-anchor="middle" x="1010" y="-239.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~ansatz~~CallsGraph_edge42" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge37" class="edge">
 <title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00ff66" d="M960.17,-169.99C968.77,-169.02 977.42,-168.03 985.82,-167.08"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="986.39,-170.54 995.93,-165.93 985.6,-163.58 986.39,-170.54"/>
+<path fill="none" stroke="#00ffcb" d="M912.15,-242C920.73,-242 929.4,-242 937.84,-242"/>
+<polygon fill="#00ffcb" stroke="#00ffcb" points="937.99,-245.5 947.99,-242 937.99,-238.5 937.99,-245.5"/>
 </g>
 <!-- proc~cmp_degree -->
-<g id="proc~~ansatz~~CallsGraph_node28" class="node">
+<g id="proc~~ansatz~~CallsGraph_node27" class="node">
 <title>proc~cmp_degree</title>
-<g id="a_proc~~ansatz~~CallsGraph_node28"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="746,-192 583,-192 583,-168 746,-168 746,-192"/>
-<text text-anchor="middle" x="664.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
+<g id="a_proc~~ansatz~~CallsGraph_node27"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="707,-234 553,-234 553,-210 707,-210 707,-234"/>
+<text text-anchor="middle" x="630" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~set1&#45;&gt;proc~cmp_degree -->
-<g id="proc~~ansatz~~CallsGraph_edge43" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge38" class="edge">
 <title>proc~set1&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#0066ff" d="M512.2,-149.81C537.43,-154.85 567.06,-160.76 593.38,-166.01"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="592.8,-169.46 603.29,-167.99 594.17,-162.6 592.8,-169.46"/>
-</g>
-<!-- proc~cmp_nc -->
-<g id="proc~~ansatz~~CallsGraph_node32" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_proc~~ansatz~~CallsGraph_node32"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="734,-150 595,-150 595,-126 734,-126 734,-150"/>
-<text text-anchor="middle" x="664.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
-</a>
-</g>
+<path fill="none" stroke="#00cbff" d="M482.13,-252.69C506.46,-247.61 535.43,-241.55 561.18,-236.17"/>
+<polygon fill="#00cbff" stroke="#00cbff" points="562.18,-239.54 571.25,-234.07 560.75,-232.69 562.18,-239.54"/>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
-<g id="proc~~ansatz~~CallsGraph_edge44" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#0066ff" d="M512.2,-138C534.65,-138 560.58,-138 584.57,-138"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="584.71,-141.5 594.71,-138 584.71,-134.5 584.71,-141.5"/>
-</g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
-<g id="proc~~ansatz~~CallsGraph_edge45" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#0000ff" d="M512.2,-107.81C537.43,-112.85 567.06,-118.76 593.38,-124.01"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="592.8,-127.46 603.29,-125.99 594.17,-120.6 592.8,-127.46"/>
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
+<g id="proc~~ansatz~~CallsGraph_edge39" class="edge">
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#0066ff" d="M485.6,-222C503.38,-222 523.37,-222 542.65,-222"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="542.65,-225.5 552.65,-222 542.65,-218.5 542.65,-225.5"/>
 </g>
 <!-- proc~compute_knot_vector -->
-<g id="proc~~ansatz~~CallsGraph_node33" class="node">
+<g id="proc~~ansatz~~CallsGraph_node31" class="node">
 <title>proc~compute_knot_vector</title>
-<g id="a_proc~~ansatz~~CallsGraph_node33"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="728,-108 601,-108 601,-84 728,-84 728,-108"/>
-<text text-anchor="middle" x="664.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<g id="a_proc~~ansatz~~CallsGraph_node31"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="693.5,-108 566.5,-108 566.5,-84 693.5,-84 693.5,-108"/>
+<text text-anchor="middle" x="630" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
-<g id="proc~~ansatz~~CallsGraph_edge46" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge40" class="edge">
 <title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#0000ff" d="M512.2,-96C536.57,-96 565.04,-96 590.67,-96"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="590.71,-99.5 600.71,-96 590.71,-92.5 590.71,-99.5"/>
+<path fill="none" stroke="#0000ff" d="M482.13,-96C504.82,-96 531.54,-96 555.94,-96"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="556.23,-99.5 566.23,-96 556.23,-92.5 556.23,-99.5"/>
 </g>
 <!-- proc~set3&#45;&gt;proc~cmp_degree -->
-<g id="proc~~ansatz~~CallsGraph_edge47" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge41" class="edge">
 <title>proc~set3&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#6500ff" d="M512.2,-180C530.92,-180 552.07,-180 572.49,-180"/>
-<polygon fill="#6500ff" stroke="#6500ff" points="572.76,-183.5 582.76,-180 572.76,-176.5 572.76,-183.5"/>
+<path fill="none" stroke="#6500ff" d="M482.13,-191.31C506.46,-196.39 535.43,-202.45 561.18,-207.83"/>
+<polygon fill="#6500ff" stroke="#6500ff" points="560.75,-211.31 571.25,-209.93 562.18,-204.46 560.75,-211.31"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
-<g id="proc~~ansatz~~CallsGraph_node36" class="node">
+<g id="proc~~ansatz~~CallsGraph_node34" class="node">
 <title>proc~compute_multiplicity1</title>
-<g id="a_proc~~ansatz~~CallsGraph_node36"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1286,-192 1156,-192 1156,-168 1286,-168 1286,-192"/>
-<text text-anchor="middle" x="1221" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<g id="a_proc~~ansatz~~CallsGraph_node34"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1238,-275 1108,-275 1108,-251 1238,-251 1238,-275"/>
+<text text-anchor="middle" x="1173" y="-260.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
-<g id="proc~~ansatz~~CallsGraph_edge48" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge42" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#e7ff00" stroke-dasharray="5,2" d="M1120.33,-167C1128.69,-168.09 1137.35,-169.22 1145.92,-170.34"/>
-<polygon fill="#e7ff00" stroke="#e7ff00" points="1145.53,-173.82 1155.9,-171.64 1146.44,-166.88 1145.53,-173.82"/>
+<path fill="none" stroke="#e7ff00" stroke-dasharray="5,2" d="M1072.33,-250C1080.69,-251.09 1089.35,-252.22 1097.92,-253.34"/>
+<polygon fill="#e7ff00" stroke="#e7ff00" points="1097.53,-256.82 1107.9,-254.64 1098.44,-249.88 1097.53,-256.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
-<g id="proc~~ansatz~~CallsGraph_node37" class="node">
+<g id="proc~~ansatz~~CallsGraph_node35" class="node">
 <title>proc~compute_multiplicity2</title>
-<g id="a_proc~~ansatz~~CallsGraph_node37"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1286,-150 1156,-150 1156,-126 1286,-126 1286,-150"/>
-<text text-anchor="middle" x="1221" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<g id="a_proc~~ansatz~~CallsGraph_node35"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1238,-233 1108,-233 1108,-209 1238,-209 1238,-233"/>
+<text text-anchor="middle" x="1173" y="-218.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
-<g id="proc~~ansatz~~CallsGraph_edge49" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge43" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#e7ff00" stroke-dasharray="5,2" d="M1120.33,-151C1128.69,-149.91 1137.35,-148.78 1145.92,-147.66"/>
-<polygon fill="#e7ff00" stroke="#e7ff00" points="1146.44,-151.12 1155.9,-146.36 1145.53,-144.18 1146.44,-151.12"/>
+<path fill="none" stroke="#e7ff00" stroke-dasharray="5,2" d="M1072.33,-234C1080.69,-232.91 1089.35,-231.78 1097.92,-230.66"/>
+<polygon fill="#e7ff00" stroke="#e7ff00" points="1098.44,-234.12 1107.9,-229.36 1097.53,-227.18 1098.44,-234.12"/>
+</g>
+<!-- proc~ndgrid2 -->
+<g id="proc~~ansatz~~CallsGraph_node36" class="node">
+<title>proc~ndgrid2</title>
+<g id="a_proc~~ansatz~~CallsGraph_node36"><a xlink:href="../proc/ndgrid2.html" xlink:title="ndgrid2">
+<polygon fill="#d9534f" stroke="#d9534f" points="854.5,-629 800.5,-629 800.5,-605 854.5,-605 854.5,-629"/>
+<text text-anchor="middle" x="827.5" y="-614.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid2</text>
+</a>
+</g>
+</g>
+<!-- interface~ndgrid&#45;&gt;proc~ndgrid2 -->
+<g id="proc~~ansatz~~CallsGraph_edge44" class="edge">
+<title>interface~ndgrid&#45;&gt;proc~ndgrid2</title>
+<path fill="none" stroke="#5cff00" stroke-dasharray="5,2" d="M657.37,-598.83C691.57,-602.51 751.4,-608.93 789.97,-613.08"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="789.92,-616.59 800.24,-614.18 790.67,-609.63 789.92,-616.59"/>
+</g>
+<!-- proc~ndgrid3 -->
+<g id="proc~~ansatz~~CallsGraph_node37" class="node">
+<title>proc~ndgrid3</title>
+<g id="a_proc~~ansatz~~CallsGraph_node37"><a xlink:href="../proc/ndgrid3.html" xlink:title="ndgrid3">
+<polygon fill="#d9534f" stroke="#d9534f" points="854.5,-587 800.5,-587 800.5,-563 854.5,-563 854.5,-587"/>
+<text text-anchor="middle" x="827.5" y="-572.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid3</text>
+</a>
+</g>
+</g>
+<!-- interface~ndgrid&#45;&gt;proc~ndgrid3 -->
+<g id="proc~~ansatz~~CallsGraph_edge45" class="edge">
+<title>interface~ndgrid&#45;&gt;proc~ndgrid3</title>
+<path fill="none" stroke="#5cff00" stroke-dasharray="5,2" d="M657.37,-593.17C691.57,-589.49 751.4,-583.07 789.97,-578.92"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="790.67,-582.37 800.24,-577.82 789.92,-575.41 790.67,-582.37"/>
 </g>
 <!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
-<g id="proc~~ansatz~~CallsGraph_edge50" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge46" class="edge">
 <title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#5cff00" d="M746.03,-180C754.47,-180 763.11,-180 771.71,-180"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="771.78,-183.5 781.78,-180 771.78,-176.5 771.78,-183.5"/>
-</g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~ansatz~~CallsGraph_edge51" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#002eff" d="M734.14,-141.68C804.69,-145.47 914.03,-151.33 985.57,-155.17"/>
-<polygon fill="#002eff" stroke="#002eff" points="985.67,-158.68 995.85,-155.72 986.05,-151.69 985.67,-158.68"/>
+<path fill="none" stroke="#00ff2e" d="M707.15,-229.79C715.54,-230.65 724.17,-231.53 732.75,-232.41"/>
+<polygon fill="#00ff2e" stroke="#00ff2e" points="732.49,-235.9 742.79,-233.44 733.2,-228.94 732.49,-235.9"/>
 </g>
 <!-- proc~repelem -->
 <g id="proc~~ansatz~~CallsGraph_node38" class="node">
 <title>proc~repelem</title>
 <g id="a_proc~~ansatz~~CallsGraph_node38"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="899.5,-108 842.5,-108 842.5,-84 899.5,-84 899.5,-108"/>
-<text text-anchor="middle" x="871" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="856,-108 799,-108 799,-84 856,-84 856,-108"/>
+<text text-anchor="middle" x="827.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
-<g id="proc~~ansatz~~CallsGraph_edge52" class="edge">
+<g id="proc~~ansatz~~CallsGraph_edge47" class="edge">
 <title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#5c00ff" d="M728.25,-96C762.23,-96 803.1,-96 832.2,-96"/>
-<polygon fill="#5c00ff" stroke="#5c00ff" points="832.36,-99.5 842.36,-96 832.35,-92.5 832.36,-99.5"/>
+<path fill="none" stroke="#5c00ff" d="M693.66,-96C724.92,-96 761.69,-96 788.61,-96"/>
+<polygon fill="#5c00ff" stroke="#5c00ff" points="788.78,-99.5 798.78,-96 788.78,-92.5 788.78,-99.5"/>
 </g>
 </g>
 </svg>
@@ -1012,46 +982,46 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~ansatz~~CalledByGraph Pages: 1 -->
-<svg id="procansatzCalledByGraph" width="483pt" height="32pt"
- viewBox="0.00 0.00 483.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procansatzCalledByGraph" width="451pt" height="32pt"
+ viewBox="0.00 0.00 451.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~ansatz~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~ansatz~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 479,-28 479,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 447,-28 447,4 -4,4"/>
 <!-- proc~ansatz -->
 <g id="proc~~ansatz~~CalledByGraph_node1" class="node">
 <title>proc~ansatz</title>
-<polygon fill="none" stroke="black" points="475,-24 343,-24 343,0 475,0 475,-24"/>
-<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%ansatz</text>
+<polygon fill="none" stroke="black" points="443,-24 321,-24 321,0 443,0 443,-24"/>
+<text text-anchor="middle" x="382" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%ansatz</text>
 </g>
-<!-- proc~cmp_volume -->
+<!-- proc~cmp_length -->
 <g id="proc~~ansatz~~CalledByGraph_node2" class="node">
-<title>proc~cmp_volume</title>
-<g id="a_proc~~ansatz~~CalledByGraph_node2"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-24 141,-24 141,0 307,0 307,-24"/>
-<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<title>proc~cmp_length</title>
+<g id="a_proc~~ansatz~~CalledByGraph_node2"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
+<polygon fill="#d9534f" stroke="#d9534f" points="285,-24 135,-24 135,0 285,0 285,-24"/>
+<text text-anchor="middle" x="210" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="proc~~ansatz~~CalledByGraph_edge1" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.13,-12C315.64,-12 324.26,-12 332.7,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="332.87,-15.5 342.87,-12 332.87,-8.5 332.87,-15.5"/>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M285.07,-12C293.59,-12 302.27,-12 310.74,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="310.95,-15.5 320.95,-12 310.95,-8.5 310.95,-15.5"/>
 </g>
-<!-- program~compute_volume -->
+<!-- program~compute_length -->
 <g id="proc~~ansatz~~CalledByGraph_node3" class="node">
-<title>program~compute_volume</title>
-<g id="a_proc~~ansatz~~CalledByGraph_node3"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-24 0,-24 0,0 105,0 105,-24"/>
-<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<title>program~compute_length</title>
+<g id="a_proc~~ansatz~~CalledByGraph_node3"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-24 0,-24 0,0 99,0 99,-24"/>
+<text text-anchor="middle" x="49.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
+<!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="proc~~ansatz~~CalledByGraph_edge2" class="edge">
-<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#ff0000" d="M105.28,-12C113.39,-12 121.99,-12 130.69,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="130.93,-15.5 140.93,-12 130.93,-8.5 130.93,-15.5"/>
+<title>program~compute_length&#45;&gt;proc~cmp_length</title>
+<path fill="none" stroke="#ff0000" d="M99.35,-12C107.46,-12 116.06,-12 124.75,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="124.96,-15.5 134.96,-12 124.96,-8.5 124.96,-15.5"/>
 </g>
 </g>
 </svg>
@@ -1167,7 +1137,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/ansatz~2.html b/proc/ansatz~2.html
index f3efc94ec..872f3d8e8 100644
--- a/proc/ansatz~2.html
+++ b/proc/ansatz~2.html
@@ -78,20 +78,20 @@ <h1>ansatz
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.5% of total for procedures.">33 statements</a>
+                 title=" 0.5% of total for procedures.">34 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">ansatz</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine ansatz(this, ie, ig, Tgc, dTgc_dXg, dA)  
+    <h2>private pure subroutine ansatz(this, ie, ig, Tgc, dTgc_dXg, dV)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~130"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~128"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -233,7 +233,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-da"></span>
+              <span class="anchor" id="variable-dv"></span>
               real(kind=rk),
             </td>
 <td>intent(out)</td>
@@ -241,7 +241,7 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>dA</strong></td>
+            <td><strong>dV</strong></td>
             <td>
                 
             </td>
@@ -270,7 +270,7 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~ansatz~2~~CallsGraph_node1" class="node">
 <title>proc~ansatz~2</title>
 <polygon fill="none" stroke="black" points="132,-382 0,-382 0,-358 132,-358 132,-382"/>
-<text text-anchor="middle" x="66" y="-367.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%ansatz</text>
+<text text-anchor="middle" x="66" y="-367.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%ansatz</text>
 </g>
 <!-- interface~gauss_leg -->
 <g id="proc~~ansatz~2~~CallsGraph_node2" class="node">
@@ -320,9 +320,9 @@ <h3 class="card-title">Calls</h3>
 <!-- none~derivative~2 -->
 <g id="proc~~ansatz~2~~CallsGraph_node5" class="node">
 <title>none~derivative~2</title>
-<g id="a_proc~~ansatz~2~~CallsGraph_node5"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~2" xlink:title="nurbs_surface%derivative">
+<g id="a_proc~~ansatz~2~~CallsGraph_node5"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative~2" xlink:title="nurbs_volume%derivative">
 <polygon fill="#a7506f" stroke="#a7506f" points="320,-463 169,-463 169,-439 320,-439 320,-463"/>
-<text text-anchor="middle" x="244.5" y="-448.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative</text>
+<text text-anchor="middle" x="244.5" y="-448.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative</text>
 </a>
 </g>
 </g>
@@ -335,9 +335,9 @@ <h3 class="card-title">Calls</h3>
 <!-- none~set~2 -->
 <g id="proc~~ansatz~2~~CallsGraph_node6" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~ansatz~2~~CallsGraph_node6"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<g id="a_proc~~ansatz~2~~CallsGraph_node6"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="301,-150 188,-150 188,-126 301,-126 301,-150"/>
-<text text-anchor="middle" x="244.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<text text-anchor="middle" x="244.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
@@ -350,9 +350,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~cmp_elem~2 -->
 <g id="proc~~ansatz~2~~CallsGraph_node7" class="node">
 <title>proc~cmp_elem~2</title>
-<g id="a_proc~~ansatz~2~~CallsGraph_node7"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_surface%cmp_elem">
+<g id="a_proc~~ansatz~2~~CallsGraph_node7"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_volume%cmp_elem">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="321,-340 168,-340 168,-316 321,-316 321,-340"/>
-<text text-anchor="middle" x="244.5" y="-325.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
+<text text-anchor="middle" x="244.5" y="-325.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
 </a>
 </g>
 </g>
@@ -500,9 +500,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~derivative_scalar~2 -->
 <g id="proc~~ansatz~2~~CallsGraph_node11" class="node">
 <title>proc~derivative_scalar~2</title>
-<g id="a_proc~~ansatz~2~~CallsGraph_node11"><a xlink:href="../proc/derivative_scalar~2.html" xlink:title="nurbs_surface%derivative_scalar">
+<g id="a_proc~~ansatz~2~~CallsGraph_node11"><a xlink:href="../proc/derivative_scalar~2.html" xlink:title="nurbs_volume%derivative_scalar">
 <polygon fill="#d9534f" stroke="#d9534f" points="546,-463 358,-463 358,-439 546,-439 546,-463"/>
-<text text-anchor="middle" x="452" y="-448.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_scalar</text>
+<text text-anchor="middle" x="452" y="-448.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_scalar</text>
 </a>
 </g>
 </g>
@@ -515,9 +515,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~derivative_vector~2 -->
 <g id="proc~~ansatz~2~~CallsGraph_node12" class="node">
 <title>proc~derivative_vector~2</title>
-<g id="a_proc~~ansatz~2~~CallsGraph_node12"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_surface%derivative_vector">
+<g id="a_proc~~ansatz~2~~CallsGraph_node12"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_volume%derivative_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="547,-505 357,-505 357,-481 547,-481 547,-505"/>
-<text text-anchor="middle" x="452" y="-490.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_vector</text>
+<text text-anchor="middle" x="452" y="-490.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_vector</text>
 </a>
 </g>
 </g>
@@ -530,9 +530,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~set1~2 -->
 <g id="proc~~ansatz~2~~CallsGraph_node19" class="node">
 <title>proc~set1~2</title>
-<g id="a_proc~~ansatz~2~~CallsGraph_node19"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<g id="a_proc~~ansatz~2~~CallsGraph_node19"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="512,-150 392,-150 392,-126 512,-126 512,-150"/>
-<text text-anchor="middle" x="452" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
+<text text-anchor="middle" x="452" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
@@ -545,9 +545,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~set2~2 -->
 <g id="proc~~ansatz~2~~CallsGraph_node20" class="node">
 <title>proc~set2~2</title>
-<g id="a_proc~~ansatz~2~~CallsGraph_node20"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<g id="a_proc~~ansatz~2~~CallsGraph_node20"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="512,-108 392,-108 392,-84 512,-84 512,-108"/>
-<text text-anchor="middle" x="452" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
+<text text-anchor="middle" x="452" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
@@ -560,9 +560,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~set3~2 -->
 <g id="proc~~ansatz~2~~CallsGraph_node21" class="node">
 <title>proc~set3~2</title>
-<g id="a_proc~~ansatz~2~~CallsGraph_node21"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<g id="a_proc~~ansatz~2~~CallsGraph_node21"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="512,-192 392,-192 392,-168 512,-168 512,-192"/>
-<text text-anchor="middle" x="452" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
+<text text-anchor="middle" x="452" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
@@ -575,9 +575,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~set4~2 -->
 <g id="proc~~ansatz~2~~CallsGraph_node22" class="node">
 <title>proc~set4~2</title>
-<g id="a_proc~~ansatz~2~~CallsGraph_node22"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<g id="a_proc~~ansatz~2~~CallsGraph_node22"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="512,-66 392,-66 392,-42 512,-42 512,-66"/>
-<text text-anchor="middle" x="452" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
+<text text-anchor="middle" x="452" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
@@ -611,9 +611,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_multiplicity~2 -->
 <g id="proc~~ansatz~2~~CallsGraph_node16" class="node">
 <title>proc~get_multiplicity~2</title>
-<g id="a_proc~~ansatz~2~~CallsGraph_node16"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<g id="a_proc~~ansatz~2~~CallsGraph_node16"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="960,-192 782,-192 782,-168 960,-168 960,-192"/>
-<text text-anchor="middle" x="871" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
+<text text-anchor="middle" x="871" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
@@ -698,9 +698,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~is_rational~2 -->
 <g id="proc~~ansatz~2~~CallsGraph_node34" class="node">
 <title>proc~is_rational~2</title>
-<g id="a_proc~~ansatz~2~~CallsGraph_node34"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<g id="a_proc~~ansatz~2~~CallsGraph_node34"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="740.5,-482 588.5,-482 588.5,-458 740.5,-458 740.5,-482"/>
-<text text-anchor="middle" x="664.5" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
+<text text-anchor="middle" x="664.5" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
@@ -803,9 +803,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~cmp_degree~2 -->
 <g id="proc~~ansatz~2~~CallsGraph_node28" class="node">
 <title>proc~cmp_degree~2</title>
-<g id="a_proc~~ansatz~2~~CallsGraph_node28"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<g id="a_proc~~ansatz~2~~CallsGraph_node28"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="746,-192 583,-192 583,-168 746,-168 746,-192"/>
-<text text-anchor="middle" x="664.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
+<text text-anchor="middle" x="664.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
@@ -818,9 +818,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~cmp_nc~2 -->
 <g id="proc~~ansatz~2~~CallsGraph_node32" class="node">
 <title>proc~cmp_nc~2</title>
-<g id="a_proc~~ansatz~2~~CallsGraph_node32"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<g id="a_proc~~ansatz~2~~CallsGraph_node32"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="734,-150 595,-150 595,-126 734,-126 734,-150"/>
-<text text-anchor="middle" x="664.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+<text text-anchor="middle" x="664.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
@@ -1012,46 +1012,46 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~ansatz~2~~CalledByGraph Pages: 1 -->
-<svg id="procansatz2CalledByGraph" width="451pt" height="32pt"
- viewBox="0.00 0.00 451.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procansatz2CalledByGraph" width="483pt" height="32pt"
+ viewBox="0.00 0.00 483.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~ansatz~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~ansatz~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 447,-28 447,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 479,-28 479,4 -4,4"/>
 <!-- proc~ansatz~2 -->
 <g id="proc~~ansatz~2~~CalledByGraph_node1" class="node">
 <title>proc~ansatz~2</title>
-<polygon fill="none" stroke="black" points="443,-24 311,-24 311,0 443,0 443,-24"/>
-<text text-anchor="middle" x="377" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%ansatz</text>
+<polygon fill="none" stroke="black" points="475,-24 343,-24 343,0 475,0 475,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%ansatz</text>
 </g>
-<!-- proc~cmp_area -->
+<!-- proc~cmp_volume -->
 <g id="proc~~ansatz~2~~CalledByGraph_node2" class="node">
-<title>proc~cmp_area</title>
-<g id="a_proc~~ansatz~2~~CalledByGraph_node2"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="275,-24 125,-24 125,0 275,0 275,-24"/>
-<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<title>proc~cmp_volume</title>
+<g id="a_proc~~ansatz~2~~CalledByGraph_node2"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-24 141,-24 141,0 307,0 307,-24"/>
+<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
 <g id="proc~~ansatz~2~~CalledByGraph_edge1" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ff0000" d="M275.22,-12C283.63,-12 292.21,-12 300.63,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="300.81,-15.5 310.81,-12 300.81,-8.5 300.81,-15.5"/>
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ff0000" d="M307.13,-12C315.64,-12 324.26,-12 332.7,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="332.87,-15.5 342.87,-12 332.87,-8.5 332.87,-15.5"/>
 </g>
-<!-- program~compute_area -->
+<!-- program~compute_volume -->
 <g id="proc~~ansatz~2~~CalledByGraph_node3" class="node">
-<title>program~compute_area</title>
-<g id="a_proc~~ansatz~2~~CalledByGraph_node3"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-24 0,-24 0,0 89,0 89,-24"/>
-<text text-anchor="middle" x="44.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<title>program~compute_volume</title>
+<g id="a_proc~~ansatz~2~~CalledByGraph_node3"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-24 0,-24 0,0 105,0 105,-24"/>
+<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;proc~cmp_area -->
+<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="proc~~ansatz~2~~CalledByGraph_edge2" class="edge">
-<title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M89.08,-12C97.19,-12 105.92,-12 114.78,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="114.81,-15.5 124.81,-12 114.81,-8.5 114.81,-15.5"/>
+<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
+<path fill="none" stroke="#ff0000" d="M105.28,-12C113.39,-12 121.99,-12 130.69,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="130.93,-15.5 140.93,-12 130.93,-8.5 130.93,-15.5"/>
 </g>
 </g>
 </svg>
@@ -1167,7 +1167,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/ansatz~3.html b/proc/ansatz~3.html
index 782c91978..b63428f9c 100644
--- a/proc/ansatz~3.html
+++ b/proc/ansatz~3.html
@@ -78,20 +78,20 @@ <h1>ansatz
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.5% of total for procedures.">31 statements</a>
+                 title=" 0.5% of total for procedures.">33 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">ansatz</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine ansatz(this, ie, ig, Tgc, dTgc_dXg, dL)  
+    <h2>private pure subroutine ansatz(this, ie, ig, Tgc, dTgc_dXg, dA)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
         <tr>
             <td>
               <span class="anchor" id="variable-this~191"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -233,7 +233,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dl"></span>
+              <span class="anchor" id="variable-da"></span>
               real(kind=rk),
             </td>
 <td>intent(out)</td>
@@ -241,7 +241,7 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>dL</strong></td>
+            <td><strong>dA</strong></td>
             <td>
                 
             </td>
@@ -261,628 +261,658 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~ansatz~3~~CallsGraph Pages: 1 -->
-<svg id="procansatz3CallsGraph" width="641pt" height="328pt"
- viewBox="0.00 0.00 641.00 327.70" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~ansatz~3~~CallsGraph" class="graph" transform="scale(1.94 1.94) rotate(0) translate(4 633)">
+<svg id="procansatz3CallsGraph" width="641pt" height="335pt"
+ viewBox="0.00 0.00 641.00 335.36" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~ansatz~3~~CallsGraph" class="graph" transform="scale(2.02 2.02) rotate(0) translate(4 673)">
 <title>proc~~ansatz~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-633 1242,-633 1242,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-673 1290,-673 1290,4 -4,4"/>
 <!-- proc~ansatz~3 -->
 <g id="proc~~ansatz~3~~CallsGraph_node1" class="node">
 <title>proc~ansatz~3</title>
-<polygon fill="none" stroke="black" points="122,-408 0,-408 0,-384 122,-384 122,-408"/>
-<text text-anchor="middle" x="61" y="-393.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%ansatz</text>
+<polygon fill="none" stroke="black" points="132,-382 0,-382 0,-358 132,-358 132,-382"/>
+<text text-anchor="middle" x="66" y="-367.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%ansatz</text>
 </g>
-<!-- interface~dyad -->
+<!-- interface~gauss_leg -->
 <g id="proc~~ansatz~3~~CallsGraph_node2" class="node">
-<title>interface~dyad</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node2"><a xlink:href="../interface/dyad.html" xlink:title="dyad">
-<polygon fill="#a7506f" stroke="#a7506f" points="256.5,-576 202.5,-576 202.5,-552 256.5,-552 256.5,-576"/>
-<text text-anchor="middle" x="229.5" y="-561.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dyad</text>
+<title>interface~gauss_leg</title>
+<g id="a_proc~~ansatz~3~~CallsGraph_node2"><a xlink:href="../interface/gauss_leg.html" xlink:title="gauss_leg">
+<polygon fill="#a7506f" stroke="#a7506f" points="277,-606 212,-606 212,-582 277,-582 277,-606"/>
+<text text-anchor="middle" x="244.5" y="-591.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_leg</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;interface~dyad -->
+<!-- proc~ansatz~3&#45;&gt;interface~gauss_leg -->
 <g id="proc~~ansatz~3~~CallsGraph_edge1" class="edge">
-<title>proc~ansatz~3&#45;&gt;interface~dyad</title>
-<path fill="none" stroke="#ff0000" d="M70.41,-408C86.14,-430.01 121.72,-477.69 158,-512 171.23,-524.52 187.52,-536.7 201.1,-546.13"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="199.34,-549.16 209.57,-551.9 203.28,-543.38 199.34,-549.16"/>
+<title>proc~ansatz~3&#45;&gt;interface~gauss_leg</title>
+<path fill="none" stroke="#ff0000" d="M71.44,-382.05C83.19,-412.68 117.7,-494.74 168,-547 179.59,-559.05 194.89,-569.31 208.68,-577.14"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="207.01,-580.22 217.47,-581.94 210.36,-574.08 207.01,-580.22"/>
 </g>
-<!-- interface~gauss_leg -->
+<!-- interface~ndgrid -->
 <g id="proc~~ansatz~3~~CallsGraph_node3" class="node">
-<title>interface~gauss_leg</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node3"><a xlink:href="../interface/gauss_leg.html" xlink:title="gauss_leg">
-<polygon fill="#a7506f" stroke="#a7506f" points="262,-503 197,-503 197,-479 262,-479 262,-503"/>
-<text text-anchor="middle" x="229.5" y="-488.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_leg</text>
+<title>interface~ndgrid</title>
+<g id="a_proc~~ansatz~3~~CallsGraph_node3"><a xlink:href="../interface/ndgrid.html" xlink:title="ndgrid">
+<polygon fill="#a7506f" stroke="#a7506f" points="691.5,-566 637.5,-566 637.5,-542 691.5,-542 691.5,-566"/>
+<text text-anchor="middle" x="664.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;interface~gauss_leg -->
+<!-- proc~ansatz~3&#45;&gt;interface~ndgrid -->
 <g id="proc~~ansatz~3~~CallsGraph_edge2" class="edge">
-<title>proc~ansatz~3&#45;&gt;interface~gauss_leg</title>
-<path fill="none" stroke="#ff0000" d="M83.09,-408.03C112.28,-424.69 165.17,-454.87 198.48,-473.87"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="196.9,-477 207.32,-478.92 200.37,-470.92 196.9,-477"/>
+<title>proc~ansatz~3&#45;&gt;interface~ndgrid</title>
+<path fill="none" stroke="#ff0000" d="M75.41,-382.28C90.99,-404.01 126.55,-449.11 168,-472 247.63,-515.97 526.61,-542.74 627.09,-551.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="627.09,-554.65 637.34,-551.98 627.66,-547.67 627.09,-554.65"/>
 </g>
 <!-- interface~unique -->
 <g id="proc~~ansatz~3~~CallsGraph_node4" class="node">
 <title>interface~unique</title>
 <g id="a_proc~~ansatz~3~~CallsGraph_node4"><a xlink:href="../interface/unique.html" xlink:title="unique">
-<polygon fill="#a7506f" stroke="#a7506f" points="454,-429 400,-429 400,-405 454,-405 454,-429"/>
-<text text-anchor="middle" x="427" y="-414.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="479,-395 425,-395 425,-371 479,-371 479,-395"/>
+<text text-anchor="middle" x="452" y="-380.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;interface~unique -->
 <g id="proc~~ansatz~3~~CallsGraph_edge3" class="edge">
 <title>proc~ansatz~3&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M122.11,-399.47C198.27,-403.86 327.14,-411.3 389.73,-414.91"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="389.71,-418.41 399.9,-415.49 390.12,-411.42 389.71,-418.41"/>
+<path fill="none" stroke="#ff0000" d="M132.14,-372.21C213.42,-374.96 349.6,-379.57 414.49,-381.76"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="414.52,-385.27 424.64,-382.11 414.76,-378.27 414.52,-385.27"/>
 </g>
 <!-- none~derivative~3 -->
 <g id="proc~~ansatz~3~~CallsGraph_node5" class="node">
 <title>none~derivative~3</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node5"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative~3" xlink:title="nurbs_curve%derivative">
-<polygon fill="#a7506f" stroke="#a7506f" points="300,-66 159,-66 159,-42 300,-42 300,-66"/>
-<text text-anchor="middle" x="229.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node5"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~3" xlink:title="nurbs_surface%derivative">
+<polygon fill="#a7506f" stroke="#a7506f" points="320,-463 169,-463 169,-439 320,-439 320,-463"/>
+<text text-anchor="middle" x="244.5" y="-448.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~derivative~3 -->
 <g id="proc~~ansatz~3~~CallsGraph_edge4" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~derivative~3</title>
-<path fill="none" stroke="#ff0000" d="M67.03,-383.64C80.67,-350.3 119.97,-255.96 158,-180 176.82,-142.4 201.25,-99.98 215.85,-75.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="219.03,-76.7 221.11,-66.31 213,-73.14 219.03,-76.7"/>
+<path fill="none" stroke="#ff0000" d="M93.42,-382.13C123.8,-396.06 173.8,-419.01 207.66,-434.55"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="206.64,-437.93 217.18,-438.92 209.56,-431.57 206.64,-437.93"/>
 </g>
 <!-- none~set~3 -->
 <g id="proc~~ansatz~3~~CallsGraph_node6" class="node">
 <title>none~set~3</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node6"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="281,-213 178,-213 178,-189 281,-189 281,-213"/>
-<text text-anchor="middle" x="229.5" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node6"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="301,-150 188,-150 188,-126 301,-126 301,-150"/>
+<text text-anchor="middle" x="244.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~set~3 -->
 <g id="proc~~ansatz~3~~CallsGraph_edge5" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M72.42,-383.8C100.33,-351.11 177.03,-261.28 211.42,-221"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="214.26,-223.07 218.09,-213.19 208.93,-218.53 214.26,-223.07"/>
+<path fill="none" stroke="#ff0000" d="M76.24,-357.85C104.89,-320.19 192.45,-205.1 228.13,-158.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="231.08,-160.1 234.35,-150.03 225.51,-155.87 231.08,-160.1"/>
 </g>
 <!-- proc~cmp_elem~3 -->
 <g id="proc~~ansatz~3~~CallsGraph_node7" class="node">
 <title>proc~cmp_elem~3</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node7"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_curve%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="301,-388 158,-388 158,-364 301,-364 301,-388"/>
-<text text-anchor="middle" x="229.5" y="-373.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node7"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_surface%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="321,-340 168,-340 168,-316 321,-316 321,-340"/>
+<text text-anchor="middle" x="244.5" y="-325.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;proc~cmp_elem~3 -->
 <g id="proc~~ansatz~3~~CallsGraph_edge6" class="edge">
 <title>proc~ansatz~3&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#ff0000" d="M122.11,-388.78C130.48,-387.77 139.19,-386.73 147.86,-385.69"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="148.48,-389.14 157.99,-384.47 147.65,-382.19 148.48,-389.14"/>
+<path fill="none" stroke="#ff0000" d="M117.58,-357.96C137.98,-353.11 161.69,-347.47 183,-342.4"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="184,-345.76 192.91,-340.04 182.38,-338.95 184,-345.76"/>
 </g>
-<!-- proc~dyad_t1_t1 -->
-<g id="proc~~ansatz~3~~CallsGraph_node11" class="node">
-<title>proc~dyad_t1_t1</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node11"><a xlink:href="../proc/dyad_t1_t1.html" xlink:title="dyad_t1_t1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="462,-608 392,-608 392,-584 462,-584 462,-608"/>
-<text text-anchor="middle" x="427" y="-593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dyad_t1_t1</text>
+<!-- proc~det -->
+<g id="proc~~ansatz~3~~CallsGraph_node8" class="node">
+<title>proc~det</title>
+<g id="a_proc~~ansatz~3~~CallsGraph_node8"><a xlink:href="../proc/det.html" xlink:title="det">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="479,-24 425,-24 425,0 479,0 479,-24"/>
+<text text-anchor="middle" x="452" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">det</text>
 </a>
 </g>
 </g>
-<!-- interface~dyad&#45;&gt;proc~dyad_t1_t1 -->
+<!-- proc~ansatz~3&#45;&gt;proc~det -->
 <g id="proc~~ansatz~3~~CallsGraph_edge7" class="edge">
-<title>interface~dyad&#45;&gt;proc~dyad_t1_t1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M256.87,-568.32C288.92,-573.56 343.48,-582.49 381.95,-588.79"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="381.42,-592.25 391.85,-590.41 382.55,-585.34 381.42,-592.25"/>
+<title>proc~ansatz~3&#45;&gt;proc~det</title>
+<path fill="none" stroke="#ff0000" d="M68.41,-357.83C73.7,-317.74 95.85,-188.31 168,-117 219.84,-65.77 256.61,-92.14 321,-58 338.21,-48.88 339.16,-40.83 357,-33 375.18,-25.03 396.71,-19.93 414.57,-16.76"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="415.32,-20.19 424.62,-15.11 414.18,-13.28 415.32,-20.19"/>
+</g>
+<!-- proc~inv -->
+<g id="proc~~ansatz~3~~CallsGraph_node9" class="node">
+<title>proc~inv</title>
+<g id="a_proc~~ansatz~3~~CallsGraph_node9"><a xlink:href="../proc/inv.html" xlink:title="inv">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="271.5,-31 217.5,-31 217.5,-7 271.5,-7 271.5,-31"/>
+<text text-anchor="middle" x="244.5" y="-16.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">inv</text>
+</a>
+</g>
+</g>
+<!-- proc~ansatz~3&#45;&gt;proc~inv -->
+<g id="proc~~ansatz~3~~CallsGraph_edge8" class="edge">
+<title>proc~ansatz~3&#45;&gt;proc~inv</title>
+<path fill="none" stroke="#ff0000" d="M68.61,-357.98C74.76,-315.73 99.95,-171.55 168,-77 179.78,-60.63 197.49,-46.68 212.8,-36.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="214.9,-39.39 221.47,-31.07 211.15,-33.47 214.9,-39.39"/>
 </g>
 <!-- proc~gauss_legendre_1d -->
-<g id="proc~~ansatz~3~~CallsGraph_node12" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node13" class="node">
 <title>proc~gauss_legendre_1d</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node12"><a xlink:href="../proc/gauss_legendre_1d.html" xlink:title="gauss_legendre_1D">
-<polygon fill="#d9534f" stroke="#d9534f" points="485,-482 369,-482 369,-458 485,-458 485,-482"/>
-<text text-anchor="middle" x="427" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_1D</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node13"><a xlink:href="../proc/gauss_legendre_1d.html" xlink:title="gauss_legendre_1D">
+<polygon fill="#d9534f" stroke="#d9534f" points="510,-669 394,-669 394,-645 510,-645 510,-669"/>
+<text text-anchor="middle" x="452" y="-654.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_1D</text>
 </a>
 </g>
 </g>
 <!-- interface~gauss_leg&#45;&gt;proc~gauss_legendre_1d -->
-<g id="proc~~ansatz~3~~CallsGraph_edge8" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge9" class="edge">
 <title>interface~gauss_leg&#45;&gt;proc~gauss_legendre_1d</title>
-<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M262.35,-487.58C288.43,-484.78 326.23,-480.72 358.93,-477.2"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="359.33,-480.68 368.9,-476.13 358.58,-473.72 359.33,-480.68"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M274,-606C296.3,-615.09 328.26,-627.42 357,-636 365.59,-638.56 374.7,-640.97 383.75,-643.18"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="382.96,-646.6 393.5,-645.5 384.58,-639.78 382.96,-646.6"/>
 </g>
 <!-- proc~gauss_legendre_2d -->
-<g id="proc~~ansatz~3~~CallsGraph_node13" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node14" class="node">
 <title>proc~gauss_legendre_2d</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node13"><a xlink:href="../proc/gauss_legendre_2d.html" xlink:title="gauss_legendre_2D">
-<polygon fill="#d9534f" stroke="#d9534f" points="485,-524 369,-524 369,-500 485,-500 485,-524"/>
-<text text-anchor="middle" x="427" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_2D</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node14"><a xlink:href="../proc/gauss_legendre_2d.html" xlink:title="gauss_legendre_2D">
+<polygon fill="#d9534f" stroke="#d9534f" points="510,-627 394,-627 394,-603 510,-603 510,-627"/>
+<text text-anchor="middle" x="452" y="-612.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_2D</text>
 </a>
 </g>
 </g>
 <!-- interface~gauss_leg&#45;&gt;proc~gauss_legendre_2d -->
-<g id="proc~~ansatz~3~~CallsGraph_edge9" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge10" class="edge">
 <title>interface~gauss_leg&#45;&gt;proc~gauss_legendre_2d</title>
-<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M262.35,-494.42C288.43,-497.22 326.23,-501.28 358.93,-504.8"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="358.58,-508.28 368.9,-505.87 359.33,-501.32 358.58,-508.28"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M277.16,-597.24C305.34,-600.11 347.51,-604.42 383.26,-608.08"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="383.34,-611.6 393.64,-609.14 384.05,-604.64 383.34,-611.6"/>
 </g>
 <!-- proc~gauss_legendre_3d -->
-<g id="proc~~ansatz~3~~CallsGraph_node14" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node15" class="node">
 <title>proc~gauss_legendre_3d</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node14"><a xlink:href="../proc/gauss_legendre_3d.html" xlink:title="gauss_legendre_3D">
-<polygon fill="#d9534f" stroke="#d9534f" points="485,-566 369,-566 369,-542 485,-542 485,-566"/>
-<text text-anchor="middle" x="427" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_3D</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node15"><a xlink:href="../proc/gauss_legendre_3d.html" xlink:title="gauss_legendre_3D">
+<polygon fill="#d9534f" stroke="#d9534f" points="510,-585 394,-585 394,-561 510,-561 510,-585"/>
+<text text-anchor="middle" x="452" y="-570.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre_3D</text>
 </a>
 </g>
 </g>
 <!-- interface~gauss_leg&#45;&gt;proc~gauss_legendre_3d -->
-<g id="proc~~ansatz~3~~CallsGraph_edge10" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge11" class="edge">
 <title>interface~gauss_leg&#45;&gt;proc~gauss_legendre_3d</title>
-<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M258.14,-503.17C279.41,-512.22 309.69,-524.44 337,-533 344.35,-535.3 352.11,-537.49 359.86,-539.52"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="359.09,-542.93 369.64,-542 360.81,-536.15 359.09,-542.93"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M277.16,-590.76C305.34,-587.89 347.51,-583.58 383.26,-579.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="384.05,-583.36 393.64,-578.86 383.34,-576.4 384.05,-583.36"/>
+</g>
+<!-- proc~ndgrid2 -->
+<g id="proc~~ansatz~3~~CallsGraph_node17" class="node">
+<title>proc~ndgrid2</title>
+<g id="a_proc~~ansatz~3~~CallsGraph_node17"><a xlink:href="../proc/ndgrid2.html" xlink:title="ndgrid2">
+<polygon fill="#d9534f" stroke="#d9534f" points="898,-587 844,-587 844,-563 898,-563 898,-587"/>
+<text text-anchor="middle" x="871" y="-572.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid2</text>
+</a>
+</g>
+</g>
+<!-- interface~ndgrid&#45;&gt;proc~ndgrid2 -->
+<g id="proc~~ansatz~3~~CallsGraph_edge12" class="edge">
+<title>interface~ndgrid&#45;&gt;proc~ndgrid2</title>
+<path fill="none" stroke="#ffbf00" stroke-dasharray="5,2" d="M691.82,-556.7C727.94,-560.41 793.03,-567.1 833.74,-571.28"/>
+<polygon fill="#ffbf00" stroke="#ffbf00" points="833.48,-574.77 843.78,-572.31 834.19,-567.8 833.48,-574.77"/>
+</g>
+<!-- proc~ndgrid3 -->
+<g id="proc~~ansatz~3~~CallsGraph_node18" class="node">
+<title>proc~ndgrid3</title>
+<g id="a_proc~~ansatz~3~~CallsGraph_node18"><a xlink:href="../proc/ndgrid3.html" xlink:title="ndgrid3">
+<polygon fill="#d9534f" stroke="#d9534f" points="898,-545 844,-545 844,-521 898,-521 898,-545"/>
+<text text-anchor="middle" x="871" y="-530.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid3</text>
+</a>
+</g>
+</g>
+<!-- interface~ndgrid&#45;&gt;proc~ndgrid3 -->
+<g id="proc~~ansatz~3~~CallsGraph_edge13" class="edge">
+<title>interface~ndgrid&#45;&gt;proc~ndgrid3</title>
+<path fill="none" stroke="#ffbf00" stroke-dasharray="5,2" d="M691.82,-551.3C727.94,-547.59 793.03,-540.9 833.74,-536.72"/>
+<polygon fill="#ffbf00" stroke="#ffbf00" points="834.19,-540.2 843.78,-535.69 833.48,-533.23 834.19,-540.2"/>
 </g>
 <!-- proc~unique_integer -->
-<g id="proc~~ansatz~3~~CallsGraph_node21" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node23" class="node">
 <title>proc~unique_integer</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node21"><a xlink:href="../proc/unique_integer.html" xlink:title="unique_integer">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="676.5,-440 583.5,-440 583.5,-416 676.5,-416 676.5,-440"/>
-<text text-anchor="middle" x="630" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_integer</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node23"><a xlink:href="../proc/unique_integer.html" xlink:title="unique_integer">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="711,-440 618,-440 618,-416 711,-416 711,-440"/>
+<text text-anchor="middle" x="664.5" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_integer</text>
 </a>
 </g>
 </g>
 <!-- interface~unique&#45;&gt;proc~unique_integer -->
-<g id="proc~~ansatz~3~~CallsGraph_edge11" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge14" class="edge">
 <title>interface~unique&#45;&gt;proc~unique_integer</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M454.28,-418.44C484.36,-420.08 534.5,-422.83 573.37,-424.96"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="573.32,-428.46 583.5,-425.51 573.71,-421.47 573.32,-428.46"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M479.23,-388.61C511.2,-395.44 566.1,-407.18 607.68,-416.07"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="607.16,-419.53 617.67,-418.2 608.62,-412.69 607.16,-419.53"/>
 </g>
 <!-- proc~unique_real -->
-<g id="proc~~ansatz~3~~CallsGraph_node22" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node24" class="node">
 <title>proc~unique_real</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node22"><a xlink:href="../proc/unique_real.html" xlink:title="unique_real">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="667.5,-482 592.5,-482 592.5,-458 667.5,-458 667.5,-482"/>
-<text text-anchor="middle" x="630" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_real</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node24"><a xlink:href="../proc/unique_real.html" xlink:title="unique_real">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="702,-398 627,-398 627,-374 702,-374 702,-398"/>
+<text text-anchor="middle" x="664.5" y="-383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_real</text>
 </a>
 </g>
 </g>
 <!-- interface~unique&#45;&gt;proc~unique_real -->
-<g id="proc~~ansatz~3~~CallsGraph_edge12" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge15" class="edge">
 <title>interface~unique&#45;&gt;proc~unique_real</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M454.28,-423.93C486.85,-432.52 542.91,-447.3 582.75,-457.8"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="581.94,-461.21 592.5,-460.38 583.72,-454.44 581.94,-461.21"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M479.23,-383.37C513.55,-383.86 574.26,-384.73 616.58,-385.33"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="616.6,-388.83 626.65,-385.47 616.7,-381.83 616.6,-388.83"/>
 </g>
 <!-- proc~derivative_scalar~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_node9" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node11" class="node">
 <title>proc~derivative_scalar~3</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node9"><a xlink:href="../proc/derivative_scalar~3.html" xlink:title="nurbs_curve%derivative_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="516,-66 338,-66 338,-42 516,-42 516,-66"/>
-<text text-anchor="middle" x="427" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_scalar</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node11"><a xlink:href="../proc/derivative_scalar~3.html" xlink:title="nurbs_surface%derivative_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="546,-463 358,-463 358,-439 546,-439 546,-463"/>
+<text text-anchor="middle" x="452" y="-448.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_scalar</text>
 </a>
 </g>
 </g>
 <!-- none~derivative~3&#45;&gt;proc~derivative_scalar~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge13" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge16" class="edge">
 <title>none~derivative~3&#45;&gt;proc~derivative_scalar~3</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M300.25,-54C309.19,-54 318.47,-54 327.76,-54"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="327.82,-57.5 337.82,-54 327.82,-50.5 327.82,-57.5"/>
+<path fill="none" stroke="#00ff3f" stroke-dasharray="5,2" d="M320.27,-451C329.2,-451 338.44,-451 347.69,-451"/>
+<polygon fill="#00ff3f" stroke="#00ff3f" points="347.71,-454.5 357.71,-451 347.71,-447.5 347.71,-454.5"/>
 </g>
 <!-- proc~derivative_vector~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_node10" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node12" class="node">
 <title>proc~derivative_vector~3</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node10"><a xlink:href="../proc/derivative_vector~3.html" xlink:title="nurbs_curve%derivative_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="517,-24 337,-24 337,0 517,0 517,-24"/>
-<text text-anchor="middle" x="427" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_vector</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node12"><a xlink:href="../proc/derivative_vector~3.html" xlink:title="nurbs_surface%derivative_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="547,-505 357,-505 357,-481 547,-481 547,-505"/>
+<text text-anchor="middle" x="452" y="-490.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_vector</text>
 </a>
 </g>
 </g>
 <!-- none~derivative~3&#45;&gt;proc~derivative_vector~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge14" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge17" class="edge">
 <title>none~derivative~3&#45;&gt;proc~derivative_vector~3</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M286.52,-41.96C309.43,-37.04 336.1,-31.31 359.94,-26.19"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="360.93,-29.56 369.97,-24.04 359.46,-22.72 360.93,-29.56"/>
-</g>
-<!-- proc~set1a -->
-<g id="proc~~ansatz~3~~CallsGraph_node16" class="node">
-<title>proc~set1a</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node16"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="485.5,-276 368.5,-276 368.5,-252 485.5,-252 485.5,-276"/>
-<text text-anchor="middle" x="427" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
-</a>
-</g>
-</g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
-<g id="proc~~ansatz~3~~CallsGraph_edge15" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
-<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M258.14,-213.17C279.41,-222.22 309.69,-234.44 337,-243 344.35,-245.3 352.11,-247.49 359.86,-249.52"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="359.09,-252.93 369.64,-252 360.81,-246.15 359.09,-252.93"/>
+<path fill="none" stroke="#00ff3f" stroke-dasharray="5,2" d="M304.39,-463.04C328.68,-468 357,-473.79 382.23,-478.95"/>
+<polygon fill="#00ff3f" stroke="#00ff3f" points="381.61,-482.39 392.1,-480.96 383.01,-475.53 381.61,-482.39"/>
 </g>
 <!-- proc~set1~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_node17" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node19" class="node">
 <title>proc~set1~3</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node17"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="482,-234 372,-234 372,-210 482,-210 482,-234"/>
-<text text-anchor="middle" x="427" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node19"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="512,-150 392,-150 392,-126 512,-126 512,-150"/>
+<text text-anchor="middle" x="452" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set1~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge16" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge18" class="edge">
 <title>none~set~3&#45;&gt;proc~set1~3</title>
-<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M281.1,-206.44C305.67,-209.07 335.47,-212.28 361.63,-215.09"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="361.53,-218.59 371.84,-216.18 362.27,-211.63 361.53,-218.59"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M301.11,-138C325.88,-138 355.31,-138 381.5,-138"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="381.75,-141.5 391.75,-138 381.75,-134.5 381.75,-141.5"/>
 </g>
 <!-- proc~set2~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_node18" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node20" class="node">
 <title>proc~set2~3</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node18"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="482,-108 372,-108 372,-84 482,-84 482,-108"/>
-<text text-anchor="middle" x="427" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node20"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="512,-108 392,-108 392,-84 512,-84 512,-108"/>
+<text text-anchor="middle" x="452" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set2~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge17" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge19" class="edge">
 <title>none~set~3&#45;&gt;proc~set2~3</title>
-<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M242.07,-188.97C260.45,-170.61 298.19,-135.74 337,-117 344.89,-113.19 353.52,-110.04 362.2,-107.46"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="363.28,-110.79 371.99,-104.77 361.42,-104.04 363.28,-110.79"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M301.11,-126.63C326.09,-121.53 355.82,-115.45 382.18,-110.06"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="383.01,-113.47 392.11,-108.04 381.61,-106.61 383.01,-113.47"/>
 </g>
 <!-- proc~set3~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_node19" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node21" class="node">
 <title>proc~set3~3</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node19"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="482,-192 372,-192 372,-168 482,-168 482,-192"/>
-<text text-anchor="middle" x="427" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node21"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="512,-192 392,-192 392,-168 512,-168 512,-192"/>
+<text text-anchor="middle" x="452" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set3~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge18" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge20" class="edge">
 <title>none~set~3&#45;&gt;proc~set3~3</title>
-<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M281.1,-195.56C305.67,-192.93 335.47,-189.72 361.63,-186.91"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="362.27,-190.37 371.84,-185.82 361.53,-183.41 362.27,-190.37"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M301.11,-149.37C326.09,-154.47 355.82,-160.55 382.18,-165.94"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="381.61,-169.39 392.11,-167.96 383.01,-162.53 381.61,-169.39"/>
 </g>
 <!-- proc~set4~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_node20" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node22" class="node">
 <title>proc~set4~3</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node20"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="482,-150 372,-150 372,-126 482,-126 482,-150"/>
-<text text-anchor="middle" x="427" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node22"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="512,-66 392,-66 392,-42 512,-42 512,-66"/>
+<text text-anchor="middle" x="452" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set4~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge19" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge21" class="edge">
 <title>none~set~3&#45;&gt;proc~set4~3</title>
-<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M258.14,-188.83C279.41,-179.78 309.69,-167.56 337,-159 344.95,-156.51 353.38,-154.16 361.76,-151.99"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="362.69,-155.37 371.54,-149.54 360.99,-148.58 362.69,-155.37"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M278.47,-125.96C292.08,-120.39 307.73,-113.2 321,-105 338.72,-94.05 338.31,-84.2 357,-75 364.85,-71.14 373.42,-67.98 382.08,-65.39"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="383.15,-68.73 391.87,-62.71 381.3,-61.98 383.15,-68.73"/>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;interface~unique -->
-<g id="proc~~ansatz~3~~CallsGraph_edge21" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge23" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff00ff" d="M287.84,-388.02C320.85,-394.95 361.33,-403.44 389.91,-409.43"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="389.37,-412.89 399.87,-411.52 390.8,-406.04 389.37,-412.89"/>
+<path fill="none" stroke="#003fff" d="M290.34,-340C327.75,-350.01 380.36,-364.09 415.04,-373.38"/>
+<polygon fill="#003fff" stroke="#003fff" points="414.19,-376.77 424.76,-375.98 416,-370.01 414.19,-376.77"/>
 </g>
 <!-- interface~elemconn_cn -->
-<g id="proc~~ansatz~3~~CallsGraph_node8" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node10" class="node">
 <title>interface~elemconn_cn</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node8"><a xlink:href="../interface/elemconn_cn.html" xlink:title="elemConn_Cn">
-<polygon fill="#a7506f" stroke="#a7506f" points="470.5,-366 383.5,-366 383.5,-342 470.5,-342 470.5,-366"/>
-<text text-anchor="middle" x="427" y="-351.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_Cn</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node10"><a xlink:href="../interface/elemconn_cn.html" xlink:title="elemConn_Cn">
+<polygon fill="#a7506f" stroke="#a7506f" points="495.5,-319 408.5,-319 408.5,-295 495.5,-295 495.5,-319"/>
+<text text-anchor="middle" x="452" y="-304.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_Cn</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;interface~elemconn_cn -->
-<g id="proc~~ansatz~3~~CallsGraph_edge20" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge22" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#ff00ff" d="M301.08,-368.06C324.87,-365.38 351,-362.44 373.18,-359.94"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="373.85,-363.39 383.4,-358.79 373.07,-356.43 373.85,-363.39"/>
+<path fill="none" stroke="#003fff" d="M321.15,-320.27C346.77,-317.65 374.81,-314.79 398.25,-312.39"/>
+<polygon fill="#003fff" stroke="#003fff" points="398.75,-315.86 408.34,-311.36 398.04,-308.89 398.75,-315.86"/>
 </g>
 <!-- proc~get_multiplicity~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_node15" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node16" class="node">
 <title>proc~get_multiplicity~3</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node15"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="912,-254 743,-254 743,-230 912,-230 912,-254"/>
-<text text-anchor="middle" x="827.5" y="-239.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node16"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="960,-192 782,-192 782,-168 960,-168 960,-192"/>
+<text text-anchor="middle" x="871" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge22" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge24" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#ff00ff" d="M257.24,-363.92C278.53,-354.62 309.28,-341.88 337,-333 471.1,-290.04 632.75,-264.91 732.58,-252.31"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="733.16,-255.76 742.65,-251.05 732.29,-248.82 733.16,-255.76"/>
+<path fill="none" stroke="#003fff" d="M273.96,-315.88C296.25,-306.73 328.2,-294.37 357,-286 438.44,-262.35 673.5,-216.9 795.12,-193.96"/>
+<polygon fill="#003fff" stroke="#003fff" points="795.92,-197.37 805.1,-192.08 794.63,-190.5 795.92,-197.37"/>
+</g>
+<!-- proc~inv&#45;&gt;proc~det -->
+<g id="proc~~ansatz~3~~CallsGraph_edge25" class="edge">
+<title>proc~inv&#45;&gt;proc~det</title>
+<path fill="none" stroke="#ff00bf" d="M271.53,-18.11C307.79,-16.88 373.68,-14.63 414.74,-13.24"/>
+<polygon fill="#ff00bf" stroke="#ff00bf" points="414.99,-16.73 424.86,-12.89 414.75,-9.73 414.99,-16.73"/>
+</g>
+<!-- proc~inv&#45;&gt;proc~inv -->
+<g id="proc~~ansatz~3~~CallsGraph_edge26" class="edge">
+<title>proc~inv&#45;&gt;proc~inv</title>
+<path fill="none" stroke="#ff00bf" d="M217.07,-29.45C203.72,-38.89 212.86,-49 244.5,-49 266.74,-49 277.87,-44 277.87,-37.75"/>
+<polygon fill="#ff00bf" stroke="#ff00bf" points="280.6,-35.55 271.93,-29.45 274.91,-39.62 280.6,-35.55"/>
 </g>
 <!-- proc~cmp_elemconn_cn_l -->
-<g id="proc~~ansatz~3~~CallsGraph_node28" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node29" class="node">
 <title>proc~cmp_elemconn_cn_l</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node28"><a xlink:href="../proc/cmp_elemconn_cn_l.html" xlink:title="cmp_elemConn_Cn_L">
-<polygon fill="#d9534f" stroke="#d9534f" points="693.5,-398 566.5,-398 566.5,-374 693.5,-374 693.5,-398"/>
-<text text-anchor="middle" x="630" y="-383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_L</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node29"><a xlink:href="../proc/cmp_elemconn_cn_l.html" xlink:title="cmp_elemConn_Cn_L">
+<polygon fill="#d9534f" stroke="#d9534f" points="728,-356 601,-356 601,-332 728,-332 728,-356"/>
+<text text-anchor="middle" x="664.5" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_L</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_l -->
-<g id="proc~~ansatz~3~~CallsGraph_edge23" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge27" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_l</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M470.63,-360.79C495.47,-364.74 527.47,-369.84 556.2,-374.41"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="555.78,-377.89 566.2,-376 556.88,-370.97 555.78,-377.89"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M495.6,-314.49C522.81,-319.27 558.8,-325.6 590.48,-331.17"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="590.14,-334.66 600.6,-332.94 591.35,-327.77 590.14,-334.66"/>
 </g>
 <!-- proc~cmp_elemconn_cn_s -->
-<g id="proc~~ansatz~3~~CallsGraph_node29" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node30" class="node">
 <title>proc~cmp_elemconn_cn_s</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node29"><a xlink:href="../proc/cmp_elemconn_cn_s.html" xlink:title="cmp_elemConn_Cn_S">
-<polygon fill="#d9534f" stroke="#d9534f" points="693.5,-356 566.5,-356 566.5,-332 693.5,-332 693.5,-356"/>
-<text text-anchor="middle" x="630" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_S</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node30"><a xlink:href="../proc/cmp_elemconn_cn_s.html" xlink:title="cmp_elemConn_Cn_S">
+<polygon fill="#d9534f" stroke="#d9534f" points="728,-314 601,-314 601,-290 728,-290 728,-314"/>
+<text text-anchor="middle" x="664.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_S</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_s -->
-<g id="proc~~ansatz~3~~CallsGraph_edge24" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge28" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_s</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M470.63,-351.88C495.47,-350.64 527.47,-349.05 556.2,-347.62"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="556.39,-351.12 566.2,-347.12 556.04,-344.13 556.39,-351.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M495.6,-305.99C522.81,-305.34 558.8,-304.49 590.48,-303.73"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="590.68,-307.23 600.6,-303.49 590.52,-300.23 590.68,-307.23"/>
 </g>
 <!-- proc~cmp_elemconn_cn_v -->
-<g id="proc~~ansatz~3~~CallsGraph_node30" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node31" class="node">
 <title>proc~cmp_elemconn_cn_v</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node30"><a xlink:href="../proc/cmp_elemconn_cn_v.html" xlink:title="cmp_elemConn_Cn_V">
-<polygon fill="#d9534f" stroke="#d9534f" points="694,-314 566,-314 566,-290 694,-290 694,-314"/>
-<text text-anchor="middle" x="630" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_V</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node31"><a xlink:href="../proc/cmp_elemconn_cn_v.html" xlink:title="cmp_elemConn_Cn_V">
+<polygon fill="#d9534f" stroke="#d9534f" points="728.5,-272 600.5,-272 600.5,-248 728.5,-248 728.5,-272"/>
+<text text-anchor="middle" x="664.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_V</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_v -->
-<g id="proc~~ansatz~3~~CallsGraph_edge25" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge29" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_v</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M470.63,-342.97C500.39,-335.27 540.43,-324.91 572.8,-316.54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="573.77,-319.9 582.58,-314.01 572.02,-313.13 573.77,-319.9"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M495.6,-297.49C525.56,-290.8 566.17,-281.73 599.94,-274.19"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="600.73,-277.6 609.73,-272.01 599.2,-270.77 600.73,-277.6"/>
 </g>
 <!-- interface~compute_dtgc~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_node24" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node26" class="node">
 <title>interface~compute_dtgc~3</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node24"><a xlink:href="../interface/compute_dtgc~3.html" xlink:title="compute_dTgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="675.5,-24 584.5,-24 584.5,0 675.5,0 675.5,-24"/>
-<text text-anchor="middle" x="630" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node26"><a xlink:href="../interface/compute_dtgc~3.html" xlink:title="compute_dTgc">
+<polygon fill="#a7506f" stroke="#a7506f" points="710,-524 619,-524 619,-500 710,-500 710,-524"/>
+<text text-anchor="middle" x="664.5" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_scalar~3&#45;&gt;interface~compute_dtgc~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge26" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge30" class="edge">
 <title>proc~derivative_scalar~3&#45;&gt;interface~compute_dtgc~3</title>
-<path fill="none" stroke="#ff6600" d="M485.6,-41.96C513.6,-36.11 547.07,-29.12 574.63,-23.36"/>
-<polygon fill="#ff6600" stroke="#ff6600" points="575.42,-26.77 584.49,-21.3 573.99,-19.92 575.42,-26.77"/>
+<path fill="none" stroke="#ff6600" d="M517.62,-463.05C527.59,-465.59 537.66,-468.56 547,-472 563.98,-478.25 566.14,-484.45 583,-491 591.22,-494.19 600.09,-497.05 608.84,-499.56"/>
+<polygon fill="#ff6600" stroke="#ff6600" points="608.06,-502.98 618.63,-502.25 609.91,-496.23 608.06,-502.98"/>
 </g>
 <!-- proc~is_rational~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_node32" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node34" class="node">
 <title>proc~is_rational~3</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node32"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="701,-66 559,-66 559,-42 701,-42 701,-66"/>
-<text text-anchor="middle" x="630" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node34"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="740.5,-482 588.5,-482 588.5,-458 740.5,-458 740.5,-482"/>
+<text text-anchor="middle" x="664.5" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_scalar~3&#45;&gt;proc~is_rational~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge27" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge31" class="edge">
 <title>proc~derivative_scalar~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff6600" d="M516.16,-54C526.95,-54 537.94,-54 548.61,-54"/>
-<polygon fill="#ff6600" stroke="#ff6600" points="548.72,-57.5 558.72,-54 548.72,-50.5 548.72,-57.5"/>
+<path fill="none" stroke="#ff6600" d="M546.25,-459.42C556.91,-460.38 567.75,-461.36 578.3,-462.31"/>
+<polygon fill="#ff6600" stroke="#ff6600" points="578.05,-465.8 588.32,-463.21 578.68,-458.83 578.05,-465.8"/>
+</g>
+<!-- proc~derivative_vector~3&#45;&gt;interface~ndgrid -->
+<g id="proc~~ansatz~3~~CallsGraph_edge33" class="edge">
+<title>proc~derivative_vector~3&#45;&gt;interface~ndgrid</title>
+<path fill="none" stroke="#ffcc00" d="M500.14,-505.04C515.21,-509.15 531.89,-513.99 547,-519 563.29,-524.41 566.67,-527.71 583,-533 597.37,-537.65 613.44,-542.01 627.42,-545.54"/>
+<polygon fill="#ffcc00" stroke="#ffcc00" points="626.63,-548.94 637.18,-547.95 628.31,-542.15 626.63,-548.94"/>
 </g>
 <!-- proc~derivative_vector~3&#45;&gt;interface~compute_dtgc~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge28" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge32" class="edge">
 <title>proc~derivative_vector~3&#45;&gt;interface~compute_dtgc~3</title>
-<path fill="none" stroke="#ffcc00" d="M517.04,-12C536.53,-12 556.6,-12 574.27,-12"/>
-<polygon fill="#ffcc00" stroke="#ffcc00" points="574.37,-15.5 584.37,-12 574.37,-8.5 574.37,-15.5"/>
+<path fill="none" stroke="#ffcc00" d="M547.17,-501.5C568.23,-503.4 589.88,-505.36 608.72,-507.06"/>
+<polygon fill="#ffcc00" stroke="#ffcc00" points="608.59,-510.56 618.87,-507.97 609.22,-503.59 608.59,-510.56"/>
 </g>
 <!-- proc~derivative_vector~3&#45;&gt;proc~is_rational~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge29" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge34" class="edge">
 <title>proc~derivative_vector~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ffcc00" d="M485.6,-24.04C509.25,-28.98 536.81,-34.74 561.41,-39.88"/>
-<polygon fill="#ffcc00" stroke="#ffcc00" points="560.89,-43.34 571.39,-41.96 562.32,-36.49 560.89,-43.34"/>
+<path fill="none" stroke="#ffcc00" d="M547.17,-482.71C557.51,-481.58 568,-480.43 578.23,-479.32"/>
+<polygon fill="#ffcc00" stroke="#ffcc00" points="578.79,-482.78 588.35,-478.21 578.03,-475.82 578.79,-482.78"/>
 </g>
 <!-- gauss_legendre -->
-<g id="proc~~ansatz~3~~CallsGraph_node23" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node25" class="node">
 <title>gauss_legendre</title>
-<polygon fill="#777777" stroke="#777777" points="678,-524 582,-524 582,-500 678,-500 678,-524"/>
-<text text-anchor="middle" x="630" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre</text>
+<polygon fill="#777777" stroke="#777777" points="712.5,-650 616.5,-650 616.5,-626 712.5,-626 712.5,-650"/>
+<text text-anchor="middle" x="664.5" y="-635.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gauss_legendre</text>
 </g>
 <!-- proc~gauss_legendre_1d&#45;&gt;gauss_legendre -->
-<g id="proc~~ansatz~3~~CallsGraph_edge30" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge35" class="edge">
 <title>proc~gauss_legendre_1d&#45;&gt;gauss_legendre</title>
-<path fill="none" stroke="#65ff00" d="M485.06,-481.92C512.23,-487.6 544.65,-494.37 571.83,-500.05"/>
-<polygon fill="#65ff00" stroke="#65ff00" points="571.47,-503.55 581.97,-502.17 572.9,-496.7 571.47,-503.55"/>
-</g>
-<!-- proc~gauss_legendre_2d&#45;&gt;gauss_legendre -->
-<g id="proc~~ansatz~3~~CallsGraph_edge31" class="edge">
-<title>proc~gauss_legendre_2d&#45;&gt;gauss_legendre</title>
-<path fill="none" stroke="#00ff00" d="M485.06,-512C512.23,-512 544.65,-512 571.83,-512"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="571.97,-515.5 581.97,-512 571.97,-508.5 571.97,-515.5"/>
-</g>
-<!-- interface~ndgrid -->
-<g id="proc~~ansatz~3~~CallsGraph_node26" class="node">
-<title>interface~ndgrid</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node26"><a xlink:href="../interface/ndgrid.html" xlink:title="ndgrid">
-<polygon fill="#a7506f" stroke="#a7506f" points="657,-608 603,-608 603,-584 657,-584 657,-608"/>
-<text text-anchor="middle" x="630" y="-593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid</text>
-</a>
-</g>
+<path fill="none" stroke="#cbff00" d="M510.24,-651.83C539.97,-649.15 576.21,-645.88 605.98,-643.19"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="606.57,-646.65 616.22,-642.27 605.95,-639.68 606.57,-646.65"/>
 </g>
 <!-- proc~gauss_legendre_2d&#45;&gt;interface~ndgrid -->
-<g id="proc~~ansatz~3~~CallsGraph_edge32" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge37" class="edge">
 <title>proc~gauss_legendre_2d&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#00ff00" d="M485.18,-519.87C496.24,-522.91 507.37,-527.14 517,-533 538,-545.79 532.25,-561.82 553,-575 564.97,-582.6 579.7,-587.49 592.99,-590.62"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="592.3,-594.05 602.81,-592.68 593.74,-587.2 592.3,-594.05"/>
+<path fill="none" stroke="#65ff00" d="M510.37,-604.73C522.63,-601.83 535.39,-598.27 547,-594 563.98,-587.75 566.14,-581.55 583,-575 597.19,-569.49 613.35,-564.96 627.44,-561.53"/>
+<polygon fill="#65ff00" stroke="#65ff00" points="628.34,-564.91 637.28,-559.23 626.75,-558.1 628.34,-564.91"/>
+</g>
+<!-- proc~gauss_legendre_2d&#45;&gt;gauss_legendre -->
+<g id="proc~~ansatz~3~~CallsGraph_edge36" class="edge">
+<title>proc~gauss_legendre_2d&#45;&gt;gauss_legendre</title>
+<path fill="none" stroke="#65ff00" d="M510.24,-621.25C539.97,-624.5 576.21,-628.46 605.98,-631.72"/>
+<polygon fill="#65ff00" stroke="#65ff00" points="605.9,-635.23 616.22,-632.83 606.66,-628.27 605.9,-635.23"/>
 </g>
 <!-- proc~kron -->
-<g id="proc~~ansatz~3~~CallsGraph_node33" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node35" class="node">
 <title>proc~kron</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node33"><a xlink:href="../proc/kron.html" xlink:title="kron">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="657,-566 603,-566 603,-542 657,-542 657,-566"/>
-<text text-anchor="middle" x="630" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kron</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node35"><a xlink:href="../proc/kron.html" xlink:title="kron">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="691.5,-608 637.5,-608 637.5,-584 691.5,-584 691.5,-608"/>
+<text text-anchor="middle" x="664.5" y="-593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kron</text>
 </a>
 </g>
 </g>
 <!-- proc~gauss_legendre_2d&#45;&gt;proc~kron -->
-<g id="proc~~ansatz~3~~CallsGraph_edge33" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge38" class="edge">
 <title>proc~gauss_legendre_2d&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff00" d="M485.06,-523.92C519.74,-531.17 562.96,-540.2 592.94,-546.47"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="592.46,-549.94 602.96,-548.56 593.89,-543.09 592.46,-549.94"/>
-</g>
-<!-- proc~gauss_legendre_3d&#45;&gt;gauss_legendre -->
-<g id="proc~~ansatz~3~~CallsGraph_edge34" class="edge">
-<title>proc~gauss_legendre_3d&#45;&gt;gauss_legendre</title>
-<path fill="none" stroke="#00ff66" d="M485.06,-542.08C512.23,-536.4 544.65,-529.63 571.83,-523.95"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="572.9,-527.3 581.97,-521.83 571.47,-520.45 572.9,-527.3"/>
+<path fill="none" stroke="#65ff00" d="M510.24,-609.83C547.43,-606.48 594.8,-602.2 626.96,-599.3"/>
+<polygon fill="#65ff00" stroke="#65ff00" points="627.6,-602.75 637.25,-598.37 626.97,-595.78 627.6,-602.75"/>
 </g>
 <!-- proc~gauss_legendre_3d&#45;&gt;interface~ndgrid -->
-<g id="proc~~ansatz~3~~CallsGraph_edge35" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge40" class="edge">
 <title>proc~gauss_legendre_3d&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#00ff66" d="M485.06,-565.92C519.74,-573.17 562.96,-582.2 592.94,-588.47"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="592.46,-591.94 602.96,-590.56 593.89,-585.09 592.46,-591.94"/>
+<path fill="none" stroke="#00ff00" d="M510.24,-567.83C547.43,-564.48 594.8,-560.2 626.96,-557.3"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="627.6,-560.75 637.25,-556.37 626.97,-553.78 627.6,-560.75"/>
+</g>
+<!-- proc~gauss_legendre_3d&#45;&gt;gauss_legendre -->
+<g id="proc~~ansatz~3~~CallsGraph_edge39" class="edge">
+<title>proc~gauss_legendre_3d&#45;&gt;gauss_legendre</title>
+<path fill="none" stroke="#00ff00" d="M510.16,-582.43C522.56,-585.39 535.42,-589.18 547,-594 564.53,-601.29 565.6,-609.4 583,-617 590.43,-620.25 598.48,-623.08 606.51,-625.53"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="605.69,-628.93 616.26,-628.32 607.61,-622.2 605.69,-628.93"/>
 </g>
 <!-- proc~gauss_legendre_3d&#45;&gt;proc~kron -->
-<g id="proc~~ansatz~3~~CallsGraph_edge36" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge41" class="edge">
 <title>proc~gauss_legendre_3d&#45;&gt;proc~kron</title>
-<path fill="none" stroke="#00ff66" d="M485.06,-554C519.74,-554 562.96,-554 592.94,-554"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="592.96,-557.5 602.96,-554 592.96,-550.5 592.96,-557.5"/>
+<path fill="none" stroke="#00ff00" d="M510.24,-579.25C547.43,-583.32 594.8,-588.49 626.96,-592.01"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="626.93,-595.52 637.25,-593.13 627.69,-588.57 626.93,-595.52"/>
 </g>
 <!-- interface~compute_multiplicity -->
-<g id="proc~~ansatz~3~~CallsGraph_node25" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node27" class="node">
 <title>interface~compute_multiplicity</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node25"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1072,-254 948,-254 948,-230 1072,-230 1072,-254"/>
-<text text-anchor="middle" x="1010" y="-239.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node27"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
+<polygon fill="#a7506f" stroke="#a7506f" points="1120,-171 996,-171 996,-147 1120,-147 1120,-171"/>
+<text text-anchor="middle" x="1058" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~ansatz~3~~CallsGraph_edge37" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge42" class="edge">
 <title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00ffcb" d="M912.15,-242C920.73,-242 929.4,-242 937.84,-242"/>
-<polygon fill="#00ffcb" stroke="#00ffcb" points="937.99,-245.5 947.99,-242 937.99,-238.5 937.99,-245.5"/>
+<path fill="none" stroke="#00ff66" d="M960.17,-169.99C968.77,-169.02 977.42,-168.03 985.82,-167.08"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="986.39,-170.54 995.93,-165.93 985.6,-163.58 986.39,-170.54"/>
 </g>
 <!-- proc~cmp_degree~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_node27" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node28" class="node">
 <title>proc~cmp_degree~3</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node27"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="707,-234 553,-234 553,-210 707,-210 707,-234"/>
-<text text-anchor="middle" x="630" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node28"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="746,-192 583,-192 583,-168 746,-168 746,-192"/>
+<text text-anchor="middle" x="664.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge38" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#00cbff" d="M485.6,-251.96C509.25,-247.02 536.81,-241.26 561.41,-236.12"/>
-<polygon fill="#00cbff" stroke="#00cbff" points="562.32,-239.51 571.39,-234.04 560.89,-232.66 562.32,-239.51"/>
-</g>
 <!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge39" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge43" class="edge">
 <title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#0066ff" d="M482.13,-222C500.81,-222 522.24,-222 542.84,-222"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="542.88,-225.5 552.88,-222 542.88,-218.5 542.88,-225.5"/>
+<path fill="none" stroke="#0066ff" d="M512.2,-149.81C537.43,-154.85 567.06,-160.76 593.38,-166.01"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="592.8,-169.46 603.29,-167.99 594.17,-162.6 592.8,-169.46"/>
+</g>
+<!-- proc~cmp_nc~3 -->
+<g id="proc~~ansatz~3~~CallsGraph_node32" class="node">
+<title>proc~cmp_nc~3</title>
+<g id="a_proc~~ansatz~3~~CallsGraph_node32"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="734,-150 595,-150 595,-126 734,-126 734,-150"/>
+<text text-anchor="middle" x="664.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+</a>
+</g>
+</g>
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
+<g id="proc~~ansatz~3~~CallsGraph_edge44" class="edge">
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#0066ff" d="M512.2,-138C534.65,-138 560.58,-138 584.57,-138"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="584.71,-141.5 594.71,-138 584.71,-134.5 584.71,-141.5"/>
+</g>
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
+<g id="proc~~ansatz~3~~CallsGraph_edge45" class="edge">
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#0000ff" d="M512.2,-107.81C537.43,-112.85 567.06,-118.76 593.38,-124.01"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="592.8,-127.46 603.29,-125.99 594.17,-120.6 592.8,-127.46"/>
 </g>
 <!-- proc~compute_knot_vector -->
-<g id="proc~~ansatz~3~~CallsGraph_node31" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node33" class="node">
 <title>proc~compute_knot_vector</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node31"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="693.5,-108 566.5,-108 566.5,-84 693.5,-84 693.5,-108"/>
-<text text-anchor="middle" x="630" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node33"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="728,-108 601,-108 601,-84 728,-84 728,-108"/>
+<text text-anchor="middle" x="664.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
-<g id="proc~~ansatz~3~~CallsGraph_edge40" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge46" class="edge">
 <title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#0000ff" d="M482.13,-96C504.82,-96 531.54,-96 555.94,-96"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="556.23,-99.5 566.23,-96 556.23,-92.5 556.23,-99.5"/>
+<path fill="none" stroke="#0000ff" d="M512.2,-96C536.57,-96 565.04,-96 590.67,-96"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="590.71,-99.5 600.71,-96 590.71,-92.5 590.71,-99.5"/>
 </g>
 <!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge41" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge47" class="edge">
 <title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#6500ff" d="M482.13,-191.31C506.46,-196.39 535.43,-202.45 561.18,-207.83"/>
-<polygon fill="#6500ff" stroke="#6500ff" points="560.75,-211.31 571.25,-209.93 562.18,-204.46 560.75,-211.31"/>
+<path fill="none" stroke="#6500ff" d="M512.2,-180C530.92,-180 552.07,-180 572.49,-180"/>
+<polygon fill="#6500ff" stroke="#6500ff" points="572.76,-183.5 582.76,-180 572.76,-176.5 572.76,-183.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
-<g id="proc~~ansatz~3~~CallsGraph_node34" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node36" class="node">
 <title>proc~compute_multiplicity1</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node34"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1238,-275 1108,-275 1108,-251 1238,-251 1238,-275"/>
-<text text-anchor="middle" x="1173" y="-260.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node36"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1286,-192 1156,-192 1156,-168 1286,-168 1286,-192"/>
+<text text-anchor="middle" x="1221" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge42" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge48" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#e7ff00" stroke-dasharray="5,2" d="M1072.33,-250C1080.69,-251.09 1089.35,-252.22 1097.92,-253.34"/>
-<polygon fill="#e7ff00" stroke="#e7ff00" points="1097.53,-256.82 1107.9,-254.64 1098.44,-249.88 1097.53,-256.82"/>
+<path fill="none" stroke="#e7ff00" stroke-dasharray="5,2" d="M1120.33,-167C1128.69,-168.09 1137.35,-169.22 1145.92,-170.34"/>
+<polygon fill="#e7ff00" stroke="#e7ff00" points="1145.53,-173.82 1155.9,-171.64 1146.44,-166.88 1145.53,-173.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
-<g id="proc~~ansatz~3~~CallsGraph_node35" class="node">
+<g id="proc~~ansatz~3~~CallsGraph_node37" class="node">
 <title>proc~compute_multiplicity2</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node35"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1238,-233 1108,-233 1108,-209 1238,-209 1238,-233"/>
-<text text-anchor="middle" x="1173" y="-218.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<g id="a_proc~~ansatz~3~~CallsGraph_node37"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1286,-150 1156,-150 1156,-126 1286,-126 1286,-150"/>
+<text text-anchor="middle" x="1221" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge43" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge49" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#e7ff00" stroke-dasharray="5,2" d="M1072.33,-234C1080.69,-232.91 1089.35,-231.78 1097.92,-230.66"/>
-<polygon fill="#e7ff00" stroke="#e7ff00" points="1098.44,-234.12 1107.9,-229.36 1097.53,-227.18 1098.44,-234.12"/>
-</g>
-<!-- proc~ndgrid2 -->
-<g id="proc~~ansatz~3~~CallsGraph_node36" class="node">
-<title>proc~ndgrid2</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node36"><a xlink:href="../proc/ndgrid2.html" xlink:title="ndgrid2">
-<polygon fill="#d9534f" stroke="#d9534f" points="854.5,-629 800.5,-629 800.5,-605 854.5,-605 854.5,-629"/>
-<text text-anchor="middle" x="827.5" y="-614.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid2</text>
-</a>
-</g>
-</g>
-<!-- interface~ndgrid&#45;&gt;proc~ndgrid2 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge44" class="edge">
-<title>interface~ndgrid&#45;&gt;proc~ndgrid2</title>
-<path fill="none" stroke="#5cff00" stroke-dasharray="5,2" d="M657.37,-598.83C691.57,-602.51 751.4,-608.93 789.97,-613.08"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="789.92,-616.59 800.24,-614.18 790.67,-609.63 789.92,-616.59"/>
-</g>
-<!-- proc~ndgrid3 -->
-<g id="proc~~ansatz~3~~CallsGraph_node37" class="node">
-<title>proc~ndgrid3</title>
-<g id="a_proc~~ansatz~3~~CallsGraph_node37"><a xlink:href="../proc/ndgrid3.html" xlink:title="ndgrid3">
-<polygon fill="#d9534f" stroke="#d9534f" points="854.5,-587 800.5,-587 800.5,-563 854.5,-563 854.5,-587"/>
-<text text-anchor="middle" x="827.5" y="-572.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid3</text>
-</a>
-</g>
-</g>
-<!-- interface~ndgrid&#45;&gt;proc~ndgrid3 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge45" class="edge">
-<title>interface~ndgrid&#45;&gt;proc~ndgrid3</title>
-<path fill="none" stroke="#5cff00" stroke-dasharray="5,2" d="M657.37,-593.17C691.57,-589.49 751.4,-583.07 789.97,-578.92"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="790.67,-582.37 800.24,-577.82 789.92,-575.41 790.67,-582.37"/>
+<path fill="none" stroke="#e7ff00" stroke-dasharray="5,2" d="M1120.33,-151C1128.69,-149.91 1137.35,-148.78 1145.92,-147.66"/>
+<polygon fill="#e7ff00" stroke="#e7ff00" points="1146.44,-151.12 1155.9,-146.36 1145.53,-144.18 1146.44,-151.12"/>
 </g>
 <!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
-<g id="proc~~ansatz~3~~CallsGraph_edge46" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge50" class="edge">
 <title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#00ff2e" d="M707.15,-229.79C715.54,-230.65 724.17,-231.53 732.75,-232.41"/>
-<polygon fill="#00ff2e" stroke="#00ff2e" points="732.49,-235.9 742.79,-233.44 733.2,-228.94 732.49,-235.9"/>
+<path fill="none" stroke="#5cff00" d="M746.03,-180C754.47,-180 763.11,-180 771.71,-180"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="771.78,-183.5 781.78,-180 771.78,-176.5 771.78,-183.5"/>
+</g>
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
+<g id="proc~~ansatz~3~~CallsGraph_edge51" class="edge">
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
+<path fill="none" stroke="#002eff" d="M734.14,-141.68C804.69,-145.47 914.03,-151.33 985.57,-155.17"/>
+<polygon fill="#002eff" stroke="#002eff" points="985.67,-158.68 995.85,-155.72 986.05,-151.69 985.67,-158.68"/>
 </g>
 <!-- proc~repelem -->
 <g id="proc~~ansatz~3~~CallsGraph_node38" class="node">
 <title>proc~repelem</title>
 <g id="a_proc~~ansatz~3~~CallsGraph_node38"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="856,-108 799,-108 799,-84 856,-84 856,-108"/>
-<text text-anchor="middle" x="827.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="899.5,-108 842.5,-108 842.5,-84 899.5,-84 899.5,-108"/>
+<text text-anchor="middle" x="871" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
-<g id="proc~~ansatz~3~~CallsGraph_edge47" class="edge">
+<g id="proc~~ansatz~3~~CallsGraph_edge52" class="edge">
 <title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#5c00ff" d="M693.66,-96C724.92,-96 761.69,-96 788.61,-96"/>
-<polygon fill="#5c00ff" stroke="#5c00ff" points="788.78,-99.5 798.78,-96 788.78,-92.5 788.78,-99.5"/>
+<path fill="none" stroke="#5c00ff" d="M728.25,-96C762.23,-96 803.1,-96 832.2,-96"/>
+<polygon fill="#5c00ff" stroke="#5c00ff" points="832.36,-99.5 842.36,-96 832.35,-92.5 832.36,-99.5"/>
 </g>
 </g>
 </svg>
@@ -990,38 +1020,38 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~ansatz~3 -->
 <g id="proc~~ansatz~3~~CalledByGraph_node1" class="node">
 <title>proc~ansatz~3</title>
-<polygon fill="none" stroke="black" points="443,-24 321,-24 321,0 443,0 443,-24"/>
-<text text-anchor="middle" x="382" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%ansatz</text>
+<polygon fill="none" stroke="black" points="443,-24 311,-24 311,0 443,0 443,-24"/>
+<text text-anchor="middle" x="377" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%ansatz</text>
 </g>
-<!-- proc~cmp_length -->
+<!-- proc~cmp_area -->
 <g id="proc~~ansatz~3~~CalledByGraph_node2" class="node">
-<title>proc~cmp_length</title>
-<g id="a_proc~~ansatz~3~~CalledByGraph_node2"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="285,-24 135,-24 135,0 285,0 285,-24"/>
-<text text-anchor="middle" x="210" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<title>proc~cmp_area</title>
+<g id="a_proc~~ansatz~3~~CalledByGraph_node2"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
+<polygon fill="#d9534f" stroke="#d9534f" points="275,-24 125,-24 125,0 275,0 275,-24"/>
+<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
 <g id="proc~~ansatz~3~~CalledByGraph_edge1" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#ff0000" d="M285.07,-12C293.59,-12 302.27,-12 310.74,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="310.95,-15.5 320.95,-12 310.95,-8.5 310.95,-15.5"/>
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#ff0000" d="M275.22,-12C283.63,-12 292.21,-12 300.63,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="300.81,-15.5 310.81,-12 300.81,-8.5 300.81,-15.5"/>
 </g>
-<!-- program~compute_length -->
+<!-- program~compute_area -->
 <g id="proc~~ansatz~3~~CalledByGraph_node3" class="node">
-<title>program~compute_length</title>
-<g id="a_proc~~ansatz~3~~CalledByGraph_node3"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-24 0,-24 0,0 99,0 99,-24"/>
-<text text-anchor="middle" x="49.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<title>program~compute_area</title>
+<g id="a_proc~~ansatz~3~~CalledByGraph_node3"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-24 0,-24 0,0 89,0 89,-24"/>
+<text text-anchor="middle" x="44.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;proc~cmp_length -->
+<!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="proc~~ansatz~3~~CalledByGraph_edge2" class="edge">
-<title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#ff0000" d="M99.35,-12C107.46,-12 116.06,-12 124.75,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="124.96,-15.5 134.96,-12 124.96,-8.5 124.96,-15.5"/>
+<title>program~compute_area&#45;&gt;proc~cmp_area</title>
+<path fill="none" stroke="#ff0000" d="M89.08,-12C97.19,-12 105.92,-12 114.78,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="114.81,-15.5 124.81,-12 114.81,-8.5 114.81,-15.5"/>
 </g>
 </g>
 </svg>
@@ -1137,7 +1167,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/basis_bernstein.html b/proc/basis_bernstein.html
index de06333c3..643645f03 100644
--- a/proc/basis_bernstein.html
+++ b/proc/basis_bernstein.html
@@ -171,7 +171,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~54"></span>
+              <span class="anchor" id="variable-nc~47"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -189,7 +189,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-b~4"></span>
+          <span class="anchor" id="variable-b~5"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -225,7 +225,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/basis_bspline.html b/proc/basis_bspline.html
index 0775fdd61..505d82c75 100644
--- a/proc/basis_bspline.html
+++ b/proc/basis_bspline.html
@@ -171,7 +171,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~7"></span>
+              <span class="anchor" id="variable-knot~28"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -186,7 +186,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~51"></span>
+              <span class="anchor" id="variable-nc~44"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -201,7 +201,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~44"></span>
+              <span class="anchor" id="variable-degree~43"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -219,7 +219,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-b"></span>
+          <span class="anchor" id="variable-b~2"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -751,7 +751,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/basis_bspline_2der.html b/proc/basis_bspline_2der.html
index dafe32460..dfc065d06 100644
--- a/proc/basis_bspline_2der.html
+++ b/proc/basis_bspline_2der.html
@@ -171,7 +171,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~9"></span>
+              <span class="anchor" id="variable-knot~30"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -186,7 +186,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~53"></span>
+              <span class="anchor" id="variable-nc~46"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -201,7 +201,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~46"></span>
+              <span class="anchor" id="variable-degree~45"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -231,7 +231,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-db~2"></span>
+              <span class="anchor" id="variable-db~3"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -246,7 +246,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-b~3"></span>
+              <span class="anchor" id="variable-b~4"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -579,7 +579,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/basis_bspline_der.html b/proc/basis_bspline_der.html
index 7a729164d..29295bf8f 100644
--- a/proc/basis_bspline_der.html
+++ b/proc/basis_bspline_der.html
@@ -171,7 +171,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~8"></span>
+              <span class="anchor" id="variable-knot~29"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -186,7 +186,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~52"></span>
+              <span class="anchor" id="variable-nc~45"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -201,7 +201,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~45"></span>
+              <span class="anchor" id="variable-degree~44"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -216,7 +216,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-db"></span>
+              <span class="anchor" id="variable-db~2"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -231,7 +231,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-b~2"></span>
+              <span class="anchor" id="variable-b~3"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -564,7 +564,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/basis_scalar.html b/proc/basis_scalar.html
index b1ebfb65c..bd457983d 100644
--- a/proc/basis_scalar.html
+++ b/proc/basis_scalar.html
@@ -83,15 +83,15 @@ <h1>basis_scalar
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">basis_scalar</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine basis_scalar(this, Xt, Tgc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~39"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~40"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -176,12 +176,12 @@ <h3>Arguments</h3>
               <span class="anchor" id="variable-xt~10"></span>
               real(kind=rk),
             </td>
-<td>intent(in),</td>
+<td>intent(in)</td>
               <td></td>            <td>
-              contiguous
+              
             </td>
             <td>::</td>
-            <td><strong>Xt</strong>(:)</td>
+            <td><strong>Xt</strong></td>
             <td>
                 
             </td>
@@ -216,46 +216,46 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~basis_scalar~~CallsGraph Pages: 1 -->
-<svg id="procbasis_scalarCallsGraph" width="358pt" height="74pt"
- viewBox="0.00 0.00 358.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procbasis_scalarCallsGraph" width="338pt" height="74pt"
+ viewBox="0.00 0.00 338.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~basis_scalar~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~basis_scalar~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 354,-70 354,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 334,-70 334,4 -4,4"/>
 <!-- proc~basis_scalar -->
 <g id="proc~~basis_scalar~~CallsGraph_node1" class="node">
 <title>proc~basis_scalar</title>
-<polygon fill="none" stroke="black" points="162,-45 0,-45 0,-21 162,-21 162,-45"/>
-<text text-anchor="middle" x="81" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%basis_scalar</text>
+<polygon fill="none" stroke="black" points="152,-45 0,-45 0,-21 152,-21 152,-45"/>
+<text text-anchor="middle" x="76" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%basis_scalar</text>
 </g>
 <!-- interface~compute_tgc -->
 <g id="proc~~basis_scalar~~CallsGraph_node2" class="node">
 <title>interface~compute_tgc</title>
 <g id="a_proc~~basis_scalar~~CallsGraph_node2"><a xlink:href="../interface/compute_tgc.html" xlink:title="compute_Tgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="316.5,-66 231.5,-66 231.5,-42 316.5,-42 316.5,-66"/>
-<text text-anchor="middle" x="274" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="301.5,-66 216.5,-66 216.5,-42 301.5,-42 301.5,-66"/>
+<text text-anchor="middle" x="259" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_scalar&#45;&gt;interface~compute_tgc -->
 <g id="proc~~basis_scalar~~CallsGraph_edge1" class="edge">
 <title>proc~basis_scalar&#45;&gt;interface~compute_tgc</title>
-<path fill="none" stroke="#ff0000" d="M162.17,-41.81C182.15,-44.01 203.04,-46.31 221.24,-48.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="221,-51.8 231.33,-49.42 221.77,-44.85 221,-51.8"/>
+<path fill="none" stroke="#ff0000" d="M152.19,-41.72C170.37,-43.83 189.39,-46.04 206.22,-47.99"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="206.05,-51.5 216.38,-49.17 206.85,-44.54 206.05,-51.5"/>
 </g>
 <!-- proc~is_rational -->
 <g id="proc~~basis_scalar~~CallsGraph_node3" class="node">
 <title>proc~is_rational</title>
-<g id="a_proc~~basis_scalar~~CallsGraph_node3"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="350,-24 198,-24 198,0 350,0 350,-24"/>
-<text text-anchor="middle" x="274" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
+<g id="a_proc~~basis_scalar~~CallsGraph_node3"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="330,-24 188,-24 188,0 330,0 330,-24"/>
+<text text-anchor="middle" x="259" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_scalar&#45;&gt;proc~is_rational -->
 <g id="proc~~basis_scalar~~CallsGraph_edge2" class="edge">
 <title>proc~basis_scalar&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ff0000" d="M162.17,-24.19C170.68,-23.25 179.36,-22.3 187.93,-21.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="188.35,-24.83 197.91,-20.26 187.59,-17.87 188.35,-24.83"/>
+<path fill="none" stroke="#ff0000" d="M152.19,-24.28C160.7,-23.29 169.41,-22.28 177.98,-21.28"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="178.44,-24.75 187.97,-20.12 177.64,-17.8 178.44,-24.75"/>
 </g>
 </g>
 </svg>
@@ -371,7 +371,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/basis_scalar~2.html b/proc/basis_scalar~2.html
index e0e3fa738..e4fa0931d 100644
--- a/proc/basis_scalar~2.html
+++ b/proc/basis_scalar~2.html
@@ -83,15 +83,15 @@ <h1>basis_scalar
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">basis_scalar</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine basis_scalar(this, Xt, Tgc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~107"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~100"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,12 +173,12 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~38"></span>
+              <span class="anchor" id="variable-xt~37"></span>
               real(kind=rk),
             </td>
-<td>intent(in)</td>
+<td>intent(in),</td>
               <td></td>            <td>
-              
+              contiguous
             </td>
             <td>::</td>
             <td><strong>Xt</strong>(:)</td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~30"></span>
+              <span class="anchor" id="variable-tgc~29"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -225,7 +225,7 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~basis_scalar~2~~CallsGraph_node1" class="node">
 <title>proc~basis_scalar~2</title>
 <polygon fill="none" stroke="black" points="162,-45 0,-45 0,-21 162,-21 162,-45"/>
-<text text-anchor="middle" x="81" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%basis_scalar</text>
+<text text-anchor="middle" x="81" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%basis_scalar</text>
 </g>
 <!-- interface~compute_tgc~2 -->
 <g id="proc~~basis_scalar~2~~CallsGraph_node2" class="node">
@@ -245,9 +245,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~is_rational~2 -->
 <g id="proc~~basis_scalar~2~~CallsGraph_node3" class="node">
 <title>proc~is_rational~2</title>
-<g id="a_proc~~basis_scalar~2~~CallsGraph_node3"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<g id="a_proc~~basis_scalar~2~~CallsGraph_node3"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="350,-24 198,-24 198,0 350,0 350,-24"/>
-<text text-anchor="middle" x="274" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
+<text text-anchor="middle" x="274" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
@@ -371,7 +371,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/basis_scalar~3.html b/proc/basis_scalar~3.html
index 84463eba9..354682357 100644
--- a/proc/basis_scalar~3.html
+++ b/proc/basis_scalar~3.html
@@ -83,15 +83,15 @@ <h1>basis_scalar
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">basis_scalar</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine basis_scalar(this, Xt, Tgc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~171"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~168"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -181,7 +181,7 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>Xt</strong></td>
+            <td><strong>Xt</strong>(:)</td>
             <td>
                 
             </td>
@@ -216,46 +216,46 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~basis_scalar~3~~CallsGraph Pages: 1 -->
-<svg id="procbasis_scalar3CallsGraph" width="338pt" height="74pt"
- viewBox="0.00 0.00 338.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procbasis_scalar3CallsGraph" width="358pt" height="74pt"
+ viewBox="0.00 0.00 358.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~basis_scalar~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~basis_scalar~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 334,-70 334,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 354,-70 354,4 -4,4"/>
 <!-- proc~basis_scalar~3 -->
 <g id="proc~~basis_scalar~3~~CallsGraph_node1" class="node">
 <title>proc~basis_scalar~3</title>
-<polygon fill="none" stroke="black" points="152,-45 0,-45 0,-21 152,-21 152,-45"/>
-<text text-anchor="middle" x="76" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%basis_scalar</text>
+<polygon fill="none" stroke="black" points="162,-45 0,-45 0,-21 162,-21 162,-45"/>
+<text text-anchor="middle" x="81" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%basis_scalar</text>
 </g>
 <!-- interface~compute_tgc~3 -->
 <g id="proc~~basis_scalar~3~~CallsGraph_node2" class="node">
 <title>interface~compute_tgc~3</title>
 <g id="a_proc~~basis_scalar~3~~CallsGraph_node2"><a xlink:href="../interface/compute_tgc~3.html" xlink:title="compute_Tgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="301.5,-66 216.5,-66 216.5,-42 301.5,-42 301.5,-66"/>
-<text text-anchor="middle" x="259" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="316.5,-66 231.5,-66 231.5,-42 316.5,-42 316.5,-66"/>
+<text text-anchor="middle" x="274" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_scalar~3&#45;&gt;interface~compute_tgc~3 -->
 <g id="proc~~basis_scalar~3~~CallsGraph_edge1" class="edge">
 <title>proc~basis_scalar~3&#45;&gt;interface~compute_tgc~3</title>
-<path fill="none" stroke="#ff0000" d="M152.19,-41.72C170.37,-43.83 189.39,-46.04 206.22,-47.99"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="206.05,-51.5 216.38,-49.17 206.85,-44.54 206.05,-51.5"/>
+<path fill="none" stroke="#ff0000" d="M162.17,-41.81C182.15,-44.01 203.04,-46.31 221.24,-48.31"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="221,-51.8 231.33,-49.42 221.77,-44.85 221,-51.8"/>
 </g>
 <!-- proc~is_rational~3 -->
 <g id="proc~~basis_scalar~3~~CallsGraph_node3" class="node">
 <title>proc~is_rational~3</title>
-<g id="a_proc~~basis_scalar~3~~CallsGraph_node3"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="330,-24 188,-24 188,0 330,0 330,-24"/>
-<text text-anchor="middle" x="259" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
+<g id="a_proc~~basis_scalar~3~~CallsGraph_node3"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="350,-24 198,-24 198,0 350,0 350,-24"/>
+<text text-anchor="middle" x="274" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_scalar~3&#45;&gt;proc~is_rational~3 -->
 <g id="proc~~basis_scalar~3~~CallsGraph_edge2" class="edge">
 <title>proc~basis_scalar~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M152.19,-24.28C160.7,-23.29 169.41,-22.28 177.98,-21.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="178.44,-24.75 187.97,-20.12 177.64,-17.8 178.44,-24.75"/>
+<path fill="none" stroke="#ff0000" d="M162.17,-24.19C170.68,-23.25 179.36,-22.3 187.93,-21.35"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="188.35,-24.83 197.91,-20.26 187.59,-17.87 188.35,-24.83"/>
 </g>
 </g>
 </svg>
@@ -371,7 +371,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/basis_vector.html b/proc/basis_vector.html
index 779c9f010..971f11dc0 100644
--- a/proc/basis_vector.html
+++ b/proc/basis_vector.html
@@ -78,20 +78,20 @@ <h1>basis_vector
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.6% of total for procedures.">41 statements</a>
+                 title=" 0.3% of total for procedures.">21 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">basis_vector</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine basis_vector(this, res1, res2, res3, Xt1, Xt2, Xt3, Tgc)  
+    <h2>private pure subroutine basis_vector(this, res, Xt, Tgc)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~38"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~39"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1~4"></span>
+              <span class="anchor" id="variable-res~4"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -181,74 +181,14 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>res1</strong></td>
+            <td><strong>res</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2~4"></span>
-              integer,
-            </td>
-<td>intent(in),</td>
-              <td>optional</td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>res2</strong></td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-res3~4"></span>
-              integer,
-            </td>
-<td>intent(in),</td>
-              <td>optional</td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>res3</strong></td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-xt1~5"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td>optional,</td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>Xt1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-xt2~5"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td>optional,</td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>Xt2</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-xt3~5"></span>
+              <span class="anchor" id="variable-xt~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -256,7 +196,7 @@ <h3>Arguments</h3>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>Xt3</strong>(:)</td>
+            <td><strong>Xt</strong>(:)</td>
             <td>
                 
             </td>
@@ -291,91 +231,46 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~basis_vector~~CallsGraph Pages: 1 -->
-<svg id="procbasis_vectorCallsGraph" width="449pt" height="116pt"
- viewBox="0.00 0.00 449.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~basis_vector~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
+<svg id="procbasis_vectorCallsGraph" width="340pt" height="74pt"
+ viewBox="0.00 0.00 340.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~basis_vector~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~basis_vector~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 445,-112 445,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 336,-70 336,4 -4,4"/>
 <!-- proc~basis_vector -->
 <g id="proc~~basis_vector~~CallsGraph_node1" class="node">
 <title>proc~basis_vector</title>
-<polygon fill="none" stroke="black" points="163,-66 0,-66 0,-42 163,-42 163,-66"/>
-<text text-anchor="middle" x="81.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%basis_vector</text>
+<polygon fill="none" stroke="black" points="154,-45 0,-45 0,-21 154,-21 154,-45"/>
+<text text-anchor="middle" x="77" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%basis_vector</text>
 </g>
 <!-- interface~compute_tgc -->
 <g id="proc~~basis_vector~~CallsGraph_node2" class="node">
 <title>interface~compute_tgc</title>
 <g id="a_proc~~basis_vector~~CallsGraph_node2"><a xlink:href="../interface/compute_tgc.html" xlink:title="compute_Tgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="317.5,-108 232.5,-108 232.5,-84 317.5,-84 317.5,-108"/>
-<text text-anchor="middle" x="275" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="303.5,-66 218.5,-66 218.5,-42 303.5,-42 303.5,-66"/>
+<text text-anchor="middle" x="261" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_vector&#45;&gt;interface~compute_tgc -->
 <g id="proc~~basis_vector~~CallsGraph_edge1" class="edge">
 <title>proc~basis_vector&#45;&gt;interface~compute_tgc</title>
-<path fill="none" stroke="#ff0000" d="M137.38,-66.04C164.13,-71.9 196.13,-78.92 222.43,-84.69"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="221.69,-88.11 232.21,-86.83 223.19,-81.27 221.69,-88.11"/>
-</g>
-<!-- interface~ndgrid -->
-<g id="proc~~basis_vector~~CallsGraph_node3" class="node">
-<title>interface~ndgrid</title>
-<g id="a_proc~~basis_vector~~CallsGraph_node3"><a xlink:href="../interface/ndgrid.html" xlink:title="ndgrid">
-<polygon fill="#a7506f" stroke="#a7506f" points="302,-66 248,-66 248,-42 302,-42 302,-66"/>
-<text text-anchor="middle" x="275" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid</text>
-</a>
-</g>
-</g>
-<!-- proc~basis_vector&#45;&gt;interface~ndgrid -->
-<g id="proc~~basis_vector~~CallsGraph_edge2" class="edge">
-<title>proc~basis_vector&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#ff0000" d="M163.16,-54C189.04,-54 216.43,-54 237.51,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="237.62,-57.5 247.62,-54 237.62,-50.5 237.62,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M154.13,-41.78C172.36,-43.89 191.41,-46.09 208.24,-48.03"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="208.07,-51.53 218.41,-49.2 208.88,-44.58 208.07,-51.53"/>
 </g>
 <!-- proc~is_rational -->
-<g id="proc~~basis_vector~~CallsGraph_node4" class="node">
+<g id="proc~~basis_vector~~CallsGraph_node3" class="node">
 <title>proc~is_rational</title>
-<g id="a_proc~~basis_vector~~CallsGraph_node4"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="351,-24 199,-24 199,0 351,0 351,-24"/>
-<text text-anchor="middle" x="275" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
+<g id="a_proc~~basis_vector~~CallsGraph_node3"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="332,-24 190,-24 190,0 332,0 332,-24"/>
+<text text-anchor="middle" x="261" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_vector&#45;&gt;proc~is_rational -->
-<g id="proc~~basis_vector~~CallsGraph_edge3" class="edge">
+<g id="proc~~basis_vector~~CallsGraph_edge2" class="edge">
 <title>proc~basis_vector&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ff0000" d="M137.38,-41.96C159.81,-37.04 185.93,-31.31 209.29,-26.19"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="210.1,-29.6 219.12,-24.04 208.6,-22.76 210.1,-29.6"/>
-</g>
-<!-- proc~ndgrid2 -->
-<g id="proc~~basis_vector~~CallsGraph_node5" class="node">
-<title>proc~ndgrid2</title>
-<g id="a_proc~~basis_vector~~CallsGraph_node5"><a xlink:href="../proc/ndgrid2.html" xlink:title="ndgrid2">
-<polygon fill="#d9534f" stroke="#d9534f" points="441,-87 387,-87 387,-63 441,-63 441,-87"/>
-<text text-anchor="middle" x="414" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid2</text>
-</a>
-</g>
-</g>
-<!-- interface~ndgrid&#45;&gt;proc~ndgrid2 -->
-<g id="proc~~basis_vector~~CallsGraph_edge4" class="edge">
-<title>interface~ndgrid&#45;&gt;proc~ndgrid2</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M302.09,-58C323.19,-61.23 353.14,-65.82 376.6,-69.42"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="376.12,-72.89 386.54,-70.94 377.19,-65.97 376.12,-72.89"/>
-</g>
-<!-- proc~ndgrid3 -->
-<g id="proc~~basis_vector~~CallsGraph_node6" class="node">
-<title>proc~ndgrid3</title>
-<g id="a_proc~~basis_vector~~CallsGraph_node6"><a xlink:href="../proc/ndgrid3.html" xlink:title="ndgrid3">
-<polygon fill="#d9534f" stroke="#d9534f" points="441,-45 387,-45 387,-21 441,-21 441,-45"/>
-<text text-anchor="middle" x="414" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid3</text>
-</a>
-</g>
-</g>
-<!-- interface~ndgrid&#45;&gt;proc~ndgrid3 -->
-<g id="proc~~basis_vector~~CallsGraph_edge5" class="edge">
-<title>interface~ndgrid&#45;&gt;proc~ndgrid3</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M302.09,-50C323.19,-46.77 353.14,-42.18 376.6,-38.58"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="377.19,-42.03 386.54,-37.06 376.12,-35.11 377.19,-42.03"/>
+<path fill="none" stroke="#ff0000" d="M154.13,-24.22C162.67,-23.23 171.39,-22.22 179.98,-21.23"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="180.45,-24.7 189.98,-20.08 179.65,-17.75 180.45,-24.7"/>
 </g>
 </g>
 </svg>
@@ -491,7 +386,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/basis_vector~2.html b/proc/basis_vector~2.html
index 2835cab07..2d05c7bc6 100644
--- a/proc/basis_vector~2.html
+++ b/proc/basis_vector~2.html
@@ -78,20 +78,20 @@ <h1>basis_vector
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.5% of total for procedures.">32 statements</a>
+                 title=" 0.6% of total for procedures.">41 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">basis_vector</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine basis_vector(this, res1, res2, Xt1, Xt2, Tgc)  
+    <h2>private pure subroutine basis_vector(this, res1, res2, res3, Xt1, Xt2, Xt3, Tgc)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~106"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~99"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1~9"></span>
+              <span class="anchor" id="variable-res1~6"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2~9"></span>
+              <span class="anchor" id="variable-res2~6"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -203,7 +203,22 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt1~10"></span>
+              <span class="anchor" id="variable-res3~4"></span>
+              integer,
+            </td>
+<td>intent(in),</td>
+              <td>optional</td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>res3</strong></td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xt1~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -218,7 +233,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt2~10"></span>
+              <span class="anchor" id="variable-xt2~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -233,7 +248,22 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~29"></span>
+              <span class="anchor" id="variable-xt3~5"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td>optional,</td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>Xt3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-tgc~28"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -270,7 +300,7 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~basis_vector~2~~CallsGraph_node1" class="node">
 <title>proc~basis_vector~2</title>
 <polygon fill="none" stroke="black" points="163,-66 0,-66 0,-42 163,-42 163,-66"/>
-<text text-anchor="middle" x="81.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%basis_vector</text>
+<text text-anchor="middle" x="81.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%basis_vector</text>
 </g>
 <!-- interface~compute_tgc~2 -->
 <g id="proc~~basis_vector~2~~CallsGraph_node2" class="node">
@@ -305,9 +335,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~is_rational~2 -->
 <g id="proc~~basis_vector~2~~CallsGraph_node4" class="node">
 <title>proc~is_rational~2</title>
-<g id="a_proc~~basis_vector~2~~CallsGraph_node4"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<g id="a_proc~~basis_vector~2~~CallsGraph_node4"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="351,-24 199,-24 199,0 351,0 351,-24"/>
-<text text-anchor="middle" x="275" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
+<text text-anchor="middle" x="275" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
@@ -461,7 +491,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/basis_vector~3.html b/proc/basis_vector~3.html
index b99e13cf3..129e8ef26 100644
--- a/proc/basis_vector~3.html
+++ b/proc/basis_vector~3.html
@@ -78,20 +78,20 @@ <h1>basis_vector
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.3% of total for procedures.">21 statements</a>
+                 title=" 0.5% of total for procedures.">32 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">basis_vector</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine basis_vector(this, res, Xt, Tgc)  
+    <h2>private pure subroutine basis_vector(this, res1, res2, Xt1, Xt2, Tgc)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~170"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~167"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res~4"></span>
+              <span class="anchor" id="variable-res1~10"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -181,14 +181,44 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>res</strong></td>
+            <td><strong>res1</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~70"></span>
+              <span class="anchor" id="variable-res2~10"></span>
+              integer,
+            </td>
+<td>intent(in),</td>
+              <td>optional</td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>res2</strong></td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xt1~10"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td>optional,</td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>Xt1</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xt2~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -196,7 +226,7 @@ <h3>Arguments</h3>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>Xt</strong>(:)</td>
+            <td><strong>Xt2</strong>(:)</td>
             <td>
                 
             </td>
@@ -231,46 +261,91 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~basis_vector~3~~CallsGraph Pages: 1 -->
-<svg id="procbasis_vector3CallsGraph" width="340pt" height="74pt"
- viewBox="0.00 0.00 340.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~basis_vector~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
+<svg id="procbasis_vector3CallsGraph" width="449pt" height="116pt"
+ viewBox="0.00 0.00 449.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~basis_vector~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
 <title>proc~~basis_vector~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 336,-70 336,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 445,-112 445,4 -4,4"/>
 <!-- proc~basis_vector~3 -->
 <g id="proc~~basis_vector~3~~CallsGraph_node1" class="node">
 <title>proc~basis_vector~3</title>
-<polygon fill="none" stroke="black" points="154,-45 0,-45 0,-21 154,-21 154,-45"/>
-<text text-anchor="middle" x="77" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%basis_vector</text>
+<polygon fill="none" stroke="black" points="163,-66 0,-66 0,-42 163,-42 163,-66"/>
+<text text-anchor="middle" x="81.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%basis_vector</text>
 </g>
 <!-- interface~compute_tgc~3 -->
 <g id="proc~~basis_vector~3~~CallsGraph_node2" class="node">
 <title>interface~compute_tgc~3</title>
 <g id="a_proc~~basis_vector~3~~CallsGraph_node2"><a xlink:href="../interface/compute_tgc~3.html" xlink:title="compute_Tgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="303.5,-66 218.5,-66 218.5,-42 303.5,-42 303.5,-66"/>
-<text text-anchor="middle" x="261" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="317.5,-108 232.5,-108 232.5,-84 317.5,-84 317.5,-108"/>
+<text text-anchor="middle" x="275" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Tgc</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_vector~3&#45;&gt;interface~compute_tgc~3 -->
 <g id="proc~~basis_vector~3~~CallsGraph_edge1" class="edge">
 <title>proc~basis_vector~3&#45;&gt;interface~compute_tgc~3</title>
-<path fill="none" stroke="#ff0000" d="M154.13,-41.78C172.36,-43.89 191.41,-46.09 208.24,-48.03"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="208.07,-51.53 218.41,-49.2 208.88,-44.58 208.07,-51.53"/>
+<path fill="none" stroke="#ff0000" d="M137.38,-66.04C164.13,-71.9 196.13,-78.92 222.43,-84.69"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="221.69,-88.11 232.21,-86.83 223.19,-81.27 221.69,-88.11"/>
 </g>
-<!-- proc~is_rational~3 -->
+<!-- interface~ndgrid -->
 <g id="proc~~basis_vector~3~~CallsGraph_node3" class="node">
+<title>interface~ndgrid</title>
+<g id="a_proc~~basis_vector~3~~CallsGraph_node3"><a xlink:href="../interface/ndgrid.html" xlink:title="ndgrid">
+<polygon fill="#a7506f" stroke="#a7506f" points="302,-66 248,-66 248,-42 302,-42 302,-66"/>
+<text text-anchor="middle" x="275" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid</text>
+</a>
+</g>
+</g>
+<!-- proc~basis_vector~3&#45;&gt;interface~ndgrid -->
+<g id="proc~~basis_vector~3~~CallsGraph_edge2" class="edge">
+<title>proc~basis_vector~3&#45;&gt;interface~ndgrid</title>
+<path fill="none" stroke="#ff0000" d="M163.16,-54C189.04,-54 216.43,-54 237.51,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="237.62,-57.5 247.62,-54 237.62,-50.5 237.62,-57.5"/>
+</g>
+<!-- proc~is_rational~3 -->
+<g id="proc~~basis_vector~3~~CallsGraph_node4" class="node">
 <title>proc~is_rational~3</title>
-<g id="a_proc~~basis_vector~3~~CallsGraph_node3"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="332,-24 190,-24 190,0 332,0 332,-24"/>
-<text text-anchor="middle" x="261" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
+<g id="a_proc~~basis_vector~3~~CallsGraph_node4"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="351,-24 199,-24 199,0 351,0 351,-24"/>
+<text text-anchor="middle" x="275" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_vector~3&#45;&gt;proc~is_rational~3 -->
-<g id="proc~~basis_vector~3~~CallsGraph_edge2" class="edge">
+<g id="proc~~basis_vector~3~~CallsGraph_edge3" class="edge">
 <title>proc~basis_vector~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M154.13,-24.22C162.67,-23.23 171.39,-22.22 179.98,-21.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="180.45,-24.7 189.98,-20.08 179.65,-17.75 180.45,-24.7"/>
+<path fill="none" stroke="#ff0000" d="M137.38,-41.96C159.81,-37.04 185.93,-31.31 209.29,-26.19"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="210.1,-29.6 219.12,-24.04 208.6,-22.76 210.1,-29.6"/>
+</g>
+<!-- proc~ndgrid2 -->
+<g id="proc~~basis_vector~3~~CallsGraph_node5" class="node">
+<title>proc~ndgrid2</title>
+<g id="a_proc~~basis_vector~3~~CallsGraph_node5"><a xlink:href="../proc/ndgrid2.html" xlink:title="ndgrid2">
+<polygon fill="#d9534f" stroke="#d9534f" points="441,-87 387,-87 387,-63 441,-63 441,-87"/>
+<text text-anchor="middle" x="414" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid2</text>
+</a>
+</g>
+</g>
+<!-- interface~ndgrid&#45;&gt;proc~ndgrid2 -->
+<g id="proc~~basis_vector~3~~CallsGraph_edge4" class="edge">
+<title>interface~ndgrid&#45;&gt;proc~ndgrid2</title>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M302.09,-58C323.19,-61.23 353.14,-65.82 376.6,-69.42"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="376.12,-72.89 386.54,-70.94 377.19,-65.97 376.12,-72.89"/>
+</g>
+<!-- proc~ndgrid3 -->
+<g id="proc~~basis_vector~3~~CallsGraph_node6" class="node">
+<title>proc~ndgrid3</title>
+<g id="a_proc~~basis_vector~3~~CallsGraph_node6"><a xlink:href="../proc/ndgrid3.html" xlink:title="ndgrid3">
+<polygon fill="#d9534f" stroke="#d9534f" points="441,-45 387,-45 387,-21 441,-21 441,-45"/>
+<text text-anchor="middle" x="414" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid3</text>
+</a>
+</g>
+</g>
+<!-- interface~ndgrid&#45;&gt;proc~ndgrid3 -->
+<g id="proc~~basis_vector~3~~CallsGraph_edge5" class="edge">
+<title>interface~ndgrid&#45;&gt;proc~ndgrid3</title>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M302.09,-50C323.19,-46.77 353.14,-42.18 376.6,-38.58"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="377.19,-42.03 386.54,-37.06 376.12,-35.11 377.19,-42.03"/>
 </g>
 </g>
 </svg>
@@ -386,7 +461,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/bincoeff.html b/proc/bincoeff.html
index 8a5d7047a..0f4caa858 100644
--- a/proc/bincoeff.html
+++ b/proc/bincoeff.html
@@ -355,9 +355,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~elevate_degree -->
 <g id="proc~~bincoeff~~CalledByGraph_node3" class="node">
 <title>proc~elevate_degree</title>
-<g id="a_proc~~bincoeff~~CalledByGraph_node3"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="326,-108 146,-108 146,-84 326,-84 326,-108"/>
-<text text-anchor="middle" x="236" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
+<g id="a_proc~~bincoeff~~CalledByGraph_node3"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="321,-108 151,-108 151,-84 321,-84 321,-108"/>
+<text text-anchor="middle" x="236" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
 </a>
 </g>
 </g>
@@ -370,9 +370,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~elevate_degree~2 -->
 <g id="proc~~bincoeff~~CalledByGraph_node4" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_proc~~bincoeff~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
+<g id="a_proc~~bincoeff~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="326,-66 146,-66 146,-42 326,-42 326,-66"/>
-<text text-anchor="middle" x="236" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<text text-anchor="middle" x="236" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
@@ -385,9 +385,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~elevate_degree~3 -->
 <g id="proc~~bincoeff~~CalledByGraph_node5" class="node">
 <title>proc~elevate_degree~3</title>
-<g id="a_proc~~bincoeff~~CalledByGraph_node5"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="321,-24 151,-24 151,0 321,0 321,-24"/>
-<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+<g id="a_proc~~bincoeff~~CalledByGraph_node5"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="326,-24 146,-24 146,0 326,0 326,-24"/>
+<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
 </a>
 </g>
 </g>
@@ -401,46 +401,46 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~bincoeff~~CalledByGraph_node6" class="node">
 <title>program~example1_curve</title>
 <g id="a_proc~~bincoeff~~CalledByGraph_node6"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-24 5,-24 5,0 105,0 105,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-108 5,-108 5,-84 105,-84 105,-108"/>
+<text text-anchor="middle" x="55" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
-<g id="proc~~bincoeff~~CalledByGraph_edge7" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
-<path fill="none" stroke="#0000ff" d="M105.39,-12C116.38,-12 128.39,-12 140.53,-12"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="140.73,-15.5 150.73,-12 140.73,-8.5 140.73,-15.5"/>
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
+<g id="proc~~bincoeff~~CalledByGraph_edge5" class="edge">
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
+<path fill="none" stroke="#ff0000" d="M105.39,-96C116.38,-96 128.39,-96 140.53,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="140.73,-99.5 150.73,-96 140.73,-92.5 140.73,-99.5"/>
 </g>
 <!-- program~example3_surface -->
 <g id="proc~~bincoeff~~CalledByGraph_node7" class="node">
 <title>program~example3_surface</title>
 <g id="a_proc~~bincoeff~~CalledByGraph_node7"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-66 0,-66 0,-42 110,-42 110,-66"/>
-<text text-anchor="middle" x="55" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
-<g id="proc~~bincoeff~~CalledByGraph_edge6" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
-<path fill="none" stroke="#00ff00" d="M110.19,-54C118.33,-54 126.93,-54 135.65,-54"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="135.93,-57.5 145.93,-54 135.93,-50.5 135.93,-57.5"/>
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="proc~~bincoeff~~CalledByGraph_edge7" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#0000ff" d="M110.19,-12C118.33,-12 126.93,-12 135.65,-12"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="135.93,-15.5 145.93,-12 135.93,-8.5 135.93,-15.5"/>
 </g>
 <!-- program~example3_volume -->
 <g id="proc~~bincoeff~~CalledByGraph_node8" class="node">
 <title>program~example3_volume</title>
 <g id="a_proc~~bincoeff~~CalledByGraph_node8"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-108 0,-108 0,-84 110,-84 110,-108"/>
-<text text-anchor="middle" x="55" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-66 0,-66 0,-42 110,-42 110,-66"/>
+<text text-anchor="middle" x="55" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
-<g id="proc~~bincoeff~~CalledByGraph_edge5" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#ff0000" d="M110.19,-96C118.33,-96 126.93,-96 135.65,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.93,-99.5 145.93,-96 135.93,-92.5 135.93,-99.5"/>
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
+<g id="proc~~bincoeff~~CalledByGraph_edge6" class="edge">
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
+<path fill="none" stroke="#00ff00" d="M110.19,-54C118.33,-54 126.93,-54 135.65,-54"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="135.93,-57.5 145.93,-54 135.93,-50.5 135.93,-57.5"/>
 </g>
 </g>
 </svg>
@@ -556,7 +556,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_area.html b/proc/cmp_area.html
index 343bce730..f2d629b45 100644
--- a/proc/cmp_area.html
+++ b/proc/cmp_area.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~131"></span>
+              <span class="anchor" id="variable-this~192"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -212,39 +212,39 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="150,-264 0,-264 0,-240 150,-240 150,-264"/>
 <text text-anchor="middle" x="75" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_area</text>
 </g>
-<!-- proc~ansatz~2 -->
+<!-- proc~ansatz~3 -->
 <g id="proc~~cmp_area~~CallsGraph_node2" class="node">
-<title>proc~ansatz~2</title>
-<g id="a_proc~~cmp_area~~CallsGraph_node2"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
+<title>proc~ansatz~3</title>
+<g id="a_proc~~cmp_area~~CallsGraph_node2"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="318,-244 186,-244 186,-220 318,-220 318,-244"/>
 <text text-anchor="middle" x="252" y="-229.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge1" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
 <path fill="none" stroke="#ff0000" d="M150.22,-243.52C158.63,-242.56 167.21,-241.58 175.63,-240.61"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="176.27,-244.06 185.81,-239.45 175.48,-237.11 176.27,-244.06"/>
 </g>
-<!-- proc~cmp_elem~2 -->
+<!-- proc~cmp_elem~3 -->
 <g id="proc~~cmp_area~~CallsGraph_node3" class="node">
-<title>proc~cmp_elem~2</title>
-<g id="a_proc~~cmp_area~~CallsGraph_node3"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_surface%cmp_elem">
+<title>proc~cmp_elem~3</title>
+<g id="a_proc~~cmp_area~~CallsGraph_node3"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_surface%cmp_elem">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="507,-494 354,-494 354,-470 507,-470 507,-494"/>
 <text text-anchor="middle" x="430.5" y="-479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~2 -->
+<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge2" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~cmp_elem~2</title>
+<title>proc~cmp_area&#45;&gt;proc~cmp_elem~3</title>
 <path fill="none" stroke="#ff0000" d="M94.16,-264.01C138.45,-293.27 255.6,-370.51 354,-434 369.63,-444.09 387.16,-455.24 401.39,-464.26"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="399.89,-467.45 410.22,-469.84 403.64,-461.53 399.89,-467.45"/>
 </g>
-<!-- proc~ansatz~2&#45;&gt;proc~cmp_elem~2 -->
+<!-- proc~ansatz~3&#45;&gt;proc~cmp_elem~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge8" class="edge">
-<title>proc~ansatz~2&#45;&gt;proc~cmp_elem~2</title>
+<title>proc~ansatz~3&#45;&gt;proc~cmp_elem~3</title>
 <path fill="none" stroke="#ff0000" d="M259.04,-244.2C280.56,-287.59 352.21,-432.02 354,-434 365.27,-446.49 380.51,-457 394.35,-464.97"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="392.74,-468.08 403.19,-469.84 396.12,-461.95 392.74,-468.08"/>
 </g>
@@ -257,9 +257,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;interface~gauss_leg -->
+<!-- proc~ansatz~3&#45;&gt;interface~gauss_leg -->
 <g id="proc~~cmp_area~~CallsGraph_edge3" class="edge">
-<title>proc~ansatz~2&#45;&gt;interface~gauss_leg</title>
+<title>proc~ansatz~3&#45;&gt;interface~gauss_leg</title>
 <path fill="none" stroke="#ff0000" d="M318.22,-232C341.41,-232 366.87,-232 387.59,-232"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="387.64,-235.5 397.64,-232 387.64,-228.5 387.64,-235.5"/>
 </g>
@@ -272,9 +272,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;interface~ndgrid -->
+<!-- proc~ansatz~3&#45;&gt;interface~ndgrid -->
 <g id="proc~~cmp_area~~CallsGraph_edge4" class="edge">
-<title>proc~ansatz~2&#45;&gt;interface~ndgrid</title>
+<title>proc~ansatz~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M297.82,-219.95C354.46,-205.25 455.19,-180.9 543,-169 639.95,-155.87 755.46,-152.83 813.06,-152.16"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="813.16,-155.66 823.13,-152.06 813.09,-148.66 813.16,-155.66"/>
 </g>
@@ -287,39 +287,39 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;interface~unique -->
+<!-- proc~ansatz~3&#45;&gt;interface~unique -->
 <g id="proc~~cmp_area~~CallsGraph_edge5" class="edge">
-<title>proc~ansatz~2&#45;&gt;interface~unique</title>
+<title>proc~ansatz~3&#45;&gt;interface~unique</title>
 <path fill="none" stroke="#ff0000" d="M262.07,-244.06C274.87,-261.17 298.79,-293.58 318,-322 334.78,-346.82 331.83,-358.85 354,-379 374.04,-397.21 530.43,-471.89 601.75,-505.49"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="600.69,-508.86 611.23,-509.95 603.67,-502.52 600.69,-508.86"/>
 </g>
-<!-- none~derivative~2 -->
+<!-- none~derivative~3 -->
 <g id="proc~~cmp_area~~CallsGraph_node8" class="node">
-<title>none~derivative~2</title>
-<g id="a_proc~~cmp_area~~CallsGraph_node8"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~2" xlink:title="nurbs_surface%derivative">
+<title>none~derivative~3</title>
+<g id="a_proc~~cmp_area~~CallsGraph_node8"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~3" xlink:title="nurbs_surface%derivative">
 <polygon fill="#a7506f" stroke="#a7506f" points="506,-122 355,-122 355,-98 506,-98 506,-122"/>
 <text text-anchor="middle" x="430.5" y="-107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;none~derivative~2 -->
+<!-- proc~ansatz~3&#45;&gt;none~derivative~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge6" class="edge">
-<title>proc~ansatz~2&#45;&gt;none~derivative~2</title>
+<title>proc~ansatz~3&#45;&gt;none~derivative~3</title>
 <path fill="none" stroke="#ff0000" d="M262.63,-219.96C279.26,-199.88 315.33,-159.48 354,-136 360.35,-132.14 367.36,-128.76 374.46,-125.82"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="376.08,-128.95 384.16,-122.09 373.57,-122.41 376.08,-128.95"/>
 </g>
-<!-- none~set~2 -->
+<!-- none~set~3 -->
 <g id="proc~~cmp_area~~CallsGraph_node9" class="node">
-<title>none~set~2</title>
-<g id="a_proc~~cmp_area~~CallsGraph_node9"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<title>none~set~3</title>
+<g id="a_proc~~cmp_area~~CallsGraph_node9"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="487,-370 374,-370 374,-346 487,-346 487,-370"/>
 <text text-anchor="middle" x="430.5" y="-355.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;none~set~2 -->
+<!-- proc~ansatz~3&#45;&gt;none~set~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge7" class="edge">
-<title>proc~ansatz~2&#45;&gt;none~set~2</title>
+<title>proc~ansatz~3&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff0000" d="M269.92,-244.08C301.16,-266.38 367.99,-314.09 404.47,-340.13"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="402.46,-342.99 412.63,-345.96 406.52,-337.3 402.46,-342.99"/>
 </g>
@@ -332,9 +332,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;proc~det -->
+<!-- proc~ansatz~3&#45;&gt;proc~det -->
 <g id="proc~~cmp_area~~CallsGraph_edge9" class="edge">
-<title>proc~ansatz~2&#45;&gt;proc~det</title>
+<title>proc~ansatz~3&#45;&gt;proc~det</title>
 <path fill="none" stroke="#ff0000" d="M258,-219.81C270.06,-191.96 303.55,-123.45 354,-89 354.65,-88.56 524.71,-46.65 600.86,-27.9"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="602.08,-31.2 610.95,-25.41 600.41,-24.4 602.08,-31.2"/>
 </g>
@@ -347,9 +347,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;proc~inv -->
+<!-- proc~ansatz~3&#45;&gt;proc~inv -->
 <g id="proc~~cmp_area~~CallsGraph_edge10" class="edge">
-<title>proc~ansatz~2&#45;&gt;proc~inv</title>
+<title>proc~ansatz~3&#45;&gt;proc~inv</title>
 <path fill="none" stroke="#ff0000" d="M257.37,-219.93C268.95,-189.28 303.1,-107.24 354,-56 365.47,-44.46 380.58,-34.86 394.27,-27.61"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="396.11,-30.6 403.45,-22.97 392.95,-24.35 396.11,-30.6"/>
 </g>
@@ -362,30 +362,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem~2&#45;&gt;interface~elemconn_cn -->
+<!-- proc~cmp_elem~3&#45;&gt;interface~elemconn_cn -->
 <g id="proc~~cmp_area~~CallsGraph_edge11" class="edge">
-<title>proc~cmp_elem~2&#45;&gt;interface~elemconn_cn</title>
+<title>proc~cmp_elem~3&#45;&gt;interface~elemconn_cn</title>
 <path fill="none" stroke="#00ffff" d="M448.67,-494.11C484.78,-519.59 568.77,-578.86 611.32,-608.88"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="609.55,-611.91 619.74,-614.82 613.58,-606.19 609.55,-611.91"/>
 </g>
-<!-- proc~cmp_elem~2&#45;&gt;interface~unique -->
+<!-- proc~cmp_elem~3&#45;&gt;interface~unique -->
 <g id="proc~~cmp_area~~CallsGraph_edge12" class="edge">
-<title>proc~cmp_elem~2&#45;&gt;interface~unique</title>
+<title>proc~cmp_elem~3&#45;&gt;interface~unique</title>
 <path fill="none" stroke="#00ffff" d="M493.16,-494C528.37,-500.86 571.3,-509.21 601.05,-515"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="600.5,-518.46 610.98,-516.94 601.84,-511.59 600.5,-518.46"/>
 </g>
-<!-- proc~get_multiplicity~2 -->
+<!-- proc~get_multiplicity~3 -->
 <g id="proc~~cmp_area~~CallsGraph_node11" class="node">
-<title>proc~get_multiplicity~2</title>
-<g id="a_proc~~cmp_area~~CallsGraph_node11"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<title>proc~get_multiplicity~3</title>
+<g id="a_proc~~cmp_area~~CallsGraph_node11"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1146,-454 968,-454 968,-430 1146,-430 1146,-454"/>
 <text text-anchor="middle" x="1057" y="-439.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge13" class="edge">
-<title>proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#00ffff" d="M507.18,-482.18C605.38,-481.71 781.93,-478.49 932,-463 949.07,-461.24 967.34,-458.58 984.47,-455.74"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="985.13,-459.18 994.4,-454.05 983.96,-452.28 985.13,-459.18"/>
 </g>
@@ -539,93 +539,93 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M665.23,-522C699.55,-522 760.26,-522 802.58,-522"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="802.65,-525.5 812.65,-522 802.65,-518.5 802.65,-525.5"/>
 </g>
-<!-- proc~derivative_scalar~2 -->
+<!-- proc~derivative_scalar~3 -->
 <g id="proc~~cmp_area~~CallsGraph_node17" class="node">
-<title>proc~derivative_scalar~2</title>
-<g id="a_proc~~cmp_area~~CallsGraph_node17"><a xlink:href="../proc/derivative_scalar~2.html" xlink:title="nurbs_surface%derivative_scalar">
+<title>proc~derivative_scalar~3</title>
+<g id="a_proc~~cmp_area~~CallsGraph_node17"><a xlink:href="../proc/derivative_scalar~3.html" xlink:title="nurbs_surface%derivative_scalar">
 <polygon fill="#d9534f" stroke="#d9534f" points="732,-80 544,-80 544,-56 732,-56 732,-80"/>
 <text text-anchor="middle" x="638" y="-65.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_scalar</text>
 </a>
 </g>
 </g>
-<!-- none~derivative~2&#45;&gt;proc~derivative_scalar~2 -->
+<!-- none~derivative~3&#45;&gt;proc~derivative_scalar~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge24" class="edge">
-<title>none~derivative~2&#45;&gt;proc~derivative_scalar~2</title>
+<title>none~derivative~3&#45;&gt;proc~derivative_scalar~3</title>
 <path fill="none" stroke="#00ffa9" stroke-dasharray="5,2" d="M490.39,-97.96C514.68,-93 543,-87.21 568.23,-82.05"/>
 <polygon fill="#00ffa9" stroke="#00ffa9" points="569.01,-85.47 578.1,-80.04 567.61,-78.61 569.01,-85.47"/>
 </g>
-<!-- proc~derivative_vector~2 -->
+<!-- proc~derivative_vector~3 -->
 <g id="proc~~cmp_area~~CallsGraph_node18" class="node">
-<title>proc~derivative_vector~2</title>
-<g id="a_proc~~cmp_area~~CallsGraph_node18"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_surface%derivative_vector">
+<title>proc~derivative_vector~3</title>
+<g id="a_proc~~cmp_area~~CallsGraph_node18"><a xlink:href="../proc/derivative_vector~3.html" xlink:title="nurbs_surface%derivative_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="733,-122 543,-122 543,-98 733,-98 733,-122"/>
 <text text-anchor="middle" x="638" y="-107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_vector</text>
 </a>
 </g>
 </g>
-<!-- none~derivative~2&#45;&gt;proc~derivative_vector~2 -->
+<!-- none~derivative~3&#45;&gt;proc~derivative_vector~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge25" class="edge">
-<title>none~derivative~2&#45;&gt;proc~derivative_vector~2</title>
+<title>none~derivative~3&#45;&gt;proc~derivative_vector~3</title>
 <path fill="none" stroke="#00ffa9" stroke-dasharray="5,2" d="M506.27,-110C514.94,-110 523.9,-110 532.88,-110"/>
 <polygon fill="#00ffa9" stroke="#00ffa9" points="533,-113.5 543,-110 533,-106.5 533,-113.5"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="proc~~cmp_area~~CallsGraph_node24" class="node">
-<title>proc~set1~2</title>
-<g id="a_proc~~cmp_area~~CallsGraph_node24"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<title>proc~set1~3</title>
+<g id="a_proc~~cmp_area~~CallsGraph_node24"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="698,-412 578,-412 578,-388 698,-388 698,-412"/>
 <text text-anchor="middle" x="638" y="-397.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge26" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
 <path fill="none" stroke="#00a9ff" stroke-dasharray="5,2" d="M487.11,-369.37C512.09,-374.47 541.82,-380.55 568.18,-385.94"/>
 <polygon fill="#00a9ff" stroke="#00a9ff" points="567.61,-389.39 578.11,-387.96 569.01,-382.53 567.61,-389.39"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="proc~~cmp_area~~CallsGraph_node25" class="node">
-<title>proc~set2~2</title>
-<g id="a_proc~~cmp_area~~CallsGraph_node25"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<title>proc~set2~3</title>
+<g id="a_proc~~cmp_area~~CallsGraph_node25"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="698,-370 578,-370 578,-346 698,-346 698,-370"/>
 <text text-anchor="middle" x="638" y="-355.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge27" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
 <path fill="none" stroke="#00a9ff" stroke-dasharray="5,2" d="M487.11,-358C511.88,-358 541.31,-358 567.5,-358"/>
 <polygon fill="#00a9ff" stroke="#00a9ff" points="567.75,-361.5 577.75,-358 567.75,-354.5 567.75,-361.5"/>
 </g>
-<!-- proc~set3~2 -->
+<!-- proc~set3~3 -->
 <g id="proc~~cmp_area~~CallsGraph_node26" class="node">
-<title>proc~set3~2</title>
-<g id="a_proc~~cmp_area~~CallsGraph_node26"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<title>proc~set3~3</title>
+<g id="a_proc~~cmp_area~~CallsGraph_node26"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="698,-454 578,-454 578,-430 698,-430 698,-454"/>
 <text text-anchor="middle" x="638" y="-439.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge28" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
+<title>none~set~3&#45;&gt;proc~set3~3</title>
 <path fill="none" stroke="#00a9ff" stroke-dasharray="5,2" d="M449.23,-370.21C470.57,-384.38 507.93,-407.52 543,-421 550.85,-424.02 559.25,-426.66 567.67,-428.96"/>
 <polygon fill="#00a9ff" stroke="#00a9ff" points="566.99,-432.4 577.54,-431.5 568.73,-425.62 566.99,-432.4"/>
 </g>
-<!-- proc~set4~2 -->
+<!-- proc~set4~3 -->
 <g id="proc~~cmp_area~~CallsGraph_node27" class="node">
-<title>proc~set4~2</title>
-<g id="a_proc~~cmp_area~~CallsGraph_node27"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<title>proc~set4~3</title>
+<g id="a_proc~~cmp_area~~CallsGraph_node27"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="698,-328 578,-328 578,-304 698,-304 698,-328"/>
 <text text-anchor="middle" x="638" y="-313.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set4~2 -->
+<!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge29" class="edge">
-<title>none~set~2&#45;&gt;proc~set4~2</title>
+<title>none~set~3&#45;&gt;proc~set4~3</title>
 <path fill="none" stroke="#00a9ff" stroke-dasharray="5,2" d="M487.11,-346.63C512.09,-341.53 541.82,-335.45 568.18,-330.06"/>
 <polygon fill="#00a9ff" stroke="#00a9ff" points="569.01,-333.47 578.11,-328.04 567.61,-326.61 569.01,-333.47"/>
 </g>
@@ -638,9 +638,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~cmp_area~~CallsGraph_edge30" class="edge">
-<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#aa00ff" d="M1146.17,-431.99C1154.77,-431.02 1163.42,-430.03 1171.82,-429.08"/>
 <polygon fill="#aa00ff" stroke="#aa00ff" points="1172.39,-432.54 1181.93,-427.93 1171.6,-425.58 1172.39,-432.54"/>
 </g>
@@ -686,51 +686,51 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1306.33,-413C1314.69,-411.91 1323.35,-410.78 1331.92,-409.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1332.44,-413.12 1341.9,-408.36 1331.53,-406.18 1332.44,-413.12"/>
 </g>
-<!-- interface~compute_dtgc~2 -->
+<!-- interface~compute_dtgc~3 -->
 <g id="proc~~cmp_area~~CallsGraph_node31" class="node">
-<title>interface~compute_dtgc~2</title>
-<g id="a_proc~~cmp_area~~CallsGraph_node31"><a xlink:href="../interface/compute_dtgc~2.html" xlink:title="compute_dTgc">
+<title>interface~compute_dtgc~3</title>
+<g id="a_proc~~cmp_area~~CallsGraph_node31"><a xlink:href="../interface/compute_dtgc~3.html" xlink:title="compute_dTgc">
 <polygon fill="#a7506f" stroke="#a7506f" points="896,-122 805,-122 805,-98 896,-98 896,-122"/>
 <text text-anchor="middle" x="850.5" y="-107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_scalar~2&#45;&gt;interface~compute_dtgc~2 -->
+<!-- proc~derivative_scalar~3&#45;&gt;interface~compute_dtgc~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge35" class="edge">
-<title>proc~derivative_scalar~2&#45;&gt;interface~compute_dtgc~2</title>
+<title>proc~derivative_scalar~3&#45;&gt;interface~compute_dtgc~3</title>
 <path fill="none" stroke="#96ff00" d="M699.32,-80.04C729.42,-86.04 765.56,-93.25 794.85,-99.1"/>
 <polygon fill="#96ff00" stroke="#96ff00" points="794.41,-102.58 804.9,-101.1 795.78,-95.71 794.41,-102.58"/>
 </g>
-<!-- proc~is_rational~2 -->
+<!-- proc~is_rational~3 -->
 <g id="proc~~cmp_area~~CallsGraph_node37" class="node">
-<title>proc~is_rational~2</title>
-<g id="a_proc~~cmp_area~~CallsGraph_node37"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<title>proc~is_rational~3</title>
+<g id="a_proc~~cmp_area~~CallsGraph_node37"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="926.5,-80 774.5,-80 774.5,-56 926.5,-56 926.5,-80"/>
 <text text-anchor="middle" x="850.5" y="-65.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_scalar~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~derivative_scalar~3&#45;&gt;proc~is_rational~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge36" class="edge">
-<title>proc~derivative_scalar~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~derivative_scalar~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#96ff00" d="M732.25,-68C742.91,-68 753.75,-68 764.3,-68"/>
 <polygon fill="#96ff00" stroke="#96ff00" points="764.32,-71.5 774.32,-68 764.32,-64.5 764.32,-71.5"/>
 </g>
-<!-- proc~derivative_vector~2&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative_vector~3&#45;&gt;interface~ndgrid -->
 <g id="proc~~cmp_area~~CallsGraph_edge38" class="edge">
-<title>proc~derivative_vector~2&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative_vector~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#3cff00" d="M699.32,-122.04C736.21,-129.4 782.17,-138.57 813.47,-144.81"/>
 <polygon fill="#3cff00" stroke="#3cff00" points="812.99,-148.28 823.48,-146.81 814.36,-141.42 812.99,-148.28"/>
 </g>
-<!-- proc~derivative_vector~2&#45;&gt;interface~compute_dtgc~2 -->
+<!-- proc~derivative_vector~3&#45;&gt;interface~compute_dtgc~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge37" class="edge">
-<title>proc~derivative_vector~2&#45;&gt;interface~compute_dtgc~2</title>
+<title>proc~derivative_vector~3&#45;&gt;interface~compute_dtgc~3</title>
 <path fill="none" stroke="#3cff00" d="M733.17,-110C754.23,-110 775.88,-110 794.72,-110"/>
 <polygon fill="#3cff00" stroke="#3cff00" points="794.87,-113.5 804.87,-110 794.87,-106.5 794.87,-113.5"/>
 </g>
-<!-- proc~derivative_vector~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~derivative_vector~3&#45;&gt;proc~is_rational~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge39" class="edge">
-<title>proc~derivative_vector~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~derivative_vector~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#3cff00" d="M699.32,-97.96C724.2,-93 753.21,-87.21 779.06,-82.05"/>
 <polygon fill="#3cff00" stroke="#3cff00" points="780.05,-85.43 789.17,-80.04 778.68,-78.56 780.05,-85.43"/>
 </g>
@@ -791,39 +791,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#00ffd1" d="M696.24,-191.09C733.43,-191.79 780.8,-192.69 812.96,-193.31"/>
 <polygon fill="#00ffd1" stroke="#00ffd1" points="813.18,-196.81 823.25,-193.5 813.32,-189.81 813.18,-196.81"/>
 </g>
-<!-- proc~cmp_degree~2 -->
+<!-- proc~cmp_degree~3 -->
 <g id="proc~~cmp_area~~CallsGraph_node32" class="node">
-<title>proc~cmp_degree~2</title>
-<g id="a_proc~~cmp_area~~CallsGraph_node32"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<title>proc~cmp_degree~3</title>
+<g id="a_proc~~cmp_area~~CallsGraph_node32"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="932,-454 769,-454 769,-430 932,-430 932,-454"/>
 <text text-anchor="middle" x="850.5" y="-439.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge47" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#001dff" d="M698.2,-411.81C723.43,-416.85 753.06,-422.76 779.38,-428.01"/>
 <polygon fill="#001dff" stroke="#001dff" points="778.8,-431.46 789.29,-429.99 780.17,-424.6 778.8,-431.46"/>
 </g>
-<!-- proc~cmp_nc~2 -->
+<!-- proc~cmp_nc~3 -->
 <g id="proc~~cmp_area~~CallsGraph_node33" class="node">
-<title>proc~cmp_nc~2</title>
-<g id="a_proc~~cmp_area~~CallsGraph_node33"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<title>proc~cmp_nc~3</title>
+<g id="a_proc~~cmp_area~~CallsGraph_node33"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="920,-412 781,-412 781,-388 920,-388 920,-412"/>
 <text text-anchor="middle" x="850.5" y="-397.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge48" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#001dff" d="M698.2,-400C720.65,-400 746.58,-400 770.57,-400"/>
 <polygon fill="#001dff" stroke="#001dff" points="770.71,-403.5 780.71,-400 770.71,-396.5 770.71,-403.5"/>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge49" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#3c00ff" d="M698.2,-369.81C723.43,-374.85 753.06,-380.76 779.38,-386.01"/>
 <polygon fill="#3c00ff" stroke="#3c00ff" points="778.8,-389.46 789.29,-387.99 780.17,-382.6 778.8,-389.46"/>
 </g>
@@ -836,27 +836,27 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~cmp_area~~CallsGraph_edge50" class="edge">
-<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#3c00ff" d="M698.2,-358C722.57,-358 751.04,-358 776.67,-358"/>
 <polygon fill="#3c00ff" stroke="#3c00ff" points="776.71,-361.5 786.71,-358 776.71,-354.5 776.71,-361.5"/>
 </g>
-<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge51" class="edge">
-<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#9500ff" d="M698.2,-442C716.92,-442 738.07,-442 758.49,-442"/>
 <polygon fill="#9500ff" stroke="#9500ff" points="758.76,-445.5 768.76,-442 758.76,-438.5 758.76,-445.5"/>
 </g>
-<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="proc~~cmp_area~~CallsGraph_edge52" class="edge">
-<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#aaff00" d="M932.03,-442C940.47,-442 949.11,-442 957.71,-442"/>
 <polygon fill="#aaff00" stroke="#aaff00" points="957.78,-445.5 967.78,-442 957.78,-438.5 957.78,-445.5"/>
 </g>
-<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~cmp_area~~CallsGraph_edge53" class="edge">
-<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M920.14,-403.68C990.69,-407.47 1100.03,-413.33 1171.57,-417.17"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1171.67,-420.68 1181.85,-417.72 1172.05,-413.69 1171.67,-420.68"/>
 </g>
@@ -1113,7 +1113,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_degree.html b/proc/cmp_degree.html
index 1282c444c..795d43cb3 100644
--- a/proc/cmp_degree.html
+++ b/proc/cmp_degree.html
@@ -78,20 +78,20 @@ <h1>cmp_degree
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.4% of total for procedures.">26 statements</a>
+                 title=" 0.1% of total for procedures.">6 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_degree</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine cmp_degree(this, dir)  
+    <h2>private pure subroutine cmp_degree(this)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~17"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~18"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -169,21 +169,6 @@ <h3>Arguments</h3>
             <td><strong>this</strong></td>
             <td>
                 
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-dir~4"></span>
-              integer,
-            </td>
-<td>intent(in),</td>
-              <td>optional</td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>dir</strong></td>
-            <td>
-                
             </td>
         </tr>
     </tbody>
@@ -201,76 +186,76 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_degree~~CallsGraph Pages: 1 -->
-<svg id="proccmp_degreeCallsGraph" width="641pt" height="67pt"
- viewBox="0.00 0.00 641.00 66.71" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_degree~~CallsGraph" class="graph" transform="scale(1.11 1.11) rotate(0) translate(4 70)">
+<svg id="proccmp_degreeCallsGraph" width="641pt" height="68pt"
+ viewBox="0.00 0.00 641.00 68.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_degree~~CallsGraph" class="graph" transform="scale(1.08 1.08) rotate(0) translate(4 70)">
 <title>proc~~cmp_degree~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 707,-70 707,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 689,-70 689,4 -4,4"/>
 <!-- proc~cmp_degree -->
 <g id="proc~~cmp_degree~~CallsGraph_node1" class="node">
 <title>proc~cmp_degree</title>
-<polygon fill="none" stroke="black" points="163,-45 0,-45 0,-21 163,-21 163,-45"/>
-<text text-anchor="middle" x="81.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_degree</text>
+<polygon fill="none" stroke="black" points="154,-45 0,-45 0,-21 154,-21 154,-45"/>
+<text text-anchor="middle" x="77" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_degree</text>
 </g>
 <!-- proc~get_multiplicity -->
 <g id="proc~~cmp_degree~~CallsGraph_node2" class="node">
 <title>proc~get_multiplicity</title>
-<g id="a_proc~~cmp_degree~~CallsGraph_node2"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="377,-45 199,-45 199,-21 377,-21 377,-45"/>
-<text text-anchor="middle" x="288" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
+<g id="a_proc~~cmp_degree~~CallsGraph_node2"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="359,-45 190,-45 190,-21 359,-21 359,-45"/>
+<text text-anchor="middle" x="274.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="proc~~cmp_degree~~CallsGraph_edge1" class="edge">
 <title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M163.03,-33C171.47,-33 180.11,-33 188.71,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="188.78,-36.5 198.78,-33 188.78,-29.5 188.78,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M154.15,-33C162.54,-33 171.17,-33 179.75,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="179.79,-36.5 189.79,-33 179.79,-29.5 179.79,-36.5"/>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~cmp_degree~~CallsGraph_node3" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~cmp_degree~~CallsGraph_node3"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="537,-45 413,-45 413,-21 537,-21 537,-45"/>
-<text text-anchor="middle" x="475" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="519,-45 395,-45 395,-21 519,-21 519,-45"/>
+<text text-anchor="middle" x="457" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~cmp_degree~~CallsGraph_edge2" class="edge">
 <title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M377.17,-33C385.77,-33 394.42,-33 402.82,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="402.93,-36.5 412.93,-33 402.93,-29.5 402.93,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M359.15,-33C367.73,-33 376.4,-33 384.84,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="384.99,-36.5 394.99,-33 384.99,-29.5 384.99,-36.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~cmp_degree~~CallsGraph_node4" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~cmp_degree~~CallsGraph_node4"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="703,-66 573,-66 573,-42 703,-42 703,-66"/>
-<text text-anchor="middle" x="638" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="685,-66 555,-66 555,-42 685,-42 685,-66"/>
+<text text-anchor="middle" x="620" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~cmp_degree~~CallsGraph_edge3" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M537.33,-41C545.69,-42.09 554.35,-43.22 562.92,-44.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="562.53,-47.82 572.9,-45.64 563.44,-40.88 562.53,-47.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M519.33,-41C527.69,-42.09 536.35,-43.22 544.92,-44.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="544.53,-47.82 554.9,-45.64 545.44,-40.88 544.53,-47.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~cmp_degree~~CallsGraph_node5" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~cmp_degree~~CallsGraph_node5"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="703,-24 573,-24 573,0 703,0 703,-24"/>
-<text text-anchor="middle" x="638" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="685,-24 555,-24 555,0 685,0 685,-24"/>
+<text text-anchor="middle" x="620" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~cmp_degree~~CallsGraph_edge4" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M537.33,-25C545.69,-23.91 554.35,-22.78 562.92,-21.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="563.44,-25.12 572.9,-20.36 562.53,-18.18 563.44,-25.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M519.33,-25C527.69,-23.91 536.35,-22.78 544.92,-21.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="545.44,-25.12 554.9,-20.36 544.53,-18.18 545.44,-25.12"/>
 </g>
 </g>
 </svg>
@@ -370,391 +355,367 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_degree~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_degreeCalledByGraph" width="641pt" height="394pt"
- viewBox="0.00 0.00 641.00 394.31" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_degree~~CalledByGraph" class="graph" transform="scale(1.62 1.62) rotate(0) translate(4 633.29)">
+<svg id="proccmp_degreeCalledByGraph" width="641pt" height="358pt"
+ viewBox="0.00 0.00 641.00 358.40" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_degree~~CalledByGraph" class="graph" transform="scale(1.53 1.53) rotate(0) translate(4 544.5)">
 <title>proc~~cmp_degree~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-633.29 1032,-633.29 1032,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-544.5 977,-544.5 977,4 -4,4"/>
 <!-- proc~cmp_degree -->
 <g id="proc~~cmp_degree~~CalledByGraph_node1" class="node">
 <title>proc~cmp_degree</title>
-<polygon fill="none" stroke="black" points="1028,-318 865,-318 865,-294 1028,-294 1028,-318"/>
-<text text-anchor="middle" x="946.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_degree</text>
+<polygon fill="none" stroke="black" points="973,-276 819,-276 819,-252 973,-252 973,-276"/>
+<text text-anchor="middle" x="896" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_degree</text>
 </g>
 <!-- proc~set1 -->
 <g id="proc~~cmp_degree~~CalledByGraph_node2" class="node">
 <title>proc~set1</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node2"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="829,-339 709,-339 709,-315 829,-315 829,-339"/>
-<text text-anchor="middle" x="769" y="-324.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node2"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="779.5,-318 669.5,-318 669.5,-294 779.5,-294 779.5,-318"/>
+<text text-anchor="middle" x="724.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
 <!-- proc~set1&#45;&gt;proc~cmp_degree -->
 <g id="proc~~cmp_degree~~CalledByGraph_edge1" class="edge">
 <title>proc~set1&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#ff0000" d="M829.42,-319.89C837.64,-318.91 846.23,-317.88 854.86,-316.85"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="855.47,-320.3 864.98,-315.63 854.64,-313.35 855.47,-320.3"/>
+<path fill="none" stroke="#ff0000" d="M774.07,-293.96C793.58,-289.13 816.23,-283.52 836.62,-278.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="837.56,-281.84 846.42,-276.04 835.87,-275.05 837.56,-281.84"/>
 </g>
-<!-- proc~set3 -->
+<!-- proc~set1a -->
 <g id="proc~~cmp_degree~~CalledByGraph_node3" class="node">
+<title>proc~set1a</title>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node3"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="783,-276 666,-276 666,-252 783,-252 783,-276"/>
+<text text-anchor="middle" x="724.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+</a>
+</g>
+</g>
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
+<g id="proc~~cmp_degree~~CalledByGraph_edge2" class="edge">
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#ff0000" d="M783.36,-264C791.56,-264 800.14,-264 808.74,-264"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="808.82,-267.5 818.82,-264 808.82,-260.5 808.82,-267.5"/>
+</g>
+<!-- proc~set3 -->
+<g id="proc~~cmp_degree~~CalledByGraph_node4" class="node">
 <title>proc~set3</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node3"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="829,-297 709,-297 709,-273 829,-273 829,-297"/>
-<text text-anchor="middle" x="769" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node4"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="779.5,-234 669.5,-234 669.5,-210 779.5,-210 779.5,-234"/>
+<text text-anchor="middle" x="724.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
 <!-- proc~set3&#45;&gt;proc~cmp_degree -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge2" class="edge">
+<g id="proc~~cmp_degree~~CalledByGraph_edge3" class="edge">
 <title>proc~set3&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#ff0000" d="M829.42,-292.11C837.64,-293.09 846.23,-294.12 854.86,-295.15"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="854.64,-298.65 864.98,-296.37 855.47,-291.7 854.64,-298.65"/>
+<path fill="none" stroke="#ff0000" d="M774.07,-234.04C793.58,-238.87 816.23,-244.48 836.62,-249.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="835.87,-252.95 846.42,-251.96 837.56,-246.16 835.87,-252.95"/>
 </g>
 <!-- none~set -->
-<g id="proc~~cmp_degree~~CalledByGraph_node4" class="node">
+<g id="proc~~cmp_degree~~CalledByGraph_node5" class="node">
 <title>none~set</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="673,-318 560,-318 560,-294 673,-294 673,-318"/>
-<text text-anchor="middle" x="616.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node5"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="630,-276 527,-276 527,-252 630,-252 630,-276"/>
+<text text-anchor="middle" x="578.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set1 -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge3" class="edge">
+<g id="proc~~cmp_degree~~CalledByGraph_edge4" class="edge">
 <title>none~set&#45;&gt;proc~set1</title>
-<path fill="none" stroke="#ff0000" d="M673.11,-313.76C681.48,-314.93 690.19,-316.14 698.8,-317.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="698.44,-320.83 708.83,-318.74 699.41,-313.89 698.44,-320.83"/>
+<path fill="none" stroke="#ff0000" d="M620.76,-276.04C636.88,-280.74 655.53,-286.18 672.48,-291.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="671.65,-294.52 682.23,-293.96 673.61,-287.8 671.65,-294.52"/>
+</g>
+<!-- none~set&#45;&gt;proc~set1a -->
+<g id="proc~~cmp_degree~~CalledByGraph_edge5" class="edge">
+<title>none~set&#45;&gt;proc~set1a</title>
+<path fill="none" stroke="#00ff00" d="M630.27,-264C638.53,-264 647.21,-264 655.8,-264"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="655.82,-267.5 665.82,-264 655.82,-260.5 655.82,-267.5"/>
 </g>
 <!-- none~set&#45;&gt;proc~set3 -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge4" class="edge">
+<g id="proc~~cmp_degree~~CalledByGraph_edge6" class="edge">
 <title>none~set&#45;&gt;proc~set3</title>
-<path fill="none" stroke="#00ffff" d="M673.11,-298.24C681.48,-297.07 690.19,-295.86 698.8,-294.66"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="699.41,-298.11 708.83,-293.26 698.44,-291.17 699.41,-298.11"/>
+<path fill="none" stroke="#0000ff" d="M620.76,-251.96C636.88,-247.26 655.53,-241.82 672.48,-236.88"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="673.61,-240.2 682.23,-234.04 671.65,-233.48 673.61,-240.2"/>
 </g>
 <!-- proc~ansatz -->
-<g id="proc~~cmp_degree~~CalledByGraph_node5" class="node">
+<g id="proc~~cmp_degree~~CalledByGraph_node6" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node5"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-566 367.5,-566 367.5,-542 499.5,-542 499.5,-566"/>
-<text text-anchor="middle" x="433.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node6"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="467,-482 345,-482 345,-458 467,-458 467,-482"/>
+<text text-anchor="middle" x="406" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;none~set -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge5" class="edge">
+<g id="proc~~cmp_degree~~CalledByGraph_edge7" class="edge">
 <title>proc~ansatz&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.76,-542.65C508.6,-539.03 517.01,-534.27 524,-528 584.64,-473.59 606.02,-372.87 612.74,-328.26"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="616.23,-328.58 614.15,-318.19 609.3,-327.61 616.23,-328.58"/>
+<path fill="none" stroke="#ff0000" d="M467.12,-458.13C475.76,-454.59 484.06,-449.98 491,-444 540.47,-401.35 563.98,-323.98 572.94,-286.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="576.41,-286.63 575.18,-276.11 569.58,-285.1 576.41,-286.63"/>
 </g>
 <!-- proc~elevate_degree -->
-<g id="proc~~cmp_degree~~CalledByGraph_node6" class="node">
+<g id="proc~~cmp_degree~~CalledByGraph_node7" class="node">
 <title>proc~elevate_degree</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node6"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-486 343.5,-486 343.5,-462 523.5,-462 523.5,-486"/>
-<text text-anchor="middle" x="433.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node7"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="491,-402 321,-402 321,-378 491,-378 491,-402"/>
+<text text-anchor="middle" x="406" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree&#45;&gt;none~set -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge6" class="edge">
+<g id="proc~~cmp_degree~~CalledByGraph_edge8" class="edge">
 <title>proc~elevate_degree&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M507.95,-461.94C513.63,-459.48 519.07,-456.54 524,-453 568.52,-421.06 596.03,-360.08 608.18,-327.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="611.5,-328.73 611.59,-318.14 604.91,-326.36 611.5,-328.73"/>
+<path fill="none" stroke="#ff0000" d="M472.9,-377.91C479.26,-375.47 485.41,-372.53 491,-369 524.67,-347.73 551.51,-308.93 565.91,-284.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="568.98,-286.61 570.98,-276.21 562.92,-283.09 568.98,-286.61"/>
 </g>
 <!-- proc~insert_knots -->
-<g id="proc~~cmp_degree~~CalledByGraph_node7" class="node">
+<g id="proc~~cmp_degree~~CalledByGraph_node8" class="node">
 <title>proc~insert_knots</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node7"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514,-444 353,-444 353,-420 514,-420 514,-444"/>
-<text text-anchor="middle" x="433.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node8"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_curve%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-360 330.5,-360 330.5,-336 481.5,-336 481.5,-360"/>
+<text text-anchor="middle" x="406" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;none~set -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge7" class="edge">
+<g id="proc~~cmp_degree~~CalledByGraph_edge9" class="edge">
 <title>proc~insert_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M505.06,-419.93C511.69,-417.49 518.12,-414.54 524,-411 558.92,-389.96 587.54,-351.08 603,-327"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="606.13,-328.6 608.45,-318.26 600.19,-324.89 606.13,-328.6"/>
+<path fill="none" stroke="#ff0000" d="M467.18,-335.97C475.36,-333.47 483.51,-330.5 491,-327 515.36,-315.61 539.83,-296.96 556.5,-282.9"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="559.18,-285.21 564.46,-276.02 554.6,-279.91 559.18,-285.21"/>
 </g>
 <!-- proc~modify_wc -->
-<g id="proc~~cmp_degree~~CalledByGraph_node8" class="node">
+<g id="proc~~cmp_degree~~CalledByGraph_node9" class="node">
 <title>proc~modify_wc</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node8"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-360 355.5,-360 355.5,-336 511.5,-336 511.5,-360"/>
-<text text-anchor="middle" x="433.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node9"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="479,-276 333,-276 333,-252 479,-252 479,-276"/>
+<text text-anchor="middle" x="406" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~set -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge8" class="edge">
+<g id="proc~~cmp_degree~~CalledByGraph_edge10" class="edge">
 <title>proc~modify_wc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M486.37,-335.96C507.38,-331.09 531.82,-325.42 553.75,-320.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="554.68,-323.71 563.63,-318.04 553.09,-316.89 554.68,-323.71"/>
+<path fill="none" stroke="#ff0000" d="M479.31,-264C491.66,-264 504.39,-264 516.42,-264"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="516.78,-267.5 526.78,-264 516.78,-260.5 516.78,-267.5"/>
 </g>
 <!-- proc~modify_xc -->
-<g id="proc~~cmp_degree~~CalledByGraph_node9" class="node">
+<g id="proc~~cmp_degree~~CalledByGraph_node10" class="node">
 <title>proc~modify_xc</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node9"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="510,-318 357,-318 357,-294 510,-294 510,-318"/>
-<text text-anchor="middle" x="433.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node10"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-234 334.5,-234 334.5,-210 477.5,-210 477.5,-234"/>
+<text text-anchor="middle" x="406" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~set -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge9" class="edge">
+<g id="proc~~cmp_degree~~CalledByGraph_edge11" class="edge">
 <title>proc~modify_xc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M510.21,-306C523.36,-306 536.93,-306 549.79,-306"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="549.92,-309.5 559.92,-306 549.92,-302.5 549.92,-309.5"/>
+<path fill="none" stroke="#ff0000" d="M455.86,-234.04C475.48,-238.87 498.26,-244.48 518.77,-249.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="518.09,-252.97 528.63,-251.96 519.76,-246.17 518.09,-252.97"/>
 </g>
 <!-- proc~remove_knots -->
-<g id="proc~~cmp_degree~~CalledByGraph_node10" class="node">
+<g id="proc~~cmp_degree~~CalledByGraph_node11" class="node">
 <title>proc~remove_knots</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node10"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-402 347.5,-402 347.5,-378 519.5,-378 519.5,-402"/>
-<text text-anchor="middle" x="433.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node11"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_curve%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="487,-318 325,-318 325,-294 487,-294 487,-318"/>
+<text text-anchor="middle" x="406" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots&#45;&gt;none~set -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge10" class="edge">
+<g id="proc~~cmp_degree~~CalledByGraph_edge12" class="edge">
 <title>proc~remove_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.01,-377.92C507.58,-375.44 516.12,-372.49 524,-369 549.77,-357.6 575.92,-338.69 593.63,-324.56"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="596.07,-327.09 601.61,-318.06 591.65,-321.66 596.07,-327.09"/>
+<path fill="none" stroke="#ff0000" d="M455.86,-293.96C475.48,-289.13 498.26,-283.52 518.77,-278.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="519.76,-281.83 528.63,-276.04 518.09,-275.03 519.76,-281.83"/>
 </g>
 <!-- proc~set_c -->
-<g id="proc~~cmp_degree~~CalledByGraph_node11" class="node">
+<g id="proc~~cmp_degree~~CalledByGraph_node12" class="node">
 <title>proc~set_c</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node11"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_volume%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-276 370.5,-276 370.5,-252 496.5,-252 496.5,-276"/>
-<text text-anchor="middle" x="433.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node12"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_curve%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="464,-192 348,-192 348,-168 464,-168 464,-192"/>
+<text text-anchor="middle" x="406" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c&#45;&gt;none~set -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge11" class="edge">
+<g id="proc~~cmp_degree~~CalledByGraph_edge13" class="edge">
 <title>proc~set_c&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M486.37,-276.04C507.38,-280.91 531.82,-286.58 553.75,-291.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="553.09,-295.11 563.63,-293.96 554.68,-288.29 553.09,-295.11"/>
+<path fill="none" stroke="#ff0000" d="M464.06,-191.1C473.28,-193.79 482.56,-197.05 491,-201 515.36,-212.39 539.83,-231.04 556.5,-245.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="554.6,-248.09 564.46,-251.98 559.18,-242.79 554.6,-248.09"/>
 </g>
-<!-- proc~set_half_ring -->
-<g id="proc~~cmp_degree~~CalledByGraph_node12" class="node">
-<title>proc~set_half_ring</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node12"><a xlink:href="../proc/set_half_ring.html" xlink:title="nurbs_volume%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="516,-234 351,-234 351,-210 516,-210 516,-234"/>
-<text text-anchor="middle" x="433.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
-</a>
-</g>
-</g>
-<!-- proc~set_half_ring&#45;&gt;none~set -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge12" class="edge">
-<title>proc~set_half_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.01,-234.08C507.58,-236.56 516.12,-239.51 524,-243 549.77,-254.4 575.92,-273.31 593.63,-287.44"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="591.65,-290.34 601.61,-293.94 596.07,-284.91 591.65,-290.34"/>
-</g>
-<!-- proc~set_hexahedron -->
+<!-- proc~set_circle -->
 <g id="proc~~cmp_degree~~CalledByGraph_node13" class="node">
-<title>proc~set_hexahedron</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node13"><a xlink:href="../proc/set_hexahedron.html" xlink:title="nurbs_volume%set_hexahedron">
-<polygon fill="#d9534f" stroke="#d9534f" points="524,-192 343,-192 343,-168 524,-168 524,-192"/>
-<text text-anchor="middle" x="433.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
+<title>proc~set_circle</title>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node13"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
+<polygon fill="#d9534f" stroke="#d9534f" points="474.5,-150 337.5,-150 337.5,-126 474.5,-126 474.5,-150"/>
+<text text-anchor="middle" x="406" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_hexahedron&#45;&gt;none~set -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge13" class="edge">
-<title>proc~set_hexahedron&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M505.06,-192.07C511.69,-194.51 518.12,-197.46 524,-201 558.92,-222.04 587.54,-260.92 603,-285"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="600.19,-287.11 608.45,-293.74 606.13,-283.4 600.19,-287.11"/>
+<!-- proc~set_circle&#45;&gt;none~set -->
+<g id="proc~~cmp_degree~~CalledByGraph_edge14" class="edge">
+<title>proc~set_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M472.9,-150.09C479.26,-152.53 485.41,-155.47 491,-159 524.67,-180.27 551.51,-219.07 565.91,-243.08"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="562.92,-244.91 570.98,-251.79 568.98,-241.39 562.92,-244.91"/>
 </g>
-<!-- proc~set_ring -->
+<!-- proc~set_half_circle -->
 <g id="proc~~cmp_degree~~CalledByGraph_node14" class="node">
-<title>proc~set_ring</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node14"><a xlink:href="../proc/set_ring.html" xlink:title="nurbs_volume%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="503,-150 364,-150 364,-126 503,-126 503,-150"/>
-<text text-anchor="middle" x="433.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
+<title>proc~set_half_circle</title>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node14"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
+<polygon fill="#d9534f" stroke="#d9534f" points="487.5,-108 324.5,-108 324.5,-84 487.5,-84 487.5,-108"/>
+<text text-anchor="middle" x="406" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring&#45;&gt;none~set -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge14" class="edge">
-<title>proc~set_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.41,-148.22C510.74,-151.01 517.78,-154.53 524,-159 568.52,-190.94 596.03,-251.92 608.18,-284.39"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="604.91,-285.64 611.59,-293.86 611.5,-283.27 604.91,-285.64"/>
+<!-- proc~set_half_circle&#45;&gt;none~set -->
+<g id="proc~~cmp_degree~~CalledByGraph_edge15" class="edge">
+<title>proc~set_half_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M475.62,-108.12C481.09,-110.56 486.3,-113.49 491,-117 534.04,-149.18 559.53,-209.61 570.72,-242.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="567.51,-243.52 573.97,-251.92 574.16,-241.32 567.51,-243.52"/>
 </g>
-<!-- program~compute_volume -->
+<!-- program~compute_length -->
 <g id="proc~~cmp_degree~~CalledByGraph_node15" class="node">
-<title>program~compute_volume</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node15"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-586 0,-586 0,-562 105,-562 105,-586"/>
-<text text-anchor="middle" x="52.5" y="-571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<title>program~compute_length</title>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node15"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-502 0,-502 0,-478 99,-478 99,-502"/>
+<text text-anchor="middle" x="49.5" y="-487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;none~set -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge15" class="edge">
-<title>program~compute_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M86.78,-586.01C169.65,-613.64 388.35,-672.14 524,-575 605.44,-516.68 615.25,-381.64 615.83,-328.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="619.33,-328.19 615.83,-318.18 612.33,-328.18 619.33,-328.19"/>
+<!-- program~compute_length&#45;&gt;none~set -->
+<g id="proc~~cmp_degree~~CalledByGraph_edge16" class="edge">
+<title>program~compute_length&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M84.64,-502.01C164.06,-527.61 364.11,-578.44 491,-491 559.8,-443.59 573.92,-333.61 576.79,-286.3"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="580.29,-286.35 577.28,-276.19 573.3,-286.01 580.29,-286.35"/>
 </g>
-<!-- proc~cmp_volume -->
-<g id="proc~~cmp_degree~~CalledByGraph_node20" class="node">
-<title>proc~cmp_volume</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node20"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-566 141,-566 141,-542 307,-542 307,-566"/>
-<text text-anchor="middle" x="224" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<!-- proc~cmp_length -->
+<g id="proc~~cmp_degree~~CalledByGraph_node19" class="node">
+<title>proc~cmp_length</title>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node19"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
+<polygon fill="#d9534f" stroke="#d9534f" points="285,-482 135,-482 135,-458 285,-458 285,-482"/>
+<text text-anchor="middle" x="210" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge28" class="edge">
-<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#ff0000" d="M105.28,-567.89C113.48,-566.92 122.18,-565.9 130.98,-564.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="131.41,-568.33 140.93,-563.68 130.59,-561.38 131.41,-568.33"/>
+<!-- program~compute_length&#45;&gt;proc~cmp_length -->
+<g id="proc~~cmp_degree~~CalledByGraph_edge27" class="edge">
+<title>program~compute_length&#45;&gt;proc~cmp_length</title>
+<path fill="none" stroke="#ff0000" d="M99.35,-483.84C107.54,-482.8 116.25,-481.7 125.03,-480.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="125.48,-484.07 134.96,-479.34 124.6,-477.12 125.48,-484.07"/>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example1_curve -->
 <g id="proc~~cmp_degree~~CalledByGraph_node16" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node16"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-465 169,-465 169,-441 279,-441 279,-465"/>
-<text text-anchor="middle" x="224" y="-450.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node16"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-381 160,-381 160,-357 260,-357 260,-381"/>
+<text text-anchor="middle" x="210" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;none~set -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge16" class="edge">
-<title>program~example3_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M246.93,-465.12C299.32,-492.29 434.06,-551.38 524,-495 583.54,-457.67 605.3,-369.39 612.41,-328.06"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="615.87,-328.6 613.98,-318.18 608.95,-327.5 615.87,-328.6"/>
+<!-- program~example1_curve&#45;&gt;none~set -->
+<g id="proc~~cmp_degree~~CalledByGraph_edge17" class="edge">
+<title>program~example1_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M233.08,-381.16C282.76,-406.72 405.66,-459.8 491,-411 538.32,-383.94 562.31,-319.79 572.06,-285.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="575.49,-286.59 574.73,-276.02 568.74,-284.75 575.49,-286.59"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
 <g id="proc~~cmp_degree~~CalledByGraph_edge21" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#ff6600" d="M279.25,-458.49C295.84,-460.17 314.64,-462.07 333.24,-463.95"/>
-<polygon fill="#ff6600" stroke="#ff6600" points="332.94,-467.44 343.24,-464.97 333.64,-460.48 332.94,-467.44"/>
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
+<path fill="none" stroke="#ff7500" d="M260.21,-374.33C275.59,-375.99 293.12,-377.89 310.54,-379.78"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="310.45,-383.29 320.77,-380.88 311.21,-376.33 310.45,-383.29"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
 <g id="proc~~cmp_degree~~CalledByGraph_edge22" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#ffcc00" d="M279.25,-447.51C298.63,-445.55 321.03,-443.28 342.61,-441.1"/>
-<polygon fill="#ffcc00" stroke="#ffcc00" points="343.19,-444.56 352.79,-440.07 342.49,-437.59 343.19,-444.56"/>
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
+<path fill="none" stroke="#ffeb00" d="M260.21,-363.67C278.44,-361.7 299.67,-359.4 320.17,-357.18"/>
+<polygon fill="#ffeb00" stroke="#ffeb00" points="320.6,-360.66 330.16,-356.1 319.84,-353.7 320.6,-360.66"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
 <g id="proc~~cmp_degree~~CalledByGraph_edge23" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#00ff00" d="M255.75,-440.99C279.38,-432.02 312.96,-419.84 343,-411 350.73,-408.73 358.89,-406.53 367.01,-404.47"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="368,-407.84 376.87,-402.04 366.32,-401.04 368,-407.84"/>
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
+<path fill="none" stroke="#00ff4e" d="M239.62,-356.99C261.63,-348.02 292.92,-335.84 321,-327 328.08,-324.77 335.55,-322.62 343,-320.6"/>
+<polygon fill="#00ff4e" stroke="#00ff4e" points="343.97,-323.97 352.75,-318.03 342.19,-317.2 343.97,-323.97"/>
 </g>
-<!-- program~example_nurbs_volume -->
+<!-- program~example_nurbs_curve -->
 <g id="proc~~cmp_degree~~CalledByGraph_node17" class="node">
-<title>program~example_nurbs_volume</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node17"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-108 364,-108 364,-84 503,-84 503,-108"/>
-<text text-anchor="middle" x="433.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<title>program~example_nurbs_curve</title>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node17"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 341.5,-66 341.5,-42 470.5,-42 470.5,-66"/>
+<text text-anchor="middle" x="406" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;none~set -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge17" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.44,-105.4C510.85,-108.33 517.9,-112.11 524,-117 578.22,-160.42 602.42,-243.9 611.25,-283.76"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="607.82,-284.49 613.3,-293.56 614.67,-283.05 607.82,-284.49"/>
-</g>
-<!-- program~example_put_to_nurbs -->
-<g id="proc~~cmp_degree~~CalledByGraph_node18" class="node">
-<title>program~example_put_to_nurbs</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node18"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-66 367.5,-66 367.5,-42 499.5,-42 499.5,-66"/>
-<text text-anchor="middle" x="433.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
-</a>
-</g>
-</g>
-<!-- program~example_put_to_nurbs&#45;&gt;none~set -->
+<!-- program~example_nurbs_curve&#45;&gt;none~set -->
 <g id="proc~~cmp_degree~~CalledByGraph_edge18" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.72,-61.4C508.57,-64.57 516.99,-68.95 524,-75 588.41,-130.59 607.88,-237.64 613.43,-283.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="609.97,-284.43 614.54,-293.99 616.93,-283.67 609.97,-284.43"/>
+<title>program~example_nurbs_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M470.56,-63.24C477.95,-66.17 484.99,-70 491,-75 543.77,-118.84 565.87,-201.81 573.75,-241.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="570.34,-242.42 575.61,-251.62 577.22,-241.15 570.34,-242.42"/>
 </g>
-<!-- program~nearest_point_3d -->
-<g id="proc~~cmp_degree~~CalledByGraph_node19" class="node">
-<title>program~nearest_point_3d</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node19"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-24 382,-24 382,0 485,0 485,-24"/>
-<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
+<!-- program~nearest_point_1d -->
+<g id="proc~~cmp_degree~~CalledByGraph_node18" class="node">
+<title>program~nearest_point_1d</title>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node18"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="457.5,-24 354.5,-24 354.5,0 457.5,0 457.5,-24"/>
+<text text-anchor="middle" x="406" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;none~set -->
+<!-- program~nearest_point_1d&#45;&gt;none~set -->
 <g id="proc~~cmp_degree~~CalledByGraph_edge19" class="edge">
-<title>program~nearest_point_3d&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M485.2,-14.84C499.17,-17.86 513.38,-23.33 524,-33 598.53,-100.9 612.42,-231.28 614.96,-283.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="611.47,-283.86 615.35,-293.71 618.46,-283.58 611.47,-283.86"/>
+<title>program~nearest_point_1d&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M457.92,-16.54C469.88,-19.69 481.8,-24.79 491,-33 553.86,-89.12 571.19,-195.45 575.85,-241.64"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="572.38,-242.13 576.76,-251.78 579.35,-241.51 572.38,-242.13"/>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="proc~~cmp_degree~~CalledByGraph_edge20" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.01,-554C323.61,-554 341,-554 357.35,-554"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="357.38,-557.5 367.38,-554 357.38,-550.5 357.38,-557.5"/>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M285.17,-470C301.32,-470 318.36,-470 334.36,-470"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="334.71,-473.5 344.71,-470 334.71,-466.5 334.71,-473.5"/>
 </g>
-<!-- program~shape_c_3d -->
-<g id="proc~~cmp_degree~~CalledByGraph_node21" class="node">
-<title>program~shape_c_3d</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node21"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-276 186,-276 186,-252 262,-252 262,-276"/>
-<text text-anchor="middle" x="224" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<!-- program~shape_c_1d -->
+<g id="proc~~cmp_degree~~CalledByGraph_node20" class="node">
+<title>program~shape_c_1d</title>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node20"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-192 172,-192 172,-168 248,-168 248,-192"/>
+<text text-anchor="middle" x="210" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~set_c -->
+<!-- program~shape_c_1d&#45;&gt;proc~set_c -->
 <g id="proc~~cmp_degree~~CalledByGraph_edge24" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~set_c</title>
-<path fill="none" stroke="#00ff66" d="M262.1,-264C289.25,-264 326.96,-264 360,-264"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="360.09,-267.5 370.09,-264 360.09,-260.5 360.09,-267.5"/>
+<title>program~shape_c_1d&#45;&gt;proc~set_c</title>
+<path fill="none" stroke="#00ffc4" d="M248.41,-180C273.62,-180 307.6,-180 337.47,-180"/>
+<polygon fill="#00ffc4" stroke="#00ffc4" points="337.84,-183.5 347.84,-180 337.84,-176.5 337.84,-183.5"/>
 </g>
-<!-- program~shape_half_ring_3d -->
-<g id="proc~~cmp_degree~~CalledByGraph_node22" class="node">
-<title>program~shape_half_ring_3d</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node22"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-234 166.5,-234 166.5,-210 281.5,-210 281.5,-234"/>
-<text text-anchor="middle" x="224" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<!-- program~shape_circle -->
+<g id="proc~~cmp_degree~~CalledByGraph_node21" class="node">
+<title>program~shape_circle</title>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node21"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249.5,-150 170.5,-150 170.5,-126 249.5,-126 249.5,-150"/>
+<text text-anchor="middle" x="210" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~set_half_ring -->
+<!-- program~shape_circle&#45;&gt;proc~set_circle -->
 <g id="proc~~cmp_degree~~CalledByGraph_edge25" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~set_half_ring</title>
-<path fill="none" stroke="#00ffcb" d="M281.7,-222C299.97,-222 320.71,-222 340.84,-222"/>
-<polygon fill="#00ffcb" stroke="#00ffcb" points="340.97,-225.5 350.97,-222 340.97,-218.5 340.97,-225.5"/>
-</g>
-<!-- program~shape_hexahedron -->
-<g id="proc~~cmp_degree~~CalledByGraph_node23" class="node">
-<title>program~shape_hexahedron</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node23"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-192 167.5,-192 167.5,-168 280.5,-168 280.5,-192"/>
-<text text-anchor="middle" x="224" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
-</a>
+<title>program~shape_circle&#45;&gt;proc~set_circle</title>
+<path fill="none" stroke="#00c4ff" d="M249.79,-138C271.95,-138 300.54,-138 327.13,-138"/>
+<polygon fill="#00c4ff" stroke="#00c4ff" points="327.21,-141.5 337.21,-138 327.21,-134.5 327.21,-141.5"/>
 </g>
-</g>
-<!-- program~shape_hexahedron&#45;&gt;proc~set_hexahedron -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge26" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~set_hexahedron</title>
-<path fill="none" stroke="#00cbff" d="M280.61,-180C296.56,-180 314.47,-180 332.24,-180"/>
-<polygon fill="#00cbff" stroke="#00cbff" points="332.67,-183.5 342.67,-180 332.67,-176.5 332.67,-183.5"/>
-</g>
-<!-- program~shape_ring_3d -->
-<g id="proc~~cmp_degree~~CalledByGraph_node24" class="node">
-<title>program~shape_ring_3d</title>
-<g id="a_proc~~cmp_degree~~CalledByGraph_node24"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-150 179,-150 179,-126 269,-126 269,-150"/>
-<text text-anchor="middle" x="224" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+<!-- program~shape_half_circle -->
+<g id="proc~~cmp_degree~~CalledByGraph_node22" class="node">
+<title>program~shape_half_circle</title>
+<g id="a_proc~~cmp_degree~~CalledByGraph_node22"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-108 158,-108 158,-84 262,-84 262,-108"/>
+<text text-anchor="middle" x="210" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~set_ring -->
-<g id="proc~~cmp_degree~~CalledByGraph_edge27" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~set_ring</title>
-<path fill="none" stroke="#0066ff" d="M269.01,-138C293.59,-138 324.96,-138 353.63,-138"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="353.65,-141.5 363.65,-138 353.65,-134.5 353.65,-141.5"/>
+<!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
+<g id="proc~~cmp_degree~~CalledByGraph_edge26" class="edge">
+<title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
+<path fill="none" stroke="#004eff" d="M262.22,-96C278.08,-96 296.06,-96 313.78,-96"/>
+<polygon fill="#004eff" stroke="#004eff" points="314.17,-99.5 324.17,-96 314.17,-92.5 314.17,-99.5"/>
 </g>
 </g>
 </svg>
@@ -874,7 +835,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_degreeface.html b/proc/cmp_degreeface.html
index 11b91fa2f..4f914fd3a 100644
--- a/proc/cmp_degreeface.html
+++ b/proc/cmp_degreeface.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~66"></span>
+              <span class="anchor" id="variable-this~127"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -191,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-degree~6"></span>
+          <span class="anchor" id="variable-degree~26"></span>
           integer, (3)
         </small>
       </h3>
@@ -348,7 +348,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_degree~2.html b/proc/cmp_degree~2.html
index 4f16e41be..965a772f4 100644
--- a/proc/cmp_degree~2.html
+++ b/proc/cmp_degree~2.html
@@ -78,20 +78,20 @@ <h1>cmp_degree
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.3% of total for procedures.">21 statements</a>
+                 title=" 0.4% of total for procedures.">26 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_degree</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine cmp_degree(this, dir)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~85"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~78"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~19"></span>
+              <span class="anchor" id="variable-dir~7"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -210,14 +210,14 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~cmp_degree~2~~CallsGraph_node1" class="node">
 <title>proc~cmp_degree~2</title>
 <polygon fill="none" stroke="black" points="163,-45 0,-45 0,-21 163,-21 163,-45"/>
-<text text-anchor="middle" x="81.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_degree</text>
+<text text-anchor="middle" x="81.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_degree</text>
 </g>
 <!-- proc~get_multiplicity~2 -->
 <g id="proc~~cmp_degree~2~~CallsGraph_node2" class="node">
 <title>proc~get_multiplicity~2</title>
-<g id="a_proc~~cmp_degree~2~~CallsGraph_node2"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<g id="a_proc~~cmp_degree~2~~CallsGraph_node2"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="377,-45 199,-45 199,-21 377,-21 377,-45"/>
-<text text-anchor="middle" x="288" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
+<text text-anchor="middle" x="288" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
@@ -370,454 +370,391 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_degree~2~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_degree2CalledByGraph" width="641pt" height="364pt"
- viewBox="0.00 0.00 641.00 364.28" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_degree~2~~CalledByGraph" class="graph" transform="scale(1.56 1.56) rotate(0) translate(4 566)">
+<svg id="proccmp_degree2CalledByGraph" width="641pt" height="394pt"
+ viewBox="0.00 0.00 641.00 394.31" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_degree~2~~CalledByGraph" class="graph" transform="scale(1.62 1.62) rotate(0) translate(4 633.29)">
 <title>proc~~cmp_degree~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-566 999,-566 999,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-633.29 1032,-633.29 1032,4 -4,4"/>
 <!-- proc~cmp_degree~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node1" class="node">
 <title>proc~cmp_degree~2</title>
-<polygon fill="none" stroke="black" points="995,-297 832,-297 832,-273 995,-273 995,-297"/>
-<text text-anchor="middle" x="913.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_degree</text>
+<polygon fill="none" stroke="black" points="1028,-318 865,-318 865,-294 1028,-294 1028,-318"/>
+<text text-anchor="middle" x="946.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_degree</text>
 </g>
 <!-- proc~set1~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node2" class="node">
 <title>proc~set1~2</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node2"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="796,-318 676,-318 676,-294 796,-294 796,-318"/>
-<text text-anchor="middle" x="736" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node2"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="829,-339 709,-339 709,-315 829,-315 829,-339"/>
+<text text-anchor="middle" x="769" y="-324.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
 <!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge1" class="edge">
 <title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#ff0000" d="M796.42,-298.89C804.64,-297.91 813.23,-296.88 821.86,-295.85"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="822.47,-299.3 831.98,-294.63 821.64,-292.35 822.47,-299.3"/>
+<path fill="none" stroke="#ff0000" d="M829.42,-319.89C837.64,-318.91 846.23,-317.88 854.86,-316.85"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="855.47,-320.3 864.98,-315.63 854.64,-313.35 855.47,-320.3"/>
 </g>
 <!-- proc~set3~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node3" class="node">
 <title>proc~set3~2</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node3"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="796,-276 676,-276 676,-252 796,-252 796,-276"/>
-<text text-anchor="middle" x="736" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node3"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="829,-297 709,-297 709,-273 829,-273 829,-297"/>
+<text text-anchor="middle" x="769" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
 <!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge2" class="edge">
 <title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#ff0000" d="M796.42,-271.11C804.64,-272.09 813.23,-273.12 821.86,-274.15"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="821.64,-277.65 831.98,-275.37 822.47,-270.7 821.64,-277.65"/>
+<path fill="none" stroke="#ff0000" d="M829.42,-292.11C837.64,-293.09 846.23,-294.12 854.86,-295.15"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="854.64,-298.65 864.98,-296.37 855.47,-291.7 854.64,-298.65"/>
 </g>
 <!-- none~set~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node4" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="640,-297 527,-297 527,-273 640,-273 640,-297"/>
-<text text-anchor="middle" x="583.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="673,-318 560,-318 560,-294 673,-294 673,-318"/>
+<text text-anchor="middle" x="616.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge3" class="edge">
 <title>none~set~2&#45;&gt;proc~set1~2</title>
-<path fill="none" stroke="#ff0000" d="M640.11,-292.76C648.48,-293.93 657.19,-295.14 665.8,-296.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="665.44,-299.83 675.83,-297.74 666.41,-292.89 665.44,-299.83"/>
+<path fill="none" stroke="#ff0000" d="M673.11,-313.76C681.48,-314.93 690.19,-316.14 698.8,-317.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="698.44,-320.83 708.83,-318.74 699.41,-313.89 698.44,-320.83"/>
 </g>
 <!-- none~set~2&#45;&gt;proc~set3~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge4" class="edge">
 <title>none~set~2&#45;&gt;proc~set3~2</title>
-<path fill="none" stroke="#00ffff" d="M640.11,-277.24C648.48,-276.07 657.19,-274.86 665.8,-273.66"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="666.41,-277.11 675.83,-272.26 665.44,-270.17 666.41,-277.11"/>
+<path fill="none" stroke="#00ffff" d="M673.11,-298.24C681.48,-297.07 690.19,-295.86 698.8,-294.66"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="699.41,-298.11 708.83,-293.26 698.44,-291.17 699.41,-298.11"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node5" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="467,-562 335,-562 335,-538 467,-538 467,-562"/>
-<text text-anchor="middle" x="401" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-566 367.5,-566 367.5,-542 499.5,-542 499.5,-566"/>
+<text text-anchor="middle" x="433.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge5" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M467.04,-538.75C475.81,-535.12 484.14,-530.33 491,-524 555.57,-464.48 574.98,-354.4 580.47,-307.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="583.96,-307.57 581.54,-297.26 577,-306.83 583.96,-307.57"/>
+<path fill="none" stroke="#ff0000" d="M499.76,-542.65C508.6,-539.03 517.01,-534.27 524,-528 584.64,-473.59 606.02,-372.87 612.74,-328.26"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="616.23,-328.58 614.15,-318.19 609.3,-327.61 616.23,-328.58"/>
 </g>
 <!-- proc~elevate_degree~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node6" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node6"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="491,-360 311,-360 311,-336 491,-336 491,-360"/>
-<text text-anchor="middle" x="401" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node6"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-486 343.5,-486 343.5,-462 523.5,-462 523.5,-486"/>
+<text text-anchor="middle" x="433.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge6" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M460.4,-335.97C470.7,-333.36 481.24,-330.35 491,-327 511.36,-320 533.32,-310.01 550.61,-301.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="552.31,-304.6 559.7,-297.01 549.19,-298.33 552.31,-304.6"/>
+<path fill="none" stroke="#ff0000" d="M507.95,-461.94C513.63,-459.48 519.07,-456.54 524,-453 568.52,-421.06 596.03,-360.08 608.18,-327.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="611.5,-328.73 611.59,-318.14 604.91,-326.36 611.5,-328.73"/>
 </g>
 <!-- proc~insert_knots~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node7" class="node">
 <title>proc~insert_knots~2</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node7"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-482 320.5,-482 320.5,-458 481.5,-458 481.5,-482"/>
-<text text-anchor="middle" x="401" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node7"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514,-444 353,-444 353,-420 514,-420 514,-444"/>
+<text text-anchor="middle" x="433.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge7" class="edge">
 <title>proc~insert_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M475.67,-457.96C481.12,-455.5 486.31,-452.54 491,-449 539.34,-412.5 565.71,-342.6 576.53,-307.01"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="579.97,-307.72 579.4,-297.14 573.25,-305.76 579.97,-307.72"/>
+<path fill="none" stroke="#ff0000" d="M505.06,-419.93C511.69,-417.49 518.12,-414.54 524,-411 558.92,-389.96 587.54,-351.08 603,-327"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="606.13,-328.6 608.45,-318.26 600.19,-324.89 606.13,-328.6"/>
 </g>
 <!-- proc~modify_wc~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node8" class="node">
 <title>proc~modify_wc~2</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node8"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="479,-318 323,-318 323,-294 479,-294 479,-318"/>
-<text text-anchor="middle" x="401" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node8"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-360 355.5,-360 355.5,-336 511.5,-336 511.5,-360"/>
+<text text-anchor="middle" x="433.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge8" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M479.07,-297.03C491.65,-295.57 504.57,-294.07 516.84,-292.64"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="517.44,-296.09 526.97,-291.46 516.63,-289.14 517.44,-296.09"/>
+<path fill="none" stroke="#ff0000" d="M486.37,-335.96C507.38,-331.09 531.82,-325.42 553.75,-320.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="554.68,-323.71 563.63,-318.04 553.09,-316.89 554.68,-323.71"/>
 </g>
 <!-- proc~modify_xc~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node9" class="node">
 <title>proc~modify_xc~2</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node9"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-276 324.5,-276 324.5,-252 477.5,-252 477.5,-276"/>
-<text text-anchor="middle" x="401" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node9"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="510,-318 357,-318 357,-294 510,-294 510,-318"/>
+<text text-anchor="middle" x="433.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge9" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M477.5,-272.78C490.54,-274.3 503.99,-275.87 516.74,-277.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="516.46,-280.84 526.8,-278.52 517.27,-273.89 516.46,-280.84"/>
+<path fill="none" stroke="#ff0000" d="M510.21,-306C523.36,-306 536.93,-306 549.79,-306"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="549.92,-309.5 559.92,-306 549.92,-302.5 549.92,-309.5"/>
 </g>
 <!-- proc~remove_knots~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node10" class="node">
 <title>proc~remove_knots~2</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node10"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="487,-440 315,-440 315,-416 487,-416 487,-440"/>
-<text text-anchor="middle" x="401" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node10"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-402 347.5,-402 347.5,-378 519.5,-378 519.5,-402"/>
+<text text-anchor="middle" x="433.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge10" class="edge">
 <title>proc~remove_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M462.24,-415.98C472.34,-412.44 482.34,-407.87 491,-402 527.88,-377 556.66,-332.45 571.47,-306.13"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="574.56,-307.78 576.29,-297.32 568.42,-304.42 574.56,-307.78"/>
+<path fill="none" stroke="#ff0000" d="M499.01,-377.92C507.58,-375.44 516.12,-372.49 524,-369 549.77,-357.6 575.92,-338.69 593.63,-324.56"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="596.07,-327.09 601.61,-318.06 591.65,-321.66 596.07,-327.09"/>
 </g>
 <!-- proc~set_c~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node11" class="node">
 <title>proc~set_c~2</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node11"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_surface%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="464,-108 338,-108 338,-84 464,-84 464,-108"/>
-<text text-anchor="middle" x="401" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node11"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_volume%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-276 370.5,-276 370.5,-252 496.5,-252 496.5,-276"/>
+<text text-anchor="middle" x="433.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c~2&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge11" class="edge">
 <title>proc~set_c~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M464.39,-103.61C473.92,-106.72 483.18,-111.03 491,-117 540.26,-154.6 566.32,-226.63 576.83,-262.93"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="573.46,-263.87 579.5,-272.57 580.2,-262 573.46,-263.87"/>
+<path fill="none" stroke="#ff0000" d="M486.37,-276.04C507.38,-280.91 531.82,-286.58 553.75,-291.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="553.09,-295.11 563.63,-293.96 554.68,-288.29 553.09,-295.11"/>
 </g>
-<!-- proc~set_half_ring~2 -->
+<!-- proc~set_half_ring -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node12" class="node">
-<title>proc~set_half_ring~2</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node12"><a xlink:href="../proc/set_half_ring~2.html" xlink:title="nurbs_surface%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="483.5,-150 318.5,-150 318.5,-126 483.5,-126 483.5,-150"/>
-<text text-anchor="middle" x="401" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
+<title>proc~set_half_ring</title>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node12"><a xlink:href="../proc/set_half_ring.html" xlink:title="nurbs_volume%set_half_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="516,-234 351,-234 351,-210 516,-210 516,-234"/>
+<text text-anchor="middle" x="433.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_half_ring&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge12" class="edge">
-<title>proc~set_half_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M473.87,-150.11C479.91,-152.55 485.71,-155.48 491,-159 530.66,-185.4 559.08,-235.16 572.94,-263.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="569.8,-265.16 577.22,-272.71 576.13,-262.17 569.8,-265.16"/>
+<title>proc~set_half_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M499.01,-234.08C507.58,-236.56 516.12,-239.51 524,-243 549.77,-254.4 575.92,-273.31 593.63,-287.44"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="591.65,-290.34 601.61,-293.94 596.07,-284.91 591.65,-290.34"/>
 </g>
-<!-- proc~set_ring~2 -->
+<!-- proc~set_hexahedron -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node13" class="node">
-<title>proc~set_ring~2</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node13"><a xlink:href="../proc/set_ring~2.html" xlink:title="nurbs_surface%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="470.5,-192 331.5,-192 331.5,-168 470.5,-168 470.5,-192"/>
-<text text-anchor="middle" x="401" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
+<title>proc~set_hexahedron</title>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node13"><a xlink:href="../proc/set_hexahedron.html" xlink:title="nurbs_volume%set_hexahedron">
+<polygon fill="#d9534f" stroke="#d9534f" points="524,-192 343,-192 343,-168 524,-168 524,-192"/>
+<text text-anchor="middle" x="433.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_hexahedron&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge13" class="edge">
-<title>proc~set_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M469.92,-192.15C477.23,-194.59 484.41,-197.51 491,-201 521.51,-217.17 549.65,-245.97 566.45,-265.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="563.79,-267.55 572.93,-272.91 569.12,-263.02 563.79,-267.55"/>
+<title>proc~set_hexahedron&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M505.06,-192.07C511.69,-194.51 518.12,-197.46 524,-201 558.92,-222.04 587.54,-260.92 603,-285"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="600.19,-287.11 608.45,-293.74 606.13,-283.4 600.19,-287.11"/>
 </g>
-<!-- proc~set_tetragon -->
+<!-- proc~set_ring -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node14" class="node">
-<title>proc~set_tetragon</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node14"><a xlink:href="../proc/set_tetragon.html" xlink:title="nurbs_surface%set_tetragon">
-<polygon fill="#d9534f" stroke="#d9534f" points="483,-234 319,-234 319,-210 483,-210 483,-234"/>
-<text text-anchor="middle" x="401" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
+<title>proc~set_ring</title>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node14"><a xlink:href="../proc/set_ring.html" xlink:title="nurbs_volume%set_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="503,-150 364,-150 364,-126 503,-126 503,-150"/>
+<text text-anchor="middle" x="433.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
+<!-- proc~set_ring&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge14" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M460.4,-234.03C470.7,-236.64 481.24,-239.65 491,-243 511.36,-250 533.32,-259.99 550.61,-268.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="549.19,-271.67 559.7,-272.99 552.31,-265.4 549.19,-271.67"/>
+<title>proc~set_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M503.41,-148.22C510.74,-151.01 517.78,-154.53 524,-159 568.52,-190.94 596.03,-251.92 608.18,-284.39"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="604.91,-285.64 611.59,-293.86 611.5,-283.27 604.91,-285.64"/>
 </g>
-<!-- program~compute_area -->
+<!-- program~compute_volume -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node15" class="node">
-<title>program~compute_area</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node15"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-542 0,-542 0,-518 89,-518 89,-542"/>
-<text text-anchor="middle" x="44.5" y="-527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<title>program~compute_volume</title>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node15"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-586 0,-586 0,-562 105,-562 105,-586"/>
+<text text-anchor="middle" x="52.5" y="-571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;none~set~2 -->
+<!-- program~compute_volume&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge15" class="edge">
-<title>program~compute_area&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M89.19,-528.67C195.01,-525.11 458.77,-514.01 491,-491 552.97,-446.76 573.59,-350.77 579.93,-307.25"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="583.42,-307.52 581.27,-297.15 576.48,-306.6 583.42,-307.52"/>
+<title>program~compute_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M86.78,-586.01C169.65,-613.64 388.35,-672.14 524,-575 605.44,-516.68 615.25,-381.64 615.83,-328.27"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="619.33,-328.19 615.83,-318.18 612.33,-328.18 619.33,-328.19"/>
 </g>
-<!-- proc~cmp_area -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_node19" class="node">
-<title>proc~cmp_area</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node19"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="275,-562 125,-562 125,-538 275,-538 275,-562"/>
-<text text-anchor="middle" x="200" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<!-- proc~cmp_volume -->
+<g id="proc~~cmp_degree~2~~CalledByGraph_node20" class="node">
+<title>proc~cmp_volume</title>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node20"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-566 141,-566 141,-542 307,-542 307,-566"/>
+<text text-anchor="middle" x="224" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;proc~cmp_area -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_edge34" class="edge">
-<title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M89.08,-535.68C97.19,-536.73 105.92,-537.87 114.78,-539.03"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="114.45,-542.51 124.81,-540.33 115.35,-535.57 114.45,-542.51"/>
+<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
+<g id="proc~~cmp_degree~2~~CalledByGraph_edge28" class="edge">
+<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
+<path fill="none" stroke="#ff0000" d="M105.28,-567.89C113.48,-566.92 122.18,-565.9 130.98,-564.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="131.41,-568.33 140.93,-563.68 130.59,-561.38 131.41,-568.33"/>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node16" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node16"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="255,-420 145,-420 145,-396 255,-396 255,-420"/>
-<text text-anchor="middle" x="200" y="-405.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<title>program~example3_volume</title>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node16"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-465 169,-465 169,-441 279,-441 279,-465"/>
+<text text-anchor="middle" x="224" y="-450.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;none~set~2 -->
+<!-- program~example3_volume&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge16" class="edge">
-<title>program~example3_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M255.17,-404.6C327.24,-399.42 450.29,-388.08 491,-369 522.44,-354.27 550.52,-324.84 567.04,-305.03"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="569.81,-307.17 573.38,-297.2 564.37,-302.77 569.81,-307.17"/>
-</g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_edge20" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
-<path fill="none" stroke="#ff6d00" d="M239.39,-395.97C260.5,-389.4 287.17,-381.16 311,-374 323.16,-370.34 336.28,-366.47 348.62,-362.86"/>
-<polygon fill="#ff6d00" stroke="#ff6d00" points="349.69,-366.2 358.3,-360.04 347.72,-359.48 349.69,-366.2"/>
+<title>program~example3_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M246.93,-465.12C299.32,-492.29 434.06,-551.38 524,-495 583.54,-457.67 605.3,-369.39 612.41,-328.06"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="615.87,-328.6 613.98,-318.18 608.95,-327.5 615.87,-328.6"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge21" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
-<path fill="none" stroke="#ffda00" d="M230.54,-420.16C252.49,-428.91 283.3,-440.61 311,-449 318.48,-451.27 326.37,-453.44 334.24,-455.47"/>
-<polygon fill="#ffda00" stroke="#ffda00" points="333.62,-458.92 344.17,-457.96 335.32,-452.13 333.62,-458.92"/>
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
+<path fill="none" stroke="#ff6600" d="M279.25,-458.49C295.84,-460.17 314.64,-462.07 333.24,-463.95"/>
+<polygon fill="#ff6600" stroke="#ff6600" points="332.94,-467.44 343.24,-464.97 333.64,-460.48 332.94,-467.44"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
+<g id="proc~~cmp_degree~2~~CalledByGraph_edge22" class="edge">
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
+<path fill="none" stroke="#ffcc00" d="M279.25,-447.51C298.63,-445.55 321.03,-443.28 342.61,-441.1"/>
+<polygon fill="#ffcc00" stroke="#ffcc00" points="343.19,-444.56 352.79,-440.07 342.49,-437.59 343.19,-444.56"/>
+</g>
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge23" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
-<path fill="none" stroke="#00ff24" d="M255.11,-413.44C270.51,-414.99 287.75,-416.72 304.82,-418.43"/>
-<polygon fill="#00ff24" stroke="#00ff24" points="304.53,-421.92 314.83,-419.44 305.23,-414.96 304.53,-421.92"/>
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
+<path fill="none" stroke="#00ff00" d="M255.75,-440.99C279.38,-432.02 312.96,-419.84 343,-411 350.73,-408.73 358.89,-406.53 367.01,-404.47"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="368,-407.84 376.87,-402.04 366.32,-401.04 368,-407.84"/>
 </g>
-<!-- program~example_nurbs_surface -->
+<!-- program~example_nurbs_volume -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node17" class="node">
-<title>program~example_nurbs_surface</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node17"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 331.5,-66 331.5,-42 470.5,-42 470.5,-66"/>
-<text text-anchor="middle" x="401" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<title>program~example_nurbs_volume</title>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node17"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-108 364,-108 364,-84 503,-84 503,-108"/>
+<text text-anchor="middle" x="433.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;none~set~2 -->
+<!-- program~example_nurbs_volume&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge17" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M470.75,-63.21C478.08,-66.17 485.03,-70.01 491,-75 550.25,-124.48 572.25,-219.65 579.43,-262.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="575.99,-263.45 580.98,-272.8 582.91,-262.38 575.99,-263.45"/>
+<title>program~example_nurbs_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M503.44,-105.4C510.85,-108.33 517.9,-112.11 524,-117 578.22,-160.42 602.42,-243.9 611.25,-283.76"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="607.82,-284.49 613.3,-293.56 614.67,-283.05 607.82,-284.49"/>
 </g>
-<!-- program~nearest_point_2d -->
+<!-- program~example_put_to_nurbs -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node18" class="node">
-<title>program~nearest_point_2d</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node18"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452.5,-24 349.5,-24 349.5,0 452.5,0 452.5,-24"/>
-<text text-anchor="middle" x="401" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<title>program~example_put_to_nurbs</title>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node18"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-66 367.5,-66 367.5,-42 499.5,-42 499.5,-66"/>
+<text text-anchor="middle" x="433.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;none~set~2 -->
+<!-- program~example_put_to_nurbs&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge18" class="edge">
-<title>program~nearest_point_2d&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M452.73,-15.16C466.47,-18.21 480.44,-23.61 491,-33 560.36,-94.71 577.18,-213.24 581.23,-262.59"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="577.76,-263.07 581.96,-272.8 584.74,-262.57 577.76,-263.07"/>
-</g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_edge19" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ff0000" d="M275.1,-550C291.15,-550 308.13,-550 324.24,-550"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="324.68,-553.5 334.68,-550 324.68,-546.5 324.68,-553.5"/>
+<title>program~example_put_to_nurbs&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M499.72,-61.4C508.57,-64.57 516.99,-68.95 524,-75 588.41,-130.59 607.88,-237.64 613.43,-283.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="609.97,-284.43 614.54,-293.99 616.93,-283.67 609.97,-284.43"/>
 </g>
-<!-- program~example_ppm1 -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_node20" class="node">
-<title>program~example_ppm1</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node20"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-192 153,-192 153,-168 247,-168 247,-192"/>
-<text text-anchor="middle" x="200" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+<!-- program~nearest_point_3d -->
+<g id="proc~~cmp_degree~2~~CalledByGraph_node19" class="node">
+<title>program~nearest_point_3d</title>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node19"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-24 382,-24 382,0 485,0 485,-24"/>
+<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~set_ring~2 -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_edge27" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#0091ff" d="M247.15,-180C269.15,-180 296.09,-180 321.19,-180"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="321.45,-183.5 331.45,-180 321.45,-176.5 321.45,-183.5"/>
+<!-- program~nearest_point_3d&#45;&gt;none~set~2 -->
+<g id="proc~~cmp_degree~2~~CalledByGraph_edge19" class="edge">
+<title>program~nearest_point_3d&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M485.2,-14.84C499.17,-17.86 513.38,-23.33 524,-33 598.53,-100.9 612.42,-231.28 614.96,-283.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="611.47,-283.86 615.35,-293.71 618.46,-283.58 611.47,-283.86"/>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~set_tetragon -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_edge29" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.15,-189.74C272.73,-195.14 304.98,-201.95 333.26,-207.91"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="332.57,-211.34 343.07,-209.99 334.01,-204.5 332.57,-211.34"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~cmp_degree~2~~CalledByGraph_edge20" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ff0000" d="M307.01,-554C323.61,-554 341,-554 357.35,-554"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="357.38,-557.5 367.38,-554 357.38,-550.5 357.38,-557.5"/>
 </g>
-<!-- program~example_ppm2 -->
+<!-- program~shape_c_3d -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node21" class="node">
-<title>program~example_ppm2</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node21"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-150 153,-150 153,-126 247,-126 247,-150"/>
-<text text-anchor="middle" x="200" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+<title>program~shape_c_3d</title>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node21"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-276 186,-276 186,-252 262,-252 262,-276"/>
+<text text-anchor="middle" x="224" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~set_half_ring~2 -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_edge25" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#00ffff" d="M247.15,-138C265.39,-138 287.03,-138 308.19,-138"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="308.2,-141.5 318.2,-138 308.2,-134.5 308.2,-141.5"/>
-</g>
-<!-- program~example_ppm2&#45;&gt;proc~set_tetragon -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_edge30" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.02,-146.55C256.72,-149.56 266.56,-153.6 275,-159 295.71,-172.25 290,-188.21 311,-201 314.01,-202.83 317.16,-204.5 320.41,-206.03"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="319.22,-209.32 329.8,-209.95 321.92,-202.87 319.22,-209.32"/>
+<!-- program~shape_c_3d&#45;&gt;proc~set_c~2 -->
+<g id="proc~~cmp_degree~2~~CalledByGraph_edge24" class="edge">
+<title>program~shape_c_3d&#45;&gt;proc~set_c~2</title>
+<path fill="none" stroke="#00ff66" d="M262.1,-264C289.25,-264 326.96,-264 360,-264"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="360.09,-267.5 370.09,-264 360.09,-260.5 360.09,-267.5"/>
 </g>
-<!-- program~example_ppm3 -->
+<!-- program~shape_half_ring_3d -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node22" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node22"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-318 153,-318 153,-294 247,-294 247,-318"/>
-<text text-anchor="middle" x="200" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+<title>program~shape_half_ring_3d</title>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node22"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-234 166.5,-234 166.5,-210 281.5,-210 281.5,-234"/>
+<text text-anchor="middle" x="224" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_edge22" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#48ff00" d="M247.15,-296.26C272.73,-290.86 304.98,-284.05 333.26,-278.09"/>
-<polygon fill="#48ff00" stroke="#48ff00" points="334.01,-281.5 343.07,-276.01 332.57,-274.66 334.01,-281.5"/>
-</g>
-<!-- program~example_ppm3&#45;&gt;proc~set_tetragon -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_edge31" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.02,-297.45C256.72,-294.44 266.56,-290.4 275,-285 295.71,-271.75 290,-255.79 311,-243 314.01,-241.17 317.16,-239.5 320.41,-237.97"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="321.92,-241.13 329.8,-234.05 319.22,-234.68 321.92,-241.13"/>
+<!-- program~shape_half_ring_3d&#45;&gt;proc~set_half_ring -->
+<g id="proc~~cmp_degree~2~~CalledByGraph_edge25" class="edge">
+<title>program~shape_half_ring_3d&#45;&gt;proc~set_half_ring</title>
+<path fill="none" stroke="#00ffcb" d="M281.7,-222C299.97,-222 320.71,-222 340.84,-222"/>
+<polygon fill="#00ffcb" stroke="#00ffcb" points="340.97,-225.5 350.97,-222 340.97,-218.5 340.97,-225.5"/>
 </g>
-<!-- program~nearest_point_2d_bench -->
+<!-- program~shape_hexahedron -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_node23" class="node">
-<title>program~nearest_point_2d_bench</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node23"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-234 129,-234 129,-210 271,-210 271,-234"/>
-<text text-anchor="middle" x="200" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+<title>program~shape_hexahedron</title>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node23"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-192 167.5,-192 167.5,-168 280.5,-168 280.5,-192"/>
+<text text-anchor="middle" x="224" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_edge32" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M271.16,-222C283.34,-222 296.17,-222 308.82,-222"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="308.91,-225.5 318.91,-222 308.91,-218.5 308.91,-225.5"/>
-</g>
-<!-- program~shape_c_2d -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_node24" class="node">
-<title>program~shape_c_2d</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node24"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="238,-24 162,-24 162,0 238,0 238,-24"/>
-<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_c_2d&#45;&gt;proc~set_c~2 -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_edge24" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~set_c~2</title>
-<path fill="none" stroke="#00ff91" d="M238.17,-18.06C250.55,-21.21 263.98,-25.94 275,-33 295.71,-46.25 290,-62.21 311,-75 316.34,-78.25 322.14,-81 328.14,-83.32"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="327.09,-86.66 337.68,-86.63 329.38,-80.05 327.09,-86.66"/>
-</g>
-<!-- program~shape_half_ring_2d -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_node25" class="node">
-<title>program~shape_half_ring_2d</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node25"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="257.5,-66 142.5,-66 142.5,-42 257.5,-42 257.5,-66"/>
-<text text-anchor="middle" x="200" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2 -->
+<!-- program~shape_hexahedron&#45;&gt;proc~set_hexahedron -->
 <g id="proc~~cmp_degree~2~~CalledByGraph_edge26" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#00ffff" d="M257.09,-66.07C263.38,-68.53 269.49,-71.47 275,-75 295.71,-88.25 290,-104.21 311,-117 314.01,-118.83 317.16,-120.5 320.41,-122.03"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="319.22,-125.32 329.8,-125.95 321.92,-118.87 319.22,-125.32"/>
-</g>
-<!-- program~shape_ring_2d -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_node26" class="node">
-<title>program~shape_ring_2d</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node26"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="245,-108 155,-108 155,-84 245,-84 245,-108"/>
-<text text-anchor="middle" x="200" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
-</a>
+<title>program~shape_hexahedron&#45;&gt;proc~set_hexahedron</title>
+<path fill="none" stroke="#00cbff" d="M280.61,-180C296.56,-180 314.47,-180 332.24,-180"/>
+<polygon fill="#00cbff" stroke="#00cbff" points="332.67,-183.5 342.67,-180 332.67,-176.5 332.67,-183.5"/>
 </g>
-</g>
-<!-- program~shape_ring_2d&#45;&gt;proc~set_ring~2 -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_edge28" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#0091ff" d="M245.08,-103.96C255.4,-107.03 266,-111.24 275,-117 295.71,-130.25 290,-146.21 311,-159 314.41,-161.08 318.01,-162.95 321.73,-164.64"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="320.6,-167.95 331.18,-168.46 323.22,-161.46 320.6,-167.95"/>
-</g>
-<!-- program~shape_tetragon -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_node27" class="node">
-<title>program~shape_tetragon</title>
-<g id="a_proc~~cmp_degree~2~~CalledByGraph_node27"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-276 152,-276 152,-252 248,-252 248,-276"/>
-<text text-anchor="middle" x="200" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<!-- program~shape_ring_3d -->
+<g id="proc~~cmp_degree~2~~CalledByGraph_node24" class="node">
+<title>program~shape_ring_3d</title>
+<g id="a_proc~~cmp_degree~2~~CalledByGraph_node24"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-150 179,-150 179,-126 269,-126 269,-150"/>
+<text text-anchor="middle" x="224" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~set_tetragon -->
-<g id="proc~~cmp_degree~2~~CalledByGraph_edge33" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M248.16,-254.05C273.44,-248.71 305.03,-242.04 332.84,-236.17"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="333.83,-239.54 342.89,-234.05 332.39,-232.69 333.83,-239.54"/>
+<!-- program~shape_ring_3d&#45;&gt;proc~set_ring -->
+<g id="proc~~cmp_degree~2~~CalledByGraph_edge27" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~set_ring</title>
+<path fill="none" stroke="#0066ff" d="M269.01,-138C293.59,-138 324.96,-138 353.63,-138"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="353.65,-141.5 363.65,-138 353.65,-134.5 353.65,-141.5"/>
 </g>
 </g>
 </svg>
@@ -937,7 +874,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_degree~3.html b/proc/cmp_degree~3.html
index c80cbf809..87351509b 100644
--- a/proc/cmp_degree~3.html
+++ b/proc/cmp_degree~3.html
@@ -78,20 +78,20 @@ <h1>cmp_degree
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.1% of total for procedures.">6 statements</a>
+                 title=" 0.3% of total for procedures.">21 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_degree</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine cmp_degree(this)  
+    <h2>private pure subroutine cmp_degree(this, dir)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~149"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~146"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -169,6 +169,21 @@ <h3>Arguments</h3>
             <td><strong>this</strong></td>
             <td>
                 
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-dir~22"></span>
+              integer,
+            </td>
+<td>intent(in),</td>
+              <td>optional</td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>dir</strong></td>
+            <td>
+                
             </td>
         </tr>
     </tbody>
@@ -186,76 +201,76 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_degree~3~~CallsGraph Pages: 1 -->
-<svg id="proccmp_degree3CallsGraph" width="641pt" height="68pt"
- viewBox="0.00 0.00 641.00 68.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_degree~3~~CallsGraph" class="graph" transform="scale(1.08 1.08) rotate(0) translate(4 70)">
+<svg id="proccmp_degree3CallsGraph" width="641pt" height="67pt"
+ viewBox="0.00 0.00 641.00 66.71" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_degree~3~~CallsGraph" class="graph" transform="scale(1.11 1.11) rotate(0) translate(4 70)">
 <title>proc~~cmp_degree~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 689,-70 689,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 707,-70 707,4 -4,4"/>
 <!-- proc~cmp_degree~3 -->
 <g id="proc~~cmp_degree~3~~CallsGraph_node1" class="node">
 <title>proc~cmp_degree~3</title>
-<polygon fill="none" stroke="black" points="154,-45 0,-45 0,-21 154,-21 154,-45"/>
-<text text-anchor="middle" x="77" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_degree</text>
+<polygon fill="none" stroke="black" points="163,-45 0,-45 0,-21 163,-21 163,-45"/>
+<text text-anchor="middle" x="81.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_degree</text>
 </g>
 <!-- proc~get_multiplicity~3 -->
 <g id="proc~~cmp_degree~3~~CallsGraph_node2" class="node">
 <title>proc~get_multiplicity~3</title>
-<g id="a_proc~~cmp_degree~3~~CallsGraph_node2"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="359,-45 190,-45 190,-21 359,-21 359,-45"/>
-<text text-anchor="middle" x="274.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
+<g id="a_proc~~cmp_degree~3~~CallsGraph_node2"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="377,-45 199,-45 199,-21 377,-21 377,-45"/>
+<text text-anchor="middle" x="288" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="proc~~cmp_degree~3~~CallsGraph_edge1" class="edge">
 <title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#ff0000" d="M154.15,-33C162.54,-33 171.17,-33 179.75,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="179.79,-36.5 189.79,-33 179.79,-29.5 179.79,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M163.03,-33C171.47,-33 180.11,-33 188.71,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="188.78,-36.5 198.78,-33 188.78,-29.5 188.78,-36.5"/>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~cmp_degree~3~~CallsGraph_node3" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~cmp_degree~3~~CallsGraph_node3"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="519,-45 395,-45 395,-21 519,-21 519,-45"/>
-<text text-anchor="middle" x="457" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="537,-45 413,-45 413,-21 537,-21 537,-45"/>
+<text text-anchor="middle" x="475" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~cmp_degree~3~~CallsGraph_edge2" class="edge">
 <title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M359.15,-33C367.73,-33 376.4,-33 384.84,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="384.99,-36.5 394.99,-33 384.99,-29.5 384.99,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M377.17,-33C385.77,-33 394.42,-33 402.82,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="402.93,-36.5 412.93,-33 402.93,-29.5 402.93,-36.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~cmp_degree~3~~CallsGraph_node4" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~cmp_degree~3~~CallsGraph_node4"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="685,-66 555,-66 555,-42 685,-42 685,-66"/>
-<text text-anchor="middle" x="620" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="703,-66 573,-66 573,-42 703,-42 703,-66"/>
+<text text-anchor="middle" x="638" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~cmp_degree~3~~CallsGraph_edge3" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M519.33,-41C527.69,-42.09 536.35,-43.22 544.92,-44.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="544.53,-47.82 554.9,-45.64 545.44,-40.88 544.53,-47.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M537.33,-41C545.69,-42.09 554.35,-43.22 562.92,-44.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="562.53,-47.82 572.9,-45.64 563.44,-40.88 562.53,-47.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~cmp_degree~3~~CallsGraph_node5" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~cmp_degree~3~~CallsGraph_node5"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="685,-24 555,-24 555,0 685,0 685,-24"/>
-<text text-anchor="middle" x="620" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="703,-24 573,-24 573,0 703,0 703,-24"/>
+<text text-anchor="middle" x="638" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~cmp_degree~3~~CallsGraph_edge4" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M519.33,-25C527.69,-23.91 536.35,-22.78 544.92,-21.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="545.44,-25.12 554.9,-20.36 544.53,-18.18 545.44,-25.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M537.33,-25C545.69,-23.91 554.35,-22.78 562.92,-21.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="563.44,-25.12 572.9,-20.36 562.53,-18.18 563.44,-25.12"/>
 </g>
 </g>
 </svg>
@@ -355,367 +370,454 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_degree~3~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_degree3CalledByGraph" width="641pt" height="358pt"
- viewBox="0.00 0.00 641.00 358.40" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_degree~3~~CalledByGraph" class="graph" transform="scale(1.53 1.53) rotate(0) translate(4 544.5)">
+<svg id="proccmp_degree3CalledByGraph" width="641pt" height="364pt"
+ viewBox="0.00 0.00 641.00 364.28" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_degree~3~~CalledByGraph" class="graph" transform="scale(1.56 1.56) rotate(0) translate(4 566)">
 <title>proc~~cmp_degree~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-544.5 977,-544.5 977,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-566 999,-566 999,4 -4,4"/>
 <!-- proc~cmp_degree~3 -->
 <g id="proc~~cmp_degree~3~~CalledByGraph_node1" class="node">
 <title>proc~cmp_degree~3</title>
-<polygon fill="none" stroke="black" points="973,-276 819,-276 819,-252 973,-252 973,-276"/>
-<text text-anchor="middle" x="896" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_degree</text>
-</g>
-<!-- proc~set1a -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_node2" class="node">
-<title>proc~set1a</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node2"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="783,-318 666,-318 666,-294 783,-294 783,-318"/>
-<text text-anchor="middle" x="724.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
-</a>
-</g>
-</g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge1" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ff0000" d="M774.07,-293.96C793.58,-289.13 816.23,-283.52 836.62,-278.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="837.56,-281.84 846.42,-276.04 835.87,-275.05 837.56,-281.84"/>
+<polygon fill="none" stroke="black" points="995,-297 832,-297 832,-273 995,-273 995,-297"/>
+<text text-anchor="middle" x="913.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_degree</text>
 </g>
 <!-- proc~set1~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_node3" class="node">
+<g id="proc~~cmp_degree~3~~CalledByGraph_node2" class="node">
 <title>proc~set1~3</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node3"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="779.5,-276 669.5,-276 669.5,-252 779.5,-252 779.5,-276"/>
-<text text-anchor="middle" x="724.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node2"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="796,-318 676,-318 676,-294 796,-294 796,-318"/>
+<text text-anchor="middle" x="736" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
 <!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge2" class="edge">
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge1" class="edge">
 <title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ff0000" d="M779.6,-264C788.87,-264 798.72,-264 808.59,-264"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="808.86,-267.5 818.86,-264 808.86,-260.5 808.86,-267.5"/>
+<path fill="none" stroke="#ff0000" d="M796.42,-298.89C804.64,-297.91 813.23,-296.88 821.86,-295.85"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="822.47,-299.3 831.98,-294.63 821.64,-292.35 822.47,-299.3"/>
 </g>
 <!-- proc~set3~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_node4" class="node">
+<g id="proc~~cmp_degree~3~~CalledByGraph_node3" class="node">
 <title>proc~set3~3</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node4"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="779.5,-234 669.5,-234 669.5,-210 779.5,-210 779.5,-234"/>
-<text text-anchor="middle" x="724.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node3"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="796,-276 676,-276 676,-252 796,-252 796,-276"/>
+<text text-anchor="middle" x="736" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
 <!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge3" class="edge">
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge2" class="edge">
 <title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ff0000" d="M774.07,-234.04C793.58,-238.87 816.23,-244.48 836.62,-249.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="835.87,-252.95 846.42,-251.96 837.56,-246.16 835.87,-252.95"/>
+<path fill="none" stroke="#ff0000" d="M796.42,-271.11C804.64,-272.09 813.23,-273.12 821.86,-274.15"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="821.64,-277.65 831.98,-275.37 822.47,-270.7 821.64,-277.65"/>
 </g>
 <!-- none~set~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_node5" class="node">
+<g id="proc~~cmp_degree~3~~CalledByGraph_node4" class="node">
 <title>none~set~3</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node5"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="630,-276 527,-276 527,-252 630,-252 630,-276"/>
-<text text-anchor="middle" x="578.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="640,-297 527,-297 527,-273 640,-273 640,-297"/>
+<text text-anchor="middle" x="583.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge4" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
-<path fill="none" stroke="#ff0000" d="M620.76,-276.04C636.88,-280.74 655.53,-286.18 672.48,-291.12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="671.65,-294.52 682.23,-293.96 673.61,-287.8 671.65,-294.52"/>
-</g>
 <!-- none~set~3&#45;&gt;proc~set1~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge5" class="edge">
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge3" class="edge">
 <title>none~set~3&#45;&gt;proc~set1~3</title>
-<path fill="none" stroke="#00ff00" d="M630.27,-264C639.64,-264 649.55,-264 659.26,-264"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="659.28,-267.5 669.28,-264 659.28,-260.5 659.28,-267.5"/>
+<path fill="none" stroke="#ff0000" d="M640.11,-292.76C648.48,-293.93 657.19,-295.14 665.8,-296.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="665.44,-299.83 675.83,-297.74 666.41,-292.89 665.44,-299.83"/>
 </g>
 <!-- none~set~3&#45;&gt;proc~set3~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge6" class="edge">
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge4" class="edge">
 <title>none~set~3&#45;&gt;proc~set3~3</title>
-<path fill="none" stroke="#0000ff" d="M620.76,-251.96C636.88,-247.26 655.53,-241.82 672.48,-236.88"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="673.61,-240.2 682.23,-234.04 671.65,-233.48 673.61,-240.2"/>
+<path fill="none" stroke="#00ffff" d="M640.11,-277.24C648.48,-276.07 657.19,-274.86 665.8,-273.66"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="666.41,-277.11 675.83,-272.26 665.44,-270.17 666.41,-277.11"/>
 </g>
 <!-- proc~ansatz~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_node6" class="node">
+<g id="proc~~cmp_degree~3~~CalledByGraph_node5" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node6"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="467,-482 345,-482 345,-458 467,-458 467,-482"/>
-<text text-anchor="middle" x="406" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="467,-562 335,-562 335,-538 467,-538 467,-562"/>
+<text text-anchor="middle" x="401" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~set~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge7" class="edge">
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge5" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M467.12,-458.13C475.76,-454.59 484.06,-449.98 491,-444 540.47,-401.35 563.98,-323.98 572.94,-286.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="576.41,-286.63 575.18,-276.11 569.58,-285.1 576.41,-286.63"/>
+<path fill="none" stroke="#ff0000" d="M467.04,-538.75C475.81,-535.12 484.14,-530.33 491,-524 555.57,-464.48 574.98,-354.4 580.47,-307.31"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="583.96,-307.57 581.54,-297.26 577,-306.83 583.96,-307.57"/>
 </g>
 <!-- proc~elevate_degree~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_node7" class="node">
+<g id="proc~~cmp_degree~3~~CalledByGraph_node6" class="node">
 <title>proc~elevate_degree~3</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node7"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="491,-402 321,-402 321,-378 491,-378 491,-402"/>
-<text text-anchor="middle" x="406" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node6"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="491,-360 311,-360 311,-336 491,-336 491,-360"/>
+<text text-anchor="middle" x="401" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;none~set~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge8" class="edge">
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge6" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M472.9,-377.91C479.26,-375.47 485.41,-372.53 491,-369 524.67,-347.73 551.51,-308.93 565.91,-284.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="568.98,-286.61 570.98,-276.21 562.92,-283.09 568.98,-286.61"/>
+<path fill="none" stroke="#ff0000" d="M460.4,-335.97C470.7,-333.36 481.24,-330.35 491,-327 511.36,-320 533.32,-310.01 550.61,-301.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="552.31,-304.6 559.7,-297.01 549.19,-298.33 552.31,-304.6"/>
 </g>
 <!-- proc~insert_knots~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_node8" class="node">
+<g id="proc~~cmp_degree~3~~CalledByGraph_node7" class="node">
 <title>proc~insert_knots~3</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node8"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_curve%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-360 330.5,-360 330.5,-336 481.5,-336 481.5,-360"/>
-<text text-anchor="middle" x="406" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node7"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-482 320.5,-482 320.5,-458 481.5,-458 481.5,-482"/>
+<text text-anchor="middle" x="401" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;none~set~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge9" class="edge">
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge7" class="edge">
 <title>proc~insert_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M467.18,-335.97C475.36,-333.47 483.51,-330.5 491,-327 515.36,-315.61 539.83,-296.96 556.5,-282.9"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="559.18,-285.21 564.46,-276.02 554.6,-279.91 559.18,-285.21"/>
+<path fill="none" stroke="#ff0000" d="M475.67,-457.96C481.12,-455.5 486.31,-452.54 491,-449 539.34,-412.5 565.71,-342.6 576.53,-307.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="579.97,-307.72 579.4,-297.14 573.25,-305.76 579.97,-307.72"/>
 </g>
 <!-- proc~modify_wc~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_node9" class="node">
+<g id="proc~~cmp_degree~3~~CalledByGraph_node8" class="node">
 <title>proc~modify_wc~3</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node9"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="479,-276 333,-276 333,-252 479,-252 479,-276"/>
-<text text-anchor="middle" x="406" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node8"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="479,-318 323,-318 323,-294 479,-294 479,-318"/>
+<text text-anchor="middle" x="401" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge10" class="edge">
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge8" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M479.31,-264C491.66,-264 504.39,-264 516.42,-264"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="516.78,-267.5 526.78,-264 516.78,-260.5 516.78,-267.5"/>
+<path fill="none" stroke="#ff0000" d="M479.07,-297.03C491.65,-295.57 504.57,-294.07 516.84,-292.64"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="517.44,-296.09 526.97,-291.46 516.63,-289.14 517.44,-296.09"/>
 </g>
 <!-- proc~modify_xc~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_node10" class="node">
+<g id="proc~~cmp_degree~3~~CalledByGraph_node9" class="node">
 <title>proc~modify_xc~3</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node10"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-234 334.5,-234 334.5,-210 477.5,-210 477.5,-234"/>
-<text text-anchor="middle" x="406" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node9"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-276 324.5,-276 324.5,-252 477.5,-252 477.5,-276"/>
+<text text-anchor="middle" x="401" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge11" class="edge">
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge9" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M455.86,-234.04C475.48,-238.87 498.26,-244.48 518.77,-249.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="518.09,-252.97 528.63,-251.96 519.76,-246.17 518.09,-252.97"/>
+<path fill="none" stroke="#ff0000" d="M477.5,-272.78C490.54,-274.3 503.99,-275.87 516.74,-277.35"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="516.46,-280.84 526.8,-278.52 517.27,-273.89 516.46,-280.84"/>
 </g>
 <!-- proc~remove_knots~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_node11" class="node">
+<g id="proc~~cmp_degree~3~~CalledByGraph_node10" class="node">
 <title>proc~remove_knots~3</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node11"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_curve%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="487,-318 325,-318 325,-294 487,-294 487,-318"/>
-<text text-anchor="middle" x="406" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node10"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="487,-440 315,-440 315,-416 487,-416 487,-440"/>
+<text text-anchor="middle" x="401" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;none~set~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge12" class="edge">
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge10" class="edge">
 <title>proc~remove_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M455.86,-293.96C475.48,-289.13 498.26,-283.52 518.77,-278.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="519.76,-281.83 528.63,-276.04 518.09,-275.03 519.76,-281.83"/>
+<path fill="none" stroke="#ff0000" d="M462.24,-415.98C472.34,-412.44 482.34,-407.87 491,-402 527.88,-377 556.66,-332.45 571.47,-306.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="574.56,-307.78 576.29,-297.32 568.42,-304.42 574.56,-307.78"/>
+</g>
+<!-- proc~set_c~3 -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_node11" class="node">
+<title>proc~set_c~3</title>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node11"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_surface%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="464,-108 338,-108 338,-84 464,-84 464,-108"/>
+<text text-anchor="middle" x="401" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
+</a>
+</g>
+</g>
+<!-- proc~set_c~3&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge11" class="edge">
+<title>proc~set_c~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M464.39,-103.61C473.92,-106.72 483.18,-111.03 491,-117 540.26,-154.6 566.32,-226.63 576.83,-262.93"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="573.46,-263.87 579.5,-272.57 580.2,-262 573.46,-263.87"/>
 </g>
-<!-- proc~set_circle -->
+<!-- proc~set_half_ring~2 -->
 <g id="proc~~cmp_degree~3~~CalledByGraph_node12" class="node">
-<title>proc~set_circle</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node12"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="474.5,-192 337.5,-192 337.5,-168 474.5,-168 474.5,-192"/>
-<text text-anchor="middle" x="406" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
+<title>proc~set_half_ring~2</title>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node12"><a xlink:href="../proc/set_half_ring~2.html" xlink:title="nurbs_surface%set_half_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="483.5,-150 318.5,-150 318.5,-126 483.5,-126 483.5,-150"/>
+<text text-anchor="middle" x="401" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_circle&#45;&gt;none~set~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge13" class="edge">
-<title>proc~set_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M467.18,-192.03C475.36,-194.53 483.51,-197.5 491,-201 515.36,-212.39 539.83,-231.04 556.5,-245.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="554.6,-248.09 564.46,-251.98 559.18,-242.79 554.6,-248.09"/>
+<!-- proc~set_half_ring~2&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge12" class="edge">
+<title>proc~set_half_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M473.87,-150.11C479.91,-152.55 485.71,-155.48 491,-159 530.66,-185.4 559.08,-235.16 572.94,-263.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="569.8,-265.16 577.22,-272.71 576.13,-262.17 569.8,-265.16"/>
 </g>
-<!-- proc~set_c~3 -->
+<!-- proc~set_ring~2 -->
 <g id="proc~~cmp_degree~3~~CalledByGraph_node13" class="node">
-<title>proc~set_c~3</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node13"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_curve%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="464,-150 348,-150 348,-126 464,-126 464,-150"/>
-<text text-anchor="middle" x="406" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
+<title>proc~set_ring~2</title>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node13"><a xlink:href="../proc/set_ring~2.html" xlink:title="nurbs_surface%set_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="470.5,-192 331.5,-192 331.5,-168 470.5,-168 470.5,-192"/>
+<text text-anchor="middle" x="401" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c~3&#45;&gt;none~set~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge14" class="edge">
-<title>proc~set_c~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M464.15,-147.05C473.55,-149.98 482.87,-153.86 491,-159 524.67,-180.27 551.51,-219.07 565.91,-243.08"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="562.92,-244.91 570.98,-251.79 568.98,-241.39 562.92,-244.91"/>
+<!-- proc~set_ring~2&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge13" class="edge">
+<title>proc~set_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M469.92,-192.15C477.23,-194.59 484.41,-197.51 491,-201 521.51,-217.17 549.65,-245.97 566.45,-265.28"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="563.79,-267.55 572.93,-272.91 569.12,-263.02 563.79,-267.55"/>
 </g>
-<!-- proc~set_half_circle -->
+<!-- proc~set_tetragon -->
 <g id="proc~~cmp_degree~3~~CalledByGraph_node14" class="node">
-<title>proc~set_half_circle</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node14"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="487.5,-108 324.5,-108 324.5,-84 487.5,-84 487.5,-108"/>
-<text text-anchor="middle" x="406" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
+<title>proc~set_tetragon</title>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node14"><a xlink:href="../proc/set_tetragon.html" xlink:title="nurbs_surface%set_tetragon">
+<polygon fill="#d9534f" stroke="#d9534f" points="483,-234 319,-234 319,-210 483,-210 483,-234"/>
+<text text-anchor="middle" x="401" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_circle&#45;&gt;none~set~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge15" class="edge">
-<title>proc~set_half_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M475.62,-108.12C481.09,-110.56 486.3,-113.49 491,-117 534.04,-149.18 559.53,-209.61 570.72,-242.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="567.51,-243.52 573.97,-251.92 574.16,-241.32 567.51,-243.52"/>
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge14" class="edge">
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M460.4,-234.03C470.7,-236.64 481.24,-239.65 491,-243 511.36,-250 533.32,-259.99 550.61,-268.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="549.19,-271.67 559.7,-272.99 552.31,-265.4 549.19,-271.67"/>
 </g>
-<!-- program~compute_length -->
+<!-- program~compute_area -->
 <g id="proc~~cmp_degree~3~~CalledByGraph_node15" class="node">
-<title>program~compute_length</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node15"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-502 0,-502 0,-478 99,-478 99,-502"/>
-<text text-anchor="middle" x="49.5" y="-487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<title>program~compute_area</title>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node15"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-542 0,-542 0,-518 89,-518 89,-542"/>
+<text text-anchor="middle" x="44.5" y="-527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;none~set~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge16" class="edge">
-<title>program~compute_length&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M84.64,-502.01C164.06,-527.61 364.11,-578.44 491,-491 559.8,-443.59 573.92,-333.61 576.79,-286.3"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="580.29,-286.35 577.28,-276.19 573.3,-286.01 580.29,-286.35"/>
+<!-- program~compute_area&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge15" class="edge">
+<title>program~compute_area&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M89.19,-528.67C195.01,-525.11 458.77,-514.01 491,-491 552.97,-446.76 573.59,-350.77 579.93,-307.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="583.42,-307.52 581.27,-297.15 576.48,-306.6 583.42,-307.52"/>
 </g>
-<!-- proc~cmp_length -->
+<!-- proc~cmp_area -->
 <g id="proc~~cmp_degree~3~~CalledByGraph_node19" class="node">
-<title>proc~cmp_length</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node19"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="285,-482 135,-482 135,-458 285,-458 285,-482"/>
-<text text-anchor="middle" x="210" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<title>proc~cmp_area</title>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node19"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
+<polygon fill="#d9534f" stroke="#d9534f" points="275,-562 125,-562 125,-538 275,-538 275,-562"/>
+<text text-anchor="middle" x="200" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;proc~cmp_length -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge27" class="edge">
-<title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#ff0000" d="M99.35,-483.84C107.54,-482.8 116.25,-481.7 125.03,-480.6"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="125.48,-484.07 134.96,-479.34 124.6,-477.12 125.48,-484.07"/>
+<!-- program~compute_area&#45;&gt;proc~cmp_area -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge34" class="edge">
+<title>program~compute_area&#45;&gt;proc~cmp_area</title>
+<path fill="none" stroke="#ff0000" d="M89.08,-535.68C97.19,-536.73 105.92,-537.87 114.78,-539.03"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="114.45,-542.51 124.81,-540.33 115.35,-535.57 114.45,-542.51"/>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~cmp_degree~3~~CalledByGraph_node16" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node16"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-381 160,-381 160,-357 260,-357 260,-381"/>
-<text text-anchor="middle" x="210" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node16"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="255,-420 145,-420 145,-396 255,-396 255,-420"/>
+<text text-anchor="middle" x="200" y="-405.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;none~set~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge17" class="edge">
-<title>program~example1_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M233.08,-381.16C282.76,-406.72 405.66,-459.8 491,-411 538.32,-383.94 562.31,-319.79 572.06,-285.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="575.49,-286.59 574.73,-276.02 568.74,-284.75 575.49,-286.59"/>
+<!-- program~example3_surface&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge16" class="edge">
+<title>program~example3_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M255.17,-404.6C327.24,-399.42 450.29,-388.08 491,-369 522.44,-354.27 550.52,-324.84 567.04,-305.03"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="569.81,-307.17 573.38,-297.2 564.37,-302.77 569.81,-307.17"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge21" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
-<path fill="none" stroke="#ff7500" d="M260.21,-374.33C275.59,-375.99 293.12,-377.89 310.54,-379.78"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="310.45,-383.29 320.77,-380.88 311.21,-376.33 310.45,-383.29"/>
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge20" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#ff6d00" d="M239.39,-395.97C260.5,-389.4 287.17,-381.16 311,-374 323.16,-370.34 336.28,-366.47 348.62,-362.86"/>
+<polygon fill="#ff6d00" stroke="#ff6d00" points="349.69,-366.2 358.3,-360.04 347.72,-359.48 349.69,-366.2"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge22" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
-<path fill="none" stroke="#ffeb00" d="M260.21,-363.67C278.44,-361.7 299.67,-359.4 320.17,-357.18"/>
-<polygon fill="#ffeb00" stroke="#ffeb00" points="320.6,-360.66 330.16,-356.1 319.84,-353.7 320.6,-360.66"/>
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge21" class="edge">
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#ffda00" d="M230.54,-420.16C252.49,-428.91 283.3,-440.61 311,-449 318.48,-451.27 326.37,-453.44 334.24,-455.47"/>
+<polygon fill="#ffda00" stroke="#ffda00" points="333.62,-458.92 344.17,-457.96 335.32,-452.13 333.62,-458.92"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
 <g id="proc~~cmp_degree~3~~CalledByGraph_edge23" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
-<path fill="none" stroke="#00ff4e" d="M239.62,-356.99C261.63,-348.02 292.92,-335.84 321,-327 328.08,-324.77 335.55,-322.62 343,-320.6"/>
-<polygon fill="#00ff4e" stroke="#00ff4e" points="343.97,-323.97 352.75,-318.03 342.19,-317.2 343.97,-323.97"/>
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#00ff24" d="M255.11,-413.44C270.51,-414.99 287.75,-416.72 304.82,-418.43"/>
+<polygon fill="#00ff24" stroke="#00ff24" points="304.53,-421.92 314.83,-419.44 305.23,-414.96 304.53,-421.92"/>
 </g>
-<!-- program~example_nurbs_curve -->
+<!-- program~example_nurbs_surface -->
 <g id="proc~~cmp_degree~3~~CalledByGraph_node17" class="node">
-<title>program~example_nurbs_curve</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node17"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 341.5,-66 341.5,-42 470.5,-42 470.5,-66"/>
-<text text-anchor="middle" x="406" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<title>program~example_nurbs_surface</title>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node17"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 331.5,-66 331.5,-42 470.5,-42 470.5,-66"/>
+<text text-anchor="middle" x="401" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;none~set~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge18" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M470.56,-63.24C477.95,-66.17 484.99,-70 491,-75 543.77,-118.84 565.87,-201.81 573.75,-241.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="570.34,-242.42 575.61,-251.62 577.22,-241.15 570.34,-242.42"/>
+<!-- program~example_nurbs_surface&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge17" class="edge">
+<title>program~example_nurbs_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M470.75,-63.21C478.08,-66.17 485.03,-70.01 491,-75 550.25,-124.48 572.25,-219.65 579.43,-262.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="575.99,-263.45 580.98,-272.8 582.91,-262.38 575.99,-263.45"/>
 </g>
-<!-- program~nearest_point_1d -->
+<!-- program~nearest_point_2d -->
 <g id="proc~~cmp_degree~3~~CalledByGraph_node18" class="node">
-<title>program~nearest_point_1d</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node18"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="457.5,-24 354.5,-24 354.5,0 457.5,0 457.5,-24"/>
-<text text-anchor="middle" x="406" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<title>program~nearest_point_2d</title>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node18"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452.5,-24 349.5,-24 349.5,0 452.5,0 452.5,-24"/>
+<text text-anchor="middle" x="401" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;none~set~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge19" class="edge">
-<title>program~nearest_point_1d&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M457.92,-16.54C469.88,-19.69 481.8,-24.79 491,-33 553.86,-89.12 571.19,-195.45 575.85,-241.64"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="572.38,-242.13 576.76,-251.78 579.35,-241.51 572.38,-242.13"/>
+<!-- program~nearest_point_2d&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge18" class="edge">
+<title>program~nearest_point_2d&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M452.73,-15.16C466.47,-18.21 480.44,-23.61 491,-33 560.36,-94.71 577.18,-213.24 581.23,-262.59"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="577.76,-263.07 581.96,-272.8 584.74,-262.57 577.76,-263.07"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge20" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#ff0000" d="M285.17,-470C301.32,-470 318.36,-470 334.36,-470"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="334.71,-473.5 344.71,-470 334.71,-466.5 334.71,-473.5"/>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge19" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#ff0000" d="M275.1,-550C291.15,-550 308.13,-550 324.24,-550"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="324.68,-553.5 334.68,-550 324.68,-546.5 324.68,-553.5"/>
 </g>
-<!-- program~shape_c_1d -->
+<!-- program~example_ppm1 -->
 <g id="proc~~cmp_degree~3~~CalledByGraph_node20" class="node">
-<title>program~shape_c_1d</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node20"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-150 172,-150 172,-126 248,-126 248,-150"/>
-<text text-anchor="middle" x="210" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<title>program~example_ppm1</title>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node20"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-192 153,-192 153,-168 247,-168 247,-192"/>
+<text text-anchor="middle" x="200" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~set_c~3 -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge25" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~set_c~3</title>
-<path fill="none" stroke="#00c4ff" d="M248.41,-138C273.62,-138 307.6,-138 337.47,-138"/>
-<polygon fill="#00c4ff" stroke="#00c4ff" points="337.84,-141.5 347.84,-138 337.84,-134.5 337.84,-141.5"/>
+<!-- program~example_ppm1&#45;&gt;proc~set_ring~2 -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge27" class="edge">
+<title>program~example_ppm1&#45;&gt;proc~set_ring~2</title>
+<path fill="none" stroke="#0091ff" d="M247.15,-180C269.15,-180 296.09,-180 321.19,-180"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="321.45,-183.5 331.45,-180 321.45,-176.5 321.45,-183.5"/>
 </g>
-<!-- program~shape_circle -->
+<!-- program~example_ppm1&#45;&gt;proc~set_tetragon -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge29" class="edge">
+<title>program~example_ppm1&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.15,-189.74C272.73,-195.14 304.98,-201.95 333.26,-207.91"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="332.57,-211.34 343.07,-209.99 334.01,-204.5 332.57,-211.34"/>
+</g>
+<!-- program~example_ppm2 -->
 <g id="proc~~cmp_degree~3~~CalledByGraph_node21" class="node">
-<title>program~shape_circle</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node21"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249.5,-192 170.5,-192 170.5,-168 249.5,-168 249.5,-192"/>
-<text text-anchor="middle" x="210" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<title>program~example_ppm2</title>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node21"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-150 153,-150 153,-126 247,-126 247,-150"/>
+<text text-anchor="middle" x="200" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~set_circle -->
-<g id="proc~~cmp_degree~3~~CalledByGraph_edge24" class="edge">
-<title>program~shape_circle&#45;&gt;proc~set_circle</title>
-<path fill="none" stroke="#00ffc4" d="M249.79,-180C271.95,-180 300.54,-180 327.13,-180"/>
-<polygon fill="#00ffc4" stroke="#00ffc4" points="327.21,-183.5 337.21,-180 327.21,-176.5 327.21,-183.5"/>
+<!-- program~example_ppm2&#45;&gt;proc~set_half_ring~2 -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge25" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~set_half_ring~2</title>
+<path fill="none" stroke="#00ffff" d="M247.15,-138C265.39,-138 287.03,-138 308.19,-138"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="308.2,-141.5 318.2,-138 308.2,-134.5 308.2,-141.5"/>
+</g>
+<!-- program~example_ppm2&#45;&gt;proc~set_tetragon -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge30" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.02,-146.55C256.72,-149.56 266.56,-153.6 275,-159 295.71,-172.25 290,-188.21 311,-201 314.01,-202.83 317.16,-204.5 320.41,-206.03"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="319.22,-209.32 329.8,-209.95 321.92,-202.87 319.22,-209.32"/>
 </g>
-<!-- program~shape_half_circle -->
+<!-- program~example_ppm3 -->
 <g id="proc~~cmp_degree~3~~CalledByGraph_node22" class="node">
-<title>program~shape_half_circle</title>
-<g id="a_proc~~cmp_degree~3~~CalledByGraph_node22"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-108 158,-108 158,-84 262,-84 262,-108"/>
-<text text-anchor="middle" x="210" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<title>program~example_ppm3</title>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node22"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-318 153,-318 153,-294 247,-294 247,-318"/>
+<text text-anchor="middle" x="200" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge22" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#48ff00" d="M247.15,-296.26C272.73,-290.86 304.98,-284.05 333.26,-278.09"/>
+<polygon fill="#48ff00" stroke="#48ff00" points="334.01,-281.5 343.07,-276.01 332.57,-274.66 334.01,-281.5"/>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~set_tetragon -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge31" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.02,-297.45C256.72,-294.44 266.56,-290.4 275,-285 295.71,-271.75 290,-255.79 311,-243 314.01,-241.17 317.16,-239.5 320.41,-237.97"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="321.92,-241.13 329.8,-234.05 319.22,-234.68 321.92,-241.13"/>
+</g>
+<!-- program~nearest_point_2d_bench -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_node23" class="node">
+<title>program~nearest_point_2d_bench</title>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node23"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-234 129,-234 129,-210 271,-210 271,-234"/>
+<text text-anchor="middle" x="200" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+</a>
+</g>
+</g>
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge32" class="edge">
+<title>program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M271.16,-222C283.34,-222 296.17,-222 308.82,-222"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="308.91,-225.5 318.91,-222 308.91,-218.5 308.91,-225.5"/>
+</g>
+<!-- program~shape_c_2d -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_node24" class="node">
+<title>program~shape_c_2d</title>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node24"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="238,-24 162,-24 162,0 238,0 238,-24"/>
+<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_c_2d&#45;&gt;proc~set_c~3 -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge24" class="edge">
+<title>program~shape_c_2d&#45;&gt;proc~set_c~3</title>
+<path fill="none" stroke="#00ff91" d="M238.17,-18.06C250.55,-21.21 263.98,-25.94 275,-33 295.71,-46.25 290,-62.21 311,-75 316.34,-78.25 322.14,-81 328.14,-83.32"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="327.09,-86.66 337.68,-86.63 329.38,-80.05 327.09,-86.66"/>
+</g>
+<!-- program~shape_half_ring_2d -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_node25" class="node">
+<title>program~shape_half_ring_2d</title>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node25"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="257.5,-66 142.5,-66 142.5,-42 257.5,-42 257.5,-66"/>
+<text text-anchor="middle" x="200" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2 -->
 <g id="proc~~cmp_degree~3~~CalledByGraph_edge26" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
-<path fill="none" stroke="#004eff" d="M262.22,-96C278.08,-96 296.06,-96 313.78,-96"/>
-<polygon fill="#004eff" stroke="#004eff" points="314.17,-99.5 324.17,-96 314.17,-92.5 314.17,-99.5"/>
+<title>program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2</title>
+<path fill="none" stroke="#00ffff" d="M257.09,-66.07C263.38,-68.53 269.49,-71.47 275,-75 295.71,-88.25 290,-104.21 311,-117 314.01,-118.83 317.16,-120.5 320.41,-122.03"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="319.22,-125.32 329.8,-125.95 321.92,-118.87 319.22,-125.32"/>
+</g>
+<!-- program~shape_ring_2d -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_node26" class="node">
+<title>program~shape_ring_2d</title>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node26"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="245,-108 155,-108 155,-84 245,-84 245,-108"/>
+<text text-anchor="middle" x="200" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_ring_2d&#45;&gt;proc~set_ring~2 -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge28" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~set_ring~2</title>
+<path fill="none" stroke="#0091ff" d="M245.08,-103.96C255.4,-107.03 266,-111.24 275,-117 295.71,-130.25 290,-146.21 311,-159 314.41,-161.08 318.01,-162.95 321.73,-164.64"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="320.6,-167.95 331.18,-168.46 323.22,-161.46 320.6,-167.95"/>
+</g>
+<!-- program~shape_tetragon -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_node27" class="node">
+<title>program~shape_tetragon</title>
+<g id="a_proc~~cmp_degree~3~~CalledByGraph_node27"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-276 152,-276 152,-252 248,-252 248,-276"/>
+<text text-anchor="middle" x="200" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+</a>
+</g>
+</g>
+<!-- program~shape_tetragon&#45;&gt;proc~set_tetragon -->
+<g id="proc~~cmp_degree~3~~CalledByGraph_edge33" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M248.16,-254.05C273.44,-248.71 305.03,-242.04 332.84,-236.17"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="333.83,-239.54 342.89,-234.05 332.39,-232.69 333.83,-239.54"/>
 </g>
 </g>
 </svg>
@@ -835,7 +937,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elem.html b/proc/cmp_elem.html
index 805a00535..8450d8f81 100644
--- a/proc/cmp_elem.html
+++ b/proc/cmp_elem.html
@@ -83,15 +83,15 @@ <h1>cmp_elem
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_elem</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function cmp_elem(this) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~52"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~51"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -176,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-elemconn~13"></span>
+          <span class="anchor" id="variable-elemconn~12"></span>
           integer, allocatable, (:,:)
         </small>
       </h3>
@@ -193,181 +193,181 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elem~~CallsGraph Pages: 1 -->
-<svg id="proccmp_elemCallsGraph" width="641pt" height="239pt"
- viewBox="0.00 0.00 641.00 239.12" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_elem~~CallsGraph" class="graph" transform="scale(1.1 1.1) rotate(0) translate(4 259)">
+<svg id="proccmp_elemCallsGraph" width="641pt" height="246pt"
+ viewBox="0.00 0.00 641.00 245.75" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_elem~~CallsGraph" class="graph" transform="scale(1.07 1.07) rotate(0) translate(4 259)">
 <title>proc~~cmp_elem~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-259 701,-259 701,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-259 682,-259 682,4 -4,4"/>
 <!-- proc~cmp_elem -->
 <g id="proc~~cmp_elem~~CallsGraph_node1" class="node">
 <title>proc~cmp_elem</title>
-<polygon fill="none" stroke="black" points="153,-124 0,-124 0,-100 153,-100 153,-124"/>
-<text text-anchor="middle" x="76.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_elem</text>
+<polygon fill="none" stroke="black" points="143,-124 0,-124 0,-100 143,-100 143,-124"/>
+<text text-anchor="middle" x="71.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_elem</text>
 </g>
 <!-- interface~elemconn_cn -->
 <g id="proc~~cmp_elem~~CallsGraph_node2" class="node">
 <title>interface~elemconn_cn</title>
 <g id="a_proc~~cmp_elem~~CallsGraph_node2"><a xlink:href="../interface/elemconn_cn.html" xlink:title="elemConn_Cn">
-<polygon fill="#a7506f" stroke="#a7506f" points="321.5,-176 234.5,-176 234.5,-152 321.5,-152 321.5,-176"/>
-<text text-anchor="middle" x="278" y="-161.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_Cn</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="307,-176 220,-176 220,-152 307,-152 307,-176"/>
+<text text-anchor="middle" x="263.5" y="-161.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_Cn</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem&#45;&gt;interface~elemconn_cn -->
 <g id="proc~~cmp_elem~~CallsGraph_edge1" class="edge">
 <title>proc~cmp_elem&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#ff0000" d="M123.77,-124.06C153.89,-131.91 193.25,-142.17 224.53,-150.32"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="223.83,-153.76 234.39,-152.89 225.59,-146.98 223.83,-153.76"/>
+<path fill="none" stroke="#ff0000" d="M116.57,-124.06C144.54,-131.72 180.87,-141.66 210.29,-149.71"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="209.41,-153.1 219.98,-152.36 211.26,-146.35 209.41,-153.1"/>
 </g>
 <!-- interface~unique -->
 <g id="proc~~cmp_elem~~CallsGraph_node3" class="node">
 <title>interface~unique</title>
 <g id="a_proc~~cmp_elem~~CallsGraph_node3"><a xlink:href="../interface/unique.html" xlink:title="unique">
-<polygon fill="#a7506f" stroke="#a7506f" points="305,-124 251,-124 251,-100 305,-100 305,-124"/>
-<text text-anchor="middle" x="278" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="290.5,-124 236.5,-124 236.5,-100 290.5,-100 290.5,-124"/>
+<text text-anchor="middle" x="263.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem&#45;&gt;interface~unique -->
 <g id="proc~~cmp_elem~~CallsGraph_edge2" class="edge">
 <title>proc~cmp_elem&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M153.21,-112C183.16,-112 216.2,-112 240.6,-112"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="240.83,-115.5 250.83,-112 240.83,-108.5 240.83,-115.5"/>
+<path fill="none" stroke="#ff0000" d="M143.25,-112C171.43,-112 202.66,-112 226.09,-112"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="226.27,-115.5 236.27,-112 226.27,-108.5 226.27,-115.5"/>
 </g>
 <!-- proc~get_multiplicity -->
 <g id="proc~~cmp_elem~~CallsGraph_node4" class="node">
 <title>proc~get_multiplicity</title>
-<g id="a_proc~~cmp_elem~~CallsGraph_node4"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="367,-61 189,-61 189,-37 367,-37 367,-61"/>
-<text text-anchor="middle" x="278" y="-46.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
+<g id="a_proc~~cmp_elem~~CallsGraph_node4"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="348,-61 179,-61 179,-37 348,-37 348,-61"/>
+<text text-anchor="middle" x="263.5" y="-46.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem&#45;&gt;proc~get_multiplicity -->
 <g id="proc~~cmp_elem~~CallsGraph_edge3" class="edge">
 <title>proc~cmp_elem&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M115.97,-99.85C148.22,-89.67 194.44,-75.07 229.09,-64.13"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="230.51,-67.35 238.99,-61 228.4,-60.68 230.51,-67.35"/>
+<path fill="none" stroke="#ff0000" d="M109.13,-99.85C139.72,-89.71 183.49,-75.2 216.45,-64.27"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="217.91,-67.47 226.3,-61 215.71,-60.83 217.91,-67.47"/>
 </g>
 <!-- proc~cmp_elemconn_cn_l -->
 <g id="proc~~cmp_elem~~CallsGraph_node6" class="node">
 <title>proc~cmp_elemconn_cn_l</title>
 <g id="a_proc~~cmp_elem~~CallsGraph_node6"><a xlink:href="../proc/cmp_elemconn_cn_l.html" xlink:title="cmp_elemConn_Cn_L">
-<polygon fill="#d9534f" stroke="#d9534f" points="530.5,-255 403.5,-255 403.5,-231 530.5,-231 530.5,-255"/>
-<text text-anchor="middle" x="467" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_L</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-255 384.5,-255 384.5,-231 511.5,-231 511.5,-255"/>
+<text text-anchor="middle" x="448" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_L</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_l -->
 <g id="proc~~cmp_elem~~CallsGraph_edge4" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_l</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M302.87,-176.18C327.58,-188.54 367.46,-207.82 403,-222 407.76,-223.9 412.77,-225.77 417.8,-227.57"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="416.84,-230.94 427.43,-230.93 419.14,-224.33 416.84,-230.94"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M287.01,-176.02C310.74,-188.42 349.4,-207.91 384,-222 388.68,-223.91 393.61,-225.78 398.57,-227.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="397.47,-230.89 408.06,-230.9 399.78,-224.29 397.47,-230.89"/>
 </g>
 <!-- proc~cmp_elemconn_cn_s -->
 <g id="proc~~cmp_elem~~CallsGraph_node7" class="node">
 <title>proc~cmp_elemconn_cn_s</title>
 <g id="a_proc~~cmp_elem~~CallsGraph_node7"><a xlink:href="../proc/cmp_elemconn_cn_s.html" xlink:title="cmp_elemConn_Cn_S">
-<polygon fill="#d9534f" stroke="#d9534f" points="530.5,-213 403.5,-213 403.5,-189 530.5,-189 530.5,-213"/>
-<text text-anchor="middle" x="467" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_S</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-213 384.5,-213 384.5,-189 511.5,-189 511.5,-213"/>
+<text text-anchor="middle" x="448" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_S</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_s -->
 <g id="proc~~cmp_elem~~CallsGraph_edge5" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_s</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M321.9,-172.49C343.6,-176.78 370.51,-182.11 395.18,-186.99"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="394.74,-190.47 405.23,-188.98 396.1,-183.6 394.74,-190.47"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M307.29,-172.67C328.21,-176.92 353.93,-182.13 377.57,-186.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="377.06,-190.39 387.56,-188.95 378.45,-183.53 377.06,-190.39"/>
 </g>
 <!-- proc~cmp_elemconn_cn_v -->
 <g id="proc~~cmp_elem~~CallsGraph_node8" class="node">
 <title>proc~cmp_elemconn_cn_v</title>
 <g id="a_proc~~cmp_elem~~CallsGraph_node8"><a xlink:href="../proc/cmp_elemconn_cn_v.html" xlink:title="cmp_elemConn_Cn_V">
-<polygon fill="#d9534f" stroke="#d9534f" points="531,-171 403,-171 403,-147 531,-147 531,-171"/>
-<text text-anchor="middle" x="467" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_V</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="512,-171 384,-171 384,-147 512,-147 512,-171"/>
+<text text-anchor="middle" x="448" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_V</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_v -->
 <g id="proc~~cmp_elem~~CallsGraph_edge6" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_v</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M321.9,-162.85C342.85,-162.29 368.64,-161.6 392.59,-160.96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="392.82,-164.46 402.72,-160.69 392.63,-157.46 392.82,-164.46"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M307.29,-162.83C327.02,-162.29 351.02,-161.63 373.51,-161.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="373.82,-164.51 383.72,-160.73 373.63,-157.51 373.82,-164.51"/>
 </g>
 <!-- proc~unique_integer -->
 <g id="proc~~cmp_elem~~CallsGraph_node9" class="node">
 <title>proc~unique_integer</title>
 <g id="a_proc~~cmp_elem~~CallsGraph_node9"><a xlink:href="../proc/unique_integer.html" xlink:title="unique_integer">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="513.5,-129 420.5,-129 420.5,-105 513.5,-105 513.5,-129"/>
-<text text-anchor="middle" x="467" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_integer</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="494.5,-129 401.5,-129 401.5,-105 494.5,-105 494.5,-129"/>
+<text text-anchor="middle" x="448" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_integer</text>
 </a>
 </g>
 </g>
 <!-- interface~unique&#45;&gt;proc~unique_integer -->
 <g id="proc~~cmp_elem~~CallsGraph_edge7" class="edge">
 <title>interface~unique&#45;&gt;proc~unique_integer</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M305,-112.7C332.13,-113.42 375.49,-114.58 410.38,-115.51"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="410.35,-119.01 420.44,-115.78 410.54,-112.02 410.35,-119.01"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M290.65,-112.72C316.73,-113.43 357.62,-114.55 391.04,-115.47"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="391.05,-118.97 401.15,-115.74 391.25,-111.97 391.05,-118.97"/>
 </g>
 <!-- proc~unique_real -->
 <g id="proc~~cmp_elem~~CallsGraph_node10" class="node">
 <title>proc~unique_real</title>
 <g id="a_proc~~cmp_elem~~CallsGraph_node10"><a xlink:href="../proc/unique_real.html" xlink:title="unique_real">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="504.5,-87 429.5,-87 429.5,-63 504.5,-63 504.5,-87"/>
-<text text-anchor="middle" x="467" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_real</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="485.5,-87 410.5,-87 410.5,-63 485.5,-63 485.5,-87"/>
+<text text-anchor="middle" x="448" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_real</text>
 </a>
 </g>
 </g>
 <!-- interface~unique&#45;&gt;proc~unique_real -->
 <g id="proc~~cmp_elem~~CallsGraph_edge8" class="edge">
 <title>interface~unique&#45;&gt;proc~unique_real</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M305,-106.86C334.54,-101.01 383.32,-91.36 419.46,-84.21"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="420.16,-87.64 429.29,-82.26 418.8,-80.77 420.16,-87.64"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M290.65,-106.7C319.17,-100.92 365.41,-91.54 400.22,-84.48"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="401.06,-87.88 410.17,-82.47 399.67,-81.02 401.06,-87.88"/>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~cmp_elem~~CallsGraph_node5" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~cmp_elem~~CallsGraph_node5"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="529,-45 405,-45 405,-21 529,-21 529,-45"/>
-<text text-anchor="middle" x="467" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="510,-45 386,-45 386,-21 510,-21 510,-45"/>
+<text text-anchor="middle" x="448" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~cmp_elem~~CallsGraph_edge9" class="edge">
 <title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#0000ff" d="M367.02,-41.47C376.32,-40.67 385.68,-39.87 394.75,-39.1"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="395.17,-42.57 404.84,-38.23 394.58,-35.6 395.17,-42.57"/>
+<path fill="none" stroke="#0000ff" d="M348.01,-41.68C357.28,-40.87 366.66,-40.04 375.76,-39.25"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="376.24,-42.72 385.9,-38.36 375.63,-35.74 376.24,-42.72"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~cmp_elem~~CallsGraph_node11" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~cmp_elem~~CallsGraph_node11"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="697,-66 567,-66 567,-42 697,-42 697,-66"/>
-<text text-anchor="middle" x="632" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="678,-66 548,-66 548,-42 678,-42 678,-66"/>
+<text text-anchor="middle" x="613" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~cmp_elem~~CallsGraph_edge10" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M529.16,-40.88C538.18,-42.04 547.56,-43.25 556.81,-44.44"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="556.41,-47.92 566.78,-45.73 557.3,-40.98 556.41,-47.92"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M510.16,-40.88C519.18,-42.04 528.56,-43.25 537.81,-44.44"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="537.41,-47.92 547.78,-45.73 538.3,-40.98 537.41,-47.92"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~cmp_elem~~CallsGraph_node12" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~cmp_elem~~CallsGraph_node12"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="697,-24 567,-24 567,0 697,0 697,-24"/>
-<text text-anchor="middle" x="632" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="678,-24 548,-24 548,0 678,0 678,-24"/>
+<text text-anchor="middle" x="613" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~cmp_elem~~CallsGraph_edge11" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M529.16,-25.12C538.18,-23.96 547.56,-22.75 556.81,-21.56"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="557.3,-25.02 566.78,-20.27 556.41,-18.08 557.3,-25.02"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M510.16,-25.12C519.18,-23.96 528.56,-22.75 537.81,-21.56"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="538.3,-25.02 547.78,-20.27 537.41,-18.08 538.3,-25.02"/>
 </g>
 </g>
 </svg>
@@ -467,90 +467,71 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elem~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_elemCalledByGraph" width="641pt" height="90pt"
- viewBox="0.00 0.00 641.00 89.66" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_elem~~CalledByGraph" class="graph" transform="scale(1.05 1.05) rotate(0) translate(4 90)">
+<svg id="proccmp_elemCalledByGraph" width="630pt" height="52pt"
+ viewBox="0.00 0.00 630.00 52.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_elem~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 48)">
 <title>proc~~cmp_elem~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-90 668,-90 668,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-48 626,-48 626,4 -4,4"/>
 <!-- proc~cmp_elem -->
 <g id="proc~~cmp_elem~~CalledByGraph_node1" class="node">
 <title>proc~cmp_elem</title>
-<polygon fill="none" stroke="black" points="664,-66 511,-66 511,-42 664,-42 664,-66"/>
-<text text-anchor="middle" x="587.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_elem</text>
+<polygon fill="none" stroke="black" points="622,-44 479,-44 479,-20 622,-20 622,-44"/>
+<text text-anchor="middle" x="550.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_elem</text>
 </g>
 <!-- proc~ansatz -->
 <g id="proc~~cmp_elem~~CalledByGraph_node2" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~cmp_elem~~CalledByGraph_node2"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-66 343,-66 343,-42 475,-42 475,-66"/>
-<text text-anchor="middle" x="409" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~cmp_elem~~CalledByGraph_node2"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="443,-24 321,-24 321,0 443,0 443,-24"/>
+<text text-anchor="middle" x="382" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
 <g id="proc~~cmp_elem~~CalledByGraph_edge1" class="edge">
 <title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0000" d="M475.22,-54C483.55,-54 492.17,-54 500.76,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="500.81,-57.5 510.81,-54 500.81,-50.5 500.81,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M443.11,-19.22C451.48,-20.23 460.19,-21.27 468.86,-22.31"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="468.65,-25.81 478.99,-23.53 469.48,-18.86 468.65,-25.81"/>
 </g>
-<!-- proc~cmp_volume -->
+<!-- proc~cmp_length -->
 <g id="proc~~cmp_elem~~CalledByGraph_node3" class="node">
-<title>proc~cmp_volume</title>
-<g id="a_proc~~cmp_elem~~CalledByGraph_node3"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-86 141,-86 141,-62 307,-62 307,-86"/>
-<text text-anchor="middle" x="224" y="-71.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<title>proc~cmp_length</title>
+<g id="a_proc~~cmp_elem~~CalledByGraph_node3"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
+<polygon fill="#d9534f" stroke="#d9534f" points="285,-44 135,-44 135,-20 285,-20 285,-44"/>
+<text text-anchor="middle" x="210" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem -->
+<!-- proc~cmp_length&#45;&gt;proc~cmp_elem -->
 <g id="proc~~cmp_elem~~CalledByGraph_edge2" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0000" d="M307.09,-78.33C355.96,-79.91 419.14,-80.21 475,-75 490.85,-73.52 507.8,-70.88 523.58,-67.97"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="524.59,-71.34 533.76,-66.02 523.28,-64.46 524.59,-71.34"/>
+<title>proc~cmp_length&#45;&gt;proc~cmp_elem</title>
+<path fill="none" stroke="#ff0000" d="M285.26,-32.77C297.21,-32.86 309.45,-32.95 321,-33 375.22,-33.25 388.78,-33.25 443,-33 451.31,-32.96 459.98,-32.9 468.63,-32.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="468.78,-36.34 478.75,-32.76 468.72,-29.34 468.78,-36.34"/>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~cmp_elem~~CalledByGraph_edge4" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.13,-65.02C315.64,-64.09 324.26,-63.15 332.7,-62.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="333.31,-65.68 342.87,-61.12 332.54,-58.73 333.31,-65.68"/>
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
+<g id="proc~~cmp_elem~~CalledByGraph_edge3" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M285.07,-23.29C293.59,-22.28 302.27,-21.26 310.74,-20.27"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="311.43,-23.71 320.95,-19.06 310.61,-16.76 311.43,-23.71"/>
 </g>
-<!-- program~example3_volume -->
+<!-- program~compute_length -->
 <g id="proc~~cmp_elem~~CalledByGraph_node4" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~cmp_elem~~CalledByGraph_node4"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="464,-24 354,-24 354,0 464,0 464,-24"/>
-<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
-</a>
-</g>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~cmp_elem -->
-<g id="proc~~cmp_elem~~CalledByGraph_edge3" class="edge">
-<title>program~example3_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0000" d="M460.58,-24.04C480.98,-28.89 504.69,-34.53 526,-39.6"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="525.38,-43.05 535.91,-41.96 527,-36.24 525.38,-43.05"/>
-</g>
-<!-- program~compute_volume -->
-<g id="proc~~cmp_elem~~CalledByGraph_node5" class="node">
-<title>program~compute_volume</title>
-<g id="a_proc~~cmp_elem~~CalledByGraph_node5"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-86 0,-86 0,-62 105,-62 105,-86"/>
-<text text-anchor="middle" x="52.5" y="-71.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<title>program~compute_length</title>
+<g id="a_proc~~cmp_elem~~CalledByGraph_node4"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-44 0,-44 0,-20 99,-20 99,-44"/>
+<text text-anchor="middle" x="49.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
-<g id="proc~~cmp_elem~~CalledByGraph_edge5" class="edge">
-<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#00ff00" d="M105.28,-74C113.39,-74 121.99,-74 130.69,-74"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="130.93,-77.5 140.93,-74 130.93,-70.5 130.93,-77.5"/>
+<!-- program~compute_length&#45;&gt;proc~cmp_length -->
+<g id="proc~~cmp_elem~~CalledByGraph_edge4" class="edge">
+<title>program~compute_length&#45;&gt;proc~cmp_length</title>
+<path fill="none" stroke="#00ffff" d="M99.35,-32C107.46,-32 116.06,-32 124.75,-32"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="124.96,-35.5 134.96,-32 124.96,-28.5 124.96,-35.5"/>
 </g>
 </g>
 </svg>
-</div>                <script>
-                  var panproccmp_elemCalledByGraph = svgPanZoom('#proccmp_elemCalledByGraph',
-                    {zoomEnabled: true, controlIconsEnabled: true, fit: true, center: true,}
-                  );
-                </script>          <div>
+</div>          <div>
             <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
           </div>
           <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
@@ -662,7 +643,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elem_xc_vis.html b/proc/cmp_elem_xc_vis.html
index c26472a13..1ee3f2e01 100644
--- a/proc/cmp_elem_xc_vis.html
+++ b/proc/cmp_elem_xc_vis.html
@@ -83,15 +83,15 @@ <h1>cmp_elem_Xc_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_elem_Xc_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function cmp_elem_Xc_vis(this, p) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
         <tr>
             <td>
               <span class="anchor" id="variable-this~23"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -177,11 +177,11 @@ <h3>Arguments</h3>
               integer,
             </td>
 <td>intent(in),</td>
-              <td>optional,</td>            <td>
-              contiguous
+              <td>optional</td>            <td>
+              
             </td>
             <td>::</td>
-            <td><strong>p</strong>(:)</td>
+            <td><strong>p</strong></td>
             <td>
                 
             </td>
@@ -208,76 +208,76 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elem_xc_vis~~CallsGraph Pages: 1 -->
-<svg id="proccmp_elem_xc_visCallsGraph" width="486pt" height="116pt"
- viewBox="0.00 0.00 486.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="proccmp_elem_xc_visCallsGraph" width="476pt" height="116pt"
+ viewBox="0.00 0.00 476.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~cmp_elem_xc_vis~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
 <title>proc~~cmp_elem_xc_vis~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 482,-112 482,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 472,-112 472,4 -4,4"/>
 <!-- proc~cmp_elem_xc_vis -->
 <g id="proc~~cmp_elem_xc_vis~~CallsGraph_node1" class="node">
 <title>proc~cmp_elem_xc_vis</title>
-<polygon fill="none" stroke="black" points="191,-66 0,-66 0,-42 191,-42 191,-66"/>
-<text text-anchor="middle" x="95.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_elem_Xc_vis</text>
+<polygon fill="none" stroke="black" points="181,-66 0,-66 0,-42 181,-42 181,-66"/>
+<text text-anchor="middle" x="90.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_elem_Xc_vis</text>
 </g>
 <!-- interface~elemconn_c0 -->
 <g id="proc~~cmp_elem_xc_vis~~CallsGraph_node2" class="node">
 <title>interface~elemconn_c0</title>
 <g id="a_proc~~cmp_elem_xc_vis~~CallsGraph_node2"><a xlink:href="../interface/elemconn_c0.html" xlink:title="elemConn_C0">
-<polygon fill="#a7506f" stroke="#a7506f" points="314,-66 227,-66 227,-42 314,-42 314,-66"/>
-<text text-anchor="middle" x="270.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="304,-66 217,-66 217,-42 304,-42 304,-66"/>
+<text text-anchor="middle" x="260.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elem_xc_vis~~CallsGraph_edge1" class="edge">
 <title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M191.1,-54C199.86,-54 208.51,-54 216.69,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="216.76,-57.5 226.76,-54 216.76,-50.5 216.76,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M181.4,-54C190.07,-54 198.65,-54 206.78,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="206.8,-57.5 216.8,-54 206.8,-50.5 206.8,-57.5"/>
 </g>
 <!-- proc~cmp_elemconn_c0_l -->
 <g id="proc~~cmp_elem_xc_vis~~CallsGraph_node3" class="node">
 <title>proc~cmp_elemconn_c0_l</title>
 <g id="a_proc~~cmp_elem_xc_vis~~CallsGraph_node3"><a xlink:href="../proc/cmp_elemconn_c0_l.html" xlink:title="cmp_elemConn_C0_L">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="477.5,-108 350.5,-108 350.5,-84 477.5,-84 477.5,-108"/>
-<text text-anchor="middle" x="414" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="467.5,-108 340.5,-108 340.5,-84 467.5,-84 467.5,-108"/>
+<text text-anchor="middle" x="404" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l -->
 <g id="proc~~cmp_elem_xc_vis~~CallsGraph_edge2" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M312.05,-66.04C327.74,-70.69 345.87,-76.07 362.4,-80.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="361.86,-84.47 372.45,-83.96 363.86,-77.76 361.86,-84.47"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M302.05,-66.04C317.74,-70.69 335.87,-76.07 352.4,-80.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="351.86,-84.47 362.45,-83.96 353.86,-77.76 351.86,-84.47"/>
 </g>
 <!-- proc~cmp_elemconn_c0_s -->
 <g id="proc~~cmp_elem_xc_vis~~CallsGraph_node4" class="node">
 <title>proc~cmp_elemconn_c0_s</title>
 <g id="a_proc~~cmp_elem_xc_vis~~CallsGraph_node4"><a xlink:href="../proc/cmp_elemconn_c0_s.html" xlink:title="cmp_elemConn_C0_S">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="477.5,-66 350.5,-66 350.5,-42 477.5,-42 477.5,-66"/>
-<text text-anchor="middle" x="414" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="467.5,-66 340.5,-66 340.5,-42 467.5,-42 467.5,-66"/>
+<text text-anchor="middle" x="404" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s -->
 <g id="proc~~cmp_elem_xc_vis~~CallsGraph_edge3" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M314.34,-54C322.61,-54 331.49,-54 340.41,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="340.47,-57.5 350.47,-54 340.47,-50.5 340.47,-57.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M304.34,-54C312.61,-54 321.49,-54 330.41,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="330.47,-57.5 340.47,-54 330.47,-50.5 330.47,-57.5"/>
 </g>
 <!-- proc~cmp_elemconn_c0_v -->
 <g id="proc~~cmp_elem_xc_vis~~CallsGraph_node5" class="node">
 <title>proc~cmp_elemconn_c0_v</title>
 <g id="a_proc~~cmp_elem_xc_vis~~CallsGraph_node5"><a xlink:href="../proc/cmp_elemconn_c0_v.html" xlink:title="cmp_elemConn_C0_V">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="478,-24 350,-24 350,0 478,0 478,-24"/>
-<text text-anchor="middle" x="414" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="468,-24 340,-24 340,0 468,0 468,-24"/>
+<text text-anchor="middle" x="404" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v -->
 <g id="proc~~cmp_elem_xc_vis~~CallsGraph_edge4" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M312.05,-41.96C327.74,-37.31 345.87,-31.93 362.4,-27.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="363.86,-30.24 372.45,-24.04 361.86,-23.53 363.86,-30.24"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M302.05,-41.96C317.74,-37.31 335.87,-31.93 352.4,-27.02"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="353.86,-30.24 362.45,-24.04 351.86,-23.53 353.86,-30.24"/>
 </g>
 </g>
 </svg>
@@ -373,136 +373,106 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elem_xc_vis~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_elem_xc_visCalledByGraph" width="560pt" height="284pt"
- viewBox="0.00 0.00 560.00 284.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_elem_xc_vis~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 280)">
+<svg id="proccmp_elem_xc_visCalledByGraph" width="530pt" height="200pt"
+ viewBox="0.00 0.00 530.00 200.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_elem_xc_vis~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 196)">
 <title>proc~~cmp_elem_xc_vis~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-280 556,-280 556,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-196 526,-196 526,4 -4,4"/>
 <!-- proc~cmp_elem_xc_vis -->
 <g id="proc~~cmp_elem_xc_vis~~CalledByGraph_node1" class="node">
 <title>proc~cmp_elem_xc_vis</title>
-<polygon fill="none" stroke="black" points="552,-150 361,-150 361,-126 552,-126 552,-150"/>
-<text text-anchor="middle" x="456.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_elem_Xc_vis</text>
+<polygon fill="none" stroke="black" points="522,-108 341,-108 341,-84 522,-84 522,-108"/>
+<text text-anchor="middle" x="431.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_elem_Xc_vis</text>
 </g>
 <!-- proc~export_xc -->
 <g id="proc~~cmp_elem_xc_vis~~CalledByGraph_node2" class="node">
 <title>proc~export_xc</title>
-<g id="a_proc~~cmp_elem_xc_vis~~CalledByGraph_node2"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_volume%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="325,-150 175,-150 175,-126 325,-126 325,-150"/>
-<text text-anchor="middle" x="250" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
+<g id="a_proc~~cmp_elem_xc_vis~~CalledByGraph_node2"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_curve%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="305,-108 165,-108 165,-84 305,-84 305,-108"/>
+<text text-anchor="middle" x="235" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
 <g id="proc~~cmp_elem_xc_vis~~CalledByGraph_edge1" class="edge">
 <title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
-<path fill="none" stroke="#ff0000" d="M325.12,-138C333.42,-138 341.98,-138 350.57,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="350.66,-141.5 360.66,-138 350.66,-134.5 350.66,-141.5"/>
+<path fill="none" stroke="#ff0000" d="M305.12,-96C313.44,-96 322.06,-96 330.71,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="330.85,-99.5 340.85,-96 330.85,-92.5 330.85,-99.5"/>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example1_curve -->
 <g id="proc~~cmp_elem_xc_vis~~CalledByGraph_node3" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~cmp_elem_xc_vis~~CalledByGraph_node3"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-276 14.5,-276 14.5,-252 124.5,-252 124.5,-276"/>
-<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~cmp_elem_xc_vis~~CalledByGraph_node3"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-192 14.5,-192 14.5,-168 114.5,-168 114.5,-192"/>
+<text text-anchor="middle" x="64.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~export_xc -->
+<!-- program~example1_curve&#45;&gt;proc~export_xc -->
 <g id="proc~~cmp_elem_xc_vis~~CalledByGraph_edge2" class="edge">
-<title>program~example3_volume&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M119.96,-251.89C126.57,-249.4 133.1,-246.46 139,-243 177.55,-220.42 213.2,-181.81 232.94,-158.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="235.83,-160.23 239.47,-150.28 230.42,-155.79 235.83,-160.23"/>
+<title>program~example1_curve&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M106.33,-167.98C113.98,-165.32 121.82,-162.29 129,-159 157.11,-146.11 187.18,-127.53 207.9,-113.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="210.07,-116.64 216.45,-108.18 206.19,-110.82 210.07,-116.64"/>
 </g>
-<!-- program~example_nurbs_volume -->
+<!-- program~example_nurbs_curve -->
 <g id="proc~~cmp_elem_xc_vis~~CalledByGraph_node4" class="node">
-<title>program~example_nurbs_volume</title>
-<g id="a_proc~~cmp_elem_xc_vis~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-234 0,-234 0,-210 139,-210 139,-234"/>
-<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<title>program~example_nurbs_curve</title>
+<g id="a_proc~~cmp_elem_xc_vis~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129,-150 0,-150 0,-126 129,-126 129,-150"/>
+<text text-anchor="middle" x="64.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~export_xc -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~export_xc -->
 <g id="proc~~cmp_elem_xc_vis~~CalledByGraph_edge3" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M114.88,-209.98C123.02,-207.33 131.35,-204.31 139,-201 168.69,-188.14 200.55,-169.28 222.3,-155.54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="224.43,-158.34 230.97,-150.01 220.66,-152.44 224.43,-158.34"/>
+<title>program~example_nurbs_curve&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M113.79,-125.96C133.17,-121.13 155.69,-115.52 175.96,-110.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="176.85,-113.85 185.71,-108.04 175.16,-107.06 176.85,-113.85"/>
 </g>
-<!-- program~example_put_to_nurbs -->
+<!-- program~shape_c_1d -->
 <g id="proc~~cmp_elem_xc_vis~~CalledByGraph_node5" class="node">
-<title>program~example_put_to_nurbs</title>
-<g id="a_proc~~cmp_elem_xc_vis~~CalledByGraph_node5"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-192 3.5,-192 3.5,-168 135.5,-168 135.5,-192"/>
-<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
+<title>program~shape_c_1d</title>
+<g id="a_proc~~cmp_elem_xc_vis~~CalledByGraph_node5"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102.5,-108 26.5,-108 26.5,-84 102.5,-84 102.5,-108"/>
+<text text-anchor="middle" x="64.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xc -->
+<!-- program~shape_c_1d&#45;&gt;proc~export_xc -->
 <g id="proc~~cmp_elem_xc_vis~~CalledByGraph_edge4" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M121.65,-167.96C142.38,-163.09 166.48,-157.42 188.1,-152.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="188.91,-155.73 197.84,-150.04 187.31,-148.92 188.91,-155.73"/>
+<title>program~shape_c_1d&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M102.9,-96C118.28,-96 136.71,-96 154.83,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="154.84,-99.5 164.84,-96 154.84,-92.5 154.84,-99.5"/>
 </g>
-<!-- program~shape_c_3d -->
+<!-- program~shape_circle -->
 <g id="proc~~cmp_elem_xc_vis~~CalledByGraph_node6" class="node">
-<title>program~shape_c_3d</title>
-<g id="a_proc~~cmp_elem_xc_vis~~CalledByGraph_node6"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
-<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<title>program~shape_circle</title>
+<g id="a_proc~~cmp_elem_xc_vis~~CalledByGraph_node6"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="104,-66 25,-66 25,-42 104,-42 104,-66"/>
+<text text-anchor="middle" x="64.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~export_xc -->
+<!-- program~shape_circle&#45;&gt;proc~export_xc -->
 <g id="proc~~cmp_elem_xc_vis~~CalledByGraph_edge5" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M107.92,-138C124.54,-138 144.82,-138 164.77,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="164.83,-141.5 174.83,-138 164.83,-134.5 164.83,-141.5"/>
+<title>program~shape_circle&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M104.16,-63.64C125.33,-68.91 151.99,-75.56 175.64,-81.45"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="175.02,-84.91 185.57,-83.93 176.71,-78.11 175.02,-84.91"/>
 </g>
-<!-- program~shape_half_ring_3d -->
+<!-- program~shape_half_circle -->
 <g id="proc~~cmp_elem_xc_vis~~CalledByGraph_node7" class="node">
-<title>program~shape_half_ring_3d</title>
-<g id="a_proc~~cmp_elem_xc_vis~~CalledByGraph_node7"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
-<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<title>program~shape_half_circle</title>
+<g id="a_proc~~cmp_elem_xc_vis~~CalledByGraph_node7"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116.5,-24 12.5,-24 12.5,0 116.5,0 116.5,-24"/>
+<text text-anchor="middle" x="64.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xc -->
+<!-- program~shape_half_circle&#45;&gt;proc~export_xc -->
 <g id="proc~~cmp_elem_xc_vis~~CalledByGraph_edge6" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M121.65,-108.04C142.38,-112.91 166.48,-118.58 188.1,-123.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="187.31,-127.08 197.84,-125.96 188.91,-120.27 187.31,-127.08"/>
-</g>
-<!-- program~shape_hexahedron -->
-<g id="proc~~cmp_elem_xc_vis~~CalledByGraph_node8" class="node">
-<title>program~shape_hexahedron</title>
-<g id="a_proc~~cmp_elem_xc_vis~~CalledByGraph_node8"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-66 13,-66 13,-42 126,-42 126,-66"/>
-<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
-</a>
-</g>
-</g>
-<!-- program~shape_hexahedron&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elem_xc_vis~~CalledByGraph_edge7" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M114.88,-66.02C123.02,-68.67 131.35,-71.69 139,-75 168.69,-87.86 200.55,-106.72 222.3,-120.46"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="220.66,-123.56 230.97,-125.99 224.43,-117.66 220.66,-123.56"/>
-</g>
-<!-- program~shape_ring_3d -->
-<g id="proc~~cmp_elem_xc_vis~~CalledByGraph_node9" class="node">
-<title>program~shape_ring_3d</title>
-<g id="a_proc~~cmp_elem_xc_vis~~CalledByGraph_node9"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-24 24.5,-24 24.5,0 114.5,0 114.5,-24"/>
-<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_ring_3d&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elem_xc_vis~~CalledByGraph_edge8" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M114.54,-22.18C122.96,-25.04 131.49,-28.6 139,-33 177.55,-55.58 213.2,-94.19 232.94,-117.77"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="230.42,-120.21 239.47,-125.72 235.83,-115.77 230.42,-120.21"/>
+<title>program~shape_half_circle&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M106.33,-24.02C113.98,-26.68 121.82,-29.71 129,-33 157.11,-45.89 187.18,-64.47 207.9,-78.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="206.19,-81.18 216.45,-83.82 210.07,-75.36 206.19,-81.18"/>
 </g>
 </g>
 </svg>
@@ -618,7 +588,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elem_xc_vis~2.html b/proc/cmp_elem_xc_vis~2.html
index cf9a3e78a..fc2ee41a6 100644
--- a/proc/cmp_elem_xc_vis~2.html
+++ b/proc/cmp_elem_xc_vis~2.html
@@ -83,15 +83,15 @@ <h1>cmp_elem_Xc_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_elem_Xc_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function cmp_elem_Xc_vis(this, p) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~91"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~84"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -191,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-elemconn~18"></span>
+          <span class="anchor" id="variable-elemconn~14"></span>
           integer, allocatable, (:,:)
         </small>
       </h3>
@@ -217,7 +217,7 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~cmp_elem_xc_vis~2~~CallsGraph_node1" class="node">
 <title>proc~cmp_elem_xc_vis~2</title>
 <polygon fill="none" stroke="black" points="191,-66 0,-66 0,-42 191,-42 191,-66"/>
-<text text-anchor="middle" x="95.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_elem_Xc_vis</text>
+<text text-anchor="middle" x="95.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_elem_Xc_vis</text>
 </g>
 <!-- interface~elemconn_c0 -->
 <g id="proc~~cmp_elem_xc_vis~2~~CallsGraph_node2" class="node">
@@ -373,121 +373,136 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elem_xc_vis~2~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_elem_xc_vis2CalledByGraph" width="560pt" height="242pt"
- viewBox="0.00 0.00 560.00 242.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 238)">
+<svg id="proccmp_elem_xc_vis2CalledByGraph" width="560pt" height="284pt"
+ viewBox="0.00 0.00 560.00 284.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 280)">
 <title>proc~~cmp_elem_xc_vis~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-238 556,-238 556,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-280 556,-280 556,4 -4,4"/>
 <!-- proc~cmp_elem_xc_vis~2 -->
 <g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph_node1" class="node">
 <title>proc~cmp_elem_xc_vis~2</title>
-<polygon fill="none" stroke="black" points="552,-129 361,-129 361,-105 552,-105 552,-129"/>
-<text text-anchor="middle" x="456.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_elem_Xc_vis</text>
+<polygon fill="none" stroke="black" points="552,-150 361,-150 361,-126 552,-126 552,-150"/>
+<text text-anchor="middle" x="456.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_elem_Xc_vis</text>
 </g>
 <!-- proc~export_xc~2 -->
 <g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph_node2" class="node">
 <title>proc~export_xc~2</title>
-<g id="a_proc~~cmp_elem_xc_vis~2~~CalledByGraph_node2"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_surface%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="325,-129 175,-129 175,-105 325,-105 325,-129"/>
-<text text-anchor="middle" x="250" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
+<g id="a_proc~~cmp_elem_xc_vis~2~~CalledByGraph_node2"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_volume%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="325,-150 175,-150 175,-126 325,-126 325,-150"/>
+<text text-anchor="middle" x="250" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
 <g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph_edge1" class="edge">
 <title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
-<path fill="none" stroke="#ff0000" d="M325.12,-117C333.42,-117 341.98,-117 350.57,-117"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="350.66,-120.5 360.66,-117 350.66,-113.5 350.66,-120.5"/>
+<path fill="none" stroke="#ff0000" d="M325.12,-138C333.42,-138 341.98,-138 350.57,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="350.66,-141.5 360.66,-138 350.66,-134.5 350.66,-141.5"/>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph_node3" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~cmp_elem_xc_vis~2~~CalledByGraph_node3"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-234 14.5,-234 14.5,-210 124.5,-210 124.5,-234"/>
-<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<title>program~example3_volume</title>
+<g id="a_proc~~cmp_elem_xc_vis~2~~CalledByGraph_node3"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-276 14.5,-276 14.5,-252 124.5,-252 124.5,-276"/>
+<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~export_xc~2 -->
+<!-- program~example3_volume&#45;&gt;proc~export_xc~2 -->
 <g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph_edge2" class="edge">
-<title>program~example3_surface&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M117.8,-209.92C125.07,-207.38 132.36,-204.41 139,-201 173.15,-183.45 207.52,-155.08 228.54,-136.24"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="231.13,-138.61 236.17,-129.28 226.42,-133.43 231.13,-138.61"/>
+<title>program~example3_volume&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0000" d="M119.96,-251.89C126.57,-249.4 133.1,-246.46 139,-243 177.55,-220.42 213.2,-181.81 232.94,-158.23"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="235.83,-160.23 239.47,-150.28 230.42,-155.79 235.83,-160.23"/>
 </g>
-<!-- program~example_nurbs_surface -->
+<!-- program~example_nurbs_volume -->
 <g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph_node4" class="node">
-<title>program~example_nurbs_surface</title>
-<g id="a_proc~~cmp_elem_xc_vis~2~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-192 0,-192 0,-168 139,-168 139,-192"/>
-<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<title>program~example_nurbs_volume</title>
+<g id="a_proc~~cmp_elem_xc_vis~2~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-234 0,-234 0,-210 139,-210 139,-234"/>
+<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~export_xc~2 -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~export_xc~2 -->
 <g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph_edge3" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M111.58,-167.9C120.65,-165.09 130.18,-162.03 139,-159 162.53,-150.91 188.55,-141.02 209.38,-132.87"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="210.83,-136.06 218.85,-129.14 208.26,-129.54 210.83,-136.06"/>
+<title>program~example_nurbs_volume&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0000" d="M114.88,-209.98C123.02,-207.33 131.35,-204.31 139,-201 168.69,-188.14 200.55,-169.28 222.3,-155.54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="224.43,-158.34 230.97,-150.01 220.66,-152.44 224.43,-158.34"/>
 </g>
-<!-- program~shape_c_2d -->
+<!-- program~example_put_to_nurbs -->
 <g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph_node5" class="node">
-<title>program~shape_c_2d</title>
-<g id="a_proc~~cmp_elem_xc_vis~2~~CalledByGraph_node5"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
-<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+<title>program~example_put_to_nurbs</title>
+<g id="a_proc~~cmp_elem_xc_vis~2~~CalledByGraph_node5"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-192 3.5,-192 3.5,-168 135.5,-168 135.5,-192"/>
+<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~export_xc~2 -->
+<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xc~2 -->
 <g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph_edge4" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M107.92,-133.6C124.54,-131.64 144.82,-129.26 164.77,-126.91"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="165.31,-130.37 174.83,-125.73 164.49,-123.42 165.31,-130.37"/>
+<title>program~example_put_to_nurbs&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0000" d="M121.65,-167.96C142.38,-163.09 166.48,-157.42 188.1,-152.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="188.91,-155.73 197.84,-150.04 187.31,-148.92 188.91,-155.73"/>
 </g>
-<!-- program~shape_half_ring_2d -->
+<!-- program~shape_c_3d -->
 <g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph_node6" class="node">
-<title>program~shape_half_ring_2d</title>
-<g id="a_proc~~cmp_elem_xc_vis~2~~CalledByGraph_node6"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
-<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+<title>program~shape_c_3d</title>
+<g id="a_proc~~cmp_elem_xc_vis~2~~CalledByGraph_node6"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
+<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xc~2 -->
+<!-- program~shape_c_3d&#45;&gt;proc~export_xc~2 -->
 <g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph_edge5" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M127.47,-102.7C139.38,-104.1 152.19,-105.61 164.85,-107.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="164.62,-110.6 174.96,-108.29 165.44,-103.64 164.62,-110.6"/>
+<title>program~shape_c_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0000" d="M107.92,-138C124.54,-138 144.82,-138 164.77,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="164.83,-141.5 174.83,-138 164.83,-134.5 164.83,-141.5"/>
 </g>
-<!-- program~shape_ring_2d -->
+<!-- program~shape_half_ring_3d -->
 <g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph_node7" class="node">
-<title>program~shape_ring_2d</title>
-<g id="a_proc~~cmp_elem_xc_vis~2~~CalledByGraph_node7"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-66 24.5,-66 24.5,-42 114.5,-42 114.5,-66"/>
-<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+<title>program~shape_half_ring_3d</title>
+<g id="a_proc~~cmp_elem_xc_vis~2~~CalledByGraph_node7"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
+<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~export_xc~2 -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xc~2 -->
 <g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph_edge6" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M111.58,-66.1C120.65,-68.91 130.18,-71.97 139,-75 162.53,-83.09 188.55,-92.98 209.38,-101.13"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="208.26,-104.46 218.85,-104.86 210.83,-97.94 208.26,-104.46"/>
+<title>program~shape_half_ring_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0000" d="M121.65,-108.04C142.38,-112.91 166.48,-118.58 188.1,-123.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="187.31,-127.08 197.84,-125.96 188.91,-120.27 187.31,-127.08"/>
 </g>
-<!-- program~shape_tetragon -->
+<!-- program~shape_hexahedron -->
 <g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph_node8" class="node">
-<title>program~shape_tetragon</title>
-<g id="a_proc~~cmp_elem_xc_vis~2~~CalledByGraph_node8"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-24 21.5,-24 21.5,0 117.5,0 117.5,-24"/>
-<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<title>program~shape_hexahedron</title>
+<g id="a_proc~~cmp_elem_xc_vis~2~~CalledByGraph_node8"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-66 13,-66 13,-42 126,-42 126,-66"/>
+<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~export_xc~2 -->
+<!-- program~shape_hexahedron&#45;&gt;proc~export_xc~2 -->
 <g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph_edge7" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M117.8,-24.08C125.07,-26.62 132.36,-29.59 139,-33 173.15,-50.55 207.52,-78.92 228.54,-97.76"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="226.42,-100.57 236.17,-104.72 231.13,-95.39 226.42,-100.57"/>
+<title>program~shape_hexahedron&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0000" d="M114.88,-66.02C123.02,-68.67 131.35,-71.69 139,-75 168.69,-87.86 200.55,-106.72 222.3,-120.46"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="220.66,-123.56 230.97,-125.99 224.43,-117.66 220.66,-123.56"/>
+</g>
+<!-- program~shape_ring_3d -->
+<g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph_node9" class="node">
+<title>program~shape_ring_3d</title>
+<g id="a_proc~~cmp_elem_xc_vis~2~~CalledByGraph_node9"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-24 24.5,-24 24.5,0 114.5,0 114.5,-24"/>
+<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_ring_3d&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elem_xc_vis~2~~CalledByGraph_edge8" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0000" d="M114.54,-22.18C122.96,-25.04 131.49,-28.6 139,-33 177.55,-55.58 213.2,-94.19 232.94,-117.77"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="230.42,-120.21 239.47,-125.72 235.83,-115.77 230.42,-120.21"/>
 </g>
 </g>
 </svg>
@@ -603,7 +618,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elem_xc_vis~3.html b/proc/cmp_elem_xc_vis~3.html
index 6300db4a6..d79cda1e0 100644
--- a/proc/cmp_elem_xc_vis~3.html
+++ b/proc/cmp_elem_xc_vis~3.html
@@ -83,15 +83,15 @@ <h1>cmp_elem_Xc_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_elem_Xc_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function cmp_elem_Xc_vis(this, p) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~154"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~152"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -177,11 +177,11 @@ <h3>Arguments</h3>
               integer,
             </td>
 <td>intent(in),</td>
-              <td>optional</td>            <td>
-              
+              <td>optional,</td>            <td>
+              contiguous
             </td>
             <td>::</td>
-            <td><strong>p</strong></td>
+            <td><strong>p</strong>(:)</td>
             <td>
                 
             </td>
@@ -208,76 +208,76 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elem_xc_vis~3~~CallsGraph Pages: 1 -->
-<svg id="proccmp_elem_xc_vis3CallsGraph" width="476pt" height="116pt"
- viewBox="0.00 0.00 476.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="proccmp_elem_xc_vis3CallsGraph" width="486pt" height="116pt"
+ viewBox="0.00 0.00 486.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~cmp_elem_xc_vis~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
 <title>proc~~cmp_elem_xc_vis~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 472,-112 472,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 482,-112 482,4 -4,4"/>
 <!-- proc~cmp_elem_xc_vis~3 -->
 <g id="proc~~cmp_elem_xc_vis~3~~CallsGraph_node1" class="node">
 <title>proc~cmp_elem_xc_vis~3</title>
-<polygon fill="none" stroke="black" points="181,-66 0,-66 0,-42 181,-42 181,-66"/>
-<text text-anchor="middle" x="90.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_elem_Xc_vis</text>
+<polygon fill="none" stroke="black" points="191,-66 0,-66 0,-42 191,-42 191,-66"/>
+<text text-anchor="middle" x="95.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_elem_Xc_vis</text>
 </g>
 <!-- interface~elemconn_c0 -->
 <g id="proc~~cmp_elem_xc_vis~3~~CallsGraph_node2" class="node">
 <title>interface~elemconn_c0</title>
 <g id="a_proc~~cmp_elem_xc_vis~3~~CallsGraph_node2"><a xlink:href="../interface/elemconn_c0.html" xlink:title="elemConn_C0">
-<polygon fill="#a7506f" stroke="#a7506f" points="304,-66 217,-66 217,-42 304,-42 304,-66"/>
-<text text-anchor="middle" x="260.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="314,-66 227,-66 227,-42 314,-42 314,-66"/>
+<text text-anchor="middle" x="270.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elem_xc_vis~3~~CallsGraph_edge1" class="edge">
 <title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M181.4,-54C190.07,-54 198.65,-54 206.78,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="206.8,-57.5 216.8,-54 206.8,-50.5 206.8,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M191.1,-54C199.86,-54 208.51,-54 216.69,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="216.76,-57.5 226.76,-54 216.76,-50.5 216.76,-57.5"/>
 </g>
 <!-- proc~cmp_elemconn_c0_l -->
 <g id="proc~~cmp_elem_xc_vis~3~~CallsGraph_node3" class="node">
 <title>proc~cmp_elemconn_c0_l</title>
 <g id="a_proc~~cmp_elem_xc_vis~3~~CallsGraph_node3"><a xlink:href="../proc/cmp_elemconn_c0_l.html" xlink:title="cmp_elemConn_C0_L">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="467.5,-108 340.5,-108 340.5,-84 467.5,-84 467.5,-108"/>
-<text text-anchor="middle" x="404" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="477.5,-108 350.5,-108 350.5,-84 477.5,-84 477.5,-108"/>
+<text text-anchor="middle" x="414" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l -->
 <g id="proc~~cmp_elem_xc_vis~3~~CallsGraph_edge2" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M302.05,-66.04C317.74,-70.69 335.87,-76.07 352.4,-80.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="351.86,-84.47 362.45,-83.96 353.86,-77.76 351.86,-84.47"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M312.05,-66.04C327.74,-70.69 345.87,-76.07 362.4,-80.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="361.86,-84.47 372.45,-83.96 363.86,-77.76 361.86,-84.47"/>
 </g>
 <!-- proc~cmp_elemconn_c0_s -->
 <g id="proc~~cmp_elem_xc_vis~3~~CallsGraph_node4" class="node">
 <title>proc~cmp_elemconn_c0_s</title>
 <g id="a_proc~~cmp_elem_xc_vis~3~~CallsGraph_node4"><a xlink:href="../proc/cmp_elemconn_c0_s.html" xlink:title="cmp_elemConn_C0_S">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="467.5,-66 340.5,-66 340.5,-42 467.5,-42 467.5,-66"/>
-<text text-anchor="middle" x="404" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="477.5,-66 350.5,-66 350.5,-42 477.5,-42 477.5,-66"/>
+<text text-anchor="middle" x="414" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s -->
 <g id="proc~~cmp_elem_xc_vis~3~~CallsGraph_edge3" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M304.34,-54C312.61,-54 321.49,-54 330.41,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="330.47,-57.5 340.47,-54 330.47,-50.5 330.47,-57.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M314.34,-54C322.61,-54 331.49,-54 340.41,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="340.47,-57.5 350.47,-54 340.47,-50.5 340.47,-57.5"/>
 </g>
 <!-- proc~cmp_elemconn_c0_v -->
 <g id="proc~~cmp_elem_xc_vis~3~~CallsGraph_node5" class="node">
 <title>proc~cmp_elemconn_c0_v</title>
 <g id="a_proc~~cmp_elem_xc_vis~3~~CallsGraph_node5"><a xlink:href="../proc/cmp_elemconn_c0_v.html" xlink:title="cmp_elemConn_C0_V">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="468,-24 340,-24 340,0 468,0 468,-24"/>
-<text text-anchor="middle" x="404" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="478,-24 350,-24 350,0 478,0 478,-24"/>
+<text text-anchor="middle" x="414" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v -->
 <g id="proc~~cmp_elem_xc_vis~3~~CallsGraph_edge4" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M302.05,-41.96C317.74,-37.31 335.87,-31.93 352.4,-27.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="353.86,-30.24 362.45,-24.04 351.86,-23.53 353.86,-30.24"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M312.05,-41.96C327.74,-37.31 345.87,-31.93 362.4,-27.02"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="363.86,-30.24 372.45,-24.04 361.86,-23.53 363.86,-30.24"/>
 </g>
 </g>
 </svg>
@@ -373,106 +373,121 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elem_xc_vis~3~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_elem_xc_vis3CalledByGraph" width="530pt" height="200pt"
- viewBox="0.00 0.00 530.00 200.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_elem_xc_vis~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 196)">
+<svg id="proccmp_elem_xc_vis3CalledByGraph" width="560pt" height="242pt"
+ viewBox="0.00 0.00 560.00 242.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_elem_xc_vis~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 238)">
 <title>proc~~cmp_elem_xc_vis~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-196 526,-196 526,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-238 556,-238 556,4 -4,4"/>
 <!-- proc~cmp_elem_xc_vis~3 -->
 <g id="proc~~cmp_elem_xc_vis~3~~CalledByGraph_node1" class="node">
 <title>proc~cmp_elem_xc_vis~3</title>
-<polygon fill="none" stroke="black" points="522,-108 341,-108 341,-84 522,-84 522,-108"/>
-<text text-anchor="middle" x="431.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_elem_Xc_vis</text>
+<polygon fill="none" stroke="black" points="552,-129 361,-129 361,-105 552,-105 552,-129"/>
+<text text-anchor="middle" x="456.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_elem_Xc_vis</text>
 </g>
 <!-- proc~export_xc~3 -->
 <g id="proc~~cmp_elem_xc_vis~3~~CalledByGraph_node2" class="node">
 <title>proc~export_xc~3</title>
-<g id="a_proc~~cmp_elem_xc_vis~3~~CalledByGraph_node2"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_curve%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="305,-108 165,-108 165,-84 305,-84 305,-108"/>
-<text text-anchor="middle" x="235" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xc</text>
+<g id="a_proc~~cmp_elem_xc_vis~3~~CalledByGraph_node2"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_surface%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="325,-129 175,-129 175,-105 325,-105 325,-129"/>
+<text text-anchor="middle" x="250" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
 <g id="proc~~cmp_elem_xc_vis~3~~CalledByGraph_edge1" class="edge">
 <title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
-<path fill="none" stroke="#ff0000" d="M305.12,-96C313.44,-96 322.06,-96 330.71,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="330.85,-99.5 340.85,-96 330.85,-92.5 330.85,-99.5"/>
+<path fill="none" stroke="#ff0000" d="M325.12,-117C333.42,-117 341.98,-117 350.57,-117"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="350.66,-120.5 360.66,-117 350.66,-113.5 350.66,-120.5"/>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~cmp_elem_xc_vis~3~~CalledByGraph_node3" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~cmp_elem_xc_vis~3~~CalledByGraph_node3"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-192 14.5,-192 14.5,-168 114.5,-168 114.5,-192"/>
-<text text-anchor="middle" x="64.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~cmp_elem_xc_vis~3~~CalledByGraph_node3"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-234 14.5,-234 14.5,-210 124.5,-210 124.5,-234"/>
+<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~export_xc~3 -->
+<!-- program~example3_surface&#45;&gt;proc~export_xc~3 -->
 <g id="proc~~cmp_elem_xc_vis~3~~CalledByGraph_edge2" class="edge">
-<title>program~example1_curve&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M106.33,-167.98C113.98,-165.32 121.82,-162.29 129,-159 157.11,-146.11 187.18,-127.53 207.9,-113.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="210.07,-116.64 216.45,-108.18 206.19,-110.82 210.07,-116.64"/>
+<title>program~example3_surface&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M117.8,-209.92C125.07,-207.38 132.36,-204.41 139,-201 173.15,-183.45 207.52,-155.08 228.54,-136.24"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="231.13,-138.61 236.17,-129.28 226.42,-133.43 231.13,-138.61"/>
 </g>
-<!-- program~example_nurbs_curve -->
+<!-- program~example_nurbs_surface -->
 <g id="proc~~cmp_elem_xc_vis~3~~CalledByGraph_node4" class="node">
-<title>program~example_nurbs_curve</title>
-<g id="a_proc~~cmp_elem_xc_vis~3~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129,-150 0,-150 0,-126 129,-126 129,-150"/>
-<text text-anchor="middle" x="64.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<title>program~example_nurbs_surface</title>
+<g id="a_proc~~cmp_elem_xc_vis~3~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-192 0,-192 0,-168 139,-168 139,-192"/>
+<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~export_xc~3 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~export_xc~3 -->
 <g id="proc~~cmp_elem_xc_vis~3~~CalledByGraph_edge3" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M113.79,-125.96C133.17,-121.13 155.69,-115.52 175.96,-110.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="176.85,-113.85 185.71,-108.04 175.16,-107.06 176.85,-113.85"/>
+<title>program~example_nurbs_surface&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M111.58,-167.9C120.65,-165.09 130.18,-162.03 139,-159 162.53,-150.91 188.55,-141.02 209.38,-132.87"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="210.83,-136.06 218.85,-129.14 208.26,-129.54 210.83,-136.06"/>
 </g>
-<!-- program~shape_c_1d -->
+<!-- program~shape_c_2d -->
 <g id="proc~~cmp_elem_xc_vis~3~~CalledByGraph_node5" class="node">
-<title>program~shape_c_1d</title>
-<g id="a_proc~~cmp_elem_xc_vis~3~~CalledByGraph_node5"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102.5,-108 26.5,-108 26.5,-84 102.5,-84 102.5,-108"/>
-<text text-anchor="middle" x="64.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<title>program~shape_c_2d</title>
+<g id="a_proc~~cmp_elem_xc_vis~3~~CalledByGraph_node5"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
+<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~export_xc~3 -->
+<!-- program~shape_c_2d&#45;&gt;proc~export_xc~3 -->
 <g id="proc~~cmp_elem_xc_vis~3~~CalledByGraph_edge4" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M102.9,-96C118.28,-96 136.71,-96 154.83,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="154.84,-99.5 164.84,-96 154.84,-92.5 154.84,-99.5"/>
+<title>program~shape_c_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M107.92,-133.6C124.54,-131.64 144.82,-129.26 164.77,-126.91"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="165.31,-130.37 174.83,-125.73 164.49,-123.42 165.31,-130.37"/>
 </g>
-<!-- program~shape_circle -->
+<!-- program~shape_half_ring_2d -->
 <g id="proc~~cmp_elem_xc_vis~3~~CalledByGraph_node6" class="node">
-<title>program~shape_circle</title>
-<g id="a_proc~~cmp_elem_xc_vis~3~~CalledByGraph_node6"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="104,-66 25,-66 25,-42 104,-42 104,-66"/>
-<text text-anchor="middle" x="64.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<title>program~shape_half_ring_2d</title>
+<g id="a_proc~~cmp_elem_xc_vis~3~~CalledByGraph_node6"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
+<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~export_xc~3 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xc~3 -->
 <g id="proc~~cmp_elem_xc_vis~3~~CalledByGraph_edge5" class="edge">
-<title>program~shape_circle&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M104.16,-63.64C125.33,-68.91 151.99,-75.56 175.64,-81.45"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="175.02,-84.91 185.57,-83.93 176.71,-78.11 175.02,-84.91"/>
+<title>program~shape_half_ring_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M127.47,-102.7C139.38,-104.1 152.19,-105.61 164.85,-107.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="164.62,-110.6 174.96,-108.29 165.44,-103.64 164.62,-110.6"/>
 </g>
-<!-- program~shape_half_circle -->
+<!-- program~shape_ring_2d -->
 <g id="proc~~cmp_elem_xc_vis~3~~CalledByGraph_node7" class="node">
-<title>program~shape_half_circle</title>
-<g id="a_proc~~cmp_elem_xc_vis~3~~CalledByGraph_node7"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116.5,-24 12.5,-24 12.5,0 116.5,0 116.5,-24"/>
-<text text-anchor="middle" x="64.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<title>program~shape_ring_2d</title>
+<g id="a_proc~~cmp_elem_xc_vis~3~~CalledByGraph_node7"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-66 24.5,-66 24.5,-42 114.5,-42 114.5,-66"/>
+<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~export_xc~3 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~export_xc~3 -->
 <g id="proc~~cmp_elem_xc_vis~3~~CalledByGraph_edge6" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M106.33,-24.02C113.98,-26.68 121.82,-29.71 129,-33 157.11,-45.89 187.18,-64.47 207.9,-78.12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="206.19,-81.18 216.45,-83.82 210.07,-75.36 206.19,-81.18"/>
+<title>program~shape_ring_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M111.58,-66.1C120.65,-68.91 130.18,-71.97 139,-75 162.53,-83.09 188.55,-92.98 209.38,-101.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="208.26,-104.46 218.85,-104.86 210.83,-97.94 208.26,-104.46"/>
+</g>
+<!-- program~shape_tetragon -->
+<g id="proc~~cmp_elem_xc_vis~3~~CalledByGraph_node8" class="node">
+<title>program~shape_tetragon</title>
+<g id="a_proc~~cmp_elem_xc_vis~3~~CalledByGraph_node8"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-24 21.5,-24 21.5,0 117.5,0 117.5,-24"/>
+<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+</a>
+</g>
+</g>
+<!-- program~shape_tetragon&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elem_xc_vis~3~~CalledByGraph_edge7" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M117.8,-24.08C125.07,-26.62 132.36,-29.59 139,-33 173.15,-50.55 207.52,-78.92 228.54,-97.76"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="226.42,-100.57 236.17,-104.72 231.13,-95.39 226.42,-100.57"/>
 </g>
 </g>
 </svg>
@@ -588,7 +603,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elem_xg_vis.html b/proc/cmp_elem_xg_vis.html
index fae157501..a5ba8acf7 100644
--- a/proc/cmp_elem_xg_vis.html
+++ b/proc/cmp_elem_xg_vis.html
@@ -83,15 +83,15 @@ <h1>cmp_elem_Xg_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_elem_Xg_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function cmp_elem_Xg_vis(this, p) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
         <tr>
             <td>
               <span class="anchor" id="variable-this~24"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -177,11 +177,11 @@ <h3>Arguments</h3>
               integer,
             </td>
 <td>intent(in),</td>
-              <td>optional,</td>            <td>
-              contiguous
+              <td>optional</td>            <td>
+              
             </td>
             <td>::</td>
-            <td><strong>p</strong>(:)</td>
+            <td><strong>p</strong></td>
             <td>
                 
             </td>
@@ -208,76 +208,76 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elem_xg_vis~~CallsGraph Pages: 1 -->
-<svg id="proccmp_elem_xg_visCallsGraph" width="487pt" height="116pt"
- viewBox="0.00 0.00 487.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="proccmp_elem_xg_visCallsGraph" width="477pt" height="116pt"
+ viewBox="0.00 0.00 477.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~cmp_elem_xg_vis~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
 <title>proc~~cmp_elem_xg_vis~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 483,-112 483,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 473,-112 473,4 -4,4"/>
 <!-- proc~cmp_elem_xg_vis -->
 <g id="proc~~cmp_elem_xg_vis~~CallsGraph_node1" class="node">
 <title>proc~cmp_elem_xg_vis</title>
-<polygon fill="none" stroke="black" points="192,-66 0,-66 0,-42 192,-42 192,-66"/>
-<text text-anchor="middle" x="96" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_elem_Xg_vis</text>
+<polygon fill="none" stroke="black" points="182,-66 0,-66 0,-42 182,-42 182,-66"/>
+<text text-anchor="middle" x="91" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_elem_Xg_vis</text>
 </g>
 <!-- interface~elemconn_c0 -->
 <g id="proc~~cmp_elem_xg_vis~~CallsGraph_node2" class="node">
 <title>interface~elemconn_c0</title>
 <g id="a_proc~~cmp_elem_xg_vis~~CallsGraph_node2"><a xlink:href="../interface/elemconn_c0.html" xlink:title="elemConn_C0">
-<polygon fill="#a7506f" stroke="#a7506f" points="315,-66 228,-66 228,-42 315,-42 315,-66"/>
-<text text-anchor="middle" x="271.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="305,-66 218,-66 218,-42 305,-42 305,-66"/>
+<text text-anchor="middle" x="261.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elem_xg_vis~~CallsGraph_edge1" class="edge">
 <title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M192.13,-54C200.89,-54 209.55,-54 217.72,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="217.79,-57.5 227.79,-54 217.79,-50.5 217.79,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M182.17,-54C190.86,-54 199.47,-54 207.62,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="207.67,-57.5 217.67,-54 207.67,-50.5 207.67,-57.5"/>
 </g>
 <!-- proc~cmp_elemconn_c0_l -->
 <g id="proc~~cmp_elem_xg_vis~~CallsGraph_node3" class="node">
 <title>proc~cmp_elemconn_c0_l</title>
 <g id="a_proc~~cmp_elem_xg_vis~~CallsGraph_node3"><a xlink:href="../proc/cmp_elemconn_c0_l.html" xlink:title="cmp_elemConn_C0_L">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="478.5,-108 351.5,-108 351.5,-84 478.5,-84 478.5,-108"/>
-<text text-anchor="middle" x="415" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="468.5,-108 341.5,-108 341.5,-84 468.5,-84 468.5,-108"/>
+<text text-anchor="middle" x="405" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l -->
 <g id="proc~~cmp_elem_xg_vis~~CallsGraph_edge2" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M313.05,-66.04C328.74,-70.69 346.87,-76.07 363.4,-80.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="362.86,-84.47 373.45,-83.96 364.86,-77.76 362.86,-84.47"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M303.05,-66.04C318.74,-70.69 336.87,-76.07 353.4,-80.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="352.86,-84.47 363.45,-83.96 354.86,-77.76 352.86,-84.47"/>
 </g>
 <!-- proc~cmp_elemconn_c0_s -->
 <g id="proc~~cmp_elem_xg_vis~~CallsGraph_node4" class="node">
 <title>proc~cmp_elemconn_c0_s</title>
 <g id="a_proc~~cmp_elem_xg_vis~~CallsGraph_node4"><a xlink:href="../proc/cmp_elemconn_c0_s.html" xlink:title="cmp_elemConn_C0_S">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="478.5,-66 351.5,-66 351.5,-42 478.5,-42 478.5,-66"/>
-<text text-anchor="middle" x="415" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="468.5,-66 341.5,-66 341.5,-42 468.5,-42 468.5,-66"/>
+<text text-anchor="middle" x="405" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s -->
 <g id="proc~~cmp_elem_xg_vis~~CallsGraph_edge3" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M315.34,-54C323.61,-54 332.49,-54 341.41,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="341.47,-57.5 351.47,-54 341.47,-50.5 341.47,-57.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M305.34,-54C313.61,-54 322.49,-54 331.41,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="331.47,-57.5 341.47,-54 331.47,-50.5 331.47,-57.5"/>
 </g>
 <!-- proc~cmp_elemconn_c0_v -->
 <g id="proc~~cmp_elem_xg_vis~~CallsGraph_node5" class="node">
 <title>proc~cmp_elemconn_c0_v</title>
 <g id="a_proc~~cmp_elem_xg_vis~~CallsGraph_node5"><a xlink:href="../proc/cmp_elemconn_c0_v.html" xlink:title="cmp_elemConn_C0_V">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="479,-24 351,-24 351,0 479,0 479,-24"/>
-<text text-anchor="middle" x="415" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="469,-24 341,-24 341,0 469,0 469,-24"/>
+<text text-anchor="middle" x="405" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v -->
 <g id="proc~~cmp_elem_xg_vis~~CallsGraph_edge4" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M313.05,-41.96C328.74,-37.31 346.87,-31.93 363.4,-27.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="364.86,-30.24 373.45,-24.04 362.86,-23.53 364.86,-30.24"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M303.05,-41.96C318.74,-37.31 336.87,-31.93 353.4,-27.02"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="354.86,-30.24 363.45,-24.04 352.86,-23.53 354.86,-30.24"/>
 </g>
 </g>
 </svg>
@@ -373,136 +373,106 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elem_xg_vis~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_elem_xg_visCalledByGraph" width="562pt" height="284pt"
- viewBox="0.00 0.00 562.00 284.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_elem_xg_vis~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 280)">
+<svg id="proccmp_elem_xg_visCalledByGraph" width="532pt" height="200pt"
+ viewBox="0.00 0.00 532.00 200.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_elem_xg_vis~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 196)">
 <title>proc~~cmp_elem_xg_vis~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-280 558,-280 558,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-196 528,-196 528,4 -4,4"/>
 <!-- proc~cmp_elem_xg_vis -->
 <g id="proc~~cmp_elem_xg_vis~~CalledByGraph_node1" class="node">
 <title>proc~cmp_elem_xg_vis</title>
-<polygon fill="none" stroke="black" points="554,-150 362,-150 362,-126 554,-126 554,-150"/>
-<text text-anchor="middle" x="458" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_elem_Xg_vis</text>
+<polygon fill="none" stroke="black" points="524,-108 342,-108 342,-84 524,-84 524,-108"/>
+<text text-anchor="middle" x="433" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_elem_Xg_vis</text>
 </g>
 <!-- proc~export_xg -->
 <g id="proc~~cmp_elem_xg_vis~~CalledByGraph_node2" class="node">
 <title>proc~export_xg</title>
-<g id="a_proc~~cmp_elem_xg_vis~~CalledByGraph_node2"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_volume%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="326,-150 175,-150 175,-126 326,-126 326,-150"/>
-<text text-anchor="middle" x="250.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
+<g id="a_proc~~cmp_elem_xg_vis~~CalledByGraph_node2"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_curve%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="306,-108 165,-108 165,-84 306,-84 306,-108"/>
+<text text-anchor="middle" x="235.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
 <g id="proc~~cmp_elem_xg_vis~~CalledByGraph_edge1" class="edge">
 <title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
-<path fill="none" stroke="#ff0000" d="M326.27,-138C334.6,-138 343.2,-138 351.82,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="351.93,-141.5 361.93,-138 351.93,-134.5 351.93,-141.5"/>
+<path fill="none" stroke="#ff0000" d="M306.25,-96C314.53,-96 323.1,-96 331.69,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="331.78,-99.5 341.78,-96 331.78,-92.5 331.78,-99.5"/>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example1_curve -->
 <g id="proc~~cmp_elem_xg_vis~~CalledByGraph_node3" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~cmp_elem_xg_vis~~CalledByGraph_node3"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-276 14.5,-276 14.5,-252 124.5,-252 124.5,-276"/>
-<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~cmp_elem_xg_vis~~CalledByGraph_node3"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-192 14.5,-192 14.5,-168 114.5,-168 114.5,-192"/>
+<text text-anchor="middle" x="64.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~export_xg -->
+<!-- program~example1_curve&#45;&gt;proc~export_xg -->
 <g id="proc~~cmp_elem_xg_vis~~CalledByGraph_edge2" class="edge">
-<title>program~example3_volume&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0000" d="M119.95,-251.87C126.56,-249.39 133.09,-246.45 139,-243 177.67,-220.41 213.5,-181.81 233.35,-158.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="236.24,-160.22 239.91,-150.28 230.84,-155.76 236.24,-160.22"/>
+<title>program~example1_curve&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#ff0000" d="M106.32,-167.97C113.97,-165.3 121.82,-162.28 129,-159 157.22,-146.1 187.44,-127.51 208.27,-113.87"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="210.46,-116.62 216.86,-108.18 206.59,-110.79 210.46,-116.62"/>
 </g>
-<!-- program~example_nurbs_volume -->
+<!-- program~example_nurbs_curve -->
 <g id="proc~~cmp_elem_xg_vis~~CalledByGraph_node4" class="node">
-<title>program~example_nurbs_volume</title>
-<g id="a_proc~~cmp_elem_xg_vis~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-234 0,-234 0,-210 139,-210 139,-234"/>
-<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<title>program~example_nurbs_curve</title>
+<g id="a_proc~~cmp_elem_xg_vis~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129,-150 0,-150 0,-126 129,-126 129,-150"/>
+<text text-anchor="middle" x="64.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~export_xg -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~export_xg -->
 <g id="proc~~cmp_elem_xg_vis~~CalledByGraph_edge3" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0000" d="M114.87,-209.97C123.01,-207.32 131.35,-204.31 139,-201 168.62,-188.2 200.43,-169.49 222.28,-155.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="224.43,-158.56 230.99,-150.25 220.68,-152.65 224.43,-158.56"/>
+<title>program~example_nurbs_curve&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#ff0000" d="M113.93,-125.96C133.38,-121.13 155.96,-115.52 176.29,-110.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="177.2,-113.85 186.06,-108.04 175.52,-107.05 177.2,-113.85"/>
 </g>
-<!-- program~example_put_to_nurbs -->
+<!-- program~shape_c_1d -->
 <g id="proc~~cmp_elem_xg_vis~~CalledByGraph_node5" class="node">
-<title>program~example_put_to_nurbs</title>
-<g id="a_proc~~cmp_elem_xg_vis~~CalledByGraph_node5"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-192 3.5,-192 3.5,-168 135.5,-168 135.5,-192"/>
-<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
+<title>program~shape_c_1d</title>
+<g id="a_proc~~cmp_elem_xg_vis~~CalledByGraph_node5"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102.5,-108 26.5,-108 26.5,-84 102.5,-84 102.5,-108"/>
+<text text-anchor="middle" x="64.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xg -->
+<!-- program~shape_c_1d&#45;&gt;proc~export_xg -->
 <g id="proc~~cmp_elem_xg_vis~~CalledByGraph_edge4" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0000" d="M121.79,-167.96C142.58,-163.09 166.75,-157.42 188.43,-152.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="189.26,-155.73 198.2,-150.04 187.66,-148.91 189.26,-155.73"/>
+<title>program~shape_c_1d&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#ff0000" d="M102.59,-96C118,-96 136.52,-96 154.75,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="154.83,-99.5 164.83,-96 154.83,-92.5 154.83,-99.5"/>
 </g>
-<!-- program~shape_c_3d -->
+<!-- program~shape_circle -->
 <g id="proc~~cmp_elem_xg_vis~~CalledByGraph_node6" class="node">
-<title>program~shape_c_3d</title>
-<g id="a_proc~~cmp_elem_xg_vis~~CalledByGraph_node6"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
-<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<title>program~shape_circle</title>
+<g id="a_proc~~cmp_elem_xg_vis~~CalledByGraph_node6"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="104,-66 25,-66 25,-42 104,-42 104,-66"/>
+<text text-anchor="middle" x="64.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~export_xg -->
+<!-- program~shape_circle&#45;&gt;proc~export_xg -->
 <g id="proc~~cmp_elem_xg_vis~~CalledByGraph_edge5" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0000" d="M107.59,-138C124.23,-138 144.61,-138 164.68,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="164.8,-141.5 174.8,-138 164.8,-134.5 164.8,-141.5"/>
+<title>program~shape_circle&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#ff0000" d="M104.27,-63.64C125.5,-68.91 152.25,-75.56 175.97,-81.45"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="175.37,-84.91 185.92,-83.93 177.06,-78.12 175.37,-84.91"/>
 </g>
-<!-- program~shape_half_ring_3d -->
+<!-- program~shape_half_circle -->
 <g id="proc~~cmp_elem_xg_vis~~CalledByGraph_node7" class="node">
-<title>program~shape_half_ring_3d</title>
-<g id="a_proc~~cmp_elem_xg_vis~~CalledByGraph_node7"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
-<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<title>program~shape_half_circle</title>
+<g id="a_proc~~cmp_elem_xg_vis~~CalledByGraph_node7"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116.5,-24 12.5,-24 12.5,0 116.5,0 116.5,-24"/>
+<text text-anchor="middle" x="64.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xg -->
+<!-- program~shape_half_circle&#45;&gt;proc~export_xg -->
 <g id="proc~~cmp_elem_xg_vis~~CalledByGraph_edge6" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0000" d="M121.79,-108.04C142.58,-112.91 166.75,-118.58 188.43,-123.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="187.66,-127.09 198.2,-125.96 189.26,-120.27 187.66,-127.09"/>
-</g>
-<!-- program~shape_hexahedron -->
-<g id="proc~~cmp_elem_xg_vis~~CalledByGraph_node8" class="node">
-<title>program~shape_hexahedron</title>
-<g id="a_proc~~cmp_elem_xg_vis~~CalledByGraph_node8"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-66 13,-66 13,-42 126,-42 126,-66"/>
-<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
-</a>
-</g>
-</g>
-<!-- program~shape_hexahedron&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elem_xg_vis~~CalledByGraph_edge7" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0000" d="M114.87,-66.03C123.01,-68.68 131.35,-71.69 139,-75 168.62,-87.8 200.43,-106.51 222.28,-120.22"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="220.68,-123.35 230.99,-125.75 224.43,-117.44 220.68,-123.35"/>
-</g>
-<!-- program~shape_ring_3d -->
-<g id="proc~~cmp_elem_xg_vis~~CalledByGraph_node9" class="node">
-<title>program~shape_ring_3d</title>
-<g id="a_proc~~cmp_elem_xg_vis~~CalledByGraph_node9"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-24 24.5,-24 24.5,0 114.5,0 114.5,-24"/>
-<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_ring_3d&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elem_xg_vis~~CalledByGraph_edge8" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0000" d="M114.53,-22.19C122.95,-25.05 131.48,-28.61 139,-33 177.67,-55.59 213.5,-94.19 233.35,-117.77"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="230.84,-120.24 239.91,-125.72 236.24,-115.78 230.84,-120.24"/>
+<title>program~shape_half_circle&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#ff0000" d="M106.32,-24.03C113.97,-26.7 121.82,-29.72 129,-33 157.22,-45.9 187.44,-64.49 208.27,-78.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="206.59,-81.21 216.86,-83.82 210.46,-75.38 206.59,-81.21"/>
 </g>
 </g>
 </svg>
@@ -618,7 +588,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elem_xg_vis~2.html b/proc/cmp_elem_xg_vis~2.html
index 6385e3102..dbe56ed5e 100644
--- a/proc/cmp_elem_xg_vis~2.html
+++ b/proc/cmp_elem_xg_vis~2.html
@@ -83,15 +83,15 @@ <h1>cmp_elem_Xg_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_elem_Xg_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function cmp_elem_Xg_vis(this, p) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~92"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~85"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -191,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-elemconn~19"></span>
+          <span class="anchor" id="variable-elemconn~15"></span>
           integer, allocatable, (:,:)
         </small>
       </h3>
@@ -217,7 +217,7 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~cmp_elem_xg_vis~2~~CallsGraph_node1" class="node">
 <title>proc~cmp_elem_xg_vis~2</title>
 <polygon fill="none" stroke="black" points="192,-66 0,-66 0,-42 192,-42 192,-66"/>
-<text text-anchor="middle" x="96" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_elem_Xg_vis</text>
+<text text-anchor="middle" x="96" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_elem_Xg_vis</text>
 </g>
 <!-- interface~elemconn_c0 -->
 <g id="proc~~cmp_elem_xg_vis~2~~CallsGraph_node2" class="node">
@@ -373,121 +373,136 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elem_xg_vis~2~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_elem_xg_vis2CalledByGraph" width="562pt" height="242pt"
- viewBox="0.00 0.00 562.00 242.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 238)">
+<svg id="proccmp_elem_xg_vis2CalledByGraph" width="562pt" height="284pt"
+ viewBox="0.00 0.00 562.00 284.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 280)">
 <title>proc~~cmp_elem_xg_vis~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-238 558,-238 558,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-280 558,-280 558,4 -4,4"/>
 <!-- proc~cmp_elem_xg_vis~2 -->
 <g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph_node1" class="node">
 <title>proc~cmp_elem_xg_vis~2</title>
-<polygon fill="none" stroke="black" points="554,-129 362,-129 362,-105 554,-105 554,-129"/>
-<text text-anchor="middle" x="458" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_elem_Xg_vis</text>
+<polygon fill="none" stroke="black" points="554,-150 362,-150 362,-126 554,-126 554,-150"/>
+<text text-anchor="middle" x="458" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_elem_Xg_vis</text>
 </g>
 <!-- proc~export_xg~2 -->
 <g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph_node2" class="node">
 <title>proc~export_xg~2</title>
-<g id="a_proc~~cmp_elem_xg_vis~2~~CalledByGraph_node2"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_surface%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="326,-129 175,-129 175,-105 326,-105 326,-129"/>
-<text text-anchor="middle" x="250.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
+<g id="a_proc~~cmp_elem_xg_vis~2~~CalledByGraph_node2"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_volume%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="326,-150 175,-150 175,-126 326,-126 326,-150"/>
+<text text-anchor="middle" x="250.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
 <g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph_edge1" class="edge">
 <title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
-<path fill="none" stroke="#ff0000" d="M326.27,-117C334.6,-117 343.2,-117 351.82,-117"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="351.93,-120.5 361.93,-117 351.93,-113.5 351.93,-120.5"/>
+<path fill="none" stroke="#ff0000" d="M326.27,-138C334.6,-138 343.2,-138 351.82,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="351.93,-141.5 361.93,-138 351.93,-134.5 351.93,-141.5"/>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph_node3" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~cmp_elem_xg_vis~2~~CalledByGraph_node3"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-234 14.5,-234 14.5,-210 124.5,-210 124.5,-234"/>
-<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<title>program~example3_volume</title>
+<g id="a_proc~~cmp_elem_xg_vis~2~~CalledByGraph_node3"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-276 14.5,-276 14.5,-252 124.5,-252 124.5,-276"/>
+<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~export_xg~2 -->
+<!-- program~example3_volume&#45;&gt;proc~export_xg~2 -->
 <g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph_edge2" class="edge">
-<title>program~example3_surface&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M117.8,-209.91C125.07,-207.37 132.36,-204.4 139,-201 173.27,-183.43 207.81,-155.07 228.93,-136.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="231.54,-138.59 236.6,-129.28 226.84,-133.4 231.54,-138.59"/>
+<title>program~example3_volume&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0000" d="M119.95,-251.87C126.56,-249.39 133.09,-246.45 139,-243 177.67,-220.41 213.5,-181.81 233.35,-158.23"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="236.24,-160.22 239.91,-150.28 230.84,-155.76 236.24,-160.22"/>
 </g>
-<!-- program~example_nurbs_surface -->
+<!-- program~example_nurbs_volume -->
 <g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph_node4" class="node">
-<title>program~example_nurbs_surface</title>
-<g id="a_proc~~cmp_elem_xg_vis~2~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-192 0,-192 0,-168 139,-168 139,-192"/>
-<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<title>program~example_nurbs_volume</title>
+<g id="a_proc~~cmp_elem_xg_vis~2~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-234 0,-234 0,-210 139,-210 139,-234"/>
+<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~export_xg~2 -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~export_xg~2 -->
 <g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph_edge3" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M111.57,-167.89C120.64,-165.08 130.18,-162.03 139,-159 162.63,-150.9 188.77,-141 209.69,-132.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="211.17,-136.03 219.21,-129.13 208.62,-129.52 211.17,-136.03"/>
+<title>program~example_nurbs_volume&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0000" d="M114.87,-209.97C123.01,-207.32 131.35,-204.31 139,-201 168.62,-188.2 200.43,-169.49 222.28,-155.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="224.43,-158.56 230.99,-150.25 220.68,-152.65 224.43,-158.56"/>
 </g>
-<!-- program~shape_c_2d -->
+<!-- program~example_put_to_nurbs -->
 <g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph_node5" class="node">
-<title>program~shape_c_2d</title>
-<g id="a_proc~~cmp_elem_xg_vis~2~~CalledByGraph_node5"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
-<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+<title>program~example_put_to_nurbs</title>
+<g id="a_proc~~cmp_elem_xg_vis~2~~CalledByGraph_node5"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-192 3.5,-192 3.5,-168 135.5,-168 135.5,-192"/>
+<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~export_xg~2 -->
+<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xg~2 -->
 <g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph_edge4" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M107.59,-133.65C124.23,-131.7 144.61,-129.31 164.68,-126.95"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="165.28,-130.41 174.8,-125.76 164.46,-123.45 165.28,-130.41"/>
+<title>program~example_put_to_nurbs&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0000" d="M121.79,-167.96C142.58,-163.09 166.75,-157.42 188.43,-152.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="189.26,-155.73 198.2,-150.04 187.66,-148.91 189.26,-155.73"/>
 </g>
-<!-- program~shape_half_ring_2d -->
+<!-- program~shape_c_3d -->
 <g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph_node6" class="node">
-<title>program~shape_half_ring_2d</title>
-<g id="a_proc~~cmp_elem_xg_vis~2~~CalledByGraph_node6"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
-<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+<title>program~shape_c_3d</title>
+<g id="a_proc~~cmp_elem_xg_vis~2~~CalledByGraph_node6"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
+<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xg~2 -->
+<!-- program~shape_c_3d&#45;&gt;proc~export_xg~2 -->
 <g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph_edge5" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M127.14,-102.64C139.1,-104.05 151.97,-105.56 164.71,-107.05"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="164.54,-110.56 174.88,-108.25 165.36,-103.6 164.54,-110.56"/>
+<title>program~shape_c_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0000" d="M107.59,-138C124.23,-138 144.61,-138 164.68,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="164.8,-141.5 174.8,-138 164.8,-134.5 164.8,-141.5"/>
 </g>
-<!-- program~shape_ring_2d -->
+<!-- program~shape_half_ring_3d -->
 <g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph_node7" class="node">
-<title>program~shape_ring_2d</title>
-<g id="a_proc~~cmp_elem_xg_vis~2~~CalledByGraph_node7"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-66 24.5,-66 24.5,-42 114.5,-42 114.5,-66"/>
-<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+<title>program~shape_half_ring_3d</title>
+<g id="a_proc~~cmp_elem_xg_vis~2~~CalledByGraph_node7"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
+<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~export_xg~2 -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xg~2 -->
 <g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph_edge6" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M111.57,-66.11C120.64,-68.92 130.18,-71.97 139,-75 162.63,-83.1 188.77,-93 209.69,-101.14"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="208.62,-104.48 219.21,-104.87 211.17,-97.97 208.62,-104.48"/>
+<title>program~shape_half_ring_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0000" d="M121.79,-108.04C142.58,-112.91 166.75,-118.58 188.43,-123.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="187.66,-127.09 198.2,-125.96 189.26,-120.27 187.66,-127.09"/>
 </g>
-<!-- program~shape_tetragon -->
+<!-- program~shape_hexahedron -->
 <g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph_node8" class="node">
-<title>program~shape_tetragon</title>
-<g id="a_proc~~cmp_elem_xg_vis~2~~CalledByGraph_node8"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-24 21.5,-24 21.5,0 117.5,0 117.5,-24"/>
-<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<title>program~shape_hexahedron</title>
+<g id="a_proc~~cmp_elem_xg_vis~2~~CalledByGraph_node8"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-66 13,-66 13,-42 126,-42 126,-66"/>
+<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~export_xg~2 -->
+<!-- program~shape_hexahedron&#45;&gt;proc~export_xg~2 -->
 <g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph_edge7" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M117.8,-24.09C125.07,-26.63 132.36,-29.6 139,-33 173.27,-50.57 207.81,-78.93 228.93,-97.77"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="226.84,-100.6 236.6,-104.72 231.54,-95.41 226.84,-100.6"/>
+<title>program~shape_hexahedron&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0000" d="M114.87,-66.03C123.01,-68.68 131.35,-71.69 139,-75 168.62,-87.8 200.43,-106.51 222.28,-120.22"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="220.68,-123.35 230.99,-125.75 224.43,-117.44 220.68,-123.35"/>
+</g>
+<!-- program~shape_ring_3d -->
+<g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph_node9" class="node">
+<title>program~shape_ring_3d</title>
+<g id="a_proc~~cmp_elem_xg_vis~2~~CalledByGraph_node9"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-24 24.5,-24 24.5,0 114.5,0 114.5,-24"/>
+<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_ring_3d&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elem_xg_vis~2~~CalledByGraph_edge8" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0000" d="M114.53,-22.19C122.95,-25.05 131.48,-28.61 139,-33 177.67,-55.59 213.5,-94.19 233.35,-117.77"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="230.84,-120.24 239.91,-125.72 236.24,-115.78 230.84,-120.24"/>
 </g>
 </g>
 </svg>
@@ -603,7 +618,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elem_xg_vis~3.html b/proc/cmp_elem_xg_vis~3.html
index 97b017dfc..b01e1af66 100644
--- a/proc/cmp_elem_xg_vis~3.html
+++ b/proc/cmp_elem_xg_vis~3.html
@@ -83,15 +83,15 @@ <h1>cmp_elem_Xg_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_elem_Xg_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function cmp_elem_Xg_vis(this, p) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~155"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~153"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -177,11 +177,11 @@ <h3>Arguments</h3>
               integer,
             </td>
 <td>intent(in),</td>
-              <td>optional</td>            <td>
-              
+              <td>optional,</td>            <td>
+              contiguous
             </td>
             <td>::</td>
-            <td><strong>p</strong></td>
+            <td><strong>p</strong>(:)</td>
             <td>
                 
             </td>
@@ -208,76 +208,76 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elem_xg_vis~3~~CallsGraph Pages: 1 -->
-<svg id="proccmp_elem_xg_vis3CallsGraph" width="477pt" height="116pt"
- viewBox="0.00 0.00 477.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="proccmp_elem_xg_vis3CallsGraph" width="487pt" height="116pt"
+ viewBox="0.00 0.00 487.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~cmp_elem_xg_vis~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
 <title>proc~~cmp_elem_xg_vis~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 473,-112 473,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 483,-112 483,4 -4,4"/>
 <!-- proc~cmp_elem_xg_vis~3 -->
 <g id="proc~~cmp_elem_xg_vis~3~~CallsGraph_node1" class="node">
 <title>proc~cmp_elem_xg_vis~3</title>
-<polygon fill="none" stroke="black" points="182,-66 0,-66 0,-42 182,-42 182,-66"/>
-<text text-anchor="middle" x="91" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_elem_Xg_vis</text>
+<polygon fill="none" stroke="black" points="192,-66 0,-66 0,-42 192,-42 192,-66"/>
+<text text-anchor="middle" x="96" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_elem_Xg_vis</text>
 </g>
 <!-- interface~elemconn_c0 -->
 <g id="proc~~cmp_elem_xg_vis~3~~CallsGraph_node2" class="node">
 <title>interface~elemconn_c0</title>
 <g id="a_proc~~cmp_elem_xg_vis~3~~CallsGraph_node2"><a xlink:href="../interface/elemconn_c0.html" xlink:title="elemConn_C0">
-<polygon fill="#a7506f" stroke="#a7506f" points="305,-66 218,-66 218,-42 305,-42 305,-66"/>
-<text text-anchor="middle" x="261.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="315,-66 228,-66 228,-42 315,-42 315,-66"/>
+<text text-anchor="middle" x="271.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elem_xg_vis~3~~CallsGraph_edge1" class="edge">
 <title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M182.17,-54C190.86,-54 199.47,-54 207.62,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="207.67,-57.5 217.67,-54 207.67,-50.5 207.67,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M192.13,-54C200.89,-54 209.55,-54 217.72,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="217.79,-57.5 227.79,-54 217.79,-50.5 217.79,-57.5"/>
 </g>
 <!-- proc~cmp_elemconn_c0_l -->
 <g id="proc~~cmp_elem_xg_vis~3~~CallsGraph_node3" class="node">
 <title>proc~cmp_elemconn_c0_l</title>
 <g id="a_proc~~cmp_elem_xg_vis~3~~CallsGraph_node3"><a xlink:href="../proc/cmp_elemconn_c0_l.html" xlink:title="cmp_elemConn_C0_L">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="468.5,-108 341.5,-108 341.5,-84 468.5,-84 468.5,-108"/>
-<text text-anchor="middle" x="405" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="478.5,-108 351.5,-108 351.5,-84 478.5,-84 478.5,-108"/>
+<text text-anchor="middle" x="415" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l -->
 <g id="proc~~cmp_elem_xg_vis~3~~CallsGraph_edge2" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M303.05,-66.04C318.74,-70.69 336.87,-76.07 353.4,-80.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="352.86,-84.47 363.45,-83.96 354.86,-77.76 352.86,-84.47"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M313.05,-66.04C328.74,-70.69 346.87,-76.07 363.4,-80.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="362.86,-84.47 373.45,-83.96 364.86,-77.76 362.86,-84.47"/>
 </g>
 <!-- proc~cmp_elemconn_c0_s -->
 <g id="proc~~cmp_elem_xg_vis~3~~CallsGraph_node4" class="node">
 <title>proc~cmp_elemconn_c0_s</title>
 <g id="a_proc~~cmp_elem_xg_vis~3~~CallsGraph_node4"><a xlink:href="../proc/cmp_elemconn_c0_s.html" xlink:title="cmp_elemConn_C0_S">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="468.5,-66 341.5,-66 341.5,-42 468.5,-42 468.5,-66"/>
-<text text-anchor="middle" x="405" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="478.5,-66 351.5,-66 351.5,-42 478.5,-42 478.5,-66"/>
+<text text-anchor="middle" x="415" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s -->
 <g id="proc~~cmp_elem_xg_vis~3~~CallsGraph_edge3" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M305.34,-54C313.61,-54 322.49,-54 331.41,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="331.47,-57.5 341.47,-54 331.47,-50.5 331.47,-57.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M315.34,-54C323.61,-54 332.49,-54 341.41,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="341.47,-57.5 351.47,-54 341.47,-50.5 341.47,-57.5"/>
 </g>
 <!-- proc~cmp_elemconn_c0_v -->
 <g id="proc~~cmp_elem_xg_vis~3~~CallsGraph_node5" class="node">
 <title>proc~cmp_elemconn_c0_v</title>
 <g id="a_proc~~cmp_elem_xg_vis~3~~CallsGraph_node5"><a xlink:href="../proc/cmp_elemconn_c0_v.html" xlink:title="cmp_elemConn_C0_V">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="469,-24 341,-24 341,0 469,0 469,-24"/>
-<text text-anchor="middle" x="405" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="479,-24 351,-24 351,0 479,0 479,-24"/>
+<text text-anchor="middle" x="415" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v -->
 <g id="proc~~cmp_elem_xg_vis~3~~CallsGraph_edge4" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M303.05,-41.96C318.74,-37.31 336.87,-31.93 353.4,-27.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="354.86,-30.24 363.45,-24.04 352.86,-23.53 354.86,-30.24"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M313.05,-41.96C328.74,-37.31 346.87,-31.93 363.4,-27.02"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="364.86,-30.24 373.45,-24.04 362.86,-23.53 364.86,-30.24"/>
 </g>
 </g>
 </svg>
@@ -373,106 +373,121 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elem_xg_vis~3~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_elem_xg_vis3CalledByGraph" width="532pt" height="200pt"
- viewBox="0.00 0.00 532.00 200.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_elem_xg_vis~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 196)">
+<svg id="proccmp_elem_xg_vis3CalledByGraph" width="562pt" height="242pt"
+ viewBox="0.00 0.00 562.00 242.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_elem_xg_vis~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 238)">
 <title>proc~~cmp_elem_xg_vis~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-196 528,-196 528,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-238 558,-238 558,4 -4,4"/>
 <!-- proc~cmp_elem_xg_vis~3 -->
 <g id="proc~~cmp_elem_xg_vis~3~~CalledByGraph_node1" class="node">
 <title>proc~cmp_elem_xg_vis~3</title>
-<polygon fill="none" stroke="black" points="524,-108 342,-108 342,-84 524,-84 524,-108"/>
-<text text-anchor="middle" x="433" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_elem_Xg_vis</text>
+<polygon fill="none" stroke="black" points="554,-129 362,-129 362,-105 554,-105 554,-129"/>
+<text text-anchor="middle" x="458" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_elem_Xg_vis</text>
 </g>
 <!-- proc~export_xg~3 -->
 <g id="proc~~cmp_elem_xg_vis~3~~CalledByGraph_node2" class="node">
 <title>proc~export_xg~3</title>
-<g id="a_proc~~cmp_elem_xg_vis~3~~CalledByGraph_node2"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_curve%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="306,-108 165,-108 165,-84 306,-84 306,-108"/>
-<text text-anchor="middle" x="235.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xg</text>
+<g id="a_proc~~cmp_elem_xg_vis~3~~CalledByGraph_node2"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_surface%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="326,-129 175,-129 175,-105 326,-105 326,-129"/>
+<text text-anchor="middle" x="250.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
 <g id="proc~~cmp_elem_xg_vis~3~~CalledByGraph_edge1" class="edge">
 <title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
-<path fill="none" stroke="#ff0000" d="M306.25,-96C314.53,-96 323.1,-96 331.69,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="331.78,-99.5 341.78,-96 331.78,-92.5 331.78,-99.5"/>
+<path fill="none" stroke="#ff0000" d="M326.27,-117C334.6,-117 343.2,-117 351.82,-117"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="351.93,-120.5 361.93,-117 351.93,-113.5 351.93,-120.5"/>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~cmp_elem_xg_vis~3~~CalledByGraph_node3" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~cmp_elem_xg_vis~3~~CalledByGraph_node3"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-192 14.5,-192 14.5,-168 114.5,-168 114.5,-192"/>
-<text text-anchor="middle" x="64.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~cmp_elem_xg_vis~3~~CalledByGraph_node3"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-234 14.5,-234 14.5,-210 124.5,-210 124.5,-234"/>
+<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~export_xg~3 -->
+<!-- program~example3_surface&#45;&gt;proc~export_xg~3 -->
 <g id="proc~~cmp_elem_xg_vis~3~~CalledByGraph_edge2" class="edge">
-<title>program~example1_curve&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M106.32,-167.97C113.97,-165.3 121.82,-162.28 129,-159 157.22,-146.1 187.44,-127.51 208.27,-113.87"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="210.46,-116.62 216.86,-108.18 206.59,-110.79 210.46,-116.62"/>
+<title>program~example3_surface&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M117.8,-209.91C125.07,-207.37 132.36,-204.4 139,-201 173.27,-183.43 207.81,-155.07 228.93,-136.23"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="231.54,-138.59 236.6,-129.28 226.84,-133.4 231.54,-138.59"/>
 </g>
-<!-- program~example_nurbs_curve -->
+<!-- program~example_nurbs_surface -->
 <g id="proc~~cmp_elem_xg_vis~3~~CalledByGraph_node4" class="node">
-<title>program~example_nurbs_curve</title>
-<g id="a_proc~~cmp_elem_xg_vis~3~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129,-150 0,-150 0,-126 129,-126 129,-150"/>
-<text text-anchor="middle" x="64.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<title>program~example_nurbs_surface</title>
+<g id="a_proc~~cmp_elem_xg_vis~3~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-192 0,-192 0,-168 139,-168 139,-192"/>
+<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~export_xg~3 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~export_xg~3 -->
 <g id="proc~~cmp_elem_xg_vis~3~~CalledByGraph_edge3" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M113.93,-125.96C133.38,-121.13 155.96,-115.52 176.29,-110.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="177.2,-113.85 186.06,-108.04 175.52,-107.05 177.2,-113.85"/>
+<title>program~example_nurbs_surface&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M111.57,-167.89C120.64,-165.08 130.18,-162.03 139,-159 162.63,-150.9 188.77,-141 209.69,-132.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="211.17,-136.03 219.21,-129.13 208.62,-129.52 211.17,-136.03"/>
 </g>
-<!-- program~shape_c_1d -->
+<!-- program~shape_c_2d -->
 <g id="proc~~cmp_elem_xg_vis~3~~CalledByGraph_node5" class="node">
-<title>program~shape_c_1d</title>
-<g id="a_proc~~cmp_elem_xg_vis~3~~CalledByGraph_node5"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102.5,-108 26.5,-108 26.5,-84 102.5,-84 102.5,-108"/>
-<text text-anchor="middle" x="64.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<title>program~shape_c_2d</title>
+<g id="a_proc~~cmp_elem_xg_vis~3~~CalledByGraph_node5"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
+<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~export_xg~3 -->
+<!-- program~shape_c_2d&#45;&gt;proc~export_xg~3 -->
 <g id="proc~~cmp_elem_xg_vis~3~~CalledByGraph_edge4" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M102.59,-96C118,-96 136.52,-96 154.75,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="154.83,-99.5 164.83,-96 154.83,-92.5 154.83,-99.5"/>
+<title>program~shape_c_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M107.59,-133.65C124.23,-131.7 144.61,-129.31 164.68,-126.95"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="165.28,-130.41 174.8,-125.76 164.46,-123.45 165.28,-130.41"/>
 </g>
-<!-- program~shape_circle -->
+<!-- program~shape_half_ring_2d -->
 <g id="proc~~cmp_elem_xg_vis~3~~CalledByGraph_node6" class="node">
-<title>program~shape_circle</title>
-<g id="a_proc~~cmp_elem_xg_vis~3~~CalledByGraph_node6"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="104,-66 25,-66 25,-42 104,-42 104,-66"/>
-<text text-anchor="middle" x="64.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<title>program~shape_half_ring_2d</title>
+<g id="a_proc~~cmp_elem_xg_vis~3~~CalledByGraph_node6"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
+<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~export_xg~3 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xg~3 -->
 <g id="proc~~cmp_elem_xg_vis~3~~CalledByGraph_edge5" class="edge">
-<title>program~shape_circle&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M104.27,-63.64C125.5,-68.91 152.25,-75.56 175.97,-81.45"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="175.37,-84.91 185.92,-83.93 177.06,-78.12 175.37,-84.91"/>
+<title>program~shape_half_ring_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M127.14,-102.64C139.1,-104.05 151.97,-105.56 164.71,-107.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="164.54,-110.56 174.88,-108.25 165.36,-103.6 164.54,-110.56"/>
 </g>
-<!-- program~shape_half_circle -->
+<!-- program~shape_ring_2d -->
 <g id="proc~~cmp_elem_xg_vis~3~~CalledByGraph_node7" class="node">
-<title>program~shape_half_circle</title>
-<g id="a_proc~~cmp_elem_xg_vis~3~~CalledByGraph_node7"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116.5,-24 12.5,-24 12.5,0 116.5,0 116.5,-24"/>
-<text text-anchor="middle" x="64.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<title>program~shape_ring_2d</title>
+<g id="a_proc~~cmp_elem_xg_vis~3~~CalledByGraph_node7"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-66 24.5,-66 24.5,-42 114.5,-42 114.5,-66"/>
+<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~export_xg~3 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~export_xg~3 -->
 <g id="proc~~cmp_elem_xg_vis~3~~CalledByGraph_edge6" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M106.32,-24.03C113.97,-26.7 121.82,-29.72 129,-33 157.22,-45.9 187.44,-64.49 208.27,-78.13"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="206.59,-81.21 216.86,-83.82 210.46,-75.38 206.59,-81.21"/>
+<title>program~shape_ring_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M111.57,-66.11C120.64,-68.92 130.18,-71.97 139,-75 162.63,-83.1 188.77,-93 209.69,-101.14"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="208.62,-104.48 219.21,-104.87 211.17,-97.97 208.62,-104.48"/>
+</g>
+<!-- program~shape_tetragon -->
+<g id="proc~~cmp_elem_xg_vis~3~~CalledByGraph_node8" class="node">
+<title>program~shape_tetragon</title>
+<g id="a_proc~~cmp_elem_xg_vis~3~~CalledByGraph_node8"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-24 21.5,-24 21.5,0 117.5,0 117.5,-24"/>
+<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+</a>
+</g>
+</g>
+<!-- program~shape_tetragon&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elem_xg_vis~3~~CalledByGraph_edge7" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M117.8,-24.09C125.07,-26.63 132.36,-29.6 139,-33 173.27,-50.57 207.81,-78.93 228.93,-97.77"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="226.84,-100.6 236.6,-104.72 231.54,-95.41 226.84,-100.6"/>
 </g>
 </g>
 </svg>
@@ -588,7 +603,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elemconn_c0_l.html b/proc/cmp_elemconn_c0_l.html
index 82c76d924..5a45094e6 100644
--- a/proc/cmp_elemconn_c0_l.html
+++ b/proc/cmp_elemconn_c0_l.html
@@ -214,581 +214,581 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~cmp_elemconn_c0_l -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node1" class="node">
 <title>proc~cmp_elemconn_c0_l</title>
-<polygon fill="none" stroke="black" points="840,-339 713,-339 713,-315 840,-315 840,-339"/>
-<text text-anchor="middle" x="776.5" y="-324.6" font-family="Helvetica,sans-Serif" font-size="10.50">cmp_elemConn_C0_L</text>
+<polygon fill="none" stroke="black" points="840,-402 713,-402 713,-378 840,-378 840,-402"/>
+<text text-anchor="middle" x="776.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50">cmp_elemConn_C0_L</text>
 </g>
 <!-- interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node2" class="node">
 <title>interface~elemconn_c0</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node2"><a xlink:href="../interface/elemconn_c0.html" xlink:title="elemConn_C0">
-<polygon fill="#a7506f" stroke="#a7506f" points="677,-339 590,-339 590,-315 677,-315 677,-339"/>
-<text text-anchor="middle" x="633.5" y="-324.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="677,-402 590,-402 590,-378 677,-378 677,-402"/>
+<text text-anchor="middle" x="633.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge1" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M677.19,-327C685.29,-327 693.97,-327 702.69,-327"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="702.93,-330.5 712.93,-327 702.93,-323.5 702.93,-330.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M677.19,-390C685.29,-390 693.97,-390 702.69,-390"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="702.93,-393.5 712.93,-390 702.93,-386.5 702.93,-393.5"/>
 </g>
 <!-- proc~cmp_elem_xc_vis -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node3" class="node">
 <title>proc~cmp_elem_xc_vis</title>
-<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-570 362.5,-570 362.5,-546 553.5,-546 553.5,-570"/>
-<text text-anchor="middle" x="458" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="548.5,-612 367.5,-612 367.5,-588 548.5,-588 548.5,-612"/>
+<text text-anchor="middle" x="458" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge2" class="edge">
 <title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M484.83,-545.89C505.73,-535.02 534.75,-517.34 554,-495 592.49,-450.32 616.09,-383.57 626.4,-349.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="629.86,-349.83 629.28,-339.25 623.14,-347.89 629.86,-349.83"/>
+<path fill="none" stroke="#ff0000" d="M484.1,-587.84C504.85,-576.82 534.03,-558.96 554,-537 588.65,-498.89 613.07,-442.7 624.73,-412.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="628.14,-412.88 628.32,-402.28 621.57,-410.45 628.14,-412.88"/>
 </g>
 <!-- proc~cmp_elem_xc_vis~2 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node4" class="node">
 <title>proc~cmp_elem_xc_vis~2</title>
-<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node4"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-360 362.5,-360 362.5,-336 553.5,-336 553.5,-360"/>
-<text text-anchor="middle" x="458" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node4"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-423 362.5,-423 362.5,-399 553.5,-399 553.5,-423"/>
+<text text-anchor="middle" x="458" y="-408.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge3" class="edge">
 <title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M553.62,-336.55C562.64,-335.46 571.54,-334.38 579.94,-333.36"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="580.4,-336.83 589.9,-332.16 579.56,-329.88 580.4,-336.83"/>
+<path fill="none" stroke="#ff0000" d="M553.62,-399.55C562.64,-398.46 571.54,-397.38 579.94,-396.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="580.4,-399.83 589.9,-395.16 579.56,-392.88 580.4,-399.83"/>
 </g>
 <!-- proc~cmp_elem_xc_vis~3 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node5" class="node">
 <title>proc~cmp_elem_xc_vis~3</title>
-<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node5"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="548.5,-245 367.5,-245 367.5,-221 548.5,-221 548.5,-245"/>
-<text text-anchor="middle" x="458" y="-230.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xc_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node5"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-297 362.5,-297 362.5,-273 553.5,-273 553.5,-297"/>
+<text text-anchor="middle" x="458" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge4" class="edge">
 <title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M481.33,-245.1C511.78,-261.59 566.49,-291.24 601.08,-309.97"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="599.8,-313.26 610.26,-314.95 603.13,-307.11 599.8,-313.26"/>
+<path fill="none" stroke="#ff0000" d="M478.9,-297.04C509.54,-315.59 568.41,-351.22 603.7,-372.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="602.2,-375.75 612.56,-377.93 605.82,-369.76 602.2,-375.75"/>
 </g>
 <!-- proc~cmp_elem_xg_vis -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node6" class="node">
 <title>proc~cmp_elem_xg_vis</title>
-<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node6"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="554,-486 362,-486 362,-462 554,-462 554,-486"/>
-<text text-anchor="middle" x="458" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node6"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="549,-528 367,-528 367,-504 549,-504 549,-528"/>
+<text text-anchor="middle" x="458" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge5" class="edge">
 <title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M473.2,-461.97C503.32,-436.45 573.82,-376.72 610.08,-345.99"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="612.74,-348.33 618.11,-339.2 608.21,-342.99 612.74,-348.33"/>
+<path fill="none" stroke="#ff0000" d="M475.64,-503.92C506.21,-481.72 571.48,-434.31 607.44,-408.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="609.88,-410.75 615.91,-402.04 605.77,-405.09 609.88,-410.75"/>
 </g>
 <!-- proc~cmp_elem_xg_vis~2 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node7" class="node">
 <title>proc~cmp_elem_xg_vis~2</title>
-<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node7"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="554,-318 362,-318 362,-294 554,-294 554,-318"/>
-<text text-anchor="middle" x="458" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node7"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="554,-381 362,-381 362,-357 554,-357 554,-381"/>
+<text text-anchor="middle" x="458" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge6" class="edge">
 <title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M554.13,-317.51C562.89,-318.58 571.55,-319.62 579.72,-320.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="579.45,-324.1 589.79,-321.83 580.29,-317.15 579.45,-324.1"/>
+<path fill="none" stroke="#ff0000" d="M554.13,-380.51C562.89,-381.58 571.55,-382.62 579.72,-383.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="579.45,-387.1 589.79,-384.83 580.29,-380.15 579.45,-387.1"/>
 </g>
 <!-- proc~cmp_elem_xg_vis~3 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node8" class="node">
 <title>proc~cmp_elem_xg_vis~3</title>
-<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node8"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="549,-140 367,-140 367,-116 549,-116 549,-140"/>
-<text text-anchor="middle" x="458" y="-125.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xg_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node8"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="554,-171 362,-171 362,-147 554,-147 554,-171"/>
+<text text-anchor="middle" x="458" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge7" class="edge">
 <title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M474.88,-140.02C494.68,-155.45 528.95,-183.6 554,-212 580.82,-242.41 606.2,-282.34 620.51,-306.26"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="617.5,-308.05 625.6,-314.88 623.52,-304.49 617.5,-308.05"/>
+<path fill="none" stroke="#ff0000" d="M471.47,-171.29C490.41,-190.28 527.06,-228.28 554,-264 580.43,-299.03 606.42,-343.19 620.87,-368.85"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="617.89,-370.69 625.82,-377.72 624.01,-367.28 617.89,-370.69"/>
 </g>
 <!-- proc~export_xc -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node9" class="node">
 <title>proc~export_xc</title>
-<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node9"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_volume%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="325.5,-612 175.5,-612 175.5,-588 325.5,-588 325.5,-612"/>
-<text text-anchor="middle" x="250.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
+<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node9"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_curve%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="320.5,-654 180.5,-654 180.5,-630 320.5,-630 320.5,-654"/>
+<text text-anchor="middle" x="250.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge8" class="edge">
 <title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
-<path fill="none" stroke="#ff0000" d="M310.39,-587.96C334.68,-583 363,-577.21 388.23,-572.05"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="389.01,-575.47 398.1,-570.04 387.61,-568.61 389.01,-575.47"/>
+<path fill="none" stroke="#ff0000" d="M310.39,-629.96C334.68,-625 363,-619.21 388.23,-614.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="389.01,-617.47 398.1,-612.04 387.61,-610.61 389.01,-617.47"/>
 </g>
 <!-- proc~export_xc~2 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node10" class="node">
 <title>proc~export_xc~2</title>
-<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node10"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_surface%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="325.5,-360 175.5,-360 175.5,-336 325.5,-336 325.5,-360"/>
-<text text-anchor="middle" x="250.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
+<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node10"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_volume%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="325.5,-423 175.5,-423 175.5,-399 325.5,-399 325.5,-423"/>
+<text text-anchor="middle" x="250.5" y="-408.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge9" class="edge">
 <title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
-<path fill="none" stroke="#ffff00" d="M325.69,-348C334.29,-348 343.19,-348 352.1,-348"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="352.16,-351.5 362.16,-348 352.16,-344.5 352.16,-351.5"/>
+<path fill="none" stroke="#ffff00" d="M325.69,-411C334.29,-411 343.19,-411 352.1,-411"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="352.16,-414.5 362.16,-411 352.16,-407.5 352.16,-414.5"/>
 </g>
 <!-- proc~export_xc~3 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node11" class="node">
 <title>proc~export_xc~3</title>
-<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node11"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_curve%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="320.5,-150 180.5,-150 180.5,-126 320.5,-126 320.5,-150"/>
-<text text-anchor="middle" x="250.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xc</text>
+<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node11"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_surface%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="325.5,-171 175.5,-171 175.5,-147 325.5,-147 325.5,-171"/>
+<text text-anchor="middle" x="250.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge10" class="edge">
 <title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
-<path fill="none" stroke="#00ff00" d="M277.53,-150.03C314.1,-166.94 380.8,-197.77 421.78,-216.72"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="420.32,-219.9 430.86,-220.92 423.25,-213.54 420.32,-219.9"/>
+<path fill="none" stroke="#00ff00" d="M271.2,-171.08C307.8,-193.52 386.37,-241.69 428.66,-267.63"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="427,-270.71 437.36,-272.96 430.66,-264.74 427,-270.71"/>
 </g>
 <!-- proc~export_xg -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node12" class="node">
 <title>proc~export_xg</title>
-<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node12"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_volume%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="326,-570 175,-570 175,-546 326,-546 326,-570"/>
-<text text-anchor="middle" x="250.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
+<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node12"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_curve%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="321,-612 180,-612 180,-588 321,-588 321,-612"/>
+<text text-anchor="middle" x="250.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge11" class="edge">
 <title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
-<path fill="none" stroke="#00ffff" d="M280.94,-545.96C317.03,-531.21 378.3,-506.17 418.2,-489.86"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="419.68,-493.04 427.61,-486.01 417.03,-486.56 419.68,-493.04"/>
+<path fill="none" stroke="#00ffff" d="M280.94,-587.96C317.03,-573.21 378.3,-548.17 418.2,-531.86"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="419.68,-535.04 427.61,-528.01 417.03,-528.56 419.68,-535.04"/>
 </g>
 <!-- proc~export_xg~2 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node13" class="node">
 <title>proc~export_xg~2</title>
-<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node13"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_surface%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="326,-318 175,-318 175,-294 326,-294 326,-318"/>
-<text text-anchor="middle" x="250.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
+<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node13"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_volume%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="326,-381 175,-381 175,-357 326,-357 326,-381"/>
+<text text-anchor="middle" x="250.5" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge12" class="edge">
 <title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
-<path fill="none" stroke="#0000ff" d="M326.27,-306C334.6,-306 343.2,-306 351.82,-306"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="351.93,-309.5 361.93,-306 351.93,-302.5 351.93,-309.5"/>
+<path fill="none" stroke="#0000ff" d="M326.27,-369C334.6,-369 343.2,-369 351.82,-369"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="351.93,-372.5 361.93,-369 351.93,-365.5 351.93,-372.5"/>
 </g>
 <!-- proc~export_xg~3 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node14" class="node">
 <title>proc~export_xg~3</title>
-<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node14"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_curve%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="321,-108 180,-108 180,-84 321,-84 321,-108"/>
-<text text-anchor="middle" x="250.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xg</text>
+<g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node14"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_surface%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="326,-129 175,-129 175,-105 326,-105 326,-129"/>
+<text text-anchor="middle" x="250.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge13" class="edge">
 <title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
-<path fill="none" stroke="#ff00ff" d="M321.07,-106.83C336.69,-109.27 353.46,-111.88 369.7,-114.41"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="369.31,-117.89 379.73,-115.97 370.39,-110.97 369.31,-117.89"/>
+<path fill="none" stroke="#ff00ff" d="M310.39,-129.04C334.68,-134 363,-139.79 388.23,-144.95"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="387.61,-148.39 398.1,-146.96 389.01,-141.53 387.61,-148.39"/>
 </g>
 <!-- program~example1_curve -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node15" class="node">
 <title>program~example1_curve</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node15"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="119.5,-192 19.5,-192 19.5,-168 119.5,-168 119.5,-192"/>
-<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="119.5,-738 19.5,-738 19.5,-714 119.5,-714 119.5,-738"/>
+<text text-anchor="middle" x="69.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~export_xc~3 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge27" class="edge">
-<title>program~example1_curve&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M119.89,-168.41C140.97,-163.46 165.81,-157.64 188.07,-152.41"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="189.15,-155.75 198.09,-150.06 187.56,-148.94 189.15,-155.75"/>
+<!-- program~example1_curve&#45;&gt;proc~export_xc -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge14" class="edge">
+<title>program~example1_curve&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M114.87,-713.97C123.01,-711.32 131.35,-708.31 139,-705 168.62,-692.2 200.43,-673.49 222.28,-659.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="224.43,-662.56 230.99,-654.25 220.68,-656.65 224.43,-662.56"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~export_xg~3 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge45" class="edge">
-<title>program~example1_curve&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M119.57,-168.7C126.38,-166.08 133.07,-162.88 139,-159 159.57,-145.53 154.28,-130.24 175,-117 177.77,-115.23 180.7,-113.6 183.72,-112.11"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="185.27,-115.25 193.03,-108.03 182.46,-108.84 185.27,-115.25"/>
+<!-- program~example1_curve&#45;&gt;proc~export_xg -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge32" class="edge">
+<title>program~example1_curve&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M119.71,-716.69C126.73,-713.79 133.45,-709.99 139,-705 169.22,-677.86 144.47,-647.79 175,-621 176.51,-619.67 178.11,-618.42 179.77,-617.26"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="181.71,-620.17 188.52,-612.05 178.13,-614.16 181.71,-620.17"/>
 </g>
 <!-- program~example3_surface -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node16" class="node">
 <title>program~example3_surface</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node16"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-444 14.5,-444 14.5,-420 124.5,-420 124.5,-444"/>
-<text text-anchor="middle" x="69.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-234 14.5,-234 14.5,-210 124.5,-210 124.5,-234"/>
+<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge21" class="edge">
-<title>program~example3_surface&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M114.87,-419.97C123.01,-417.32 131.35,-414.31 139,-411 168.62,-398.2 200.43,-379.49 222.28,-365.78"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="224.43,-368.56 230.99,-360.25 220.68,-362.65 224.43,-368.56"/>
+<!-- program~example3_surface&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge26" class="edge">
+<title>program~example3_surface&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M111.57,-209.89C120.64,-207.08 130.18,-204.03 139,-201 162.63,-192.9 188.77,-183 209.69,-174.86"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="211.17,-178.03 219.21,-171.13 208.62,-171.52 211.17,-178.03"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge39" class="edge">
-<title>program~example3_surface&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M124.57,-420.51C129.8,-417.95 134.74,-414.82 139,-411 169.22,-383.86 144.47,-353.79 175,-327 176.51,-325.67 178.11,-324.42 179.77,-323.26"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="181.71,-326.17 188.52,-318.05 178.13,-320.16 181.71,-326.17"/>
+<!-- program~example3_surface&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge44" class="edge">
+<title>program~example3_surface&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M124.49,-209.84C129.68,-207.41 134.63,-204.5 139,-201 164.19,-180.86 149.59,-157.85 175,-138 176.85,-136.55 178.79,-135.21 180.81,-133.96"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="182.87,-136.82 190.06,-129.03 179.58,-130.64 182.87,-136.82"/>
 </g>
 <!-- program~example3_volume -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node17" class="node">
 <title>program~example3_volume</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node17"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-570 14.5,-570 14.5,-546 124.5,-546 124.5,-570"/>
-<text text-anchor="middle" x="69.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-360 14.5,-360 14.5,-336 124.5,-336 124.5,-360"/>
+<text text-anchor="middle" x="69.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge14" class="edge">
-<title>program~example3_volume&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M121.79,-570.04C142.58,-574.91 166.75,-580.58 188.43,-585.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="187.66,-589.09 198.2,-587.96 189.26,-582.27 187.66,-589.09"/>
+<!-- program~example3_volume&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge19" class="edge">
+<title>program~example3_volume&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M115.26,-360.09C123.28,-362.72 131.48,-365.71 139,-369 155.97,-376.43 157.95,-382.76 175,-390 179.95,-392.1 185.17,-394.06 190.46,-395.86"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="189.41,-399.2 200,-398.95 191.56,-392.54 189.41,-399.2"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge32" class="edge">
-<title>program~example3_volume&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M124.69,-558C137.24,-558 150.89,-558 164.4,-558"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="164.69,-561.5 174.69,-558 164.69,-554.5 164.69,-561.5"/>
+<!-- program~example3_volume&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge37" class="edge">
+<title>program~example3_volume&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M124.69,-354.36C137.24,-355.83 150.89,-357.43 164.4,-359.02"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="164.35,-362.53 174.69,-360.22 165.16,-355.58 164.35,-362.53"/>
 </g>
 <!-- program~example_nurbs_curve -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node18" class="node">
 <title>program~example_nurbs_curve</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node18"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="134,-150 5,-150 5,-126 134,-126 134,-150"/>
-<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="134,-696 5,-696 5,-672 134,-672 134,-696"/>
+<text text-anchor="middle" x="69.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~export_xc~3 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge28" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M134.11,-138C145.81,-138 158.15,-138 170.24,-138"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="170.32,-141.5 180.32,-138 170.32,-134.5 170.32,-141.5"/>
+<!-- program~example_nurbs_curve&#45;&gt;proc~export_xc -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge15" class="edge">
+<title>program~example_nurbs_curve&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M121.79,-671.96C142.58,-667.09 166.75,-661.42 188.43,-656.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="189.26,-659.73 198.2,-654.04 187.66,-652.91 189.26,-659.73"/>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~export_xg~3 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge46" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M121.79,-125.96C142.58,-121.09 166.75,-115.42 188.43,-110.33"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="189.26,-113.73 198.2,-108.04 187.66,-106.91 189.26,-113.73"/>
+<!-- program~example_nurbs_curve&#45;&gt;proc~export_xg -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge33" class="edge">
+<title>program~example_nurbs_curve&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M121.36,-672C127.55,-669.51 133.59,-666.54 139,-663 159.57,-649.53 154.28,-634.24 175,-621 177.77,-619.23 180.7,-617.6 183.72,-616.11"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="185.27,-619.25 193.03,-612.03 182.46,-612.84 185.27,-619.25"/>
 </g>
 <!-- program~example_nurbs_surface -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node19" class="node">
 <title>program~example_nurbs_surface</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node19"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-402 0,-402 0,-378 139,-378 139,-402"/>
-<text text-anchor="middle" x="69.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-192 0,-192 0,-168 139,-168 139,-192"/>
+<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge22" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M121.79,-377.96C142.58,-373.09 166.75,-367.42 188.43,-362.33"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="189.26,-365.73 198.2,-360.04 187.66,-358.91 189.26,-365.73"/>
+<!-- program~example_nurbs_surface&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge27" class="edge">
+<title>program~example_nurbs_surface&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M139.19,-171.94C147.7,-170.94 156.47,-169.91 165.17,-168.89"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="165.81,-172.34 175.34,-167.7 165,-165.39 165.81,-172.34"/>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge40" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M121.36,-378C127.55,-375.51 133.59,-372.54 139,-369 159.57,-355.53 154.28,-340.24 175,-327 177.77,-325.23 180.7,-323.6 183.72,-322.11"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="185.27,-325.25 193.03,-318.03 182.46,-318.84 185.27,-325.25"/>
+<!-- program~example_nurbs_surface&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge45" class="edge">
+<title>program~example_nurbs_surface&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M115.26,-167.91C123.28,-165.28 131.48,-162.29 139,-159 155.97,-151.57 157.95,-145.24 175,-138 179.95,-135.9 185.17,-133.94 190.46,-132.14"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="191.56,-135.46 200,-129.05 189.41,-128.8 191.56,-135.46"/>
 </g>
 <!-- program~example_nurbs_volume -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node20" class="node">
 <title>program~example_nurbs_volume</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node20"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-528 0,-528 0,-504 139,-504 139,-528"/>
-<text text-anchor="middle" x="69.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-318 0,-318 0,-294 139,-294 139,-318"/>
+<text text-anchor="middle" x="69.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge15" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M121.36,-528C127.55,-530.49 133.59,-533.46 139,-537 159.57,-550.47 154.28,-565.76 175,-579 177.77,-580.77 180.7,-582.4 183.72,-583.89"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="182.46,-587.16 193.03,-587.97 185.27,-580.75 182.46,-587.16"/>
+<!-- program~example_nurbs_volume&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge20" class="edge">
+<title>program~example_nurbs_volume&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M124.49,-318.16C129.68,-320.59 134.63,-323.5 139,-327 164.19,-347.14 149.59,-370.15 175,-390 176.85,-391.45 178.79,-392.79 180.81,-394.04"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="179.58,-397.36 190.06,-398.97 182.87,-391.18 179.58,-397.36"/>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge33" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M121.79,-528.04C142.58,-532.91 166.75,-538.58 188.43,-543.67"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="187.66,-547.09 198.2,-545.96 189.26,-540.27 187.66,-547.09"/>
+<!-- program~example_nurbs_volume&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge38" class="edge">
+<title>program~example_nurbs_volume&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M111.57,-318.11C120.64,-320.92 130.18,-323.97 139,-327 162.63,-335.1 188.77,-345 209.69,-353.14"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="208.62,-356.48 219.21,-356.87 211.17,-349.97 208.62,-356.48"/>
 </g>
 <!-- program~example_put_to_nurbs -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node21" class="node">
 <title>program~example_put_to_nurbs</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node21"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-486 3.5,-486 3.5,-462 135.5,-462 135.5,-486"/>
-<text text-anchor="middle" x="69.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-276 3.5,-276 3.5,-252 135.5,-252 135.5,-276"/>
+<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge16" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M125.92,-486.17C130.66,-488.6 135.11,-491.51 139,-495 169.22,-522.14 144.47,-552.21 175,-579 176.51,-580.33 178.11,-581.58 179.77,-582.74"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="178.13,-585.84 188.52,-587.95 181.71,-579.83 178.13,-585.84"/>
+<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge21" class="edge">
+<title>program~example_put_to_nurbs&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M126.54,-276.05C131.09,-278.5 135.34,-281.45 139,-285 174.45,-319.31 139.16,-356.1 175,-390 176.28,-391.21 177.61,-392.34 179.01,-393.42"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="177.2,-396.42 187.51,-398.88 180.99,-390.53 177.2,-396.42"/>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge34" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M114.87,-486.03C123.01,-488.68 131.35,-491.69 139,-495 168.62,-507.8 200.43,-526.51 222.28,-540.22"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="220.68,-543.35 230.99,-545.75 224.43,-537.44 220.68,-543.35"/>
+<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge39" class="edge">
+<title>program~example_put_to_nurbs&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M117.8,-276.09C125.07,-278.63 132.36,-281.6 139,-285 173.27,-302.57 207.81,-330.93 228.93,-349.77"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="226.84,-352.6 236.6,-356.72 231.54,-347.41 226.84,-352.6"/>
 </g>
 <!-- program~shape_c_1d -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node22" class="node">
 <title>program~shape_c_1d</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node22"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-108 31.5,-108 31.5,-84 107.5,-84 107.5,-108"/>
-<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-654 31.5,-654 31.5,-630 107.5,-630 107.5,-654"/>
+<text text-anchor="middle" x="69.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~export_xc~3 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge29" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M107.59,-104.7C130.83,-110.16 161.36,-117.32 188.15,-123.6"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="187.67,-127.09 198.21,-125.96 189.27,-120.27 187.67,-127.09"/>
+<!-- program~shape_c_1d&#45;&gt;proc~export_xc -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge16" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M107.59,-642C125.71,-642 148.26,-642 170.01,-642"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="170.26,-645.5 180.26,-642 170.26,-638.5 170.26,-645.5"/>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~export_xg~3 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge47" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M107.59,-96C125.62,-96 148.04,-96 169.69,-96"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="169.9,-99.5 179.9,-96 169.9,-92.5 169.9,-99.5"/>
+<!-- program~shape_c_1d&#45;&gt;proc~export_xg -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge34" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M107.59,-633.3C130.83,-627.84 161.36,-620.68 188.15,-614.4"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="189.27,-617.73 198.21,-612.04 187.67,-610.91 189.27,-617.73"/>
 </g>
 <!-- program~shape_c_2d -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node23" class="node">
 <title>program~shape_c_2d</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node23"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-360 31.5,-360 31.5,-336 107.5,-336 107.5,-360"/>
-<text text-anchor="middle" x="69.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
+<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge23" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M107.59,-348C124.32,-348 144.83,-348 164.99,-348"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="165.17,-351.5 175.17,-348 165.17,-344.5 165.17,-351.5"/>
+<!-- program~shape_c_2d&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge28" class="edge">
+<title>program~shape_c_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M107.59,-142.35C124.32,-144.31 144.83,-146.72 164.99,-149.09"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="164.83,-152.59 175.17,-150.28 165.64,-145.64 164.83,-152.59"/>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge41" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M107.59,-339.3C130.83,-333.84 161.36,-326.68 188.15,-320.4"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="189.27,-323.73 198.21,-318.04 187.67,-316.91 189.27,-323.73"/>
+<!-- program~shape_c_2d&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge46" class="edge">
+<title>program~shape_c_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M107.59,-133.65C124.23,-131.7 144.61,-129.31 164.68,-126.95"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="165.28,-130.41 174.8,-125.76 164.46,-123.45 165.28,-130.41"/>
 </g>
 <!-- program~shape_c_3d -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node24" class="node">
 <title>program~shape_c_3d</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node24"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-738 31.5,-738 31.5,-714 107.5,-714 107.5,-738"/>
-<text text-anchor="middle" x="69.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-528 31.5,-528 31.5,-504 107.5,-504 107.5,-528"/>
+<text text-anchor="middle" x="69.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge17" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M107.72,-717.98C118.25,-714.82 129.44,-710.58 139,-705 177.67,-682.41 213.5,-643.81 233.35,-620.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="236.24,-622.22 239.91,-612.28 230.84,-617.76 236.24,-622.22"/>
+<!-- program~shape_c_3d&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge22" class="edge">
+<title>program~shape_c_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M107.7,-507.19C118.12,-504.04 129.26,-499.99 139,-495 173.27,-477.43 207.81,-449.07 228.93,-430.23"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="231.54,-432.59 236.6,-423.28 226.84,-427.4 231.54,-432.59"/>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge35" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M107.53,-721.63C118.91,-718.61 130.64,-713.52 139,-705 179.79,-663.42 133.74,-620.11 175,-579 176.1,-577.9 177.25,-576.86 178.45,-575.88"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="180.64,-578.62 186.95,-570.11 176.71,-572.83 180.64,-578.62"/>
+<!-- program~shape_c_3d&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge40" class="edge">
+<title>program~shape_c_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M107.63,-511.28C118.89,-508.23 130.51,-503.22 139,-495 174.45,-460.69 139.16,-423.9 175,-390 176.28,-388.79 177.61,-387.66 179.01,-386.58"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="180.99,-389.47 187.51,-381.12 177.2,-383.58 180.99,-389.47"/>
 </g>
 <!-- program~shape_circle -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node25" class="node">
 <title>program~shape_circle</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node25"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-66 30,-66 30,-42 109,-42 109,-66"/>
-<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-612 30,-612 30,-588 109,-588 109,-612"/>
+<text text-anchor="middle" x="69.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~export_xc~3 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge30" class="edge">
-<title>program~shape_circle&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M109.16,-61.73C119.38,-64.85 130.05,-69.14 139,-75 159.57,-88.47 154.28,-103.76 175,-117 177.77,-118.77 180.7,-120.4 183.72,-121.89"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="182.46,-125.16 193.03,-125.97 185.27,-118.75 182.46,-125.16"/>
+<!-- program~shape_circle&#45;&gt;proc~export_xc -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge17" class="edge">
+<title>program~shape_circle&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M109.34,-609.11C132.41,-614.53 162.17,-621.51 188.33,-627.65"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="187.62,-631.08 198.16,-629.95 189.22,-624.26 187.62,-631.08"/>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~export_xg~3 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge48" class="edge">
-<title>program~shape_circle&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M109.34,-63.11C132.41,-68.53 162.17,-75.51 188.33,-81.65"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="187.62,-85.08 198.16,-83.95 189.22,-78.26 187.62,-85.08"/>
+<!-- program~shape_circle&#45;&gt;proc~export_xg -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge35" class="edge">
+<title>program~shape_circle&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M109.34,-600C127.01,-600 148.62,-600 169.52,-600"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="169.7,-603.5 179.7,-600 169.7,-596.5 169.7,-603.5"/>
 </g>
 <!-- program~shape_half_circle -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node26" class="node">
 <title>program~shape_half_circle</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node26"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121.5,-24 17.5,-24 17.5,0 121.5,0 121.5,-24"/>
-<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121.5,-570 17.5,-570 17.5,-546 121.5,-546 121.5,-570"/>
+<text text-anchor="middle" x="69.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~export_xc~3 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge31" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M121.81,-22.21C128.07,-24.98 134,-28.51 139,-33 169.22,-60.14 144.47,-90.21 175,-117 176.51,-118.33 178.11,-119.58 179.77,-120.74"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="178.13,-123.84 188.52,-125.95 181.71,-117.83 178.13,-123.84"/>
+<!-- program~shape_half_circle&#45;&gt;proc~export_xc -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge18" class="edge">
+<title>program~shape_half_circle&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M121.36,-570C127.55,-572.49 133.59,-575.46 139,-579 159.57,-592.47 154.28,-607.76 175,-621 177.77,-622.77 180.7,-624.4 183.72,-625.89"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="182.46,-629.16 193.03,-629.97 185.27,-622.75 182.46,-629.16"/>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~export_xg~3 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge49" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M114.87,-24.03C123.01,-26.68 131.35,-29.69 139,-33 168.62,-45.8 200.43,-64.51 222.28,-78.22"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="220.68,-81.35 230.99,-83.75 224.43,-75.44 220.68,-81.35"/>
+<!-- program~shape_half_circle&#45;&gt;proc~export_xg -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge36" class="edge">
+<title>program~shape_half_circle&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M121.79,-570.04C142.58,-574.91 166.75,-580.58 188.43,-585.67"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="187.66,-589.09 198.2,-587.96 189.26,-582.27 187.66,-589.09"/>
 </g>
 <!-- program~shape_half_ring_2d -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node27" class="node">
 <title>program~shape_half_ring_2d</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node27"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-318 12,-318 12,-294 127,-294 127,-318"/>
-<text text-anchor="middle" x="69.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
+<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge24" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M121.79,-318.04C142.58,-322.91 166.75,-328.58 188.43,-333.67"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="187.66,-337.09 198.2,-335.96 189.26,-330.27 187.66,-337.09"/>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge29" class="edge">
+<title>program~shape_half_ring_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M115.26,-108.09C123.28,-110.72 131.48,-113.71 139,-117 155.97,-124.43 157.95,-130.76 175,-138 179.95,-140.1 185.17,-142.06 190.46,-143.86"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="189.41,-147.2 200,-146.95 191.56,-140.54 189.41,-147.2"/>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge42" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M127.14,-306C139.1,-306 151.97,-306 164.71,-306"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="164.88,-309.5 174.88,-306 164.88,-302.5 164.88,-309.5"/>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge47" class="edge">
+<title>program~shape_half_ring_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M127.14,-102.64C139.1,-104.05 151.97,-105.56 164.71,-107.05"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="164.54,-110.56 174.88,-108.25 165.36,-103.6 164.54,-110.56"/>
 </g>
 <!-- program~shape_half_ring_3d -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node28" class="node">
 <title>program~shape_half_ring_3d</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node28"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-696 12,-696 12,-672 127,-672 127,-696"/>
-<text text-anchor="middle" x="69.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-486 12,-486 12,-462 127,-462 127,-486"/>
+<text text-anchor="middle" x="69.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge18" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M114.87,-671.97C123.01,-669.32 131.35,-666.31 139,-663 168.62,-650.2 200.43,-631.49 222.28,-617.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="224.43,-620.56 230.99,-612.25 220.68,-614.65 224.43,-620.56"/>
+<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge23" class="edge">
+<title>program~shape_half_ring_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M111.57,-461.89C120.64,-459.08 130.18,-456.03 139,-453 162.63,-444.9 188.77,-435 209.69,-426.86"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="211.17,-430.03 219.21,-423.13 208.62,-423.52 211.17,-430.03"/>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge36" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M125.92,-671.83C130.66,-669.4 135.11,-666.49 139,-663 169.22,-635.86 144.47,-605.79 175,-579 176.51,-577.67 178.11,-576.42 179.77,-575.26"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="181.71,-578.17 188.52,-570.05 178.13,-572.16 181.71,-578.17"/>
+<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge41" class="edge">
+<title>program~shape_half_ring_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M124.49,-461.84C129.68,-459.41 134.63,-456.5 139,-453 164.19,-432.86 149.59,-409.85 175,-390 176.85,-388.55 178.79,-387.21 180.81,-385.96"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="182.87,-388.82 190.06,-381.03 179.58,-382.64 182.87,-388.82"/>
 </g>
 <!-- program~shape_hexahedron -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node29" class="node">
 <title>program~shape_hexahedron</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node29"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-654 13,-654 13,-630 126,-630 126,-654"/>
-<text text-anchor="middle" x="69.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-444 13,-444 13,-420 126,-420 126,-444"/>
+<text text-anchor="middle" x="69.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge19" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M121.79,-629.96C142.58,-625.09 166.75,-619.42 188.43,-614.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="189.26,-617.73 198.2,-612.04 187.66,-610.91 189.26,-617.73"/>
+<!-- program~shape_hexahedron&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge24" class="edge">
+<title>program~shape_hexahedron&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M126.16,-425.47C138.59,-424.01 152.04,-422.43 165.33,-420.87"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="165.93,-424.33 175.45,-419.69 165.11,-417.38 165.93,-424.33"/>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge37" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M121.36,-630C127.55,-627.51 133.59,-624.54 139,-621 159.57,-607.53 154.28,-592.24 175,-579 177.77,-577.23 180.7,-575.6 183.72,-574.11"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="185.27,-577.25 193.03,-570.03 182.46,-570.84 185.27,-577.25"/>
+<!-- program~shape_hexahedron&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge42" class="edge">
+<title>program~shape_hexahedron&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M115.26,-419.91C123.28,-417.28 131.48,-414.29 139,-411 155.97,-403.57 157.95,-397.24 175,-390 179.95,-387.9 185.17,-385.94 190.46,-384.14"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="191.56,-387.46 200,-381.05 189.41,-380.8 191.56,-387.46"/>
 </g>
 <!-- program~shape_ring_2d -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node30" class="node">
 <title>program~shape_ring_2d</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node30"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-276 24.5,-276 24.5,-252 114.5,-252 114.5,-276"/>
-<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-66 24.5,-66 24.5,-42 114.5,-42 114.5,-66"/>
+<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge25" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M114.54,-273.47C123.05,-276.39 131.61,-280.16 139,-285 159.57,-298.47 154.28,-313.76 175,-327 177.77,-328.77 180.7,-330.4 183.72,-331.89"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="182.46,-335.16 193.03,-335.97 185.27,-328.75 182.46,-335.16"/>
+<!-- program~shape_ring_2d&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge30" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M114.6,-62.16C123.29,-65.18 131.91,-69.33 139,-75 164.19,-95.14 149.59,-118.15 175,-138 176.85,-139.45 178.79,-140.79 180.81,-142.04"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="179.58,-145.36 190.06,-146.97 182.87,-139.18 179.58,-145.36"/>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge43" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M114.75,-274.38C136.95,-279.59 164.19,-285.98 188.36,-291.65"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="187.62,-295.08 198.15,-293.95 189.22,-288.26 187.62,-295.08"/>
+<!-- program~shape_ring_2d&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge48" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M111.57,-66.11C120.64,-68.92 130.18,-71.97 139,-75 162.63,-83.1 188.77,-93 209.69,-101.14"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="208.62,-104.48 219.21,-104.87 211.17,-97.97 208.62,-104.48"/>
 </g>
 <!-- program~shape_ring_3d -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node31" class="node">
 <title>program~shape_ring_3d</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node31"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-612 24.5,-612 24.5,-588 114.5,-588 114.5,-612"/>
-<text text-anchor="middle" x="69.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-402 24.5,-402 24.5,-378 114.5,-378 114.5,-402"/>
+<text text-anchor="middle" x="69.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge20" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M114.75,-600C130.07,-600 147.78,-600 165.24,-600"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="165.46,-603.5 175.46,-600 165.46,-596.5 165.46,-603.5"/>
+<!-- program~shape_ring_3d&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge25" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M114.75,-395.19C130.07,-396.99 147.78,-399.07 165.24,-401.11"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="165.12,-404.62 175.46,-402.31 165.94,-397.67 165.12,-404.62"/>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge38" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M114.75,-589.62C136.95,-584.41 164.19,-578.02 188.36,-572.35"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="189.22,-575.74 198.15,-570.05 187.62,-568.92 189.22,-575.74"/>
+<!-- program~shape_ring_3d&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge43" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M114.75,-384.81C129.89,-383.03 147.38,-380.98 164.64,-378.96"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="165.24,-382.41 174.76,-377.77 164.42,-375.46 165.24,-382.41"/>
 </g>
 <!-- program~shape_tetragon -->
 <g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_node32" class="node">
 <title>program~shape_tetragon</title>
 <g id="a_proc~~cmp_elemconn_c0_l~~CalledByGraph_node32"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-234 21.5,-234 21.5,-210 117.5,-210 117.5,-234"/>
-<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-24 21.5,-24 21.5,0 117.5,0 117.5,-24"/>
+<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge26" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M117.59,-230.47C125.38,-233.46 132.89,-237.51 139,-243 169.22,-270.14 144.47,-300.21 175,-327 176.51,-328.33 178.11,-329.58 179.77,-330.74"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="178.13,-333.84 188.52,-335.95 181.71,-327.83 178.13,-333.84"/>
+<!-- program~shape_tetragon&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge31" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M117.59,-19.96C125.47,-23 133.01,-27.2 139,-33 174.45,-67.31 139.16,-104.1 175,-138 176.28,-139.21 177.61,-140.34 179.01,-141.42"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="177.2,-144.42 187.51,-146.88 180.99,-138.53 177.2,-144.42"/>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge44" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M114.87,-234.03C123.01,-236.68 131.35,-239.69 139,-243 168.62,-255.8 200.43,-274.51 222.28,-288.22"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="220.68,-291.35 230.99,-293.75 224.43,-285.44 220.68,-291.35"/>
+<!-- program~shape_tetragon&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_l~~CalledByGraph_edge49" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M117.8,-24.09C125.07,-26.63 132.36,-29.6 139,-33 173.27,-50.57 207.81,-78.93 228.93,-97.77"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="226.84,-100.6 236.6,-104.72 231.54,-95.41 226.84,-100.6"/>
 </g>
 </g>
 </svg>
@@ -908,7 +908,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elemconn_c0_s.html b/proc/cmp_elemconn_c0_s.html
index bf512eb2b..208cf28b5 100644
--- a/proc/cmp_elemconn_c0_s.html
+++ b/proc/cmp_elemconn_c0_s.html
@@ -244,581 +244,581 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~cmp_elemconn_c0_s -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node1" class="node">
 <title>proc~cmp_elemconn_c0_s</title>
-<polygon fill="none" stroke="black" points="840,-339 713,-339 713,-315 840,-315 840,-339"/>
-<text text-anchor="middle" x="776.5" y="-324.6" font-family="Helvetica,sans-Serif" font-size="10.50">cmp_elemConn_C0_S</text>
+<polygon fill="none" stroke="black" points="840,-402 713,-402 713,-378 840,-378 840,-402"/>
+<text text-anchor="middle" x="776.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50">cmp_elemConn_C0_S</text>
 </g>
 <!-- interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node2" class="node">
 <title>interface~elemconn_c0</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node2"><a xlink:href="../interface/elemconn_c0.html" xlink:title="elemConn_C0">
-<polygon fill="#a7506f" stroke="#a7506f" points="677,-339 590,-339 590,-315 677,-315 677,-339"/>
-<text text-anchor="middle" x="633.5" y="-324.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="677,-402 590,-402 590,-378 677,-378 677,-402"/>
+<text text-anchor="middle" x="633.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge1" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M677.19,-327C685.29,-327 693.97,-327 702.69,-327"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="702.93,-330.5 712.93,-327 702.93,-323.5 702.93,-330.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M677.19,-390C685.29,-390 693.97,-390 702.69,-390"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="702.93,-393.5 712.93,-390 702.93,-386.5 702.93,-393.5"/>
 </g>
 <!-- proc~cmp_elem_xc_vis -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node3" class="node">
 <title>proc~cmp_elem_xc_vis</title>
-<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-570 362.5,-570 362.5,-546 553.5,-546 553.5,-570"/>
-<text text-anchor="middle" x="458" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="548.5,-612 367.5,-612 367.5,-588 548.5,-588 548.5,-612"/>
+<text text-anchor="middle" x="458" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge2" class="edge">
 <title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M484.83,-545.89C505.73,-535.02 534.75,-517.34 554,-495 592.49,-450.32 616.09,-383.57 626.4,-349.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="629.86,-349.83 629.28,-339.25 623.14,-347.89 629.86,-349.83"/>
+<path fill="none" stroke="#ff0000" d="M484.1,-587.84C504.85,-576.82 534.03,-558.96 554,-537 588.65,-498.89 613.07,-442.7 624.73,-412.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="628.14,-412.88 628.32,-402.28 621.57,-410.45 628.14,-412.88"/>
 </g>
 <!-- proc~cmp_elem_xc_vis~2 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node4" class="node">
 <title>proc~cmp_elem_xc_vis~2</title>
-<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node4"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-360 362.5,-360 362.5,-336 553.5,-336 553.5,-360"/>
-<text text-anchor="middle" x="458" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node4"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-423 362.5,-423 362.5,-399 553.5,-399 553.5,-423"/>
+<text text-anchor="middle" x="458" y="-408.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge3" class="edge">
 <title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M553.62,-336.55C562.64,-335.46 571.54,-334.38 579.94,-333.36"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="580.4,-336.83 589.9,-332.16 579.56,-329.88 580.4,-336.83"/>
+<path fill="none" stroke="#ff0000" d="M553.62,-399.55C562.64,-398.46 571.54,-397.38 579.94,-396.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="580.4,-399.83 589.9,-395.16 579.56,-392.88 580.4,-399.83"/>
 </g>
 <!-- proc~cmp_elem_xc_vis~3 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node5" class="node">
 <title>proc~cmp_elem_xc_vis~3</title>
-<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node5"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="548.5,-245 367.5,-245 367.5,-221 548.5,-221 548.5,-245"/>
-<text text-anchor="middle" x="458" y="-230.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xc_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node5"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-297 362.5,-297 362.5,-273 553.5,-273 553.5,-297"/>
+<text text-anchor="middle" x="458" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge4" class="edge">
 <title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M481.33,-245.1C511.78,-261.59 566.49,-291.24 601.08,-309.97"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="599.8,-313.26 610.26,-314.95 603.13,-307.11 599.8,-313.26"/>
+<path fill="none" stroke="#ff0000" d="M478.9,-297.04C509.54,-315.59 568.41,-351.22 603.7,-372.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="602.2,-375.75 612.56,-377.93 605.82,-369.76 602.2,-375.75"/>
 </g>
 <!-- proc~cmp_elem_xg_vis -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node6" class="node">
 <title>proc~cmp_elem_xg_vis</title>
-<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node6"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="554,-486 362,-486 362,-462 554,-462 554,-486"/>
-<text text-anchor="middle" x="458" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node6"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="549,-528 367,-528 367,-504 549,-504 549,-528"/>
+<text text-anchor="middle" x="458" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge5" class="edge">
 <title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M473.2,-461.97C503.32,-436.45 573.82,-376.72 610.08,-345.99"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="612.74,-348.33 618.11,-339.2 608.21,-342.99 612.74,-348.33"/>
+<path fill="none" stroke="#ff0000" d="M475.64,-503.92C506.21,-481.72 571.48,-434.31 607.44,-408.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="609.88,-410.75 615.91,-402.04 605.77,-405.09 609.88,-410.75"/>
 </g>
 <!-- proc~cmp_elem_xg_vis~2 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node7" class="node">
 <title>proc~cmp_elem_xg_vis~2</title>
-<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node7"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="554,-318 362,-318 362,-294 554,-294 554,-318"/>
-<text text-anchor="middle" x="458" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node7"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="554,-381 362,-381 362,-357 554,-357 554,-381"/>
+<text text-anchor="middle" x="458" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge6" class="edge">
 <title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M554.13,-317.51C562.89,-318.58 571.55,-319.62 579.72,-320.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="579.45,-324.1 589.79,-321.83 580.29,-317.15 579.45,-324.1"/>
+<path fill="none" stroke="#ff0000" d="M554.13,-380.51C562.89,-381.58 571.55,-382.62 579.72,-383.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="579.45,-387.1 589.79,-384.83 580.29,-380.15 579.45,-387.1"/>
 </g>
 <!-- proc~cmp_elem_xg_vis~3 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node8" class="node">
 <title>proc~cmp_elem_xg_vis~3</title>
-<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node8"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="549,-140 367,-140 367,-116 549,-116 549,-140"/>
-<text text-anchor="middle" x="458" y="-125.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xg_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node8"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="554,-171 362,-171 362,-147 554,-147 554,-171"/>
+<text text-anchor="middle" x="458" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge7" class="edge">
 <title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M474.88,-140.02C494.68,-155.45 528.95,-183.6 554,-212 580.82,-242.41 606.2,-282.34 620.51,-306.26"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="617.5,-308.05 625.6,-314.88 623.52,-304.49 617.5,-308.05"/>
+<path fill="none" stroke="#ff0000" d="M471.47,-171.29C490.41,-190.28 527.06,-228.28 554,-264 580.43,-299.03 606.42,-343.19 620.87,-368.85"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="617.89,-370.69 625.82,-377.72 624.01,-367.28 617.89,-370.69"/>
 </g>
 <!-- proc~export_xc -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node9" class="node">
 <title>proc~export_xc</title>
-<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node9"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_volume%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="325.5,-612 175.5,-612 175.5,-588 325.5,-588 325.5,-612"/>
-<text text-anchor="middle" x="250.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
+<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node9"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_curve%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="320.5,-654 180.5,-654 180.5,-630 320.5,-630 320.5,-654"/>
+<text text-anchor="middle" x="250.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge8" class="edge">
 <title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
-<path fill="none" stroke="#ff0000" d="M310.39,-587.96C334.68,-583 363,-577.21 388.23,-572.05"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="389.01,-575.47 398.1,-570.04 387.61,-568.61 389.01,-575.47"/>
+<path fill="none" stroke="#ff0000" d="M310.39,-629.96C334.68,-625 363,-619.21 388.23,-614.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="389.01,-617.47 398.1,-612.04 387.61,-610.61 389.01,-617.47"/>
 </g>
 <!-- proc~export_xc~2 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node10" class="node">
 <title>proc~export_xc~2</title>
-<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node10"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_surface%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="325.5,-360 175.5,-360 175.5,-336 325.5,-336 325.5,-360"/>
-<text text-anchor="middle" x="250.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
+<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node10"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_volume%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="325.5,-423 175.5,-423 175.5,-399 325.5,-399 325.5,-423"/>
+<text text-anchor="middle" x="250.5" y="-408.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge9" class="edge">
 <title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
-<path fill="none" stroke="#ffff00" d="M325.69,-348C334.29,-348 343.19,-348 352.1,-348"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="352.16,-351.5 362.16,-348 352.16,-344.5 352.16,-351.5"/>
+<path fill="none" stroke="#ffff00" d="M325.69,-411C334.29,-411 343.19,-411 352.1,-411"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="352.16,-414.5 362.16,-411 352.16,-407.5 352.16,-414.5"/>
 </g>
 <!-- proc~export_xc~3 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node11" class="node">
 <title>proc~export_xc~3</title>
-<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node11"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_curve%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="320.5,-150 180.5,-150 180.5,-126 320.5,-126 320.5,-150"/>
-<text text-anchor="middle" x="250.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xc</text>
+<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node11"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_surface%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="325.5,-171 175.5,-171 175.5,-147 325.5,-147 325.5,-171"/>
+<text text-anchor="middle" x="250.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge10" class="edge">
 <title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
-<path fill="none" stroke="#00ff00" d="M277.53,-150.03C314.1,-166.94 380.8,-197.77 421.78,-216.72"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="420.32,-219.9 430.86,-220.92 423.25,-213.54 420.32,-219.9"/>
+<path fill="none" stroke="#00ff00" d="M271.2,-171.08C307.8,-193.52 386.37,-241.69 428.66,-267.63"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="427,-270.71 437.36,-272.96 430.66,-264.74 427,-270.71"/>
 </g>
 <!-- proc~export_xg -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node12" class="node">
 <title>proc~export_xg</title>
-<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node12"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_volume%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="326,-570 175,-570 175,-546 326,-546 326,-570"/>
-<text text-anchor="middle" x="250.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
+<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node12"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_curve%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="321,-612 180,-612 180,-588 321,-588 321,-612"/>
+<text text-anchor="middle" x="250.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge11" class="edge">
 <title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
-<path fill="none" stroke="#00ffff" d="M280.94,-545.96C317.03,-531.21 378.3,-506.17 418.2,-489.86"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="419.68,-493.04 427.61,-486.01 417.03,-486.56 419.68,-493.04"/>
+<path fill="none" stroke="#00ffff" d="M280.94,-587.96C317.03,-573.21 378.3,-548.17 418.2,-531.86"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="419.68,-535.04 427.61,-528.01 417.03,-528.56 419.68,-535.04"/>
 </g>
 <!-- proc~export_xg~2 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node13" class="node">
 <title>proc~export_xg~2</title>
-<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node13"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_surface%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="326,-318 175,-318 175,-294 326,-294 326,-318"/>
-<text text-anchor="middle" x="250.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
+<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node13"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_volume%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="326,-381 175,-381 175,-357 326,-357 326,-381"/>
+<text text-anchor="middle" x="250.5" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge12" class="edge">
 <title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
-<path fill="none" stroke="#0000ff" d="M326.27,-306C334.6,-306 343.2,-306 351.82,-306"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="351.93,-309.5 361.93,-306 351.93,-302.5 351.93,-309.5"/>
+<path fill="none" stroke="#0000ff" d="M326.27,-369C334.6,-369 343.2,-369 351.82,-369"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="351.93,-372.5 361.93,-369 351.93,-365.5 351.93,-372.5"/>
 </g>
 <!-- proc~export_xg~3 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node14" class="node">
 <title>proc~export_xg~3</title>
-<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node14"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_curve%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="321,-108 180,-108 180,-84 321,-84 321,-108"/>
-<text text-anchor="middle" x="250.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xg</text>
+<g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node14"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_surface%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="326,-129 175,-129 175,-105 326,-105 326,-129"/>
+<text text-anchor="middle" x="250.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge13" class="edge">
 <title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
-<path fill="none" stroke="#ff00ff" d="M321.07,-106.83C336.69,-109.27 353.46,-111.88 369.7,-114.41"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="369.31,-117.89 379.73,-115.97 370.39,-110.97 369.31,-117.89"/>
+<path fill="none" stroke="#ff00ff" d="M310.39,-129.04C334.68,-134 363,-139.79 388.23,-144.95"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="387.61,-148.39 398.1,-146.96 389.01,-141.53 387.61,-148.39"/>
 </g>
 <!-- program~example1_curve -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node15" class="node">
 <title>program~example1_curve</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node15"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="119.5,-192 19.5,-192 19.5,-168 119.5,-168 119.5,-192"/>
-<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="119.5,-738 19.5,-738 19.5,-714 119.5,-714 119.5,-738"/>
+<text text-anchor="middle" x="69.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~export_xc~3 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge27" class="edge">
-<title>program~example1_curve&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M119.89,-168.41C140.97,-163.46 165.81,-157.64 188.07,-152.41"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="189.15,-155.75 198.09,-150.06 187.56,-148.94 189.15,-155.75"/>
+<!-- program~example1_curve&#45;&gt;proc~export_xc -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge14" class="edge">
+<title>program~example1_curve&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M114.87,-713.97C123.01,-711.32 131.35,-708.31 139,-705 168.62,-692.2 200.43,-673.49 222.28,-659.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="224.43,-662.56 230.99,-654.25 220.68,-656.65 224.43,-662.56"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~export_xg~3 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge45" class="edge">
-<title>program~example1_curve&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M119.57,-168.7C126.38,-166.08 133.07,-162.88 139,-159 159.57,-145.53 154.28,-130.24 175,-117 177.77,-115.23 180.7,-113.6 183.72,-112.11"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="185.27,-115.25 193.03,-108.03 182.46,-108.84 185.27,-115.25"/>
+<!-- program~example1_curve&#45;&gt;proc~export_xg -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge32" class="edge">
+<title>program~example1_curve&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M119.71,-716.69C126.73,-713.79 133.45,-709.99 139,-705 169.22,-677.86 144.47,-647.79 175,-621 176.51,-619.67 178.11,-618.42 179.77,-617.26"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="181.71,-620.17 188.52,-612.05 178.13,-614.16 181.71,-620.17"/>
 </g>
 <!-- program~example3_surface -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node16" class="node">
 <title>program~example3_surface</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node16"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-444 14.5,-444 14.5,-420 124.5,-420 124.5,-444"/>
-<text text-anchor="middle" x="69.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-234 14.5,-234 14.5,-210 124.5,-210 124.5,-234"/>
+<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge21" class="edge">
-<title>program~example3_surface&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M114.87,-419.97C123.01,-417.32 131.35,-414.31 139,-411 168.62,-398.2 200.43,-379.49 222.28,-365.78"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="224.43,-368.56 230.99,-360.25 220.68,-362.65 224.43,-368.56"/>
+<!-- program~example3_surface&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge26" class="edge">
+<title>program~example3_surface&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M111.57,-209.89C120.64,-207.08 130.18,-204.03 139,-201 162.63,-192.9 188.77,-183 209.69,-174.86"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="211.17,-178.03 219.21,-171.13 208.62,-171.52 211.17,-178.03"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge39" class="edge">
-<title>program~example3_surface&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M124.57,-420.51C129.8,-417.95 134.74,-414.82 139,-411 169.22,-383.86 144.47,-353.79 175,-327 176.51,-325.67 178.11,-324.42 179.77,-323.26"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="181.71,-326.17 188.52,-318.05 178.13,-320.16 181.71,-326.17"/>
+<!-- program~example3_surface&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge44" class="edge">
+<title>program~example3_surface&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M124.49,-209.84C129.68,-207.41 134.63,-204.5 139,-201 164.19,-180.86 149.59,-157.85 175,-138 176.85,-136.55 178.79,-135.21 180.81,-133.96"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="182.87,-136.82 190.06,-129.03 179.58,-130.64 182.87,-136.82"/>
 </g>
 <!-- program~example3_volume -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node17" class="node">
 <title>program~example3_volume</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node17"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-570 14.5,-570 14.5,-546 124.5,-546 124.5,-570"/>
-<text text-anchor="middle" x="69.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-360 14.5,-360 14.5,-336 124.5,-336 124.5,-360"/>
+<text text-anchor="middle" x="69.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge14" class="edge">
-<title>program~example3_volume&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M121.79,-570.04C142.58,-574.91 166.75,-580.58 188.43,-585.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="187.66,-589.09 198.2,-587.96 189.26,-582.27 187.66,-589.09"/>
+<!-- program~example3_volume&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge19" class="edge">
+<title>program~example3_volume&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M115.26,-360.09C123.28,-362.72 131.48,-365.71 139,-369 155.97,-376.43 157.95,-382.76 175,-390 179.95,-392.1 185.17,-394.06 190.46,-395.86"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="189.41,-399.2 200,-398.95 191.56,-392.54 189.41,-399.2"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge32" class="edge">
-<title>program~example3_volume&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M124.69,-558C137.24,-558 150.89,-558 164.4,-558"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="164.69,-561.5 174.69,-558 164.69,-554.5 164.69,-561.5"/>
+<!-- program~example3_volume&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge37" class="edge">
+<title>program~example3_volume&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M124.69,-354.36C137.24,-355.83 150.89,-357.43 164.4,-359.02"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="164.35,-362.53 174.69,-360.22 165.16,-355.58 164.35,-362.53"/>
 </g>
 <!-- program~example_nurbs_curve -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node18" class="node">
 <title>program~example_nurbs_curve</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node18"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="134,-150 5,-150 5,-126 134,-126 134,-150"/>
-<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="134,-696 5,-696 5,-672 134,-672 134,-696"/>
+<text text-anchor="middle" x="69.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~export_xc~3 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge28" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M134.11,-138C145.81,-138 158.15,-138 170.24,-138"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="170.32,-141.5 180.32,-138 170.32,-134.5 170.32,-141.5"/>
+<!-- program~example_nurbs_curve&#45;&gt;proc~export_xc -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge15" class="edge">
+<title>program~example_nurbs_curve&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M121.79,-671.96C142.58,-667.09 166.75,-661.42 188.43,-656.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="189.26,-659.73 198.2,-654.04 187.66,-652.91 189.26,-659.73"/>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~export_xg~3 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge46" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M121.79,-125.96C142.58,-121.09 166.75,-115.42 188.43,-110.33"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="189.26,-113.73 198.2,-108.04 187.66,-106.91 189.26,-113.73"/>
+<!-- program~example_nurbs_curve&#45;&gt;proc~export_xg -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge33" class="edge">
+<title>program~example_nurbs_curve&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M121.36,-672C127.55,-669.51 133.59,-666.54 139,-663 159.57,-649.53 154.28,-634.24 175,-621 177.77,-619.23 180.7,-617.6 183.72,-616.11"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="185.27,-619.25 193.03,-612.03 182.46,-612.84 185.27,-619.25"/>
 </g>
 <!-- program~example_nurbs_surface -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node19" class="node">
 <title>program~example_nurbs_surface</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node19"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-402 0,-402 0,-378 139,-378 139,-402"/>
-<text text-anchor="middle" x="69.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-192 0,-192 0,-168 139,-168 139,-192"/>
+<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge22" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M121.79,-377.96C142.58,-373.09 166.75,-367.42 188.43,-362.33"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="189.26,-365.73 198.2,-360.04 187.66,-358.91 189.26,-365.73"/>
+<!-- program~example_nurbs_surface&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge27" class="edge">
+<title>program~example_nurbs_surface&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M139.19,-171.94C147.7,-170.94 156.47,-169.91 165.17,-168.89"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="165.81,-172.34 175.34,-167.7 165,-165.39 165.81,-172.34"/>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge40" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M121.36,-378C127.55,-375.51 133.59,-372.54 139,-369 159.57,-355.53 154.28,-340.24 175,-327 177.77,-325.23 180.7,-323.6 183.72,-322.11"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="185.27,-325.25 193.03,-318.03 182.46,-318.84 185.27,-325.25"/>
+<!-- program~example_nurbs_surface&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge45" class="edge">
+<title>program~example_nurbs_surface&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M115.26,-167.91C123.28,-165.28 131.48,-162.29 139,-159 155.97,-151.57 157.95,-145.24 175,-138 179.95,-135.9 185.17,-133.94 190.46,-132.14"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="191.56,-135.46 200,-129.05 189.41,-128.8 191.56,-135.46"/>
 </g>
 <!-- program~example_nurbs_volume -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node20" class="node">
 <title>program~example_nurbs_volume</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node20"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-528 0,-528 0,-504 139,-504 139,-528"/>
-<text text-anchor="middle" x="69.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-318 0,-318 0,-294 139,-294 139,-318"/>
+<text text-anchor="middle" x="69.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge15" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M121.36,-528C127.55,-530.49 133.59,-533.46 139,-537 159.57,-550.47 154.28,-565.76 175,-579 177.77,-580.77 180.7,-582.4 183.72,-583.89"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="182.46,-587.16 193.03,-587.97 185.27,-580.75 182.46,-587.16"/>
+<!-- program~example_nurbs_volume&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge20" class="edge">
+<title>program~example_nurbs_volume&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M124.49,-318.16C129.68,-320.59 134.63,-323.5 139,-327 164.19,-347.14 149.59,-370.15 175,-390 176.85,-391.45 178.79,-392.79 180.81,-394.04"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="179.58,-397.36 190.06,-398.97 182.87,-391.18 179.58,-397.36"/>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge33" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M121.79,-528.04C142.58,-532.91 166.75,-538.58 188.43,-543.67"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="187.66,-547.09 198.2,-545.96 189.26,-540.27 187.66,-547.09"/>
+<!-- program~example_nurbs_volume&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge38" class="edge">
+<title>program~example_nurbs_volume&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M111.57,-318.11C120.64,-320.92 130.18,-323.97 139,-327 162.63,-335.1 188.77,-345 209.69,-353.14"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="208.62,-356.48 219.21,-356.87 211.17,-349.97 208.62,-356.48"/>
 </g>
 <!-- program~example_put_to_nurbs -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node21" class="node">
 <title>program~example_put_to_nurbs</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node21"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-486 3.5,-486 3.5,-462 135.5,-462 135.5,-486"/>
-<text text-anchor="middle" x="69.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-276 3.5,-276 3.5,-252 135.5,-252 135.5,-276"/>
+<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge16" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M125.92,-486.17C130.66,-488.6 135.11,-491.51 139,-495 169.22,-522.14 144.47,-552.21 175,-579 176.51,-580.33 178.11,-581.58 179.77,-582.74"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="178.13,-585.84 188.52,-587.95 181.71,-579.83 178.13,-585.84"/>
+<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge21" class="edge">
+<title>program~example_put_to_nurbs&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M126.54,-276.05C131.09,-278.5 135.34,-281.45 139,-285 174.45,-319.31 139.16,-356.1 175,-390 176.28,-391.21 177.61,-392.34 179.01,-393.42"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="177.2,-396.42 187.51,-398.88 180.99,-390.53 177.2,-396.42"/>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge34" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M114.87,-486.03C123.01,-488.68 131.35,-491.69 139,-495 168.62,-507.8 200.43,-526.51 222.28,-540.22"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="220.68,-543.35 230.99,-545.75 224.43,-537.44 220.68,-543.35"/>
+<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge39" class="edge">
+<title>program~example_put_to_nurbs&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M117.8,-276.09C125.07,-278.63 132.36,-281.6 139,-285 173.27,-302.57 207.81,-330.93 228.93,-349.77"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="226.84,-352.6 236.6,-356.72 231.54,-347.41 226.84,-352.6"/>
 </g>
 <!-- program~shape_c_1d -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node22" class="node">
 <title>program~shape_c_1d</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node22"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-108 31.5,-108 31.5,-84 107.5,-84 107.5,-108"/>
-<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-654 31.5,-654 31.5,-630 107.5,-630 107.5,-654"/>
+<text text-anchor="middle" x="69.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~export_xc~3 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge29" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M107.59,-104.7C130.83,-110.16 161.36,-117.32 188.15,-123.6"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="187.67,-127.09 198.21,-125.96 189.27,-120.27 187.67,-127.09"/>
+<!-- program~shape_c_1d&#45;&gt;proc~export_xc -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge16" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M107.59,-642C125.71,-642 148.26,-642 170.01,-642"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="170.26,-645.5 180.26,-642 170.26,-638.5 170.26,-645.5"/>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~export_xg~3 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge47" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M107.59,-96C125.62,-96 148.04,-96 169.69,-96"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="169.9,-99.5 179.9,-96 169.9,-92.5 169.9,-99.5"/>
+<!-- program~shape_c_1d&#45;&gt;proc~export_xg -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge34" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M107.59,-633.3C130.83,-627.84 161.36,-620.68 188.15,-614.4"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="189.27,-617.73 198.21,-612.04 187.67,-610.91 189.27,-617.73"/>
 </g>
 <!-- program~shape_c_2d -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node23" class="node">
 <title>program~shape_c_2d</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node23"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-360 31.5,-360 31.5,-336 107.5,-336 107.5,-360"/>
-<text text-anchor="middle" x="69.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
+<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge23" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M107.59,-348C124.32,-348 144.83,-348 164.99,-348"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="165.17,-351.5 175.17,-348 165.17,-344.5 165.17,-351.5"/>
+<!-- program~shape_c_2d&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge28" class="edge">
+<title>program~shape_c_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M107.59,-142.35C124.32,-144.31 144.83,-146.72 164.99,-149.09"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="164.83,-152.59 175.17,-150.28 165.64,-145.64 164.83,-152.59"/>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge41" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M107.59,-339.3C130.83,-333.84 161.36,-326.68 188.15,-320.4"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="189.27,-323.73 198.21,-318.04 187.67,-316.91 189.27,-323.73"/>
+<!-- program~shape_c_2d&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge46" class="edge">
+<title>program~shape_c_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M107.59,-133.65C124.23,-131.7 144.61,-129.31 164.68,-126.95"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="165.28,-130.41 174.8,-125.76 164.46,-123.45 165.28,-130.41"/>
 </g>
 <!-- program~shape_c_3d -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node24" class="node">
 <title>program~shape_c_3d</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node24"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-738 31.5,-738 31.5,-714 107.5,-714 107.5,-738"/>
-<text text-anchor="middle" x="69.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-528 31.5,-528 31.5,-504 107.5,-504 107.5,-528"/>
+<text text-anchor="middle" x="69.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge17" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M107.72,-717.98C118.25,-714.82 129.44,-710.58 139,-705 177.67,-682.41 213.5,-643.81 233.35,-620.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="236.24,-622.22 239.91,-612.28 230.84,-617.76 236.24,-622.22"/>
+<!-- program~shape_c_3d&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge22" class="edge">
+<title>program~shape_c_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M107.7,-507.19C118.12,-504.04 129.26,-499.99 139,-495 173.27,-477.43 207.81,-449.07 228.93,-430.23"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="231.54,-432.59 236.6,-423.28 226.84,-427.4 231.54,-432.59"/>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge35" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M107.53,-721.63C118.91,-718.61 130.64,-713.52 139,-705 179.79,-663.42 133.74,-620.11 175,-579 176.1,-577.9 177.25,-576.86 178.45,-575.88"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="180.64,-578.62 186.95,-570.11 176.71,-572.83 180.64,-578.62"/>
+<!-- program~shape_c_3d&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge40" class="edge">
+<title>program~shape_c_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M107.63,-511.28C118.89,-508.23 130.51,-503.22 139,-495 174.45,-460.69 139.16,-423.9 175,-390 176.28,-388.79 177.61,-387.66 179.01,-386.58"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="180.99,-389.47 187.51,-381.12 177.2,-383.58 180.99,-389.47"/>
 </g>
 <!-- program~shape_circle -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node25" class="node">
 <title>program~shape_circle</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node25"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-66 30,-66 30,-42 109,-42 109,-66"/>
-<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-612 30,-612 30,-588 109,-588 109,-612"/>
+<text text-anchor="middle" x="69.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~export_xc~3 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge30" class="edge">
-<title>program~shape_circle&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M109.16,-61.73C119.38,-64.85 130.05,-69.14 139,-75 159.57,-88.47 154.28,-103.76 175,-117 177.77,-118.77 180.7,-120.4 183.72,-121.89"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="182.46,-125.16 193.03,-125.97 185.27,-118.75 182.46,-125.16"/>
+<!-- program~shape_circle&#45;&gt;proc~export_xc -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge17" class="edge">
+<title>program~shape_circle&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M109.34,-609.11C132.41,-614.53 162.17,-621.51 188.33,-627.65"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="187.62,-631.08 198.16,-629.95 189.22,-624.26 187.62,-631.08"/>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~export_xg~3 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge48" class="edge">
-<title>program~shape_circle&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M109.34,-63.11C132.41,-68.53 162.17,-75.51 188.33,-81.65"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="187.62,-85.08 198.16,-83.95 189.22,-78.26 187.62,-85.08"/>
+<!-- program~shape_circle&#45;&gt;proc~export_xg -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge35" class="edge">
+<title>program~shape_circle&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M109.34,-600C127.01,-600 148.62,-600 169.52,-600"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="169.7,-603.5 179.7,-600 169.7,-596.5 169.7,-603.5"/>
 </g>
 <!-- program~shape_half_circle -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node26" class="node">
 <title>program~shape_half_circle</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node26"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121.5,-24 17.5,-24 17.5,0 121.5,0 121.5,-24"/>
-<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121.5,-570 17.5,-570 17.5,-546 121.5,-546 121.5,-570"/>
+<text text-anchor="middle" x="69.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~export_xc~3 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge31" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M121.81,-22.21C128.07,-24.98 134,-28.51 139,-33 169.22,-60.14 144.47,-90.21 175,-117 176.51,-118.33 178.11,-119.58 179.77,-120.74"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="178.13,-123.84 188.52,-125.95 181.71,-117.83 178.13,-123.84"/>
+<!-- program~shape_half_circle&#45;&gt;proc~export_xc -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge18" class="edge">
+<title>program~shape_half_circle&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M121.36,-570C127.55,-572.49 133.59,-575.46 139,-579 159.57,-592.47 154.28,-607.76 175,-621 177.77,-622.77 180.7,-624.4 183.72,-625.89"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="182.46,-629.16 193.03,-629.97 185.27,-622.75 182.46,-629.16"/>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~export_xg~3 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge49" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M114.87,-24.03C123.01,-26.68 131.35,-29.69 139,-33 168.62,-45.8 200.43,-64.51 222.28,-78.22"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="220.68,-81.35 230.99,-83.75 224.43,-75.44 220.68,-81.35"/>
+<!-- program~shape_half_circle&#45;&gt;proc~export_xg -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge36" class="edge">
+<title>program~shape_half_circle&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M121.79,-570.04C142.58,-574.91 166.75,-580.58 188.43,-585.67"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="187.66,-589.09 198.2,-587.96 189.26,-582.27 187.66,-589.09"/>
 </g>
 <!-- program~shape_half_ring_2d -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node27" class="node">
 <title>program~shape_half_ring_2d</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node27"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-318 12,-318 12,-294 127,-294 127,-318"/>
-<text text-anchor="middle" x="69.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
+<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge24" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M121.79,-318.04C142.58,-322.91 166.75,-328.58 188.43,-333.67"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="187.66,-337.09 198.2,-335.96 189.26,-330.27 187.66,-337.09"/>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge29" class="edge">
+<title>program~shape_half_ring_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M115.26,-108.09C123.28,-110.72 131.48,-113.71 139,-117 155.97,-124.43 157.95,-130.76 175,-138 179.95,-140.1 185.17,-142.06 190.46,-143.86"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="189.41,-147.2 200,-146.95 191.56,-140.54 189.41,-147.2"/>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge42" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M127.14,-306C139.1,-306 151.97,-306 164.71,-306"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="164.88,-309.5 174.88,-306 164.88,-302.5 164.88,-309.5"/>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge47" class="edge">
+<title>program~shape_half_ring_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M127.14,-102.64C139.1,-104.05 151.97,-105.56 164.71,-107.05"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="164.54,-110.56 174.88,-108.25 165.36,-103.6 164.54,-110.56"/>
 </g>
 <!-- program~shape_half_ring_3d -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node28" class="node">
 <title>program~shape_half_ring_3d</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node28"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-696 12,-696 12,-672 127,-672 127,-696"/>
-<text text-anchor="middle" x="69.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-486 12,-486 12,-462 127,-462 127,-486"/>
+<text text-anchor="middle" x="69.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge18" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M114.87,-671.97C123.01,-669.32 131.35,-666.31 139,-663 168.62,-650.2 200.43,-631.49 222.28,-617.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="224.43,-620.56 230.99,-612.25 220.68,-614.65 224.43,-620.56"/>
+<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge23" class="edge">
+<title>program~shape_half_ring_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M111.57,-461.89C120.64,-459.08 130.18,-456.03 139,-453 162.63,-444.9 188.77,-435 209.69,-426.86"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="211.17,-430.03 219.21,-423.13 208.62,-423.52 211.17,-430.03"/>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge36" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M125.92,-671.83C130.66,-669.4 135.11,-666.49 139,-663 169.22,-635.86 144.47,-605.79 175,-579 176.51,-577.67 178.11,-576.42 179.77,-575.26"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="181.71,-578.17 188.52,-570.05 178.13,-572.16 181.71,-578.17"/>
+<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge41" class="edge">
+<title>program~shape_half_ring_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M124.49,-461.84C129.68,-459.41 134.63,-456.5 139,-453 164.19,-432.86 149.59,-409.85 175,-390 176.85,-388.55 178.79,-387.21 180.81,-385.96"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="182.87,-388.82 190.06,-381.03 179.58,-382.64 182.87,-388.82"/>
 </g>
 <!-- program~shape_hexahedron -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node29" class="node">
 <title>program~shape_hexahedron</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node29"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-654 13,-654 13,-630 126,-630 126,-654"/>
-<text text-anchor="middle" x="69.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-444 13,-444 13,-420 126,-420 126,-444"/>
+<text text-anchor="middle" x="69.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge19" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M121.79,-629.96C142.58,-625.09 166.75,-619.42 188.43,-614.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="189.26,-617.73 198.2,-612.04 187.66,-610.91 189.26,-617.73"/>
+<!-- program~shape_hexahedron&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge24" class="edge">
+<title>program~shape_hexahedron&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M126.16,-425.47C138.59,-424.01 152.04,-422.43 165.33,-420.87"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="165.93,-424.33 175.45,-419.69 165.11,-417.38 165.93,-424.33"/>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge37" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M121.36,-630C127.55,-627.51 133.59,-624.54 139,-621 159.57,-607.53 154.28,-592.24 175,-579 177.77,-577.23 180.7,-575.6 183.72,-574.11"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="185.27,-577.25 193.03,-570.03 182.46,-570.84 185.27,-577.25"/>
+<!-- program~shape_hexahedron&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge42" class="edge">
+<title>program~shape_hexahedron&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M115.26,-419.91C123.28,-417.28 131.48,-414.29 139,-411 155.97,-403.57 157.95,-397.24 175,-390 179.95,-387.9 185.17,-385.94 190.46,-384.14"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="191.56,-387.46 200,-381.05 189.41,-380.8 191.56,-387.46"/>
 </g>
 <!-- program~shape_ring_2d -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node30" class="node">
 <title>program~shape_ring_2d</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node30"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-276 24.5,-276 24.5,-252 114.5,-252 114.5,-276"/>
-<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-66 24.5,-66 24.5,-42 114.5,-42 114.5,-66"/>
+<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge25" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M114.54,-273.47C123.05,-276.39 131.61,-280.16 139,-285 159.57,-298.47 154.28,-313.76 175,-327 177.77,-328.77 180.7,-330.4 183.72,-331.89"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="182.46,-335.16 193.03,-335.97 185.27,-328.75 182.46,-335.16"/>
+<!-- program~shape_ring_2d&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge30" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M114.6,-62.16C123.29,-65.18 131.91,-69.33 139,-75 164.19,-95.14 149.59,-118.15 175,-138 176.85,-139.45 178.79,-140.79 180.81,-142.04"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="179.58,-145.36 190.06,-146.97 182.87,-139.18 179.58,-145.36"/>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge43" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M114.75,-274.38C136.95,-279.59 164.19,-285.98 188.36,-291.65"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="187.62,-295.08 198.15,-293.95 189.22,-288.26 187.62,-295.08"/>
+<!-- program~shape_ring_2d&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge48" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M111.57,-66.11C120.64,-68.92 130.18,-71.97 139,-75 162.63,-83.1 188.77,-93 209.69,-101.14"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="208.62,-104.48 219.21,-104.87 211.17,-97.97 208.62,-104.48"/>
 </g>
 <!-- program~shape_ring_3d -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node31" class="node">
 <title>program~shape_ring_3d</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node31"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-612 24.5,-612 24.5,-588 114.5,-588 114.5,-612"/>
-<text text-anchor="middle" x="69.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-402 24.5,-402 24.5,-378 114.5,-378 114.5,-402"/>
+<text text-anchor="middle" x="69.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge20" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M114.75,-600C130.07,-600 147.78,-600 165.24,-600"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="165.46,-603.5 175.46,-600 165.46,-596.5 165.46,-603.5"/>
+<!-- program~shape_ring_3d&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge25" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M114.75,-395.19C130.07,-396.99 147.78,-399.07 165.24,-401.11"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="165.12,-404.62 175.46,-402.31 165.94,-397.67 165.12,-404.62"/>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge38" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M114.75,-589.62C136.95,-584.41 164.19,-578.02 188.36,-572.35"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="189.22,-575.74 198.15,-570.05 187.62,-568.92 189.22,-575.74"/>
+<!-- program~shape_ring_3d&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge43" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M114.75,-384.81C129.89,-383.03 147.38,-380.98 164.64,-378.96"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="165.24,-382.41 174.76,-377.77 164.42,-375.46 165.24,-382.41"/>
 </g>
 <!-- program~shape_tetragon -->
 <g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_node32" class="node">
 <title>program~shape_tetragon</title>
 <g id="a_proc~~cmp_elemconn_c0_s~~CalledByGraph_node32"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-234 21.5,-234 21.5,-210 117.5,-210 117.5,-234"/>
-<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-24 21.5,-24 21.5,0 117.5,0 117.5,-24"/>
+<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge26" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M117.59,-230.47C125.38,-233.46 132.89,-237.51 139,-243 169.22,-270.14 144.47,-300.21 175,-327 176.51,-328.33 178.11,-329.58 179.77,-330.74"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="178.13,-333.84 188.52,-335.95 181.71,-327.83 178.13,-333.84"/>
+<!-- program~shape_tetragon&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge31" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M117.59,-19.96C125.47,-23 133.01,-27.2 139,-33 174.45,-67.31 139.16,-104.1 175,-138 176.28,-139.21 177.61,-140.34 179.01,-141.42"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="177.2,-144.42 187.51,-146.88 180.99,-138.53 177.2,-144.42"/>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge44" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M114.87,-234.03C123.01,-236.68 131.35,-239.69 139,-243 168.62,-255.8 200.43,-274.51 222.28,-288.22"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="220.68,-291.35 230.99,-293.75 224.43,-285.44 220.68,-291.35"/>
+<!-- program~shape_tetragon&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_s~~CalledByGraph_edge49" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M117.8,-24.09C125.07,-26.63 132.36,-29.6 139,-33 173.27,-50.57 207.81,-78.93 228.93,-97.77"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="226.84,-100.6 236.6,-104.72 231.54,-95.41 226.84,-100.6"/>
 </g>
 </g>
 </svg>
@@ -938,7 +938,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elemconn_c0_v.html b/proc/cmp_elemconn_c0_v.html
index ac00a562f..254b00464 100644
--- a/proc/cmp_elemconn_c0_v.html
+++ b/proc/cmp_elemconn_c0_v.html
@@ -274,581 +274,581 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~cmp_elemconn_c0_v -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node1" class="node">
 <title>proc~cmp_elemconn_c0_v</title>
-<polygon fill="none" stroke="black" points="841,-339 713,-339 713,-315 841,-315 841,-339"/>
-<text text-anchor="middle" x="777" y="-324.6" font-family="Helvetica,sans-Serif" font-size="10.50">cmp_elemConn_C0_V</text>
+<polygon fill="none" stroke="black" points="841,-402 713,-402 713,-378 841,-378 841,-402"/>
+<text text-anchor="middle" x="777" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50">cmp_elemConn_C0_V</text>
 </g>
 <!-- interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node2" class="node">
 <title>interface~elemconn_c0</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node2"><a xlink:href="../interface/elemconn_c0.html" xlink:title="elemConn_C0">
-<polygon fill="#a7506f" stroke="#a7506f" points="677,-339 590,-339 590,-315 677,-315 677,-339"/>
-<text text-anchor="middle" x="633.5" y="-324.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="677,-402 590,-402 590,-378 677,-378 677,-402"/>
+<text text-anchor="middle" x="633.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge1" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M677.34,-327C685.41,-327 694.05,-327 702.75,-327"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="702.95,-330.5 712.95,-327 702.95,-323.5 702.95,-330.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M677.34,-390C685.41,-390 694.05,-390 702.75,-390"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="702.95,-393.5 712.95,-390 702.95,-386.5 702.95,-393.5"/>
 </g>
 <!-- proc~cmp_elem_xc_vis -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node3" class="node">
 <title>proc~cmp_elem_xc_vis</title>
-<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-570 362.5,-570 362.5,-546 553.5,-546 553.5,-570"/>
-<text text-anchor="middle" x="458" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="548.5,-612 367.5,-612 367.5,-588 548.5,-588 548.5,-612"/>
+<text text-anchor="middle" x="458" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge2" class="edge">
 <title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M484.83,-545.89C505.73,-535.02 534.75,-517.34 554,-495 592.49,-450.32 616.09,-383.57 626.4,-349.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="629.86,-349.83 629.28,-339.25 623.14,-347.89 629.86,-349.83"/>
+<path fill="none" stroke="#ff0000" d="M484.1,-587.84C504.85,-576.82 534.03,-558.96 554,-537 588.65,-498.89 613.07,-442.7 624.73,-412.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="628.14,-412.88 628.32,-402.28 621.57,-410.45 628.14,-412.88"/>
 </g>
 <!-- proc~cmp_elem_xc_vis~2 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node4" class="node">
 <title>proc~cmp_elem_xc_vis~2</title>
-<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node4"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-360 362.5,-360 362.5,-336 553.5,-336 553.5,-360"/>
-<text text-anchor="middle" x="458" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node4"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-423 362.5,-423 362.5,-399 553.5,-399 553.5,-423"/>
+<text text-anchor="middle" x="458" y="-408.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge3" class="edge">
 <title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M553.62,-336.55C562.64,-335.46 571.54,-334.38 579.94,-333.36"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="580.4,-336.83 589.9,-332.16 579.56,-329.88 580.4,-336.83"/>
+<path fill="none" stroke="#ff0000" d="M553.62,-399.55C562.64,-398.46 571.54,-397.38 579.94,-396.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="580.4,-399.83 589.9,-395.16 579.56,-392.88 580.4,-399.83"/>
 </g>
 <!-- proc~cmp_elem_xc_vis~3 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node5" class="node">
 <title>proc~cmp_elem_xc_vis~3</title>
-<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node5"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="548.5,-245 367.5,-245 367.5,-221 548.5,-221 548.5,-245"/>
-<text text-anchor="middle" x="458" y="-230.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xc_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node5"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-297 362.5,-297 362.5,-273 553.5,-273 553.5,-297"/>
+<text text-anchor="middle" x="458" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge4" class="edge">
 <title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M481.33,-245.1C511.78,-261.59 566.49,-291.24 601.08,-309.97"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="599.8,-313.26 610.26,-314.95 603.13,-307.11 599.8,-313.26"/>
+<path fill="none" stroke="#ff0000" d="M478.9,-297.04C509.54,-315.59 568.41,-351.22 603.7,-372.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="602.2,-375.75 612.56,-377.93 605.82,-369.76 602.2,-375.75"/>
 </g>
 <!-- proc~cmp_elem_xg_vis -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node6" class="node">
 <title>proc~cmp_elem_xg_vis</title>
-<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node6"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="554,-486 362,-486 362,-462 554,-462 554,-486"/>
-<text text-anchor="middle" x="458" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node6"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="549,-528 367,-528 367,-504 549,-504 549,-528"/>
+<text text-anchor="middle" x="458" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge5" class="edge">
 <title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M473.2,-461.97C503.32,-436.45 573.82,-376.72 610.08,-345.99"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="612.74,-348.33 618.11,-339.2 608.21,-342.99 612.74,-348.33"/>
+<path fill="none" stroke="#ff0000" d="M475.64,-503.92C506.21,-481.72 571.48,-434.31 607.44,-408.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="609.88,-410.75 615.91,-402.04 605.77,-405.09 609.88,-410.75"/>
 </g>
 <!-- proc~cmp_elem_xg_vis~2 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node7" class="node">
 <title>proc~cmp_elem_xg_vis~2</title>
-<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node7"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="554,-318 362,-318 362,-294 554,-294 554,-318"/>
-<text text-anchor="middle" x="458" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node7"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="554,-381 362,-381 362,-357 554,-357 554,-381"/>
+<text text-anchor="middle" x="458" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge6" class="edge">
 <title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M554.13,-317.51C562.89,-318.58 571.55,-319.62 579.72,-320.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="579.45,-324.1 589.79,-321.83 580.29,-317.15 579.45,-324.1"/>
+<path fill="none" stroke="#ff0000" d="M554.13,-380.51C562.89,-381.58 571.55,-382.62 579.72,-383.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="579.45,-387.1 589.79,-384.83 580.29,-380.15 579.45,-387.1"/>
 </g>
 <!-- proc~cmp_elem_xg_vis~3 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node8" class="node">
 <title>proc~cmp_elem_xg_vis~3</title>
-<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node8"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="549,-140 367,-140 367,-116 549,-116 549,-140"/>
-<text text-anchor="middle" x="458" y="-125.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xg_vis</text>
+<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node8"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="554,-171 362,-171 362,-147 554,-147 554,-171"/>
+<text text-anchor="middle" x="458" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge7" class="edge">
 <title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M474.88,-140.02C494.68,-155.45 528.95,-183.6 554,-212 580.82,-242.41 606.2,-282.34 620.51,-306.26"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="617.5,-308.05 625.6,-314.88 623.52,-304.49 617.5,-308.05"/>
+<path fill="none" stroke="#ff0000" d="M471.47,-171.29C490.41,-190.28 527.06,-228.28 554,-264 580.43,-299.03 606.42,-343.19 620.87,-368.85"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="617.89,-370.69 625.82,-377.72 624.01,-367.28 617.89,-370.69"/>
 </g>
 <!-- proc~export_xc -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node9" class="node">
 <title>proc~export_xc</title>
-<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node9"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_volume%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="325.5,-612 175.5,-612 175.5,-588 325.5,-588 325.5,-612"/>
-<text text-anchor="middle" x="250.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
+<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node9"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_curve%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="320.5,-654 180.5,-654 180.5,-630 320.5,-630 320.5,-654"/>
+<text text-anchor="middle" x="250.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge8" class="edge">
 <title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
-<path fill="none" stroke="#ff0000" d="M310.39,-587.96C334.68,-583 363,-577.21 388.23,-572.05"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="389.01,-575.47 398.1,-570.04 387.61,-568.61 389.01,-575.47"/>
+<path fill="none" stroke="#ff0000" d="M310.39,-629.96C334.68,-625 363,-619.21 388.23,-614.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="389.01,-617.47 398.1,-612.04 387.61,-610.61 389.01,-617.47"/>
 </g>
 <!-- proc~export_xc~2 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node10" class="node">
 <title>proc~export_xc~2</title>
-<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node10"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_surface%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="325.5,-360 175.5,-360 175.5,-336 325.5,-336 325.5,-360"/>
-<text text-anchor="middle" x="250.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
+<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node10"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_volume%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="325.5,-423 175.5,-423 175.5,-399 325.5,-399 325.5,-423"/>
+<text text-anchor="middle" x="250.5" y="-408.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge9" class="edge">
 <title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
-<path fill="none" stroke="#ffff00" d="M325.69,-348C334.29,-348 343.19,-348 352.1,-348"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="352.16,-351.5 362.16,-348 352.16,-344.5 352.16,-351.5"/>
+<path fill="none" stroke="#ffff00" d="M325.69,-411C334.29,-411 343.19,-411 352.1,-411"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="352.16,-414.5 362.16,-411 352.16,-407.5 352.16,-414.5"/>
 </g>
 <!-- proc~export_xc~3 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node11" class="node">
 <title>proc~export_xc~3</title>
-<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node11"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_curve%export_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="320.5,-150 180.5,-150 180.5,-126 320.5,-126 320.5,-150"/>
-<text text-anchor="middle" x="250.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xc</text>
+<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node11"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_surface%export_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="325.5,-171 175.5,-171 175.5,-147 325.5,-147 325.5,-171"/>
+<text text-anchor="middle" x="250.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge10" class="edge">
 <title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
-<path fill="none" stroke="#00ff00" d="M277.53,-150.03C314.1,-166.94 380.8,-197.77 421.78,-216.72"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="420.32,-219.9 430.86,-220.92 423.25,-213.54 420.32,-219.9"/>
+<path fill="none" stroke="#00ff00" d="M271.2,-171.08C307.8,-193.52 386.37,-241.69 428.66,-267.63"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="427,-270.71 437.36,-272.96 430.66,-264.74 427,-270.71"/>
 </g>
 <!-- proc~export_xg -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node12" class="node">
 <title>proc~export_xg</title>
-<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node12"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_volume%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="326,-570 175,-570 175,-546 326,-546 326,-570"/>
-<text text-anchor="middle" x="250.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
+<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node12"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_curve%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="321,-612 180,-612 180,-588 321,-588 321,-612"/>
+<text text-anchor="middle" x="250.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge11" class="edge">
 <title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
-<path fill="none" stroke="#00ffff" d="M280.94,-545.96C317.03,-531.21 378.3,-506.17 418.2,-489.86"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="419.68,-493.04 427.61,-486.01 417.03,-486.56 419.68,-493.04"/>
+<path fill="none" stroke="#00ffff" d="M280.94,-587.96C317.03,-573.21 378.3,-548.17 418.2,-531.86"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="419.68,-535.04 427.61,-528.01 417.03,-528.56 419.68,-535.04"/>
 </g>
 <!-- proc~export_xg~2 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node13" class="node">
 <title>proc~export_xg~2</title>
-<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node13"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_surface%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="326,-318 175,-318 175,-294 326,-294 326,-318"/>
-<text text-anchor="middle" x="250.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
+<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node13"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_volume%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="326,-381 175,-381 175,-357 326,-357 326,-381"/>
+<text text-anchor="middle" x="250.5" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge12" class="edge">
 <title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
-<path fill="none" stroke="#0000ff" d="M326.27,-306C334.6,-306 343.2,-306 351.82,-306"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="351.93,-309.5 361.93,-306 351.93,-302.5 351.93,-309.5"/>
+<path fill="none" stroke="#0000ff" d="M326.27,-369C334.6,-369 343.2,-369 351.82,-369"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="351.93,-372.5 361.93,-369 351.93,-365.5 351.93,-372.5"/>
 </g>
 <!-- proc~export_xg~3 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node14" class="node">
 <title>proc~export_xg~3</title>
-<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node14"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_curve%export_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="321,-108 180,-108 180,-84 321,-84 321,-108"/>
-<text text-anchor="middle" x="250.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xg</text>
+<g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node14"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_surface%export_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="326,-129 175,-129 175,-105 326,-105 326,-129"/>
+<text text-anchor="middle" x="250.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge13" class="edge">
 <title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
-<path fill="none" stroke="#ff00ff" d="M321.07,-106.83C336.69,-109.27 353.46,-111.88 369.7,-114.41"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="369.31,-117.89 379.73,-115.97 370.39,-110.97 369.31,-117.89"/>
+<path fill="none" stroke="#ff00ff" d="M310.39,-129.04C334.68,-134 363,-139.79 388.23,-144.95"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="387.61,-148.39 398.1,-146.96 389.01,-141.53 387.61,-148.39"/>
 </g>
 <!-- program~example1_curve -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node15" class="node">
 <title>program~example1_curve</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node15"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="119.5,-192 19.5,-192 19.5,-168 119.5,-168 119.5,-192"/>
-<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="119.5,-738 19.5,-738 19.5,-714 119.5,-714 119.5,-738"/>
+<text text-anchor="middle" x="69.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~export_xc~3 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge27" class="edge">
-<title>program~example1_curve&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M119.89,-168.41C140.97,-163.46 165.81,-157.64 188.07,-152.41"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="189.15,-155.75 198.09,-150.06 187.56,-148.94 189.15,-155.75"/>
+<!-- program~example1_curve&#45;&gt;proc~export_xc -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge14" class="edge">
+<title>program~example1_curve&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M114.87,-713.97C123.01,-711.32 131.35,-708.31 139,-705 168.62,-692.2 200.43,-673.49 222.28,-659.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="224.43,-662.56 230.99,-654.25 220.68,-656.65 224.43,-662.56"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~export_xg~3 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge45" class="edge">
-<title>program~example1_curve&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M119.57,-168.7C126.38,-166.08 133.07,-162.88 139,-159 159.57,-145.53 154.28,-130.24 175,-117 177.77,-115.23 180.7,-113.6 183.72,-112.11"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="185.27,-115.25 193.03,-108.03 182.46,-108.84 185.27,-115.25"/>
+<!-- program~example1_curve&#45;&gt;proc~export_xg -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge32" class="edge">
+<title>program~example1_curve&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M119.71,-716.69C126.73,-713.79 133.45,-709.99 139,-705 169.22,-677.86 144.47,-647.79 175,-621 176.51,-619.67 178.11,-618.42 179.77,-617.26"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="181.71,-620.17 188.52,-612.05 178.13,-614.16 181.71,-620.17"/>
 </g>
 <!-- program~example3_surface -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node16" class="node">
 <title>program~example3_surface</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node16"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-444 14.5,-444 14.5,-420 124.5,-420 124.5,-444"/>
-<text text-anchor="middle" x="69.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-234 14.5,-234 14.5,-210 124.5,-210 124.5,-234"/>
+<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge21" class="edge">
-<title>program~example3_surface&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M114.87,-419.97C123.01,-417.32 131.35,-414.31 139,-411 168.62,-398.2 200.43,-379.49 222.28,-365.78"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="224.43,-368.56 230.99,-360.25 220.68,-362.65 224.43,-368.56"/>
+<!-- program~example3_surface&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge26" class="edge">
+<title>program~example3_surface&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M111.57,-209.89C120.64,-207.08 130.18,-204.03 139,-201 162.63,-192.9 188.77,-183 209.69,-174.86"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="211.17,-178.03 219.21,-171.13 208.62,-171.52 211.17,-178.03"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge39" class="edge">
-<title>program~example3_surface&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M124.57,-420.51C129.8,-417.95 134.74,-414.82 139,-411 169.22,-383.86 144.47,-353.79 175,-327 176.51,-325.67 178.11,-324.42 179.77,-323.26"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="181.71,-326.17 188.52,-318.05 178.13,-320.16 181.71,-326.17"/>
+<!-- program~example3_surface&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge44" class="edge">
+<title>program~example3_surface&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M124.49,-209.84C129.68,-207.41 134.63,-204.5 139,-201 164.19,-180.86 149.59,-157.85 175,-138 176.85,-136.55 178.79,-135.21 180.81,-133.96"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="182.87,-136.82 190.06,-129.03 179.58,-130.64 182.87,-136.82"/>
 </g>
 <!-- program~example3_volume -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node17" class="node">
 <title>program~example3_volume</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node17"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-570 14.5,-570 14.5,-546 124.5,-546 124.5,-570"/>
-<text text-anchor="middle" x="69.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-360 14.5,-360 14.5,-336 124.5,-336 124.5,-360"/>
+<text text-anchor="middle" x="69.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge14" class="edge">
-<title>program~example3_volume&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M121.79,-570.04C142.58,-574.91 166.75,-580.58 188.43,-585.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="187.66,-589.09 198.2,-587.96 189.26,-582.27 187.66,-589.09"/>
+<!-- program~example3_volume&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge19" class="edge">
+<title>program~example3_volume&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M115.26,-360.09C123.28,-362.72 131.48,-365.71 139,-369 155.97,-376.43 157.95,-382.76 175,-390 179.95,-392.1 185.17,-394.06 190.46,-395.86"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="189.41,-399.2 200,-398.95 191.56,-392.54 189.41,-399.2"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge32" class="edge">
-<title>program~example3_volume&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M124.69,-558C137.24,-558 150.89,-558 164.4,-558"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="164.69,-561.5 174.69,-558 164.69,-554.5 164.69,-561.5"/>
+<!-- program~example3_volume&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge37" class="edge">
+<title>program~example3_volume&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M124.69,-354.36C137.24,-355.83 150.89,-357.43 164.4,-359.02"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="164.35,-362.53 174.69,-360.22 165.16,-355.58 164.35,-362.53"/>
 </g>
 <!-- program~example_nurbs_curve -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node18" class="node">
 <title>program~example_nurbs_curve</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node18"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="134,-150 5,-150 5,-126 134,-126 134,-150"/>
-<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="134,-696 5,-696 5,-672 134,-672 134,-696"/>
+<text text-anchor="middle" x="69.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~export_xc~3 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge28" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M134.11,-138C145.81,-138 158.15,-138 170.24,-138"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="170.32,-141.5 180.32,-138 170.32,-134.5 170.32,-141.5"/>
+<!-- program~example_nurbs_curve&#45;&gt;proc~export_xc -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge15" class="edge">
+<title>program~example_nurbs_curve&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M121.79,-671.96C142.58,-667.09 166.75,-661.42 188.43,-656.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="189.26,-659.73 198.2,-654.04 187.66,-652.91 189.26,-659.73"/>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~export_xg~3 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge46" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M121.79,-125.96C142.58,-121.09 166.75,-115.42 188.43,-110.33"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="189.26,-113.73 198.2,-108.04 187.66,-106.91 189.26,-113.73"/>
+<!-- program~example_nurbs_curve&#45;&gt;proc~export_xg -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge33" class="edge">
+<title>program~example_nurbs_curve&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M121.36,-672C127.55,-669.51 133.59,-666.54 139,-663 159.57,-649.53 154.28,-634.24 175,-621 177.77,-619.23 180.7,-617.6 183.72,-616.11"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="185.27,-619.25 193.03,-612.03 182.46,-612.84 185.27,-619.25"/>
 </g>
 <!-- program~example_nurbs_surface -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node19" class="node">
 <title>program~example_nurbs_surface</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node19"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-402 0,-402 0,-378 139,-378 139,-402"/>
-<text text-anchor="middle" x="69.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-192 0,-192 0,-168 139,-168 139,-192"/>
+<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge22" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M121.79,-377.96C142.58,-373.09 166.75,-367.42 188.43,-362.33"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="189.26,-365.73 198.2,-360.04 187.66,-358.91 189.26,-365.73"/>
+<!-- program~example_nurbs_surface&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge27" class="edge">
+<title>program~example_nurbs_surface&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M139.19,-171.94C147.7,-170.94 156.47,-169.91 165.17,-168.89"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="165.81,-172.34 175.34,-167.7 165,-165.39 165.81,-172.34"/>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge40" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M121.36,-378C127.55,-375.51 133.59,-372.54 139,-369 159.57,-355.53 154.28,-340.24 175,-327 177.77,-325.23 180.7,-323.6 183.72,-322.11"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="185.27,-325.25 193.03,-318.03 182.46,-318.84 185.27,-325.25"/>
+<!-- program~example_nurbs_surface&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge45" class="edge">
+<title>program~example_nurbs_surface&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M115.26,-167.91C123.28,-165.28 131.48,-162.29 139,-159 155.97,-151.57 157.95,-145.24 175,-138 179.95,-135.9 185.17,-133.94 190.46,-132.14"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="191.56,-135.46 200,-129.05 189.41,-128.8 191.56,-135.46"/>
 </g>
 <!-- program~example_nurbs_volume -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node20" class="node">
 <title>program~example_nurbs_volume</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node20"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-528 0,-528 0,-504 139,-504 139,-528"/>
-<text text-anchor="middle" x="69.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-318 0,-318 0,-294 139,-294 139,-318"/>
+<text text-anchor="middle" x="69.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge15" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M121.36,-528C127.55,-530.49 133.59,-533.46 139,-537 159.57,-550.47 154.28,-565.76 175,-579 177.77,-580.77 180.7,-582.4 183.72,-583.89"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="182.46,-587.16 193.03,-587.97 185.27,-580.75 182.46,-587.16"/>
+<!-- program~example_nurbs_volume&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge20" class="edge">
+<title>program~example_nurbs_volume&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M124.49,-318.16C129.68,-320.59 134.63,-323.5 139,-327 164.19,-347.14 149.59,-370.15 175,-390 176.85,-391.45 178.79,-392.79 180.81,-394.04"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="179.58,-397.36 190.06,-398.97 182.87,-391.18 179.58,-397.36"/>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge33" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M121.79,-528.04C142.58,-532.91 166.75,-538.58 188.43,-543.67"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="187.66,-547.09 198.2,-545.96 189.26,-540.27 187.66,-547.09"/>
+<!-- program~example_nurbs_volume&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge38" class="edge">
+<title>program~example_nurbs_volume&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M111.57,-318.11C120.64,-320.92 130.18,-323.97 139,-327 162.63,-335.1 188.77,-345 209.69,-353.14"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="208.62,-356.48 219.21,-356.87 211.17,-349.97 208.62,-356.48"/>
 </g>
 <!-- program~example_put_to_nurbs -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node21" class="node">
 <title>program~example_put_to_nurbs</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node21"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-486 3.5,-486 3.5,-462 135.5,-462 135.5,-486"/>
-<text text-anchor="middle" x="69.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-276 3.5,-276 3.5,-252 135.5,-252 135.5,-276"/>
+<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge16" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M125.92,-486.17C130.66,-488.6 135.11,-491.51 139,-495 169.22,-522.14 144.47,-552.21 175,-579 176.51,-580.33 178.11,-581.58 179.77,-582.74"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="178.13,-585.84 188.52,-587.95 181.71,-579.83 178.13,-585.84"/>
+<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge21" class="edge">
+<title>program~example_put_to_nurbs&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M126.54,-276.05C131.09,-278.5 135.34,-281.45 139,-285 174.45,-319.31 139.16,-356.1 175,-390 176.28,-391.21 177.61,-392.34 179.01,-393.42"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="177.2,-396.42 187.51,-398.88 180.99,-390.53 177.2,-396.42"/>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge34" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M114.87,-486.03C123.01,-488.68 131.35,-491.69 139,-495 168.62,-507.8 200.43,-526.51 222.28,-540.22"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="220.68,-543.35 230.99,-545.75 224.43,-537.44 220.68,-543.35"/>
+<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge39" class="edge">
+<title>program~example_put_to_nurbs&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M117.8,-276.09C125.07,-278.63 132.36,-281.6 139,-285 173.27,-302.57 207.81,-330.93 228.93,-349.77"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="226.84,-352.6 236.6,-356.72 231.54,-347.41 226.84,-352.6"/>
 </g>
 <!-- program~shape_c_1d -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node22" class="node">
 <title>program~shape_c_1d</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node22"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-108 31.5,-108 31.5,-84 107.5,-84 107.5,-108"/>
-<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-654 31.5,-654 31.5,-630 107.5,-630 107.5,-654"/>
+<text text-anchor="middle" x="69.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~export_xc~3 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge29" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M107.59,-104.7C130.83,-110.16 161.36,-117.32 188.15,-123.6"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="187.67,-127.09 198.21,-125.96 189.27,-120.27 187.67,-127.09"/>
+<!-- program~shape_c_1d&#45;&gt;proc~export_xc -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge16" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M107.59,-642C125.71,-642 148.26,-642 170.01,-642"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="170.26,-645.5 180.26,-642 170.26,-638.5 170.26,-645.5"/>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~export_xg~3 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge47" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M107.59,-96C125.62,-96 148.04,-96 169.69,-96"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="169.9,-99.5 179.9,-96 169.9,-92.5 169.9,-99.5"/>
+<!-- program~shape_c_1d&#45;&gt;proc~export_xg -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge34" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M107.59,-633.3C130.83,-627.84 161.36,-620.68 188.15,-614.4"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="189.27,-617.73 198.21,-612.04 187.67,-610.91 189.27,-617.73"/>
 </g>
 <!-- program~shape_c_2d -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node23" class="node">
 <title>program~shape_c_2d</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node23"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-360 31.5,-360 31.5,-336 107.5,-336 107.5,-360"/>
-<text text-anchor="middle" x="69.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
+<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge23" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M107.59,-348C124.32,-348 144.83,-348 164.99,-348"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="165.17,-351.5 175.17,-348 165.17,-344.5 165.17,-351.5"/>
+<!-- program~shape_c_2d&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge28" class="edge">
+<title>program~shape_c_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M107.59,-142.35C124.32,-144.31 144.83,-146.72 164.99,-149.09"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="164.83,-152.59 175.17,-150.28 165.64,-145.64 164.83,-152.59"/>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge41" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M107.59,-339.3C130.83,-333.84 161.36,-326.68 188.15,-320.4"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="189.27,-323.73 198.21,-318.04 187.67,-316.91 189.27,-323.73"/>
+<!-- program~shape_c_2d&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge46" class="edge">
+<title>program~shape_c_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M107.59,-133.65C124.23,-131.7 144.61,-129.31 164.68,-126.95"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="165.28,-130.41 174.8,-125.76 164.46,-123.45 165.28,-130.41"/>
 </g>
 <!-- program~shape_c_3d -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node24" class="node">
 <title>program~shape_c_3d</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node24"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-738 31.5,-738 31.5,-714 107.5,-714 107.5,-738"/>
-<text text-anchor="middle" x="69.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-528 31.5,-528 31.5,-504 107.5,-504 107.5,-528"/>
+<text text-anchor="middle" x="69.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge17" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M107.72,-717.98C118.25,-714.82 129.44,-710.58 139,-705 177.67,-682.41 213.5,-643.81 233.35,-620.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="236.24,-622.22 239.91,-612.28 230.84,-617.76 236.24,-622.22"/>
+<!-- program~shape_c_3d&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge22" class="edge">
+<title>program~shape_c_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M107.7,-507.19C118.12,-504.04 129.26,-499.99 139,-495 173.27,-477.43 207.81,-449.07 228.93,-430.23"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="231.54,-432.59 236.6,-423.28 226.84,-427.4 231.54,-432.59"/>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge35" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M107.53,-721.63C118.91,-718.61 130.64,-713.52 139,-705 179.79,-663.42 133.74,-620.11 175,-579 176.1,-577.9 177.25,-576.86 178.45,-575.88"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="180.64,-578.62 186.95,-570.11 176.71,-572.83 180.64,-578.62"/>
+<!-- program~shape_c_3d&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge40" class="edge">
+<title>program~shape_c_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M107.63,-511.28C118.89,-508.23 130.51,-503.22 139,-495 174.45,-460.69 139.16,-423.9 175,-390 176.28,-388.79 177.61,-387.66 179.01,-386.58"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="180.99,-389.47 187.51,-381.12 177.2,-383.58 180.99,-389.47"/>
 </g>
 <!-- program~shape_circle -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node25" class="node">
 <title>program~shape_circle</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node25"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-66 30,-66 30,-42 109,-42 109,-66"/>
-<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-612 30,-612 30,-588 109,-588 109,-612"/>
+<text text-anchor="middle" x="69.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~export_xc~3 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge30" class="edge">
-<title>program~shape_circle&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M109.16,-61.73C119.38,-64.85 130.05,-69.14 139,-75 159.57,-88.47 154.28,-103.76 175,-117 177.77,-118.77 180.7,-120.4 183.72,-121.89"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="182.46,-125.16 193.03,-125.97 185.27,-118.75 182.46,-125.16"/>
+<!-- program~shape_circle&#45;&gt;proc~export_xc -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge17" class="edge">
+<title>program~shape_circle&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M109.34,-609.11C132.41,-614.53 162.17,-621.51 188.33,-627.65"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="187.62,-631.08 198.16,-629.95 189.22,-624.26 187.62,-631.08"/>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~export_xg~3 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge48" class="edge">
-<title>program~shape_circle&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M109.34,-63.11C132.41,-68.53 162.17,-75.51 188.33,-81.65"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="187.62,-85.08 198.16,-83.95 189.22,-78.26 187.62,-85.08"/>
+<!-- program~shape_circle&#45;&gt;proc~export_xg -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge35" class="edge">
+<title>program~shape_circle&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M109.34,-600C127.01,-600 148.62,-600 169.52,-600"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="169.7,-603.5 179.7,-600 169.7,-596.5 169.7,-603.5"/>
 </g>
 <!-- program~shape_half_circle -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node26" class="node">
 <title>program~shape_half_circle</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node26"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121.5,-24 17.5,-24 17.5,0 121.5,0 121.5,-24"/>
-<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121.5,-570 17.5,-570 17.5,-546 121.5,-546 121.5,-570"/>
+<text text-anchor="middle" x="69.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~export_xc~3 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge31" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M121.81,-22.21C128.07,-24.98 134,-28.51 139,-33 169.22,-60.14 144.47,-90.21 175,-117 176.51,-118.33 178.11,-119.58 179.77,-120.74"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="178.13,-123.84 188.52,-125.95 181.71,-117.83 178.13,-123.84"/>
+<!-- program~shape_half_circle&#45;&gt;proc~export_xc -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge18" class="edge">
+<title>program~shape_half_circle&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M121.36,-570C127.55,-572.49 133.59,-575.46 139,-579 159.57,-592.47 154.28,-607.76 175,-621 177.77,-622.77 180.7,-624.4 183.72,-625.89"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="182.46,-629.16 193.03,-629.97 185.27,-622.75 182.46,-629.16"/>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~export_xg~3 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge49" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M114.87,-24.03C123.01,-26.68 131.35,-29.69 139,-33 168.62,-45.8 200.43,-64.51 222.28,-78.22"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="220.68,-81.35 230.99,-83.75 224.43,-75.44 220.68,-81.35"/>
+<!-- program~shape_half_circle&#45;&gt;proc~export_xg -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge36" class="edge">
+<title>program~shape_half_circle&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#00ffff" d="M121.79,-570.04C142.58,-574.91 166.75,-580.58 188.43,-585.67"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="187.66,-589.09 198.2,-587.96 189.26,-582.27 187.66,-589.09"/>
 </g>
 <!-- program~shape_half_ring_2d -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node27" class="node">
 <title>program~shape_half_ring_2d</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node27"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-318 12,-318 12,-294 127,-294 127,-318"/>
-<text text-anchor="middle" x="69.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
+<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge24" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M121.79,-318.04C142.58,-322.91 166.75,-328.58 188.43,-333.67"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="187.66,-337.09 198.2,-335.96 189.26,-330.27 187.66,-337.09"/>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge29" class="edge">
+<title>program~shape_half_ring_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M115.26,-108.09C123.28,-110.72 131.48,-113.71 139,-117 155.97,-124.43 157.95,-130.76 175,-138 179.95,-140.1 185.17,-142.06 190.46,-143.86"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="189.41,-147.2 200,-146.95 191.56,-140.54 189.41,-147.2"/>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge42" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M127.14,-306C139.1,-306 151.97,-306 164.71,-306"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="164.88,-309.5 174.88,-306 164.88,-302.5 164.88,-309.5"/>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge47" class="edge">
+<title>program~shape_half_ring_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M127.14,-102.64C139.1,-104.05 151.97,-105.56 164.71,-107.05"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="164.54,-110.56 174.88,-108.25 165.36,-103.6 164.54,-110.56"/>
 </g>
 <!-- program~shape_half_ring_3d -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node28" class="node">
 <title>program~shape_half_ring_3d</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node28"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-696 12,-696 12,-672 127,-672 127,-696"/>
-<text text-anchor="middle" x="69.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-486 12,-486 12,-462 127,-462 127,-486"/>
+<text text-anchor="middle" x="69.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge18" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M114.87,-671.97C123.01,-669.32 131.35,-666.31 139,-663 168.62,-650.2 200.43,-631.49 222.28,-617.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="224.43,-620.56 230.99,-612.25 220.68,-614.65 224.43,-620.56"/>
+<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge23" class="edge">
+<title>program~shape_half_ring_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M111.57,-461.89C120.64,-459.08 130.18,-456.03 139,-453 162.63,-444.9 188.77,-435 209.69,-426.86"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="211.17,-430.03 219.21,-423.13 208.62,-423.52 211.17,-430.03"/>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge36" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M125.92,-671.83C130.66,-669.4 135.11,-666.49 139,-663 169.22,-635.86 144.47,-605.79 175,-579 176.51,-577.67 178.11,-576.42 179.77,-575.26"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="181.71,-578.17 188.52,-570.05 178.13,-572.16 181.71,-578.17"/>
+<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge41" class="edge">
+<title>program~shape_half_ring_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M124.49,-461.84C129.68,-459.41 134.63,-456.5 139,-453 164.19,-432.86 149.59,-409.85 175,-390 176.85,-388.55 178.79,-387.21 180.81,-385.96"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="182.87,-388.82 190.06,-381.03 179.58,-382.64 182.87,-388.82"/>
 </g>
 <!-- program~shape_hexahedron -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node29" class="node">
 <title>program~shape_hexahedron</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node29"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-654 13,-654 13,-630 126,-630 126,-654"/>
-<text text-anchor="middle" x="69.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-444 13,-444 13,-420 126,-420 126,-444"/>
+<text text-anchor="middle" x="69.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge19" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M121.79,-629.96C142.58,-625.09 166.75,-619.42 188.43,-614.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="189.26,-617.73 198.2,-612.04 187.66,-610.91 189.26,-617.73"/>
+<!-- program~shape_hexahedron&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge24" class="edge">
+<title>program~shape_hexahedron&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M126.16,-425.47C138.59,-424.01 152.04,-422.43 165.33,-420.87"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="165.93,-424.33 175.45,-419.69 165.11,-417.38 165.93,-424.33"/>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge37" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M121.36,-630C127.55,-627.51 133.59,-624.54 139,-621 159.57,-607.53 154.28,-592.24 175,-579 177.77,-577.23 180.7,-575.6 183.72,-574.11"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="185.27,-577.25 193.03,-570.03 182.46,-570.84 185.27,-577.25"/>
+<!-- program~shape_hexahedron&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge42" class="edge">
+<title>program~shape_hexahedron&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M115.26,-419.91C123.28,-417.28 131.48,-414.29 139,-411 155.97,-403.57 157.95,-397.24 175,-390 179.95,-387.9 185.17,-385.94 190.46,-384.14"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="191.56,-387.46 200,-381.05 189.41,-380.8 191.56,-387.46"/>
 </g>
 <!-- program~shape_ring_2d -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node30" class="node">
 <title>program~shape_ring_2d</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node30"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-276 24.5,-276 24.5,-252 114.5,-252 114.5,-276"/>
-<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-66 24.5,-66 24.5,-42 114.5,-42 114.5,-66"/>
+<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge25" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M114.54,-273.47C123.05,-276.39 131.61,-280.16 139,-285 159.57,-298.47 154.28,-313.76 175,-327 177.77,-328.77 180.7,-330.4 183.72,-331.89"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="182.46,-335.16 193.03,-335.97 185.27,-328.75 182.46,-335.16"/>
+<!-- program~shape_ring_2d&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge30" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M114.6,-62.16C123.29,-65.18 131.91,-69.33 139,-75 164.19,-95.14 149.59,-118.15 175,-138 176.85,-139.45 178.79,-140.79 180.81,-142.04"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="179.58,-145.36 190.06,-146.97 182.87,-139.18 179.58,-145.36"/>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge43" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M114.75,-274.38C136.95,-279.59 164.19,-285.98 188.36,-291.65"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="187.62,-295.08 198.15,-293.95 189.22,-288.26 187.62,-295.08"/>
+<!-- program~shape_ring_2d&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge48" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M111.57,-66.11C120.64,-68.92 130.18,-71.97 139,-75 162.63,-83.1 188.77,-93 209.69,-101.14"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="208.62,-104.48 219.21,-104.87 211.17,-97.97 208.62,-104.48"/>
 </g>
 <!-- program~shape_ring_3d -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node31" class="node">
 <title>program~shape_ring_3d</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node31"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-612 24.5,-612 24.5,-588 114.5,-588 114.5,-612"/>
-<text text-anchor="middle" x="69.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-402 24.5,-402 24.5,-378 114.5,-378 114.5,-402"/>
+<text text-anchor="middle" x="69.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~export_xc -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge20" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M114.75,-600C130.07,-600 147.78,-600 165.24,-600"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="165.46,-603.5 175.46,-600 165.46,-596.5 165.46,-603.5"/>
+<!-- program~shape_ring_3d&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge25" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M114.75,-395.19C130.07,-396.99 147.78,-399.07 165.24,-401.11"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="165.12,-404.62 175.46,-402.31 165.94,-397.67 165.12,-404.62"/>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~export_xg -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge38" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#00ffff" d="M114.75,-589.62C136.95,-584.41 164.19,-578.02 188.36,-572.35"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="189.22,-575.74 198.15,-570.05 187.62,-568.92 189.22,-575.74"/>
+<!-- program~shape_ring_3d&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge43" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M114.75,-384.81C129.89,-383.03 147.38,-380.98 164.64,-378.96"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="165.24,-382.41 174.76,-377.77 164.42,-375.46 165.24,-382.41"/>
 </g>
 <!-- program~shape_tetragon -->
 <g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_node32" class="node">
 <title>program~shape_tetragon</title>
 <g id="a_proc~~cmp_elemconn_c0_v~~CalledByGraph_node32"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-234 21.5,-234 21.5,-210 117.5,-210 117.5,-234"/>
-<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-24 21.5,-24 21.5,0 117.5,0 117.5,-24"/>
+<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~export_xc~2 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge26" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M117.59,-230.47C125.38,-233.46 132.89,-237.51 139,-243 169.22,-270.14 144.47,-300.21 175,-327 176.51,-328.33 178.11,-329.58 179.77,-330.74"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="178.13,-333.84 188.52,-335.95 181.71,-327.83 178.13,-333.84"/>
+<!-- program~shape_tetragon&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge31" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M117.59,-19.96C125.47,-23 133.01,-27.2 139,-33 174.45,-67.31 139.16,-104.1 175,-138 176.28,-139.21 177.61,-140.34 179.01,-141.42"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="177.2,-144.42 187.51,-146.88 180.99,-138.53 177.2,-144.42"/>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~export_xg~2 -->
-<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge44" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M114.87,-234.03C123.01,-236.68 131.35,-239.69 139,-243 168.62,-255.8 200.43,-274.51 222.28,-288.22"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="220.68,-291.35 230.99,-293.75 224.43,-285.44 220.68,-291.35"/>
+<!-- program~shape_tetragon&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~cmp_elemconn_c0_v~~CalledByGraph_edge49" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M117.8,-24.09C125.07,-26.63 132.36,-29.6 139,-33 173.27,-50.57 207.81,-78.93 228.93,-97.77"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="226.84,-100.6 236.6,-104.72 231.54,-95.41 226.84,-100.6"/>
 </g>
 </g>
 </svg>
@@ -968,7 +968,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elemconn_cn_l.html b/proc/cmp_elemconn_cn_l.html
index 0062fc4fa..33a5da093 100644
--- a/proc/cmp_elemconn_cn_l.html
+++ b/proc/cmp_elemconn_cn_l.html
@@ -244,113 +244,113 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elemconn_cn_l~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_elemconn_cn_lCalledByGraph" width="641pt" height="170pt"
- viewBox="0.00 0.00 641.00 169.95" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph" class="graph" transform="scale(1.49 1.49) rotate(0) translate(4 250)">
+<svg id="proccmp_elemconn_cn_lCalledByGraph" width="641pt" height="165pt"
+ viewBox="0.00 0.00 641.00 164.77" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph" class="graph" transform="scale(1.49 1.49) rotate(0) translate(4 242.26)">
 <title>proc~~cmp_elemconn_cn_l~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-250 954,-250 954,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-242.26 954,-242.26 954,4 -4,4"/>
 <!-- proc~cmp_elemconn_cn_l -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_node1" class="node">
 <title>proc~cmp_elemconn_cn_l</title>
-<polygon fill="none" stroke="black" points="950,-124 823,-124 823,-100 950,-100 950,-124"/>
-<text text-anchor="middle" x="886.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50">cmp_elemConn_Cn_L</text>
+<polygon fill="none" stroke="black" points="950,-146 823,-146 823,-122 950,-122 950,-146"/>
+<text text-anchor="middle" x="886.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50">cmp_elemConn_Cn_L</text>
 </g>
 <!-- interface~elemconn_cn -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_node2" class="node">
 <title>interface~elemconn_cn</title>
 <g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node2"><a xlink:href="../interface/elemconn_cn.html" xlink:title="elemConn_Cn">
-<polygon fill="#a7506f" stroke="#a7506f" points="787,-124 700,-124 700,-100 787,-100 787,-124"/>
-<text text-anchor="middle" x="743.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_Cn</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="787,-146 700,-146 700,-122 787,-122 787,-146"/>
+<text text-anchor="middle" x="743.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_Cn</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_l -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge1" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_l</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M787.19,-112C795.29,-112 803.97,-112 812.69,-112"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="812.93,-115.5 822.93,-112 812.93,-108.5 812.93,-115.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M787.19,-134C795.29,-134 803.97,-134 812.69,-134"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="812.93,-137.5 822.93,-134 812.93,-130.5 812.93,-137.5"/>
 </g>
 <!-- proc~cmp_elem -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_node3" class="node">
 <title>proc~cmp_elem</title>
-<g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_volume%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-205 511,-205 511,-181 664,-181 664,-205"/>
-<text text-anchor="middle" x="587.5" y="-190.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
+<g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_curve%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="659,-226 516,-226 516,-202 659,-202 659,-226"/>
+<text text-anchor="middle" x="587.5" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem&#45;&gt;interface~elemconn_cn -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge2" class="edge">
 <title>proc~cmp_elem&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#ff0000" d="M611.56,-180.87C637.83,-167.05 680.94,-144.38 710.47,-128.85"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="712.32,-131.83 719.54,-124.08 709.06,-125.63 712.32,-131.83"/>
+<path fill="none" stroke="#ff0000" d="M611.89,-201.85C638.16,-188.2 680.96,-165.97 710.36,-150.7"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="712.13,-153.72 719.4,-146 708.91,-147.51 712.13,-153.72"/>
 </g>
 <!-- proc~cmp_elem~2 -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_node4" class="node">
 <title>proc~cmp_elem~2</title>
-<g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node4"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_surface%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-124 511,-124 511,-100 664,-100 664,-124"/>
-<text text-anchor="middle" x="587.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
+<g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node4"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_volume%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-146 511,-146 511,-122 664,-122 664,-146"/>
+<text text-anchor="middle" x="587.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~2&#45;&gt;interface~elemconn_cn -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge3" class="edge">
 <title>proc~cmp_elem~2&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#ff0000" d="M664.15,-112C672.81,-112 681.5,-112 689.77,-112"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="689.99,-115.5 699.99,-112 689.99,-108.5 689.99,-115.5"/>
+<path fill="none" stroke="#ff0000" d="M664.15,-134C672.81,-134 681.5,-134 689.77,-134"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="689.99,-137.5 699.99,-134 689.99,-130.5 689.99,-137.5"/>
 </g>
 <!-- proc~cmp_elem~3 -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_node5" class="node">
 <title>proc~cmp_elem~3</title>
-<g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node5"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_curve%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="659,-64 516,-64 516,-40 659,-40 659,-64"/>
-<text text-anchor="middle" x="587.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
+<g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node5"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_surface%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-64 511,-64 511,-40 664,-40 664,-64"/>
+<text text-anchor="middle" x="587.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;interface~elemconn_cn -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge4" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#ff0000" d="M619.66,-64.14C643.43,-73.4 676.37,-86.23 702.15,-96.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="701.06,-99.61 711.65,-99.98 703.6,-93.09 701.06,-99.61"/>
+<path fill="none" stroke="#ff0000" d="M611.22,-64.1C637.57,-78.13 681.17,-101.34 710.83,-117.14"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="709.46,-120.37 719.93,-121.98 712.75,-114.2 709.46,-120.37"/>
 </g>
 <!-- proc~ansatz -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_node6" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node6"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-226 343,-226 343,-202 475,-202 475,-226"/>
-<text text-anchor="middle" x="409" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node6"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="470,-226 348,-226 348,-202 470,-202 470,-226"/>
+<text text-anchor="middle" x="409" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge5" class="edge">
 <title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0000" d="M475.22,-206.24C483.55,-205.25 492.17,-204.22 500.76,-203.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="501.3,-206.66 510.81,-202.01 500.47,-199.71 501.3,-206.66"/>
+<path fill="none" stroke="#ff0000" d="M470.25,-214C481.72,-214 493.89,-214 505.87,-214"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="505.88,-217.5 515.88,-214 505.88,-210.5 505.88,-217.5"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_node7" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node7"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-104 343,-104 343,-80 475,-80 475,-104"/>
-<text text-anchor="middle" x="409" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node7"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-146 343,-146 343,-122 475,-122 475,-146"/>
+<text text-anchor="middle" x="409" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;proc~cmp_elem~2 -->
-<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge8" class="edge">
+<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge7" class="edge">
 <title>proc~ansatz~2&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#00ff00" d="M475.22,-99.39C483.55,-100.33 492.17,-101.31 500.76,-102.28"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="500.48,-105.78 510.81,-103.42 501.27,-98.82 500.48,-105.78"/>
+<path fill="none" stroke="#00ff00" d="M475.22,-134C483.55,-134 492.17,-134 500.76,-134"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="500.81,-137.5 510.81,-134 500.81,-130.5 500.81,-137.5"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_node8" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node8"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="470,-24 348,-24 348,0 470,0 470,-24"/>
-<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node8"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-24 343,-24 343,0 475,0 475,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
@@ -364,124 +364,124 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_node9" class="node">
 <title>proc~cmp_area</title>
 <g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node9"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-124 149,-124 149,-100 299,-100 299,-124"/>
-<text text-anchor="middle" x="224" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-44 149,-44 149,-20 299,-20 299,-44"/>
+<text text-anchor="middle" x="224" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~2 -->
-<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge9" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#00ff00" d="M299.28,-112.73C313.78,-112.84 328.86,-112.94 343,-113 401.67,-113.25 416.33,-113.26 475,-113 483.35,-112.96 492.05,-112.91 500.74,-112.85"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="500.96,-116.35 510.93,-112.77 500.9,-109.35 500.96,-116.35"/>
+<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~3 -->
+<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge11" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~cmp_elem~3</title>
+<path fill="none" stroke="#0000ff" d="M299.03,-36.1C357.53,-39.33 439.28,-43.86 500.65,-47.25"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="500.53,-50.75 510.71,-47.81 500.91,-43.76 500.53,-50.75"/>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge13" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ffda00" d="M299.17,-103.89C310.24,-102.68 321.67,-101.43 332.77,-100.22"/>
-<polygon fill="#ffda00" stroke="#ffda00" points="333.29,-103.69 342.85,-99.12 332.52,-96.73 333.29,-103.69"/>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge14" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#48ff00" d="M299.17,-23.89C310.24,-22.68 321.67,-21.43 332.77,-20.22"/>
+<polygon fill="#48ff00" stroke="#48ff00" points="333.29,-23.69 342.85,-19.12 332.52,-16.73 333.29,-23.69"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_node10" class="node">
 <title>proc~cmp_length</title>
 <g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node10"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-44 149,-44 149,-20 299,-20 299,-44"/>
-<text text-anchor="middle" x="224" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-236 149,-236 149,-212 299,-212 299,-236"/>
+<text text-anchor="middle" x="224" y="-221.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~cmp_elem~3 -->
-<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge11" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#0000ff" d="M299.03,-36.1C359.2,-39.42 443.95,-44.11 505.84,-47.54"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="505.77,-51.04 515.95,-48.1 506.16,-44.05 505.77,-51.04"/>
+<!-- proc~cmp_length&#45;&gt;proc~cmp_elem -->
+<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge6" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~cmp_elem</title>
+<path fill="none" stroke="#ff0000" d="M299.24,-232.58C349.05,-237.03 416.06,-240.5 475,-235 490.85,-233.52 507.8,-230.88 523.58,-227.97"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="524.59,-231.34 533.76,-226.02 523.28,-224.46 524.59,-231.34"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge14" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#48ff00" d="M299.17,-23.89C311.91,-22.5 325.12,-21.06 337.76,-19.68"/>
-<polygon fill="#48ff00" stroke="#48ff00" points="338.19,-23.15 347.75,-18.58 337.43,-16.19 338.19,-23.15"/>
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
+<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge12" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M299.17,-219.95C311.91,-219.25 325.12,-218.53 337.76,-217.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="337.95,-221.33 347.75,-217.29 337.57,-214.34 337.95,-221.33"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_node11" class="node">
 <title>proc~cmp_volume</title>
 <g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node11"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-246 141,-246 141,-222 307,-222 307,-246"/>
-<text text-anchor="middle" x="224" y="-231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-175 141,-175 141,-151 307,-151 307,-175"/>
+<text text-anchor="middle" x="224" y="-160.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem -->
-<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge6" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0000" d="M307.01,-241.85C356.13,-244.69 419.6,-245.09 475,-235 502,-230.08 530.96,-218.98 552.6,-209.43"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="554.33,-212.49 562,-205.17 551.44,-206.11 554.33,-212.49"/>
+<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge8" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#00ff00" d="M307.14,-163.55C356.02,-163.09 419.21,-161.11 475,-155 490.26,-153.33 506.56,-150.73 521.86,-147.92"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="522.56,-151.35 531.74,-146.05 521.26,-144.47 522.56,-151.35"/>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge12" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.13,-225.02C315.64,-224.09 324.26,-223.15 332.7,-222.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="333.31,-225.68 342.87,-221.12 332.54,-218.73 333.31,-225.68"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge13" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ffda00" d="M300.75,-151C311.34,-149.32 322.21,-147.6 332.78,-145.92"/>
+<polygon fill="#ffda00" stroke="#ffda00" points="333.47,-149.35 342.8,-144.33 332.38,-142.44 333.47,-149.35"/>
 </g>
 <!-- program~example3_volume -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_node12" class="node">
 <title>program~example3_volume</title>
 <g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node12"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="464,-184 354,-184 354,-160 464,-160 464,-184"/>
-<text text-anchor="middle" x="409" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="464,-104 354,-104 354,-80 464,-80 464,-104"/>
+<text text-anchor="middle" x="409" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~cmp_elem -->
-<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge7" class="edge">
-<title>program~example3_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0000" d="M464.4,-178.47C475.98,-179.85 488.49,-181.34 500.93,-182.82"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="500.52,-186.3 510.87,-184 501.35,-179.34 500.52,-186.3"/>
+<!-- program~example3_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge9" class="edge">
+<title>program~example3_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#00ff00" d="M460.58,-104.04C480.98,-108.89 504.69,-114.53 526,-119.6"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="525.38,-123.05 535.91,-121.96 527,-116.24 525.38,-123.05"/>
 </g>
 <!-- program~compute_area -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_node13" class="node">
 <title>program~compute_area</title>
 <g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node13"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-124 8,-124 8,-100 97,-100 97,-124"/>
-<text text-anchor="middle" x="52.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-44 8,-44 8,-20 97,-20 97,-44"/>
+<text text-anchor="middle" x="52.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
 <!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge15" class="edge">
 <title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#00ff91" d="M97.15,-112C109.86,-112 124.19,-112 138.52,-112"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="138.92,-115.5 148.92,-112 138.92,-108.5 138.92,-115.5"/>
+<path fill="none" stroke="#00ff91" d="M97.15,-32C109.86,-32 124.19,-32 138.52,-32"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="138.92,-35.5 148.92,-32 138.92,-28.5 138.92,-35.5"/>
 </g>
 <!-- program~compute_length -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_node14" class="node">
 <title>program~compute_length</title>
 <g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node14"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-44 3,-44 3,-20 102,-20 102,-44"/>
-<text text-anchor="middle" x="52.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-236 3,-236 3,-212 102,-212 102,-236"/>
+<text text-anchor="middle" x="52.5" y="-221.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge16" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#0091ff" d="M102.07,-32C113.57,-32 126.17,-32 138.75,-32"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="138.82,-35.5 148.82,-32 138.82,-28.5 138.82,-35.5"/>
+<path fill="none" stroke="#0091ff" d="M102.07,-224C113.57,-224 126.17,-224 138.75,-224"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="138.82,-227.5 148.82,-224 138.82,-220.5 138.82,-227.5"/>
 </g>
 <!-- program~compute_volume -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_node15" class="node">
 <title>program~compute_volume</title>
 <g id="a_proc~~cmp_elemconn_cn_l~~CalledByGraph_node15"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-246 0,-246 0,-222 105,-222 105,-246"/>
-<text text-anchor="middle" x="52.5" y="-231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-175 0,-175 0,-151 105,-151 105,-175"/>
+<text text-anchor="middle" x="52.5" y="-160.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
 <!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="proc~~cmp_elemconn_cn_l~~CalledByGraph_edge17" class="edge">
 <title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#4800ff" d="M105.28,-234C113.39,-234 121.99,-234 130.69,-234"/>
-<polygon fill="#4800ff" stroke="#4800ff" points="130.93,-237.5 140.93,-234 130.93,-230.5 130.93,-237.5"/>
+<path fill="none" stroke="#4800ff" d="M105.28,-163C113.39,-163 121.99,-163 130.69,-163"/>
+<polygon fill="#4800ff" stroke="#4800ff" points="130.93,-166.5 140.93,-163 130.93,-159.5 130.93,-166.5"/>
 </g>
 </g>
 </svg>
@@ -601,7 +601,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elemconn_cn_s.html b/proc/cmp_elemconn_cn_s.html
index 2a646c551..ccfe6a957 100644
--- a/proc/cmp_elemconn_cn_s.html
+++ b/proc/cmp_elemconn_cn_s.html
@@ -216,7 +216,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth1~3"></span>
+              <span class="anchor" id="variable-xth1~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -231,7 +231,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth2~3"></span>
+              <span class="anchor" id="variable-xth2~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -304,113 +304,113 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elemconn_cn_s~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_elemconn_cn_sCalledByGraph" width="641pt" height="170pt"
- viewBox="0.00 0.00 641.00 169.95" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph" class="graph" transform="scale(1.49 1.49) rotate(0) translate(4 250)">
+<svg id="proccmp_elemconn_cn_sCalledByGraph" width="641pt" height="165pt"
+ viewBox="0.00 0.00 641.00 164.77" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph" class="graph" transform="scale(1.49 1.49) rotate(0) translate(4 242.26)">
 <title>proc~~cmp_elemconn_cn_s~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-250 954,-250 954,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-242.26 954,-242.26 954,4 -4,4"/>
 <!-- proc~cmp_elemconn_cn_s -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_node1" class="node">
 <title>proc~cmp_elemconn_cn_s</title>
-<polygon fill="none" stroke="black" points="950,-124 823,-124 823,-100 950,-100 950,-124"/>
-<text text-anchor="middle" x="886.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50">cmp_elemConn_Cn_S</text>
+<polygon fill="none" stroke="black" points="950,-146 823,-146 823,-122 950,-122 950,-146"/>
+<text text-anchor="middle" x="886.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50">cmp_elemConn_Cn_S</text>
 </g>
 <!-- interface~elemconn_cn -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_node2" class="node">
 <title>interface~elemconn_cn</title>
 <g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node2"><a xlink:href="../interface/elemconn_cn.html" xlink:title="elemConn_Cn">
-<polygon fill="#a7506f" stroke="#a7506f" points="787,-124 700,-124 700,-100 787,-100 787,-124"/>
-<text text-anchor="middle" x="743.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_Cn</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="787,-146 700,-146 700,-122 787,-122 787,-146"/>
+<text text-anchor="middle" x="743.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_Cn</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_s -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge1" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_s</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M787.19,-112C795.29,-112 803.97,-112 812.69,-112"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="812.93,-115.5 822.93,-112 812.93,-108.5 812.93,-115.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M787.19,-134C795.29,-134 803.97,-134 812.69,-134"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="812.93,-137.5 822.93,-134 812.93,-130.5 812.93,-137.5"/>
 </g>
 <!-- proc~cmp_elem -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_node3" class="node">
 <title>proc~cmp_elem</title>
-<g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_volume%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-205 511,-205 511,-181 664,-181 664,-205"/>
-<text text-anchor="middle" x="587.5" y="-190.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
+<g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_curve%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="659,-226 516,-226 516,-202 659,-202 659,-226"/>
+<text text-anchor="middle" x="587.5" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem&#45;&gt;interface~elemconn_cn -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge2" class="edge">
 <title>proc~cmp_elem&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#ff0000" d="M611.56,-180.87C637.83,-167.05 680.94,-144.38 710.47,-128.85"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="712.32,-131.83 719.54,-124.08 709.06,-125.63 712.32,-131.83"/>
+<path fill="none" stroke="#ff0000" d="M611.89,-201.85C638.16,-188.2 680.96,-165.97 710.36,-150.7"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="712.13,-153.72 719.4,-146 708.91,-147.51 712.13,-153.72"/>
 </g>
 <!-- proc~cmp_elem~2 -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_node4" class="node">
 <title>proc~cmp_elem~2</title>
-<g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node4"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_surface%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-124 511,-124 511,-100 664,-100 664,-124"/>
-<text text-anchor="middle" x="587.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
+<g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node4"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_volume%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-146 511,-146 511,-122 664,-122 664,-146"/>
+<text text-anchor="middle" x="587.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~2&#45;&gt;interface~elemconn_cn -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge3" class="edge">
 <title>proc~cmp_elem~2&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#ff0000" d="M664.15,-112C672.81,-112 681.5,-112 689.77,-112"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="689.99,-115.5 699.99,-112 689.99,-108.5 689.99,-115.5"/>
+<path fill="none" stroke="#ff0000" d="M664.15,-134C672.81,-134 681.5,-134 689.77,-134"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="689.99,-137.5 699.99,-134 689.99,-130.5 689.99,-137.5"/>
 </g>
 <!-- proc~cmp_elem~3 -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_node5" class="node">
 <title>proc~cmp_elem~3</title>
-<g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node5"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_curve%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="659,-64 516,-64 516,-40 659,-40 659,-64"/>
-<text text-anchor="middle" x="587.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
+<g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node5"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_surface%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-64 511,-64 511,-40 664,-40 664,-64"/>
+<text text-anchor="middle" x="587.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;interface~elemconn_cn -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge4" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#ff0000" d="M619.66,-64.14C643.43,-73.4 676.37,-86.23 702.15,-96.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="701.06,-99.61 711.65,-99.98 703.6,-93.09 701.06,-99.61"/>
+<path fill="none" stroke="#ff0000" d="M611.22,-64.1C637.57,-78.13 681.17,-101.34 710.83,-117.14"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="709.46,-120.37 719.93,-121.98 712.75,-114.2 709.46,-120.37"/>
 </g>
 <!-- proc~ansatz -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_node6" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node6"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-226 343,-226 343,-202 475,-202 475,-226"/>
-<text text-anchor="middle" x="409" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node6"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="470,-226 348,-226 348,-202 470,-202 470,-226"/>
+<text text-anchor="middle" x="409" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge5" class="edge">
 <title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0000" d="M475.22,-206.24C483.55,-205.25 492.17,-204.22 500.76,-203.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="501.3,-206.66 510.81,-202.01 500.47,-199.71 501.3,-206.66"/>
+<path fill="none" stroke="#ff0000" d="M470.25,-214C481.72,-214 493.89,-214 505.87,-214"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="505.88,-217.5 515.88,-214 505.88,-210.5 505.88,-217.5"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_node7" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node7"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-104 343,-104 343,-80 475,-80 475,-104"/>
-<text text-anchor="middle" x="409" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node7"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-146 343,-146 343,-122 475,-122 475,-146"/>
+<text text-anchor="middle" x="409" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;proc~cmp_elem~2 -->
-<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge8" class="edge">
+<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge7" class="edge">
 <title>proc~ansatz~2&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#00ff00" d="M475.22,-99.39C483.55,-100.33 492.17,-101.31 500.76,-102.28"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="500.48,-105.78 510.81,-103.42 501.27,-98.82 500.48,-105.78"/>
+<path fill="none" stroke="#00ff00" d="M475.22,-134C483.55,-134 492.17,-134 500.76,-134"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="500.81,-137.5 510.81,-134 500.81,-130.5 500.81,-137.5"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_node8" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node8"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="470,-24 348,-24 348,0 470,0 470,-24"/>
-<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node8"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-24 343,-24 343,0 475,0 475,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
@@ -424,124 +424,124 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_node9" class="node">
 <title>proc~cmp_area</title>
 <g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node9"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-124 149,-124 149,-100 299,-100 299,-124"/>
-<text text-anchor="middle" x="224" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-44 149,-44 149,-20 299,-20 299,-44"/>
+<text text-anchor="middle" x="224" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~2 -->
-<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge9" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#00ff00" d="M299.28,-112.73C313.78,-112.84 328.86,-112.94 343,-113 401.67,-113.25 416.33,-113.26 475,-113 483.35,-112.96 492.05,-112.91 500.74,-112.85"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="500.96,-116.35 510.93,-112.77 500.9,-109.35 500.96,-116.35"/>
+<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~3 -->
+<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge11" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~cmp_elem~3</title>
+<path fill="none" stroke="#0000ff" d="M299.03,-36.1C357.53,-39.33 439.28,-43.86 500.65,-47.25"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="500.53,-50.75 510.71,-47.81 500.91,-43.76 500.53,-50.75"/>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge13" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ffda00" d="M299.17,-103.89C310.24,-102.68 321.67,-101.43 332.77,-100.22"/>
-<polygon fill="#ffda00" stroke="#ffda00" points="333.29,-103.69 342.85,-99.12 332.52,-96.73 333.29,-103.69"/>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge14" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#48ff00" d="M299.17,-23.89C310.24,-22.68 321.67,-21.43 332.77,-20.22"/>
+<polygon fill="#48ff00" stroke="#48ff00" points="333.29,-23.69 342.85,-19.12 332.52,-16.73 333.29,-23.69"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_node10" class="node">
 <title>proc~cmp_length</title>
 <g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node10"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-44 149,-44 149,-20 299,-20 299,-44"/>
-<text text-anchor="middle" x="224" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-236 149,-236 149,-212 299,-212 299,-236"/>
+<text text-anchor="middle" x="224" y="-221.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~cmp_elem~3 -->
-<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge11" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#0000ff" d="M299.03,-36.1C359.2,-39.42 443.95,-44.11 505.84,-47.54"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="505.77,-51.04 515.95,-48.1 506.16,-44.05 505.77,-51.04"/>
+<!-- proc~cmp_length&#45;&gt;proc~cmp_elem -->
+<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge6" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~cmp_elem</title>
+<path fill="none" stroke="#ff0000" d="M299.24,-232.58C349.05,-237.03 416.06,-240.5 475,-235 490.85,-233.52 507.8,-230.88 523.58,-227.97"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="524.59,-231.34 533.76,-226.02 523.28,-224.46 524.59,-231.34"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge14" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#48ff00" d="M299.17,-23.89C311.91,-22.5 325.12,-21.06 337.76,-19.68"/>
-<polygon fill="#48ff00" stroke="#48ff00" points="338.19,-23.15 347.75,-18.58 337.43,-16.19 338.19,-23.15"/>
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
+<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge12" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M299.17,-219.95C311.91,-219.25 325.12,-218.53 337.76,-217.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="337.95,-221.33 347.75,-217.29 337.57,-214.34 337.95,-221.33"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_node11" class="node">
 <title>proc~cmp_volume</title>
 <g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node11"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-246 141,-246 141,-222 307,-222 307,-246"/>
-<text text-anchor="middle" x="224" y="-231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-175 141,-175 141,-151 307,-151 307,-175"/>
+<text text-anchor="middle" x="224" y="-160.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem -->
-<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge6" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0000" d="M307.01,-241.85C356.13,-244.69 419.6,-245.09 475,-235 502,-230.08 530.96,-218.98 552.6,-209.43"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="554.33,-212.49 562,-205.17 551.44,-206.11 554.33,-212.49"/>
+<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge8" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#00ff00" d="M307.14,-163.55C356.02,-163.09 419.21,-161.11 475,-155 490.26,-153.33 506.56,-150.73 521.86,-147.92"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="522.56,-151.35 531.74,-146.05 521.26,-144.47 522.56,-151.35"/>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge12" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.13,-225.02C315.64,-224.09 324.26,-223.15 332.7,-222.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="333.31,-225.68 342.87,-221.12 332.54,-218.73 333.31,-225.68"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge13" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ffda00" d="M300.75,-151C311.34,-149.32 322.21,-147.6 332.78,-145.92"/>
+<polygon fill="#ffda00" stroke="#ffda00" points="333.47,-149.35 342.8,-144.33 332.38,-142.44 333.47,-149.35"/>
 </g>
 <!-- program~example3_volume -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_node12" class="node">
 <title>program~example3_volume</title>
 <g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node12"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="464,-184 354,-184 354,-160 464,-160 464,-184"/>
-<text text-anchor="middle" x="409" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="464,-104 354,-104 354,-80 464,-80 464,-104"/>
+<text text-anchor="middle" x="409" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~cmp_elem -->
-<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge7" class="edge">
-<title>program~example3_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0000" d="M464.4,-178.47C475.98,-179.85 488.49,-181.34 500.93,-182.82"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="500.52,-186.3 510.87,-184 501.35,-179.34 500.52,-186.3"/>
+<!-- program~example3_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge9" class="edge">
+<title>program~example3_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#00ff00" d="M460.58,-104.04C480.98,-108.89 504.69,-114.53 526,-119.6"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="525.38,-123.05 535.91,-121.96 527,-116.24 525.38,-123.05"/>
 </g>
 <!-- program~compute_area -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_node13" class="node">
 <title>program~compute_area</title>
 <g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node13"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-124 8,-124 8,-100 97,-100 97,-124"/>
-<text text-anchor="middle" x="52.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-44 8,-44 8,-20 97,-20 97,-44"/>
+<text text-anchor="middle" x="52.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
 <!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge15" class="edge">
 <title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#00ff91" d="M97.15,-112C109.86,-112 124.19,-112 138.52,-112"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="138.92,-115.5 148.92,-112 138.92,-108.5 138.92,-115.5"/>
+<path fill="none" stroke="#00ff91" d="M97.15,-32C109.86,-32 124.19,-32 138.52,-32"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="138.92,-35.5 148.92,-32 138.92,-28.5 138.92,-35.5"/>
 </g>
 <!-- program~compute_length -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_node14" class="node">
 <title>program~compute_length</title>
 <g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node14"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-44 3,-44 3,-20 102,-20 102,-44"/>
-<text text-anchor="middle" x="52.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-236 3,-236 3,-212 102,-212 102,-236"/>
+<text text-anchor="middle" x="52.5" y="-221.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge16" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#0091ff" d="M102.07,-32C113.57,-32 126.17,-32 138.75,-32"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="138.82,-35.5 148.82,-32 138.82,-28.5 138.82,-35.5"/>
+<path fill="none" stroke="#0091ff" d="M102.07,-224C113.57,-224 126.17,-224 138.75,-224"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="138.82,-227.5 148.82,-224 138.82,-220.5 138.82,-227.5"/>
 </g>
 <!-- program~compute_volume -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_node15" class="node">
 <title>program~compute_volume</title>
 <g id="a_proc~~cmp_elemconn_cn_s~~CalledByGraph_node15"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-246 0,-246 0,-222 105,-222 105,-246"/>
-<text text-anchor="middle" x="52.5" y="-231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-175 0,-175 0,-151 105,-151 105,-175"/>
+<text text-anchor="middle" x="52.5" y="-160.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
 <!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="proc~~cmp_elemconn_cn_s~~CalledByGraph_edge17" class="edge">
 <title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#4800ff" d="M105.28,-234C113.39,-234 121.99,-234 130.69,-234"/>
-<polygon fill="#4800ff" stroke="#4800ff" points="130.93,-237.5 140.93,-234 130.93,-230.5 130.93,-237.5"/>
+<path fill="none" stroke="#4800ff" d="M105.28,-163C113.39,-163 121.99,-163 130.69,-163"/>
+<polygon fill="#4800ff" stroke="#4800ff" points="130.93,-166.5 140.93,-163 130.93,-159.5 130.93,-166.5"/>
 </g>
 </g>
 </svg>
@@ -661,7 +661,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elemconn_cn_v.html b/proc/cmp_elemconn_cn_v.html
index adac7b314..d3d0ac26a 100644
--- a/proc/cmp_elemconn_cn_v.html
+++ b/proc/cmp_elemconn_cn_v.html
@@ -246,7 +246,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth1~4"></span>
+              <span class="anchor" id="variable-xth1~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -261,7 +261,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth2~4"></span>
+              <span class="anchor" id="variable-xth2~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -364,113 +364,113 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elemconn_cn_v~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_elemconn_cn_vCalledByGraph" width="641pt" height="170pt"
- viewBox="0.00 0.00 641.00 169.77" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph" class="graph" transform="scale(1.5 1.5) rotate(0) translate(4 250)">
+<svg id="proccmp_elemconn_cn_vCalledByGraph" width="641pt" height="165pt"
+ viewBox="0.00 0.00 641.00 164.60" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph" class="graph" transform="scale(1.5 1.5) rotate(0) translate(4 242.26)">
 <title>proc~~cmp_elemconn_cn_v~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-250 955,-250 955,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-242.26 955,-242.26 955,4 -4,4"/>
 <!-- proc~cmp_elemconn_cn_v -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_node1" class="node">
 <title>proc~cmp_elemconn_cn_v</title>
-<polygon fill="none" stroke="black" points="951,-124 823,-124 823,-100 951,-100 951,-124"/>
-<text text-anchor="middle" x="887" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50">cmp_elemConn_Cn_V</text>
+<polygon fill="none" stroke="black" points="951,-146 823,-146 823,-122 951,-122 951,-146"/>
+<text text-anchor="middle" x="887" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50">cmp_elemConn_Cn_V</text>
 </g>
 <!-- interface~elemconn_cn -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_node2" class="node">
 <title>interface~elemconn_cn</title>
 <g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node2"><a xlink:href="../interface/elemconn_cn.html" xlink:title="elemConn_Cn">
-<polygon fill="#a7506f" stroke="#a7506f" points="787,-124 700,-124 700,-100 787,-100 787,-124"/>
-<text text-anchor="middle" x="743.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_Cn</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="787,-146 700,-146 700,-122 787,-122 787,-146"/>
+<text text-anchor="middle" x="743.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_Cn</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_v -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge1" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_v</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M787.34,-112C795.41,-112 804.05,-112 812.75,-112"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="812.95,-115.5 822.95,-112 812.95,-108.5 812.95,-115.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M787.34,-134C795.41,-134 804.05,-134 812.75,-134"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="812.95,-137.5 822.95,-134 812.95,-130.5 812.95,-137.5"/>
 </g>
 <!-- proc~cmp_elem -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_node3" class="node">
 <title>proc~cmp_elem</title>
-<g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_volume%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-205 511,-205 511,-181 664,-181 664,-205"/>
-<text text-anchor="middle" x="587.5" y="-190.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
+<g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_curve%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="659,-226 516,-226 516,-202 659,-202 659,-226"/>
+<text text-anchor="middle" x="587.5" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem&#45;&gt;interface~elemconn_cn -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge2" class="edge">
 <title>proc~cmp_elem&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#ff0000" d="M611.56,-180.87C637.83,-167.05 680.94,-144.38 710.47,-128.85"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="712.32,-131.83 719.54,-124.08 709.06,-125.63 712.32,-131.83"/>
+<path fill="none" stroke="#ff0000" d="M611.89,-201.85C638.16,-188.2 680.96,-165.97 710.36,-150.7"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="712.13,-153.72 719.4,-146 708.91,-147.51 712.13,-153.72"/>
 </g>
 <!-- proc~cmp_elem~2 -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_node4" class="node">
 <title>proc~cmp_elem~2</title>
-<g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node4"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_surface%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-124 511,-124 511,-100 664,-100 664,-124"/>
-<text text-anchor="middle" x="587.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
+<g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node4"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_volume%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-146 511,-146 511,-122 664,-122 664,-146"/>
+<text text-anchor="middle" x="587.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~2&#45;&gt;interface~elemconn_cn -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge3" class="edge">
 <title>proc~cmp_elem~2&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#ff0000" d="M664.15,-112C672.81,-112 681.5,-112 689.77,-112"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="689.99,-115.5 699.99,-112 689.99,-108.5 689.99,-115.5"/>
+<path fill="none" stroke="#ff0000" d="M664.15,-134C672.81,-134 681.5,-134 689.77,-134"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="689.99,-137.5 699.99,-134 689.99,-130.5 689.99,-137.5"/>
 </g>
 <!-- proc~cmp_elem~3 -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_node5" class="node">
 <title>proc~cmp_elem~3</title>
-<g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node5"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_curve%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="659,-64 516,-64 516,-40 659,-40 659,-64"/>
-<text text-anchor="middle" x="587.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
+<g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node5"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_surface%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-64 511,-64 511,-40 664,-40 664,-64"/>
+<text text-anchor="middle" x="587.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;interface~elemconn_cn -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge4" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#ff0000" d="M619.66,-64.14C643.43,-73.4 676.37,-86.23 702.15,-96.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="701.06,-99.61 711.65,-99.98 703.6,-93.09 701.06,-99.61"/>
+<path fill="none" stroke="#ff0000" d="M611.22,-64.1C637.57,-78.13 681.17,-101.34 710.83,-117.14"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="709.46,-120.37 719.93,-121.98 712.75,-114.2 709.46,-120.37"/>
 </g>
 <!-- proc~ansatz -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_node6" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node6"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-226 343,-226 343,-202 475,-202 475,-226"/>
-<text text-anchor="middle" x="409" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node6"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="470,-226 348,-226 348,-202 470,-202 470,-226"/>
+<text text-anchor="middle" x="409" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge5" class="edge">
 <title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0000" d="M475.22,-206.24C483.55,-205.25 492.17,-204.22 500.76,-203.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="501.3,-206.66 510.81,-202.01 500.47,-199.71 501.3,-206.66"/>
+<path fill="none" stroke="#ff0000" d="M470.25,-214C481.72,-214 493.89,-214 505.87,-214"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="505.88,-217.5 515.88,-214 505.88,-210.5 505.88,-217.5"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_node7" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node7"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-104 343,-104 343,-80 475,-80 475,-104"/>
-<text text-anchor="middle" x="409" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node7"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-146 343,-146 343,-122 475,-122 475,-146"/>
+<text text-anchor="middle" x="409" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;proc~cmp_elem~2 -->
-<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge8" class="edge">
+<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge7" class="edge">
 <title>proc~ansatz~2&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#00ff00" d="M475.22,-99.39C483.55,-100.33 492.17,-101.31 500.76,-102.28"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="500.48,-105.78 510.81,-103.42 501.27,-98.82 500.48,-105.78"/>
+<path fill="none" stroke="#00ff00" d="M475.22,-134C483.55,-134 492.17,-134 500.76,-134"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="500.81,-137.5 510.81,-134 500.81,-130.5 500.81,-137.5"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_node8" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node8"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="470,-24 348,-24 348,0 470,0 470,-24"/>
-<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node8"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-24 343,-24 343,0 475,0 475,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
@@ -484,124 +484,124 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_node9" class="node">
 <title>proc~cmp_area</title>
 <g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node9"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-124 149,-124 149,-100 299,-100 299,-124"/>
-<text text-anchor="middle" x="224" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-44 149,-44 149,-20 299,-20 299,-44"/>
+<text text-anchor="middle" x="224" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~2 -->
-<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge9" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#00ff00" d="M299.28,-112.73C313.78,-112.84 328.86,-112.94 343,-113 401.67,-113.25 416.33,-113.26 475,-113 483.35,-112.96 492.05,-112.91 500.74,-112.85"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="500.96,-116.35 510.93,-112.77 500.9,-109.35 500.96,-116.35"/>
+<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~3 -->
+<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge11" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~cmp_elem~3</title>
+<path fill="none" stroke="#0000ff" d="M299.03,-36.1C357.53,-39.33 439.28,-43.86 500.65,-47.25"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="500.53,-50.75 510.71,-47.81 500.91,-43.76 500.53,-50.75"/>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge13" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ffda00" d="M299.17,-103.89C310.24,-102.68 321.67,-101.43 332.77,-100.22"/>
-<polygon fill="#ffda00" stroke="#ffda00" points="333.29,-103.69 342.85,-99.12 332.52,-96.73 333.29,-103.69"/>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge14" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#48ff00" d="M299.17,-23.89C310.24,-22.68 321.67,-21.43 332.77,-20.22"/>
+<polygon fill="#48ff00" stroke="#48ff00" points="333.29,-23.69 342.85,-19.12 332.52,-16.73 333.29,-23.69"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_node10" class="node">
 <title>proc~cmp_length</title>
 <g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node10"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-44 149,-44 149,-20 299,-20 299,-44"/>
-<text text-anchor="middle" x="224" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-236 149,-236 149,-212 299,-212 299,-236"/>
+<text text-anchor="middle" x="224" y="-221.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~cmp_elem~3 -->
-<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge11" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#0000ff" d="M299.03,-36.1C359.2,-39.42 443.95,-44.11 505.84,-47.54"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="505.77,-51.04 515.95,-48.1 506.16,-44.05 505.77,-51.04"/>
+<!-- proc~cmp_length&#45;&gt;proc~cmp_elem -->
+<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge6" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~cmp_elem</title>
+<path fill="none" stroke="#ff0000" d="M299.24,-232.58C349.05,-237.03 416.06,-240.5 475,-235 490.85,-233.52 507.8,-230.88 523.58,-227.97"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="524.59,-231.34 533.76,-226.02 523.28,-224.46 524.59,-231.34"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge14" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#48ff00" d="M299.17,-23.89C311.91,-22.5 325.12,-21.06 337.76,-19.68"/>
-<polygon fill="#48ff00" stroke="#48ff00" points="338.19,-23.15 347.75,-18.58 337.43,-16.19 338.19,-23.15"/>
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
+<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge12" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M299.17,-219.95C311.91,-219.25 325.12,-218.53 337.76,-217.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="337.95,-221.33 347.75,-217.29 337.57,-214.34 337.95,-221.33"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_node11" class="node">
 <title>proc~cmp_volume</title>
 <g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node11"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-246 141,-246 141,-222 307,-222 307,-246"/>
-<text text-anchor="middle" x="224" y="-231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-175 141,-175 141,-151 307,-151 307,-175"/>
+<text text-anchor="middle" x="224" y="-160.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem -->
-<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge6" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0000" d="M307.01,-241.85C356.13,-244.69 419.6,-245.09 475,-235 502,-230.08 530.96,-218.98 552.6,-209.43"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="554.33,-212.49 562,-205.17 551.44,-206.11 554.33,-212.49"/>
+<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge8" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#00ff00" d="M307.14,-163.55C356.02,-163.09 419.21,-161.11 475,-155 490.26,-153.33 506.56,-150.73 521.86,-147.92"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="522.56,-151.35 531.74,-146.05 521.26,-144.47 522.56,-151.35"/>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge12" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.13,-225.02C315.64,-224.09 324.26,-223.15 332.7,-222.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="333.31,-225.68 342.87,-221.12 332.54,-218.73 333.31,-225.68"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge13" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ffda00" d="M300.75,-151C311.34,-149.32 322.21,-147.6 332.78,-145.92"/>
+<polygon fill="#ffda00" stroke="#ffda00" points="333.47,-149.35 342.8,-144.33 332.38,-142.44 333.47,-149.35"/>
 </g>
 <!-- program~example3_volume -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_node12" class="node">
 <title>program~example3_volume</title>
 <g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node12"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="464,-184 354,-184 354,-160 464,-160 464,-184"/>
-<text text-anchor="middle" x="409" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="464,-104 354,-104 354,-80 464,-80 464,-104"/>
+<text text-anchor="middle" x="409" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~cmp_elem -->
-<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge7" class="edge">
-<title>program~example3_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0000" d="M464.4,-178.47C475.98,-179.85 488.49,-181.34 500.93,-182.82"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="500.52,-186.3 510.87,-184 501.35,-179.34 500.52,-186.3"/>
+<!-- program~example3_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge9" class="edge">
+<title>program~example3_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#00ff00" d="M460.58,-104.04C480.98,-108.89 504.69,-114.53 526,-119.6"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="525.38,-123.05 535.91,-121.96 527,-116.24 525.38,-123.05"/>
 </g>
 <!-- program~compute_area -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_node13" class="node">
 <title>program~compute_area</title>
 <g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node13"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-124 8,-124 8,-100 97,-100 97,-124"/>
-<text text-anchor="middle" x="52.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-44 8,-44 8,-20 97,-20 97,-44"/>
+<text text-anchor="middle" x="52.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
 <!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge15" class="edge">
 <title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#00ff91" d="M97.15,-112C109.86,-112 124.19,-112 138.52,-112"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="138.92,-115.5 148.92,-112 138.92,-108.5 138.92,-115.5"/>
+<path fill="none" stroke="#00ff91" d="M97.15,-32C109.86,-32 124.19,-32 138.52,-32"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="138.92,-35.5 148.92,-32 138.92,-28.5 138.92,-35.5"/>
 </g>
 <!-- program~compute_length -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_node14" class="node">
 <title>program~compute_length</title>
 <g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node14"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-44 3,-44 3,-20 102,-20 102,-44"/>
-<text text-anchor="middle" x="52.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-236 3,-236 3,-212 102,-212 102,-236"/>
+<text text-anchor="middle" x="52.5" y="-221.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge16" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#0091ff" d="M102.07,-32C113.57,-32 126.17,-32 138.75,-32"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="138.82,-35.5 148.82,-32 138.82,-28.5 138.82,-35.5"/>
+<path fill="none" stroke="#0091ff" d="M102.07,-224C113.57,-224 126.17,-224 138.75,-224"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="138.82,-227.5 148.82,-224 138.82,-220.5 138.82,-227.5"/>
 </g>
 <!-- program~compute_volume -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_node15" class="node">
 <title>program~compute_volume</title>
 <g id="a_proc~~cmp_elemconn_cn_v~~CalledByGraph_node15"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-246 0,-246 0,-222 105,-222 105,-246"/>
-<text text-anchor="middle" x="52.5" y="-231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-175 0,-175 0,-151 105,-151 105,-175"/>
+<text text-anchor="middle" x="52.5" y="-160.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
 <!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="proc~~cmp_elemconn_cn_v~~CalledByGraph_edge17" class="edge">
 <title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#4800ff" d="M105.28,-234C113.39,-234 121.99,-234 130.69,-234"/>
-<polygon fill="#4800ff" stroke="#4800ff" points="130.93,-237.5 140.93,-234 130.93,-230.5 130.93,-237.5"/>
+<path fill="none" stroke="#4800ff" d="M105.28,-163C113.39,-163 121.99,-163 130.69,-163"/>
+<polygon fill="#4800ff" stroke="#4800ff" points="130.93,-166.5 140.93,-163 130.93,-159.5 130.93,-166.5"/>
 </g>
 </g>
 </svg>
@@ -721,7 +721,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elemface.html b/proc/cmp_elemface.html
index ea91ded52..99b842a91 100644
--- a/proc/cmp_elemface.html
+++ b/proc/cmp_elemface.html
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~63"></span>
+              <span class="anchor" id="variable-this~124"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -174,7 +174,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~2"></span>
+              <span class="anchor" id="variable-elem~6"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -207,7 +207,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-elemconn~14"></span>
+          <span class="anchor" id="variable-elemconn~26"></span>
           integer, allocatable, (:)
         </small>
       </h3>
@@ -364,7 +364,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elemface_xc_vis.html b/proc/cmp_elemface_xc_vis.html
index 00e3d9c47..6e18aca26 100644
--- a/proc/cmp_elemface_xc_vis.html
+++ b/proc/cmp_elemface_xc_vis.html
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~64"></span>
+              <span class="anchor" id="variable-this~125"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -174,7 +174,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~3"></span>
+              <span class="anchor" id="variable-elem~7"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -207,7 +207,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-elemconn~15"></span>
+          <span class="anchor" id="variable-elemconn~27"></span>
           integer, allocatable, (:)
         </small>
       </h3>
@@ -243,7 +243,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elemface_xg_vis.html b/proc/cmp_elemface_xg_vis.html
index f07d97b79..20538cb69 100644
--- a/proc/cmp_elemface_xg_vis.html
+++ b/proc/cmp_elemface_xg_vis.html
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~65"></span>
+              <span class="anchor" id="variable-this~126"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -174,7 +174,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~4"></span>
+              <span class="anchor" id="variable-elem~8"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -207,7 +207,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-elemconn~16"></span>
+          <span class="anchor" id="variable-elemconn~28"></span>
           integer, allocatable, (:)
         </small>
       </h3>
@@ -243,7 +243,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elem~2.html b/proc/cmp_elem~2.html
index 513fe12e2..f4022b10a 100644
--- a/proc/cmp_elem~2.html
+++ b/proc/cmp_elem~2.html
@@ -83,15 +83,15 @@ <h1>cmp_elem
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_elem</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function cmp_elem(this) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~119"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~113"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -176,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-elemconn~28"></span>
+          <span class="anchor" id="variable-elemconn~25"></span>
           integer, allocatable, (:,:)
         </small>
       </h3>
@@ -202,7 +202,7 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~cmp_elem~2~~CallsGraph_node1" class="node">
 <title>proc~cmp_elem~2</title>
 <polygon fill="none" stroke="black" points="153,-124 0,-124 0,-100 153,-100 153,-124"/>
-<text text-anchor="middle" x="76.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_elem</text>
+<text text-anchor="middle" x="76.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_elem</text>
 </g>
 <!-- interface~elemconn_cn -->
 <g id="proc~~cmp_elem~2~~CallsGraph_node2" class="node">
@@ -237,9 +237,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_multiplicity~2 -->
 <g id="proc~~cmp_elem~2~~CallsGraph_node4" class="node">
 <title>proc~get_multiplicity~2</title>
-<g id="a_proc~~cmp_elem~2~~CallsGraph_node4"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<g id="a_proc~~cmp_elem~2~~CallsGraph_node4"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="367,-61 189,-61 189,-37 367,-37 367,-61"/>
-<text text-anchor="middle" x="278" y="-46.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
+<text text-anchor="middle" x="278" y="-46.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
@@ -467,71 +467,90 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elem~2~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_elem2CalledByGraph" width="640pt" height="52pt"
- viewBox="0.00 0.00 640.00 52.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_elem~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 48)">
+<svg id="proccmp_elem2CalledByGraph" width="641pt" height="90pt"
+ viewBox="0.00 0.00 641.00 89.66" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_elem~2~~CalledByGraph" class="graph" transform="scale(1.05 1.05) rotate(0) translate(4 90)">
 <title>proc~~cmp_elem~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-48 636,-48 636,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-90 668,-90 668,4 -4,4"/>
 <!-- proc~cmp_elem~2 -->
 <g id="proc~~cmp_elem~2~~CalledByGraph_node1" class="node">
 <title>proc~cmp_elem~2</title>
-<polygon fill="none" stroke="black" points="632,-44 479,-44 479,-20 632,-20 632,-44"/>
-<text text-anchor="middle" x="555.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_elem</text>
+<polygon fill="none" stroke="black" points="664,-66 511,-66 511,-42 664,-42 664,-66"/>
+<text text-anchor="middle" x="587.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_elem</text>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~cmp_elem~2~~CalledByGraph_node2" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~cmp_elem~2~~CalledByGraph_node2"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="443,-24 311,-24 311,0 443,0 443,-24"/>
-<text text-anchor="middle" x="377" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~cmp_elem~2~~CalledByGraph_node2"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-66 343,-66 343,-42 475,-42 475,-66"/>
+<text text-anchor="middle" x="409" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;proc~cmp_elem~2 -->
 <g id="proc~~cmp_elem~2~~CalledByGraph_edge1" class="edge">
 <title>proc~ansatz~2&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#ff0000" d="M443.22,-19.39C451.55,-20.33 460.17,-21.31 468.76,-22.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="468.48,-25.78 478.81,-23.42 469.27,-18.82 468.48,-25.78"/>
+<path fill="none" stroke="#ff0000" d="M475.22,-54C483.55,-54 492.17,-54 500.76,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="500.81,-57.5 510.81,-54 500.81,-50.5 500.81,-57.5"/>
 </g>
-<!-- proc~cmp_area -->
+<!-- proc~cmp_volume -->
 <g id="proc~~cmp_elem~2~~CalledByGraph_node3" class="node">
-<title>proc~cmp_area</title>
-<g id="a_proc~~cmp_elem~2~~CalledByGraph_node3"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="275,-44 125,-44 125,-20 275,-20 275,-44"/>
-<text text-anchor="middle" x="200" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<title>proc~cmp_volume</title>
+<g id="a_proc~~cmp_elem~2~~CalledByGraph_node3"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-86 141,-86 141,-62 307,-62 307,-86"/>
+<text text-anchor="middle" x="224" y="-71.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~2 -->
+<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem~2 -->
 <g id="proc~~cmp_elem~2~~CalledByGraph_edge2" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#ff0000" d="M275.26,-32.77C287.21,-32.86 299.45,-32.95 311,-33 369.67,-33.27 384.33,-33.26 443,-33 451.35,-32.96 460.05,-32.91 468.74,-32.85"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="468.96,-36.35 478.93,-32.77 468.9,-29.35 468.96,-36.35"/>
+<title>proc~cmp_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#ff0000" d="M307.09,-78.33C355.96,-79.91 419.14,-80.21 475,-75 490.85,-73.52 507.8,-70.88 523.58,-67.97"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="524.59,-71.34 533.76,-66.02 523.28,-64.46 524.59,-71.34"/>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~cmp_elem~2~~CalledByGraph_edge3" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ff0000" d="M275.22,-23.52C283.63,-22.56 292.21,-21.58 300.63,-20.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="301.27,-24.06 310.81,-19.45 300.48,-17.11 301.27,-24.06"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~cmp_elem~2~~CalledByGraph_edge4" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ff0000" d="M307.13,-65.02C315.64,-64.09 324.26,-63.15 332.7,-62.23"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="333.31,-65.68 342.87,-61.12 332.54,-58.73 333.31,-65.68"/>
 </g>
-<!-- program~compute_area -->
+<!-- program~example3_volume -->
 <g id="proc~~cmp_elem~2~~CalledByGraph_node4" class="node">
-<title>program~compute_area</title>
-<g id="a_proc~~cmp_elem~2~~CalledByGraph_node4"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-44 0,-44 0,-20 89,-20 89,-44"/>
-<text text-anchor="middle" x="44.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<title>program~example3_volume</title>
+<g id="a_proc~~cmp_elem~2~~CalledByGraph_node4"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="464,-24 354,-24 354,0 464,0 464,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;proc~cmp_area -->
-<g id="proc~~cmp_elem~2~~CalledByGraph_edge4" class="edge">
-<title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#00ffff" d="M89.08,-32C97.19,-32 105.92,-32 114.78,-32"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="114.81,-35.5 124.81,-32 114.81,-28.5 114.81,-35.5"/>
+<!-- program~example3_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="proc~~cmp_elem~2~~CalledByGraph_edge3" class="edge">
+<title>program~example3_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#ff0000" d="M460.58,-24.04C480.98,-28.89 504.69,-34.53 526,-39.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="525.38,-43.05 535.91,-41.96 527,-36.24 525.38,-43.05"/>
+</g>
+<!-- program~compute_volume -->
+<g id="proc~~cmp_elem~2~~CalledByGraph_node5" class="node">
+<title>program~compute_volume</title>
+<g id="a_proc~~cmp_elem~2~~CalledByGraph_node5"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-86 0,-86 0,-62 105,-62 105,-86"/>
+<text text-anchor="middle" x="52.5" y="-71.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+</a>
+</g>
+</g>
+<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
+<g id="proc~~cmp_elem~2~~CalledByGraph_edge5" class="edge">
+<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
+<path fill="none" stroke="#00ff00" d="M105.28,-74C113.39,-74 121.99,-74 130.69,-74"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="130.93,-77.5 140.93,-74 130.93,-70.5 130.93,-77.5"/>
 </g>
 </g>
 </svg>
-</div>          <div>
+</div>                <script>
+                  var panproccmp_elem2CalledByGraph = svgPanZoom('#proccmp_elem2CalledByGraph',
+                    {zoomEnabled: true, controlIconsEnabled: true, fit: true, center: true,}
+                  );
+                </script>          <div>
             <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
           </div>
           <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
@@ -643,7 +662,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_elem~3.html b/proc/cmp_elem~3.html
index 0751c7a67..db24af4ef 100644
--- a/proc/cmp_elem~3.html
+++ b/proc/cmp_elem~3.html
@@ -83,15 +83,15 @@ <h1>cmp_elem
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_elem</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function cmp_elem(this) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~182"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~180"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -193,181 +193,181 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elem~3~~CallsGraph Pages: 1 -->
-<svg id="proccmp_elem3CallsGraph" width="641pt" height="246pt"
- viewBox="0.00 0.00 641.00 245.75" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_elem~3~~CallsGraph" class="graph" transform="scale(1.07 1.07) rotate(0) translate(4 259)">
+<svg id="proccmp_elem3CallsGraph" width="641pt" height="239pt"
+ viewBox="0.00 0.00 641.00 239.12" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_elem~3~~CallsGraph" class="graph" transform="scale(1.1 1.1) rotate(0) translate(4 259)">
 <title>proc~~cmp_elem~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-259 682,-259 682,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-259 701,-259 701,4 -4,4"/>
 <!-- proc~cmp_elem~3 -->
 <g id="proc~~cmp_elem~3~~CallsGraph_node1" class="node">
 <title>proc~cmp_elem~3</title>
-<polygon fill="none" stroke="black" points="143,-124 0,-124 0,-100 143,-100 143,-124"/>
-<text text-anchor="middle" x="71.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_elem</text>
+<polygon fill="none" stroke="black" points="153,-124 0,-124 0,-100 153,-100 153,-124"/>
+<text text-anchor="middle" x="76.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_elem</text>
 </g>
 <!-- interface~elemconn_cn -->
 <g id="proc~~cmp_elem~3~~CallsGraph_node2" class="node">
 <title>interface~elemconn_cn</title>
 <g id="a_proc~~cmp_elem~3~~CallsGraph_node2"><a xlink:href="../interface/elemconn_cn.html" xlink:title="elemConn_Cn">
-<polygon fill="#a7506f" stroke="#a7506f" points="307,-176 220,-176 220,-152 307,-152 307,-176"/>
-<text text-anchor="middle" x="263.5" y="-161.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_Cn</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="321.5,-176 234.5,-176 234.5,-152 321.5,-152 321.5,-176"/>
+<text text-anchor="middle" x="278" y="-161.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_Cn</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;interface~elemconn_cn -->
 <g id="proc~~cmp_elem~3~~CallsGraph_edge1" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#ff0000" d="M116.57,-124.06C144.54,-131.72 180.87,-141.66 210.29,-149.71"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="209.41,-153.1 219.98,-152.36 211.26,-146.35 209.41,-153.1"/>
+<path fill="none" stroke="#ff0000" d="M123.77,-124.06C153.89,-131.91 193.25,-142.17 224.53,-150.32"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="223.83,-153.76 234.39,-152.89 225.59,-146.98 223.83,-153.76"/>
 </g>
 <!-- interface~unique -->
 <g id="proc~~cmp_elem~3~~CallsGraph_node3" class="node">
 <title>interface~unique</title>
 <g id="a_proc~~cmp_elem~3~~CallsGraph_node3"><a xlink:href="../interface/unique.html" xlink:title="unique">
-<polygon fill="#a7506f" stroke="#a7506f" points="290.5,-124 236.5,-124 236.5,-100 290.5,-100 290.5,-124"/>
-<text text-anchor="middle" x="263.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="305,-124 251,-124 251,-100 305,-100 305,-124"/>
+<text text-anchor="middle" x="278" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;interface~unique -->
 <g id="proc~~cmp_elem~3~~CallsGraph_edge2" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M143.25,-112C171.43,-112 202.66,-112 226.09,-112"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="226.27,-115.5 236.27,-112 226.27,-108.5 226.27,-115.5"/>
+<path fill="none" stroke="#ff0000" d="M153.21,-112C183.16,-112 216.2,-112 240.6,-112"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="240.83,-115.5 250.83,-112 240.83,-108.5 240.83,-115.5"/>
 </g>
 <!-- proc~get_multiplicity~3 -->
 <g id="proc~~cmp_elem~3~~CallsGraph_node4" class="node">
 <title>proc~get_multiplicity~3</title>
-<g id="a_proc~~cmp_elem~3~~CallsGraph_node4"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="348,-61 179,-61 179,-37 348,-37 348,-61"/>
-<text text-anchor="middle" x="263.5" y="-46.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
+<g id="a_proc~~cmp_elem~3~~CallsGraph_node4"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="367,-61 189,-61 189,-37 367,-37 367,-61"/>
+<text text-anchor="middle" x="278" y="-46.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="proc~~cmp_elem~3~~CallsGraph_edge3" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#ff0000" d="M109.13,-99.85C139.72,-89.71 183.49,-75.2 216.45,-64.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="217.91,-67.47 226.3,-61 215.71,-60.83 217.91,-67.47"/>
+<path fill="none" stroke="#ff0000" d="M115.97,-99.85C148.22,-89.67 194.44,-75.07 229.09,-64.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="230.51,-67.35 238.99,-61 228.4,-60.68 230.51,-67.35"/>
 </g>
 <!-- proc~cmp_elemconn_cn_l -->
 <g id="proc~~cmp_elem~3~~CallsGraph_node6" class="node">
 <title>proc~cmp_elemconn_cn_l</title>
 <g id="a_proc~~cmp_elem~3~~CallsGraph_node6"><a xlink:href="../proc/cmp_elemconn_cn_l.html" xlink:title="cmp_elemConn_Cn_L">
-<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-255 384.5,-255 384.5,-231 511.5,-231 511.5,-255"/>
-<text text-anchor="middle" x="448" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_L</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="530.5,-255 403.5,-255 403.5,-231 530.5,-231 530.5,-255"/>
+<text text-anchor="middle" x="467" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_L</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_l -->
 <g id="proc~~cmp_elem~3~~CallsGraph_edge4" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_l</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M287.01,-176.02C310.74,-188.42 349.4,-207.91 384,-222 388.68,-223.91 393.61,-225.78 398.57,-227.57"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="397.47,-230.89 408.06,-230.9 399.78,-224.29 397.47,-230.89"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M302.87,-176.18C327.58,-188.54 367.46,-207.82 403,-222 407.76,-223.9 412.77,-225.77 417.8,-227.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="416.84,-230.94 427.43,-230.93 419.14,-224.33 416.84,-230.94"/>
 </g>
 <!-- proc~cmp_elemconn_cn_s -->
 <g id="proc~~cmp_elem~3~~CallsGraph_node7" class="node">
 <title>proc~cmp_elemconn_cn_s</title>
 <g id="a_proc~~cmp_elem~3~~CallsGraph_node7"><a xlink:href="../proc/cmp_elemconn_cn_s.html" xlink:title="cmp_elemConn_Cn_S">
-<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-213 384.5,-213 384.5,-189 511.5,-189 511.5,-213"/>
-<text text-anchor="middle" x="448" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_S</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="530.5,-213 403.5,-213 403.5,-189 530.5,-189 530.5,-213"/>
+<text text-anchor="middle" x="467" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_S</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_s -->
 <g id="proc~~cmp_elem~3~~CallsGraph_edge5" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_s</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M307.29,-172.67C328.21,-176.92 353.93,-182.13 377.57,-186.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="377.06,-190.39 387.56,-188.95 378.45,-183.53 377.06,-190.39"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M321.9,-172.49C343.6,-176.78 370.51,-182.11 395.18,-186.99"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="394.74,-190.47 405.23,-188.98 396.1,-183.6 394.74,-190.47"/>
 </g>
 <!-- proc~cmp_elemconn_cn_v -->
 <g id="proc~~cmp_elem~3~~CallsGraph_node8" class="node">
 <title>proc~cmp_elemconn_cn_v</title>
 <g id="a_proc~~cmp_elem~3~~CallsGraph_node8"><a xlink:href="../proc/cmp_elemconn_cn_v.html" xlink:title="cmp_elemConn_Cn_V">
-<polygon fill="#d9534f" stroke="#d9534f" points="512,-171 384,-171 384,-147 512,-147 512,-171"/>
-<text text-anchor="middle" x="448" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_V</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="531,-171 403,-171 403,-147 531,-147 531,-171"/>
+<text text-anchor="middle" x="467" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_Cn_V</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_v -->
 <g id="proc~~cmp_elem~3~~CallsGraph_edge6" class="edge">
 <title>interface~elemconn_cn&#45;&gt;proc~cmp_elemconn_cn_v</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M307.29,-162.83C327.02,-162.29 351.02,-161.63 373.51,-161.01"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="373.82,-164.51 383.72,-160.73 373.63,-157.51 373.82,-164.51"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M321.9,-162.85C342.85,-162.29 368.64,-161.6 392.59,-160.96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="392.82,-164.46 402.72,-160.69 392.63,-157.46 392.82,-164.46"/>
 </g>
 <!-- proc~unique_integer -->
 <g id="proc~~cmp_elem~3~~CallsGraph_node9" class="node">
 <title>proc~unique_integer</title>
 <g id="a_proc~~cmp_elem~3~~CallsGraph_node9"><a xlink:href="../proc/unique_integer.html" xlink:title="unique_integer">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="494.5,-129 401.5,-129 401.5,-105 494.5,-105 494.5,-129"/>
-<text text-anchor="middle" x="448" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_integer</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="513.5,-129 420.5,-129 420.5,-105 513.5,-105 513.5,-129"/>
+<text text-anchor="middle" x="467" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_integer</text>
 </a>
 </g>
 </g>
 <!-- interface~unique&#45;&gt;proc~unique_integer -->
 <g id="proc~~cmp_elem~3~~CallsGraph_edge7" class="edge">
 <title>interface~unique&#45;&gt;proc~unique_integer</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M290.65,-112.72C316.73,-113.43 357.62,-114.55 391.04,-115.47"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="391.05,-118.97 401.15,-115.74 391.25,-111.97 391.05,-118.97"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M305,-112.7C332.13,-113.42 375.49,-114.58 410.38,-115.51"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="410.35,-119.01 420.44,-115.78 410.54,-112.02 410.35,-119.01"/>
 </g>
 <!-- proc~unique_real -->
 <g id="proc~~cmp_elem~3~~CallsGraph_node10" class="node">
 <title>proc~unique_real</title>
 <g id="a_proc~~cmp_elem~3~~CallsGraph_node10"><a xlink:href="../proc/unique_real.html" xlink:title="unique_real">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="485.5,-87 410.5,-87 410.5,-63 485.5,-63 485.5,-87"/>
-<text text-anchor="middle" x="448" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_real</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="504.5,-87 429.5,-87 429.5,-63 504.5,-63 504.5,-87"/>
+<text text-anchor="middle" x="467" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique_real</text>
 </a>
 </g>
 </g>
 <!-- interface~unique&#45;&gt;proc~unique_real -->
 <g id="proc~~cmp_elem~3~~CallsGraph_edge8" class="edge">
 <title>interface~unique&#45;&gt;proc~unique_real</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M290.65,-106.7C319.17,-100.92 365.41,-91.54 400.22,-84.48"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="401.06,-87.88 410.17,-82.47 399.67,-81.02 401.06,-87.88"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M305,-106.86C334.54,-101.01 383.32,-91.36 419.46,-84.21"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="420.16,-87.64 429.29,-82.26 418.8,-80.77 420.16,-87.64"/>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~cmp_elem~3~~CallsGraph_node5" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~cmp_elem~3~~CallsGraph_node5"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="510,-45 386,-45 386,-21 510,-21 510,-45"/>
-<text text-anchor="middle" x="448" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="529,-45 405,-45 405,-21 529,-21 529,-45"/>
+<text text-anchor="middle" x="467" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~cmp_elem~3~~CallsGraph_edge9" class="edge">
 <title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#0000ff" d="M348.01,-41.68C357.28,-40.87 366.66,-40.04 375.76,-39.25"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="376.24,-42.72 385.9,-38.36 375.63,-35.74 376.24,-42.72"/>
+<path fill="none" stroke="#0000ff" d="M367.02,-41.47C376.32,-40.67 385.68,-39.87 394.75,-39.1"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="395.17,-42.57 404.84,-38.23 394.58,-35.6 395.17,-42.57"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~cmp_elem~3~~CallsGraph_node11" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~cmp_elem~3~~CallsGraph_node11"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="678,-66 548,-66 548,-42 678,-42 678,-66"/>
-<text text-anchor="middle" x="613" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="697,-66 567,-66 567,-42 697,-42 697,-66"/>
+<text text-anchor="middle" x="632" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~cmp_elem~3~~CallsGraph_edge10" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M510.16,-40.88C519.18,-42.04 528.56,-43.25 537.81,-44.44"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="537.41,-47.92 547.78,-45.73 538.3,-40.98 537.41,-47.92"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M529.16,-40.88C538.18,-42.04 547.56,-43.25 556.81,-44.44"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="556.41,-47.92 566.78,-45.73 557.3,-40.98 556.41,-47.92"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~cmp_elem~3~~CallsGraph_node12" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~cmp_elem~3~~CallsGraph_node12"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="678,-24 548,-24 548,0 678,0 678,-24"/>
-<text text-anchor="middle" x="613" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="697,-24 567,-24 567,0 697,0 697,-24"/>
+<text text-anchor="middle" x="632" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~cmp_elem~3~~CallsGraph_edge11" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M510.16,-25.12C519.18,-23.96 528.56,-22.75 537.81,-21.56"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="538.3,-25.02 547.78,-20.27 537.41,-18.08 538.3,-25.02"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M529.16,-25.12C538.18,-23.96 547.56,-22.75 556.81,-21.56"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="557.3,-25.02 566.78,-20.27 556.41,-18.08 557.3,-25.02"/>
 </g>
 </g>
 </svg>
@@ -467,67 +467,67 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_elem~3~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_elem3CalledByGraph" width="630pt" height="52pt"
- viewBox="0.00 0.00 630.00 52.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="proccmp_elem3CalledByGraph" width="640pt" height="52pt"
+ viewBox="0.00 0.00 640.00 52.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~cmp_elem~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 48)">
 <title>proc~~cmp_elem~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-48 626,-48 626,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-48 636,-48 636,4 -4,4"/>
 <!-- proc~cmp_elem~3 -->
 <g id="proc~~cmp_elem~3~~CalledByGraph_node1" class="node">
 <title>proc~cmp_elem~3</title>
-<polygon fill="none" stroke="black" points="622,-44 479,-44 479,-20 622,-20 622,-44"/>
-<text text-anchor="middle" x="550.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_elem</text>
+<polygon fill="none" stroke="black" points="632,-44 479,-44 479,-20 632,-20 632,-44"/>
+<text text-anchor="middle" x="555.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_elem</text>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="proc~~cmp_elem~3~~CalledByGraph_node2" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~cmp_elem~3~~CalledByGraph_node2"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="443,-24 321,-24 321,0 443,0 443,-24"/>
-<text text-anchor="middle" x="382" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~cmp_elem~3~~CalledByGraph_node2"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="443,-24 311,-24 311,0 443,0 443,-24"/>
+<text text-anchor="middle" x="377" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;proc~cmp_elem~3 -->
 <g id="proc~~cmp_elem~3~~CalledByGraph_edge1" class="edge">
 <title>proc~ansatz~3&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#ff0000" d="M443.11,-19.22C451.48,-20.23 460.19,-21.27 468.86,-22.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="468.65,-25.81 478.99,-23.53 469.48,-18.86 468.65,-25.81"/>
+<path fill="none" stroke="#ff0000" d="M443.22,-19.39C451.55,-20.33 460.17,-21.31 468.76,-22.28"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="468.48,-25.78 478.81,-23.42 469.27,-18.82 468.48,-25.78"/>
 </g>
-<!-- proc~cmp_length -->
+<!-- proc~cmp_area -->
 <g id="proc~~cmp_elem~3~~CalledByGraph_node3" class="node">
-<title>proc~cmp_length</title>
-<g id="a_proc~~cmp_elem~3~~CalledByGraph_node3"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="285,-44 135,-44 135,-20 285,-20 285,-44"/>
-<text text-anchor="middle" x="210" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<title>proc~cmp_area</title>
+<g id="a_proc~~cmp_elem~3~~CalledByGraph_node3"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
+<polygon fill="#d9534f" stroke="#d9534f" points="275,-44 125,-44 125,-20 275,-20 275,-44"/>
+<text text-anchor="middle" x="200" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~cmp_elem~3 -->
+<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~3 -->
 <g id="proc~~cmp_elem~3~~CalledByGraph_edge2" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#ff0000" d="M285.26,-32.77C297.21,-32.86 309.45,-32.95 321,-33 375.22,-33.25 388.78,-33.25 443,-33 451.31,-32.96 459.98,-32.9 468.63,-32.84"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="468.78,-36.34 478.75,-32.76 468.72,-29.34 468.78,-36.34"/>
+<title>proc~cmp_area&#45;&gt;proc~cmp_elem~3</title>
+<path fill="none" stroke="#ff0000" d="M275.26,-32.77C287.21,-32.86 299.45,-32.95 311,-33 369.67,-33.27 384.33,-33.26 443,-33 451.35,-32.96 460.05,-32.91 468.74,-32.85"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="468.96,-36.35 478.93,-32.77 468.9,-29.35 468.96,-36.35"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
 <g id="proc~~cmp_elem~3~~CalledByGraph_edge3" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#ff0000" d="M285.07,-23.29C293.59,-22.28 302.27,-21.26 310.74,-20.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="311.43,-23.71 320.95,-19.06 310.61,-16.76 311.43,-23.71"/>
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#ff0000" d="M275.22,-23.52C283.63,-22.56 292.21,-21.58 300.63,-20.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="301.27,-24.06 310.81,-19.45 300.48,-17.11 301.27,-24.06"/>
 </g>
-<!-- program~compute_length -->
+<!-- program~compute_area -->
 <g id="proc~~cmp_elem~3~~CalledByGraph_node4" class="node">
-<title>program~compute_length</title>
-<g id="a_proc~~cmp_elem~3~~CalledByGraph_node4"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-44 0,-44 0,-20 99,-20 99,-44"/>
-<text text-anchor="middle" x="49.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<title>program~compute_area</title>
+<g id="a_proc~~cmp_elem~3~~CalledByGraph_node4"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-44 0,-44 0,-20 89,-20 89,-44"/>
+<text text-anchor="middle" x="44.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;proc~cmp_length -->
+<!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="proc~~cmp_elem~3~~CalledByGraph_edge4" class="edge">
-<title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#00ffff" d="M99.35,-32C107.46,-32 116.06,-32 124.75,-32"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="124.96,-35.5 134.96,-32 124.96,-28.5 124.96,-35.5"/>
+<title>program~compute_area&#45;&gt;proc~cmp_area</title>
+<path fill="none" stroke="#00ffff" d="M89.08,-32C97.19,-32 105.92,-32 114.78,-32"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="114.81,-35.5 124.81,-32 114.81,-28.5 114.81,-35.5"/>
 </g>
 </g>
 </svg>
@@ -643,7 +643,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_length.html b/proc/cmp_length.html
index 38bc24e46..67227edaf 100644
--- a/proc/cmp_length.html
+++ b/proc/cmp_length.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~192"></span>
+              <span class="anchor" id="variable-this~61"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-length~5"></span>
+              <span class="anchor" id="variable-length"></span>
               real(kind=rk),
             </td>
 <td>intent(out)</td>
@@ -212,39 +212,39 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="150,-236.19 0,-236.19 0,-212.19 150,-212.19 150,-236.19"/>
 <text text-anchor="middle" x="75" y="-221.79" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_length</text>
 </g>
-<!-- proc~ansatz~3 -->
+<!-- proc~ansatz -->
 <g id="proc~~cmp_length~~CallsGraph_node2" class="node">
-<title>proc~ansatz~3</title>
-<g id="a_proc~~cmp_length~~CallsGraph_node2"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
+<title>proc~ansatz</title>
+<g id="a_proc~~cmp_length~~CallsGraph_node2"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="308,-278.19 186,-278.19 186,-254.19 308,-254.19 308,-278.19"/>
 <text text-anchor="middle" x="247" y="-263.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="proc~~cmp_length~~CallsGraph_edge1" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
 <path fill="none" stroke="#ff0000" d="M124.72,-236.23C144.28,-241.06 166.99,-246.67 187.44,-251.73"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="186.73,-255.16 197.28,-254.16 188.41,-248.36 186.73,-255.16"/>
 </g>
-<!-- proc~cmp_elem~3 -->
+<!-- proc~cmp_elem -->
 <g id="proc~~cmp_length~~CallsGraph_node3" class="node">
-<title>proc~cmp_elem~3</title>
-<g id="a_proc~~cmp_length~~CallsGraph_node3"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_curve%cmp_elem">
+<title>proc~cmp_elem</title>
+<g id="a_proc~~cmp_length~~CallsGraph_node3"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_curve%cmp_elem">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="487,-195.19 344,-195.19 344,-171.19 487,-171.19 487,-195.19"/>
 <text text-anchor="middle" x="415.5" y="-180.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~cmp_elem~3 -->
+<!-- proc~cmp_length&#45;&gt;proc~cmp_elem -->
 <g id="proc~~cmp_length~~CallsGraph_edge2" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~cmp_elem~3</title>
+<title>proc~cmp_length&#45;&gt;proc~cmp_elem</title>
 <path fill="none" stroke="#ff0000" d="M150.29,-215.2C204.52,-208.63 277.98,-199.73 333.68,-192.98"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="334.35,-196.43 343.86,-191.75 333.51,-189.48 334.35,-196.43"/>
 </g>
-<!-- proc~ansatz~3&#45;&gt;proc~cmp_elem~3 -->
+<!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
 <g id="proc~~cmp_length~~CallsGraph_edge8" class="edge">
-<title>proc~ansatz~3&#45;&gt;proc~cmp_elem~3</title>
+<title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
 <path fill="none" stroke="#ff0000" d="M266.63,-254.1C285.62,-242.07 316.16,-223.54 344,-210.19 352.33,-206.2 361.42,-202.36 370.22,-198.89"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="371.53,-202.14 379.6,-195.28 369.01,-195.6 371.53,-202.14"/>
 </g>
@@ -257,9 +257,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;interface~dyad -->
+<!-- proc~ansatz&#45;&gt;interface~dyad -->
 <g id="proc~~cmp_length~~CallsGraph_edge3" class="edge">
-<title>proc~ansatz~3&#45;&gt;interface~dyad</title>
+<title>proc~ansatz&#45;&gt;interface~dyad</title>
 <path fill="none" stroke="#ff0000" d="M294.82,-278.29C321.25,-285.11 353.78,-293.51 378.25,-299.83"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="377.64,-303.29 388.2,-302.4 379.39,-296.51 377.64,-303.29"/>
 </g>
@@ -272,9 +272,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;interface~gauss_leg -->
+<!-- proc~ansatz&#45;&gt;interface~gauss_leg -->
 <g id="proc~~cmp_length~~CallsGraph_edge4" class="edge">
-<title>proc~ansatz~3&#45;&gt;interface~gauss_leg</title>
+<title>proc~ansatz&#45;&gt;interface~gauss_leg</title>
 <path fill="none" stroke="#ff0000" d="M254.32,-278.19C279.31,-325.61 371.33,-500.26 403.39,-561.12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="400.41,-562.96 408.17,-570.18 406.6,-559.7 400.41,-562.96"/>
 </g>
@@ -287,39 +287,39 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;interface~unique -->
+<!-- proc~ansatz&#45;&gt;interface~unique -->
 <g id="proc~~cmp_length~~CallsGraph_edge5" class="edge">
-<title>proc~ansatz~3&#45;&gt;interface~unique</title>
+<title>proc~ansatz&#45;&gt;interface~unique</title>
 <path fill="none" stroke="#ff0000" d="M300.93,-254.12C375.83,-237.05 510.81,-206.27 575.5,-191.52"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="576.65,-194.84 585.63,-189.21 575.1,-188.02 576.65,-194.84"/>
 </g>
-<!-- none~derivative~3 -->
+<!-- none~derivative -->
 <g id="proc~~cmp_length~~CallsGraph_node8" class="node">
-<title>none~derivative~3</title>
-<g id="a_proc~~cmp_length~~CallsGraph_node8"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative~3" xlink:title="nurbs_curve%derivative">
+<title>none~derivative</title>
+<g id="a_proc~~cmp_length~~CallsGraph_node8"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative" xlink:title="nurbs_curve%derivative">
 <polygon fill="#a7506f" stroke="#a7506f" points="486,-278.19 345,-278.19 345,-254.19 486,-254.19 486,-278.19"/>
 <text text-anchor="middle" x="415.5" y="-263.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;none~derivative~3 -->
+<!-- proc~ansatz&#45;&gt;none~derivative -->
 <g id="proc~~cmp_length~~CallsGraph_edge6" class="edge">
-<title>proc~ansatz~3&#45;&gt;none~derivative~3</title>
+<title>proc~ansatz&#45;&gt;none~derivative</title>
 <path fill="none" stroke="#ff0000" d="M308.11,-266.19C316.77,-266.19 325.8,-266.19 334.77,-266.19"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="334.85,-269.69 344.85,-266.19 334.85,-262.69 334.85,-269.69"/>
 </g>
-<!-- none~set~3 -->
+<!-- none~set -->
 <g id="proc~~cmp_length~~CallsGraph_node9" class="node">
-<title>none~set~3</title>
-<g id="a_proc~~cmp_length~~CallsGraph_node9"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
+<title>none~set</title>
+<g id="a_proc~~cmp_length~~CallsGraph_node9"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="467,-426.19 364,-426.19 364,-402.19 467,-402.19 467,-426.19"/>
 <text text-anchor="middle" x="415.5" y="-411.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;none~set~3 -->
+<!-- proc~ansatz&#45;&gt;none~set -->
 <g id="proc~~cmp_length~~CallsGraph_edge7" class="edge">
-<title>proc~ansatz~3&#45;&gt;none~set~3</title>
+<title>proc~ansatz&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M261.63,-278.3C290.53,-304 358.19,-364.14 392.99,-395.07"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="390.89,-397.89 400.69,-401.91 395.54,-392.65 390.89,-397.89"/>
 </g>
@@ -332,30 +332,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem~3&#45;&gt;interface~elemconn_cn -->
+<!-- proc~cmp_elem&#45;&gt;interface~elemconn_cn -->
 <g id="proc~~cmp_length~~CallsGraph_edge9" class="edge">
-<title>proc~cmp_elem~3&#45;&gt;interface~elemconn_cn</title>
+<title>proc~cmp_elem&#45;&gt;interface~elemconn_cn</title>
 <path fill="none" stroke="#00ffff" d="M454.19,-171.05C485.8,-160.86 531.09,-146.27 565.05,-135.32"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="566.31,-138.59 574.75,-132.2 564.16,-131.93 566.31,-138.59"/>
 </g>
-<!-- proc~cmp_elem~3&#45;&gt;interface~unique -->
+<!-- proc~cmp_elem&#45;&gt;interface~unique -->
 <g id="proc~~cmp_length~~CallsGraph_edge10" class="edge">
-<title>proc~cmp_elem~3&#45;&gt;interface~unique</title>
+<title>proc~cmp_elem&#45;&gt;interface~unique</title>
 <path fill="none" stroke="#00ffff" d="M487.08,-183.19C517.13,-183.19 550.9,-183.19 575.75,-183.19"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="575.81,-186.69 585.81,-183.19 575.81,-179.69 575.81,-186.69"/>
 </g>
-<!-- proc~get_multiplicity~3 -->
+<!-- proc~get_multiplicity -->
 <g id="proc~~cmp_length~~CallsGraph_node10" class="node">
-<title>proc~get_multiplicity~3</title>
-<g id="a_proc~~cmp_length~~CallsGraph_node10"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
+<title>proc~get_multiplicity</title>
+<g id="a_proc~~cmp_length~~CallsGraph_node10"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1098,-228.19 929,-228.19 929,-204.19 1098,-204.19 1098,-228.19"/>
 <text text-anchor="middle" x="1013.5" y="-213.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3 -->
+<!-- proc~cmp_elem&#45;&gt;proc~get_multiplicity -->
 <g id="proc~~cmp_length~~CallsGraph_edge11" class="edge">
-<title>proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3</title>
+<title>proc~cmp_elem&#45;&gt;proc~get_multiplicity</title>
 <path fill="none" stroke="#00ffff" d="M428.5,-171.12C447.15,-153 484.9,-118.82 523,-99.19 671.28,-22.78 746,42.66 893,-36.19 956.42,-70.21 991.9,-154.34 1005.7,-194.36"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="1002.41,-195.58 1008.88,-203.97 1009.06,-193.37 1002.41,-195.58"/>
 </g>
@@ -494,108 +494,108 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#00ff91" stroke-dasharray="5,2" d="M640.28,-188.68C672.78,-195.47 728.67,-207.15 768.49,-215.47"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="767.99,-218.95 778.5,-217.57 769.43,-212.09 767.99,-218.95"/>
 </g>
-<!-- proc~derivative_scalar~3 -->
+<!-- proc~derivative_scalar -->
 <g id="proc~~cmp_length~~CallsGraph_node15" class="node">
-<title>proc~derivative_scalar~3</title>
-<g id="a_proc~~cmp_length~~CallsGraph_node15"><a xlink:href="../proc/derivative_scalar~3.html" xlink:title="nurbs_curve%derivative_scalar">
+<title>proc~derivative_scalar</title>
+<g id="a_proc~~cmp_length~~CallsGraph_node15"><a xlink:href="../proc/derivative_scalar.html" xlink:title="nurbs_curve%derivative_scalar">
 <polygon fill="#d9534f" stroke="#d9534f" points="702,-237.19 524,-237.19 524,-213.19 702,-213.19 702,-237.19"/>
 <text text-anchor="middle" x="613" y="-222.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_scalar</text>
 </a>
 </g>
 </g>
-<!-- none~derivative~3&#45;&gt;proc~derivative_scalar~3 -->
+<!-- none~derivative&#45;&gt;proc~derivative_scalar -->
 <g id="proc~~cmp_length~~CallsGraph_edge21" class="edge">
-<title>none~derivative~3&#45;&gt;proc~derivative_scalar~3</title>
+<title>none~derivative&#45;&gt;proc~derivative_scalar</title>
 <path fill="none" stroke="#0091ff" stroke-dasharray="5,2" d="M473.84,-254.17C496.02,-249.52 521.57,-244.16 544.62,-239.32"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="545.6,-242.7 554.67,-237.22 544.16,-235.84 545.6,-242.7"/>
 </g>
-<!-- proc~derivative_vector~3 -->
+<!-- proc~derivative_vector -->
 <g id="proc~~cmp_length~~CallsGraph_node16" class="node">
-<title>proc~derivative_vector~3</title>
-<g id="a_proc~~cmp_length~~CallsGraph_node16"><a xlink:href="../proc/derivative_vector~3.html" xlink:title="nurbs_curve%derivative_vector">
+<title>proc~derivative_vector</title>
+<g id="a_proc~~cmp_length~~CallsGraph_node16"><a xlink:href="../proc/derivative_vector.html" xlink:title="nurbs_curve%derivative_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="703,-279.19 523,-279.19 523,-255.19 703,-255.19 703,-279.19"/>
 <text text-anchor="middle" x="613" y="-264.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_vector</text>
 </a>
 </g>
 </g>
-<!-- none~derivative~3&#45;&gt;proc~derivative_vector~3 -->
+<!-- none~derivative&#45;&gt;proc~derivative_vector -->
 <g id="proc~~cmp_length~~CallsGraph_edge22" class="edge">
-<title>none~derivative~3&#45;&gt;proc~derivative_vector~3</title>
+<title>none~derivative&#45;&gt;proc~derivative_vector</title>
 <path fill="none" stroke="#0091ff" stroke-dasharray="5,2" d="M486.25,-266.55C494.86,-266.59 503.78,-266.64 512.72,-266.69"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="512.78,-270.19 522.8,-266.74 512.82,-263.19 512.78,-270.19"/>
 </g>
-<!-- proc~set1a -->
+<!-- proc~set1 -->
 <g id="proc~~cmp_length~~CallsGraph_node21" class="node">
-<title>proc~set1a</title>
-<g id="a_proc~~cmp_length~~CallsGraph_node21"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="671.5,-405.19 554.5,-405.19 554.5,-381.19 671.5,-381.19 671.5,-405.19"/>
-<text text-anchor="middle" x="613" y="-390.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+<title>proc~set1</title>
+<g id="a_proc~~cmp_length~~CallsGraph_node21"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="668,-405.19 558,-405.19 558,-381.19 668,-381.19 668,-405.19"/>
+<text text-anchor="middle" x="613" y="-390.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
+<!-- none~set&#45;&gt;proc~set1 -->
 <g id="proc~~cmp_length~~CallsGraph_edge23" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
-<path fill="none" stroke="#4800ff" stroke-dasharray="5,2" d="M467.1,-408.76C490.57,-406.24 518.8,-403.2 544.09,-400.49"/>
-<polygon fill="#4800ff" stroke="#4800ff" points="544.78,-403.93 554.35,-399.39 544.04,-396.97 544.78,-403.93"/>
+<title>none~set&#45;&gt;proc~set1</title>
+<path fill="none" stroke="#4800ff" stroke-dasharray="5,2" d="M467.1,-408.76C491.67,-406.12 521.47,-402.92 547.63,-400.11"/>
+<polygon fill="#4800ff" stroke="#4800ff" points="548.27,-403.56 557.84,-399.01 547.53,-396.6 548.27,-403.56"/>
 </g>
-<!-- proc~set1~3 -->
+<!-- proc~set1a -->
 <g id="proc~~cmp_length~~CallsGraph_node22" class="node">
-<title>proc~set1~3</title>
-<g id="a_proc~~cmp_length~~CallsGraph_node22"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="668,-489.19 558,-489.19 558,-465.19 668,-465.19 668,-489.19"/>
-<text text-anchor="middle" x="613" y="-474.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<title>proc~set1a</title>
+<g id="a_proc~~cmp_length~~CallsGraph_node22"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="671.5,-489.19 554.5,-489.19 554.5,-465.19 671.5,-465.19 671.5,-489.19"/>
+<text text-anchor="middle" x="613" y="-474.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1~3 -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="proc~~cmp_length~~CallsGraph_edge24" class="edge">
-<title>none~set~3&#45;&gt;proc~set1~3</title>
-<path fill="none" stroke="#4800ff" stroke-dasharray="5,2" d="M444.14,-426.36C465.41,-435.42 495.69,-447.63 523,-456.19 530.95,-458.68 539.38,-461.04 547.76,-463.2"/>
-<polygon fill="#4800ff" stroke="#4800ff" points="546.99,-466.62 557.54,-465.65 548.69,-459.83 546.99,-466.62"/>
+<title>none~set&#45;&gt;proc~set1a</title>
+<path fill="none" stroke="#4800ff" stroke-dasharray="5,2" d="M444.14,-426.36C465.41,-435.42 495.69,-447.63 523,-456.19 530.35,-458.5 538.11,-460.68 545.86,-462.71"/>
+<polygon fill="#4800ff" stroke="#4800ff" points="545.09,-466.12 555.64,-465.19 546.81,-459.34 545.09,-466.12"/>
 </g>
-<!-- proc~set2~3 -->
+<!-- proc~set2 -->
 <g id="proc~~cmp_length~~CallsGraph_node23" class="node">
-<title>proc~set2~3</title>
-<g id="a_proc~~cmp_length~~CallsGraph_node23"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
+<title>proc~set2</title>
+<g id="a_proc~~cmp_length~~CallsGraph_node23"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="668,-531.19 558,-531.19 558,-507.19 668,-507.19 668,-531.19"/>
 <text text-anchor="middle" x="613" y="-516.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set2~3 -->
+<!-- none~set&#45;&gt;proc~set2 -->
 <g id="proc~~cmp_length~~CallsGraph_edge25" class="edge">
-<title>none~set~3&#45;&gt;proc~set2~3</title>
+<title>none~set&#45;&gt;proc~set2</title>
 <path fill="none" stroke="#4800ff" stroke-dasharray="5,2" d="M428.07,-426.22C446.45,-444.58 484.19,-479.46 523,-498.19 530.89,-502 539.52,-505.15 548.2,-507.74"/>
 <polygon fill="#4800ff" stroke="#4800ff" points="547.42,-511.15 557.99,-510.43 549.28,-504.4 547.42,-511.15"/>
 </g>
-<!-- proc~set3~3 -->
+<!-- proc~set3 -->
 <g id="proc~~cmp_length~~CallsGraph_node24" class="node">
-<title>proc~set3~3</title>
-<g id="a_proc~~cmp_length~~CallsGraph_node24"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
+<title>proc~set3</title>
+<g id="a_proc~~cmp_length~~CallsGraph_node24"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="668,-447.19 558,-447.19 558,-423.19 668,-423.19 668,-447.19"/>
 <text text-anchor="middle" x="613" y="-432.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set3~3 -->
+<!-- none~set&#45;&gt;proc~set3 -->
 <g id="proc~~cmp_length~~CallsGraph_edge26" class="edge">
-<title>none~set~3&#45;&gt;proc~set3~3</title>
+<title>none~set&#45;&gt;proc~set3</title>
 <path fill="none" stroke="#4800ff" stroke-dasharray="5,2" d="M467.1,-419.63C491.67,-422.27 521.47,-425.47 547.63,-428.28"/>
 <polygon fill="#4800ff" stroke="#4800ff" points="547.53,-431.79 557.84,-429.38 548.27,-424.83 547.53,-431.79"/>
 </g>
-<!-- proc~set4~3 -->
+<!-- proc~set4 -->
 <g id="proc~~cmp_length~~CallsGraph_node25" class="node">
-<title>proc~set4~3</title>
-<g id="a_proc~~cmp_length~~CallsGraph_node25"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
+<title>proc~set4</title>
+<g id="a_proc~~cmp_length~~CallsGraph_node25"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="668,-363.19 558,-363.19 558,-339.19 668,-339.19 668,-363.19"/>
 <text text-anchor="middle" x="613" y="-348.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set4~3 -->
+<!-- none~set&#45;&gt;proc~set4 -->
 <g id="proc~~cmp_length~~CallsGraph_edge27" class="edge">
-<title>none~set~3&#45;&gt;proc~set4~3</title>
+<title>none~set&#45;&gt;proc~set4</title>
 <path fill="none" stroke="#4800ff" stroke-dasharray="5,2" d="M444.14,-402.02C465.41,-392.97 495.69,-380.75 523,-372.19 530.95,-369.7 539.38,-367.35 547.76,-365.18"/>
 <polygon fill="#4800ff" stroke="#4800ff" points="548.69,-368.56 557.54,-362.73 546.99,-361.77 548.69,-368.56"/>
 </g>
@@ -608,9 +608,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~cmp_length~~CallsGraph_edge28" class="edge">
-<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#ff00da" d="M1098.15,-216.19C1106.73,-216.19 1115.4,-216.19 1123.84,-216.19"/>
 <polygon fill="#ff00da" stroke="#ff00da" points="1123.99,-219.69 1133.99,-216.19 1123.99,-212.69 1123.99,-219.69"/>
 </g>
@@ -644,45 +644,45 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1258.33,-208.19C1266.69,-207.1 1275.35,-205.97 1283.92,-204.86"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1284.44,-208.32 1293.9,-203.55 1283.53,-201.38 1284.44,-208.32"/>
 </g>
-<!-- interface~compute_dtgc~3 -->
+<!-- interface~compute_dtgc -->
 <g id="proc~~cmp_length~~CallsGraph_node29" class="node">
-<title>interface~compute_dtgc~3</title>
-<g id="a_proc~~cmp_length~~CallsGraph_node29"><a xlink:href="../interface/compute_dtgc~3.html" xlink:title="compute_dTgc">
+<title>interface~compute_dtgc</title>
+<g id="a_proc~~cmp_length~~CallsGraph_node29"><a xlink:href="../interface/compute_dtgc.html" xlink:title="compute_dTgc">
 <polygon fill="#a7506f" stroke="#a7506f" points="861.5,-321.19 770.5,-321.19 770.5,-297.19 861.5,-297.19 861.5,-321.19"/>
 <text text-anchor="middle" x="816" y="-306.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_scalar~3&#45;&gt;interface~compute_dtgc~3 -->
+<!-- proc~derivative_scalar&#45;&gt;interface~compute_dtgc -->
 <g id="proc~~cmp_length~~CallsGraph_edge31" class="edge">
-<title>proc~derivative_scalar~3&#45;&gt;interface~compute_dtgc~3</title>
+<title>proc~derivative_scalar&#45;&gt;interface~compute_dtgc</title>
 <path fill="none" stroke="#96ff00" d="M684.2,-237.24C690.79,-239.69 697.17,-242.64 703,-246.19 724,-258.98 718.25,-275.01 739,-288.19 745.58,-292.37 753,-295.73 760.55,-298.43"/>
 <polygon fill="#96ff00" stroke="#96ff00" points="759.54,-301.78 770.13,-301.5 761.68,-295.12 759.54,-301.78"/>
 </g>
-<!-- proc~is_rational~3 -->
+<!-- proc~is_rational -->
 <g id="proc~~cmp_length~~CallsGraph_node35" class="node">
-<title>proc~is_rational~3</title>
-<g id="a_proc~~cmp_length~~CallsGraph_node35"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
+<title>proc~is_rational</title>
+<g id="a_proc~~cmp_length~~CallsGraph_node35"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="887,-279.19 745,-279.19 745,-255.19 887,-255.19 887,-279.19"/>
 <text text-anchor="middle" x="816" y="-264.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_scalar~3&#45;&gt;proc~is_rational~3 -->
+<!-- proc~derivative_scalar&#45;&gt;proc~is_rational -->
 <g id="proc~~cmp_length~~CallsGraph_edge32" class="edge">
-<title>proc~derivative_scalar~3&#45;&gt;proc~is_rational~3</title>
+<title>proc~derivative_scalar&#45;&gt;proc~is_rational</title>
 <path fill="none" stroke="#96ff00" d="M671.6,-237.23C695.25,-242.17 722.81,-247.93 747.41,-253.07"/>
 <polygon fill="#96ff00" stroke="#96ff00" points="746.89,-256.54 757.39,-255.16 748.32,-249.68 746.89,-256.54"/>
 </g>
-<!-- proc~derivative_vector~3&#45;&gt;interface~compute_dtgc~3 -->
+<!-- proc~derivative_vector&#45;&gt;interface~compute_dtgc -->
 <g id="proc~~cmp_length~~CallsGraph_edge33" class="edge">
-<title>proc~derivative_vector~3&#45;&gt;interface~compute_dtgc~3</title>
+<title>proc~derivative_vector&#45;&gt;interface~compute_dtgc</title>
 <path fill="none" stroke="#3cff00" d="M671.6,-279.23C699.6,-285.08 733.07,-292.07 760.63,-297.83"/>
 <polygon fill="#3cff00" stroke="#3cff00" points="759.99,-301.27 770.49,-299.89 761.42,-294.42 759.99,-301.27"/>
 </g>
-<!-- proc~derivative_vector~3&#45;&gt;proc~is_rational~3 -->
+<!-- proc~derivative_vector&#45;&gt;proc~is_rational -->
 <g id="proc~~cmp_length~~CallsGraph_edge34" class="edge">
-<title>proc~derivative_vector~3&#45;&gt;proc~is_rational~3</title>
+<title>proc~derivative_vector&#45;&gt;proc~is_rational</title>
 <path fill="none" stroke="#3cff00" d="M703.04,-267.19C713.51,-267.19 724.16,-267.19 734.5,-267.19"/>
 <polygon fill="#3cff00" stroke="#3cff00" points="734.74,-270.69 744.74,-267.19 734.74,-263.69 734.74,-270.69"/>
 </g>
@@ -752,25 +752,25 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#00d1ff" d="M671.06,-633.27C705.74,-626.02 748.96,-616.99 778.94,-610.73"/>
 <polygon fill="#00d1ff" stroke="#00d1ff" points="779.89,-614.11 788.96,-608.63 778.46,-607.25 779.89,-614.11"/>
 </g>
-<!-- proc~cmp_degree~3 -->
+<!-- proc~cmp_degree -->
 <g id="proc~~cmp_length~~CallsGraph_node31" class="node">
-<title>proc~cmp_degree~3</title>
-<g id="a_proc~~cmp_length~~CallsGraph_node31"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
+<title>proc~cmp_degree</title>
+<g id="a_proc~~cmp_length~~CallsGraph_node31"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="893,-426.19 739,-426.19 739,-402.19 893,-402.19 893,-426.19"/>
 <text text-anchor="middle" x="816" y="-411.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1&#45;&gt;proc~cmp_degree -->
 <g id="proc~~cmp_length~~CallsGraph_edge42" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#0078ff" d="M671.6,-399.21C689.38,-401.07 709.37,-403.16 728.65,-405.17"/>
-<polygon fill="#0078ff" stroke="#0078ff" points="728.34,-408.66 738.65,-406.22 729.07,-401.7 728.34,-408.66"/>
+<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#0078ff" d="M668.13,-398.85C686.81,-400.8 708.24,-403.04 728.84,-405.19"/>
+<polygon fill="#0078ff" stroke="#0078ff" points="728.57,-408.68 738.88,-406.24 729.29,-401.72 728.57,-408.68"/>
 </g>
-<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
 <g id="proc~~cmp_length~~CallsGraph_edge43" class="edge">
-<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#001dff" d="M668.42,-465.51C679.91,-462.72 691.91,-459.57 703,-456.19 727.81,-448.65 755.07,-438.47 776.48,-430.02"/>
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#001dff" d="M669.84,-465.17C680.9,-462.46 692.37,-459.43 703,-456.19 727.81,-448.65 755.07,-438.47 776.48,-430.02"/>
 <polygon fill="#001dff" stroke="#001dff" points="777.88,-433.23 785.87,-426.28 775.29,-426.73 777.88,-433.23"/>
 </g>
 <!-- proc~compute_knot_vector -->
@@ -782,15 +782,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~cmp_length~~CallsGraph_edge44" class="edge">
-<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#3c00ff" d="M668.13,-519.19C690.82,-519.19 717.54,-519.19 741.94,-519.19"/>
 <polygon fill="#3c00ff" stroke="#3c00ff" points="742.23,-522.69 752.23,-519.19 742.23,-515.69 742.23,-522.69"/>
 </g>
-<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set3&#45;&gt;proc~cmp_degree -->
 <g id="proc~~cmp_length~~CallsGraph_edge45" class="edge">
-<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
+<title>proc~set3&#45;&gt;proc~cmp_degree</title>
 <path fill="none" stroke="#9500ff" d="M668.13,-429.54C686.81,-427.59 708.24,-425.35 728.84,-423.19"/>
 <polygon fill="#9500ff" stroke="#9500ff" points="729.29,-426.67 738.88,-422.15 728.57,-419.7 729.29,-426.67"/>
 </g>
@@ -824,9 +824,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#aaff00" stroke-dasharray="5,2" d="M843.37,-648.03C877.57,-651.7 937.4,-658.13 975.97,-662.27"/>
 <polygon fill="#aaff00" stroke="#aaff00" points="975.92,-665.78 986.24,-663.37 976.67,-658.82 975.92,-665.78"/>
 </g>
-<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
+<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="proc~~cmp_length~~CallsGraph_edge48" class="edge">
-<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
+<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M828.94,-402.11C861.72,-368.9 953.39,-276.06 993.41,-235.53"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="995.94,-237.95 1000.47,-228.37 990.96,-233.03 995.94,-237.95"/>
 </g>
@@ -1083,7 +1083,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_nc.html b/proc/cmp_nc.html
index d5483c383..870cff187 100644
--- a/proc/cmp_nc.html
+++ b/proc/cmp_nc.html
@@ -78,20 +78,20 @@ <h1>cmp_nc
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.6% of total for procedures.">43 statements</a>
+                 title=" 0.1% of total for procedures.">4 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_nc</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine cmp_nc(this, dir)  
+    <h2>private pure subroutine cmp_nc(this)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
         <tr>
             <td>
               <span class="anchor" id="variable-this~31"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -169,21 +169,6 @@ <h3>Arguments</h3>
             <td><strong>this</strong></td>
             <td>
                 
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-dir~11"></span>
-              integer,
-            </td>
-<td>intent(in),</td>
-              <td>optional</td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>dir</strong></td>
-            <td>
-                
             </td>
         </tr>
     </tbody>
@@ -201,61 +186,61 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_nc~~CallsGraph Pages: 1 -->
-<svg id="proccmp_ncCallsGraph" width="473pt" height="74pt"
- viewBox="0.00 0.00 473.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="proccmp_ncCallsGraph" width="463pt" height="74pt"
+ viewBox="0.00 0.00 463.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~cmp_nc~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~cmp_nc~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 469,-70 469,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 459,-70 459,4 -4,4"/>
 <!-- proc~cmp_nc -->
 <g id="proc~~cmp_nc~~CallsGraph_node1" class="node">
 <title>proc~cmp_nc</title>
-<polygon fill="none" stroke="black" points="139,-45 0,-45 0,-21 139,-21 139,-45"/>
-<text text-anchor="middle" x="69.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_nc</text>
+<polygon fill="none" stroke="black" points="129,-45 0,-45 0,-21 129,-21 129,-45"/>
+<text text-anchor="middle" x="64.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_nc</text>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~cmp_nc~~CallsGraph_node2" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~cmp_nc~~CallsGraph_node2"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="299,-45 175,-45 175,-21 299,-21 299,-45"/>
-<text text-anchor="middle" x="237" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="289,-45 165,-45 165,-21 289,-21 289,-45"/>
+<text text-anchor="middle" x="227" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~cmp_nc~~CallsGraph_edge1" class="edge">
 <title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M139.25,-33C147.65,-33 156.24,-33 164.68,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="164.86,-36.5 174.86,-33 164.86,-29.5 164.86,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M129.4,-33C137.72,-33 146.3,-33 154.74,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="154.94,-36.5 164.94,-33 154.94,-29.5 154.94,-36.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~cmp_nc~~CallsGraph_node3" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~cmp_nc~~CallsGraph_node3"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="465,-66 335,-66 335,-42 465,-42 465,-66"/>
-<text text-anchor="middle" x="400" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="455,-66 325,-66 325,-42 455,-42 455,-66"/>
+<text text-anchor="middle" x="390" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~cmp_nc~~CallsGraph_edge2" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M299.33,-41C307.69,-42.09 316.35,-43.22 324.92,-44.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="324.53,-47.82 334.9,-45.64 325.44,-40.88 324.53,-47.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M289.33,-41C297.69,-42.09 306.35,-43.22 314.92,-44.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="314.53,-47.82 324.9,-45.64 315.44,-40.88 314.53,-47.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~cmp_nc~~CallsGraph_node4" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~cmp_nc~~CallsGraph_node4"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="465,-24 335,-24 335,0 465,0 465,-24"/>
-<text text-anchor="middle" x="400" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="455,-24 325,-24 325,0 455,0 455,-24"/>
+<text text-anchor="middle" x="390" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~cmp_nc~~CallsGraph_edge3" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M299.33,-25C307.69,-23.91 316.35,-22.78 324.92,-21.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="325.44,-25.12 334.9,-20.36 324.53,-18.18 325.44,-25.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M289.33,-25C297.69,-23.91 306.35,-22.78 314.92,-21.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="315.44,-25.12 324.9,-20.36 314.53,-18.18 315.44,-25.12"/>
 </g>
 </g>
 </svg>
@@ -327,490 +312,6 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
 </g>
 </svg>
 
-<p>Solid arrows point from a procedure to one which it calls. Dashed 
-arrows point from an interface to procedures which implement that interface.
-This could include the module procedures in a generic interface or the
-implementation in a submodule of an interface in a parent module.
-</p>
- Where possible, edges connecting nodes are
-given different colours to make them easier to distinguish in
-large graphs.</div>
-            </div>
-          </div>
-        </div>
-      </div>
-    </div>
-    <div class="card">
-      <div class="card-header">
-  <h3 class="card-title">Called by</h3>
-      </div>
-      <div class="card-body">
-  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.43.0 (0)
- -->
-<!-- Title: proc~~cmp_nc~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_ncCalledByGraph" width="641pt" height="404pt"
- viewBox="0.00 0.00 641.00 403.66" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_nc~~CalledByGraph" class="graph" transform="scale(1.58 1.58) rotate(0) translate(4 633.29)">
-<title>proc~~cmp_nc~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-633.29 1008,-633.29 1008,4 -4,4"/>
-<!-- proc~cmp_nc -->
-<g id="proc~~cmp_nc~~CalledByGraph_node1" class="node">
-<title>proc~cmp_nc</title>
-<polygon fill="none" stroke="black" points="1004,-318 865,-318 865,-294 1004,-294 1004,-318"/>
-<text text-anchor="middle" x="934.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_nc</text>
-</g>
-<!-- proc~set1 -->
-<g id="proc~~cmp_nc~~CalledByGraph_node2" class="node">
-<title>proc~set1</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node2"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="829,-339 709,-339 709,-315 829,-315 829,-339"/>
-<text text-anchor="middle" x="769" y="-324.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
-</a>
-</g>
-</g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge1" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#ff0000" d="M829.03,-319.42C837.38,-318.35 846.07,-317.23 854.72,-316.12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="855.35,-319.57 864.83,-314.82 854.46,-312.62 855.35,-319.57"/>
-</g>
-<!-- proc~set2 -->
-<g id="proc~~cmp_nc~~CalledByGraph_node3" class="node">
-<title>proc~set2</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node3"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="829,-297 709,-297 709,-273 829,-273 829,-297"/>
-<text text-anchor="middle" x="769" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
-</a>
-</g>
-</g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge2" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#ff0000" d="M829.03,-292.58C837.38,-293.65 846.07,-294.77 854.72,-295.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="854.46,-299.38 864.83,-297.18 855.35,-292.43 854.46,-299.38"/>
-</g>
-<!-- none~set -->
-<g id="proc~~cmp_nc~~CalledByGraph_node4" class="node">
-<title>none~set</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="673,-318 560,-318 560,-294 673,-294 673,-318"/>
-<text text-anchor="middle" x="616.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
-</a>
-</g>
-</g>
-<!-- none~set&#45;&gt;proc~set1 -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge3" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
-<path fill="none" stroke="#ff0000" d="M673.11,-313.76C681.48,-314.93 690.19,-316.14 698.8,-317.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="698.44,-320.83 708.83,-318.74 699.41,-313.89 698.44,-320.83"/>
-</g>
-<!-- none~set&#45;&gt;proc~set2 -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge4" class="edge">
-<title>none~set&#45;&gt;proc~set2</title>
-<path fill="none" stroke="#00ffff" d="M673.11,-298.24C681.48,-297.07 690.19,-295.86 698.8,-294.66"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="699.41,-298.11 708.83,-293.26 698.44,-291.17 699.41,-298.11"/>
-</g>
-<!-- proc~ansatz -->
-<g id="proc~~cmp_nc~~CalledByGraph_node5" class="node">
-<title>proc~ansatz</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node5"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-566 367.5,-566 367.5,-542 499.5,-542 499.5,-566"/>
-<text text-anchor="middle" x="433.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
-</a>
-</g>
-</g>
-<!-- proc~ansatz&#45;&gt;none~set -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge5" class="edge">
-<title>proc~ansatz&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.76,-542.65C508.6,-539.03 517.01,-534.27 524,-528 584.64,-473.59 606.02,-372.87 612.74,-328.26"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="616.23,-328.58 614.15,-318.19 609.3,-327.61 616.23,-328.58"/>
-</g>
-<!-- proc~elevate_degree -->
-<g id="proc~~cmp_nc~~CalledByGraph_node6" class="node">
-<title>proc~elevate_degree</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node6"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-486 343.5,-486 343.5,-462 523.5,-462 523.5,-486"/>
-<text text-anchor="middle" x="433.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
-</a>
-</g>
-</g>
-<!-- proc~elevate_degree&#45;&gt;none~set -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge6" class="edge">
-<title>proc~elevate_degree&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M507.95,-461.94C513.63,-459.48 519.07,-456.54 524,-453 568.52,-421.06 596.03,-360.08 608.18,-327.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="611.5,-328.73 611.59,-318.14 604.91,-326.36 611.5,-328.73"/>
-</g>
-<!-- proc~insert_knots -->
-<g id="proc~~cmp_nc~~CalledByGraph_node7" class="node">
-<title>proc~insert_knots</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node7"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514,-444 353,-444 353,-420 514,-420 514,-444"/>
-<text text-anchor="middle" x="433.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
-</a>
-</g>
-</g>
-<!-- proc~insert_knots&#45;&gt;none~set -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge7" class="edge">
-<title>proc~insert_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M505.06,-419.93C511.69,-417.49 518.12,-414.54 524,-411 558.92,-389.96 587.54,-351.08 603,-327"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="606.13,-328.6 608.45,-318.26 600.19,-324.89 606.13,-328.6"/>
-</g>
-<!-- proc~modify_wc -->
-<g id="proc~~cmp_nc~~CalledByGraph_node8" class="node">
-<title>proc~modify_wc</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node8"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-360 355.5,-360 355.5,-336 511.5,-336 511.5,-360"/>
-<text text-anchor="middle" x="433.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
-</a>
-</g>
-</g>
-<!-- proc~modify_wc&#45;&gt;none~set -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge8" class="edge">
-<title>proc~modify_wc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M486.37,-335.96C507.38,-331.09 531.82,-325.42 553.75,-320.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="554.68,-323.71 563.63,-318.04 553.09,-316.89 554.68,-323.71"/>
-</g>
-<!-- proc~modify_xc -->
-<g id="proc~~cmp_nc~~CalledByGraph_node9" class="node">
-<title>proc~modify_xc</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node9"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="510,-318 357,-318 357,-294 510,-294 510,-318"/>
-<text text-anchor="middle" x="433.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
-</a>
-</g>
-</g>
-<!-- proc~modify_xc&#45;&gt;none~set -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge9" class="edge">
-<title>proc~modify_xc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M510.21,-306C523.36,-306 536.93,-306 549.79,-306"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="549.92,-309.5 559.92,-306 549.92,-302.5 549.92,-309.5"/>
-</g>
-<!-- proc~remove_knots -->
-<g id="proc~~cmp_nc~~CalledByGraph_node10" class="node">
-<title>proc~remove_knots</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node10"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-402 347.5,-402 347.5,-378 519.5,-378 519.5,-402"/>
-<text text-anchor="middle" x="433.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
-</a>
-</g>
-</g>
-<!-- proc~remove_knots&#45;&gt;none~set -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge10" class="edge">
-<title>proc~remove_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.01,-377.92C507.58,-375.44 516.12,-372.49 524,-369 549.77,-357.6 575.92,-338.69 593.63,-324.56"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="596.07,-327.09 601.61,-318.06 591.65,-321.66 596.07,-327.09"/>
-</g>
-<!-- proc~set_c -->
-<g id="proc~~cmp_nc~~CalledByGraph_node11" class="node">
-<title>proc~set_c</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node11"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_volume%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-276 370.5,-276 370.5,-252 496.5,-252 496.5,-276"/>
-<text text-anchor="middle" x="433.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
-</a>
-</g>
-</g>
-<!-- proc~set_c&#45;&gt;none~set -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge11" class="edge">
-<title>proc~set_c&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M486.37,-276.04C507.38,-280.91 531.82,-286.58 553.75,-291.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="553.09,-295.11 563.63,-293.96 554.68,-288.29 553.09,-295.11"/>
-</g>
-<!-- proc~set_half_ring -->
-<g id="proc~~cmp_nc~~CalledByGraph_node12" class="node">
-<title>proc~set_half_ring</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node12"><a xlink:href="../proc/set_half_ring.html" xlink:title="nurbs_volume%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="516,-234 351,-234 351,-210 516,-210 516,-234"/>
-<text text-anchor="middle" x="433.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
-</a>
-</g>
-</g>
-<!-- proc~set_half_ring&#45;&gt;none~set -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge12" class="edge">
-<title>proc~set_half_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.01,-234.08C507.58,-236.56 516.12,-239.51 524,-243 549.77,-254.4 575.92,-273.31 593.63,-287.44"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="591.65,-290.34 601.61,-293.94 596.07,-284.91 591.65,-290.34"/>
-</g>
-<!-- proc~set_hexahedron -->
-<g id="proc~~cmp_nc~~CalledByGraph_node13" class="node">
-<title>proc~set_hexahedron</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node13"><a xlink:href="../proc/set_hexahedron.html" xlink:title="nurbs_volume%set_hexahedron">
-<polygon fill="#d9534f" stroke="#d9534f" points="524,-192 343,-192 343,-168 524,-168 524,-192"/>
-<text text-anchor="middle" x="433.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
-</a>
-</g>
-</g>
-<!-- proc~set_hexahedron&#45;&gt;none~set -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge13" class="edge">
-<title>proc~set_hexahedron&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M505.06,-192.07C511.69,-194.51 518.12,-197.46 524,-201 558.92,-222.04 587.54,-260.92 603,-285"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="600.19,-287.11 608.45,-293.74 606.13,-283.4 600.19,-287.11"/>
-</g>
-<!-- proc~set_ring -->
-<g id="proc~~cmp_nc~~CalledByGraph_node14" class="node">
-<title>proc~set_ring</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node14"><a xlink:href="../proc/set_ring.html" xlink:title="nurbs_volume%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="503,-150 364,-150 364,-126 503,-126 503,-150"/>
-<text text-anchor="middle" x="433.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
-</a>
-</g>
-</g>
-<!-- proc~set_ring&#45;&gt;none~set -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge14" class="edge">
-<title>proc~set_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.41,-148.22C510.74,-151.01 517.78,-154.53 524,-159 568.52,-190.94 596.03,-251.92 608.18,-284.39"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="604.91,-285.64 611.59,-293.86 611.5,-283.27 604.91,-285.64"/>
-</g>
-<!-- program~compute_volume -->
-<g id="proc~~cmp_nc~~CalledByGraph_node15" class="node">
-<title>program~compute_volume</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node15"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-586 0,-586 0,-562 105,-562 105,-586"/>
-<text text-anchor="middle" x="52.5" y="-571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
-</a>
-</g>
-</g>
-<!-- program~compute_volume&#45;&gt;none~set -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge15" class="edge">
-<title>program~compute_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M86.78,-586.01C169.65,-613.64 388.35,-672.14 524,-575 605.44,-516.68 615.25,-381.64 615.83,-328.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="619.33,-328.19 615.83,-318.18 612.33,-328.18 619.33,-328.19"/>
-</g>
-<!-- proc~cmp_volume -->
-<g id="proc~~cmp_nc~~CalledByGraph_node20" class="node">
-<title>proc~cmp_volume</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node20"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-566 141,-566 141,-542 307,-542 307,-566"/>
-<text text-anchor="middle" x="224" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
-</a>
-</g>
-</g>
-<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge28" class="edge">
-<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#ff0000" d="M105.28,-567.89C113.48,-566.92 122.18,-565.9 130.98,-564.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="131.41,-568.33 140.93,-563.68 130.59,-561.38 131.41,-568.33"/>
-</g>
-<!-- program~example3_volume -->
-<g id="proc~~cmp_nc~~CalledByGraph_node16" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node16"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-465 169,-465 169,-441 279,-441 279,-465"/>
-<text text-anchor="middle" x="224" y="-450.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
-</a>
-</g>
-</g>
-<!-- program~example3_volume&#45;&gt;none~set -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge16" class="edge">
-<title>program~example3_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M246.93,-465.12C299.32,-492.29 434.06,-551.38 524,-495 583.54,-457.67 605.3,-369.39 612.41,-328.06"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="615.87,-328.6 613.98,-318.18 608.95,-327.5 615.87,-328.6"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge21" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#ff6600" d="M279.25,-458.49C295.84,-460.17 314.64,-462.07 333.24,-463.95"/>
-<polygon fill="#ff6600" stroke="#ff6600" points="332.94,-467.44 343.24,-464.97 333.64,-460.48 332.94,-467.44"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge22" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#ffcc00" d="M279.25,-447.51C298.63,-445.55 321.03,-443.28 342.61,-441.1"/>
-<polygon fill="#ffcc00" stroke="#ffcc00" points="343.19,-444.56 352.79,-440.07 342.49,-437.59 343.19,-444.56"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge23" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#00ff00" d="M255.75,-440.99C279.38,-432.02 312.96,-419.84 343,-411 350.73,-408.73 358.89,-406.53 367.01,-404.47"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="368,-407.84 376.87,-402.04 366.32,-401.04 368,-407.84"/>
-</g>
-<!-- program~example_nurbs_volume -->
-<g id="proc~~cmp_nc~~CalledByGraph_node17" class="node">
-<title>program~example_nurbs_volume</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node17"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-108 364,-108 364,-84 503,-84 503,-108"/>
-<text text-anchor="middle" x="433.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
-</a>
-</g>
-</g>
-<!-- program~example_nurbs_volume&#45;&gt;none~set -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge17" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.44,-105.4C510.85,-108.33 517.9,-112.11 524,-117 578.22,-160.42 602.42,-243.9 611.25,-283.76"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="607.82,-284.49 613.3,-293.56 614.67,-283.05 607.82,-284.49"/>
-</g>
-<!-- program~example_put_to_nurbs -->
-<g id="proc~~cmp_nc~~CalledByGraph_node18" class="node">
-<title>program~example_put_to_nurbs</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node18"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-66 367.5,-66 367.5,-42 499.5,-42 499.5,-66"/>
-<text text-anchor="middle" x="433.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
-</a>
-</g>
-</g>
-<!-- program~example_put_to_nurbs&#45;&gt;none~set -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge18" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.72,-61.4C508.57,-64.57 516.99,-68.95 524,-75 588.41,-130.59 607.88,-237.64 613.43,-283.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="609.97,-284.43 614.54,-293.99 616.93,-283.67 609.97,-284.43"/>
-</g>
-<!-- program~nearest_point_3d -->
-<g id="proc~~cmp_nc~~CalledByGraph_node19" class="node">
-<title>program~nearest_point_3d</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node19"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-24 382,-24 382,0 485,0 485,-24"/>
-<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
-</a>
-</g>
-</g>
-<!-- program~nearest_point_3d&#45;&gt;none~set -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge19" class="edge">
-<title>program~nearest_point_3d&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M485.2,-14.84C499.17,-17.86 513.38,-23.33 524,-33 598.53,-100.9 612.42,-231.28 614.96,-283.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="611.47,-283.86 615.35,-293.71 618.46,-283.58 611.47,-283.86"/>
-</g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge20" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.01,-554C323.61,-554 341,-554 357.35,-554"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="357.38,-557.5 367.38,-554 357.38,-550.5 357.38,-557.5"/>
-</g>
-<!-- program~shape_c_3d -->
-<g id="proc~~cmp_nc~~CalledByGraph_node21" class="node">
-<title>program~shape_c_3d</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node21"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-276 186,-276 186,-252 262,-252 262,-276"/>
-<text text-anchor="middle" x="224" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_c_3d&#45;&gt;proc~set_c -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge24" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~set_c</title>
-<path fill="none" stroke="#00ff66" d="M262.1,-264C289.25,-264 326.96,-264 360,-264"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="360.09,-267.5 370.09,-264 360.09,-260.5 360.09,-267.5"/>
-</g>
-<!-- program~shape_half_ring_3d -->
-<g id="proc~~cmp_nc~~CalledByGraph_node22" class="node">
-<title>program~shape_half_ring_3d</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node22"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-234 166.5,-234 166.5,-210 281.5,-210 281.5,-234"/>
-<text text-anchor="middle" x="224" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~set_half_ring -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge25" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~set_half_ring</title>
-<path fill="none" stroke="#00ffcb" d="M281.7,-222C299.97,-222 320.71,-222 340.84,-222"/>
-<polygon fill="#00ffcb" stroke="#00ffcb" points="340.97,-225.5 350.97,-222 340.97,-218.5 340.97,-225.5"/>
-</g>
-<!-- program~shape_hexahedron -->
-<g id="proc~~cmp_nc~~CalledByGraph_node23" class="node">
-<title>program~shape_hexahedron</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node23"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-192 167.5,-192 167.5,-168 280.5,-168 280.5,-192"/>
-<text text-anchor="middle" x="224" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
-</a>
-</g>
-</g>
-<!-- program~shape_hexahedron&#45;&gt;proc~set_hexahedron -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge26" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~set_hexahedron</title>
-<path fill="none" stroke="#00cbff" d="M280.61,-180C296.56,-180 314.47,-180 332.24,-180"/>
-<polygon fill="#00cbff" stroke="#00cbff" points="332.67,-183.5 342.67,-180 332.67,-176.5 332.67,-183.5"/>
-</g>
-<!-- program~shape_ring_3d -->
-<g id="proc~~cmp_nc~~CalledByGraph_node24" class="node">
-<title>program~shape_ring_3d</title>
-<g id="a_proc~~cmp_nc~~CalledByGraph_node24"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-150 179,-150 179,-126 269,-126 269,-150"/>
-<text text-anchor="middle" x="224" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_ring_3d&#45;&gt;proc~set_ring -->
-<g id="proc~~cmp_nc~~CalledByGraph_edge27" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~set_ring</title>
-<path fill="none" stroke="#0066ff" d="M269.01,-138C293.59,-138 324.96,-138 353.63,-138"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="353.65,-141.5 363.65,-138 353.65,-134.5 353.65,-141.5"/>
-</g>
-</g>
-</svg>
-</div>                <script>
-                  var panproccmp_ncCalledByGraph = svgPanZoom('#proccmp_ncCalledByGraph',
-                    {zoomEnabled: true, controlIconsEnabled: true, fit: true, center: true,}
-                  );
-                </script>          <div>
-            <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
-          </div>
-          <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
-            <div class="modal-dialog modal-lg" role="document">
-              <div class="modal-content">
-                <div class="modal-header">
-                  <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
-                  <button type="button" class="btn-close" data-bs-dismiss="modal" aria-label="Close"></button>
-                </div>
-                <div class="modal-body">
-<p>Nodes of different colours represent the following: </p>
-<?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.43.0 (0)
- -->
-<!-- Title: Graph Key Pages: 1 -->
-<svg width="641pt" height="28pt"
- viewBox="0.00 0.00 641.00 27.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="graph0" class="graph" transform="scale(1.16 1.16) rotate(0) translate(4 28)">
-<title>Graph Key</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 741.5,-28 741.5,4 -4,4"/>
-<!-- Subroutine -->
-<g id="node1" class="node">
-<title>Subroutine</title>
-<polygon fill="#d9534f" stroke="#d9534f" points="70,-24 0,-24 0,0 70,0 70,-24"/>
-<text text-anchor="middle" x="35" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
-</g>
-<!-- Function -->
-<g id="node2" class="node">
-<title>Function</title>
-<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-24 88,-24 88,0 146,0 146,-24"/>
-<text text-anchor="middle" x="117" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
-</g>
-<!-- Interface -->
-<g id="node3" class="node">
-<title>Interface</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="225.5,-24 164.5,-24 164.5,0 225.5,0 225.5,-24"/>
-<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
-</g>
-<!-- Type Bound Procedure -->
-<g id="node4" class="node">
-<title>Type Bound Procedure</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="374,-24 244,-24 244,0 374,0 374,-24"/>
-<text text-anchor="middle" x="309" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Type Bound Procedure</text>
-</g>
-<!-- Unknown Procedure Type -->
-<g id="node5" class="node">
-<title>Unknown Procedure Type</title>
-<polygon fill="#777777" stroke="#777777" points="537.5,-24 392.5,-24 392.5,0 537.5,0 537.5,-24"/>
-<text text-anchor="middle" x="465" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
-</g>
-<!-- Program -->
-<g id="node6" class="node">
-<title>Program</title>
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-24 556,-24 556,0 614,0 614,-24"/>
-<text text-anchor="middle" x="585" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
-</g>
-<!-- This Page&#39;s Entity -->
-<g id="node7" class="node">
-<title>This Page&#39;s Entity</title>
-<polygon fill="none" stroke="black" points="737.5,-24 632.5,-24 632.5,0 737.5,0 737.5,-24"/>
-<text text-anchor="middle" x="685" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
-</g>
-</g>
-</svg>
-
 <p>Solid arrows point from a procedure to one which it calls. Dashed 
 arrows point from an interface to procedures which implement that interface.
 This could include the module procedures in a generic interface or the
@@ -855,7 +356,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_nc~2.html b/proc/cmp_nc~2.html
index 1e97de192..15941e75b 100644
--- a/proc/cmp_nc~2.html
+++ b/proc/cmp_nc~2.html
@@ -78,20 +78,20 @@ <h1>cmp_nc
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.5% of total for procedures.">32 statements</a>
+                 title=" 0.6% of total for procedures.">43 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_nc</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine cmp_nc(this, dir)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~99"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~92"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~26"></span>
+              <span class="anchor" id="variable-dir~14"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -210,7 +210,7 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~cmp_nc~2~~CallsGraph_node1" class="node">
 <title>proc~cmp_nc~2</title>
 <polygon fill="none" stroke="black" points="139,-45 0,-45 0,-21 139,-21 139,-45"/>
-<text text-anchor="middle" x="69.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_nc</text>
+<text text-anchor="middle" x="69.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_nc</text>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~cmp_nc~2~~CallsGraph_node2" class="node">
@@ -351,454 +351,391 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_nc~2~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_nc2CalledByGraph" width="641pt" height="373pt"
- viewBox="0.00 0.00 641.00 373.21" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~cmp_nc~2~~CalledByGraph" class="graph" transform="scale(1.53 1.53) rotate(0) translate(4 566)">
+<svg id="proccmp_nc2CalledByGraph" width="641pt" height="404pt"
+ viewBox="0.00 0.00 641.00 403.66" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_nc~2~~CalledByGraph" class="graph" transform="scale(1.58 1.58) rotate(0) translate(4 633.29)">
 <title>proc~~cmp_nc~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-566 975,-566 975,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-633.29 1008,-633.29 1008,4 -4,4"/>
 <!-- proc~cmp_nc~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node1" class="node">
 <title>proc~cmp_nc~2</title>
-<polygon fill="none" stroke="black" points="971,-297 832,-297 832,-273 971,-273 971,-297"/>
-<text text-anchor="middle" x="901.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_nc</text>
+<polygon fill="none" stroke="black" points="1004,-318 865,-318 865,-294 1004,-294 1004,-318"/>
+<text text-anchor="middle" x="934.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_nc</text>
 </g>
 <!-- proc~set1~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node2" class="node">
 <title>proc~set1~2</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node2"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="796,-318 676,-318 676,-294 796,-294 796,-318"/>
-<text text-anchor="middle" x="736" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node2"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="829,-339 709,-339 709,-315 829,-315 829,-339"/>
+<text text-anchor="middle" x="769" y="-324.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
 <!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge1" class="edge">
 <title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
-<path fill="none" stroke="#ff0000" d="M796.03,-298.42C804.38,-297.35 813.07,-296.23 821.72,-295.12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="822.35,-298.57 831.83,-293.82 821.46,-291.62 822.35,-298.57"/>
+<path fill="none" stroke="#ff0000" d="M829.03,-319.42C837.38,-318.35 846.07,-317.23 854.72,-316.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="855.35,-319.57 864.83,-314.82 854.46,-312.62 855.35,-319.57"/>
 </g>
 <!-- proc~set2~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node3" class="node">
 <title>proc~set2~2</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node3"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="796,-276 676,-276 676,-252 796,-252 796,-276"/>
-<text text-anchor="middle" x="736" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node3"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="829,-297 709,-297 709,-273 829,-273 829,-297"/>
+<text text-anchor="middle" x="769" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
 <!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge2" class="edge">
 <title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
-<path fill="none" stroke="#ff0000" d="M796.03,-271.58C804.38,-272.65 813.07,-273.77 821.72,-274.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="821.46,-278.38 831.83,-276.18 822.35,-271.43 821.46,-278.38"/>
+<path fill="none" stroke="#ff0000" d="M829.03,-292.58C837.38,-293.65 846.07,-294.77 854.72,-295.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="854.46,-299.38 864.83,-297.18 855.35,-292.43 854.46,-299.38"/>
 </g>
 <!-- none~set~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node4" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="640,-297 527,-297 527,-273 640,-273 640,-297"/>
-<text text-anchor="middle" x="583.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="673,-318 560,-318 560,-294 673,-294 673,-318"/>
+<text text-anchor="middle" x="616.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge3" class="edge">
 <title>none~set~2&#45;&gt;proc~set1~2</title>
-<path fill="none" stroke="#ff0000" d="M640.11,-292.76C648.48,-293.93 657.19,-295.14 665.8,-296.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="665.44,-299.83 675.83,-297.74 666.41,-292.89 665.44,-299.83"/>
+<path fill="none" stroke="#ff0000" d="M673.11,-313.76C681.48,-314.93 690.19,-316.14 698.8,-317.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="698.44,-320.83 708.83,-318.74 699.41,-313.89 698.44,-320.83"/>
 </g>
 <!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge4" class="edge">
 <title>none~set~2&#45;&gt;proc~set2~2</title>
-<path fill="none" stroke="#00ffff" d="M640.11,-277.24C648.48,-276.07 657.19,-274.86 665.8,-273.66"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="666.41,-277.11 675.83,-272.26 665.44,-270.17 666.41,-277.11"/>
+<path fill="none" stroke="#00ffff" d="M673.11,-298.24C681.48,-297.07 690.19,-295.86 698.8,-294.66"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="699.41,-298.11 708.83,-293.26 698.44,-291.17 699.41,-298.11"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node5" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="467,-562 335,-562 335,-538 467,-538 467,-562"/>
-<text text-anchor="middle" x="401" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-566 367.5,-566 367.5,-542 499.5,-542 499.5,-566"/>
+<text text-anchor="middle" x="433.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge5" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M467.04,-538.75C475.81,-535.12 484.14,-530.33 491,-524 555.57,-464.48 574.98,-354.4 580.47,-307.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="583.96,-307.57 581.54,-297.26 577,-306.83 583.96,-307.57"/>
+<path fill="none" stroke="#ff0000" d="M499.76,-542.65C508.6,-539.03 517.01,-534.27 524,-528 584.64,-473.59 606.02,-372.87 612.74,-328.26"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="616.23,-328.58 614.15,-318.19 609.3,-327.61 616.23,-328.58"/>
 </g>
 <!-- proc~elevate_degree~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node6" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node6"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="491,-360 311,-360 311,-336 491,-336 491,-360"/>
-<text text-anchor="middle" x="401" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node6"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-486 343.5,-486 343.5,-462 523.5,-462 523.5,-486"/>
+<text text-anchor="middle" x="433.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge6" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M460.4,-335.97C470.7,-333.36 481.24,-330.35 491,-327 511.36,-320 533.32,-310.01 550.61,-301.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="552.31,-304.6 559.7,-297.01 549.19,-298.33 552.31,-304.6"/>
+<path fill="none" stroke="#ff0000" d="M507.95,-461.94C513.63,-459.48 519.07,-456.54 524,-453 568.52,-421.06 596.03,-360.08 608.18,-327.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="611.5,-328.73 611.59,-318.14 604.91,-326.36 611.5,-328.73"/>
 </g>
 <!-- proc~insert_knots~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node7" class="node">
 <title>proc~insert_knots~2</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node7"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-482 320.5,-482 320.5,-458 481.5,-458 481.5,-482"/>
-<text text-anchor="middle" x="401" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node7"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514,-444 353,-444 353,-420 514,-420 514,-444"/>
+<text text-anchor="middle" x="433.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge7" class="edge">
 <title>proc~insert_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M475.67,-457.96C481.12,-455.5 486.31,-452.54 491,-449 539.34,-412.5 565.71,-342.6 576.53,-307.01"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="579.97,-307.72 579.4,-297.14 573.25,-305.76 579.97,-307.72"/>
+<path fill="none" stroke="#ff0000" d="M505.06,-419.93C511.69,-417.49 518.12,-414.54 524,-411 558.92,-389.96 587.54,-351.08 603,-327"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="606.13,-328.6 608.45,-318.26 600.19,-324.89 606.13,-328.6"/>
 </g>
 <!-- proc~modify_wc~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node8" class="node">
 <title>proc~modify_wc~2</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node8"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="479,-318 323,-318 323,-294 479,-294 479,-318"/>
-<text text-anchor="middle" x="401" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node8"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-360 355.5,-360 355.5,-336 511.5,-336 511.5,-360"/>
+<text text-anchor="middle" x="433.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge8" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M479.07,-297.03C491.65,-295.57 504.57,-294.07 516.84,-292.64"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="517.44,-296.09 526.97,-291.46 516.63,-289.14 517.44,-296.09"/>
+<path fill="none" stroke="#ff0000" d="M486.37,-335.96C507.38,-331.09 531.82,-325.42 553.75,-320.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="554.68,-323.71 563.63,-318.04 553.09,-316.89 554.68,-323.71"/>
 </g>
 <!-- proc~modify_xc~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node9" class="node">
 <title>proc~modify_xc~2</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node9"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-276 324.5,-276 324.5,-252 477.5,-252 477.5,-276"/>
-<text text-anchor="middle" x="401" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node9"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="510,-318 357,-318 357,-294 510,-294 510,-318"/>
+<text text-anchor="middle" x="433.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge9" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M477.5,-272.78C490.54,-274.3 503.99,-275.87 516.74,-277.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="516.46,-280.84 526.8,-278.52 517.27,-273.89 516.46,-280.84"/>
+<path fill="none" stroke="#ff0000" d="M510.21,-306C523.36,-306 536.93,-306 549.79,-306"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="549.92,-309.5 559.92,-306 549.92,-302.5 549.92,-309.5"/>
 </g>
 <!-- proc~remove_knots~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node10" class="node">
 <title>proc~remove_knots~2</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node10"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="487,-440 315,-440 315,-416 487,-416 487,-440"/>
-<text text-anchor="middle" x="401" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node10"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-402 347.5,-402 347.5,-378 519.5,-378 519.5,-402"/>
+<text text-anchor="middle" x="433.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge10" class="edge">
 <title>proc~remove_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M462.24,-415.98C472.34,-412.44 482.34,-407.87 491,-402 527.88,-377 556.66,-332.45 571.47,-306.13"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="574.56,-307.78 576.29,-297.32 568.42,-304.42 574.56,-307.78"/>
+<path fill="none" stroke="#ff0000" d="M499.01,-377.92C507.58,-375.44 516.12,-372.49 524,-369 549.77,-357.6 575.92,-338.69 593.63,-324.56"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="596.07,-327.09 601.61,-318.06 591.65,-321.66 596.07,-327.09"/>
 </g>
 <!-- proc~set_c~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node11" class="node">
 <title>proc~set_c~2</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node11"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_surface%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="464,-108 338,-108 338,-84 464,-84 464,-108"/>
-<text text-anchor="middle" x="401" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node11"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_volume%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-276 370.5,-276 370.5,-252 496.5,-252 496.5,-276"/>
+<text text-anchor="middle" x="433.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c~2&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge11" class="edge">
 <title>proc~set_c~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M464.39,-103.61C473.92,-106.72 483.18,-111.03 491,-117 540.26,-154.6 566.32,-226.63 576.83,-262.93"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="573.46,-263.87 579.5,-272.57 580.2,-262 573.46,-263.87"/>
+<path fill="none" stroke="#ff0000" d="M486.37,-276.04C507.38,-280.91 531.82,-286.58 553.75,-291.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="553.09,-295.11 563.63,-293.96 554.68,-288.29 553.09,-295.11"/>
 </g>
-<!-- proc~set_half_ring~2 -->
+<!-- proc~set_half_ring -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node12" class="node">
-<title>proc~set_half_ring~2</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node12"><a xlink:href="../proc/set_half_ring~2.html" xlink:title="nurbs_surface%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="483.5,-150 318.5,-150 318.5,-126 483.5,-126 483.5,-150"/>
-<text text-anchor="middle" x="401" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
+<title>proc~set_half_ring</title>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node12"><a xlink:href="../proc/set_half_ring.html" xlink:title="nurbs_volume%set_half_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="516,-234 351,-234 351,-210 516,-210 516,-234"/>
+<text text-anchor="middle" x="433.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_half_ring&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge12" class="edge">
-<title>proc~set_half_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M473.87,-150.11C479.91,-152.55 485.71,-155.48 491,-159 530.66,-185.4 559.08,-235.16 572.94,-263.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="569.8,-265.16 577.22,-272.71 576.13,-262.17 569.8,-265.16"/>
+<title>proc~set_half_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M499.01,-234.08C507.58,-236.56 516.12,-239.51 524,-243 549.77,-254.4 575.92,-273.31 593.63,-287.44"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="591.65,-290.34 601.61,-293.94 596.07,-284.91 591.65,-290.34"/>
 </g>
-<!-- proc~set_ring~2 -->
+<!-- proc~set_hexahedron -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node13" class="node">
-<title>proc~set_ring~2</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node13"><a xlink:href="../proc/set_ring~2.html" xlink:title="nurbs_surface%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="470.5,-192 331.5,-192 331.5,-168 470.5,-168 470.5,-192"/>
-<text text-anchor="middle" x="401" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
+<title>proc~set_hexahedron</title>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node13"><a xlink:href="../proc/set_hexahedron.html" xlink:title="nurbs_volume%set_hexahedron">
+<polygon fill="#d9534f" stroke="#d9534f" points="524,-192 343,-192 343,-168 524,-168 524,-192"/>
+<text text-anchor="middle" x="433.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_hexahedron&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge13" class="edge">
-<title>proc~set_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M469.92,-192.15C477.23,-194.59 484.41,-197.51 491,-201 521.51,-217.17 549.65,-245.97 566.45,-265.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="563.79,-267.55 572.93,-272.91 569.12,-263.02 563.79,-267.55"/>
+<title>proc~set_hexahedron&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M505.06,-192.07C511.69,-194.51 518.12,-197.46 524,-201 558.92,-222.04 587.54,-260.92 603,-285"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="600.19,-287.11 608.45,-293.74 606.13,-283.4 600.19,-287.11"/>
 </g>
-<!-- proc~set_tetragon -->
+<!-- proc~set_ring -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node14" class="node">
-<title>proc~set_tetragon</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node14"><a xlink:href="../proc/set_tetragon.html" xlink:title="nurbs_surface%set_tetragon">
-<polygon fill="#d9534f" stroke="#d9534f" points="483,-234 319,-234 319,-210 483,-210 483,-234"/>
-<text text-anchor="middle" x="401" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
+<title>proc~set_ring</title>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node14"><a xlink:href="../proc/set_ring.html" xlink:title="nurbs_volume%set_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="503,-150 364,-150 364,-126 503,-126 503,-150"/>
+<text text-anchor="middle" x="433.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
+<!-- proc~set_ring&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge14" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M460.4,-234.03C470.7,-236.64 481.24,-239.65 491,-243 511.36,-250 533.32,-259.99 550.61,-268.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="549.19,-271.67 559.7,-272.99 552.31,-265.4 549.19,-271.67"/>
+<title>proc~set_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M503.41,-148.22C510.74,-151.01 517.78,-154.53 524,-159 568.52,-190.94 596.03,-251.92 608.18,-284.39"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="604.91,-285.64 611.59,-293.86 611.5,-283.27 604.91,-285.64"/>
 </g>
-<!-- program~compute_area -->
+<!-- program~compute_volume -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node15" class="node">
-<title>program~compute_area</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node15"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-542 0,-542 0,-518 89,-518 89,-542"/>
-<text text-anchor="middle" x="44.5" y="-527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<title>program~compute_volume</title>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node15"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-586 0,-586 0,-562 105,-562 105,-586"/>
+<text text-anchor="middle" x="52.5" y="-571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;none~set~2 -->
+<!-- program~compute_volume&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge15" class="edge">
-<title>program~compute_area&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M89.19,-528.67C195.01,-525.11 458.77,-514.01 491,-491 552.97,-446.76 573.59,-350.77 579.93,-307.25"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="583.42,-307.52 581.27,-297.15 576.48,-306.6 583.42,-307.52"/>
+<title>program~compute_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M86.78,-586.01C169.65,-613.64 388.35,-672.14 524,-575 605.44,-516.68 615.25,-381.64 615.83,-328.27"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="619.33,-328.19 615.83,-318.18 612.33,-328.18 619.33,-328.19"/>
 </g>
-<!-- proc~cmp_area -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_node19" class="node">
-<title>proc~cmp_area</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node19"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="275,-562 125,-562 125,-538 275,-538 275,-562"/>
-<text text-anchor="middle" x="200" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<!-- proc~cmp_volume -->
+<g id="proc~~cmp_nc~2~~CalledByGraph_node20" class="node">
+<title>proc~cmp_volume</title>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node20"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-566 141,-566 141,-542 307,-542 307,-566"/>
+<text text-anchor="middle" x="224" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;proc~cmp_area -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_edge34" class="edge">
-<title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M89.08,-535.68C97.19,-536.73 105.92,-537.87 114.78,-539.03"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="114.45,-542.51 124.81,-540.33 115.35,-535.57 114.45,-542.51"/>
+<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
+<g id="proc~~cmp_nc~2~~CalledByGraph_edge28" class="edge">
+<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
+<path fill="none" stroke="#ff0000" d="M105.28,-567.89C113.48,-566.92 122.18,-565.9 130.98,-564.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="131.41,-568.33 140.93,-563.68 130.59,-561.38 131.41,-568.33"/>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node16" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node16"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="255,-420 145,-420 145,-396 255,-396 255,-420"/>
-<text text-anchor="middle" x="200" y="-405.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<title>program~example3_volume</title>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node16"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-465 169,-465 169,-441 279,-441 279,-465"/>
+<text text-anchor="middle" x="224" y="-450.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;none~set~2 -->
+<!-- program~example3_volume&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge16" class="edge">
-<title>program~example3_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M255.17,-404.6C327.24,-399.42 450.29,-388.08 491,-369 522.44,-354.27 550.52,-324.84 567.04,-305.03"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="569.81,-307.17 573.38,-297.2 564.37,-302.77 569.81,-307.17"/>
-</g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_edge20" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
-<path fill="none" stroke="#ff6d00" d="M239.39,-395.97C260.5,-389.4 287.17,-381.16 311,-374 323.16,-370.34 336.28,-366.47 348.62,-362.86"/>
-<polygon fill="#ff6d00" stroke="#ff6d00" points="349.69,-366.2 358.3,-360.04 347.72,-359.48 349.69,-366.2"/>
+<title>program~example3_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M246.93,-465.12C299.32,-492.29 434.06,-551.38 524,-495 583.54,-457.67 605.3,-369.39 612.41,-328.06"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="615.87,-328.6 613.98,-318.18 608.95,-327.5 615.87,-328.6"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge21" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
-<path fill="none" stroke="#ffda00" d="M230.54,-420.16C252.49,-428.91 283.3,-440.61 311,-449 318.48,-451.27 326.37,-453.44 334.24,-455.47"/>
-<polygon fill="#ffda00" stroke="#ffda00" points="333.62,-458.92 344.17,-457.96 335.32,-452.13 333.62,-458.92"/>
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
+<path fill="none" stroke="#ff6600" d="M279.25,-458.49C295.84,-460.17 314.64,-462.07 333.24,-463.95"/>
+<polygon fill="#ff6600" stroke="#ff6600" points="332.94,-467.44 343.24,-464.97 333.64,-460.48 332.94,-467.44"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
+<g id="proc~~cmp_nc~2~~CalledByGraph_edge22" class="edge">
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
+<path fill="none" stroke="#ffcc00" d="M279.25,-447.51C298.63,-445.55 321.03,-443.28 342.61,-441.1"/>
+<polygon fill="#ffcc00" stroke="#ffcc00" points="343.19,-444.56 352.79,-440.07 342.49,-437.59 343.19,-444.56"/>
+</g>
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge23" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
-<path fill="none" stroke="#00ff24" d="M255.11,-413.44C270.51,-414.99 287.75,-416.72 304.82,-418.43"/>
-<polygon fill="#00ff24" stroke="#00ff24" points="304.53,-421.92 314.83,-419.44 305.23,-414.96 304.53,-421.92"/>
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
+<path fill="none" stroke="#00ff00" d="M255.75,-440.99C279.38,-432.02 312.96,-419.84 343,-411 350.73,-408.73 358.89,-406.53 367.01,-404.47"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="368,-407.84 376.87,-402.04 366.32,-401.04 368,-407.84"/>
 </g>
-<!-- program~example_nurbs_surface -->
+<!-- program~example_nurbs_volume -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node17" class="node">
-<title>program~example_nurbs_surface</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node17"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 331.5,-66 331.5,-42 470.5,-42 470.5,-66"/>
-<text text-anchor="middle" x="401" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<title>program~example_nurbs_volume</title>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node17"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-108 364,-108 364,-84 503,-84 503,-108"/>
+<text text-anchor="middle" x="433.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;none~set~2 -->
+<!-- program~example_nurbs_volume&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge17" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M470.75,-63.21C478.08,-66.17 485.03,-70.01 491,-75 550.25,-124.48 572.25,-219.65 579.43,-262.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="575.99,-263.45 580.98,-272.8 582.91,-262.38 575.99,-263.45"/>
+<title>program~example_nurbs_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M503.44,-105.4C510.85,-108.33 517.9,-112.11 524,-117 578.22,-160.42 602.42,-243.9 611.25,-283.76"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="607.82,-284.49 613.3,-293.56 614.67,-283.05 607.82,-284.49"/>
 </g>
-<!-- program~nearest_point_2d -->
+<!-- program~example_put_to_nurbs -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node18" class="node">
-<title>program~nearest_point_2d</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node18"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452.5,-24 349.5,-24 349.5,0 452.5,0 452.5,-24"/>
-<text text-anchor="middle" x="401" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<title>program~example_put_to_nurbs</title>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node18"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-66 367.5,-66 367.5,-42 499.5,-42 499.5,-66"/>
+<text text-anchor="middle" x="433.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;none~set~2 -->
+<!-- program~example_put_to_nurbs&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge18" class="edge">
-<title>program~nearest_point_2d&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M452.73,-15.16C466.47,-18.21 480.44,-23.61 491,-33 560.36,-94.71 577.18,-213.24 581.23,-262.59"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="577.76,-263.07 581.96,-272.8 584.74,-262.57 577.76,-263.07"/>
-</g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_edge19" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ff0000" d="M275.1,-550C291.15,-550 308.13,-550 324.24,-550"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="324.68,-553.5 334.68,-550 324.68,-546.5 324.68,-553.5"/>
+<title>program~example_put_to_nurbs&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M499.72,-61.4C508.57,-64.57 516.99,-68.95 524,-75 588.41,-130.59 607.88,-237.64 613.43,-283.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="609.97,-284.43 614.54,-293.99 616.93,-283.67 609.97,-284.43"/>
 </g>
-<!-- program~example_ppm1 -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_node20" class="node">
-<title>program~example_ppm1</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node20"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-192 153,-192 153,-168 247,-168 247,-192"/>
-<text text-anchor="middle" x="200" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+<!-- program~nearest_point_3d -->
+<g id="proc~~cmp_nc~2~~CalledByGraph_node19" class="node">
+<title>program~nearest_point_3d</title>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node19"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-24 382,-24 382,0 485,0 485,-24"/>
+<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~set_ring~2 -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_edge27" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#0091ff" d="M247.15,-180C269.15,-180 296.09,-180 321.19,-180"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="321.45,-183.5 331.45,-180 321.45,-176.5 321.45,-183.5"/>
+<!-- program~nearest_point_3d&#45;&gt;none~set~2 -->
+<g id="proc~~cmp_nc~2~~CalledByGraph_edge19" class="edge">
+<title>program~nearest_point_3d&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M485.2,-14.84C499.17,-17.86 513.38,-23.33 524,-33 598.53,-100.9 612.42,-231.28 614.96,-283.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="611.47,-283.86 615.35,-293.71 618.46,-283.58 611.47,-283.86"/>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~set_tetragon -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_edge29" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.15,-189.74C272.73,-195.14 304.98,-201.95 333.26,-207.91"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="332.57,-211.34 343.07,-209.99 334.01,-204.5 332.57,-211.34"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~cmp_nc~2~~CalledByGraph_edge20" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ff0000" d="M307.01,-554C323.61,-554 341,-554 357.35,-554"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="357.38,-557.5 367.38,-554 357.38,-550.5 357.38,-557.5"/>
 </g>
-<!-- program~example_ppm2 -->
+<!-- program~shape_c_3d -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node21" class="node">
-<title>program~example_ppm2</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node21"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-150 153,-150 153,-126 247,-126 247,-150"/>
-<text text-anchor="middle" x="200" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+<title>program~shape_c_3d</title>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node21"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-276 186,-276 186,-252 262,-252 262,-276"/>
+<text text-anchor="middle" x="224" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~set_half_ring~2 -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_edge25" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#00ffff" d="M247.15,-138C265.39,-138 287.03,-138 308.19,-138"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="308.2,-141.5 318.2,-138 308.2,-134.5 308.2,-141.5"/>
-</g>
-<!-- program~example_ppm2&#45;&gt;proc~set_tetragon -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_edge30" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.02,-146.55C256.72,-149.56 266.56,-153.6 275,-159 295.71,-172.25 290,-188.21 311,-201 314.01,-202.83 317.16,-204.5 320.41,-206.03"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="319.22,-209.32 329.8,-209.95 321.92,-202.87 319.22,-209.32"/>
+<!-- program~shape_c_3d&#45;&gt;proc~set_c~2 -->
+<g id="proc~~cmp_nc~2~~CalledByGraph_edge24" class="edge">
+<title>program~shape_c_3d&#45;&gt;proc~set_c~2</title>
+<path fill="none" stroke="#00ff66" d="M262.1,-264C289.25,-264 326.96,-264 360,-264"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="360.09,-267.5 370.09,-264 360.09,-260.5 360.09,-267.5"/>
 </g>
-<!-- program~example_ppm3 -->
+<!-- program~shape_half_ring_3d -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node22" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node22"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-318 153,-318 153,-294 247,-294 247,-318"/>
-<text text-anchor="middle" x="200" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+<title>program~shape_half_ring_3d</title>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node22"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-234 166.5,-234 166.5,-210 281.5,-210 281.5,-234"/>
+<text text-anchor="middle" x="224" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_edge22" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#48ff00" d="M247.15,-296.26C272.73,-290.86 304.98,-284.05 333.26,-278.09"/>
-<polygon fill="#48ff00" stroke="#48ff00" points="334.01,-281.5 343.07,-276.01 332.57,-274.66 334.01,-281.5"/>
-</g>
-<!-- program~example_ppm3&#45;&gt;proc~set_tetragon -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_edge31" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.02,-297.45C256.72,-294.44 266.56,-290.4 275,-285 295.71,-271.75 290,-255.79 311,-243 314.01,-241.17 317.16,-239.5 320.41,-237.97"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="321.92,-241.13 329.8,-234.05 319.22,-234.68 321.92,-241.13"/>
+<!-- program~shape_half_ring_3d&#45;&gt;proc~set_half_ring -->
+<g id="proc~~cmp_nc~2~~CalledByGraph_edge25" class="edge">
+<title>program~shape_half_ring_3d&#45;&gt;proc~set_half_ring</title>
+<path fill="none" stroke="#00ffcb" d="M281.7,-222C299.97,-222 320.71,-222 340.84,-222"/>
+<polygon fill="#00ffcb" stroke="#00ffcb" points="340.97,-225.5 350.97,-222 340.97,-218.5 340.97,-225.5"/>
 </g>
-<!-- program~nearest_point_2d_bench -->
+<!-- program~shape_hexahedron -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_node23" class="node">
-<title>program~nearest_point_2d_bench</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node23"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-234 129,-234 129,-210 271,-210 271,-234"/>
-<text text-anchor="middle" x="200" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+<title>program~shape_hexahedron</title>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node23"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-192 167.5,-192 167.5,-168 280.5,-168 280.5,-192"/>
+<text text-anchor="middle" x="224" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_edge32" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M271.16,-222C283.34,-222 296.17,-222 308.82,-222"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="308.91,-225.5 318.91,-222 308.91,-218.5 308.91,-225.5"/>
-</g>
-<!-- program~shape_c_2d -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_node24" class="node">
-<title>program~shape_c_2d</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node24"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="238,-24 162,-24 162,0 238,0 238,-24"/>
-<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_c_2d&#45;&gt;proc~set_c~2 -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_edge24" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~set_c~2</title>
-<path fill="none" stroke="#00ff91" d="M238.17,-18.06C250.55,-21.21 263.98,-25.94 275,-33 295.71,-46.25 290,-62.21 311,-75 316.34,-78.25 322.14,-81 328.14,-83.32"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="327.09,-86.66 337.68,-86.63 329.38,-80.05 327.09,-86.66"/>
-</g>
-<!-- program~shape_half_ring_2d -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_node25" class="node">
-<title>program~shape_half_ring_2d</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node25"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="257.5,-66 142.5,-66 142.5,-42 257.5,-42 257.5,-66"/>
-<text text-anchor="middle" x="200" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2 -->
+<!-- program~shape_hexahedron&#45;&gt;proc~set_hexahedron -->
 <g id="proc~~cmp_nc~2~~CalledByGraph_edge26" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#00ffff" d="M257.09,-66.07C263.38,-68.53 269.49,-71.47 275,-75 295.71,-88.25 290,-104.21 311,-117 314.01,-118.83 317.16,-120.5 320.41,-122.03"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="319.22,-125.32 329.8,-125.95 321.92,-118.87 319.22,-125.32"/>
-</g>
-<!-- program~shape_ring_2d -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_node26" class="node">
-<title>program~shape_ring_2d</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node26"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="245,-108 155,-108 155,-84 245,-84 245,-108"/>
-<text text-anchor="middle" x="200" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
-</a>
+<title>program~shape_hexahedron&#45;&gt;proc~set_hexahedron</title>
+<path fill="none" stroke="#00cbff" d="M280.61,-180C296.56,-180 314.47,-180 332.24,-180"/>
+<polygon fill="#00cbff" stroke="#00cbff" points="332.67,-183.5 342.67,-180 332.67,-176.5 332.67,-183.5"/>
 </g>
-</g>
-<!-- program~shape_ring_2d&#45;&gt;proc~set_ring~2 -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_edge28" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#0091ff" d="M245.08,-103.96C255.4,-107.03 266,-111.24 275,-117 295.71,-130.25 290,-146.21 311,-159 314.41,-161.08 318.01,-162.95 321.73,-164.64"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="320.6,-167.95 331.18,-168.46 323.22,-161.46 320.6,-167.95"/>
-</g>
-<!-- program~shape_tetragon -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_node27" class="node">
-<title>program~shape_tetragon</title>
-<g id="a_proc~~cmp_nc~2~~CalledByGraph_node27"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-276 152,-276 152,-252 248,-252 248,-276"/>
-<text text-anchor="middle" x="200" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<!-- program~shape_ring_3d -->
+<g id="proc~~cmp_nc~2~~CalledByGraph_node24" class="node">
+<title>program~shape_ring_3d</title>
+<g id="a_proc~~cmp_nc~2~~CalledByGraph_node24"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-150 179,-150 179,-126 269,-126 269,-150"/>
+<text text-anchor="middle" x="224" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~set_tetragon -->
-<g id="proc~~cmp_nc~2~~CalledByGraph_edge33" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M248.16,-254.05C273.44,-248.71 305.03,-242.04 332.84,-236.17"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="333.83,-239.54 342.89,-234.05 332.39,-232.69 333.83,-239.54"/>
+<!-- program~shape_ring_3d&#45;&gt;proc~set_ring -->
+<g id="proc~~cmp_nc~2~~CalledByGraph_edge27" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~set_ring</title>
+<path fill="none" stroke="#0066ff" d="M269.01,-138C293.59,-138 324.96,-138 353.63,-138"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="353.65,-141.5 363.65,-138 353.65,-134.5 353.65,-141.5"/>
 </g>
 </g>
 </svg>
@@ -918,7 +855,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_nc~3.html b/proc/cmp_nc~3.html
index d06d495cc..234fa94f7 100644
--- a/proc/cmp_nc~3.html
+++ b/proc/cmp_nc~3.html
@@ -78,20 +78,20 @@ <h1>cmp_nc
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.1% of total for procedures.">4 statements</a>
+                 title=" 0.5% of total for procedures.">32 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_nc</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine cmp_nc(this)  
+    <h2>private pure subroutine cmp_nc(this, dir)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~162"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~160"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -169,6 +169,21 @@ <h3>Arguments</h3>
             <td><strong>this</strong></td>
             <td>
                 
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-dir~29"></span>
+              integer,
+            </td>
+<td>intent(in),</td>
+              <td>optional</td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>dir</strong></td>
+            <td>
+                
             </td>
         </tr>
     </tbody>
@@ -186,61 +201,61 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_nc~3~~CallsGraph Pages: 1 -->
-<svg id="proccmp_nc3CallsGraph" width="463pt" height="74pt"
- viewBox="0.00 0.00 463.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="proccmp_nc3CallsGraph" width="473pt" height="74pt"
+ viewBox="0.00 0.00 473.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~cmp_nc~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~cmp_nc~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 459,-70 459,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 469,-70 469,4 -4,4"/>
 <!-- proc~cmp_nc~3 -->
 <g id="proc~~cmp_nc~3~~CallsGraph_node1" class="node">
 <title>proc~cmp_nc~3</title>
-<polygon fill="none" stroke="black" points="129,-45 0,-45 0,-21 129,-21 129,-45"/>
-<text text-anchor="middle" x="64.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_nc</text>
+<polygon fill="none" stroke="black" points="139,-45 0,-45 0,-21 139,-21 139,-45"/>
+<text text-anchor="middle" x="69.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_nc</text>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~cmp_nc~3~~CallsGraph_node2" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~cmp_nc~3~~CallsGraph_node2"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="289,-45 165,-45 165,-21 289,-21 289,-45"/>
-<text text-anchor="middle" x="227" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="299,-45 175,-45 175,-21 299,-21 299,-45"/>
+<text text-anchor="middle" x="237" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~cmp_nc~3~~CallsGraph_edge1" class="edge">
 <title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M129.4,-33C137.72,-33 146.3,-33 154.74,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="154.94,-36.5 164.94,-33 154.94,-29.5 154.94,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M139.25,-33C147.65,-33 156.24,-33 164.68,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="164.86,-36.5 174.86,-33 164.86,-29.5 164.86,-36.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~cmp_nc~3~~CallsGraph_node3" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~cmp_nc~3~~CallsGraph_node3"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="455,-66 325,-66 325,-42 455,-42 455,-66"/>
-<text text-anchor="middle" x="390" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="465,-66 335,-66 335,-42 465,-42 465,-66"/>
+<text text-anchor="middle" x="400" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~cmp_nc~3~~CallsGraph_edge2" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M289.33,-41C297.69,-42.09 306.35,-43.22 314.92,-44.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="314.53,-47.82 324.9,-45.64 315.44,-40.88 314.53,-47.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M299.33,-41C307.69,-42.09 316.35,-43.22 324.92,-44.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="324.53,-47.82 334.9,-45.64 325.44,-40.88 324.53,-47.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~cmp_nc~3~~CallsGraph_node4" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~cmp_nc~3~~CallsGraph_node4"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="455,-24 325,-24 325,0 455,0 455,-24"/>
-<text text-anchor="middle" x="390" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="465,-24 335,-24 335,0 465,0 465,-24"/>
+<text text-anchor="middle" x="400" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~cmp_nc~3~~CallsGraph_edge3" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M289.33,-25C297.69,-23.91 306.35,-22.78 314.92,-21.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="315.44,-25.12 324.9,-20.36 314.53,-18.18 315.44,-25.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M299.33,-25C307.69,-23.91 316.35,-22.78 324.92,-21.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="325.44,-25.12 334.9,-20.36 324.53,-18.18 325.44,-25.12"/>
 </g>
 </g>
 </svg>
@@ -312,6 +327,553 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
 </g>
 </svg>
 
+<p>Solid arrows point from a procedure to one which it calls. Dashed 
+arrows point from an interface to procedures which implement that interface.
+This could include the module procedures in a generic interface or the
+implementation in a submodule of an interface in a parent module.
+</p>
+ Where possible, edges connecting nodes are
+given different colours to make them easier to distinguish in
+large graphs.</div>
+            </div>
+          </div>
+        </div>
+      </div>
+    </div>
+    <div class="card">
+      <div class="card-header">
+  <h3 class="card-title">Called by</h3>
+      </div>
+      <div class="card-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.43.0 (0)
+ -->
+<!-- Title: proc~~cmp_nc~3~~CalledByGraph Pages: 1 -->
+<svg id="proccmp_nc3CalledByGraph" width="641pt" height="373pt"
+ viewBox="0.00 0.00 641.00 373.21" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~cmp_nc~3~~CalledByGraph" class="graph" transform="scale(1.53 1.53) rotate(0) translate(4 566)">
+<title>proc~~cmp_nc~3~~CalledByGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-566 975,-566 975,4 -4,4"/>
+<!-- proc~cmp_nc~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node1" class="node">
+<title>proc~cmp_nc~3</title>
+<polygon fill="none" stroke="black" points="971,-297 832,-297 832,-273 971,-273 971,-297"/>
+<text text-anchor="middle" x="901.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_nc</text>
+</g>
+<!-- proc~set1~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node2" class="node">
+<title>proc~set1~3</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node2"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="796,-318 676,-318 676,-294 796,-294 796,-318"/>
+<text text-anchor="middle" x="736" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
+</a>
+</g>
+</g>
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge1" class="edge">
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#ff0000" d="M796.03,-298.42C804.38,-297.35 813.07,-296.23 821.72,-295.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="822.35,-298.57 831.83,-293.82 821.46,-291.62 822.35,-298.57"/>
+</g>
+<!-- proc~set2~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node3" class="node">
+<title>proc~set2~3</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node3"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="796,-276 676,-276 676,-252 796,-252 796,-276"/>
+<text text-anchor="middle" x="736" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
+</a>
+</g>
+</g>
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge2" class="edge">
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#ff0000" d="M796.03,-271.58C804.38,-272.65 813.07,-273.77 821.72,-274.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="821.46,-278.38 831.83,-276.18 822.35,-271.43 821.46,-278.38"/>
+</g>
+<!-- none~set~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node4" class="node">
+<title>none~set~3</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="640,-297 527,-297 527,-273 640,-273 640,-297"/>
+<text text-anchor="middle" x="583.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+</a>
+</g>
+</g>
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge3" class="edge">
+<title>none~set~3&#45;&gt;proc~set1~3</title>
+<path fill="none" stroke="#ff0000" d="M640.11,-292.76C648.48,-293.93 657.19,-295.14 665.8,-296.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="665.44,-299.83 675.83,-297.74 666.41,-292.89 665.44,-299.83"/>
+</g>
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge4" class="edge">
+<title>none~set~3&#45;&gt;proc~set2~3</title>
+<path fill="none" stroke="#00ffff" d="M640.11,-277.24C648.48,-276.07 657.19,-274.86 665.8,-273.66"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="666.41,-277.11 675.83,-272.26 665.44,-270.17 666.41,-277.11"/>
+</g>
+<!-- proc~ansatz~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node5" class="node">
+<title>proc~ansatz~3</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="467,-562 335,-562 335,-538 467,-538 467,-562"/>
+<text text-anchor="middle" x="401" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+</a>
+</g>
+</g>
+<!-- proc~ansatz~3&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge5" class="edge">
+<title>proc~ansatz~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M467.04,-538.75C475.81,-535.12 484.14,-530.33 491,-524 555.57,-464.48 574.98,-354.4 580.47,-307.31"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="583.96,-307.57 581.54,-297.26 577,-306.83 583.96,-307.57"/>
+</g>
+<!-- proc~elevate_degree~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node6" class="node">
+<title>proc~elevate_degree~3</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node6"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="491,-360 311,-360 311,-336 491,-336 491,-360"/>
+<text text-anchor="middle" x="401" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+</a>
+</g>
+</g>
+<!-- proc~elevate_degree~3&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge6" class="edge">
+<title>proc~elevate_degree~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M460.4,-335.97C470.7,-333.36 481.24,-330.35 491,-327 511.36,-320 533.32,-310.01 550.61,-301.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="552.31,-304.6 559.7,-297.01 549.19,-298.33 552.31,-304.6"/>
+</g>
+<!-- proc~insert_knots~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node7" class="node">
+<title>proc~insert_knots~3</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node7"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-482 320.5,-482 320.5,-458 481.5,-458 481.5,-482"/>
+<text text-anchor="middle" x="401" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+</a>
+</g>
+</g>
+<!-- proc~insert_knots~3&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge7" class="edge">
+<title>proc~insert_knots~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M475.67,-457.96C481.12,-455.5 486.31,-452.54 491,-449 539.34,-412.5 565.71,-342.6 576.53,-307.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="579.97,-307.72 579.4,-297.14 573.25,-305.76 579.97,-307.72"/>
+</g>
+<!-- proc~modify_wc~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node8" class="node">
+<title>proc~modify_wc~3</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node8"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="479,-318 323,-318 323,-294 479,-294 479,-318"/>
+<text text-anchor="middle" x="401" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+</a>
+</g>
+</g>
+<!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge8" class="edge">
+<title>proc~modify_wc~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M479.07,-297.03C491.65,-295.57 504.57,-294.07 516.84,-292.64"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="517.44,-296.09 526.97,-291.46 516.63,-289.14 517.44,-296.09"/>
+</g>
+<!-- proc~modify_xc~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node9" class="node">
+<title>proc~modify_xc~3</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node9"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-276 324.5,-276 324.5,-252 477.5,-252 477.5,-276"/>
+<text text-anchor="middle" x="401" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+</a>
+</g>
+</g>
+<!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge9" class="edge">
+<title>proc~modify_xc~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M477.5,-272.78C490.54,-274.3 503.99,-275.87 516.74,-277.35"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="516.46,-280.84 526.8,-278.52 517.27,-273.89 516.46,-280.84"/>
+</g>
+<!-- proc~remove_knots~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node10" class="node">
+<title>proc~remove_knots~3</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node10"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="487,-440 315,-440 315,-416 487,-416 487,-440"/>
+<text text-anchor="middle" x="401" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
+</a>
+</g>
+</g>
+<!-- proc~remove_knots~3&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge10" class="edge">
+<title>proc~remove_knots~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M462.24,-415.98C472.34,-412.44 482.34,-407.87 491,-402 527.88,-377 556.66,-332.45 571.47,-306.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="574.56,-307.78 576.29,-297.32 568.42,-304.42 574.56,-307.78"/>
+</g>
+<!-- proc~set_c~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node11" class="node">
+<title>proc~set_c~3</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node11"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_surface%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="464,-108 338,-108 338,-84 464,-84 464,-108"/>
+<text text-anchor="middle" x="401" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
+</a>
+</g>
+</g>
+<!-- proc~set_c~3&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge11" class="edge">
+<title>proc~set_c~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M464.39,-103.61C473.92,-106.72 483.18,-111.03 491,-117 540.26,-154.6 566.32,-226.63 576.83,-262.93"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="573.46,-263.87 579.5,-272.57 580.2,-262 573.46,-263.87"/>
+</g>
+<!-- proc~set_half_ring~2 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node12" class="node">
+<title>proc~set_half_ring~2</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node12"><a xlink:href="../proc/set_half_ring~2.html" xlink:title="nurbs_surface%set_half_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="483.5,-150 318.5,-150 318.5,-126 483.5,-126 483.5,-150"/>
+<text text-anchor="middle" x="401" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
+</a>
+</g>
+</g>
+<!-- proc~set_half_ring~2&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge12" class="edge">
+<title>proc~set_half_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M473.87,-150.11C479.91,-152.55 485.71,-155.48 491,-159 530.66,-185.4 559.08,-235.16 572.94,-263.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="569.8,-265.16 577.22,-272.71 576.13,-262.17 569.8,-265.16"/>
+</g>
+<!-- proc~set_ring~2 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node13" class="node">
+<title>proc~set_ring~2</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node13"><a xlink:href="../proc/set_ring~2.html" xlink:title="nurbs_surface%set_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="470.5,-192 331.5,-192 331.5,-168 470.5,-168 470.5,-192"/>
+<text text-anchor="middle" x="401" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
+</a>
+</g>
+</g>
+<!-- proc~set_ring~2&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge13" class="edge">
+<title>proc~set_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M469.92,-192.15C477.23,-194.59 484.41,-197.51 491,-201 521.51,-217.17 549.65,-245.97 566.45,-265.28"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="563.79,-267.55 572.93,-272.91 569.12,-263.02 563.79,-267.55"/>
+</g>
+<!-- proc~set_tetragon -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node14" class="node">
+<title>proc~set_tetragon</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node14"><a xlink:href="../proc/set_tetragon.html" xlink:title="nurbs_surface%set_tetragon">
+<polygon fill="#d9534f" stroke="#d9534f" points="483,-234 319,-234 319,-210 483,-210 483,-234"/>
+<text text-anchor="middle" x="401" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
+</a>
+</g>
+</g>
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge14" class="edge">
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M460.4,-234.03C470.7,-236.64 481.24,-239.65 491,-243 511.36,-250 533.32,-259.99 550.61,-268.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="549.19,-271.67 559.7,-272.99 552.31,-265.4 549.19,-271.67"/>
+</g>
+<!-- program~compute_area -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node15" class="node">
+<title>program~compute_area</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node15"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-542 0,-542 0,-518 89,-518 89,-542"/>
+<text text-anchor="middle" x="44.5" y="-527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+</a>
+</g>
+</g>
+<!-- program~compute_area&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge15" class="edge">
+<title>program~compute_area&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M89.19,-528.67C195.01,-525.11 458.77,-514.01 491,-491 552.97,-446.76 573.59,-350.77 579.93,-307.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="583.42,-307.52 581.27,-297.15 576.48,-306.6 583.42,-307.52"/>
+</g>
+<!-- proc~cmp_area -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node19" class="node">
+<title>proc~cmp_area</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node19"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
+<polygon fill="#d9534f" stroke="#d9534f" points="275,-562 125,-562 125,-538 275,-538 275,-562"/>
+<text text-anchor="middle" x="200" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+</a>
+</g>
+</g>
+<!-- program~compute_area&#45;&gt;proc~cmp_area -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge34" class="edge">
+<title>program~compute_area&#45;&gt;proc~cmp_area</title>
+<path fill="none" stroke="#ff0000" d="M89.08,-535.68C97.19,-536.73 105.92,-537.87 114.78,-539.03"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="114.45,-542.51 124.81,-540.33 115.35,-535.57 114.45,-542.51"/>
+</g>
+<!-- program~example3_surface -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node16" class="node">
+<title>program~example3_surface</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node16"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="255,-420 145,-420 145,-396 255,-396 255,-420"/>
+<text text-anchor="middle" x="200" y="-405.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+</a>
+</g>
+</g>
+<!-- program~example3_surface&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge16" class="edge">
+<title>program~example3_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M255.17,-404.6C327.24,-399.42 450.29,-388.08 491,-369 522.44,-354.27 550.52,-324.84 567.04,-305.03"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="569.81,-307.17 573.38,-297.2 564.37,-302.77 569.81,-307.17"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge20" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#ff6d00" d="M239.39,-395.97C260.5,-389.4 287.17,-381.16 311,-374 323.16,-370.34 336.28,-366.47 348.62,-362.86"/>
+<polygon fill="#ff6d00" stroke="#ff6d00" points="349.69,-366.2 358.3,-360.04 347.72,-359.48 349.69,-366.2"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge21" class="edge">
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#ffda00" d="M230.54,-420.16C252.49,-428.91 283.3,-440.61 311,-449 318.48,-451.27 326.37,-453.44 334.24,-455.47"/>
+<polygon fill="#ffda00" stroke="#ffda00" points="333.62,-458.92 344.17,-457.96 335.32,-452.13 333.62,-458.92"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge23" class="edge">
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#00ff24" d="M255.11,-413.44C270.51,-414.99 287.75,-416.72 304.82,-418.43"/>
+<polygon fill="#00ff24" stroke="#00ff24" points="304.53,-421.92 314.83,-419.44 305.23,-414.96 304.53,-421.92"/>
+</g>
+<!-- program~example_nurbs_surface -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node17" class="node">
+<title>program~example_nurbs_surface</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node17"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 331.5,-66 331.5,-42 470.5,-42 470.5,-66"/>
+<text text-anchor="middle" x="401" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+</a>
+</g>
+</g>
+<!-- program~example_nurbs_surface&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge17" class="edge">
+<title>program~example_nurbs_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M470.75,-63.21C478.08,-66.17 485.03,-70.01 491,-75 550.25,-124.48 572.25,-219.65 579.43,-262.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="575.99,-263.45 580.98,-272.8 582.91,-262.38 575.99,-263.45"/>
+</g>
+<!-- program~nearest_point_2d -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node18" class="node">
+<title>program~nearest_point_2d</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node18"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452.5,-24 349.5,-24 349.5,0 452.5,0 452.5,-24"/>
+<text text-anchor="middle" x="401" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+</a>
+</g>
+</g>
+<!-- program~nearest_point_2d&#45;&gt;none~set~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge18" class="edge">
+<title>program~nearest_point_2d&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M452.73,-15.16C466.47,-18.21 480.44,-23.61 491,-33 560.36,-94.71 577.18,-213.24 581.23,-262.59"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="577.76,-263.07 581.96,-272.8 584.74,-262.57 577.76,-263.07"/>
+</g>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge19" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#ff0000" d="M275.1,-550C291.15,-550 308.13,-550 324.24,-550"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="324.68,-553.5 334.68,-550 324.68,-546.5 324.68,-553.5"/>
+</g>
+<!-- program~example_ppm1 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node20" class="node">
+<title>program~example_ppm1</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node20"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-192 153,-192 153,-168 247,-168 247,-192"/>
+<text text-anchor="middle" x="200" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm1&#45;&gt;proc~set_ring~2 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge27" class="edge">
+<title>program~example_ppm1&#45;&gt;proc~set_ring~2</title>
+<path fill="none" stroke="#0091ff" d="M247.15,-180C269.15,-180 296.09,-180 321.19,-180"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="321.45,-183.5 331.45,-180 321.45,-176.5 321.45,-183.5"/>
+</g>
+<!-- program~example_ppm1&#45;&gt;proc~set_tetragon -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge29" class="edge">
+<title>program~example_ppm1&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.15,-189.74C272.73,-195.14 304.98,-201.95 333.26,-207.91"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="332.57,-211.34 343.07,-209.99 334.01,-204.5 332.57,-211.34"/>
+</g>
+<!-- program~example_ppm2 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node21" class="node">
+<title>program~example_ppm2</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node21"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-150 153,-150 153,-126 247,-126 247,-150"/>
+<text text-anchor="middle" x="200" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm2&#45;&gt;proc~set_half_ring~2 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge25" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~set_half_ring~2</title>
+<path fill="none" stroke="#00ffff" d="M247.15,-138C265.39,-138 287.03,-138 308.19,-138"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="308.2,-141.5 318.2,-138 308.2,-134.5 308.2,-141.5"/>
+</g>
+<!-- program~example_ppm2&#45;&gt;proc~set_tetragon -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge30" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.02,-146.55C256.72,-149.56 266.56,-153.6 275,-159 295.71,-172.25 290,-188.21 311,-201 314.01,-202.83 317.16,-204.5 320.41,-206.03"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="319.22,-209.32 329.8,-209.95 321.92,-202.87 319.22,-209.32"/>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node22" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node22"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-318 153,-318 153,-294 247,-294 247,-318"/>
+<text text-anchor="middle" x="200" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge22" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#48ff00" d="M247.15,-296.26C272.73,-290.86 304.98,-284.05 333.26,-278.09"/>
+<polygon fill="#48ff00" stroke="#48ff00" points="334.01,-281.5 343.07,-276.01 332.57,-274.66 334.01,-281.5"/>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~set_tetragon -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge31" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.02,-297.45C256.72,-294.44 266.56,-290.4 275,-285 295.71,-271.75 290,-255.79 311,-243 314.01,-241.17 317.16,-239.5 320.41,-237.97"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="321.92,-241.13 329.8,-234.05 319.22,-234.68 321.92,-241.13"/>
+</g>
+<!-- program~nearest_point_2d_bench -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node23" class="node">
+<title>program~nearest_point_2d_bench</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node23"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-234 129,-234 129,-210 271,-210 271,-234"/>
+<text text-anchor="middle" x="200" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+</a>
+</g>
+</g>
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge32" class="edge">
+<title>program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M271.16,-222C283.34,-222 296.17,-222 308.82,-222"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="308.91,-225.5 318.91,-222 308.91,-218.5 308.91,-225.5"/>
+</g>
+<!-- program~shape_c_2d -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node24" class="node">
+<title>program~shape_c_2d</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node24"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="238,-24 162,-24 162,0 238,0 238,-24"/>
+<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_c_2d&#45;&gt;proc~set_c~3 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge24" class="edge">
+<title>program~shape_c_2d&#45;&gt;proc~set_c~3</title>
+<path fill="none" stroke="#00ff91" d="M238.17,-18.06C250.55,-21.21 263.98,-25.94 275,-33 295.71,-46.25 290,-62.21 311,-75 316.34,-78.25 322.14,-81 328.14,-83.32"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="327.09,-86.66 337.68,-86.63 329.38,-80.05 327.09,-86.66"/>
+</g>
+<!-- program~shape_half_ring_2d -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node25" class="node">
+<title>program~shape_half_ring_2d</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node25"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="257.5,-66 142.5,-66 142.5,-42 257.5,-42 257.5,-66"/>
+<text text-anchor="middle" x="200" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge26" class="edge">
+<title>program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2</title>
+<path fill="none" stroke="#00ffff" d="M257.09,-66.07C263.38,-68.53 269.49,-71.47 275,-75 295.71,-88.25 290,-104.21 311,-117 314.01,-118.83 317.16,-120.5 320.41,-122.03"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="319.22,-125.32 329.8,-125.95 321.92,-118.87 319.22,-125.32"/>
+</g>
+<!-- program~shape_ring_2d -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node26" class="node">
+<title>program~shape_ring_2d</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node26"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="245,-108 155,-108 155,-84 245,-84 245,-108"/>
+<text text-anchor="middle" x="200" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_ring_2d&#45;&gt;proc~set_ring~2 -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge28" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~set_ring~2</title>
+<path fill="none" stroke="#0091ff" d="M245.08,-103.96C255.4,-107.03 266,-111.24 275,-117 295.71,-130.25 290,-146.21 311,-159 314.41,-161.08 318.01,-162.95 321.73,-164.64"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="320.6,-167.95 331.18,-168.46 323.22,-161.46 320.6,-167.95"/>
+</g>
+<!-- program~shape_tetragon -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_node27" class="node">
+<title>program~shape_tetragon</title>
+<g id="a_proc~~cmp_nc~3~~CalledByGraph_node27"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-276 152,-276 152,-252 248,-252 248,-276"/>
+<text text-anchor="middle" x="200" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+</a>
+</g>
+</g>
+<!-- program~shape_tetragon&#45;&gt;proc~set_tetragon -->
+<g id="proc~~cmp_nc~3~~CalledByGraph_edge33" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M248.16,-254.05C273.44,-248.71 305.03,-242.04 332.84,-236.17"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="333.83,-239.54 342.89,-234.05 332.39,-232.69 333.83,-239.54"/>
+</g>
+</g>
+</svg>
+</div>                <script>
+                  var panproccmp_nc3CalledByGraph = svgPanZoom('#proccmp_nc3CalledByGraph',
+                    {zoomEnabled: true, controlIconsEnabled: true, fit: true, center: true,}
+                  );
+                </script>          <div>
+            <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
+          </div>
+          <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
+            <div class="modal-dialog modal-lg" role="document">
+              <div class="modal-content">
+                <div class="modal-header">
+                  <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
+                  <button type="button" class="btn-close" data-bs-dismiss="modal" aria-label="Close"></button>
+                </div>
+                <div class="modal-body">
+<p>Nodes of different colours represent the following: </p>
+<?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.43.0 (0)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="641pt" height="28pt"
+ viewBox="0.00 0.00 641.00 27.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1.16 1.16) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 741.5,-28 741.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="70,-24 0,-24 0,0 70,0 70,-24"/>
+<text text-anchor="middle" x="35" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-24 88,-24 88,0 146,0 146,-24"/>
+<text text-anchor="middle" x="117" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="225.5,-24 164.5,-24 164.5,0 225.5,0 225.5,-24"/>
+<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Type Bound Procedure -->
+<g id="node4" class="node">
+<title>Type Bound Procedure</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="374,-24 244,-24 244,0 374,0 374,-24"/>
+<text text-anchor="middle" x="309" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Type Bound Procedure</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node5" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="537.5,-24 392.5,-24 392.5,0 537.5,0 537.5,-24"/>
+<text text-anchor="middle" x="465" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node6" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-24 556,-24 556,0 614,0 614,-24"/>
+<text text-anchor="middle" x="585" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node7" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="737.5,-24 632.5,-24 632.5,0 737.5,0 737.5,-24"/>
+<text text-anchor="middle" x="685" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
 <p>Solid arrows point from a procedure to one which it calls. Dashed 
 arrows point from an interface to procedures which implement that interface.
 This could include the module procedures in a generic interface or the
@@ -356,7 +918,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_volume.html b/proc/cmp_volume.html
index b23d5833a..1785d676d 100644
--- a/proc/cmp_volume.html
+++ b/proc/cmp_volume.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~68"></span>
+              <span class="anchor" id="variable-this~129"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-volume~2"></span>
+              <span class="anchor" id="variable-volume"></span>
               real(kind=rk),
             </td>
 <td>intent(out)</td>
@@ -212,39 +212,39 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="166,-264 0,-264 0,-240 166,-240 166,-264"/>
 <text text-anchor="middle" x="83" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_volume</text>
 </g>
-<!-- proc~ansatz -->
+<!-- proc~ansatz~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_node2" class="node">
-<title>proc~ansatz</title>
-<g id="a_proc~~cmp_volume~~CallsGraph_node2"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
+<title>proc~ansatz~2</title>
+<g id="a_proc~~cmp_volume~~CallsGraph_node2"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="334,-244 202,-244 202,-220 334,-220 334,-244"/>
 <text text-anchor="middle" x="268" y="-229.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge1" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
 <path fill="none" stroke="#ff0000" d="M166.13,-243.02C174.64,-242.09 183.26,-241.15 191.7,-240.23"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="192.31,-243.68 201.87,-239.12 191.54,-236.73 192.31,-243.68"/>
 </g>
-<!-- proc~cmp_elem -->
+<!-- proc~cmp_elem~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_node3" class="node">
-<title>proc~cmp_elem</title>
-<g id="a_proc~~cmp_volume~~CallsGraph_node3"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_volume%cmp_elem">
+<title>proc~cmp_elem~2</title>
+<g id="a_proc~~cmp_volume~~CallsGraph_node3"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_volume%cmp_elem">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="523,-494 370,-494 370,-470 523,-470 523,-494"/>
 <text text-anchor="middle" x="446.5" y="-479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem -->
+<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge2" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~cmp_elem</title>
+<title>proc~cmp_volume&#45;&gt;proc~cmp_elem~2</title>
 <path fill="none" stroke="#ff0000" d="M103.08,-264.14C149.02,-293.39 269.44,-370.04 370,-434 385.8,-444.05 403.47,-455.28 417.74,-464.35"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="416.25,-467.56 426.57,-469.97 420.01,-461.65 416.25,-467.56"/>
 </g>
-<!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
+<!-- proc~ansatz~2&#45;&gt;proc~cmp_elem~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge8" class="edge">
-<title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
+<title>proc~ansatz~2&#45;&gt;proc~cmp_elem~2</title>
 <path fill="none" stroke="#ff0000" d="M275.04,-244.2C296.56,-287.59 368.21,-432.02 370,-434 381.27,-446.49 396.51,-457 410.35,-464.97"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="408.74,-468.08 419.19,-469.84 412.12,-461.95 408.74,-468.08"/>
 </g>
@@ -257,9 +257,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;interface~gauss_leg -->
+<!-- proc~ansatz~2&#45;&gt;interface~gauss_leg -->
 <g id="proc~~cmp_volume~~CallsGraph_edge3" class="edge">
-<title>proc~ansatz&#45;&gt;interface~gauss_leg</title>
+<title>proc~ansatz~2&#45;&gt;interface~gauss_leg</title>
 <path fill="none" stroke="#ff0000" d="M334.22,-232C357.41,-232 382.87,-232 403.59,-232"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="403.64,-235.5 413.64,-232 403.64,-228.5 403.64,-235.5"/>
 </g>
@@ -272,9 +272,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;interface~ndgrid -->
+<!-- proc~ansatz~2&#45;&gt;interface~ndgrid -->
 <g id="proc~~cmp_volume~~CallsGraph_edge4" class="edge">
-<title>proc~ansatz&#45;&gt;interface~ndgrid</title>
+<title>proc~ansatz~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M313.82,-219.95C370.46,-205.25 471.19,-180.9 559,-169 655.95,-155.87 771.46,-152.83 829.06,-152.16"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="829.16,-155.66 839.13,-152.06 829.09,-148.66 829.16,-155.66"/>
 </g>
@@ -287,39 +287,39 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;interface~unique -->
+<!-- proc~ansatz~2&#45;&gt;interface~unique -->
 <g id="proc~~cmp_volume~~CallsGraph_edge5" class="edge">
-<title>proc~ansatz&#45;&gt;interface~unique</title>
+<title>proc~ansatz~2&#45;&gt;interface~unique</title>
 <path fill="none" stroke="#ff0000" d="M277.45,-244.15C289.88,-262.04 313.81,-296.54 334,-326 350.1,-349.49 348.61,-360.2 370,-379 390.34,-396.87 546.57,-471.74 617.8,-505.44"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="616.73,-508.8 627.27,-509.91 619.72,-502.47 616.73,-508.8"/>
 </g>
-<!-- none~derivative -->
+<!-- none~derivative~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_node8" class="node">
-<title>none~derivative</title>
-<g id="a_proc~~cmp_volume~~CallsGraph_node8"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative" xlink:title="nurbs_volume%derivative">
+<title>none~derivative~2</title>
+<g id="a_proc~~cmp_volume~~CallsGraph_node8"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative~2" xlink:title="nurbs_volume%derivative">
 <polygon fill="#a7506f" stroke="#a7506f" points="522,-122 371,-122 371,-98 522,-98 522,-122"/>
 <text text-anchor="middle" x="446.5" y="-107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;none~derivative -->
+<!-- proc~ansatz~2&#45;&gt;none~derivative~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge6" class="edge">
-<title>proc~ansatz&#45;&gt;none~derivative</title>
+<title>proc~ansatz~2&#45;&gt;none~derivative~2</title>
 <path fill="none" stroke="#ff0000" d="M278.63,-219.96C295.26,-199.88 331.33,-159.48 370,-136 376.35,-132.14 383.36,-128.76 390.46,-125.82"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="392.08,-128.95 400.16,-122.09 389.57,-122.41 392.08,-128.95"/>
 </g>
-<!-- none~set -->
+<!-- none~set~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_node9" class="node">
-<title>none~set</title>
-<g id="a_proc~~cmp_volume~~CallsGraph_node9"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
+<title>none~set~2</title>
+<g id="a_proc~~cmp_volume~~CallsGraph_node9"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="503,-370 390,-370 390,-346 503,-346 503,-370"/>
 <text text-anchor="middle" x="446.5" y="-355.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;none~set -->
+<!-- proc~ansatz~2&#45;&gt;none~set~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge7" class="edge">
-<title>proc~ansatz&#45;&gt;none~set</title>
+<title>proc~ansatz~2&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M285.92,-244.08C317.16,-266.38 383.99,-314.09 420.47,-340.13"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="418.46,-342.99 428.63,-345.96 422.52,-337.3 418.46,-342.99"/>
 </g>
@@ -332,9 +332,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;proc~det -->
+<!-- proc~ansatz~2&#45;&gt;proc~det -->
 <g id="proc~~cmp_volume~~CallsGraph_edge9" class="edge">
-<title>proc~ansatz&#45;&gt;proc~det</title>
+<title>proc~ansatz~2&#45;&gt;proc~det</title>
 <path fill="none" stroke="#ff0000" d="M274,-219.81C286.06,-191.96 319.55,-123.45 370,-89 370.65,-88.56 540.71,-46.65 616.86,-27.9"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="618.08,-31.2 626.95,-25.41 616.41,-24.4 618.08,-31.2"/>
 </g>
@@ -347,9 +347,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;proc~inv -->
+<!-- proc~ansatz~2&#45;&gt;proc~inv -->
 <g id="proc~~cmp_volume~~CallsGraph_edge10" class="edge">
-<title>proc~ansatz&#45;&gt;proc~inv</title>
+<title>proc~ansatz~2&#45;&gt;proc~inv</title>
 <path fill="none" stroke="#ff0000" d="M273.37,-219.93C284.95,-189.28 319.1,-107.24 370,-56 381.47,-44.46 396.58,-34.86 410.27,-27.61"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="412.11,-30.6 419.45,-22.97 408.95,-24.35 412.11,-30.6"/>
 </g>
@@ -362,30 +362,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem&#45;&gt;interface~elemconn_cn -->
+<!-- proc~cmp_elem~2&#45;&gt;interface~elemconn_cn -->
 <g id="proc~~cmp_volume~~CallsGraph_edge11" class="edge">
-<title>proc~cmp_elem&#45;&gt;interface~elemconn_cn</title>
+<title>proc~cmp_elem~2&#45;&gt;interface~elemconn_cn</title>
 <path fill="none" stroke="#00ffff" d="M464.67,-494.11C500.78,-519.59 584.77,-578.86 627.32,-608.88"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="625.55,-611.91 635.74,-614.82 629.58,-606.19 625.55,-611.91"/>
 </g>
-<!-- proc~cmp_elem&#45;&gt;interface~unique -->
+<!-- proc~cmp_elem~2&#45;&gt;interface~unique -->
 <g id="proc~~cmp_volume~~CallsGraph_edge12" class="edge">
-<title>proc~cmp_elem&#45;&gt;interface~unique</title>
+<title>proc~cmp_elem~2&#45;&gt;interface~unique</title>
 <path fill="none" stroke="#00ffff" d="M509.16,-494C544.37,-500.86 587.3,-509.21 617.05,-515"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="616.5,-518.46 626.98,-516.94 617.84,-511.59 616.5,-518.46"/>
 </g>
-<!-- proc~get_multiplicity -->
+<!-- proc~get_multiplicity~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_node11" class="node">
-<title>proc~get_multiplicity</title>
-<g id="a_proc~~cmp_volume~~CallsGraph_node11"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
+<title>proc~get_multiplicity~2</title>
+<g id="a_proc~~cmp_volume~~CallsGraph_node11"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1162,-454 984,-454 984,-430 1162,-430 1162,-454"/>
 <text text-anchor="middle" x="1073" y="-439.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem&#45;&gt;proc~get_multiplicity -->
+<!-- proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge13" class="edge">
-<title>proc~cmp_elem&#45;&gt;proc~get_multiplicity</title>
+<title>proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2</title>
 <path fill="none" stroke="#00ffff" d="M523.18,-482.18C621.38,-481.71 797.93,-478.49 948,-463 965.07,-461.24 983.34,-458.58 1000.47,-455.74"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="1001.13,-459.18 1010.4,-454.05 999.96,-452.28 1001.13,-459.18"/>
 </g>
@@ -539,93 +539,93 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M681.23,-522C715.55,-522 776.26,-522 818.58,-522"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="818.65,-525.5 828.65,-522 818.65,-518.5 818.65,-525.5"/>
 </g>
-<!-- proc~derivative_scalar -->
+<!-- proc~derivative_scalar~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_node17" class="node">
-<title>proc~derivative_scalar</title>
-<g id="a_proc~~cmp_volume~~CallsGraph_node17"><a xlink:href="../proc/derivative_scalar.html" xlink:title="nurbs_volume%derivative_scalar">
+<title>proc~derivative_scalar~2</title>
+<g id="a_proc~~cmp_volume~~CallsGraph_node17"><a xlink:href="../proc/derivative_scalar~2.html" xlink:title="nurbs_volume%derivative_scalar">
 <polygon fill="#d9534f" stroke="#d9534f" points="748,-80 560,-80 560,-56 748,-56 748,-80"/>
 <text text-anchor="middle" x="654" y="-65.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_scalar</text>
 </a>
 </g>
 </g>
-<!-- none~derivative&#45;&gt;proc~derivative_scalar -->
+<!-- none~derivative~2&#45;&gt;proc~derivative_scalar~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge24" class="edge">
-<title>none~derivative&#45;&gt;proc~derivative_scalar</title>
+<title>none~derivative~2&#45;&gt;proc~derivative_scalar~2</title>
 <path fill="none" stroke="#00ffa9" stroke-dasharray="5,2" d="M506.39,-97.96C530.68,-93 559,-87.21 584.23,-82.05"/>
 <polygon fill="#00ffa9" stroke="#00ffa9" points="585.01,-85.47 594.1,-80.04 583.61,-78.61 585.01,-85.47"/>
 </g>
-<!-- proc~derivative_vector -->
+<!-- proc~derivative_vector~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_node18" class="node">
-<title>proc~derivative_vector</title>
-<g id="a_proc~~cmp_volume~~CallsGraph_node18"><a xlink:href="../proc/derivative_vector.html" xlink:title="nurbs_volume%derivative_vector">
+<title>proc~derivative_vector~2</title>
+<g id="a_proc~~cmp_volume~~CallsGraph_node18"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_volume%derivative_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="749,-122 559,-122 559,-98 749,-98 749,-122"/>
 <text text-anchor="middle" x="654" y="-107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_vector</text>
 </a>
 </g>
 </g>
-<!-- none~derivative&#45;&gt;proc~derivative_vector -->
+<!-- none~derivative~2&#45;&gt;proc~derivative_vector~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge25" class="edge">
-<title>none~derivative&#45;&gt;proc~derivative_vector</title>
+<title>none~derivative~2&#45;&gt;proc~derivative_vector~2</title>
 <path fill="none" stroke="#00ffa9" stroke-dasharray="5,2" d="M522.27,-110C530.94,-110 539.9,-110 548.88,-110"/>
 <polygon fill="#00ffa9" stroke="#00ffa9" points="549,-113.5 559,-110 549,-106.5 549,-113.5"/>
 </g>
-<!-- proc~set1 -->
+<!-- proc~set1~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_node24" class="node">
-<title>proc~set1</title>
-<g id="a_proc~~cmp_volume~~CallsGraph_node24"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
+<title>proc~set1~2</title>
+<g id="a_proc~~cmp_volume~~CallsGraph_node24"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="714,-412 594,-412 594,-388 714,-388 714,-412"/>
 <text text-anchor="middle" x="654" y="-397.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set1 -->
+<!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge26" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
+<title>none~set~2&#45;&gt;proc~set1~2</title>
 <path fill="none" stroke="#00a9ff" stroke-dasharray="5,2" d="M503.11,-369.37C528.09,-374.47 557.82,-380.55 584.18,-385.94"/>
 <polygon fill="#00a9ff" stroke="#00a9ff" points="583.61,-389.39 594.11,-387.96 585.01,-382.53 583.61,-389.39"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set2~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_node25" class="node">
-<title>proc~set2</title>
-<g id="a_proc~~cmp_volume~~CallsGraph_node25"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
+<title>proc~set2~2</title>
+<g id="a_proc~~cmp_volume~~CallsGraph_node25"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="714,-370 594,-370 594,-346 714,-346 714,-370"/>
 <text text-anchor="middle" x="654" y="-355.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set2 -->
+<!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge27" class="edge">
-<title>none~set&#45;&gt;proc~set2</title>
+<title>none~set~2&#45;&gt;proc~set2~2</title>
 <path fill="none" stroke="#00a9ff" stroke-dasharray="5,2" d="M503.11,-358C527.88,-358 557.31,-358 583.5,-358"/>
 <polygon fill="#00a9ff" stroke="#00a9ff" points="583.75,-361.5 593.75,-358 583.75,-354.5 583.75,-361.5"/>
 </g>
-<!-- proc~set3 -->
+<!-- proc~set3~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_node26" class="node">
-<title>proc~set3</title>
-<g id="a_proc~~cmp_volume~~CallsGraph_node26"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
+<title>proc~set3~2</title>
+<g id="a_proc~~cmp_volume~~CallsGraph_node26"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="714,-454 594,-454 594,-430 714,-430 714,-454"/>
 <text text-anchor="middle" x="654" y="-439.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set3 -->
+<!-- none~set~2&#45;&gt;proc~set3~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge28" class="edge">
-<title>none~set&#45;&gt;proc~set3</title>
+<title>none~set~2&#45;&gt;proc~set3~2</title>
 <path fill="none" stroke="#00a9ff" stroke-dasharray="5,2" d="M465.23,-370.21C486.57,-384.38 523.93,-407.52 559,-421 566.85,-424.02 575.25,-426.66 583.67,-428.96"/>
 <polygon fill="#00a9ff" stroke="#00a9ff" points="582.99,-432.4 593.54,-431.5 584.73,-425.62 582.99,-432.4"/>
 </g>
-<!-- proc~set4 -->
+<!-- proc~set4~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_node27" class="node">
-<title>proc~set4</title>
-<g id="a_proc~~cmp_volume~~CallsGraph_node27"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
+<title>proc~set4~2</title>
+<g id="a_proc~~cmp_volume~~CallsGraph_node27"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="714,-328 594,-328 594,-304 714,-304 714,-328"/>
 <text text-anchor="middle" x="654" y="-313.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set4 -->
+<!-- none~set~2&#45;&gt;proc~set4~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge29" class="edge">
-<title>none~set&#45;&gt;proc~set4</title>
+<title>none~set~2&#45;&gt;proc~set4~2</title>
 <path fill="none" stroke="#00a9ff" stroke-dasharray="5,2" d="M503.11,-346.63C528.09,-341.53 557.82,-335.45 584.18,-330.06"/>
 <polygon fill="#00a9ff" stroke="#00a9ff" points="585.01,-333.47 594.11,-328.04 583.61,-326.61 585.01,-333.47"/>
 </g>
@@ -638,9 +638,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~cmp_volume~~CallsGraph_edge30" class="edge">
-<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#aa00ff" d="M1162.17,-431.99C1170.77,-431.02 1179.42,-430.03 1187.82,-429.08"/>
 <polygon fill="#aa00ff" stroke="#aa00ff" points="1188.39,-432.54 1197.93,-427.93 1187.6,-425.58 1188.39,-432.54"/>
 </g>
@@ -686,51 +686,51 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1322.33,-413C1330.69,-411.91 1339.35,-410.78 1347.92,-409.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1348.44,-413.12 1357.9,-408.36 1347.53,-406.18 1348.44,-413.12"/>
 </g>
-<!-- interface~compute_dtgc -->
+<!-- interface~compute_dtgc~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_node31" class="node">
-<title>interface~compute_dtgc</title>
-<g id="a_proc~~cmp_volume~~CallsGraph_node31"><a xlink:href="../interface/compute_dtgc.html" xlink:title="compute_dTgc">
+<title>interface~compute_dtgc~2</title>
+<g id="a_proc~~cmp_volume~~CallsGraph_node31"><a xlink:href="../interface/compute_dtgc~2.html" xlink:title="compute_dTgc">
 <polygon fill="#a7506f" stroke="#a7506f" points="912,-122 821,-122 821,-98 912,-98 912,-122"/>
 <text text-anchor="middle" x="866.5" y="-107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_scalar&#45;&gt;interface~compute_dtgc -->
+<!-- proc~derivative_scalar~2&#45;&gt;interface~compute_dtgc~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge35" class="edge">
-<title>proc~derivative_scalar&#45;&gt;interface~compute_dtgc</title>
+<title>proc~derivative_scalar~2&#45;&gt;interface~compute_dtgc~2</title>
 <path fill="none" stroke="#96ff00" d="M715.32,-80.04C745.42,-86.04 781.56,-93.25 810.85,-99.1"/>
 <polygon fill="#96ff00" stroke="#96ff00" points="810.41,-102.58 820.9,-101.1 811.78,-95.71 810.41,-102.58"/>
 </g>
-<!-- proc~is_rational -->
+<!-- proc~is_rational~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_node37" class="node">
-<title>proc~is_rational</title>
-<g id="a_proc~~cmp_volume~~CallsGraph_node37"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
+<title>proc~is_rational~2</title>
+<g id="a_proc~~cmp_volume~~CallsGraph_node37"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="942.5,-80 790.5,-80 790.5,-56 942.5,-56 942.5,-80"/>
 <text text-anchor="middle" x="866.5" y="-65.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_scalar&#45;&gt;proc~is_rational -->
+<!-- proc~derivative_scalar~2&#45;&gt;proc~is_rational~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge36" class="edge">
-<title>proc~derivative_scalar&#45;&gt;proc~is_rational</title>
+<title>proc~derivative_scalar~2&#45;&gt;proc~is_rational~2</title>
 <path fill="none" stroke="#96ff00" d="M748.25,-68C758.91,-68 769.75,-68 780.3,-68"/>
 <polygon fill="#96ff00" stroke="#96ff00" points="780.32,-71.5 790.32,-68 780.32,-64.5 780.32,-71.5"/>
 </g>
-<!-- proc~derivative_vector&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative_vector~2&#45;&gt;interface~ndgrid -->
 <g id="proc~~cmp_volume~~CallsGraph_edge38" class="edge">
-<title>proc~derivative_vector&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative_vector~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#3cff00" d="M715.32,-122.04C752.21,-129.4 798.17,-138.57 829.47,-144.81"/>
 <polygon fill="#3cff00" stroke="#3cff00" points="828.99,-148.28 839.48,-146.81 830.36,-141.42 828.99,-148.28"/>
 </g>
-<!-- proc~derivative_vector&#45;&gt;interface~compute_dtgc -->
+<!-- proc~derivative_vector~2&#45;&gt;interface~compute_dtgc~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge37" class="edge">
-<title>proc~derivative_vector&#45;&gt;interface~compute_dtgc</title>
+<title>proc~derivative_vector~2&#45;&gt;interface~compute_dtgc~2</title>
 <path fill="none" stroke="#3cff00" d="M749.17,-110C770.23,-110 791.88,-110 810.72,-110"/>
 <polygon fill="#3cff00" stroke="#3cff00" points="810.87,-113.5 820.87,-110 810.87,-106.5 810.87,-113.5"/>
 </g>
-<!-- proc~derivative_vector&#45;&gt;proc~is_rational -->
+<!-- proc~derivative_vector~2&#45;&gt;proc~is_rational~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge39" class="edge">
-<title>proc~derivative_vector&#45;&gt;proc~is_rational</title>
+<title>proc~derivative_vector~2&#45;&gt;proc~is_rational~2</title>
 <path fill="none" stroke="#3cff00" d="M715.32,-97.96C740.2,-93 769.21,-87.21 795.06,-82.05"/>
 <polygon fill="#3cff00" stroke="#3cff00" points="796.05,-85.43 805.17,-80.04 794.68,-78.56 796.05,-85.43"/>
 </g>
@@ -791,39 +791,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#00ffd1" d="M712.24,-191.09C749.43,-191.79 796.8,-192.69 828.96,-193.31"/>
 <polygon fill="#00ffd1" stroke="#00ffd1" points="829.18,-196.81 839.25,-193.5 829.32,-189.81 829.18,-196.81"/>
 </g>
-<!-- proc~cmp_degree -->
+<!-- proc~cmp_degree~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_node32" class="node">
-<title>proc~cmp_degree</title>
-<g id="a_proc~~cmp_volume~~CallsGraph_node32"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
+<title>proc~cmp_degree~2</title>
+<g id="a_proc~~cmp_volume~~CallsGraph_node32"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="948,-454 785,-454 785,-430 948,-430 948,-454"/>
 <text text-anchor="middle" x="866.5" y="-439.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_degree -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge47" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#001dff" d="M714.2,-411.81C739.43,-416.85 769.06,-422.76 795.38,-428.01"/>
 <polygon fill="#001dff" stroke="#001dff" points="794.8,-431.46 805.29,-429.99 796.17,-424.6 794.8,-431.46"/>
 </g>
-<!-- proc~cmp_nc -->
+<!-- proc~cmp_nc~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_node33" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_proc~~cmp_volume~~CallsGraph_node33"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
+<title>proc~cmp_nc~2</title>
+<g id="a_proc~~cmp_volume~~CallsGraph_node33"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="936,-412 797,-412 797,-388 936,-388 936,-412"/>
 <text text-anchor="middle" x="866.5" y="-397.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge48" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#001dff" d="M714.2,-400C736.65,-400 762.58,-400 786.57,-400"/>
 <polygon fill="#001dff" stroke="#001dff" points="786.71,-403.5 796.71,-400 786.71,-396.5 786.71,-403.5"/>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge49" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
+<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#3c00ff" d="M714.2,-369.81C739.43,-374.85 769.06,-380.76 795.38,-386.01"/>
 <polygon fill="#3c00ff" stroke="#3c00ff" points="794.8,-389.46 805.29,-387.99 796.17,-382.6 794.8,-389.46"/>
 </g>
@@ -836,27 +836,27 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~cmp_volume~~CallsGraph_edge50" class="edge">
-<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#3c00ff" d="M714.2,-358C738.57,-358 767.04,-358 792.67,-358"/>
 <polygon fill="#3c00ff" stroke="#3c00ff" points="792.71,-361.5 802.71,-358 792.71,-354.5 792.71,-361.5"/>
 </g>
-<!-- proc~set3&#45;&gt;proc~cmp_degree -->
+<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge51" class="edge">
-<title>proc~set3&#45;&gt;proc~cmp_degree</title>
+<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#9500ff" d="M714.2,-442C732.92,-442 754.07,-442 774.49,-442"/>
 <polygon fill="#9500ff" stroke="#9500ff" points="774.76,-445.5 784.76,-442 774.76,-438.5 774.76,-445.5"/>
 </g>
-<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
+<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="proc~~cmp_volume~~CallsGraph_edge52" class="edge">
-<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
+<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
 <path fill="none" stroke="#aaff00" d="M948.03,-442C956.47,-442 965.11,-442 973.71,-442"/>
 <polygon fill="#aaff00" stroke="#aaff00" points="973.78,-445.5 983.78,-442 973.78,-438.5 973.78,-445.5"/>
 </g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~cmp_volume~~CallsGraph_edge53" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M936.14,-403.68C1006.69,-407.47 1116.03,-413.33 1187.57,-417.17"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1187.67,-420.68 1197.85,-417.72 1188.05,-413.69 1187.67,-420.68"/>
 </g>
@@ -1113,7 +1113,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_xg.html b/proc/cmp_xg.html
index ef2380543..95a1f31ec 100644
--- a/proc/cmp_xg.html
+++ b/proc/cmp_xg.html
@@ -83,15 +83,15 @@ <h1>cmp_Xg
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_Xg</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function cmp_Xg(this, Xt) result(Xg)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~6"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~7"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -176,12 +176,12 @@ <h3>Arguments</h3>
               <span class="anchor" id="variable-xt~3"></span>
               real(kind=rk),
             </td>
-<td>intent(in),</td>
+<td>intent(in)</td>
               <td></td>            <td>
-              contiguous
+              
             </td>
             <td>::</td>
-            <td><strong>Xt</strong>(:)</td>
+            <td><strong>Xt</strong></td>
             <td>
                 
             </td>
@@ -208,46 +208,46 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_xg~~CallsGraph Pages: 1 -->
-<svg id="proccmp_xgCallsGraph" width="336pt" height="74pt"
- viewBox="0.00 0.00 336.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="proccmp_xgCallsGraph" width="316pt" height="74pt"
+ viewBox="0.00 0.00 316.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~cmp_xg~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~cmp_xg~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 332,-70 332,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 312,-70 312,4 -4,4"/>
 <!-- proc~cmp_xg -->
 <g id="proc~~cmp_xg~~CallsGraph_node1" class="node">
 <title>proc~cmp_xg</title>
-<polygon fill="none" stroke="black" points="140,-45 0,-45 0,-21 140,-21 140,-45"/>
-<text text-anchor="middle" x="70" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_Xg</text>
+<polygon fill="none" stroke="black" points="130,-45 0,-45 0,-21 130,-21 130,-45"/>
+<text text-anchor="middle" x="65" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_Xg</text>
 </g>
 <!-- interface~compute_xg -->
 <g id="proc~~cmp_xg~~CallsGraph_node2" class="node">
 <title>interface~compute_xg</title>
 <g id="a_proc~~cmp_xg~~CallsGraph_node2"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
-<polygon fill="#a7506f" stroke="#a7506f" points="291.5,-66 212.5,-66 212.5,-42 291.5,-42 291.5,-66"/>
-<text text-anchor="middle" x="252" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="276.5,-66 197.5,-66 197.5,-42 276.5,-42 276.5,-66"/>
+<text text-anchor="middle" x="237" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_xg&#45;&gt;interface~compute_xg -->
 <g id="proc~~cmp_xg~~CallsGraph_edge1" class="edge">
 <title>proc~cmp_xg&#45;&gt;interface~compute_xg</title>
-<path fill="none" stroke="#ff0000" d="M140.08,-41.06C160.84,-43.48 183.16,-46.09 202.31,-48.32"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="201.96,-51.8 212.3,-49.48 202.77,-44.85 201.96,-51.8"/>
+<path fill="none" stroke="#ff0000" d="M130.27,-40.94C149.13,-43.27 169.45,-45.78 187.18,-47.97"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="186.94,-51.47 197.29,-49.22 187.8,-44.52 186.94,-51.47"/>
 </g>
 <!-- proc~is_rational -->
 <g id="proc~~cmp_xg~~CallsGraph_node3" class="node">
 <title>proc~is_rational</title>
-<g id="a_proc~~cmp_xg~~CallsGraph_node3"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="328,-24 176,-24 176,0 328,0 328,-24"/>
-<text text-anchor="middle" x="252" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
+<g id="a_proc~~cmp_xg~~CallsGraph_node3"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="308,-24 166,-24 166,0 308,0 308,-24"/>
+<text text-anchor="middle" x="237" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_xg&#45;&gt;proc~is_rational -->
 <g id="proc~~cmp_xg~~CallsGraph_edge2" class="edge">
 <title>proc~cmp_xg&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ff0000" d="M140.08,-24.94C148.49,-23.96 157.15,-22.95 165.76,-21.94"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="166.29,-25.41 175.82,-20.77 165.48,-18.45 166.29,-25.41"/>
+<path fill="none" stroke="#ff0000" d="M130.27,-25.06C138.65,-24.03 147.32,-22.96 155.92,-21.89"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="156.46,-25.35 165.96,-20.65 155.6,-18.4 156.46,-25.35"/>
 </g>
 </g>
 </svg>
@@ -343,46 +343,46 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_xg~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_xgCalledByGraph" width="499pt" height="32pt"
- viewBox="0.00 0.00 499.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="proccmp_xgCalledByGraph" width="479pt" height="32pt"
+ viewBox="0.00 0.00 479.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~cmp_xg~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~cmp_xg~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 495,-28 495,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 475,-28 475,4 -4,4"/>
 <!-- proc~cmp_xg -->
 <g id="proc~~cmp_xg~~CalledByGraph_node1" class="node">
 <title>proc~cmp_xg</title>
-<polygon fill="none" stroke="black" points="491,-24 351,-24 351,0 491,0 491,-24"/>
-<text text-anchor="middle" x="421" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_Xg</text>
+<polygon fill="none" stroke="black" points="471,-24 341,-24 341,0 471,0 471,-24"/>
+<text text-anchor="middle" x="406" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_Xg</text>
 </g>
 <!-- proc~nearest_point2 -->
 <g id="proc~~cmp_xg~~CalledByGraph_node2" class="node">
 <title>proc~nearest_point2</title>
-<g id="a_proc~~cmp_xg~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_volume%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="315,-24 139,-24 139,0 315,0 315,-24"/>
-<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
+<g id="a_proc~~cmp_xg~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_curve%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="305,-24 139,-24 139,0 305,0 305,-24"/>
+<text text-anchor="middle" x="222" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2&#45;&gt;proc~cmp_xg -->
 <g id="proc~~cmp_xg~~CalledByGraph_edge1" class="edge">
 <title>proc~nearest_point2&#45;&gt;proc~cmp_xg</title>
-<path fill="none" stroke="#ff0000" d="M315.01,-12C323.55,-12 332.18,-12 340.63,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="340.84,-15.5 350.84,-12 340.84,-8.5 340.84,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M305.21,-12C313.72,-12 322.33,-12 330.74,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="330.88,-15.5 340.88,-12 330.88,-8.5 330.88,-15.5"/>
 </g>
-<!-- program~nearest_point_3d -->
+<!-- program~nearest_point_1d -->
 <g id="proc~~cmp_xg~~CalledByGraph_node3" class="node">
-<title>program~nearest_point_3d</title>
-<g id="a_proc~~cmp_xg~~CalledByGraph_node3"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<title>program~nearest_point_1d</title>
+<g id="a_proc~~cmp_xg~~CalledByGraph_node3"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-24 0,-24 0,0 103,0 103,-24"/>
-<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
+<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
+<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2 -->
 <g id="proc~~cmp_xg~~CalledByGraph_edge2" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
-<path fill="none" stroke="#ff0000" d="M103.15,-12C111.2,-12 119.76,-12 128.46,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="128.73,-15.5 138.73,-12 128.73,-8.5 128.73,-15.5"/>
+<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2</title>
+<path fill="none" stroke="#ff0000" d="M103.06,-12C111.3,-12 120.05,-12 128.92,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="128.97,-15.5 138.97,-12 128.97,-8.5 128.97,-15.5"/>
 </g>
 </g>
 </svg>
@@ -498,7 +498,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_xg~2.html b/proc/cmp_xg~2.html
index 7b4e65de2..ca6273811 100644
--- a/proc/cmp_xg~2.html
+++ b/proc/cmp_xg~2.html
@@ -83,15 +83,15 @@ <h1>cmp_Xg
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_Xg</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function cmp_Xg(this, Xt) result(Xg)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~74"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~67"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~31"></span>
+              <span class="anchor" id="variable-xt~30"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -191,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~14"></span>
+          <span class="anchor" id="variable-xg~15"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -217,7 +217,7 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~cmp_xg~2~~CallsGraph_node1" class="node">
 <title>proc~cmp_xg~2</title>
 <polygon fill="none" stroke="black" points="140,-45 0,-45 0,-21 140,-21 140,-45"/>
-<text text-anchor="middle" x="70" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_Xg</text>
+<text text-anchor="middle" x="70" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_Xg</text>
 </g>
 <!-- interface~compute_xg~2 -->
 <g id="proc~~cmp_xg~2~~CallsGraph_node2" class="node">
@@ -237,9 +237,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~is_rational~2 -->
 <g id="proc~~cmp_xg~2~~CallsGraph_node3" class="node">
 <title>proc~is_rational~2</title>
-<g id="a_proc~~cmp_xg~2~~CallsGraph_node3"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<g id="a_proc~~cmp_xg~2~~CallsGraph_node3"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="328,-24 176,-24 176,0 328,0 328,-24"/>
-<text text-anchor="middle" x="252" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
+<text text-anchor="middle" x="252" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
@@ -352,14 +352,14 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~cmp_xg~2~~CalledByGraph_node1" class="node">
 <title>proc~cmp_xg~2</title>
 <polygon fill="none" stroke="black" points="491,-24 351,-24 351,0 491,0 491,-24"/>
-<text text-anchor="middle" x="421" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_Xg</text>
+<text text-anchor="middle" x="421" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%cmp_Xg</text>
 </g>
 <!-- proc~nearest_point2~2 -->
 <g id="proc~~cmp_xg~2~~CalledByGraph_node2" class="node">
 <title>proc~nearest_point2~2</title>
-<g id="a_proc~~cmp_xg~2~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_surface%nearest_point2">
+<g id="a_proc~~cmp_xg~2~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_volume%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="315,-24 139,-24 139,0 315,0 315,-24"/>
-<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
+<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
 </a>
 </g>
 </g>
@@ -369,18 +369,18 @@ <h3 class="card-title">Called by</h3>
 <path fill="none" stroke="#ff0000" d="M315.01,-12C323.55,-12 332.18,-12 340.63,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="340.84,-15.5 350.84,-12 340.84,-8.5 340.84,-15.5"/>
 </g>
-<!-- program~nearest_point_2d -->
+<!-- program~nearest_point_3d -->
 <g id="proc~~cmp_xg~2~~CalledByGraph_node3" class="node">
-<title>program~nearest_point_2d</title>
-<g id="a_proc~~cmp_xg~2~~CalledByGraph_node3"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
+<title>program~nearest_point_3d</title>
+<g id="a_proc~~cmp_xg~2~~CalledByGraph_node3"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-24 0,-24 0,0 103,0 103,-24"/>
-<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
 <g id="proc~~cmp_xg~2~~CalledByGraph_edge2" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
 <path fill="none" stroke="#ff0000" d="M103.15,-12C111.2,-12 119.76,-12 128.46,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="128.73,-15.5 138.73,-12 128.73,-8.5 128.73,-15.5"/>
 </g>
@@ -498,7 +498,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/cmp_xg~3.html b/proc/cmp_xg~3.html
index ddd2d12cf..67731b506 100644
--- a/proc/cmp_xg~3.html
+++ b/proc/cmp_xg~3.html
@@ -83,15 +83,15 @@ <h1>cmp_Xg
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">cmp_Xg</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function cmp_Xg(this, Xt) result(Xg)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~138"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~135"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -176,12 +176,12 @@ <h3>Arguments</h3>
               <span class="anchor" id="variable-xt~64"></span>
               real(kind=rk),
             </td>
-<td>intent(in)</td>
+<td>intent(in),</td>
               <td></td>            <td>
-              
+              contiguous
             </td>
             <td>::</td>
-            <td><strong>Xt</strong></td>
+            <td><strong>Xt</strong>(:)</td>
             <td>
                 
             </td>
@@ -191,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~27"></span>
+          <span class="anchor" id="variable-xg~26"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -208,46 +208,46 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_xg~3~~CallsGraph Pages: 1 -->
-<svg id="proccmp_xg3CallsGraph" width="316pt" height="74pt"
- viewBox="0.00 0.00 316.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="proccmp_xg3CallsGraph" width="336pt" height="74pt"
+ viewBox="0.00 0.00 336.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~cmp_xg~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~cmp_xg~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 312,-70 312,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 332,-70 332,4 -4,4"/>
 <!-- proc~cmp_xg~3 -->
 <g id="proc~~cmp_xg~3~~CallsGraph_node1" class="node">
 <title>proc~cmp_xg~3</title>
-<polygon fill="none" stroke="black" points="130,-45 0,-45 0,-21 130,-21 130,-45"/>
-<text text-anchor="middle" x="65" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_Xg</text>
+<polygon fill="none" stroke="black" points="140,-45 0,-45 0,-21 140,-21 140,-45"/>
+<text text-anchor="middle" x="70" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_Xg</text>
 </g>
 <!-- interface~compute_xg~3 -->
 <g id="proc~~cmp_xg~3~~CallsGraph_node2" class="node">
 <title>interface~compute_xg~3</title>
 <g id="a_proc~~cmp_xg~3~~CallsGraph_node2"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
-<polygon fill="#a7506f" stroke="#a7506f" points="276.5,-66 197.5,-66 197.5,-42 276.5,-42 276.5,-66"/>
-<text text-anchor="middle" x="237" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="291.5,-66 212.5,-66 212.5,-42 291.5,-42 291.5,-66"/>
+<text text-anchor="middle" x="252" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_xg~3&#45;&gt;interface~compute_xg~3 -->
 <g id="proc~~cmp_xg~3~~CallsGraph_edge1" class="edge">
 <title>proc~cmp_xg~3&#45;&gt;interface~compute_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M130.27,-40.94C149.13,-43.27 169.45,-45.78 187.18,-47.97"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="186.94,-51.47 197.29,-49.22 187.8,-44.52 186.94,-51.47"/>
+<path fill="none" stroke="#ff0000" d="M140.08,-41.06C160.84,-43.48 183.16,-46.09 202.31,-48.32"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="201.96,-51.8 212.3,-49.48 202.77,-44.85 201.96,-51.8"/>
 </g>
 <!-- proc~is_rational~3 -->
 <g id="proc~~cmp_xg~3~~CallsGraph_node3" class="node">
 <title>proc~is_rational~3</title>
-<g id="a_proc~~cmp_xg~3~~CallsGraph_node3"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="308,-24 166,-24 166,0 308,0 308,-24"/>
-<text text-anchor="middle" x="237" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
+<g id="a_proc~~cmp_xg~3~~CallsGraph_node3"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="328,-24 176,-24 176,0 328,0 328,-24"/>
+<text text-anchor="middle" x="252" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_xg~3&#45;&gt;proc~is_rational~3 -->
 <g id="proc~~cmp_xg~3~~CallsGraph_edge2" class="edge">
 <title>proc~cmp_xg~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M130.27,-25.06C138.65,-24.03 147.32,-22.96 155.92,-21.89"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="156.46,-25.35 165.96,-20.65 155.6,-18.4 156.46,-25.35"/>
+<path fill="none" stroke="#ff0000" d="M140.08,-24.94C148.49,-23.96 157.15,-22.95 165.76,-21.94"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="166.29,-25.41 175.82,-20.77 165.48,-18.45 166.29,-25.41"/>
 </g>
 </g>
 </svg>
@@ -343,46 +343,46 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~cmp_xg~3~~CalledByGraph Pages: 1 -->
-<svg id="proccmp_xg3CalledByGraph" width="479pt" height="32pt"
- viewBox="0.00 0.00 479.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="proccmp_xg3CalledByGraph" width="499pt" height="32pt"
+ viewBox="0.00 0.00 499.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~cmp_xg~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~cmp_xg~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 475,-28 475,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 495,-28 495,4 -4,4"/>
 <!-- proc~cmp_xg~3 -->
 <g id="proc~~cmp_xg~3~~CalledByGraph_node1" class="node">
 <title>proc~cmp_xg~3</title>
-<polygon fill="none" stroke="black" points="471,-24 341,-24 341,0 471,0 471,-24"/>
-<text text-anchor="middle" x="406" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%cmp_Xg</text>
+<polygon fill="none" stroke="black" points="491,-24 351,-24 351,0 491,0 491,-24"/>
+<text text-anchor="middle" x="421" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%cmp_Xg</text>
 </g>
 <!-- proc~nearest_point2~3 -->
 <g id="proc~~cmp_xg~3~~CalledByGraph_node2" class="node">
 <title>proc~nearest_point2~3</title>
-<g id="a_proc~~cmp_xg~3~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_curve%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="305,-24 139,-24 139,0 305,0 305,-24"/>
-<text text-anchor="middle" x="222" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
+<g id="a_proc~~cmp_xg~3~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_surface%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="315,-24 139,-24 139,0 315,0 315,-24"/>
+<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;proc~cmp_xg~3 -->
 <g id="proc~~cmp_xg~3~~CalledByGraph_edge1" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;proc~cmp_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M305.21,-12C313.72,-12 322.33,-12 330.74,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="330.88,-15.5 340.88,-12 330.88,-8.5 330.88,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M315.01,-12C323.55,-12 332.18,-12 340.63,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="340.84,-15.5 350.84,-12 340.84,-8.5 340.84,-15.5"/>
 </g>
-<!-- program~nearest_point_1d -->
+<!-- program~nearest_point_2d -->
 <g id="proc~~cmp_xg~3~~CalledByGraph_node3" class="node">
-<title>program~nearest_point_1d</title>
-<g id="a_proc~~cmp_xg~3~~CalledByGraph_node3"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
+<title>program~nearest_point_2d</title>
+<g id="a_proc~~cmp_xg~3~~CalledByGraph_node3"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-24 0,-24 0,0 103,0 103,-24"/>
-<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2~3 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
 <g id="proc~~cmp_xg~3~~CalledByGraph_edge2" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2~3</title>
-<path fill="none" stroke="#ff0000" d="M103.06,-12C111.3,-12 120.05,-12 128.92,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="128.97,-15.5 138.97,-12 128.97,-8.5 128.97,-15.5"/>
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
+<path fill="none" stroke="#ff0000" d="M103.15,-12C111.2,-12 119.76,-12 128.46,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="128.73,-15.5 138.73,-12 128.73,-8.5 128.73,-15.5"/>
 </g>
 </g>
 </svg>
@@ -498,7 +498,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_d2tgc_bspline_1d_scalar.html b/proc/compute_d2tgc_bspline_1d_scalar.html
index 9bd3ac276..bfcb14e31 100644
--- a/proc/compute_d2tgc_bspline_1d_scalar.html
+++ b/proc/compute_d2tgc_bspline_1d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~84"></span>
+              <span class="anchor" id="variable-xt~23"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~35"></span>
+              <span class="anchor" id="variable-knot~21"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~69"></span>
+              <span class="anchor" id="variable-degree~16"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~74"></span>
+              <span class="anchor" id="variable-nc~16"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc~21"></span>
+              <span class="anchor" id="variable-d2tgc~7"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~39"></span>
+              <span class="anchor" id="variable-dtgc~13"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~66"></span>
+              <span class="anchor" id="variable-tgc~19"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -545,7 +545,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_d2tgc_bspline_1d_vector.html b/proc/compute_d2tgc_bspline_1d_vector.html
index 663372f6a..00ffac524 100644
--- a/proc/compute_d2tgc_bspline_1d_vector.html
+++ b/proc/compute_d2tgc_bspline_1d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~83"></span>
+              <span class="anchor" id="variable-xt~22"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~34"></span>
+              <span class="anchor" id="variable-knot~20"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~68"></span>
+              <span class="anchor" id="variable-degree~15"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~73"></span>
+              <span class="anchor" id="variable-nc~15"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~36"></span>
+              <span class="anchor" id="variable-ng~9"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc~20"></span>
+              <span class="anchor" id="variable-d2tgc~6"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~38"></span>
+              <span class="anchor" id="variable-dtgc~12"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~65"></span>
+              <span class="anchor" id="variable-tgc~18"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -560,7 +560,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_d2tgc_bspline_2d_scalar.html b/proc/compute_d2tgc_bspline_2d_scalar.html
index 614a171f5..cc070aca8 100644
--- a/proc/compute_d2tgc_bspline_2d_scalar.html
+++ b/proc/compute_d2tgc_bspline_2d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~51"></span>
+              <span class="anchor" id="variable-xt~84"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~39"></span>
+              <span class="anchor" id="variable-knot1~40"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~39"></span>
+              <span class="anchor" id="variable-knot2~40"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~39"></span>
+              <span class="anchor" id="variable-degree~69"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~46"></span>
+              <span class="anchor" id="variable-nc~74"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc~14"></span>
+              <span class="anchor" id="variable-d2tgc~21"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~26"></span>
+              <span class="anchor" id="variable-dtgc~39"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~43"></span>
+              <span class="anchor" id="variable-tgc~66"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -575,7 +575,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_d2tgc_bspline_2d_vector.html b/proc/compute_d2tgc_bspline_2d_vector.html
index 2ca667b80..62865a689 100644
--- a/proc/compute_d2tgc_bspline_2d_vector.html
+++ b/proc/compute_d2tgc_bspline_2d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~50"></span>
+              <span class="anchor" id="variable-xt~83"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~38"></span>
+              <span class="anchor" id="variable-knot1~39"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~38"></span>
+              <span class="anchor" id="variable-knot2~39"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~38"></span>
+              <span class="anchor" id="variable-degree~68"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~45"></span>
+              <span class="anchor" id="variable-nc~73"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~22"></span>
+              <span class="anchor" id="variable-ng~35"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc~13"></span>
+              <span class="anchor" id="variable-d2tgc~20"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~25"></span>
+              <span class="anchor" id="variable-dtgc~38"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -407,7 +407,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~42"></span>
+              <span class="anchor" id="variable-tgc~65"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -590,7 +590,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_d2tgc_bspline_3d_scalar.html b/proc/compute_d2tgc_bspline_3d_scalar.html
index 5d179b7cc..2b62930f5 100644
--- a/proc/compute_d2tgc_bspline_3d_scalar.html
+++ b/proc/compute_d2tgc_bspline_3d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~24"></span>
+              <span class="anchor" id="variable-xt~51"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~17"></span>
+              <span class="anchor" id="variable-knot1~19"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~17"></span>
+              <span class="anchor" id="variable-knot2~19"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~17"></span>
+              <span class="anchor" id="variable-knot3~18"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~18"></span>
+              <span class="anchor" id="variable-degree~38"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~19"></span>
+              <span class="anchor" id="variable-nc~39"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc~7"></span>
+              <span class="anchor" id="variable-d2tgc~14"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~13"></span>
+              <span class="anchor" id="variable-dtgc~26"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -407,7 +407,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~20"></span>
+              <span class="anchor" id="variable-tgc~43"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -590,7 +590,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_d2tgc_bspline_3d_vector.html b/proc/compute_d2tgc_bspline_3d_vector.html
index 46a9fc996..5f4f3b9af 100644
--- a/proc/compute_d2tgc_bspline_3d_vector.html
+++ b/proc/compute_d2tgc_bspline_3d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~23"></span>
+              <span class="anchor" id="variable-xt~50"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~16"></span>
+              <span class="anchor" id="variable-knot1~18"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~16"></span>
+              <span class="anchor" id="variable-knot2~18"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~16"></span>
+              <span class="anchor" id="variable-knot3~17"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~17"></span>
+              <span class="anchor" id="variable-degree~37"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~18"></span>
+              <span class="anchor" id="variable-nc~38"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~9"></span>
+              <span class="anchor" id="variable-ng~23"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc~6"></span>
+              <span class="anchor" id="variable-d2tgc~13"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -407,7 +407,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~12"></span>
+              <span class="anchor" id="variable-dtgc~25"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -422,7 +422,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~19"></span>
+              <span class="anchor" id="variable-tgc~42"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -605,7 +605,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_d2tgc_nurbs_1d_scalar.html b/proc/compute_d2tgc_nurbs_1d_scalar.html
index f99a90c7f..0fa10270b 100644
--- a/proc/compute_d2tgc_nurbs_1d_scalar.html
+++ b/proc/compute_d2tgc_nurbs_1d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~82"></span>
+              <span class="anchor" id="variable-xt~21"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~33"></span>
+              <span class="anchor" id="variable-knot~19"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~67"></span>
+              <span class="anchor" id="variable-degree~14"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~72"></span>
+              <span class="anchor" id="variable-nc~14"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~64"></span>
+              <span class="anchor" id="variable-wc~23"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc~19"></span>
+              <span class="anchor" id="variable-d2tgc~5"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~37"></span>
+              <span class="anchor" id="variable-dtgc~11"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~64"></span>
+              <span class="anchor" id="variable-tgc~17"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -560,7 +560,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_d2tgc_nurbs_1d_vector.html b/proc/compute_d2tgc_nurbs_1d_vector.html
index 4239b0c15..1a375280d 100644
--- a/proc/compute_d2tgc_nurbs_1d_vector.html
+++ b/proc/compute_d2tgc_nurbs_1d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~81"></span>
+              <span class="anchor" id="variable-xt~20"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~32"></span>
+              <span class="anchor" id="variable-knot~18"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~66"></span>
+              <span class="anchor" id="variable-degree~13"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~71"></span>
+              <span class="anchor" id="variable-nc~13"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~35"></span>
+              <span class="anchor" id="variable-ng~8"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~63"></span>
+              <span class="anchor" id="variable-wc~22"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc~18"></span>
+              <span class="anchor" id="variable-d2tgc~4"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~36"></span>
+              <span class="anchor" id="variable-dtgc~10"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -407,7 +407,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~63"></span>
+              <span class="anchor" id="variable-tgc~16"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -575,7 +575,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_d2tgc_nurbs_2d_scalar.html b/proc/compute_d2tgc_nurbs_2d_scalar.html
index d011ee880..788691fd4 100644
--- a/proc/compute_d2tgc_nurbs_2d_scalar.html
+++ b/proc/compute_d2tgc_nurbs_2d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~49"></span>
+              <span class="anchor" id="variable-xt~82"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~37"></span>
+              <span class="anchor" id="variable-knot1~38"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~37"></span>
+              <span class="anchor" id="variable-knot2~38"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~37"></span>
+              <span class="anchor" id="variable-degree~67"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~44"></span>
+              <span class="anchor" id="variable-nc~72"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~42"></span>
+              <span class="anchor" id="variable-wc~62"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc~12"></span>
+              <span class="anchor" id="variable-d2tgc~19"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~24"></span>
+              <span class="anchor" id="variable-dtgc~37"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -407,7 +407,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~41"></span>
+              <span class="anchor" id="variable-tgc~64"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -590,7 +590,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_d2tgc_nurbs_2d_vector.html b/proc/compute_d2tgc_nurbs_2d_vector.html
index 6363c7453..ba067f87f 100644
--- a/proc/compute_d2tgc_nurbs_2d_vector.html
+++ b/proc/compute_d2tgc_nurbs_2d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~48"></span>
+              <span class="anchor" id="variable-xt~81"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~36"></span>
+              <span class="anchor" id="variable-knot1~37"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~36"></span>
+              <span class="anchor" id="variable-knot2~37"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~36"></span>
+              <span class="anchor" id="variable-degree~66"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~43"></span>
+              <span class="anchor" id="variable-nc~71"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~21"></span>
+              <span class="anchor" id="variable-ng~34"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~41"></span>
+              <span class="anchor" id="variable-wc~61"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc~11"></span>
+              <span class="anchor" id="variable-d2tgc~18"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -407,7 +407,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~23"></span>
+              <span class="anchor" id="variable-dtgc~36"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -422,7 +422,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~40"></span>
+              <span class="anchor" id="variable-tgc~63"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -605,7 +605,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_d2tgc_nurbs_3d_scalar.html b/proc/compute_d2tgc_nurbs_3d_scalar.html
index a82b93edb..5a96cb43e 100644
--- a/proc/compute_d2tgc_nurbs_3d_scalar.html
+++ b/proc/compute_d2tgc_nurbs_3d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~22"></span>
+              <span class="anchor" id="variable-xt~49"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~15"></span>
+              <span class="anchor" id="variable-knot1~17"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~15"></span>
+              <span class="anchor" id="variable-knot2~17"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~15"></span>
+              <span class="anchor" id="variable-knot3~16"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~16"></span>
+              <span class="anchor" id="variable-degree~36"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~17"></span>
+              <span class="anchor" id="variable-nc~37"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~18"></span>
+              <span class="anchor" id="variable-wc~42"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc~5"></span>
+              <span class="anchor" id="variable-d2tgc~12"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -407,7 +407,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~11"></span>
+              <span class="anchor" id="variable-dtgc~24"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -422,7 +422,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~18"></span>
+              <span class="anchor" id="variable-tgc~41"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -605,7 +605,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_d2tgc_nurbs_3d_vector.html b/proc/compute_d2tgc_nurbs_3d_vector.html
index 9a98cba58..da5acf358 100644
--- a/proc/compute_d2tgc_nurbs_3d_vector.html
+++ b/proc/compute_d2tgc_nurbs_3d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~21"></span>
+              <span class="anchor" id="variable-xt~48"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~14"></span>
+              <span class="anchor" id="variable-knot1~16"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~14"></span>
+              <span class="anchor" id="variable-knot2~16"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~14"></span>
+              <span class="anchor" id="variable-knot3~15"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~15"></span>
+              <span class="anchor" id="variable-degree~35"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~16"></span>
+              <span class="anchor" id="variable-nc~36"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~8"></span>
+              <span class="anchor" id="variable-ng~22"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~17"></span>
+              <span class="anchor" id="variable-wc~41"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -407,7 +407,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-d2tgc~4"></span>
+              <span class="anchor" id="variable-d2tgc~11"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -422,7 +422,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~10"></span>
+              <span class="anchor" id="variable-dtgc~23"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -437,7 +437,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~17"></span>
+              <span class="anchor" id="variable-tgc~40"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -620,7 +620,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_dtgc_bspline_1d_scalar.html b/proc/compute_dtgc_bspline_1d_scalar.html
index 28e955489..be8c3721a 100644
--- a/proc/compute_dtgc_bspline_1d_scalar.html
+++ b/proc/compute_dtgc_bspline_1d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~80"></span>
+              <span class="anchor" id="variable-xt~19"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~31"></span>
+              <span class="anchor" id="variable-knot~17"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~65"></span>
+              <span class="anchor" id="variable-degree~12"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~70"></span>
+              <span class="anchor" id="variable-nc~12"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~35"></span>
+              <span class="anchor" id="variable-dtgc~9"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~62"></span>
+              <span class="anchor" id="variable-tgc~15"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~15"></span>
+              <span class="anchor" id="variable-elem~4"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -545,7 +545,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_dtgc_bspline_1d_vector.html b/proc/compute_dtgc_bspline_1d_vector.html
index 4f180009e..b3f3cace4 100644
--- a/proc/compute_dtgc_bspline_1d_vector.html
+++ b/proc/compute_dtgc_bspline_1d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~79"></span>
+              <span class="anchor" id="variable-xt~18"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~30"></span>
+              <span class="anchor" id="variable-knot~16"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~64"></span>
+              <span class="anchor" id="variable-degree~11"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~69"></span>
+              <span class="anchor" id="variable-nc~11"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~34"></span>
+              <span class="anchor" id="variable-ng~7"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~34"></span>
+              <span class="anchor" id="variable-dtgc~8"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~61"></span>
+              <span class="anchor" id="variable-tgc~14"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -545,7 +545,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_dtgc_bspline_2d_scalar.html b/proc/compute_dtgc_bspline_2d_scalar.html
index 5abb851ae..9896c85c3 100644
--- a/proc/compute_dtgc_bspline_2d_scalar.html
+++ b/proc/compute_dtgc_bspline_2d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~47"></span>
+              <span class="anchor" id="variable-xt~80"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~35"></span>
+              <span class="anchor" id="variable-knot1~36"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~35"></span>
+              <span class="anchor" id="variable-knot2~36"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~35"></span>
+              <span class="anchor" id="variable-degree~65"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~42"></span>
+              <span class="anchor" id="variable-nc~70"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~22"></span>
+              <span class="anchor" id="variable-dtgc~35"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~39"></span>
+              <span class="anchor" id="variable-tgc~62"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~12"></span>
+              <span class="anchor" id="variable-elem~15"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -575,7 +575,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_dtgc_bspline_2d_vector.html b/proc/compute_dtgc_bspline_2d_vector.html
index 188b5e485..6b48143f3 100644
--- a/proc/compute_dtgc_bspline_2d_vector.html
+++ b/proc/compute_dtgc_bspline_2d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~46"></span>
+              <span class="anchor" id="variable-xt~79"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~34"></span>
+              <span class="anchor" id="variable-knot1~35"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~34"></span>
+              <span class="anchor" id="variable-knot2~35"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~34"></span>
+              <span class="anchor" id="variable-degree~64"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~41"></span>
+              <span class="anchor" id="variable-nc~69"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~20"></span>
+              <span class="anchor" id="variable-ng~33"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~21"></span>
+              <span class="anchor" id="variable-dtgc~34"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~38"></span>
+              <span class="anchor" id="variable-tgc~61"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -575,7 +575,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_dtgc_bspline_3d_scalar.html b/proc/compute_dtgc_bspline_3d_scalar.html
index 0c3ca7626..01821726d 100644
--- a/proc/compute_dtgc_bspline_3d_scalar.html
+++ b/proc/compute_dtgc_bspline_3d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~20"></span>
+              <span class="anchor" id="variable-xt~47"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~13"></span>
+              <span class="anchor" id="variable-knot1~15"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~13"></span>
+              <span class="anchor" id="variable-knot2~15"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~13"></span>
+              <span class="anchor" id="variable-knot3~14"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~14"></span>
+              <span class="anchor" id="variable-degree~34"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~15"></span>
+              <span class="anchor" id="variable-nc~35"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~9"></span>
+              <span class="anchor" id="variable-dtgc~22"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~16"></span>
+              <span class="anchor" id="variable-tgc~39"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -407,7 +407,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~6"></span>
+              <span class="anchor" id="variable-elem~10"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -590,7 +590,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_dtgc_bspline_3d_vector.html b/proc/compute_dtgc_bspline_3d_vector.html
index c932f4152..f5c1aec79 100644
--- a/proc/compute_dtgc_bspline_3d_vector.html
+++ b/proc/compute_dtgc_bspline_3d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~19"></span>
+              <span class="anchor" id="variable-xt~46"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~12"></span>
+              <span class="anchor" id="variable-knot1~14"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~12"></span>
+              <span class="anchor" id="variable-knot2~14"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~12"></span>
+              <span class="anchor" id="variable-knot3~13"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~13"></span>
+              <span class="anchor" id="variable-degree~33"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~14"></span>
+              <span class="anchor" id="variable-nc~34"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~7"></span>
+              <span class="anchor" id="variable-ng~21"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~8"></span>
+              <span class="anchor" id="variable-dtgc~21"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -407,7 +407,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~15"></span>
+              <span class="anchor" id="variable-tgc~38"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -590,7 +590,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_dtgc_nurbs_1d_scalar.html b/proc/compute_dtgc_nurbs_1d_scalar.html
index e63721fda..85d912684 100644
--- a/proc/compute_dtgc_nurbs_1d_scalar.html
+++ b/proc/compute_dtgc_nurbs_1d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~78"></span>
+              <span class="anchor" id="variable-xt~17"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~29"></span>
+              <span class="anchor" id="variable-knot~15"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~63"></span>
+              <span class="anchor" id="variable-degree~10"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~68"></span>
+              <span class="anchor" id="variable-nc~10"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~62"></span>
+              <span class="anchor" id="variable-wc~21"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~33"></span>
+              <span class="anchor" id="variable-dtgc~7"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~60"></span>
+              <span class="anchor" id="variable-tgc~13"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~14"></span>
+              <span class="anchor" id="variable-elem~3"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -560,7 +560,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_dtgc_nurbs_1d_vector.html b/proc/compute_dtgc_nurbs_1d_vector.html
index 8db76d732..55cf40a1d 100644
--- a/proc/compute_dtgc_nurbs_1d_vector.html
+++ b/proc/compute_dtgc_nurbs_1d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~77"></span>
+              <span class="anchor" id="variable-xt~16"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~28"></span>
+              <span class="anchor" id="variable-knot~14"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~62"></span>
+              <span class="anchor" id="variable-degree~9"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~67"></span>
+              <span class="anchor" id="variable-nc~9"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~33"></span>
+              <span class="anchor" id="variable-ng~6"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~61"></span>
+              <span class="anchor" id="variable-wc~20"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~32"></span>
+              <span class="anchor" id="variable-dtgc~6"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~59"></span>
+              <span class="anchor" id="variable-tgc~12"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -560,7 +560,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_dtgc_nurbs_2d_scalar.html b/proc/compute_dtgc_nurbs_2d_scalar.html
index ed98162ca..c4cfb78a9 100644
--- a/proc/compute_dtgc_nurbs_2d_scalar.html
+++ b/proc/compute_dtgc_nurbs_2d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~45"></span>
+              <span class="anchor" id="variable-xt~78"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~33"></span>
+              <span class="anchor" id="variable-knot1~34"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~33"></span>
+              <span class="anchor" id="variable-knot2~34"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~33"></span>
+              <span class="anchor" id="variable-degree~63"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~40"></span>
+              <span class="anchor" id="variable-nc~68"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~40"></span>
+              <span class="anchor" id="variable-wc~60"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~20"></span>
+              <span class="anchor" id="variable-dtgc~33"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~37"></span>
+              <span class="anchor" id="variable-tgc~60"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -407,7 +407,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~11"></span>
+              <span class="anchor" id="variable-elem~14"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -590,7 +590,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_dtgc_nurbs_2d_vector.html b/proc/compute_dtgc_nurbs_2d_vector.html
index 7bd6f2987..37efd0d25 100644
--- a/proc/compute_dtgc_nurbs_2d_vector.html
+++ b/proc/compute_dtgc_nurbs_2d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~44"></span>
+              <span class="anchor" id="variable-xt~77"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~32"></span>
+              <span class="anchor" id="variable-knot1~33"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~32"></span>
+              <span class="anchor" id="variable-knot2~33"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~32"></span>
+              <span class="anchor" id="variable-degree~62"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~39"></span>
+              <span class="anchor" id="variable-nc~67"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~19"></span>
+              <span class="anchor" id="variable-ng~32"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~39"></span>
+              <span class="anchor" id="variable-wc~59"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~19"></span>
+              <span class="anchor" id="variable-dtgc~32"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -407,7 +407,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~36"></span>
+              <span class="anchor" id="variable-tgc~59"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -590,7 +590,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_dtgc_nurbs_3d_scalar.html b/proc/compute_dtgc_nurbs_3d_scalar.html
index 07b0e4287..d9847bccb 100644
--- a/proc/compute_dtgc_nurbs_3d_scalar.html
+++ b/proc/compute_dtgc_nurbs_3d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~18"></span>
+              <span class="anchor" id="variable-xt~45"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~11"></span>
+              <span class="anchor" id="variable-knot1~13"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~11"></span>
+              <span class="anchor" id="variable-knot2~13"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~11"></span>
+              <span class="anchor" id="variable-knot3~12"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~12"></span>
+              <span class="anchor" id="variable-degree~32"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~13"></span>
+              <span class="anchor" id="variable-nc~33"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~16"></span>
+              <span class="anchor" id="variable-wc~40"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~7"></span>
+              <span class="anchor" id="variable-dtgc~20"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -407,7 +407,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~14"></span>
+              <span class="anchor" id="variable-tgc~37"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -422,7 +422,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~5"></span>
+              <span class="anchor" id="variable-elem~9"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -605,7 +605,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_dtgc_nurbs_3d_vector.html b/proc/compute_dtgc_nurbs_3d_vector.html
index b801ca305..7bdba3e1d 100644
--- a/proc/compute_dtgc_nurbs_3d_vector.html
+++ b/proc/compute_dtgc_nurbs_3d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~17"></span>
+              <span class="anchor" id="variable-xt~44"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~10"></span>
+              <span class="anchor" id="variable-knot1~12"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~10"></span>
+              <span class="anchor" id="variable-knot2~12"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~10"></span>
+              <span class="anchor" id="variable-knot3~11"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~11"></span>
+              <span class="anchor" id="variable-degree~31"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~12"></span>
+              <span class="anchor" id="variable-nc~32"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~6"></span>
+              <span class="anchor" id="variable-ng~20"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~15"></span>
+              <span class="anchor" id="variable-wc~39"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -407,7 +407,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dtgc~6"></span>
+              <span class="anchor" id="variable-dtgc~19"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -422,7 +422,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~13"></span>
+              <span class="anchor" id="variable-tgc~36"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -605,7 +605,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_knot_vector.html b/proc/compute_knot_vector.html
index ac748f93b..f900d5b4a 100644
--- a/proc/compute_knot_vector.html
+++ b/proc/compute_knot_vector.html
@@ -156,7 +156,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth_dir"></span>
+              <span class="anchor" id="variable-xth_dir~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -171,7 +171,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~48"></span>
+              <span class="anchor" id="variable-degree~47"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -186,7 +186,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-continuity"></span>
+              <span class="anchor" id="variable-continuity~2"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -204,7 +204,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-knot~12"></span>
+          <span class="anchor" id="variable-knot~33"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -349,1088 +349,1088 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~compute_knot_vector -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node1" class="node">
 <title>proc~compute_knot_vector</title>
-<polygon fill="none" stroke="black" points="992,-835 865,-835 865,-811 992,-811 992,-835"/>
-<text text-anchor="middle" x="928.5" y="-820.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_knot_vector</text>
+<polygon fill="none" stroke="black" points="992,-894 865,-894 865,-870 992,-870 992,-894"/>
+<text text-anchor="middle" x="928.5" y="-879.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_knot_vector</text>
 </g>
 <!-- proc~set2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node2" class="node">
 <title>proc~set2</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node2"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="829,-1155 709,-1155 709,-1131 829,-1131 829,-1155"/>
-<text text-anchor="middle" x="769" y="-1140.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node2"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="824,-1205 714,-1205 714,-1181 824,-1181 824,-1205"/>
+<text text-anchor="middle" x="769" y="-1190.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
 <!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge1" class="edge">
 <title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#ff0000" d="M775.98,-1130.85C799.61,-1082.83 886.66,-905.97 916.99,-844.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="920.24,-845.68 921.51,-835.17 913.96,-842.59 920.24,-845.68"/>
+<path fill="none" stroke="#ff0000" d="M776.17,-1180.81C800.04,-1133.68 886.44,-963.08 916.83,-903.06"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="919.97,-904.61 921.37,-894.11 913.73,-901.45 919.97,-904.61"/>
 </g>
 <!-- proc~set2~2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node3" class="node">
 <title>proc~set2~2</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node3"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="829,-835 709,-835 709,-811 829,-811 829,-835"/>
-<text text-anchor="middle" x="769" y="-820.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node3"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="829,-894 709,-894 709,-870 829,-870 829,-894"/>
+<text text-anchor="middle" x="769" y="-879.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
 <!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge2" class="edge">
 <title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#ff0000" d="M829.1,-823C837.5,-823 846.23,-823 854.86,-823"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="854.91,-826.5 864.91,-823 854.91,-819.5 854.91,-826.5"/>
+<path fill="none" stroke="#ff0000" d="M829.1,-882C837.5,-882 846.23,-882 854.86,-882"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="854.91,-885.5 864.91,-882 854.91,-878.5 854.91,-885.5"/>
 </g>
 <!-- proc~set2~3 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node4" class="node">
 <title>proc~set2~3</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node4"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="824,-542 714,-542 714,-518 824,-518 824,-542"/>
-<text text-anchor="middle" x="769" y="-527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node4"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="829,-585 709,-585 709,-561 829,-561 829,-585"/>
+<text text-anchor="middle" x="769" y="-570.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
 <!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge3" class="edge">
 <title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#ff0000" d="M776.57,-542.22C800.78,-587.27 885.26,-744.43 916.11,-801.81"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="913.09,-803.58 920.9,-810.73 919.25,-800.27 913.09,-803.58"/>
+<path fill="none" stroke="#ff0000" d="M776.17,-585.11C799.99,-631.84 886.08,-800.74 916.64,-860.7"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="913.71,-862.65 921.37,-869.97 919.95,-859.47 913.71,-862.65"/>
 </g>
 <!-- none~set -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node5" class="node">
 <title>none~set</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node5"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="673,-1411 560,-1411 560,-1387 673,-1387 673,-1411"/>
-<text text-anchor="middle" x="616.5" y="-1396.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node5"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="668,-1453 565,-1453 565,-1429 668,-1429 668,-1453"/>
+<text text-anchor="middle" x="616.5" y="-1438.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge4" class="edge">
 <title>none~set&#45;&gt;proc~set2</title>
-<path fill="none" stroke="#ff0000" d="M624.56,-1387C648.3,-1346.61 725.49,-1215.31 755.71,-1163.9"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="758.73,-1165.67 760.78,-1155.28 752.7,-1162.12 758.73,-1165.67"/>
+<path fill="none" stroke="#ff0000" d="M624.96,-1428.7C649.09,-1388.94 725.17,-1263.58 755.42,-1213.73"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="758.47,-1215.44 760.67,-1205.08 752.49,-1211.81 758.47,-1215.44"/>
 </g>
 <!-- none~set~2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node6" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node6"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="673,-835 560,-835 560,-811 673,-811 673,-835"/>
-<text text-anchor="middle" x="616.5" y="-820.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node6"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="673,-894 560,-894 560,-870 673,-870 673,-894"/>
+<text text-anchor="middle" x="616.5" y="-879.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge5" class="edge">
 <title>none~set~2&#45;&gt;proc~set2~2</title>
-<path fill="none" stroke="#00ff00" d="M673.11,-823C681.48,-823 690.19,-823 698.8,-823"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="698.83,-826.5 708.83,-823 698.83,-819.5 698.83,-826.5"/>
+<path fill="none" stroke="#00ff00" d="M673.11,-882C681.48,-882 690.19,-882 698.8,-882"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="698.83,-885.5 708.83,-882 698.83,-878.5 698.83,-885.5"/>
 </g>
 <!-- none~set~3 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node7" class="node">
 <title>none~set~3</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node7"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="668,-292 565,-292 565,-268 668,-268 668,-292"/>
-<text text-anchor="middle" x="616.5" y="-277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node7"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="673,-318 560,-318 560,-294 673,-294 673,-318"/>
+<text text-anchor="middle" x="616.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge6" class="edge">
 <title>none~set~3&#45;&gt;proc~set2~3</title>
-<path fill="none" stroke="#0000ff" d="M624.76,-292.06C648.64,-331.73 724.99,-458.56 755.36,-509.01"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="752.48,-511.01 760.64,-517.77 758.48,-507.4 752.48,-511.01"/>
+<path fill="none" stroke="#0000ff" d="M624.36,-318.17C647.96,-360.04 726.03,-498.55 756.08,-551.85"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="753.14,-553.77 761.1,-560.76 759.24,-550.33 753.14,-553.77"/>
 </g>
 <!-- proc~ansatz -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node8" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node8"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-1432 367.5,-1432 367.5,-1408 499.5,-1408 499.5,-1432"/>
-<text text-anchor="middle" x="433.5" y="-1417.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node8"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="494.5,-1226 372.5,-1226 372.5,-1202 494.5,-1202 494.5,-1226"/>
+<text text-anchor="middle" x="433.5" y="-1211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;none~set -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge7" class="edge">
 <title>proc~ansatz&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.59,-1412.45C515.96,-1410.55 533.53,-1408.51 549.92,-1406.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="550.42,-1410.07 559.95,-1405.45 549.61,-1403.12 550.42,-1410.07"/>
+<path fill="none" stroke="#ff0000" d="M494.95,-1223.82C505.46,-1227.59 515.68,-1232.8 524,-1240 579.9,-1288.36 603.5,-1377.86 611.74,-1419.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="608.31,-1419.79 613.6,-1428.97 615.18,-1418.49 608.31,-1419.79"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node9" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node9"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-1062 367.5,-1062 367.5,-1038 499.5,-1038 499.5,-1062"/>
-<text text-anchor="middle" x="433.5" y="-1047.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node9"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-894 367.5,-894 367.5,-870 499.5,-870 499.5,-894"/>
+<text text-anchor="middle" x="433.5" y="-879.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~set~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge22" class="edge">
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge20" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M499.5,-1042.34C508.38,-1039.21 516.87,-1034.9 524,-1029 582.37,-980.67 604.79,-887.59 612.25,-845.11"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="615.7,-845.67 613.87,-835.23 608.8,-844.53 615.7,-845.67"/>
+<path fill="none" stroke="#00ff00" d="M499.59,-882C515.96,-882 533.53,-882 549.92,-882"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="549.95,-885.5 559.95,-882 549.95,-878.5 549.95,-885.5"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node10" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node10"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="494.5,-24 372.5,-24 372.5,0 494.5,0 494.5,-24"/>
-<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node10"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-524 367.5,-524 367.5,-500 499.5,-500 499.5,-524"/>
+<text text-anchor="middle" x="433.5" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~set~3 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge36" class="edge">
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge35" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M494.87,-21.22C505.52,-25.04 515.8,-30.42 524,-38 589.35,-98.4 608.35,-210.25 613.61,-257.74"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="610.14,-258.26 614.62,-267.86 617.1,-257.56 610.14,-258.26"/>
+<path fill="none" stroke="#0000ff" d="M499.75,-503.91C508.49,-500.83 516.87,-496.66 524,-491 577.36,-448.64 601.93,-367.16 611.04,-328.03"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="614.48,-328.7 613.21,-318.19 607.64,-327.2 614.48,-328.7"/>
 </g>
 <!-- proc~elevate_degree -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node11" class="node">
 <title>proc~elevate_degree</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node11"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-1268 343.5,-1268 343.5,-1244 523.5,-1244 523.5,-1268"/>
-<text text-anchor="middle" x="433.5" y="-1253.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node11"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="518.5,-1474 348.5,-1474 348.5,-1450 518.5,-1450 518.5,-1474"/>
+<text text-anchor="middle" x="433.5" y="-1459.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree&#45;&gt;none~set -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge8" class="edge">
 <title>proc~elevate_degree&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M495.54,-1268.14C505.54,-1271.67 515.42,-1276.2 524,-1282 560.9,-1306.97 589.67,-1351.53 604.48,-1377.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="601.42,-1379.57 609.29,-1386.67 607.57,-1376.22 601.42,-1379.57"/>
+<path fill="none" stroke="#ff0000" d="M518.64,-1452.24C530.85,-1450.82 543.22,-1449.39 554.84,-1448.04"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="555.31,-1451.51 564.84,-1446.88 554.51,-1444.55 555.31,-1451.51"/>
 </g>
 <!-- proc~elevate_degree~2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node12" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node12"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-898 343.5,-898 343.5,-874 523.5,-874 523.5,-898"/>
-<text text-anchor="middle" x="433.5" y="-883.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node12"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-730 343.5,-730 343.5,-706 523.5,-706 523.5,-730"/>
+<text text-anchor="middle" x="433.5" y="-715.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;none~set~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge23" class="edge">
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge21" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M493.23,-873.99C503.59,-871.38 514.19,-868.37 524,-865 544.37,-858.01 566.32,-848.03 583.62,-839.54"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="585.32,-842.61 592.71,-835.01 582.2,-836.34 585.32,-842.61"/>
+<path fill="none" stroke="#00ff00" d="M497.34,-730.1C506.8,-733.62 516.05,-738.15 524,-744 565.61,-774.6 593.89,-830.23 607.05,-860.68"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="603.84,-862.09 610.93,-869.97 610.3,-859.39 603.84,-862.09"/>
 </g>
 <!-- proc~elevate_degree~3 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node13" class="node">
 <title>proc~elevate_degree~3</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node13"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="518.5,-272 348.5,-272 348.5,-248 518.5,-248 518.5,-272"/>
-<text text-anchor="middle" x="433.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node13"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-360 343.5,-360 343.5,-336 523.5,-336 523.5,-360"/>
+<text text-anchor="middle" x="433.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;none~set~3 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge37" class="edge">
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge36" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M518.64,-269.3C530.85,-270.65 543.22,-272.01 554.84,-273.3"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="554.52,-276.78 564.84,-274.4 555.29,-269.83 554.52,-276.78"/>
+<path fill="none" stroke="#0000ff" d="M486.37,-335.96C507.38,-331.09 531.82,-325.42 553.75,-320.33"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="554.68,-323.71 563.63,-318.04 553.09,-316.89 554.68,-323.71"/>
 </g>
 <!-- proc~insert_knots -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node14" class="node">
 <title>proc~insert_knots</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node14"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514,-1390 353,-1390 353,-1366 514,-1366 514,-1390"/>
-<text text-anchor="middle" x="433.5" y="-1375.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node14"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_curve%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="509,-1348 358,-1348 358,-1324 509,-1324 509,-1348"/>
+<text text-anchor="middle" x="433.5" y="-1333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;none~set -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge9" class="edge">
 <title>proc~insert_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M514.15,-1387.24C526.11,-1388.63 538.32,-1390.05 549.94,-1391.39"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="549.64,-1394.88 559.98,-1392.56 550.45,-1387.93 549.64,-1394.88"/>
+<path fill="none" stroke="#ff0000" d="M502.8,-1348.12C510.16,-1350.56 517.37,-1353.49 524,-1357 554.52,-1373.15 582.66,-1401.96 599.45,-1421.27"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="596.79,-1423.55 605.93,-1428.91 602.13,-1419.02 596.79,-1423.55"/>
 </g>
 <!-- proc~insert_knots~2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node15" class="node">
 <title>proc~insert_knots~2</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node15"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514,-1020 353,-1020 353,-996 514,-996 514,-1020"/>
-<text text-anchor="middle" x="433.5" y="-1005.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node15"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514,-852 353,-852 353,-828 514,-828 514,-852"/>
+<text text-anchor="middle" x="433.5" y="-837.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;none~set~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge24" class="edge">
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge22" class="edge">
 <title>proc~insert_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M508.58,-996C514.06,-993.52 519.29,-990.56 524,-987 572.36,-950.53 598.72,-880.62 609.54,-845.02"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="612.98,-845.72 612.41,-835.14 606.26,-843.77 612.98,-845.72"/>
+<path fill="none" stroke="#00ff00" d="M486.37,-852.04C507.38,-856.91 531.82,-862.58 553.75,-867.67"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="553.09,-871.11 563.63,-869.96 554.68,-864.29 553.09,-871.11"/>
 </g>
 <!-- proc~insert_knots~3 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node16" class="node">
 <title>proc~insert_knots~3</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node16"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_curve%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="509,-146 358,-146 358,-122 509,-122 509,-146"/>
-<text text-anchor="middle" x="433.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node16"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514,-482 353,-482 353,-458 514,-458 514,-482"/>
+<text text-anchor="middle" x="433.5" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;none~set~3 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge38" class="edge">
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge37" class="edge">
 <title>proc~insert_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M506.76,-146.1C512.83,-148.54 518.68,-151.48 524,-155 563.52,-181.16 591.99,-230.54 605.89,-258.77"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="602.74,-260.28 610.2,-267.8 609.06,-257.27 602.74,-260.28"/>
+<path fill="none" stroke="#0000ff" d="M507.9,-457.87C513.6,-455.43 519.05,-452.5 524,-449 567.44,-418.25 595.13,-359.72 607.67,-327.91"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="611.07,-328.82 611.34,-318.23 604.52,-326.33 611.07,-328.82"/>
 </g>
 <!-- proc~modify_wc -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node17" class="node">
 <title>proc~modify_wc</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node17"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-1226 355.5,-1226 355.5,-1202 511.5,-1202 511.5,-1226"/>
-<text text-anchor="middle" x="433.5" y="-1211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node17"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="506.5,-1638 360.5,-1638 360.5,-1614 506.5,-1614 506.5,-1638"/>
+<text text-anchor="middle" x="433.5" y="-1623.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~set -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge10" class="edge">
 <title>proc~modify_wc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M508.58,-1226C514.06,-1228.48 519.29,-1231.44 524,-1235 572.36,-1271.47 598.72,-1341.38 609.54,-1376.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="606.26,-1378.23 612.41,-1386.86 612.98,-1376.28 606.26,-1378.23"/>
+<path fill="none" stroke="#ff0000" d="M506.79,-1614.78C512.93,-1612.16 518.78,-1608.94 524,-1605 572.36,-1568.53 598.72,-1498.62 609.54,-1463.02"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="612.98,-1463.72 612.41,-1453.14 606.26,-1461.77 612.98,-1463.72"/>
 </g>
 <!-- proc~modify_wc~2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node18" class="node">
 <title>proc~modify_wc~2</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node18"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-856 355.5,-856 355.5,-832 511.5,-832 511.5,-856"/>
-<text text-anchor="middle" x="433.5" y="-841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node18"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-688 355.5,-688 355.5,-664 511.5,-664 511.5,-688"/>
+<text text-anchor="middle" x="433.5" y="-673.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~set~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge25" class="edge">
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge23" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M511.52,-835.06C524.23,-833.59 537.29,-832.07 549.69,-830.64"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="550.39,-834.08 559.92,-829.45 549.59,-827.12 550.39,-834.08"/>
+<path fill="none" stroke="#00ff00" d="M509.66,-688.16C514.77,-690.61 519.62,-693.53 524,-697 577.36,-739.36 601.93,-820.84 611.04,-859.97"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="607.64,-860.8 613.21,-869.81 614.48,-859.3 607.64,-860.8"/>
 </g>
 <!-- proc~modify_wc~3 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node19" class="node">
 <title>proc~modify_wc~3</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node19"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="506.5,-436 360.5,-436 360.5,-412 506.5,-412 506.5,-436"/>
-<text text-anchor="middle" x="433.5" y="-421.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node19"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-318 355.5,-318 355.5,-294 511.5,-294 511.5,-318"/>
+<text text-anchor="middle" x="433.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge39" class="edge">
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge38" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M506.73,-411.86C512.81,-409.42 518.66,-406.5 524,-403 563.04,-377.38 591.55,-329.1 605.62,-301.26"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="608.9,-302.52 610.14,-292 602.61,-299.45 608.9,-302.52"/>
+<path fill="none" stroke="#0000ff" d="M511.52,-306C524.23,-306 537.29,-306 549.69,-306"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="549.92,-309.5 559.92,-306 549.92,-302.5 549.92,-309.5"/>
 </g>
 <!-- proc~modify_xc -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node20" class="node">
 <title>proc~modify_xc</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node20"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="510,-1184 357,-1184 357,-1160 510,-1160 510,-1184"/>
-<text text-anchor="middle" x="433.5" y="-1169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node20"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="505,-1596 362,-1596 362,-1572 505,-1572 505,-1596"/>
+<text text-anchor="middle" x="433.5" y="-1581.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~set -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge11" class="edge">
 <title>proc~modify_xc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M510.25,-1184.18C515.17,-1186.63 519.82,-1189.54 524,-1193 582.37,-1241.33 604.79,-1334.41 612.25,-1376.89"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="608.8,-1377.47 613.87,-1386.77 615.7,-1376.33 608.8,-1377.47"/>
+<path fill="none" stroke="#ff0000" d="M505.34,-1572.38C511.92,-1569.84 518.26,-1566.75 524,-1563 562.69,-1537.72 591.16,-1490.19 605.36,-1462.51"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="608.62,-1463.8 609.94,-1453.29 602.35,-1460.69 608.62,-1463.8"/>
 </g>
 <!-- proc~modify_xc~2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node21" class="node">
 <title>proc~modify_xc~2</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node21"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="510,-814 357,-814 357,-790 510,-790 510,-814"/>
-<text text-anchor="middle" x="433.5" y="-799.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node21"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="510,-646 357,-646 357,-622 510,-622 510,-646"/>
+<text text-anchor="middle" x="433.5" y="-631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~set~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge26" class="edge">
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge24" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M510.21,-810.78C523.36,-812.31 536.93,-813.88 549.79,-815.38"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="549.58,-818.88 559.92,-816.55 550.39,-811.92 549.58,-818.88"/>
+<path fill="none" stroke="#00ff00" d="M510.39,-646.02C515.28,-648.5 519.88,-651.47 524,-655 587.46,-709.44 607.42,-814.31 613.26,-859.91"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="609.8,-860.4 614.44,-869.93 616.75,-859.59 609.8,-860.4"/>
 </g>
 <!-- proc~modify_xc~3 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node22" class="node">
 <title>proc~modify_xc~3</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node22"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="505,-394 362,-394 362,-370 505,-370 505,-394"/>
-<text text-anchor="middle" x="433.5" y="-379.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node22"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="510,-276 357,-276 357,-252 510,-252 510,-276"/>
+<text text-anchor="middle" x="433.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge40" class="edge">
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge39" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M502.27,-369.91C509.8,-367.46 517.2,-364.52 524,-361 553.71,-345.63 581.53,-318.46 598.52,-299.87"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="601.28,-302.03 605.32,-292.24 596.05,-297.37 601.28,-302.03"/>
+<path fill="none" stroke="#0000ff" d="M486.37,-276.04C507.38,-280.91 531.82,-286.58 553.75,-291.67"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="553.09,-295.11 563.63,-293.96 554.68,-288.29 553.09,-295.11"/>
 </g>
 <!-- proc~remove_knots -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node23" class="node">
 <title>proc~remove_knots</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node23"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-1348 347.5,-1348 347.5,-1324 519.5,-1324 519.5,-1348"/>
-<text text-anchor="middle" x="433.5" y="-1333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node23"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_curve%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514.5,-1306 352.5,-1306 352.5,-1282 514.5,-1282 514.5,-1306"/>
+<text text-anchor="middle" x="433.5" y="-1291.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots&#45;&gt;none~set -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge12" class="edge">
 <title>proc~remove_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M493.23,-1348.01C503.59,-1350.62 514.19,-1353.63 524,-1357 544.37,-1363.99 566.32,-1373.97 583.62,-1382.46"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="582.2,-1385.66 592.71,-1386.99 585.32,-1379.39 582.2,-1385.66"/>
+<path fill="none" stroke="#ff0000" d="M506.77,-1306.07C512.84,-1308.52 518.68,-1311.47 524,-1315 563.68,-1341.37 592.09,-1391.14 605.94,-1419.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="602.8,-1421.15 610.23,-1428.7 609.13,-1418.17 602.8,-1421.15"/>
 </g>
 <!-- proc~remove_knots~2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node24" class="node">
 <title>proc~remove_knots~2</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node24"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-978 347.5,-978 347.5,-954 519.5,-954 519.5,-978"/>
-<text text-anchor="middle" x="433.5" y="-963.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node24"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-810 347.5,-810 347.5,-786 519.5,-786 519.5,-810"/>
+<text text-anchor="middle" x="433.5" y="-795.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;none~set~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge27" class="edge">
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge25" class="edge">
 <title>proc~remove_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M495.54,-953.86C505.54,-950.33 515.42,-945.8 524,-940 560.9,-915.03 589.67,-870.47 604.48,-844.14"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="607.57,-845.78 609.29,-835.33 601.42,-842.43 607.57,-845.78"/>
+<path fill="none" stroke="#00ff00" d="M499.01,-810.08C507.58,-812.56 516.12,-815.51 524,-819 549.77,-830.4 575.92,-849.31 593.63,-863.44"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="591.65,-866.34 601.61,-869.94 596.07,-860.91 591.65,-866.34"/>
 </g>
 <!-- proc~remove_knots~3 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node25" class="node">
 <title>proc~remove_knots~3</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node25"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_curve%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514.5,-104 352.5,-104 352.5,-80 514.5,-80 514.5,-104"/>
-<text text-anchor="middle" x="433.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node25"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-440 347.5,-440 347.5,-416 519.5,-416 519.5,-440"/>
+<text text-anchor="middle" x="433.5" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;none~set~3 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge41" class="edge">
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge40" class="edge">
 <title>proc~remove_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M509.05,-104.17C514.37,-106.61 519.43,-109.52 524,-113 572.89,-150.17 599.01,-221.34 609.66,-257.59"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="606.41,-258.96 612.48,-267.64 613.15,-257.07 606.41,-258.96"/>
+<path fill="none" stroke="#0000ff" d="M492.73,-415.93C503.56,-412.36 514.46,-407.8 524,-402 556.34,-382.35 584.87,-348.36 601.15,-326.54"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="604.1,-328.43 607.16,-318.29 598.45,-324.31 604.1,-328.43"/>
 </g>
 <!-- proc~set_c -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node26" class="node">
 <title>proc~set_c</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node26"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_volume%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-1142 370.5,-1142 370.5,-1118 496.5,-1118 496.5,-1142"/>
-<text text-anchor="middle" x="433.5" y="-1127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node26"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_curve%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="491.5,-1722 375.5,-1722 375.5,-1698 491.5,-1698 491.5,-1722"/>
+<text text-anchor="middle" x="433.5" y="-1707.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c&#45;&gt;none~set -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge13" class="edge">
 <title>proc~set_c&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M496.64,-1136.15C506.63,-1139.39 516.23,-1144.13 524,-1151 592.58,-1211.63 609.84,-1328.33 614.12,-1376.93"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="610.64,-1377.28 614.9,-1386.98 617.61,-1376.74 610.64,-1377.28"/>
+<path fill="none" stroke="#ff0000" d="M491.54,-1705.37C503.33,-1702.15 514.91,-1697.03 524,-1689 592.58,-1628.37 609.84,-1511.67 614.12,-1463.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="617.61,-1463.26 614.9,-1453.02 610.64,-1462.72 617.61,-1463.26"/>
 </g>
 <!-- proc~set_circle -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node27" class="node">
 <title>proc~set_circle</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node27"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="502,-520 365,-520 365,-496 502,-496 502,-520"/>
-<text text-anchor="middle" x="433.5" y="-505.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="502,-1680 365,-1680 365,-1656 502,-1656 502,-1680"/>
+<text text-anchor="middle" x="433.5" y="-1665.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_circle&#45;&gt;none~set~3 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge42" class="edge">
-<title>proc~set_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M502.25,-499.34C510.13,-496.31 517.61,-492.3 524,-487 582.7,-438.3 604.99,-344.45 612.33,-301.91"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="615.79,-302.46 613.93,-292.03 608.88,-301.35 615.79,-302.46"/>
+<!-- proc~set_circle&#45;&gt;none~set -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge14" class="edge">
+<title>proc~set_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M502.24,-1659.33C510.12,-1656.3 517.61,-1652.29 524,-1647 582.37,-1598.67 604.79,-1505.59 612.25,-1463.11"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="615.7,-1463.67 613.87,-1453.23 608.8,-1462.53 615.7,-1463.67"/>
 </g>
 <!-- proc~set_c~2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node28" class="node">
 <title>proc~set_c~2</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node28"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_surface%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-646 370.5,-646 370.5,-622 496.5,-622 496.5,-646"/>
-<text text-anchor="middle" x="433.5" y="-631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node28"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_volume%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-604 370.5,-604 370.5,-580 496.5,-580 496.5,-604"/>
+<text text-anchor="middle" x="433.5" y="-589.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c~2&#45;&gt;none~set~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge28" class="edge">
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge26" class="edge">
 <title>proc~set_c~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M496.77,-641.42C506.52,-644.54 516,-648.9 524,-655 573.28,-692.56 599.33,-764.61 609.84,-800.93"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="606.46,-801.86 612.5,-810.57 613.21,-800 606.46,-801.86"/>
+<path fill="none" stroke="#00ff00" d="M496.79,-597.99C506.76,-601.25 516.32,-606.03 524,-613 597.7,-679.85 612.06,-808.35 614.84,-859.85"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="611.35,-860.05 615.29,-869.89 618.34,-859.74 611.35,-860.05"/>
 </g>
 <!-- proc~set_c~3 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node29" class="node">
 <title>proc~set_c~3</title>
-<g id="a_proc~~compute_knot_vector~~CalledByGraph_node29"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_curve%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="491.5,-478 375.5,-478 375.5,-454 491.5,-454 491.5,-478"/>
-<text text-anchor="middle" x="433.5" y="-463.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
+<g id="a_proc~~compute_knot_vector~~CalledByGraph_node29"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_surface%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-108 370.5,-108 370.5,-84 496.5,-84 496.5,-108"/>
+<text text-anchor="middle" x="433.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c~3&#45;&gt;none~set~3 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge43" class="edge">
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge41" class="edge">
 <title>proc~set_c~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M491.6,-460.05C503.13,-456.88 514.58,-452.12 524,-445 572.54,-408.29 598.82,-337.97 609.58,-302.15"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="613.04,-302.79 612.43,-292.21 606.31,-300.86 613.04,-302.79"/>
+<path fill="none" stroke="#0000ff" d="M496.56,-102.94C506.45,-106.11 516.03,-110.62 524,-117 578.22,-160.42 602.42,-243.9 611.25,-283.76"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="607.82,-284.49 613.3,-293.56 614.67,-283.05 607.82,-284.49"/>
 </g>
 <!-- proc~set_half_circle -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node30" class="node">
 <title>proc~set_half_circle</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node30"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="515,-352 352,-352 352,-328 515,-328 515,-352"/>
-<text text-anchor="middle" x="433.5" y="-337.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="515,-1554 352,-1554 352,-1530 515,-1530 515,-1554"/>
+<text text-anchor="middle" x="433.5" y="-1539.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_circle&#45;&gt;none~set~3 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge44" class="edge">
-<title>proc~set_half_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M478.4,-327.94C492.98,-323.75 509.25,-318.88 524,-314 540.92,-308.41 559.38,-301.67 575.26,-295.67"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="576.68,-298.88 584.78,-292.05 574.19,-292.34 576.68,-298.88"/>
+<!-- proc~set_half_circle&#45;&gt;none~set -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge15" class="edge">
+<title>proc~set_half_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M489.35,-1529.87C501.13,-1526.23 513.26,-1521.65 524,-1516 551.9,-1501.31 579.23,-1477.27 596.65,-1460.38"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="599.28,-1462.7 603.93,-1453.18 594.36,-1457.73 599.28,-1462.7"/>
 </g>
 <!-- proc~set_half_ring -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node31" class="node">
 <title>proc~set_half_ring</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node31"><a xlink:href="../proc/set_half_ring.html" xlink:title="nurbs_volume%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="516,-1722 351,-1722 351,-1698 516,-1698 516,-1722"/>
-<text text-anchor="middle" x="433.5" y="-1707.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="516,-1184 351,-1184 351,-1160 516,-1160 516,-1184"/>
+<text text-anchor="middle" x="433.5" y="-1169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring&#45;&gt;none~set -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge14" class="edge">
-<title>proc~set_half_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M511.55,-1697.88C516.05,-1695.41 520.26,-1692.47 524,-1689 602.78,-1615.93 614.13,-1475.75 615.47,-1421.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="618.98,-1421.15 615.63,-1411.1 611.98,-1421.04 618.98,-1421.15"/>
+<!-- proc~set_half_ring&#45;&gt;none~set~2 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge27" class="edge">
+<title>proc~set_half_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#00ff00" d="M511.47,-1159.78C515.98,-1157.33 520.22,-1154.43 524,-1151 597.7,-1084.15 612.06,-955.65 614.84,-904.15"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="618.34,-904.26 615.29,-894.11 611.35,-903.95 618.34,-904.26"/>
 </g>
 <!-- proc~set_half_ring~2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node32" class="node">
 <title>proc~set_half_ring~2</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node32"><a xlink:href="../proc/set_half_ring~2.html" xlink:title="nurbs_surface%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="516,-688 351,-688 351,-664 516,-664 516,-688"/>
-<text text-anchor="middle" x="433.5" y="-673.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="516,-150 351,-150 351,-126 516,-126 516,-150"/>
+<text text-anchor="middle" x="433.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring~2&#45;&gt;none~set~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge29" class="edge">
-<title>proc~set_half_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M506.77,-688.07C512.84,-690.52 518.68,-693.47 524,-697 563.68,-723.37 592.09,-773.14 605.94,-801.6"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="602.8,-803.15 610.23,-810.7 609.13,-800.17 602.8,-803.15"/>
+<!-- proc~set_half_ring~2&#45;&gt;none~set~3 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge42" class="edge">
+<title>proc~set_half_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#0000ff" d="M507.95,-150.06C513.63,-152.52 519.07,-155.46 524,-159 568.52,-190.94 596.03,-251.92 608.18,-284.39"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="604.91,-285.64 611.59,-293.86 611.5,-283.27 604.91,-285.64"/>
 </g>
 <!-- proc~set_hexahedron -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node33" class="node">
 <title>proc~set_hexahedron</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node33"><a xlink:href="../proc/set_hexahedron.html" xlink:title="nurbs_volume%set_hexahedron">
-<polygon fill="#d9534f" stroke="#d9534f" points="524,-1680 343,-1680 343,-1656 524,-1656 524,-1680"/>
-<text text-anchor="middle" x="433.5" y="-1665.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="524,-1142 343,-1142 343,-1118 524,-1118 524,-1142"/>
+<text text-anchor="middle" x="433.5" y="-1127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- proc~set_hexahedron&#45;&gt;none~set -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge15" class="edge">
-<title>proc~set_hexahedron&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M510.94,-1655.9C515.64,-1653.43 520.05,-1650.49 524,-1647 592.58,-1586.37 609.84,-1469.67 614.12,-1421.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="617.61,-1421.26 614.9,-1411.02 610.64,-1420.72 617.61,-1421.26"/>
+<!-- proc~set_hexahedron&#45;&gt;none~set~2 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge28" class="edge">
+<title>proc~set_hexahedron&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#00ff00" d="M510.39,-1117.98C515.28,-1115.5 519.88,-1112.53 524,-1109 587.46,-1054.56 607.42,-949.69 613.26,-904.09"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="616.75,-904.41 614.44,-894.07 609.8,-903.6 616.75,-904.41"/>
 </g>
 <!-- proc~set_ring -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node34" class="node">
 <title>proc~set_ring</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node34"><a xlink:href="../proc/set_ring.html" xlink:title="nurbs_volume%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="503,-1638 364,-1638 364,-1614 503,-1614 503,-1638"/>
-<text text-anchor="middle" x="433.5" y="-1623.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="503,-1100 364,-1100 364,-1076 503,-1076 503,-1100"/>
+<text text-anchor="middle" x="433.5" y="-1085.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring&#45;&gt;none~set -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge16" class="edge">
-<title>proc~set_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.15,-1616.98C510.69,-1613.99 517.85,-1610.09 524,-1605 582.37,-1556.67 604.79,-1463.59 612.25,-1421.11"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="615.7,-1421.67 613.87,-1411.23 608.8,-1420.53 615.7,-1421.67"/>
+<!-- proc~set_ring&#45;&gt;none~set~2 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge29" class="edge">
+<title>proc~set_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#00ff00" d="M503.4,-1078.55C510.82,-1075.63 517.87,-1071.86 524,-1067 577.36,-1024.64 601.93,-943.16 611.04,-904.03"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="614.48,-904.7 613.21,-894.19 607.64,-903.2 614.48,-904.7"/>
 </g>
 <!-- proc~set_ring~2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node35" class="node">
 <title>proc~set_ring~2</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node35"><a xlink:href="../proc/set_ring~2.html" xlink:title="nurbs_surface%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="503,-730 364,-730 364,-706 503,-706 503,-730"/>
-<text text-anchor="middle" x="433.5" y="-715.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="503,-192 364,-192 364,-168 503,-168 503,-192"/>
+<text text-anchor="middle" x="433.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring~2&#45;&gt;none~set~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge30" class="edge">
-<title>proc~set_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M502.8,-730.12C510.16,-732.56 517.37,-735.49 524,-739 554.52,-755.15 582.66,-783.96 599.45,-803.27"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="596.79,-805.55 605.93,-810.91 602.13,-801.02 596.79,-805.55"/>
+<!-- proc~set_ring~2&#45;&gt;none~set~3 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge43" class="edge">
+<title>proc~set_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#0000ff" d="M503.21,-191.4C510.49,-193.97 517.57,-197.13 524,-201 558.92,-222.04 587.54,-260.92 603,-285"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="600.19,-287.11 608.45,-293.74 606.13,-283.4 600.19,-287.11"/>
 </g>
 <!-- proc~set_tetragon -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node36" class="node">
 <title>proc~set_tetragon</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node36"><a xlink:href="../proc/set_tetragon.html" xlink:title="nurbs_surface%set_tetragon">
-<polygon fill="#d9534f" stroke="#d9534f" points="515.5,-772 351.5,-772 351.5,-748 515.5,-748 515.5,-772"/>
-<text text-anchor="middle" x="433.5" y="-757.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="515.5,-234 351.5,-234 351.5,-210 515.5,-210 515.5,-234"/>
+<text text-anchor="middle" x="433.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
 </a>
 </g>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge31" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M493.23,-772.01C503.59,-774.62 514.19,-777.63 524,-781 544.37,-787.99 566.32,-797.97 583.62,-806.46"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="582.2,-809.66 592.71,-810.99 585.32,-803.39 582.2,-809.66"/>
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge44" class="edge">
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#0000ff" d="M499.01,-234.08C507.58,-236.56 516.12,-239.51 524,-243 549.77,-254.4 575.92,-273.31 593.63,-287.44"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="591.65,-290.34 601.61,-293.94 596.07,-284.91 591.65,-290.34"/>
 </g>
 <!-- program~compute_area -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node37" class="node">
 <title>program~compute_area</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node37"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-1082 8,-1082 8,-1058 97,-1058 97,-1082"/>
-<text text-anchor="middle" x="52.5" y="-1067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-544 8,-544 8,-520 97,-520 97,-544"/>
+<text text-anchor="middle" x="52.5" y="-529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;none~set~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge32" class="edge">
-<title>program~compute_area&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M97.28,-1076.26C200.62,-1090.07 456.06,-1118.35 524,-1071 599.61,-1018.31 612.9,-895.68 615.12,-845.26"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="618.62,-845.23 615.45,-835.12 611.62,-845 618.62,-845.23"/>
+<!-- program~compute_area&#45;&gt;none~set~3 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge45" class="edge">
+<title>program~compute_area&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#0000ff" d="M97.19,-538.13C200.33,-551.65 455.37,-579.33 524,-533 593.77,-485.9 610.35,-375.75 614.28,-328.34"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="617.78,-328.44 615.01,-318.22 610.8,-327.94 617.78,-328.44"/>
 </g>
 <!-- proc~cmp_area -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node50" class="node">
 <title>proc~cmp_area</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node50"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-1062 149,-1062 149,-1038 299,-1038 299,-1062"/>
-<text text-anchor="middle" x="224" y="-1047.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-524 149,-524 149,-500 299,-500 299,-524"/>
+<text text-anchor="middle" x="224" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
 <!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge79" class="edge">
 <title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M97.15,-1064.85C109.98,-1063.34 124.47,-1061.63 138.93,-1059.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="139.4,-1063.39 148.92,-1058.74 138.58,-1056.44 139.4,-1063.39"/>
+<path fill="none" stroke="#ff0000" d="M97.15,-526.85C109.98,-525.34 124.47,-523.63 138.93,-521.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="139.4,-525.39 148.92,-520.74 138.58,-518.44 139.4,-525.39"/>
 </g>
 <!-- program~compute_length -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node38" class="node">
 <title>program~compute_length</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node38"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-44 3,-44 3,-20 102,-20 102,-44"/>
-<text text-anchor="middle" x="52.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-1246 3,-1246 3,-1222 102,-1222 102,-1246"/>
+<text text-anchor="middle" x="52.5" y="-1231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;none~set~3 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge45" class="edge">
-<title>program~compute_length&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M102.13,-33.24C215.49,-36.51 490.24,-46.88 524,-71 586.99,-116.01 607.13,-214.1 613.14,-258"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="609.66,-258.44 614.38,-267.93 616.61,-257.57 609.66,-258.44"/>
+<!-- program~compute_length&#45;&gt;none~set -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge16" class="edge">
+<title>program~compute_length&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M102,-1235.43C215.07,-1239.13 489.23,-1250.35 524,-1273 576.18,-1306.99 601.01,-1381.31 610.56,-1418.65"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="607.2,-1419.65 612.95,-1428.55 614,-1418.01 607.2,-1419.65"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node51" class="node">
 <title>proc~cmp_length</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node51"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-24 149,-24 149,0 299,0 299,-24"/>
-<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-1226 149,-1226 149,-1202 299,-1202 299,-1226"/>
+<text text-anchor="middle" x="224" y="-1211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge80" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#ff5400" d="M102.07,-26.27C113.57,-24.91 126.17,-23.43 138.75,-21.94"/>
-<polygon fill="#ff5400" stroke="#ff5400" points="139.29,-25.4 148.82,-20.75 138.47,-18.45 139.29,-25.4"/>
+<path fill="none" stroke="#ff5400" d="M102.07,-1228.27C113.57,-1226.91 126.17,-1225.43 138.75,-1223.94"/>
+<polygon fill="#ff5400" stroke="#ff5400" points="139.29,-1227.4 148.82,-1222.75 138.47,-1220.45 139.29,-1227.4"/>
 </g>
 <!-- program~compute_volume -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node39" class="node">
 <title>program~compute_volume</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node39"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-1452 0,-1452 0,-1428 105,-1428 105,-1452"/>
-<text text-anchor="middle" x="52.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-914 0,-914 0,-890 105,-890 105,-914"/>
+<text text-anchor="middle" x="52.5" y="-899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;none~set -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge17" class="edge">
-<title>program~compute_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M105.09,-1447.29C192.51,-1458.05 374.77,-1473.61 524,-1441 546.04,-1436.18 569.12,-1425.54 586.59,-1416.18"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="588.62,-1419.06 595.67,-1411.15 585.23,-1412.93 588.62,-1419.06"/>
+<!-- program~compute_volume&#45;&gt;none~set~2 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge30" class="edge">
+<title>program~compute_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#00ff00" d="M105.23,-905.97C192.1,-911.78 372.63,-920.15 524,-903 536.52,-901.58 549.83,-899.1 562.3,-896.34"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="563.14,-899.73 572.1,-894.07 561.57,-892.91 563.14,-899.73"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node52" class="node">
 <title>proc~cmp_volume</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node52"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-1432 141,-1432 141,-1408 307,-1408 307,-1432"/>
-<text text-anchor="middle" x="224" y="-1417.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-894 141,-894 141,-870 307,-870 307,-894"/>
+<text text-anchor="middle" x="224" y="-879.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
 <!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge81" class="edge">
 <title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#ffaa00" d="M105.28,-1433.89C113.48,-1432.92 122.18,-1431.9 130.98,-1430.86"/>
-<polygon fill="#ffaa00" stroke="#ffaa00" points="131.41,-1434.33 140.93,-1429.68 130.59,-1427.38 131.41,-1434.33"/>
+<path fill="none" stroke="#ffaa00" d="M105.28,-895.89C113.48,-894.92 122.18,-893.9 130.98,-892.86"/>
+<polygon fill="#ffaa00" stroke="#ffaa00" points="131.41,-896.33 140.93,-891.68 130.59,-889.38 131.41,-896.33"/>
 </g>
 <!-- program~example1_curve -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node40" class="node">
 <title>program~example1_curve</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node40"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-209 174,-209 174,-185 274,-185 274,-209"/>
-<text text-anchor="middle" x="224" y="-194.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-1411 174,-1411 174,-1387 274,-1387 274,-1411"/>
+<text text-anchor="middle" x="224" y="-1396.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;none~set~3 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge46" class="edge">
-<title>program~example1_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M236.65,-209.21C256.34,-228.87 298.45,-266.76 343,-281 413,-303.37 498.38,-298.23 554.7,-290.72"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="555.45,-294.15 564.87,-289.3 554.48,-287.22 555.45,-294.15"/>
+<!-- program~example1_curve&#45;&gt;none~set -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge17" class="edge">
+<title>program~example1_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M236.65,-1411.21C256.34,-1430.87 298.45,-1468.76 343,-1483 419.63,-1507.49 445.41,-1500.18 524,-1483 546.04,-1478.18 569.12,-1467.54 586.59,-1458.18"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="588.62,-1461.06 595.67,-1453.15 585.23,-1454.93 588.62,-1461.06"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge54" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
-<path fill="none" stroke="#ffb600" d="M255.75,-209.01C279.38,-217.98 312.96,-230.16 343,-239 350.73,-241.27 358.89,-243.47 367.01,-245.53"/>
-<polygon fill="#ffb600" stroke="#ffb600" points="366.32,-248.96 376.87,-247.96 368,-242.16 366.32,-248.96"/>
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge52" class="edge">
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
+<path fill="none" stroke="#ff6d00" d="M255.75,-1411.01C279.38,-1419.98 312.96,-1432.16 343,-1441 350.73,-1443.27 358.89,-1445.47 367.01,-1447.53"/>
+<polygon fill="#ff6d00" stroke="#ff6d00" points="366.32,-1450.96 376.87,-1449.96 368,-1444.16 366.32,-1450.96"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge57" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
-<path fill="none" stroke="#daff00" d="M255.75,-184.99C279.38,-176.02 312.96,-163.84 343,-155 350.73,-152.73 358.89,-150.53 367.01,-148.47"/>
-<polygon fill="#daff00" stroke="#daff00" points="368,-151.84 376.87,-146.04 366.32,-145.04 368,-151.84"/>
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge55" class="edge">
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
+<path fill="none" stroke="#ffda00" d="M255.75,-1386.99C279.38,-1378.02 312.96,-1365.84 343,-1357 350.73,-1354.73 358.89,-1352.53 367.01,-1350.47"/>
+<polygon fill="#ffda00" stroke="#ffda00" points="368,-1353.84 376.87,-1348.04 366.32,-1347.04 368,-1353.84"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge61" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
-<path fill="none" stroke="#00ff6d" d="M238.43,-184.73C259.25,-166.36 301.3,-131.85 343,-113 347.7,-110.88 352.63,-108.95 357.67,-107.22"/>
-<polygon fill="#00ff6d" stroke="#00ff6d" points="358.99,-110.47 367.46,-104.1 356.87,-103.8 358.99,-110.47"/>
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge59" class="edge">
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
+<path fill="none" stroke="#00ff24" d="M238.43,-1386.73C259.25,-1368.36 301.3,-1333.85 343,-1315 347.7,-1312.88 352.63,-1310.95 357.67,-1309.22"/>
+<polygon fill="#00ff24" stroke="#00ff24" points="358.99,-1312.47 367.46,-1306.1 356.87,-1305.8 358.99,-1312.47"/>
 </g>
 <!-- program~example3_surface -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node41" class="node">
 <title>program~example3_surface</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node41"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-959 169,-959 169,-935 279,-935 279,-959"/>
-<text text-anchor="middle" x="224" y="-944.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-421 169,-421 169,-397 279,-397 279,-421"/>
+<text text-anchor="middle" x="224" y="-406.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;none~set~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge33" class="edge">
-<title>program~example3_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M279.29,-943.65C353.36,-938.41 481.73,-926.79 524,-907 555.44,-892.28 583.53,-862.85 600.04,-843.04"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="602.81,-845.18 606.39,-835.2 597.37,-840.77 602.81,-845.18"/>
+<!-- program~example3_surface&#45;&gt;none~set~3 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge46" class="edge">
+<title>program~example3_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#0000ff" d="M279.25,-409.25C340.63,-407.85 442.64,-400.37 524,-369 550.6,-358.74 576.99,-339.33 594.54,-324.75"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="597.07,-327.19 602.41,-318.04 592.53,-321.87 597.07,-327.19"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge53" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
-<path fill="none" stroke="#ff9100" d="M265.4,-934.96C288.18,-928.18 317.17,-919.58 343,-912 355.25,-908.4 368.45,-904.55 380.85,-900.95"/>
-<polygon fill="#ff9100" stroke="#ff9100" points="381.97,-904.27 390.6,-898.12 380.02,-897.55 381.97,-904.27"/>
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge54" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#ffb600" d="M265.4,-396.96C288.18,-390.18 317.17,-381.58 343,-374 355.25,-370.4 368.45,-366.55 380.85,-362.95"/>
+<polygon fill="#ffb600" stroke="#ffb600" points="381.97,-366.27 390.6,-360.12 380.02,-359.55 381.97,-366.27"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge56" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
-<path fill="none" stroke="#ffff00" d="M257.79,-959.06C281.32,-967.49 313.88,-978.67 343,-987 350.94,-989.27 359.33,-991.48 367.66,-993.57"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="366.83,-996.97 377.38,-995.95 368.5,-990.17 366.83,-996.97"/>
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge57" class="edge">
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#daff00" d="M257.79,-421.06C281.32,-429.49 313.88,-440.67 343,-449 350.94,-451.27 359.33,-453.48 367.66,-455.57"/>
+<polygon fill="#daff00" stroke="#daff00" points="366.83,-458.97 377.38,-457.95 368.5,-452.17 366.83,-458.97"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge60" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
-<path fill="none" stroke="#00ff48" d="M279.25,-951.97C297.02,-953.59 317.32,-955.45 337.21,-957.27"/>
-<polygon fill="#00ff48" stroke="#00ff48" points="336.96,-960.77 347.23,-958.19 337.6,-953.8 336.96,-960.77"/>
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge61" class="edge">
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#00ff6d" d="M279.25,-413.97C297.02,-415.59 317.32,-417.45 337.21,-419.27"/>
+<polygon fill="#00ff6d" stroke="#00ff6d" points="336.96,-422.77 347.23,-420.19 337.6,-415.8 336.96,-422.77"/>
 </g>
 <!-- program~example3_volume -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node42" class="node">
 <title>program~example3_volume</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node42"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-1328 169,-1328 169,-1304 279,-1304 279,-1328"/>
-<text text-anchor="middle" x="224" y="-1313.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-790 169,-790 169,-766 279,-766 279,-790"/>
+<text text-anchor="middle" x="224" y="-775.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;none~set -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge18" class="edge">
-<title>program~example3_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M279.27,-1304.27C340.9,-1293.52 443.34,-1283.59 524,-1315 556.7,-1327.74 584.81,-1358.23 600.94,-1378.75"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="598.26,-1381.01 607.1,-1386.86 603.84,-1376.78 598.26,-1381.01"/>
+<!-- program~example3_volume&#45;&gt;none~set~2 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge31" class="edge">
+<title>program~example3_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#00ff00" d="M273.4,-765.97C334.76,-753.3 442.38,-739.86 524,-777 561.86,-794.23 590.15,-835.71 604.64,-861.08"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="601.62,-862.85 609.51,-869.93 607.76,-859.48 601.62,-862.85"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge52" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#ff6d00" d="M266.99,-1303.86C300.01,-1294.31 346.14,-1280.97 381.32,-1270.8"/>
-<polygon fill="#ff6d00" stroke="#ff6d00" points="382.29,-1274.16 390.93,-1268.02 380.35,-1267.44 382.29,-1274.16"/>
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge53" class="edge">
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
+<path fill="none" stroke="#ff9100" d="M266.99,-765.86C300.01,-756.31 346.14,-742.97 381.32,-732.8"/>
+<polygon fill="#ff9100" stroke="#ff9100" points="382.29,-736.16 390.93,-730.02 380.35,-729.44 382.29,-736.16"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge55" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#ffda00" d="M256.76,-1328.04C280.35,-1336.74 313.42,-1348.42 343,-1357 350.74,-1359.25 358.9,-1361.42 367.03,-1363.47"/>
-<polygon fill="#ffda00" stroke="#ffda00" points="366.34,-1366.9 376.88,-1365.9 368.01,-1360.11 366.34,-1366.9"/>
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge56" class="edge">
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
+<path fill="none" stroke="#ffff00" d="M256.76,-790.04C280.35,-798.74 313.42,-810.42 343,-819 350.74,-821.25 358.9,-823.42 367.03,-825.47"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="366.34,-828.9 376.88,-827.9 368.01,-822.11 366.34,-828.9"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge59" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#00ff24" d="M279.25,-1321.23C297.02,-1322.94 317.32,-1324.9 337.21,-1326.82"/>
-<polygon fill="#00ff24" stroke="#00ff24" points="336.94,-1330.31 347.23,-1327.78 337.62,-1323.34 336.94,-1330.31"/>
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge60" class="edge">
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
+<path fill="none" stroke="#00ff48" d="M279.25,-783.23C297.02,-784.94 317.32,-786.9 337.21,-788.82"/>
+<polygon fill="#00ff48" stroke="#00ff48" points="336.94,-792.31 347.23,-789.78 337.62,-785.34 336.94,-792.31"/>
 </g>
 <!-- program~example_nurbs_curve -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node43" class="node">
 <title>program~example_nurbs_curve</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node43"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-230 369,-230 369,-206 498,-206 498,-230"/>
-<text text-anchor="middle" x="433.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-1432 369,-1432 369,-1408 498,-1408 498,-1432"/>
+<text text-anchor="middle" x="433.5" y="-1417.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;none~set~3 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge47" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M493.21,-230.08C503.56,-232.69 514.17,-235.68 524,-239 544.04,-245.77 565.67,-255.35 582.86,-263.55"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="581.39,-266.72 591.92,-267.93 584.44,-260.42 581.39,-266.72"/>
+<!-- program~example_nurbs_curve&#45;&gt;none~set -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge18" class="edge">
+<title>program~example_nurbs_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M498.06,-1427.37C516.54,-1429.52 536.66,-1431.85 554.95,-1433.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="554.56,-1437.45 564.9,-1435.13 555.37,-1430.5 554.56,-1437.45"/>
 </g>
 <!-- program~example_nurbs_surface -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node44" class="node">
 <title>program~example_nurbs_surface</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node44"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-604 364,-604 364,-580 503,-580 503,-604"/>
-<text text-anchor="middle" x="433.5" y="-589.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-66 364,-66 364,-42 503,-42 503,-66"/>
+<text text-anchor="middle" x="433.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;none~set~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge34" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M503.19,-600.98C510.72,-603.97 517.87,-607.89 524,-613 583.28,-662.44 605.27,-757.64 612.44,-800.78"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="609,-801.45 613.99,-810.8 615.92,-800.38 609,-801.45"/>
+<!-- program~example_nurbs_surface&#45;&gt;none~set~3 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge47" class="edge">
+<title>program~example_nurbs_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#0000ff" d="M503.36,-62.78C510.86,-65.81 517.96,-69.79 524,-75 588.41,-130.59 607.88,-237.64 613.43,-283.86"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="609.97,-284.43 614.54,-293.99 616.93,-283.67 609.97,-284.43"/>
 </g>
 <!-- program~example_nurbs_volume -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node45" class="node">
 <title>program~example_nurbs_volume</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node45"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-1596 364,-1596 364,-1572 503,-1572 503,-1596"/>
-<text text-anchor="middle" x="433.5" y="-1581.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-1058 364,-1058 364,-1034 503,-1034 503,-1058"/>
+<text text-anchor="middle" x="433.5" y="-1043.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;none~set -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge19" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.17,-1574.25C510.62,-1571.38 517.76,-1567.71 524,-1563 572.36,-1526.53 598.72,-1456.62 609.54,-1421.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="612.98,-1421.72 612.41,-1411.14 606.26,-1419.77 612.98,-1421.72"/>
+<!-- program~example_nurbs_volume&#45;&gt;none~set~2 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge32" class="edge">
+<title>program~example_nurbs_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#00ff00" d="M503.36,-1035.7C510.69,-1032.93 517.75,-1029.43 524,-1025 567.44,-994.25 595.13,-935.72 607.67,-903.91"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="611.07,-904.82 611.34,-894.23 604.52,-902.33 611.07,-904.82"/>
 </g>
 <!-- program~example_put_to_nurbs -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node46" class="node">
 <title>program~example_put_to_nurbs</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node46"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-1554 367.5,-1554 367.5,-1530 499.5,-1530 499.5,-1554"/>
-<text text-anchor="middle" x="433.5" y="-1539.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-1016 367.5,-1016 367.5,-992 499.5,-992 499.5,-1016"/>
+<text text-anchor="middle" x="433.5" y="-1001.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;none~set -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge20" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.79,-1532.37C508.33,-1529.51 516.65,-1525.8 524,-1521 562.69,-1495.72 591.16,-1448.19 605.36,-1420.51"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="608.62,-1421.8 609.94,-1411.29 602.35,-1418.69 608.62,-1421.8"/>
+<!-- program~example_put_to_nurbs&#45;&gt;none~set~2 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge33" class="edge">
+<title>program~example_put_to_nurbs&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#00ff00" d="M499.86,-993.58C508.3,-990.84 516.58,-987.38 524,-983 558.19,-962.85 586.86,-925.74 602.56,-902.55"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="605.54,-904.4 608.11,-894.13 599.69,-900.55 605.54,-904.4"/>
 </g>
 <!-- program~nearest_point_1d -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node47" class="node">
 <title>program~nearest_point_1d</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node47"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-188 382,-188 382,-164 485,-164 485,-188"/>
-<text text-anchor="middle" x="433.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-1390 382,-1390 382,-1366 485,-1366 485,-1390"/>
+<text text-anchor="middle" x="433.5" y="-1375.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;none~set~3 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge48" class="edge">
-<title>program~nearest_point_1d&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M485.34,-183.26C498.41,-186.36 512.13,-190.77 524,-197 554.1,-212.81 582.01,-240.87 598.9,-259.94"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="596.46,-262.47 605.65,-267.75 601.76,-257.9 596.46,-262.47"/>
+<!-- program~nearest_point_1d&#45;&gt;none~set -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge19" class="edge">
+<title>program~nearest_point_1d&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M485.18,-1388.03C497.99,-1391.07 511.62,-1394.75 524,-1399 544.37,-1405.99 566.32,-1415.97 583.62,-1424.46"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="582.2,-1427.66 592.71,-1428.99 585.32,-1421.39 582.2,-1427.66"/>
 </g>
 <!-- program~nearest_point_2d -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node48" class="node">
 <title>program~nearest_point_2d</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node48"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-562 382,-562 382,-538 485,-538 485,-562"/>
-<text text-anchor="middle" x="433.5" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-24 382,-24 382,0 485,0 485,-24"/>
+<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;none~set~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge35" class="edge">
-<title>program~nearest_point_2d&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M485.05,-553C499.01,-556.03 513.26,-561.46 524,-571 593.4,-632.67 610.2,-751.22 614.24,-800.58"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="610.76,-801.07 614.97,-810.79 617.75,-800.57 610.76,-801.07"/>
+<!-- program~nearest_point_2d&#45;&gt;none~set~3 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge48" class="edge">
+<title>program~nearest_point_2d&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#0000ff" d="M485.2,-14.84C499.17,-17.86 513.38,-23.33 524,-33 598.53,-100.9 612.42,-231.28 614.96,-283.53"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="611.47,-283.86 615.35,-293.71 618.46,-283.58 611.47,-283.86"/>
 </g>
 <!-- program~nearest_point_3d -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node49" class="node">
 <title>program~nearest_point_3d</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node49"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-1512 382,-1512 382,-1488 485,-1488 485,-1512"/>
-<text text-anchor="middle" x="433.5" y="-1497.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-974 382,-974 382,-950 485,-950 485,-974"/>
+<text text-anchor="middle" x="433.5" y="-959.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;none~set -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge21" class="edge">
-<title>program~nearest_point_3d&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M485.13,-1489.14C498.2,-1485.31 511.97,-1480.33 524,-1474 551.9,-1459.31 579.23,-1435.27 596.65,-1418.38"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="599.28,-1420.7 603.93,-1411.18 594.36,-1415.73 599.28,-1420.7"/>
-</g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge50" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ff2400" d="M299.03,-1050C317.98,-1050 338.36,-1050 357.36,-1050"/>
-<polygon fill="#ff2400" stroke="#ff2400" points="357.45,-1053.5 367.45,-1050 357.45,-1046.5 357.45,-1053.5"/>
+<!-- program~nearest_point_3d&#45;&gt;none~set~2 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge34" class="edge">
+<title>program~nearest_point_3d&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#00ff00" d="M484.05,-950C497.27,-946.16 511.38,-941.46 524,-936 547.07,-926.03 571.5,-911.38 589.31,-899.85"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="591.55,-902.57 597.98,-894.15 587.7,-896.72 591.55,-902.57"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge51" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#ff4800" d="M299.03,-12C319.64,-12 341.96,-12 362.34,-12"/>
-<polygon fill="#ff4800" stroke="#ff4800" points="362.49,-15.5 372.49,-12 362.49,-8.5 362.49,-15.5"/>
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#ff4800" d="M299.03,-512C317.98,-512 338.36,-512 357.36,-512"/>
+<polygon fill="#ff4800" stroke="#ff4800" points="357.45,-515.5 367.45,-512 357.45,-508.5 357.45,-515.5"/>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge49" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.01,-1420C323.61,-1420 341,-1420 357.35,-1420"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="357.38,-1423.5 367.38,-1420 357.38,-1416.5 357.38,-1423.5"/>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M299.03,-1214C319.64,-1214 341.96,-1214 362.34,-1214"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="362.49,-1217.5 372.49,-1214 362.49,-1210.5 362.49,-1217.5"/>
+</g>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge50" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ff2400" d="M307.01,-882C323.61,-882 341,-882 357.35,-882"/>
+<polygon fill="#ff2400" stroke="#ff2400" points="357.38,-885.5 367.38,-882 357.38,-878.5 357.38,-885.5"/>
 </g>
 <!-- program~example_ppm1 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node53" class="node">
 <title>program~example_ppm1</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node53"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-772 177,-772 177,-748 271,-748 271,-772"/>
-<text text-anchor="middle" x="224" y="-757.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-234 177,-234 177,-210 271,-210 271,-234"/>
+<text text-anchor="middle" x="224" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
 </a>
 </g>
 </g>
 <!-- program~example_ppm1&#45;&gt;proc~set_ring~2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge72" class="edge">
 <title>program~example_ppm1&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#0024ff" d="M271.05,-750.68C298.08,-745.21 332.78,-738.18 363.07,-732.05"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="364.05,-735.43 373.16,-730.01 362.66,-728.56 364.05,-735.43"/>
+<path fill="none" stroke="#0024ff" d="M271.05,-212.68C298.08,-207.21 332.78,-200.18 363.07,-194.05"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="364.05,-197.43 373.16,-192.01 362.66,-190.56 364.05,-197.43"/>
 </g>
 <!-- program~example_ppm1&#45;&gt;proc~set_tetragon -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge74" class="edge">
 <title>program~example_ppm1&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0000ff" d="M271.05,-760C291.74,-760 316.91,-760 341.16,-760"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="341.49,-763.5 351.49,-760 341.49,-756.5 341.49,-763.5"/>
+<path fill="none" stroke="#0000ff" d="M271.05,-222C291.74,-222 316.91,-222 341.16,-222"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="341.49,-225.5 351.49,-222 341.49,-218.5 341.49,-225.5"/>
 </g>
 <!-- program~example_ppm2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node54" class="node">
 <title>program~example_ppm2</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node54"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-688 177,-688 177,-664 271,-664 271,-688"/>
-<text text-anchor="middle" x="224" y="-673.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-150 177,-150 177,-126 271,-126 271,-150"/>
+<text text-anchor="middle" x="224" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
 </a>
 </g>
 </g>
 <!-- program~example_ppm2&#45;&gt;proc~set_half_ring~2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge68" class="edge">
 <title>program~example_ppm2&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#0091ff" d="M271.05,-676C291.53,-676 316.4,-676 340.43,-676"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="340.66,-679.5 350.66,-676 340.66,-672.5 340.66,-679.5"/>
+<path fill="none" stroke="#0091ff" d="M271.05,-138C291.53,-138 316.4,-138 340.43,-138"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="340.66,-141.5 350.66,-138 340.66,-134.5 340.66,-141.5"/>
 </g>
 <!-- program~example_ppm2&#45;&gt;proc~set_tetragon -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge75" class="edge">
 <title>program~example_ppm2&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0000ff" d="M271.26,-682.65C283.49,-685.76 296.27,-690.32 307,-697 327.88,-709.99 321.99,-726.23 343,-739 346.02,-740.84 349.19,-742.52 352.47,-744.05"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="351.33,-747.36 361.91,-747.98 354.02,-740.9 351.33,-747.36"/>
+<path fill="none" stroke="#0000ff" d="M271.26,-144.65C283.49,-147.76 296.27,-152.32 307,-159 327.88,-171.99 321.99,-188.23 343,-201 346.02,-202.84 349.19,-204.52 352.47,-206.05"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="351.33,-209.36 361.91,-209.98 354.02,-202.9 351.33,-209.36"/>
 </g>
 <!-- program~example_ppm3 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node55" class="node">
 <title>program~example_ppm3</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node55"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-898 177,-898 177,-874 271,-874 271,-898"/>
-<text text-anchor="middle" x="224" y="-883.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-360 177,-360 177,-336 271,-336 271,-360"/>
+<text text-anchor="middle" x="224" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge58" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#24ff00" d="M271.26,-879.35C283.49,-876.24 296.27,-871.68 307,-865 327.88,-852.01 321.99,-835.77 343,-823 346.02,-821.16 349.19,-819.48 352.47,-817.95"/>
-<polygon fill="#24ff00" stroke="#24ff00" points="354.02,-821.1 361.91,-814.02 351.33,-814.64 354.02,-821.1"/>
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M271.26,-341.35C283.49,-338.24 296.27,-333.68 307,-327 327.88,-314.01 321.99,-297.77 343,-285 346.02,-283.16 349.19,-281.48 352.47,-279.95"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="354.02,-283.1 361.91,-276.02 351.33,-276.64 354.02,-283.1"/>
 </g>
 <!-- program~example_ppm3&#45;&gt;proc~set_tetragon -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge76" class="edge">
 <title>program~example_ppm3&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0000ff" d="M271.05,-881.81C283.84,-878.75 296.96,-873.6 307,-865 337.85,-838.58 311.89,-807.11 343,-781 344.56,-779.69 346.18,-778.46 347.87,-777.31"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="349.85,-780.2 356.69,-772.12 346.3,-774.17 349.85,-780.2"/>
+<path fill="none" stroke="#0000ff" d="M271.05,-343.81C283.84,-340.75 296.96,-335.6 307,-327 337.85,-300.58 311.89,-269.11 343,-243 344.56,-241.69 346.18,-240.46 347.87,-239.31"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="349.85,-242.2 356.69,-234.12 346.3,-236.17 349.85,-242.2"/>
 </g>
 <!-- program~nearest_point_2d_bench -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node56" class="node">
 <title>program~nearest_point_2d_bench</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node56"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="295,-856 153,-856 153,-832 295,-832 295,-856"/>
-<text text-anchor="middle" x="224" y="-841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="295,-318 153,-318 153,-294 295,-294 295,-318"/>
+<text text-anchor="middle" x="224" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
 </a>
 </g>
 </g>
 <!-- program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge77" class="edge">
 <title>program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0000ff" d="M288.42,-832C294.93,-829.54 301.26,-826.57 307,-823 327.88,-810.01 321.99,-793.77 343,-781 346.02,-779.16 349.19,-777.48 352.47,-775.95"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="354.02,-779.1 361.91,-772.02 351.33,-772.64 354.02,-779.1"/>
+<path fill="none" stroke="#0000ff" d="M288.42,-294C294.93,-291.54 301.26,-288.57 307,-285 327.88,-272.01 321.99,-255.77 343,-243 346.02,-241.16 349.19,-239.48 352.47,-237.95"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="354.02,-241.1 361.91,-234.02 351.33,-234.64 354.02,-241.1"/>
 </g>
 <!-- program~shape_c_1d -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node57" class="node">
 <title>program~shape_c_1d</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node57"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-478 186,-478 186,-454 262,-454 262,-478"/>
-<text text-anchor="middle" x="224" y="-463.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-1722 186,-1722 186,-1698 262,-1698 262,-1722"/>
+<text text-anchor="middle" x="224" y="-1707.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~set_c~3 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge65" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~set_c~3</title>
-<path fill="none" stroke="#00ffff" d="M262.1,-466C290.62,-466 330.8,-466 364.98,-466"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="365.38,-469.5 375.38,-466 365.37,-462.5 365.38,-469.5"/>
+<!-- program~shape_c_1d&#45;&gt;proc~set_c -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge62" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~set_c</title>
+<path fill="none" stroke="#00ff91" d="M262.1,-1710C290.62,-1710 330.8,-1710 364.98,-1710"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="365.38,-1713.5 375.38,-1710 365.37,-1706.5 365.38,-1713.5"/>
 </g>
 <!-- program~shape_c_2d -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node58" class="node">
 <title>program~shape_c_2d</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node58"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-604 186,-604 186,-580 262,-580 262,-604"/>
-<text text-anchor="middle" x="224" y="-589.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-66 186,-66 186,-42 262,-42 262,-66"/>
+<text text-anchor="middle" x="224" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~set_c~2 -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge64" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~set_c~2</title>
-<path fill="none" stroke="#00ffda" d="M262.1,-599.51C290.11,-605.18 329.36,-613.12 363.13,-619.96"/>
-<polygon fill="#00ffda" stroke="#00ffda" points="362.46,-623.39 372.95,-621.95 363.85,-616.53 362.46,-623.39"/>
+<!-- program~shape_c_2d&#45;&gt;proc~set_c~3 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge65" class="edge">
+<title>program~shape_c_2d&#45;&gt;proc~set_c~3</title>
+<path fill="none" stroke="#00ffff" d="M262.1,-61.51C290.11,-67.18 329.36,-75.12 363.13,-81.96"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="362.46,-85.39 372.95,-83.95 363.85,-78.53 362.46,-85.39"/>
 </g>
 <!-- program~shape_c_3d -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node59" class="node">
 <title>program~shape_c_3d</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node59"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-1142 186,-1142 186,-1118 262,-1118 262,-1142"/>
-<text text-anchor="middle" x="224" y="-1127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-604 186,-604 186,-580 262,-580 262,-604"/>
+<text text-anchor="middle" x="224" y="-589.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~set_c -->
-<g id="proc~~compute_knot_vector~~CalledByGraph_edge62" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~set_c</title>
-<path fill="none" stroke="#00ff91" d="M262.1,-1130C289.25,-1130 326.96,-1130 360,-1130"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="360.09,-1133.5 370.09,-1130 360.09,-1126.5 360.09,-1133.5"/>
+<!-- program~shape_c_3d&#45;&gt;proc~set_c~2 -->
+<g id="proc~~compute_knot_vector~~CalledByGraph_edge64" class="edge">
+<title>program~shape_c_3d&#45;&gt;proc~set_c~2</title>
+<path fill="none" stroke="#00ffda" d="M262.1,-592C289.25,-592 326.96,-592 360,-592"/>
+<polygon fill="#00ffda" stroke="#00ffda" points="360.09,-595.5 370.09,-592 360.09,-588.5 360.09,-595.5"/>
 </g>
 <!-- program~shape_circle -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node60" class="node">
 <title>program~shape_circle</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node60"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="263.5,-520 184.5,-520 184.5,-496 263.5,-496 263.5,-520"/>
-<text text-anchor="middle" x="224" y="-505.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="263.5,-1680 184.5,-1680 184.5,-1656 263.5,-1656 263.5,-1680"/>
+<text text-anchor="middle" x="224" y="-1665.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
 <!-- program~shape_circle&#45;&gt;proc~set_circle -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge63" class="edge">
 <title>program~shape_circle&#45;&gt;proc~set_circle</title>
-<path fill="none" stroke="#00ffb6" d="M263.54,-508C289.03,-508 323.33,-508 354.38,-508"/>
-<polygon fill="#00ffb6" stroke="#00ffb6" points="354.76,-511.5 364.76,-508 354.76,-504.5 354.76,-511.5"/>
+<path fill="none" stroke="#00ffb6" d="M263.54,-1668C289.03,-1668 323.33,-1668 354.38,-1668"/>
+<polygon fill="#00ffb6" stroke="#00ffb6" points="354.76,-1671.5 364.76,-1668 354.76,-1664.5 354.76,-1671.5"/>
 </g>
 <!-- program~shape_half_circle -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node61" class="node">
 <title>program~shape_half_circle</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node61"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="276,-352 172,-352 172,-328 276,-328 276,-352"/>
-<text text-anchor="middle" x="224" y="-337.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="276,-1554 172,-1554 172,-1530 276,-1530 276,-1554"/>
+<text text-anchor="middle" x="224" y="-1539.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
 <!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge66" class="edge">
 <title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
-<path fill="none" stroke="#00daff" d="M276.03,-340C295.8,-340 319.05,-340 341.49,-340"/>
-<polygon fill="#00daff" stroke="#00daff" points="341.73,-343.5 351.73,-340 341.73,-336.5 341.73,-343.5"/>
+<path fill="none" stroke="#00daff" d="M276.03,-1542C295.8,-1542 319.05,-1542 341.49,-1542"/>
+<polygon fill="#00daff" stroke="#00daff" points="341.73,-1545.5 351.73,-1542 341.73,-1538.5 341.73,-1545.5"/>
 </g>
 <!-- program~shape_half_ring_2d -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node62" class="node">
 <title>program~shape_half_ring_2d</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node62"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-646 166.5,-646 166.5,-622 281.5,-622 281.5,-646"/>
-<text text-anchor="middle" x="224" y="-631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-108 166.5,-108 166.5,-84 281.5,-84 281.5,-108"/>
+<text text-anchor="middle" x="224" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
 </a>
 </g>
 </g>
 <!-- program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge69" class="edge">
 <title>program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#0091ff" d="M281.7,-645.48C306.81,-650.56 336.59,-656.59 363.02,-661.94"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="362.47,-665.4 372.97,-663.95 363.86,-658.54 362.47,-665.4"/>
+<path fill="none" stroke="#0091ff" d="M281.7,-107.48C306.81,-112.56 336.59,-118.59 363.02,-123.94"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="362.47,-127.4 372.97,-125.95 363.86,-120.54 362.47,-127.4"/>
 </g>
 <!-- program~shape_half_ring_3d -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node63" class="node">
 <title>program~shape_half_ring_3d</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node63"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-1722 166.5,-1722 166.5,-1698 281.5,-1698 281.5,-1722"/>
-<text text-anchor="middle" x="224" y="-1707.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-1184 166.5,-1184 166.5,-1160 281.5,-1160 281.5,-1184"/>
+<text text-anchor="middle" x="224" y="-1169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
 <!-- program~shape_half_ring_3d&#45;&gt;proc~set_half_ring -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge67" class="edge">
 <title>program~shape_half_ring_3d&#45;&gt;proc~set_half_ring</title>
-<path fill="none" stroke="#00b6ff" d="M281.7,-1710C299.97,-1710 320.71,-1710 340.84,-1710"/>
-<polygon fill="#00b6ff" stroke="#00b6ff" points="340.97,-1713.5 350.97,-1710 340.97,-1706.5 340.97,-1713.5"/>
+<path fill="none" stroke="#00b6ff" d="M281.7,-1172C299.97,-1172 320.71,-1172 340.84,-1172"/>
+<polygon fill="#00b6ff" stroke="#00b6ff" points="340.97,-1175.5 350.97,-1172 340.97,-1168.5 340.97,-1175.5"/>
 </g>
 <!-- program~shape_hexahedron -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node64" class="node">
 <title>program~shape_hexahedron</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node64"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-1680 167.5,-1680 167.5,-1656 280.5,-1656 280.5,-1680"/>
-<text text-anchor="middle" x="224" y="-1665.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-1142 167.5,-1142 167.5,-1118 280.5,-1118 280.5,-1142"/>
+<text text-anchor="middle" x="224" y="-1127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
 <!-- program~shape_hexahedron&#45;&gt;proc~set_hexahedron -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge70" class="edge">
 <title>program~shape_hexahedron&#45;&gt;proc~set_hexahedron</title>
-<path fill="none" stroke="#006dff" d="M280.61,-1668C296.56,-1668 314.47,-1668 332.24,-1668"/>
-<polygon fill="#006dff" stroke="#006dff" points="332.67,-1671.5 342.67,-1668 332.67,-1664.5 332.67,-1671.5"/>
+<path fill="none" stroke="#006dff" d="M280.61,-1130C296.56,-1130 314.47,-1130 332.24,-1130"/>
+<polygon fill="#006dff" stroke="#006dff" points="332.67,-1133.5 342.67,-1130 332.67,-1126.5 332.67,-1133.5"/>
 </g>
 <!-- program~shape_ring_2d -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node65" class="node">
 <title>program~shape_ring_2d</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node65"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-730 179,-730 179,-706 269,-706 269,-730"/>
-<text text-anchor="middle" x="224" y="-715.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-192 179,-192 179,-168 269,-168 269,-192"/>
+<text text-anchor="middle" x="224" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
 </a>
 </g>
 </g>
 <!-- program~shape_ring_2d&#45;&gt;proc~set_ring~2 -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge73" class="edge">
 <title>program~shape_ring_2d&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#0024ff" d="M269.01,-718C293.59,-718 324.96,-718 353.63,-718"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="353.65,-721.5 363.65,-718 353.65,-714.5 353.65,-721.5"/>
+<path fill="none" stroke="#0024ff" d="M269.01,-180C293.59,-180 324.96,-180 353.63,-180"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="353.65,-183.5 363.65,-180 353.65,-176.5 353.65,-183.5"/>
 </g>
 <!-- program~shape_ring_3d -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node66" class="node">
 <title>program~shape_ring_3d</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node66"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-1638 179,-1638 179,-1614 269,-1614 269,-1638"/>
-<text text-anchor="middle" x="224" y="-1623.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-1100 179,-1100 179,-1076 269,-1076 269,-1100"/>
+<text text-anchor="middle" x="224" y="-1085.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
 <!-- program~shape_ring_3d&#45;&gt;proc~set_ring -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge71" class="edge">
 <title>program~shape_ring_3d&#45;&gt;proc~set_ring</title>
-<path fill="none" stroke="#0048ff" d="M269.01,-1626C293.59,-1626 324.96,-1626 353.63,-1626"/>
-<polygon fill="#0048ff" stroke="#0048ff" points="353.65,-1629.5 363.65,-1626 353.65,-1622.5 353.65,-1629.5"/>
+<path fill="none" stroke="#0048ff" d="M269.01,-1088C293.59,-1088 324.96,-1088 353.63,-1088"/>
+<polygon fill="#0048ff" stroke="#0048ff" points="353.65,-1091.5 363.65,-1088 353.65,-1084.5 353.65,-1091.5"/>
 </g>
 <!-- program~shape_tetragon -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_node67" class="node">
 <title>program~shape_tetragon</title>
 <g id="a_proc~~compute_knot_vector~~CalledByGraph_node67"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-814 176,-814 176,-790 272,-790 272,-814"/>
-<text text-anchor="middle" x="224" y="-799.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-276 176,-276 176,-252 272,-252 272,-276"/>
+<text text-anchor="middle" x="224" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
 </a>
 </g>
 </g>
 <!-- program~shape_tetragon&#45;&gt;proc~set_tetragon -->
 <g id="proc~~compute_knot_vector~~CalledByGraph_edge78" class="edge">
 <title>program~shape_tetragon&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0000ff" d="M272.08,-792.47C298.94,-787.03 333.11,-780.12 363,-774.07"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="363.85,-777.47 372.96,-772.05 362.46,-770.61 363.85,-777.47"/>
+<path fill="none" stroke="#0000ff" d="M272.08,-254.47C298.94,-249.03 333.11,-242.12 363,-236.07"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="363.85,-239.47 372.96,-234.05 362.46,-232.61 363.85,-239.47"/>
 </g>
 </g>
 </svg>
@@ -1550,7 +1550,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_multiplicity1.html b/proc/compute_multiplicity1.html
index 8de710737..f17d6af7d 100644
--- a/proc/compute_multiplicity1.html
+++ b/proc/compute_multiplicity1.html
@@ -156,7 +156,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~10"></span>
+              <span class="anchor" id="variable-knot~31"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -199,581 +199,581 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node1" class="node">
 <title>proc~compute_multiplicity1</title>
-<polygon fill="none" stroke="black" points="1608,-1154.51 1478,-1154.51 1478,-1130.51 1608,-1130.51 1608,-1154.51"/>
-<text text-anchor="middle" x="1543" y="-1140.11" font-family="Helvetica,sans-Serif" font-size="10.50">compute_multiplicity1</text>
+<polygon fill="none" stroke="black" points="1608,-1163.51 1478,-1163.51 1478,-1139.51 1608,-1139.51 1608,-1163.51"/>
+<text text-anchor="middle" x="1543" y="-1149.11" font-family="Helvetica,sans-Serif" font-size="10.50">compute_multiplicity1</text>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node2" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~compute_multiplicity1~~CalledByGraph_node2"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1442,-1154.51 1318,-1154.51 1318,-1130.51 1442,-1130.51 1442,-1154.51"/>
-<text text-anchor="middle" x="1380" y="-1140.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1442,-1163.51 1318,-1163.51 1318,-1139.51 1442,-1139.51 1442,-1163.51"/>
+<text text-anchor="middle" x="1380" y="-1149.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge1" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1442.33,-1142.51C1450.6,-1142.51 1459.17,-1142.51 1467.64,-1142.51"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1467.9,-1146.01 1477.9,-1142.51 1467.9,-1139.01 1467.9,-1146.01"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1442.33,-1151.51C1450.6,-1151.51 1459.17,-1151.51 1467.64,-1151.51"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1467.9,-1155.01 1477.9,-1151.51 1467.9,-1148.01 1467.9,-1155.01"/>
 </g>
 <!-- proc~cmp_nc -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node3" class="node">
 <title>proc~cmp_nc</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node3"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="1056,-1358.51 917,-1358.51 917,-1334.51 1056,-1334.51 1056,-1358.51"/>
-<text text-anchor="middle" x="986.5" y="-1344.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node3"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_curve%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="1257.5,-1602.51 1128.5,-1602.51 1128.5,-1578.51 1257.5,-1578.51 1257.5,-1602.51"/>
+<text text-anchor="middle" x="1193" y="-1588.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_nc</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge2" class="edge">
 <title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M994.85,-1334.44C1011.11,-1308.82 1052.81,-1248.83 1104,-1218.51 1174.03,-1177.03 1203.84,-1198.19 1282,-1175.51 1299.99,-1170.28 1319.6,-1163.77 1336.45,-1157.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1337.74,-1161.17 1346.02,-1154.56 1335.42,-1154.57 1337.74,-1161.17"/>
+<path fill="none" stroke="#ff0000" d="M1257.77,-1580.53C1266.84,-1576.74 1275.33,-1571.57 1282,-1564.51 1336.72,-1506.6 1368.23,-1251.57 1376.68,-1173.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1380.18,-1174.18 1377.76,-1163.87 1373.22,-1173.44 1380.18,-1174.18"/>
 </g>
 <!-- proc~cmp_nc~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node4" class="node">
 <title>proc~cmp_nc~2</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node4"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="1056,-892.51 917,-892.51 917,-868.51 1056,-868.51 1056,-892.51"/>
-<text text-anchor="middle" x="986.5" y="-878.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node4"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="1056,-1358.51 917,-1358.51 917,-1334.51 1056,-1334.51 1056,-1358.51"/>
+<text text-anchor="middle" x="986.5" y="-1344.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge3" class="edge">
 <title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1056.27,-877.89C1120.95,-878.95 1217.28,-890.07 1282,-940.51 1341.29,-986.72 1366.34,-1078.26 1375.06,-1120.37"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1371.67,-1121.26 1377.02,-1130.4 1378.54,-1119.92 1371.67,-1121.26"/>
+<path fill="none" stroke="#ff0000" d="M995.84,-1334.2C1013.04,-1309.82 1054.98,-1255.35 1104,-1227.51 1174.77,-1187.31 1203.84,-1207.19 1282,-1184.51 1299.99,-1179.28 1319.6,-1172.77 1336.45,-1166.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1337.74,-1170.17 1346.02,-1163.56 1335.42,-1163.57 1337.74,-1170.17"/>
 </g>
 <!-- proc~cmp_nc~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node5" class="node">
 <title>proc~cmp_nc~3</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node5"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_curve%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="1257.5,-1522.51 1128.5,-1522.51 1128.5,-1498.51 1257.5,-1498.51 1257.5,-1522.51"/>
-<text text-anchor="middle" x="1193" y="-1508.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_nc</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node5"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="1056,-901.51 917,-901.51 917,-877.51 1056,-877.51 1056,-901.51"/>
+<text text-anchor="middle" x="986.5" y="-887.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge4" class="edge">
 <title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1257.94,-1500.07C1266.87,-1496.34 1275.28,-1491.3 1282,-1484.51 1371.91,-1393.61 1379.82,-1225.89 1379.57,-1165.19"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1383.07,-1164.79 1379.44,-1154.83 1376.07,-1164.87 1383.07,-1164.79"/>
+<path fill="none" stroke="#ff0000" d="M1056.27,-886.89C1120.95,-887.95 1217.28,-899.07 1282,-949.51 1341.29,-995.72 1366.34,-1087.26 1375.06,-1129.37"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1371.67,-1130.26 1377.02,-1139.4 1378.54,-1128.92 1371.67,-1130.26"/>
 </g>
 <!-- proc~elevate_degree_a_5_9 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node6" class="node">
 <title>proc~elevate_degree_a_5_9</title>
 <g id="a_proc~~compute_multiplicity1~~CalledByGraph_node6"><a xlink:href="../proc/elevate_degree_a_5_9.html" xlink:title="elevate_degree_A_5_9">
-<polygon fill="#d9534f" stroke="#d9534f" points="702.5,-1052.51 570.5,-1052.51 570.5,-1028.51 702.5,-1028.51 702.5,-1052.51"/>
-<text text-anchor="middle" x="636.5" y="-1038.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elevate_degree_A_5_9</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="702.5,-1051.51 570.5,-1051.51 570.5,-1027.51 702.5,-1027.51 702.5,-1051.51"/>
+<text text-anchor="middle" x="636.5" y="-1037.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elevate_degree_A_5_9</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree_a_5_9&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge5" class="edge">
 <title>proc~elevate_degree_a_5_9&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M702.59,-1031C845.36,-1011.33 1181.3,-971.92 1282,-1020.51 1325.17,-1041.33 1355.03,-1091.74 1369.34,-1120.83"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1366.31,-1122.6 1373.75,-1130.14 1372.64,-1119.61 1366.31,-1122.6"/>
+<path fill="none" stroke="#ff0000" d="M702.59,-1031.24C845.37,-1014.25 1181.34,-980.94 1282,-1029.51 1325.17,-1050.33 1355.03,-1100.74 1369.34,-1129.83"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1366.31,-1131.6 1373.75,-1139.14 1372.64,-1128.61 1366.31,-1131.6"/>
 </g>
 <!-- proc~get_continuity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node7" class="node">
 <title>proc~get_continuity</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node7"><a xlink:href="../proc/get_continuity.html" xlink:title="nurbs_volume%get_continuity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1279,-1335.51 1107,-1335.51 1107,-1311.51 1279,-1311.51 1279,-1335.51"/>
-<text text-anchor="middle" x="1193" y="-1321.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_continuity</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node7"><a xlink:href="../proc/get_continuity.html" xlink:title="nurbs_curve%get_continuity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1274.5,-1344.51 1111.5,-1344.51 1111.5,-1320.51 1274.5,-1320.51 1274.5,-1344.51"/>
+<text text-anchor="middle" x="1193" y="-1330.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_continuity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_continuity&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge6" class="edge">
 <title>proc~get_continuity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1266.27,-1311.41C1271.85,-1308.96 1277.18,-1306.02 1282,-1302.51 1330.52,-1267.13 1359.55,-1199.4 1371.94,-1164.5"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1375.33,-1165.39 1375.25,-1154.8 1368.7,-1163.13 1375.33,-1165.39"/>
+<path fill="none" stroke="#ff0000" d="M1266.27,-1320.41C1271.85,-1317.96 1277.18,-1315.02 1282,-1311.51 1330.52,-1276.13 1359.55,-1208.4 1371.94,-1173.5"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1375.33,-1174.39 1375.25,-1163.8 1368.7,-1172.13 1375.33,-1174.39"/>
 </g>
 <!-- proc~get_continuity~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node8" class="node">
 <title>proc~get_continuity~2</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node8"><a xlink:href="../proc/get_continuity~2.html" xlink:title="nurbs_surface%get_continuity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1279,-1293.51 1107,-1293.51 1107,-1269.51 1279,-1269.51 1279,-1293.51"/>
-<text text-anchor="middle" x="1193" y="-1279.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_continuity</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node8"><a xlink:href="../proc/get_continuity~2.html" xlink:title="nurbs_volume%get_continuity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1279,-1302.51 1107,-1302.51 1107,-1278.51 1279,-1278.51 1279,-1302.51"/>
+<text text-anchor="middle" x="1193" y="-1288.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_continuity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_continuity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge7" class="edge">
 <title>proc~get_continuity~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1263.94,-1269.35C1270.28,-1266.92 1276.41,-1264 1282,-1260.51 1321.06,-1236.1 1351.76,-1190.5 1367.47,-1163.7"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1370.67,-1165.17 1372.57,-1154.75 1364.58,-1161.7 1370.67,-1165.17"/>
+<path fill="none" stroke="#ff0000" d="M1263.94,-1278.35C1270.28,-1275.92 1276.41,-1273 1282,-1269.51 1321.06,-1245.1 1351.76,-1199.5 1367.47,-1172.7"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1370.67,-1174.17 1372.57,-1163.75 1364.58,-1170.7 1370.67,-1174.17"/>
 </g>
 <!-- proc~get_continuity~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node9" class="node">
 <title>proc~get_continuity~3</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node9"><a xlink:href="../proc/get_continuity~3.html" xlink:title="nurbs_curve%get_continuity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1274.5,-1251.51 1111.5,-1251.51 1111.5,-1227.51 1274.5,-1227.51 1274.5,-1251.51"/>
-<text text-anchor="middle" x="1193" y="-1237.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_continuity</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node9"><a xlink:href="../proc/get_continuity~3.html" xlink:title="nurbs_surface%get_continuity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1279,-1260.51 1107,-1260.51 1107,-1236.51 1279,-1236.51 1279,-1260.51"/>
+<text text-anchor="middle" x="1193" y="-1246.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_continuity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_continuity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge8" class="edge">
 <title>proc~get_continuity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1245.86,-1227.41C1258.02,-1223.7 1270.72,-1219.09 1282,-1213.51 1310.35,-1199.48 1339.13,-1177.17 1357.9,-1161.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1360.24,-1163.91 1365.54,-1154.74 1355.67,-1158.6 1360.24,-1163.91"/>
+<path fill="none" stroke="#ff0000" d="M1245.86,-1236.41C1258.02,-1232.7 1270.72,-1228.09 1282,-1222.51 1310.35,-1208.48 1339.13,-1186.17 1357.9,-1170.31"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1360.24,-1172.91 1365.54,-1163.74 1355.67,-1167.6 1360.24,-1172.91"/>
 </g>
 <!-- proc~get_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node10" class="node">
 <title>proc~get_multiplicity</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node10"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1282,-1564.51 1104,-1564.51 1104,-1540.51 1282,-1540.51 1282,-1564.51"/>
-<text text-anchor="middle" x="1193" y="-1550.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node10"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1277.5,-286.51 1108.5,-286.51 1108.5,-262.51 1277.5,-262.51 1277.5,-286.51"/>
+<text text-anchor="middle" x="1193" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge9" class="edge">
 <title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1270.42,-1540.29C1274.63,-1537.84 1278.54,-1534.93 1282,-1531.51 1335.28,-1478.76 1367.58,-1239.29 1376.48,-1164.73"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1379.98,-1164.94 1377.66,-1154.6 1373.03,-1164.13 1379.98,-1164.94"/>
+<path fill="none" stroke="#ff0000" d="M1197.9,-286.54C1211.19,-327.81 1255.29,-467.57 1282,-585.51 1329.45,-794.99 1365.73,-1052.74 1376.04,-1129.16"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1372.62,-1130.02 1377.42,-1139.47 1379.56,-1129.09 1372.62,-1130.02"/>
 </g>
 <!-- proc~get_multiplicity~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node11" class="node">
 <title>proc~get_multiplicity~2</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node11"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1282,-973.51 1104,-973.51 1104,-949.51 1282,-949.51 1282,-973.51"/>
-<text text-anchor="middle" x="1193" y="-959.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node11"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1282,-1522.51 1104,-1522.51 1104,-1498.51 1282,-1498.51 1282,-1522.51"/>
+<text text-anchor="middle" x="1193" y="-1508.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge10" class="edge">
 <title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1255.92,-973.55C1265.21,-977.08 1274.26,-981.63 1282,-987.51 1328.31,-1022.67 1358.01,-1086.87 1371.16,-1120.55"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1368.05,-1122.21 1374.85,-1130.34 1374.6,-1119.75 1368.05,-1122.21"/>
+<path fill="none" stroke="#ff0000" d="M1261.44,-1498.47C1269.05,-1494.93 1276.15,-1490.38 1282,-1484.51 1370.03,-1396.14 1379.11,-1232.74 1379.37,-1173.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1382.87,-1173.5 1379.33,-1163.52 1375.87,-1173.53 1382.87,-1173.5"/>
 </g>
 <!-- proc~get_multiplicity~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node12" class="node">
 <title>proc~get_multiplicity~3</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node12"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1277.5,-286.51 1108.5,-286.51 1108.5,-262.51 1277.5,-262.51 1277.5,-286.51"/>
-<text text-anchor="middle" x="1193" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node12"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1282,-982.51 1104,-982.51 1104,-958.51 1282,-958.51 1282,-982.51"/>
+<text text-anchor="middle" x="1193" y="-968.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge11" class="edge">
 <title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1199.48,-286.56C1214.88,-320.94 1258.95,-422.72 1282,-511.51 1342.65,-745.11 1370.31,-1037.86 1377.21,-1120.11"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1373.74,-1120.61 1378.05,-1130.29 1380.72,-1120.04 1373.74,-1120.61"/>
+<path fill="none" stroke="#ff0000" d="M1255.92,-982.55C1265.21,-986.08 1274.26,-990.63 1282,-996.51 1328.31,-1031.67 1358.01,-1095.87 1371.16,-1129.55"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1368.05,-1131.21 1374.85,-1139.34 1374.6,-1128.75 1368.05,-1131.21"/>
 </g>
 <!-- proc~get_nc_dir -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node13" class="node">
 <title>proc~get_nc_dir</title>
 <g id="a_proc~~compute_multiplicity1~~CalledByGraph_node13"><a xlink:href="../proc/get_nc_dir.html" xlink:title="nurbs_volume%get_nc_dir">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1269,-1095.51 1117,-1095.51 1117,-1071.51 1269,-1071.51 1269,-1095.51"/>
-<text text-anchor="middle" x="1193" y="-1081.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_nc_dir</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1269,-1104.51 1117,-1104.51 1117,-1080.51 1269,-1080.51 1269,-1104.51"/>
+<text text-anchor="middle" x="1193" y="-1090.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_nc_dir</text>
 </a>
 </g>
 </g>
 <!-- proc~get_nc_dir&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge12" class="edge">
 <title>proc~get_nc_dir&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1236.18,-1095.59C1250.74,-1099.86 1267.12,-1104.78 1282,-1109.51 1299.27,-1114.99 1318.15,-1121.34 1334.63,-1126.99"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1333.95,-1130.46 1344.54,-1130.41 1336.23,-1123.84 1333.95,-1130.46"/>
+<path fill="none" stroke="#ff0000" d="M1236.18,-1104.59C1250.74,-1108.86 1267.12,-1113.78 1282,-1118.51 1299.27,-1123.99 1318.15,-1130.34 1334.63,-1135.99"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1333.95,-1139.46 1344.54,-1139.41 1336.23,-1132.84 1333.95,-1139.46"/>
 </g>
 <!-- proc~get_nc_dir~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node14" class="node">
 <title>proc~get_nc_dir~2</title>
 <g id="a_proc~~compute_multiplicity1~~CalledByGraph_node14"><a xlink:href="../proc/get_nc_dir~2.html" xlink:title="nurbs_surface%get_nc_dir">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1269,-1053.51 1117,-1053.51 1117,-1029.51 1269,-1029.51 1269,-1053.51"/>
-<text text-anchor="middle" x="1193" y="-1039.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_nc_dir</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1269,-1062.51 1117,-1062.51 1117,-1038.51 1269,-1038.51 1269,-1062.51"/>
+<text text-anchor="middle" x="1193" y="-1048.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_nc_dir</text>
 </a>
 </g>
 </g>
 <!-- proc~get_nc_dir~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge13" class="edge">
 <title>proc~get_nc_dir~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1259.58,-1053.62C1267.33,-1056.07 1274.97,-1059.01 1282,-1062.51 1312.95,-1077.92 1342.73,-1104.88 1360.94,-1123.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1358.53,-1125.74 1368.01,-1130.47 1363.54,-1120.86 1358.53,-1125.74"/>
+<path fill="none" stroke="#ff0000" d="M1259.58,-1062.62C1267.33,-1065.07 1274.97,-1068.01 1282,-1071.51 1312.95,-1086.92 1342.73,-1113.88 1360.94,-1132.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1358.53,-1134.74 1368.01,-1139.47 1363.54,-1129.86 1358.53,-1134.74"/>
 </g>
 <!-- proc~insert_knots -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node15" class="node">
 <title>proc~insert_knots</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node15"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514,-1732.51 353,-1732.51 353,-1708.51 514,-1708.51 514,-1732.51"/>
-<text text-anchor="middle" x="433.5" y="-1718.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node15"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_curve%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="509,-492.51 358,-492.51 358,-468.51 509,-468.51 509,-492.51"/>
+<text text-anchor="middle" x="433.5" y="-478.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge14" class="edge">
 <title>proc~insert_knots&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M490.71,-1708.47C579.19,-1689.93 747.15,-1656.51 808,-1656.51 808,-1656.51 808,-1656.51 987.5,-1656.51 1123.49,-1656.51 1188.44,-1672.2 1282,-1573.51 1339.34,-1513.03 1369.23,-1244.65 1376.95,-1164.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1380.47,-1164.86 1377.93,-1154.57 1373.5,-1164.2 1380.47,-1164.86"/>
+<path fill="none" stroke="#ff0000" d="M509.4,-491.53C514.7,-494.22 519.66,-497.5 524,-501.51 562.43,-536.96 529.55,-571.01 560,-613.51 639.94,-725.07 670.75,-797.51 808,-797.51 808,-797.51 808,-797.51 987.5,-797.51 1124.24,-797.51 1182.58,-792.64 1282,-886.51 1353.53,-954.05 1372.53,-1078.69 1377.39,-1129.29"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1373.92,-1129.78 1378.27,-1139.44 1380.9,-1129.18 1373.92,-1129.78"/>
 </g>
 <!-- none~set -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_node37" class="node">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_node50" class="node">
 <title>none~set</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node37"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="693,-1442.51 580,-1442.51 580,-1418.51 693,-1418.51 693,-1442.51"/>
-<text text-anchor="middle" x="636.5" y="-1428.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node50"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="688,-286.51 585,-286.51 585,-262.51 688,-262.51 688,-286.51"/>
+<text text-anchor="middle" x="636.5" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;none~set -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge62" class="edge">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge102" class="edge">
 <title>proc~insert_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M510.35,-1708.45C515.25,-1705.97 519.86,-1703.02 524,-1699.51 544.17,-1682.37 605.96,-1513.25 627.77,-1452.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="631.19,-1453.12 631.25,-1442.52 624.6,-1450.76 631.19,-1453.12"/>
+<path fill="none" stroke="#ff0000" d="M508.45,-468.33C513.96,-465.89 519.23,-462.98 524,-459.51 581.76,-417.45 615.3,-335.52 628.69,-296.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="632.05,-297.33 631.86,-286.74 625.4,-295.14 632.05,-297.33"/>
 </g>
 <!-- proc~insert_knots~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node16" class="node">
 <title>proc~insert_knots~2</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node16"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514,-1152.51 353,-1152.51 353,-1128.51 514,-1128.51 514,-1152.51"/>
-<text text-anchor="middle" x="433.5" y="-1138.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node16"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514,-1732.51 353,-1732.51 353,-1708.51 514,-1708.51 514,-1732.51"/>
+<text text-anchor="middle" x="433.5" y="-1718.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge15" class="edge">
 <title>proc~insert_knots~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M514.21,-1147.59C589.78,-1153.68 706.52,-1161.51 808,-1161.51 808,-1161.51 808,-1161.51 987.5,-1161.51 1099.35,-1161.51 1228.97,-1153.67 1307.42,-1148.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1307.96,-1151.54 1317.68,-1147.33 1307.45,-1144.56 1307.96,-1151.54"/>
+<path fill="none" stroke="#ff0000" d="M495.3,-1708.44C505.02,-1705.88 514.88,-1702.91 524,-1699.51 657.56,-1649.72 665.46,-1550.51 808,-1550.51 808,-1550.51 808,-1550.51 987.5,-1550.51 1053.08,-1550.51 1231.53,-1573.39 1282,-1531.51 1338.44,-1484.67 1368.58,-1247.54 1376.72,-1173.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1380.21,-1173.84 1377.8,-1163.52 1373.25,-1173.09 1380.21,-1173.84"/>
 </g>
 <!-- none~set~2 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_node38" class="node">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_node37" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node38"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="693,-870.51 580,-870.51 580,-846.51 693,-846.51 693,-870.51"/>
-<text text-anchor="middle" x="636.5" y="-856.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node37"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="693,-1442.51 580,-1442.51 580,-1418.51 693,-1418.51 693,-1442.51"/>
+<text text-anchor="middle" x="636.5" y="-1428.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;none~set~2 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge77" class="edge">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge62" class="edge">
 <title>proc~insert_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M512.81,-1128.34C516.89,-1125.87 520.67,-1122.94 524,-1119.51 580.18,-1061.56 523.53,-1013.51 560,-941.51 572.78,-916.27 595.36,-892.95 612.51,-877.5"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="615.2,-879.79 620.42,-870.57 610.59,-874.53 615.2,-879.79"/>
+<path fill="none" stroke="#ff0000" d="M512.74,-1708.27C516.83,-1705.81 520.64,-1702.91 524,-1699.51 576.12,-1646.7 529.87,-1604.31 560,-1536.51 574.68,-1503.48 600.49,-1470.34 617.79,-1450.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="620.47,-1452.38 624.41,-1442.54 615.2,-1447.77 620.47,-1452.38"/>
 </g>
 <!-- proc~insert_knots~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node17" class="node">
 <title>proc~insert_knots~3</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node17"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_curve%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="509,-450.51 358,-450.51 358,-426.51 509,-426.51 509,-450.51"/>
-<text text-anchor="middle" x="433.5" y="-436.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node17"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514,-1152.51 353,-1152.51 353,-1128.51 514,-1128.51 514,-1152.51"/>
+<text text-anchor="middle" x="433.5" y="-1138.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge16" class="edge">
 <title>proc~insert_knots~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M485.71,-450.51C587.55,-474.38 805.96,-525.51 808,-525.51 808,-525.51 808,-525.51 987.5,-525.51 1133.2,-525.51 1192.77,-554.33 1282,-669.51 1338.2,-742.05 1369.22,-1036.47 1377.02,-1120.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1373.56,-1120.72 1377.95,-1130.36 1380.53,-1120.09 1373.56,-1120.72"/>
+<path fill="none" stroke="#ff0000" d="M514.13,-1150.62C589.65,-1159.33 706.36,-1170.51 808,-1170.51 808,-1170.51 808,-1170.51 987.5,-1170.51 1099.35,-1170.51 1228.97,-1162.67 1307.42,-1157.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1307.96,-1160.54 1317.68,-1156.33 1307.45,-1153.56 1307.96,-1160.54"/>
 </g>
 <!-- none~set~3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_node50" class="node">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_node38" class="node">
 <title>none~set~3</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node50"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="688,-286.51 585,-286.51 585,-262.51 688,-262.51 688,-286.51"/>
-<text text-anchor="middle" x="636.5" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node38"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="693,-870.51 580,-870.51 580,-846.51 693,-846.51 693,-870.51"/>
+<text text-anchor="middle" x="636.5" y="-856.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;none~set~3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge102" class="edge">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge77" class="edge">
 <title>proc~insert_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M495,-426.41C505.16,-422.88 515.24,-418.33 524,-412.51 570.28,-381.72 606.72,-325.76 624.2,-295.42"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="627.34,-296.96 629.19,-286.53 621.24,-293.53 627.34,-296.96"/>
+<path fill="none" stroke="#ff7500" d="M512.77,-1128.3C516.85,-1125.83 520.65,-1122.93 524,-1119.51 577.74,-1064.65 526.7,-1019.71 560,-950.51 573.6,-922.25 597.61,-895.17 614.9,-877.79"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="617.63,-880.02 622.32,-870.52 612.73,-875.03 617.63,-880.02"/>
 </g>
 <!-- proc~remove_knots -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node18" class="node">
 <title>proc~remove_knots</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node18"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-1690.51 347.5,-1690.51 347.5,-1666.51 519.5,-1666.51 519.5,-1690.51"/>
-<text text-anchor="middle" x="433.5" y="-1676.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node18"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_curve%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514.5,-450.51 352.5,-450.51 352.5,-426.51 514.5,-426.51 514.5,-450.51"/>
+<text text-anchor="middle" x="433.5" y="-436.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge17" class="edge">
 <title>proc~remove_knots&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M483.24,-1666.44C496.72,-1662.4 511.17,-1657.4 524,-1651.51 660.04,-1589.08 658.32,-1470.51 808,-1470.51 808,-1470.51 808,-1470.51 987.5,-1470.51 1129.87,-1470.51 1182.14,-1445.98 1282,-1344.51 1334.24,-1291.42 1362.6,-1204.76 1373.57,-1164.44"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1377.01,-1165.13 1376.16,-1154.57 1370.24,-1163.36 1377.01,-1165.13"/>
+<path fill="none" stroke="#ff0000" d="M494.27,-450.53C504.31,-453.12 514.53,-456.11 524,-459.51 656.47,-507 667.27,-599.51 808,-599.51 808,-599.51 808,-599.51 987.5,-599.51 1144.97,-599.51 1189.99,-668.71 1282,-796.51 1359.15,-903.67 1374.95,-1069.19 1378.18,-1128.99"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1374.69,-1129.36 1378.66,-1139.19 1381.68,-1129.03 1374.69,-1129.36"/>
 </g>
 <!-- proc~remove_knots&#45;&gt;none~set -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge65" class="edge">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge105" class="edge">
 <title>proc~remove_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M505.43,-1666.32C512.39,-1662.78 518.79,-1658.27 524,-1652.51 583.38,-1586.8 502.24,-1523.65 560,-1456.51 563.17,-1452.83 566.88,-1449.66 570.93,-1446.95"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="572.7,-1449.97 579.66,-1441.98 569.24,-1443.89 572.7,-1449.97"/>
+<path fill="none" stroke="#ff0000" d="M495,-426.41C505.16,-422.88 515.24,-418.33 524,-412.51 570.28,-381.72 606.72,-325.76 624.2,-295.42"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="627.34,-296.96 629.19,-286.53 621.24,-293.53 627.34,-296.96"/>
 </g>
 <!-- proc~remove_knots~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node19" class="node">
 <title>proc~remove_knots~2</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node19"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-1110.51 347.5,-1110.51 347.5,-1086.51 519.5,-1086.51 519.5,-1110.51"/>
-<text text-anchor="middle" x="433.5" y="-1096.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node19"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-1690.51 347.5,-1690.51 347.5,-1666.51 519.5,-1666.51 519.5,-1690.51"/>
+<text text-anchor="middle" x="433.5" y="-1676.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge18" class="edge">
 <title>proc~remove_knots~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M519.69,-1107.46C595.32,-1114.64 708.89,-1123.51 808,-1123.51 808,-1123.51 808,-1123.51 987.5,-1123.51 1099.35,-1123.51 1228.97,-1131.34 1307.42,-1136.95"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1307.45,-1140.46 1317.68,-1137.69 1307.96,-1133.48 1307.45,-1140.46"/>
+<path fill="none" stroke="#ff0000" d="M501.65,-1666.32C509.91,-1662.61 517.66,-1657.79 524,-1651.51 562.07,-1613.83 521.32,-1573.55 560,-1536.51 642.38,-1457.62 693.94,-1470.51 808,-1470.51 808,-1470.51 808,-1470.51 987.5,-1470.51 1128.34,-1470.51 1181.51,-1452.18 1282,-1353.51 1335.14,-1301.32 1363.05,-1214.22 1373.74,-1173.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1377.2,-1174.23 1376.26,-1163.67 1370.41,-1172.51 1377.2,-1174.23"/>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;none~set~2 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge80" class="edge">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge65" class="edge">
 <title>proc~remove_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M512.16,-1086.35C516.45,-1083.88 520.45,-1080.96 524,-1077.51 568.83,-1033.92 530.11,-996.43 560,-941.51 573.52,-916.66 596,-893.29 612.92,-877.72"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="615.61,-880.01 620.72,-870.73 610.94,-874.8 615.61,-880.01"/>
+<path fill="none" stroke="#ff0000" d="M505.43,-1666.32C512.39,-1662.78 518.79,-1658.27 524,-1652.51 583.38,-1586.8 502.24,-1523.65 560,-1456.51 563.17,-1452.83 566.88,-1449.66 570.93,-1446.95"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="572.7,-1449.97 579.66,-1441.98 569.24,-1443.89 572.7,-1449.97"/>
 </g>
 <!-- proc~remove_knots~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node20" class="node">
 <title>proc~remove_knots~3</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node20"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_curve%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514.5,-492.51 352.5,-492.51 352.5,-468.51 514.5,-468.51 514.5,-492.51"/>
-<text text-anchor="middle" x="433.5" y="-478.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node20"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-1110.51 347.5,-1110.51 347.5,-1086.51 519.5,-1086.51 519.5,-1110.51"/>
+<text text-anchor="middle" x="433.5" y="-1096.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge19" class="edge">
 <title>proc~remove_knots~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M504.45,-492.66C511.27,-495.09 517.91,-498.01 524,-501.51 544.17,-513.1 541,-526.09 560,-539.51 658.49,-609.07 687.42,-649.51 808,-649.51 808,-649.51 808,-649.51 987.5,-649.51 1153.03,-649.51 1184.29,-743.89 1282,-877.51 1339.42,-956.02 1366.12,-1072.14 1375.21,-1120.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1371.79,-1121.07 1377.02,-1130.28 1378.68,-1119.82 1371.79,-1121.07"/>
+<path fill="none" stroke="#ff0000" d="M518.48,-1110.54C594.05,-1120.32 708.22,-1132.51 808,-1132.51 808,-1132.51 808,-1132.51 987.5,-1132.51 1099.35,-1132.51 1228.97,-1140.34 1307.42,-1145.95"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1307.45,-1149.46 1317.68,-1146.69 1307.96,-1142.48 1307.45,-1149.46"/>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;none~set~3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge105" class="edge">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge80" class="edge">
 <title>proc~remove_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M508.45,-468.33C513.96,-465.89 519.23,-462.98 524,-459.51 581.76,-417.45 615.3,-335.52 628.69,-296.36"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="632.05,-297.33 631.86,-286.74 625.4,-295.14 632.05,-297.33"/>
+<path fill="none" stroke="#ff7500" d="M512.09,-1086.28C516.4,-1083.82 520.42,-1080.92 524,-1077.51 566.42,-1036.98 532.82,-1002.5 560,-950.51 574.53,-922.72 598.36,-895.55 615.37,-878.02"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="618.09,-880.25 622.64,-870.69 613.11,-875.32 618.09,-880.25"/>
 </g>
 <!-- proc~cmp_degree -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node21" class="node">
 <title>proc~cmp_degree</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node21"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="1068,-1442.51 905,-1442.51 905,-1418.51 1068,-1418.51 1068,-1442.51"/>
-<text text-anchor="middle" x="986.5" y="-1428.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node21"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="1063.5,-286.51 909.5,-286.51 909.5,-262.51 1063.5,-262.51 1063.5,-286.51"/>
+<text text-anchor="middle" x="986.5" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge27" class="edge">
 <title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#00ff55" d="M997.72,-1442.55C1016.5,-1463.9 1058.75,-1508.28 1104,-1531.51 1107.96,-1533.54 1112.12,-1535.38 1116.39,-1537.04"/>
-<polygon fill="#00ff55" stroke="#00ff55" points="1115.27,-1540.36 1125.87,-1540.41 1117.62,-1533.77 1115.27,-1540.36"/>
+<path fill="none" stroke="#00ff55" d="M1063.65,-274.51C1074.89,-274.51 1086.58,-274.51 1098.13,-274.51"/>
+<polygon fill="#00ff55" stroke="#00ff55" points="1098.23,-278.01 1108.23,-274.51 1098.23,-271.01 1098.23,-278.01"/>
 </g>
 <!-- proc~cmp_degree~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node22" class="node">
 <title>proc~cmp_degree~2</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node22"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="1068,-934.51 905,-934.51 905,-910.51 1068,-910.51 1068,-934.51"/>
-<text text-anchor="middle" x="986.5" y="-920.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node22"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="1068,-1442.51 905,-1442.51 905,-1418.51 1068,-1418.51 1068,-1442.51"/>
+<text text-anchor="middle" x="986.5" y="-1428.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge29" class="edge">
 <title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
-<path fill="none" stroke="#00ffa9" d="M1050.53,-934.53C1072.1,-938.64 1096.42,-943.28 1118.74,-947.54"/>
-<polygon fill="#00ffa9" stroke="#00ffa9" points="1118.35,-951.02 1128.83,-949.46 1119.66,-944.15 1118.35,-951.02"/>
+<path fill="none" stroke="#00ffa9" d="M1018.56,-1442.66C1054.2,-1456.6 1112.75,-1479.5 1151.83,-1494.79"/>
+<polygon fill="#00ffa9" stroke="#00ffa9" points="1150.73,-1498.12 1161.32,-1498.5 1153.28,-1491.6 1150.73,-1498.12"/>
 </g>
 <!-- proc~cmp_degree~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node23" class="node">
 <title>proc~cmp_degree~3</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node23"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="1063.5,-286.51 909.5,-286.51 909.5,-262.51 1063.5,-262.51 1063.5,-286.51"/>
-<text text-anchor="middle" x="986.5" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node23"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="1068,-943.51 905,-943.51 905,-919.51 1068,-919.51 1068,-943.51"/>
+<text text-anchor="middle" x="986.5" y="-929.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge31" class="edge">
 <title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#00ffff" d="M1063.65,-274.51C1074.89,-274.51 1086.58,-274.51 1098.13,-274.51"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="1098.23,-278.01 1108.23,-274.51 1098.23,-271.01 1098.23,-278.01"/>
+<path fill="none" stroke="#00ffff" d="M1050.53,-943.53C1072.1,-947.64 1096.42,-952.28 1118.74,-956.54"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="1118.35,-960.02 1128.83,-958.46 1119.66,-953.15 1118.35,-960.02"/>
 </g>
 <!-- proc~cmp_elem -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node24" class="node">
 <title>proc~cmp_elem</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node24"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_volume%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="713,-1794.51 560,-1794.51 560,-1770.51 713,-1770.51 713,-1794.51"/>
-<text text-anchor="middle" x="636.5" y="-1780.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node24"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_curve%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="708,-38.51 565,-38.51 565,-14.51 708,-14.51 708,-38.51"/>
+<text text-anchor="middle" x="636.5" y="-24.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem&#45;&gt;proc~get_multiplicity -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge28" class="edge">
 <title>proc~cmp_elem&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#00ff55" d="M666.53,-1770.47C759.34,-1731.97 1048.88,-1611.87 1153.66,-1568.41"/>
-<polygon fill="#00ff55" stroke="#00ff55" points="1155.03,-1571.63 1162.92,-1564.57 1152.34,-1565.17 1155.03,-1571.63"/>
+<path fill="none" stroke="#00ff55" d="M664.62,-38.64C755.92,-79.47 1052.17,-211.97 1155.8,-258.32"/>
+<polygon fill="#00ff55" stroke="#00ff55" points="1154.37,-261.51 1164.93,-262.4 1157.23,-255.12 1154.37,-261.51"/>
 </g>
 <!-- proc~cmp_elem~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node25" class="node">
 <title>proc~cmp_elem~2</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node25"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_surface%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="713,-974.51 560,-974.51 560,-950.51 713,-950.51 713,-974.51"/>
-<text text-anchor="middle" x="636.5" y="-960.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node25"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_volume%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="713,-1794.51 560,-1794.51 560,-1770.51 713,-1770.51 713,-1794.51"/>
+<text text-anchor="middle" x="636.5" y="-1780.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge30" class="edge">
 <title>proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2</title>
-<path fill="none" stroke="#00ffa9" d="M713.15,-962.37C811.77,-962.19 984.47,-961.88 1093.3,-961.69"/>
-<polygon fill="#00ffa9" stroke="#00ffa9" points="1093.63,-965.18 1103.62,-961.67 1093.62,-958.18 1093.63,-965.18"/>
+<path fill="none" stroke="#00ffa9" d="M662.04,-1770.47C750.87,-1726.89 1055.78,-1577.33 1158.17,-1527.1"/>
+<polygon fill="#00ffa9" stroke="#00ffa9" points="1159.99,-1530.11 1167.43,-1522.56 1156.91,-1523.82 1159.99,-1530.11"/>
 </g>
 <!-- proc~cmp_elem~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node26" class="node">
 <title>proc~cmp_elem~3</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node26"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_curve%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="708,-38.51 565,-38.51 565,-14.51 708,-14.51 708,-38.51"/>
-<text text-anchor="middle" x="636.5" y="-24.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node26"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_surface%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="713,-983.51 560,-983.51 560,-959.51 713,-959.51 713,-983.51"/>
+<text text-anchor="middle" x="636.5" y="-969.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge32" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#00ffff" d="M664.62,-38.64C755.92,-79.47 1052.17,-211.97 1155.8,-258.32"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="1154.37,-261.51 1164.93,-262.4 1157.23,-255.12 1154.37,-261.51"/>
+<path fill="none" stroke="#00ffff" d="M713.15,-971.37C811.77,-971.19 984.47,-970.88 1093.3,-970.69"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="1093.63,-974.18 1103.62,-970.67 1093.62,-967.18 1093.63,-974.18"/>
 </g>
 <!-- proc~elevate_degree -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node27" class="node">
 <title>proc~elevate_degree</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node27"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-1194.51 343.5,-1194.51 343.5,-1170.51 523.5,-1170.51 523.5,-1194.51"/>
-<text text-anchor="middle" x="433.5" y="-1180.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node27"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="518.5,-534.51 348.5,-534.51 348.5,-510.51 518.5,-510.51 518.5,-534.51"/>
+<text text-anchor="middle" x="433.5" y="-520.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree&#45;&gt;proc~elevate_degree_a_5_9 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge24" class="edge">
 <title>proc~elevate_degree&#45;&gt;proc~elevate_degree_a_5_9</title>
-<path fill="none" stroke="#ffff00" d="M504.5,-1170.44C511.31,-1167.99 517.94,-1165.05 524,-1161.51 567.44,-1136.15 603.88,-1088.42 622.39,-1061.1"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="625.36,-1062.95 627.96,-1052.68 619.53,-1059.09 625.36,-1062.95"/>
+<path fill="none" stroke="#ffff00" d="M514.09,-534.75C517.74,-537.22 521.09,-540.12 524,-543.51 589.26,-619.41 507.94,-907.01 560,-992.51 567.9,-1005.47 580.86,-1015.41 593.84,-1022.73"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="592.28,-1025.87 602.76,-1027.39 595.52,-1019.66 592.28,-1025.87"/>
 </g>
 <!-- proc~elevate_degree&#45;&gt;none~set -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge61" class="edge">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge101" class="edge">
 <title>proc~elevate_degree&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.81,-1194.52C508.54,-1198.05 516.91,-1202.61 524,-1208.51 588.93,-1262.54 619.77,-1363.83 630.68,-1408.45"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="627.29,-1409.33 632.98,-1418.27 634.11,-1407.74 627.29,-1409.33"/>
+<path fill="none" stroke="#ff0000" d="M509.67,-510.36C514.78,-507.91 519.63,-504.99 524,-501.51 591.6,-447.7 621.15,-342.49 631.21,-296.69"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="634.69,-297.14 633.31,-286.64 627.84,-295.71 634.69,-297.14"/>
 </g>
 <!-- proc~elevate_degree~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node28" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node28"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-1068.51 343.5,-1068.51 343.5,-1044.51 523.5,-1044.51 523.5,-1068.51"/>
-<text text-anchor="middle" x="433.5" y="-1054.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node28"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-1194.51 343.5,-1194.51 343.5,-1170.51 523.5,-1170.51 523.5,-1194.51"/>
+<text text-anchor="middle" x="433.5" y="-1180.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;proc~elevate_degree_a_5_9 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge25" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;proc~elevate_degree_a_5_9</title>
-<path fill="none" stroke="#ffff00" d="M523.54,-1049.42C535.72,-1048.45 548.13,-1047.46 560.04,-1046.51"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="560.67,-1049.98 570.36,-1045.69 560.11,-1043 560.67,-1049.98"/>
+<path fill="none" stroke="#ffff00" d="M504.51,-1170.46C511.32,-1168.01 517.94,-1165.06 524,-1161.51 567.59,-1135.95 603.97,-1087.82 622.43,-1060.27"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="625.44,-1062.07 627.99,-1051.78 619.59,-1058.23 625.44,-1062.07"/>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;none~set~2 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge76" class="edge">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge61" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M455.55,-1044.29C474.72,-1032.54 503.13,-1013.51 524,-992.51 543.56,-972.83 542.63,-963.14 560,-941.51 578.13,-918.92 600.66,-894.58 616.37,-878.13"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="619.08,-880.37 623.49,-870.74 614.03,-875.52 619.08,-880.37"/>
+<path fill="none" stroke="#ff0000" d="M499.81,-1194.52C508.54,-1198.05 516.91,-1202.61 524,-1208.51 588.93,-1262.54 619.77,-1363.83 630.68,-1408.45"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="627.29,-1409.33 632.98,-1418.27 634.11,-1407.74 627.29,-1409.33"/>
 </g>
 <!-- proc~elevate_degree~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node29" class="node">
 <title>proc~elevate_degree~3</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node29"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="518.5,-534.51 348.5,-534.51 348.5,-510.51 518.5,-510.51 518.5,-534.51"/>
-<text text-anchor="middle" x="433.5" y="-520.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node29"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-1068.51 343.5,-1068.51 343.5,-1044.51 523.5,-1044.51 523.5,-1068.51"/>
+<text text-anchor="middle" x="433.5" y="-1054.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;proc~elevate_degree_a_5_9 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge26" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;proc~elevate_degree_a_5_9</title>
-<path fill="none" stroke="#ffff00" d="M514.08,-534.75C517.73,-537.22 521.08,-540.12 524,-543.51 588.02,-617.84 512.72,-897.55 560,-983.51 569.26,-1000.35 585.84,-1013.7 601.1,-1023.24"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="599.48,-1026.35 609.87,-1028.41 603.03,-1020.32 599.48,-1026.35"/>
+<path fill="none" stroke="#ffff00" d="M523.54,-1048.98C535.72,-1047.95 548.13,-1046.9 560.04,-1045.89"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="560.69,-1049.35 570.36,-1045.02 560.1,-1042.37 560.69,-1049.35"/>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;none~set~3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge101" class="edge">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge76" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M509.67,-510.36C514.78,-507.91 519.63,-504.99 524,-501.51 591.6,-447.7 621.15,-342.49 631.21,-296.69"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="634.69,-297.14 633.31,-286.64 627.84,-295.71 634.69,-297.14"/>
+<path fill="none" stroke="#ff7500" d="M454.45,-1044.36C473.35,-1032.37 502.03,-1012.92 524,-992.51 529.31,-987.57 589.15,-914.94 618.91,-878.72"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="621.8,-880.72 625.44,-870.77 616.39,-876.28 621.8,-880.72"/>
 </g>
-<!-- proc~set1 -->
+<!-- proc~set1~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node30" class="node">
-<title>proc~set1</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node30"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
+<title>proc~set1~2</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node30"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="869,-1400.51 749,-1400.51 749,-1376.51 869,-1376.51 869,-1400.51"/>
 <text text-anchor="middle" x="809" y="-1386.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge20" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#ff0000" d="M860.29,-1376.47C880.58,-1371.62 904.15,-1365.98 925.34,-1360.9"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="926.29,-1364.28 935.2,-1358.54 924.66,-1357.47 926.29,-1364.28"/>
+<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<path fill="none" stroke="#ff5400" d="M860.29,-1376.47C880.58,-1371.62 904.15,-1365.98 925.34,-1360.9"/>
+<polygon fill="#ff5400" stroke="#ff5400" points="926.29,-1364.28 935.2,-1358.54 924.66,-1357.47 926.29,-1364.28"/>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_degree -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge39" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#ff0000" d="M860.29,-1400.54C880.58,-1405.4 904.15,-1411.04 925.34,-1416.11"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="924.66,-1419.55 935.2,-1418.47 926.29,-1412.74 924.66,-1419.55"/>
+<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge42" class="edge">
+<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<path fill="none" stroke="#ff5f00" d="M860.29,-1400.54C880.58,-1405.4 904.15,-1411.04 925.34,-1416.11"/>
+<polygon fill="#ff5f00" stroke="#ff5f00" points="924.66,-1419.55 935.2,-1418.47 926.29,-1412.74 924.66,-1419.55"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node31" class="node">
-<title>proc~set1~2</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node31"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="869,-892.51 749,-892.51 749,-868.51 869,-868.51 869,-892.51"/>
-<text text-anchor="middle" x="809" y="-878.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
+<title>proc~set1~3</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node31"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="869,-901.51 749,-901.51 749,-877.51 869,-877.51 869,-901.51"/>
+<text text-anchor="middle" x="809" y="-887.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge22" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
-<path fill="none" stroke="#ff5400" d="M869.42,-880.51C881.3,-880.51 893.97,-880.51 906.4,-880.51"/>
-<polygon fill="#ff5400" stroke="#ff5400" points="906.76,-884.01 916.76,-880.51 906.76,-877.01 906.76,-884.01"/>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#ffaa00" d="M869.42,-889.51C881.3,-889.51 893.97,-889.51 906.4,-889.51"/>
+<polygon fill="#ffaa00" stroke="#ffaa00" points="906.76,-893.01 916.76,-889.51 906.76,-886.01 906.76,-893.01"/>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge41" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#ff5f00" d="M860.29,-892.54C880.58,-897.4 904.15,-903.04 925.34,-908.11"/>
-<polygon fill="#ff5f00" stroke="#ff5f00" points="924.66,-911.55 935.2,-910.47 926.29,-904.74 924.66,-911.55"/>
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge44" class="edge">
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
+<path fill="none" stroke="#ffbf00" d="M860.29,-901.54C880.58,-906.4 904.15,-912.04 925.34,-917.11"/>
+<polygon fill="#ffbf00" stroke="#ffbf00" points="924.66,-920.55 935.2,-919.47 926.29,-913.74 924.66,-920.55"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set2~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node32" class="node">
-<title>proc~set2</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node32"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
+<title>proc~set2~2</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node32"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="869,-1358.51 749,-1358.51 749,-1334.51 869,-1334.51 869,-1358.51"/>
 <text text-anchor="middle" x="809" y="-1344.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge21" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#ff0000" d="M869.42,-1346.51C881.3,-1346.51 893.97,-1346.51 906.4,-1346.51"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="906.76,-1350.01 916.76,-1346.51 906.76,-1343.01 906.76,-1350.01"/>
+<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<path fill="none" stroke="#ff5400" d="M869.42,-1346.51C881.3,-1346.51 893.97,-1346.51 906.4,-1346.51"/>
+<polygon fill="#ff5400" stroke="#ff5400" points="906.76,-1350.01 916.76,-1346.51 906.76,-1343.01 906.76,-1350.01"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node33" class="node">
-<title>proc~set2~2</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node33"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="869,-850.51 749,-850.51 749,-826.51 869,-826.51 869,-850.51"/>
-<text text-anchor="middle" x="809" y="-836.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
+<title>proc~set2~3</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node33"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="869,-859.51 749,-859.51 749,-835.51 869,-835.51 869,-859.51"/>
+<text text-anchor="middle" x="809" y="-845.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge23" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
-<path fill="none" stroke="#ff5400" d="M860.29,-850.54C880.58,-855.4 904.15,-861.04 925.34,-866.11"/>
-<polygon fill="#ff5400" stroke="#ff5400" points="924.66,-869.55 935.2,-868.47 926.29,-862.74 924.66,-869.55"/>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#ffaa00" d="M860.29,-859.54C880.58,-864.4 904.15,-870.04 925.34,-875.11"/>
+<polygon fill="#ffaa00" stroke="#ffaa00" points="924.66,-878.55 935.2,-877.47 926.29,-871.74 924.66,-878.55"/>
 </g>
 <!-- program~example1_curve -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node34" class="node">
@@ -784,27 +784,27 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge35" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
-<path fill="none" stroke="#aa00ff" d="M274.17,-454.53C296.08,-452.31 322.53,-449.64 347.48,-447.11"/>
-<polygon fill="#aa00ff" stroke="#aa00ff" points="348.1,-450.57 357.7,-446.08 347.4,-443.6 348.1,-450.57"/>
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge33" class="edge">
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
+<path fill="none" stroke="#0000ff" d="M274.17,-464.48C296.08,-466.7 322.53,-469.38 347.48,-471.9"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="347.4,-475.41 357.7,-472.94 348.1,-468.45 347.4,-475.41"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge38" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
-<path fill="none" stroke="#ff0055" d="M274.17,-464.48C294.62,-466.55 319.03,-469.02 342.48,-471.4"/>
-<polygon fill="#ff0055" stroke="#ff0055" points="342.15,-474.88 352.45,-472.41 342.86,-467.92 342.15,-474.88"/>
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge36" class="edge">
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
+<path fill="none" stroke="#ff00ff" d="M274.17,-454.53C294.62,-452.46 319.03,-449.99 342.48,-447.62"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="342.86,-451.1 352.45,-446.61 342.15,-444.13 342.86,-451.1"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge55" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
-<path fill="none" stroke="#00ffff" d="M255.75,-471.51C279.38,-480.48 312.96,-492.67 343,-501.51 350.73,-503.78 358.89,-505.98 367.01,-508.03"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="366.32,-511.47 376.87,-510.47 368,-504.67 366.32,-511.47"/>
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge53" class="edge">
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
+<path fill="none" stroke="#00ff3f" d="M255.75,-471.51C279.38,-480.48 312.96,-492.67 343,-501.51 350.73,-503.78 358.89,-505.98 367.01,-508.03"/>
+<polygon fill="#00ff3f" stroke="#00ff3f" points="366.32,-511.47 376.87,-510.47 368,-504.67 366.32,-511.47"/>
 </g>
-<!-- program~example1_curve&#45;&gt;none~set~3 -->
+<!-- program~example1_curve&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge110" class="edge">
-<title>program~example1_curve&#45;&gt;none~set~3</title>
+<title>program~example1_curve&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M255.2,-447.49C278.82,-438.39 312.65,-426.05 343,-417.51 422.12,-395.23 451.13,-417.55 524,-379.51 564.1,-358.57 600.14,-319.1 619.81,-294.97"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="622.8,-296.83 626.29,-286.83 617.32,-292.47 622.8,-296.83"/>
 </g>
@@ -817,27 +817,27 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge34" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
-<path fill="none" stroke="#5400ff" d="M255.75,-1089.51C279.38,-1098.48 312.96,-1110.67 343,-1119.51 350.73,-1121.78 358.89,-1123.98 367.01,-1126.03"/>
-<polygon fill="#5400ff" stroke="#5400ff" points="366.32,-1129.47 376.87,-1128.47 368,-1122.67 366.32,-1129.47"/>
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge35" class="edge">
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#aa00ff" d="M255.75,-1089.51C279.38,-1098.48 312.96,-1110.67 343,-1119.51 350.73,-1121.78 358.89,-1123.98 367.01,-1126.03"/>
+<polygon fill="#aa00ff" stroke="#aa00ff" points="366.32,-1129.47 376.87,-1128.47 368,-1122.67 366.32,-1129.47"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge37" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
-<path fill="none" stroke="#ff00aa" d="M279.25,-1083C297.02,-1084.8 317.32,-1086.85 337.21,-1088.86"/>
-<polygon fill="#ff00aa" stroke="#ff00aa" points="336.93,-1092.35 347.23,-1089.88 337.64,-1085.39 336.93,-1092.35"/>
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge38" class="edge">
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#ff0055" d="M279.25,-1083C297.02,-1084.8 317.32,-1086.85 337.21,-1088.86"/>
+<polygon fill="#ff0055" stroke="#ff0055" points="336.93,-1092.35 347.23,-1089.88 337.64,-1085.39 336.93,-1092.35"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge54" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
-<path fill="none" stroke="#00ff9f" d="M279.25,-1072.02C295.84,-1070.34 314.64,-1068.44 333.24,-1066.55"/>
-<polygon fill="#00ff9f" stroke="#00ff9f" points="333.64,-1070.03 343.24,-1065.54 332.94,-1063.07 333.64,-1070.03"/>
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge55" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#00ffff" d="M279.25,-1072.02C295.84,-1070.34 314.64,-1068.44 333.24,-1066.55"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="333.64,-1070.03 343.24,-1065.54 332.94,-1063.07 333.64,-1070.03"/>
 </g>
-<!-- program~example3_surface&#45;&gt;none~set~2 -->
+<!-- program~example3_surface&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge86" class="edge">
-<title>program~example3_surface&#45;&gt;none~set~2</title>
+<title>program~example3_surface&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff7500" d="M257.45,-1065.46C329.87,-1038.45 500.21,-974.29 524,-959.51 561.15,-936.43 597.4,-900.33 618.04,-878.12"/>
 <polygon fill="#ff7500" stroke="#ff7500" points="620.74,-880.35 624.91,-870.61 615.57,-875.63 620.74,-880.35"/>
 </g>
@@ -850,152 +850,152 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge33" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#0000ff" d="M279.25,-1689.49C304.91,-1694.68 335.86,-1700.95 363.2,-1706.48"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="362.6,-1709.93 373.1,-1708.48 363.99,-1703.07 362.6,-1709.93"/>
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge34" class="edge">
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
+<path fill="none" stroke="#5400ff" d="M279.25,-1689.49C304.91,-1694.68 335.86,-1700.95 363.2,-1706.48"/>
+<polygon fill="#5400ff" stroke="#5400ff" points="362.6,-1709.93 373.1,-1708.48 363.99,-1703.07 362.6,-1709.93"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge36" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#ff00ff" d="M279.25,-1678.51C297.02,-1678.51 317.32,-1678.51 337.21,-1678.51"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="337.23,-1682.01 347.23,-1678.51 337.23,-1675.01 337.23,-1682.01"/>
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge37" class="edge">
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
+<path fill="none" stroke="#ff00aa" d="M279.25,-1678.51C297.02,-1678.51 317.32,-1678.51 337.21,-1678.51"/>
+<polygon fill="#ff00aa" stroke="#ff00aa" points="337.23,-1682.01 347.23,-1678.51 337.23,-1675.01 337.23,-1682.01"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~cmp_elem -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge48" class="edge">
-<title>program~example3_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#dfff00" d="M242.8,-1690.56C260,-1702.57 286.41,-1721.99 307,-1741.51 324.84,-1758.42 320.66,-1773.23 343,-1783.51 418.17,-1818.08 516.14,-1808.24 577.43,-1796.52"/>
-<polygon fill="#dfff00" stroke="#dfff00" points="578.2,-1799.93 587.32,-1794.55 576.83,-1793.07 578.2,-1799.93"/>
+<!-- program~example3_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge50" class="edge">
+<title>program~example3_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#7fff00" d="M242.8,-1690.56C260,-1702.57 286.41,-1721.99 307,-1741.51 324.84,-1758.42 320.66,-1773.23 343,-1783.51 418.17,-1818.08 516.14,-1808.24 577.43,-1796.52"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="578.2,-1799.93 587.32,-1794.55 576.83,-1793.07 578.2,-1799.93"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge53" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#00ff3f" d="M252.32,-1666.47C271.07,-1656.67 294.69,-1640.95 307,-1619.51 391,-1473.14 256.02,-1386.13 343,-1241.51 354.27,-1222.77 374.05,-1208.8 392.16,-1199.17"/>
-<polygon fill="#00ff3f" stroke="#00ff3f" points="394.05,-1202.14 401.42,-1194.53 390.91,-1195.88 394.05,-1202.14"/>
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge54" class="edge">
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
+<path fill="none" stroke="#00ff9f" d="M252.32,-1666.47C271.07,-1656.67 294.69,-1640.95 307,-1619.51 391,-1473.14 256.02,-1386.13 343,-1241.51 354.27,-1222.77 374.05,-1208.8 392.16,-1199.17"/>
+<polygon fill="#00ff9f" stroke="#00ff9f" points="394.05,-1202.14 401.42,-1194.53 390.91,-1195.88 394.05,-1202.14"/>
 </g>
-<!-- program~example3_volume&#45;&gt;none~set -->
+<!-- program~example3_volume&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge71" class="edge">
-<title>program~example3_volume&#45;&gt;none~set</title>
+<title>program~example3_volume&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M279.2,-1668.59C364.17,-1652.93 519.61,-1623.8 524,-1619.51 577.05,-1567.64 510.62,-1511.88 560,-1456.51 563.23,-1452.88 566.99,-1449.76 571.08,-1447.08"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="572.84,-1450.1 579.85,-1442.16 569.42,-1444 572.84,-1450.1"/>
 </g>
-<!-- none~set&#45;&gt;proc~set1 -->
+<!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge56" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
+<title>none~set~2&#45;&gt;proc~set1~2</title>
 <path fill="none" stroke="#009fff" d="M686.36,-1418.47C705.98,-1413.64 728.76,-1408.03 749.27,-1402.97"/>
 <polygon fill="#009fff" stroke="#009fff" points="750.26,-1406.33 759.13,-1400.54 748.59,-1399.54 750.26,-1406.33"/>
 </g>
-<!-- none~set&#45;&gt;proc~set2 -->
+<!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge58" class="edge">
-<title>none~set&#45;&gt;proc~set2</title>
+<title>none~set~2&#45;&gt;proc~set2~2</title>
 <path fill="none" stroke="#1f00ff" d="M656.7,-1418.3C678.51,-1404.77 715.42,-1382.83 749,-1367.51 753.06,-1365.65 757.33,-1363.86 761.65,-1362.14"/>
 <polygon fill="#1f00ff" stroke="#1f00ff" points="763.01,-1365.37 771.1,-1358.54 760.51,-1358.83 763.01,-1365.37"/>
 </g>
-<!-- proc~set3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_node47" class="node">
-<title>proc~set3</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node47"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
+<!-- proc~set3~2 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_node48" class="node">
+<title>proc~set3~2</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node48"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="869,-1442.51 749,-1442.51 749,-1418.51 869,-1418.51 869,-1442.51"/>
 <text text-anchor="middle" x="809" y="-1428.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge97" class="edge">
-<title>none~set&#45;&gt;proc~set3</title>
-<path fill="none" stroke="#9c00ff" d="M693.33,-1430.51C707.77,-1430.51 723.49,-1430.51 738.54,-1430.51"/>
-<polygon fill="#9c00ff" stroke="#9c00ff" points="738.82,-1434.01 748.82,-1430.51 738.82,-1427.01 738.82,-1434.01"/>
+<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge98" class="edge">
+<title>none~set~2&#45;&gt;proc~set3~2</title>
+<path fill="none" stroke="#ff00eb" d="M693.33,-1430.51C707.77,-1430.51 723.49,-1430.51 738.54,-1430.51"/>
+<polygon fill="#ff00eb" stroke="#ff00eb" points="738.82,-1434.01 748.82,-1430.51 738.82,-1427.01 738.82,-1434.01"/>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge57" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
-<path fill="none" stroke="#003fff" d="M693.33,-865.71C707.77,-867.57 723.49,-869.6 738.54,-871.54"/>
-<polygon fill="#003fff" stroke="#003fff" points="738.45,-875.06 748.82,-872.87 739.35,-868.12 738.45,-875.06"/>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
+<path fill="none" stroke="#003fff" d="M693.33,-868.66C707.91,-871.31 723.8,-874.2 738.97,-876.96"/>
+<polygon fill="#003fff" stroke="#003fff" points="738.35,-880.4 748.82,-878.75 739.61,-873.51 738.35,-880.4"/>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge59" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
-<path fill="none" stroke="#7f00ff" d="M693.33,-851.96C707.77,-850.26 723.49,-848.42 738.54,-846.66"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="739.3,-850.09 748.82,-845.45 738.48,-843.14 739.3,-850.09"/>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
+<path fill="none" stroke="#7f00ff" d="M693.33,-854.91C707.77,-853.97 723.49,-852.96 738.54,-851.99"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="739.07,-855.46 748.82,-851.33 738.62,-848.48 739.07,-855.46"/>
 </g>
-<!-- proc~set3~2 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_node48" class="node">
-<title>proc~set3~2</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node48"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="869,-934.51 749,-934.51 749,-910.51 869,-910.51 869,-934.51"/>
-<text text-anchor="middle" x="809" y="-920.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
+<!-- proc~set3~3 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_node49" class="node">
+<title>proc~set3~3</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node49"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="869,-943.51 749,-943.51 749,-919.51 869,-919.51 869,-943.51"/>
+<text text-anchor="middle" x="809" y="-929.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge98" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
-<path fill="none" stroke="#ff00eb" d="M668.18,-870.59C690.53,-879.33 721.57,-891.34 749,-901.51 753.85,-903.3 758.93,-905.16 763.99,-906.98"/>
-<polygon fill="#ff00eb" stroke="#ff00eb" points="763.03,-910.36 773.63,-910.44 765.4,-903.77 763.03,-910.36"/>
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge99" class="edge">
+<title>none~set~3&#45;&gt;proc~set3~3</title>
+<path fill="none" stroke="#ff0075" d="M661.57,-870.54C683.95,-881.53 718.37,-897.95 749,-910.51 753.48,-912.34 758.19,-914.18 762.9,-915.95"/>
+<polygon fill="#ff0075" stroke="#ff0075" points="761.95,-919.33 772.54,-919.5 764.36,-912.76 761.95,-919.33"/>
 </g>
 <!-- proc~ansatz -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node39" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node39"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-1774.51 367.5,-1774.51 367.5,-1750.51 499.5,-1750.51 499.5,-1774.51"/>
-<text text-anchor="middle" x="433.5" y="-1760.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node39"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="494.5,-38.51 372.5,-38.51 372.5,-14.51 494.5,-14.51 494.5,-38.51"/>
+<text text-anchor="middle" x="433.5" y="-24.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge46" class="edge">
 <title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#dfff00" d="M499.76,-1769C515.61,-1770.58 532.8,-1772.29 549.46,-1773.95"/>
-<polygon fill="#dfff00" stroke="#dfff00" points="549.44,-1777.46 559.74,-1774.97 550.13,-1770.5 549.44,-1777.46"/>
+<path fill="none" stroke="#dfff00" d="M494.53,-26.51C513.44,-26.51 534.63,-26.51 554.73,-26.51"/>
+<polygon fill="#dfff00" stroke="#dfff00" points="554.8,-30.01 564.8,-26.51 554.8,-23.01 554.8,-30.01"/>
 </g>
 <!-- proc~ansatz&#45;&gt;none~set -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge60" class="edge">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge100" class="edge">
 <title>proc~ansatz&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.9,-1755.31C508.72,-1752.12 517.09,-1747.67 524,-1741.51 612.07,-1662.93 630.6,-1509.73 634.48,-1452.64"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="637.98,-1452.75 635.08,-1442.56 630.99,-1452.33 637.98,-1452.75"/>
+<path fill="none" stroke="#ff0000" d="M494.67,-32.91C505.21,-36.1 515.51,-40.75 524,-47.51 591.6,-101.32 621.15,-206.52 631.21,-252.32"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="627.84,-253.3 633.31,-262.38 634.69,-251.87 627.84,-253.3"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node40" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node40"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-950.51 367.5,-950.51 367.5,-926.51 499.5,-926.51 499.5,-950.51"/>
-<text text-anchor="middle" x="433.5" y="-936.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node40"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-1774.51 367.5,-1774.51 367.5,-1750.51 499.5,-1750.51 499.5,-1774.51"/>
+<text text-anchor="middle" x="433.5" y="-1760.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;proc~cmp_elem~2 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge49" class="edge">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge48" class="edge">
 <title>proc~ansatz~2&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#7fff00" d="M499.76,-946.3C515.61,-948.19 532.8,-950.25 549.46,-952.23"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="549.39,-955.75 559.74,-953.46 550.22,-948.8 549.39,-955.75"/>
+<path fill="none" stroke="#7fff00" d="M499.76,-1769C515.61,-1770.58 532.8,-1772.29 549.46,-1773.95"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="549.44,-1777.46 559.74,-1774.97 550.13,-1770.5 549.44,-1777.46"/>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~set~2 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge75" class="edge">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge60" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M481.45,-926.48C495.31,-922.49 510.41,-917.73 524,-912.51 551.93,-901.77 582.44,-886.76 604.47,-875.28"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="606.14,-878.36 613.36,-870.61 602.88,-872.17 606.14,-878.36"/>
+<path fill="none" stroke="#ff0000" d="M499.9,-1755.31C508.72,-1752.12 517.09,-1747.67 524,-1741.51 612.07,-1662.93 630.6,-1509.73 634.48,-1452.64"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="637.98,-1452.75 635.08,-1442.56 630.99,-1452.33 637.98,-1452.75"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node41" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node41"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="494.5,-38.51 372.5,-38.51 372.5,-14.51 494.5,-14.51 494.5,-38.51"/>
-<text text-anchor="middle" x="433.5" y="-24.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node41"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-950.51 367.5,-950.51 367.5,-926.51 499.5,-926.51 499.5,-950.51"/>
+<text text-anchor="middle" x="433.5" y="-936.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;proc~cmp_elem~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge51" class="edge">
 <title>proc~ansatz~3&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#1fff00" d="M494.53,-26.51C513.44,-26.51 534.63,-26.51 554.73,-26.51"/>
-<polygon fill="#1fff00" stroke="#1fff00" points="554.8,-30.01 564.8,-26.51 554.8,-23.01 554.8,-30.01"/>
+<path fill="none" stroke="#1fff00" d="M499.76,-949.22C516.43,-951.96 534.59,-954.94 552.04,-957.8"/>
+<polygon fill="#1fff00" stroke="#1fff00" points="551.78,-961.31 562.21,-959.47 552.91,-954.4 551.78,-961.31"/>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~set~3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge100" class="edge">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge75" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M494.67,-32.91C505.21,-36.1 515.51,-40.75 524,-47.51 591.6,-101.32 621.15,-206.52 631.21,-252.32"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="627.84,-253.3 633.31,-262.38 634.69,-251.87 627.84,-253.3"/>
+<path fill="none" stroke="#ff7500" d="M481.45,-926.48C495.31,-922.49 510.41,-917.73 524,-912.51 551.93,-901.77 582.44,-886.76 604.47,-875.28"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="606.14,-878.36 613.36,-870.61 602.88,-872.17 606.14,-878.36"/>
 </g>
 <!-- proc~cmp_area -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node42" class="node">
@@ -1006,17 +1006,17 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~2 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge50" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#7fff00" d="M281.46,-950.52C300.87,-954.12 322.8,-957.62 343,-959.51 412.28,-965.98 491.2,-966.39 549.58,-965.36"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="549.94,-968.86 559.87,-965.16 549.81,-961.86 549.94,-968.86"/>
+<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~3 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge52" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~cmp_elem~3</title>
+<path fill="none" stroke="#1fff00" d="M283.6,-950.55C302.48,-953.99 323.56,-957.39 343,-959.51 412.23,-967.05 491.15,-969.96 549.55,-971.03"/>
+<polygon fill="#1fff00" stroke="#1fff00" points="549.78,-974.53 559.84,-971.2 549.9,-967.54 549.78,-974.53"/>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge90" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#9cff00" d="M299.03,-938.51C317.98,-938.51 338.36,-938.51 357.36,-938.51"/>
-<polygon fill="#9cff00" stroke="#9cff00" points="357.45,-942.01 367.45,-938.51 357.45,-935.01 357.45,-942.01"/>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge91" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#27ff00" d="M299.03,-938.51C317.98,-938.51 338.36,-938.51 357.36,-938.51"/>
+<polygon fill="#27ff00" stroke="#27ff00" points="357.45,-942.01 367.45,-938.51 357.45,-935.01 357.45,-942.01"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node43" class="node">
@@ -1027,17 +1027,17 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~cmp_elem~3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge52" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#1fff00" d="M280.85,-14.49C300.41,-10.83 322.58,-7.31 343,-5.51 423.13,1.57 443.9,1.97 524,-5.51 539.85,-6.99 556.8,-9.62 572.58,-12.54"/>
-<polygon fill="#1fff00" stroke="#1fff00" points="572.28,-16.05 582.76,-14.49 573.59,-9.17 572.28,-16.05"/>
+<!-- proc~cmp_length&#45;&gt;proc~cmp_elem -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge47" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~cmp_elem</title>
+<path fill="none" stroke="#dfff00" d="M280.85,-14.49C300.41,-10.83 322.58,-7.31 343,-5.51 423.13,1.57 443.9,1.97 524,-5.51 539.85,-6.99 556.8,-9.62 572.58,-12.54"/>
+<polygon fill="#dfff00" stroke="#dfff00" points="572.28,-16.05 582.76,-14.49 573.59,-9.17 572.28,-16.05"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge91" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#27ff00" d="M299.03,-26.51C319.64,-26.51 341.96,-26.51 362.34,-26.51"/>
-<polygon fill="#27ff00" stroke="#27ff00" points="362.49,-30.01 372.49,-26.51 362.49,-23.01 362.49,-30.01"/>
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge89" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ffeb00" d="M299.03,-26.51C319.64,-26.51 341.96,-26.51 362.34,-26.51"/>
+<polygon fill="#ffeb00" stroke="#ffeb00" points="362.49,-30.01 372.49,-26.51 362.49,-23.01 362.49,-30.01"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node44" class="node">
@@ -1048,180 +1048,180 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge47" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#dfff00" d="M244.54,-1774.64C267.22,-1787.96 306.24,-1808.5 343,-1816.51 421.6,-1833.64 444.43,-1828.37 524,-1816.51 548.19,-1812.9 574.39,-1805.12 595.31,-1797.91"/>
-<polygon fill="#dfff00" stroke="#dfff00" points="596.57,-1801.18 604.83,-1794.55 594.23,-1794.58 596.57,-1801.18"/>
+<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge49" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#7fff00" d="M244.54,-1774.64C267.22,-1787.96 306.24,-1808.5 343,-1816.51 421.6,-1833.64 444.43,-1828.37 524,-1816.51 548.19,-1812.9 574.39,-1805.12 595.31,-1797.91"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="596.57,-1801.18 604.83,-1794.55 594.23,-1794.58 596.57,-1801.18"/>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge89" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ffeb00" d="M307.01,-1762.51C323.61,-1762.51 341,-1762.51 357.35,-1762.51"/>
-<polygon fill="#ffeb00" stroke="#ffeb00" points="357.38,-1766.01 367.38,-1762.51 357.38,-1759.01 357.38,-1766.01"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge90" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#9cff00" d="M307.01,-1762.51C323.61,-1762.51 341,-1762.51 357.35,-1762.51"/>
+<polygon fill="#9cff00" stroke="#9cff00" points="357.38,-1766.01 367.38,-1762.51 357.38,-1759.01 357.38,-1766.01"/>
 </g>
-<!-- proc~set1a -->
+<!-- proc~set1 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node45" class="node">
+<title>proc~set1</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node45"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="864,-328.51 754,-328.51 754,-304.51 864,-304.51 864,-328.51"/>
+<text text-anchor="middle" x="809" y="-314.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+</a>
+</g>
+</g>
+<!-- proc~set1&#45;&gt;proc~cmp_degree -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge39" class="edge">
+<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#ff0000" d="M860.29,-304.47C880.58,-299.62 904.15,-293.98 925.34,-288.9"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="926.29,-292.28 935.2,-286.54 924.66,-285.47 926.29,-292.28"/>
+</g>
+<!-- proc~set1a -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_node46" class="node">
 <title>proc~set1a</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node45"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node46"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
 <polygon fill="#d9534f" stroke="#d9534f" points="867.5,-286.51 750.5,-286.51 750.5,-262.51 867.5,-262.51 867.5,-286.51"/>
 <text text-anchor="middle" x="809" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge43" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ffbf00" d="M867.95,-274.51C878.01,-274.51 888.67,-274.51 899.3,-274.51"/>
-<polygon fill="#ffbf00" stroke="#ffbf00" points="899.46,-278.01 909.46,-274.51 899.46,-271.01 899.46,-278.01"/>
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge40" class="edge">
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#ff0000" d="M867.95,-274.51C878.01,-274.51 888.67,-274.51 899.3,-274.51"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="899.46,-278.01 909.46,-274.51 899.46,-271.01 899.46,-278.01"/>
 </g>
-<!-- proc~set1~3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_node46" class="node">
-<title>proc~set1~3</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node46"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
+<!-- proc~set3 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_node47" class="node">
+<title>proc~set3</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node47"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="864,-244.51 754,-244.51 754,-220.51 864,-220.51 864,-244.51"/>
-<text text-anchor="middle" x="809" y="-230.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<text text-anchor="middle" x="809" y="-230.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge44" class="edge">
-<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ffbf00" d="M860.29,-244.54C880.58,-249.4 904.15,-255.04 925.34,-260.11"/>
-<polygon fill="#ffbf00" stroke="#ffbf00" points="924.66,-263.55 935.2,-262.47 926.29,-256.74 924.66,-263.55"/>
-</g>
 <!-- proc~set3&#45;&gt;proc~cmp_degree -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge40" class="edge">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge41" class="edge">
 <title>proc~set3&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#ff0000" d="M869.42,-1430.51C877.64,-1430.51 886.23,-1430.51 894.86,-1430.51"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="894.98,-1434.01 904.98,-1430.51 894.98,-1427.01 894.98,-1434.01"/>
+<path fill="none" stroke="#ff0000" d="M860.29,-244.54C880.58,-249.4 904.15,-255.04 925.34,-260.11"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="924.66,-263.55 935.2,-262.47 926.29,-256.74 924.66,-263.55"/>
 </g>
 <!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge42" class="edge">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge43" class="edge">
 <title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#ff5f00" d="M869.42,-922.51C877.64,-922.51 886.23,-922.51 894.86,-922.51"/>
-<polygon fill="#ff5f00" stroke="#ff5f00" points="894.98,-926.01 904.98,-922.51 894.98,-919.01 894.98,-926.01"/>
-</g>
-<!-- proc~set3~3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_node49" class="node">
-<title>proc~set3~3</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node49"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="864,-328.51 754,-328.51 754,-304.51 864,-304.51 864,-328.51"/>
-<text text-anchor="middle" x="809" y="-314.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
-</a>
-</g>
+<path fill="none" stroke="#ff5f00" d="M869.42,-1430.51C877.64,-1430.51 886.23,-1430.51 894.86,-1430.51"/>
+<polygon fill="#ff5f00" stroke="#ff5f00" points="894.98,-1434.01 904.98,-1430.51 894.98,-1427.01 894.98,-1434.01"/>
 </g>
 <!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge45" class="edge">
 <title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ffbf00" d="M860.29,-304.47C880.58,-299.62 904.15,-293.98 925.34,-288.9"/>
-<polygon fill="#ffbf00" stroke="#ffbf00" points="926.29,-292.28 935.2,-286.54 924.66,-285.47 926.29,-292.28"/>
+<path fill="none" stroke="#ffbf00" d="M869.42,-931.51C877.64,-931.51 886.23,-931.51 894.86,-931.51"/>
+<polygon fill="#ffbf00" stroke="#ffbf00" points="894.98,-935.01 904.98,-931.51 894.98,-928.01 894.98,-935.01"/>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
+<!-- none~set&#45;&gt;proc~set1 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge95" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
-<path fill="none" stroke="#004eff" d="M688.19,-274.51C704.52,-274.51 722.89,-274.51 740.24,-274.51"/>
-<polygon fill="#004eff" stroke="#004eff" points="740.32,-278.01 750.32,-274.51 740.32,-271.01 740.32,-278.01"/>
+<title>none~set&#45;&gt;proc~set1</title>
+<path fill="none" stroke="#004eff" d="M686.36,-286.54C705.98,-291.38 728.76,-296.99 749.27,-302.04"/>
+<polygon fill="#004eff" stroke="#004eff" points="748.59,-305.48 759.13,-304.47 750.26,-298.68 748.59,-305.48"/>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1~3 -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge96" class="edge">
-<title>none~set~3&#45;&gt;proc~set1~3</title>
-<path fill="none" stroke="#2700ff" d="M686.36,-262.47C705.98,-257.64 728.76,-252.03 749.27,-246.97"/>
-<polygon fill="#2700ff" stroke="#2700ff" points="750.26,-250.33 759.13,-244.54 748.59,-243.54 750.26,-250.33"/>
+<title>none~set&#45;&gt;proc~set1a</title>
+<path fill="none" stroke="#2700ff" d="M688.19,-274.51C704.52,-274.51 722.89,-274.51 740.24,-274.51"/>
+<polygon fill="#2700ff" stroke="#2700ff" points="740.32,-278.01 750.32,-274.51 740.32,-271.01 740.32,-278.01"/>
 </g>
-<!-- none~set~3&#45;&gt;proc~set3~3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge99" class="edge">
-<title>none~set~3&#45;&gt;proc~set3~3</title>
-<path fill="none" stroke="#ff0075" d="M686.36,-286.54C705.98,-291.38 728.76,-296.99 749.27,-302.04"/>
-<polygon fill="#ff0075" stroke="#ff0075" points="748.59,-305.48 759.13,-304.47 750.26,-298.68 748.59,-305.48"/>
+<!-- none~set&#45;&gt;proc~set3 -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge97" class="edge">
+<title>none~set&#45;&gt;proc~set3</title>
+<path fill="none" stroke="#9c00ff" d="M686.36,-262.47C705.98,-257.64 728.76,-252.03 749.27,-246.97"/>
+<polygon fill="#9c00ff" stroke="#9c00ff" points="750.26,-250.33 759.13,-244.54 748.59,-243.54 750.26,-250.33"/>
 </g>
-<!-- proc~modify_wc -->
+<!-- proc~modify_wc~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node51" class="node">
-<title>proc~modify_wc</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node51"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
+<title>proc~modify_wc~2</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node51"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
 <polygon fill="#d9534f" stroke="#d9534f" points="511.5,-1526.51 355.5,-1526.51 355.5,-1502.51 511.5,-1502.51 511.5,-1526.51"/>
 <text text-anchor="middle" x="433.5" y="-1512.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_wc&#45;&gt;none~set -->
+<!-- proc~modify_wc~2&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge63" class="edge">
-<title>proc~modify_wc&#45;&gt;none~set</title>
+<title>proc~modify_wc~2&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M503.94,-1502.43C510.93,-1499.99 517.75,-1497.04 524,-1493.51 543.97,-1482.21 540.63,-1468.8 560,-1456.51 566.12,-1452.63 572.88,-1449.25 579.77,-1446.33"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="581.18,-1449.53 589.21,-1442.62 578.62,-1443.02 581.18,-1449.53"/>
 </g>
-<!-- proc~modify_wc~2 -->
+<!-- proc~modify_wc~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node52" class="node">
-<title>proc~modify_wc~2</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node52"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
+<title>proc~modify_wc~3</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node52"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
 <polygon fill="#d9534f" stroke="#d9534f" points="511.5,-660.51 355.5,-660.51 355.5,-636.51 511.5,-636.51 511.5,-660.51"/>
 <text text-anchor="middle" x="433.5" y="-646.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_wc~2&#45;&gt;none~set~2 -->
+<!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge78" class="edge">
-<title>proc~modify_wc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M508.49,-660.64C513.99,-663.08 519.24,-666.01 524,-669.51 582.76,-712.72 615.99,-797 629.01,-836.76"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="625.74,-838.02 632.09,-846.51 632.42,-835.92 625.74,-838.02"/>
+<title>proc~modify_wc~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff7500" d="M511.79,-660.38C516.23,-662.92 520.36,-665.93 524,-669.51 570.45,-715.13 521.58,-758.94 560,-811.51 569.25,-824.17 583.05,-834.18 596.32,-841.65"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="594.89,-844.85 605.37,-846.42 598.16,-838.66 594.89,-844.85"/>
 </g>
-<!-- proc~modify_xc -->
+<!-- proc~modify_xc~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node53" class="node">
-<title>proc~modify_xc</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node53"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
+<title>proc~modify_xc~2</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node53"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="510,-1484.51 357,-1484.51 357,-1460.51 510,-1460.51 510,-1484.51"/>
 <text text-anchor="middle" x="433.5" y="-1470.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_xc&#45;&gt;none~set -->
+<!-- proc~modify_xc~2&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge64" class="edge">
-<title>proc~modify_xc&#45;&gt;none~set</title>
+<title>proc~modify_xc~2&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M492.1,-1460.47C516.47,-1455.38 544.99,-1449.42 570.15,-1444.16"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="570.9,-1447.58 579.97,-1442.11 569.47,-1440.73 570.9,-1447.58"/>
 </g>
-<!-- proc~modify_xc~2 -->
+<!-- proc~modify_xc~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node54" class="node">
-<title>proc~modify_xc~2</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node54"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
+<title>proc~modify_xc~3</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node54"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="510,-576.51 357,-576.51 357,-552.51 510,-552.51 510,-576.51"/>
 <text text-anchor="middle" x="433.5" y="-562.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_xc~2&#45;&gt;none~set~2 -->
+<!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge79" class="edge">
-<title>proc~modify_xc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M510.37,-576.54C515.26,-579.03 519.87,-581.98 524,-585.51 534.26,-594.27 603.2,-773.65 627.25,-836.77"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="624,-838.08 630.83,-846.18 630.54,-835.59 624,-838.08"/>
+<title>proc~modify_xc~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff7500" d="M510.1,-574.82C515.25,-577.67 519.98,-581.18 524,-585.51 593.27,-659.99 503.75,-726.76 560,-811.51 568.53,-824.36 581.91,-834.34 595.05,-841.74"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="593.56,-844.91 604.04,-846.44 596.81,-838.71 593.56,-844.91"/>
 </g>
-<!-- proc~set_c -->
+<!-- proc~set_c~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node55" class="node">
-<title>proc~set_c</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node55"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_volume%set_C">
+<title>proc~set_c~2</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node55"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_volume%set_C">
 <polygon fill="#d9534f" stroke="#d9534f" points="496.5,-1610.51 370.5,-1610.51 370.5,-1586.51 496.5,-1586.51 496.5,-1610.51"/>
 <text text-anchor="middle" x="433.5" y="-1596.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c&#45;&gt;none~set -->
+<!-- proc~set_c~2&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge66" class="edge">
-<title>proc~set_c&#45;&gt;none~set</title>
+<title>proc~set_c~2&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M496.56,-1592.92C506.68,-1589.63 516.34,-1584.73 524,-1577.51 564.82,-1539.01 521.18,-1497.01 560,-1456.51 563.36,-1453 567.21,-1449.97 571.37,-1447.34"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="573.13,-1450.37 580.24,-1442.51 569.78,-1444.22 573.13,-1450.37"/>
 </g>
-<!-- proc~set_c~2 -->
+<!-- proc~set_c~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node56" class="node">
-<title>proc~set_c~2</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node56"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_surface%set_C">
+<title>proc~set_c~3</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node56"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_surface%set_C">
 <polygon fill="#d9534f" stroke="#d9534f" points="496.5,-786.51 370.5,-786.51 370.5,-762.51 496.5,-762.51 496.5,-786.51"/>
 <text text-anchor="middle" x="433.5" y="-772.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c~2&#45;&gt;none~set~2 -->
+<!-- proc~set_c~3&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge81" class="edge">
-<title>proc~set_c~2&#45;&gt;none~set~2</title>
+<title>proc~set_c~3&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff7500" d="M496.35,-786.59C505.75,-789.12 515.23,-792.08 524,-795.51 554.76,-807.52 587.36,-826.8 609.31,-840.87"/>
 <polygon fill="#ff7500" stroke="#ff7500" points="607.46,-843.84 617.75,-846.36 611.27,-837.97 607.46,-843.84"/>
 </g>
@@ -1234,9 +1234,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring&#45;&gt;none~set -->
+<!-- proc~set_half_ring&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge67" class="edge">
-<title>proc~set_half_ring&#45;&gt;none~set</title>
+<title>proc~set_half_ring&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M516.25,-1430.51C533.99,-1430.51 552.52,-1430.51 569.56,-1430.51"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="569.94,-1434.01 579.94,-1430.51 569.94,-1427.01 569.94,-1434.01"/>
 </g>
@@ -1249,9 +1249,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_half_ring~2&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge82" class="edge">
-<title>proc~set_half_ring~2&#45;&gt;none~set~2</title>
+<title>proc~set_half_ring~2&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff7500" d="M516.25,-858.51C533.99,-858.51 552.52,-858.51 569.56,-858.51"/>
 <polygon fill="#ff7500" stroke="#ff7500" points="569.94,-862.01 579.94,-858.51 569.94,-855.01 569.94,-862.01"/>
 </g>
@@ -1264,9 +1264,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_hexahedron&#45;&gt;none~set -->
+<!-- proc~set_hexahedron&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge68" class="edge">
-<title>proc~set_hexahedron&#45;&gt;none~set</title>
+<title>proc~set_hexahedron&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M492.1,-1400.54C516.47,-1405.64 544.99,-1411.59 570.15,-1416.85"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="569.47,-1420.28 579.97,-1418.9 570.9,-1413.43 569.47,-1420.28"/>
 </g>
@@ -1279,9 +1279,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_ring&#45;&gt;none~set -->
+<!-- proc~set_ring&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge69" class="edge">
-<title>proc~set_ring&#45;&gt;none~set</title>
+<title>proc~set_ring&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M496.35,-1358.59C505.75,-1361.12 515.23,-1364.08 524,-1367.51 554.76,-1379.52 587.36,-1398.8 609.31,-1412.87"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="607.46,-1415.84 617.75,-1418.36 611.27,-1409.97 607.46,-1415.84"/>
 </g>
@@ -1294,11 +1294,11 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_ring~2&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge83" class="edge">
-<title>proc~set_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M503.02,-701.3C510.41,-703.99 517.58,-707.33 524,-711.51 573.17,-743.45 609.03,-804.88 625.48,-837.29"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="622.39,-838.93 629.95,-846.35 628.66,-835.83 622.39,-838.93"/>
+<title>proc~set_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff7500" d="M503.07,-698.92C510.72,-702 517.92,-706.09 524,-711.51 559.27,-742.93 530.31,-774.77 560,-811.51 570.02,-823.9 584.22,-833.94 597.62,-841.5"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="596.23,-844.73 606.7,-846.35 599.52,-838.55 596.23,-844.73"/>
 </g>
 <!-- proc~set_tetragon -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node62" class="node">
@@ -1309,11 +1309,11 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge84" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M509.69,-618.62C514.8,-621.08 519.64,-624.01 524,-627.51 592.67,-682.56 621.77,-790.31 631.47,-836.56"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="628.05,-837.32 633.43,-846.44 634.91,-835.95 628.05,-837.32"/>
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff7500" d="M512.83,-618.65C516.91,-621.13 520.68,-624.06 524,-627.51 581.81,-687.52 512.7,-742.9 560,-811.51 568.83,-824.31 582.4,-834.32 595.62,-841.75"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="594.17,-844.94 604.65,-846.48 597.42,-838.74 594.17,-844.94"/>
 </g>
 <!-- program~compute_area -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node63" class="node">
@@ -1324,9 +1324,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;none~set~2 -->
+<!-- program~compute_area&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge85" class="edge">
-<title>program~compute_area&#45;&gt;none~set~2</title>
+<title>program~compute_area&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff7500" d="M97.12,-916.4C180.4,-912.05 367.64,-900.65 524,-879.51 538.83,-877.5 554.68,-874.84 569.63,-872.08"/>
 <polygon fill="#ff7500" stroke="#ff7500" points="570.64,-875.45 579.82,-870.17 569.34,-868.57 570.64,-875.45"/>
 </g>
@@ -1340,22 +1340,22 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node64" class="node">
 <title>program~compute_length</title>
 <g id="a_proc~~compute_multiplicity1~~CalledByGraph_node64"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-121.51 3,-121.51 3,-97.51 102,-97.51 102,-121.51"/>
-<text text-anchor="middle" x="52.5" y="-107.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-79.51 3,-79.51 3,-55.51 102,-55.51 102,-79.51"/>
+<text text-anchor="middle" x="52.5" y="-65.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge93" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#00ffc4" d="M78.15,-97.44C107.4,-83.12 156.32,-59.16 189.12,-43.1"/>
-<polygon fill="#00ffc4" stroke="#00ffc4" points="190.88,-46.13 198.32,-38.59 187.8,-39.85 190.88,-46.13"/>
+<path fill="none" stroke="#00ffc4" d="M102.07,-55.76C121.15,-51.14 143.25,-45.8 163.29,-40.95"/>
+<polygon fill="#00ffc4" stroke="#00ffc4" points="164.35,-44.3 173.24,-38.54 162.7,-37.49 164.35,-44.3"/>
 </g>
-<!-- program~compute_length&#45;&gt;none~set~3 -->
+<!-- program~compute_length&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge109" class="edge">
-<title>program~compute_length&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M65.54,-121.66C81.32,-136.74 110.59,-161.88 141,-173.51 300.78,-234.6 360.92,-159.88 524,-211.51 556.04,-221.65 589.12,-241.78 610.84,-256.57"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="608.93,-259.5 619.14,-262.34 612.93,-253.76 608.93,-259.5"/>
+<title>program~compute_length&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M95.95,-79.52C110.18,-83.19 126.19,-86.92 141,-89.51 225.26,-104.2 449.37,-85.73 524,-127.51 575.42,-156.29 610.52,-219.62 626.2,-252.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="623.11,-254.65 630.44,-262.3 629.48,-251.75 623.11,-254.65"/>
 </g>
 <!-- program~compute_volume -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node65" class="node">
@@ -1366,9 +1366,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;none~set -->
+<!-- program~compute_volume&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge70" class="edge">
-<title>program~compute_volume&#45;&gt;none~set</title>
+<title>program~compute_volume&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M56.77,-1480.22C65.43,-1449.87 91.74,-1370.59 141,-1325.51 212.73,-1259.86 247.65,-1260.54 343,-1241.51 421.89,-1225.76 454.14,-1201.61 524,-1241.51 587.91,-1278.01 618.86,-1367.05 630.2,-1408.55"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="626.81,-1409.44 632.72,-1418.24 633.59,-1407.68 626.81,-1409.44"/>
 </g>
@@ -1387,9 +1387,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;none~set~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge87" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;none~set~2</title>
+<title>program~example_nurbs_surface&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff7500" d="M492.1,-828.54C516.47,-833.64 544.99,-839.59 570.15,-844.85"/>
 <polygon fill="#ff7500" stroke="#ff7500" points="569.47,-848.28 579.97,-846.9 570.9,-841.43 569.47,-848.28"/>
 </g>
@@ -1402,9 +1402,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;none~set -->
+<!-- program~example_nurbs_volume&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge72" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;none~set</title>
+<title>program~example_nurbs_volume&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M502.84,-1316.55C510.19,-1319 517.39,-1321.96 524,-1325.51 563.85,-1346.91 599.97,-1386.23 619.72,-1410.21"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="617.24,-1412.7 626.24,-1418.29 622.69,-1408.3 617.24,-1412.7"/>
 </g>
@@ -1417,9 +1417,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;none~set -->
+<!-- program~example_put_to_nurbs&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge73" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;none~set</title>
+<title>program~example_put_to_nurbs&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M499.77,-1272.17C508.31,-1275.03 516.64,-1278.72 524,-1283.51 573.17,-1315.45 609.03,-1376.88 625.48,-1409.29"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="622.39,-1410.93 629.95,-1418.35 628.66,-1407.83 622.39,-1410.93"/>
 </g>
@@ -1432,11 +1432,11 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;none~set~2 -->
+<!-- program~nearest_point_2d&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge88" class="edge">
-<title>program~nearest_point_2d&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M485.42,-739.62C498.49,-742.72 512.19,-747.16 524,-753.51 563.85,-774.91 599.97,-814.23 619.72,-838.21"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="617.24,-840.7 626.24,-846.29 622.69,-836.3 617.24,-840.7"/>
+<title>program~nearest_point_2d&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff7500" d="M485.27,-737.29C498.77,-740.39 512.72,-745.41 524,-753.51 548.64,-771.21 538.56,-790.04 560,-811.51 571.9,-823.43 587.37,-833.72 601.21,-841.61"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="599.56,-844.7 610.01,-846.45 602.93,-838.57 599.56,-844.7"/>
 </g>
 <!-- program~nearest_point_3d -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node70" class="node">
@@ -1447,101 +1447,101 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;none~set -->
+<!-- program~nearest_point_3d&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge74" class="edge">
-<title>program~nearest_point_3d&#45;&gt;none~set</title>
+<title>program~nearest_point_3d&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M485.05,-1552.86C498.85,-1549.8 513.02,-1544.51 524,-1535.51 553.84,-1511.04 531.44,-1482.45 560,-1456.51 564.04,-1452.84 568.62,-1449.68 573.49,-1446.97"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="575.06,-1450.1 582.49,-1442.55 571.97,-1443.81 575.06,-1450.1"/>
 </g>
-<!-- proc~modify_wc~3 -->
+<!-- proc~modify_wc -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node71" class="node">
-<title>proc~modify_wc~3</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node71"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
+<title>proc~modify_wc</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node71"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
 <polygon fill="#d9534f" stroke="#d9534f" points="506.5,-328.51 360.5,-328.51 360.5,-304.51 506.5,-304.51 506.5,-328.51"/>
 <text text-anchor="middle" x="433.5" y="-314.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
+<!-- proc~modify_wc&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge103" class="edge">
-<title>proc~modify_wc~3&#45;&gt;none~set~3</title>
+<title>proc~modify_wc&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M492.1,-304.47C518.02,-299.06 548.63,-292.66 574.9,-287.17"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="575.66,-290.59 584.73,-285.11 574.23,-283.73 575.66,-290.59"/>
 </g>
-<!-- proc~modify_xc~3 -->
+<!-- proc~modify_xc -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node72" class="node">
-<title>proc~modify_xc~3</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node72"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
+<title>proc~modify_xc</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node72"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="505,-286.51 362,-286.51 362,-262.51 505,-262.51 505,-286.51"/>
 <text text-anchor="middle" x="433.5" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
+<!-- proc~modify_xc&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge104" class="edge">
-<title>proc~modify_xc~3&#45;&gt;none~set~3</title>
+<title>proc~modify_xc&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M505.08,-274.51C527.74,-274.51 552.62,-274.51 574.53,-274.51"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="574.69,-278.01 584.69,-274.51 574.69,-271.01 574.69,-278.01"/>
 </g>
-<!-- proc~set_circle -->
+<!-- proc~set_c -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node73" class="node">
-<title>proc~set_circle</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node73"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="502,-164.51 365,-164.51 365,-140.51 502,-140.51 502,-164.51"/>
-<text text-anchor="middle" x="433.5" y="-150.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
+<title>proc~set_c</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node73"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_curve%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="491.5,-80.51 375.5,-80.51 375.5,-56.51 491.5,-56.51 491.5,-80.51"/>
+<text text-anchor="middle" x="433.5" y="-66.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
 </a>
 </g>
 </g>
-<!-- proc~set_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_c&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge106" class="edge">
-<title>proc~set_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M489.93,-164.59C501.55,-168.22 513.47,-172.8 524,-178.51 561.4,-198.78 597.33,-233.31 617.87,-254.96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="615.34,-257.38 624.72,-262.31 620.46,-252.6 615.34,-257.38"/>
+<title>proc~set_c&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M491.9,-78.42C503.27,-82.18 514.59,-87.36 524,-94.51 579.39,-136.57 613.81,-214.79 628,-252.73"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="624.77,-254.1 631.47,-262.31 631.36,-251.71 624.77,-254.1"/>
 </g>
-<!-- proc~set_c~3 -->
+<!-- proc~set_circle -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node74" class="node">
-<title>proc~set_c~3</title>
-<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node74"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_curve%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="491.5,-370.51 375.5,-370.51 375.5,-346.51 491.5,-346.51 491.5,-370.51"/>
-<text text-anchor="middle" x="433.5" y="-356.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
+<title>proc~set_circle</title>
+<g id="a_proc~~compute_multiplicity1~~CalledByGraph_node74"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
+<polygon fill="#d9534f" stroke="#d9534f" points="502,-370.51 365,-370.51 365,-346.51 502,-346.51 502,-370.51"/>
+<text text-anchor="middle" x="433.5" y="-356.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c~3&#45;&gt;none~set~3 -->
+<!-- proc~set_circle&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge107" class="edge">
-<title>proc~set_c~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M491.58,-347.68C502.51,-344.89 513.74,-341.51 524,-337.51 554.76,-325.49 587.36,-306.21 609.31,-292.14"/>
+<title>proc~set_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M496.35,-346.43C505.75,-343.9 515.23,-340.93 524,-337.51 554.76,-325.49 587.36,-306.21 609.31,-292.14"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="611.27,-295.04 617.75,-286.65 607.46,-289.17 611.27,-295.04"/>
 </g>
 <!-- proc~set_half_circle -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node75" class="node">
 <title>proc~set_half_circle</title>
 <g id="a_proc~~compute_multiplicity1~~CalledByGraph_node75"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="515,-244.51 352,-244.51 352,-220.51 515,-220.51 515,-244.51"/>
-<text text-anchor="middle" x="433.5" y="-230.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="515,-160.51 352,-160.51 352,-136.51 515,-136.51 515,-160.51"/>
+<text text-anchor="middle" x="433.5" y="-146.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_half_circle&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge108" class="edge">
-<title>proc~set_half_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M492.1,-244.54C518.02,-249.96 548.63,-256.36 574.9,-261.84"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="574.23,-265.28 584.73,-263.9 575.66,-258.43 574.23,-265.28"/>
+<title>proc~set_half_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M502.84,-160.55C510.19,-163 517.39,-165.96 524,-169.51 563.85,-190.91 599.97,-230.23 619.72,-254.21"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="617.24,-256.7 626.24,-262.29 622.69,-252.3 617.24,-256.7"/>
 </g>
 <!-- program~example_nurbs_curve -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node76" class="node">
 <title>program~example_nurbs_curve</title>
 <g id="a_proc~~compute_multiplicity1~~CalledByGraph_node76"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-122.51 369,-122.51 369,-98.51 498,-98.51 498,-122.51"/>
-<text text-anchor="middle" x="433.5" y="-108.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-244.51 369,-244.51 369,-220.51 498,-220.51 498,-244.51"/>
+<text text-anchor="middle" x="433.5" y="-230.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;none~set~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge111" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M498.31,-119.8C507.35,-122.71 516.2,-126.52 524,-131.51 572.09,-162.3 608,-221.24 624.86,-252.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="621.95,-254.99 629.65,-262.27 628.17,-251.78 621.95,-254.99"/>
+<title>program~example_nurbs_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M492.1,-244.54C518.02,-249.96 548.63,-256.36 574.9,-261.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="574.23,-265.28 584.73,-263.9 575.66,-258.43 574.23,-265.28"/>
 </g>
 <!-- program~example_ppm1 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node77" class="node">
@@ -1594,9 +1594,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge113" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
 <path fill="none" stroke="#daff00" d="M271.05,-564.51C293.29,-564.51 320.72,-564.51 346.61,-564.51"/>
 <polygon fill="#daff00" stroke="#daff00" points="346.83,-568.01 356.83,-564.51 346.83,-561.01 346.83,-568.01"/>
 </g>
@@ -1610,16 +1610,16 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node80" class="node">
 <title>program~nearest_point_1d</title>
 <g id="a_proc~~compute_multiplicity1~~CalledByGraph_node80"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-80.51 382,-80.51 382,-56.51 485,-56.51 485,-80.51"/>
-<text text-anchor="middle" x="433.5" y="-66.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-202.51 382,-202.51 382,-178.51 485,-178.51 485,-202.51"/>
+<text text-anchor="middle" x="433.5" y="-188.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;none~set~3 -->
+<!-- program~nearest_point_1d&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge112" class="edge">
-<title>program~nearest_point_1d&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M485.34,-73.19C498.84,-76.29 512.78,-81.33 524,-89.51 581.76,-131.57 615.3,-213.5 628.69,-252.65"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="625.4,-253.88 631.86,-262.28 632.05,-251.68 625.4,-253.88"/>
+<title>program~nearest_point_1d&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M485.44,-199.82C498.25,-202.88 511.81,-206.75 524,-211.51 554.76,-223.52 587.36,-242.8 609.31,-256.87"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="607.46,-259.84 617.75,-262.36 611.27,-253.97 607.46,-259.84"/>
 </g>
 <!-- program~nearest_point_2d_bench -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node81" class="node">
@@ -1645,9 +1645,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~set_c~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~set_c~3 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge115" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~set_c~2</title>
+<title>program~shape_c_2d&#45;&gt;proc~set_c~3</title>
 <path fill="none" stroke="#48ff00" d="M262.1,-774.51C289.25,-774.51 326.96,-774.51 360,-774.51"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="360.09,-778.01 370.09,-774.51 360.09,-771.01 360.09,-778.01"/>
 </g>
@@ -1660,9 +1660,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~set_c -->
+<!-- program~shape_c_3d&#45;&gt;proc~set_c~2 -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge114" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~set_c</title>
+<title>program~shape_c_3d&#45;&gt;proc~set_c~2</title>
 <path fill="none" stroke="#91ff00" d="M262.1,-1598.51C289.25,-1598.51 326.96,-1598.51 360,-1598.51"/>
 <polygon fill="#91ff00" stroke="#91ff00" points="360.09,-1602.01 370.09,-1598.51 360.09,-1595.01 360.09,-1602.01"/>
 </g>
@@ -1760,46 +1760,46 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node90" class="node">
 <title>program~shape_c_1d</title>
 <g id="a_proc~~compute_multiplicity1~~CalledByGraph_node90"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-370.51 186,-370.51 186,-346.51 262,-346.51 262,-370.51"/>
-<text text-anchor="middle" x="224" y="-356.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-80.51 186,-80.51 186,-56.51 262,-56.51 262,-80.51"/>
+<text text-anchor="middle" x="224" y="-66.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~set_c~3 -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge129" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~set_c~3</title>
-<path fill="none" stroke="#fff100" d="M262.1,-358.51C290.62,-358.51 330.8,-358.51 364.98,-358.51"/>
-<polygon fill="#fff100" stroke="#fff100" points="365.38,-362.01 375.38,-358.51 365.37,-355.01 365.38,-362.01"/>
+<!-- program~shape_c_1d&#45;&gt;proc~set_c -->
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge128" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~set_c</title>
+<path fill="none" stroke="#ffa100" d="M262.1,-68.51C290.62,-68.51 330.8,-68.51 364.98,-68.51"/>
+<polygon fill="#ffa100" stroke="#ffa100" points="365.38,-72.01 375.38,-68.51 365.37,-65.01 365.38,-72.01"/>
 </g>
 <!-- program~shape_circle -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node91" class="node">
 <title>program~shape_circle</title>
 <g id="a_proc~~compute_multiplicity1~~CalledByGraph_node91"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="263.5,-164.51 184.5,-164.51 184.5,-140.51 263.5,-140.51 263.5,-164.51"/>
-<text text-anchor="middle" x="224" y="-150.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="263.5,-370.51 184.5,-370.51 184.5,-346.51 263.5,-346.51 263.5,-370.51"/>
+<text text-anchor="middle" x="224" y="-356.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
 <!-- program~shape_circle&#45;&gt;proc~set_circle -->
-<g id="proc~~compute_multiplicity1~~CalledByGraph_edge128" class="edge">
+<g id="proc~~compute_multiplicity1~~CalledByGraph_edge129" class="edge">
 <title>program~shape_circle&#45;&gt;proc~set_circle</title>
-<path fill="none" stroke="#ffa100" d="M263.54,-152.51C289.03,-152.51 323.33,-152.51 354.38,-152.51"/>
-<polygon fill="#ffa100" stroke="#ffa100" points="354.76,-156.01 364.76,-152.51 354.76,-149.01 354.76,-156.01"/>
+<path fill="none" stroke="#fff100" d="M263.54,-358.51C289.03,-358.51 323.33,-358.51 354.38,-358.51"/>
+<polygon fill="#fff100" stroke="#fff100" points="354.76,-362.01 364.76,-358.51 354.76,-355.01 354.76,-362.01"/>
 </g>
 <!-- program~shape_half_circle -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_node92" class="node">
 <title>program~shape_half_circle</title>
 <g id="a_proc~~compute_multiplicity1~~CalledByGraph_node92"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="276,-244.51 172,-244.51 172,-220.51 276,-220.51 276,-244.51"/>
-<text text-anchor="middle" x="224" y="-230.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="276,-160.51 172,-160.51 172,-136.51 276,-136.51 276,-160.51"/>
+<text text-anchor="middle" x="224" y="-146.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
 <!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
 <g id="proc~~compute_multiplicity1~~CalledByGraph_edge130" class="edge">
 <title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
-<path fill="none" stroke="#bbff00" d="M276.03,-232.51C295.8,-232.51 319.05,-232.51 341.49,-232.51"/>
-<polygon fill="#bbff00" stroke="#bbff00" points="341.73,-236.01 351.73,-232.51 341.73,-229.01 341.73,-236.01"/>
+<path fill="none" stroke="#bbff00" d="M276.03,-148.51C295.8,-148.51 319.05,-148.51 341.49,-148.51"/>
+<polygon fill="#bbff00" stroke="#bbff00" points="341.73,-152.01 351.73,-148.51 341.73,-145.01 341.73,-152.01"/>
 </g>
 </g>
 </svg>
@@ -1919,7 +1919,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_multiplicity2.html b/proc/compute_multiplicity2.html
index 5ca8ce1ce..888ea55a8 100644
--- a/proc/compute_multiplicity2.html
+++ b/proc/compute_multiplicity2.html
@@ -156,7 +156,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~11"></span>
+              <span class="anchor" id="variable-knot~32"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -214,581 +214,581 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node1" class="node">
 <title>proc~compute_multiplicity2</title>
-<polygon fill="none" stroke="black" points="1608,-1154.51 1478,-1154.51 1478,-1130.51 1608,-1130.51 1608,-1154.51"/>
-<text text-anchor="middle" x="1543" y="-1140.11" font-family="Helvetica,sans-Serif" font-size="10.50">compute_multiplicity2</text>
+<polygon fill="none" stroke="black" points="1608,-1163.51 1478,-1163.51 1478,-1139.51 1608,-1139.51 1608,-1163.51"/>
+<text text-anchor="middle" x="1543" y="-1149.11" font-family="Helvetica,sans-Serif" font-size="10.50">compute_multiplicity2</text>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node2" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~compute_multiplicity2~~CalledByGraph_node2"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1442,-1154.51 1318,-1154.51 1318,-1130.51 1442,-1130.51 1442,-1154.51"/>
-<text text-anchor="middle" x="1380" y="-1140.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1442,-1163.51 1318,-1163.51 1318,-1139.51 1442,-1139.51 1442,-1163.51"/>
+<text text-anchor="middle" x="1380" y="-1149.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge1" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1442.33,-1142.51C1450.6,-1142.51 1459.17,-1142.51 1467.64,-1142.51"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1467.9,-1146.01 1477.9,-1142.51 1467.9,-1139.01 1467.9,-1146.01"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1442.33,-1151.51C1450.6,-1151.51 1459.17,-1151.51 1467.64,-1151.51"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1467.9,-1155.01 1477.9,-1151.51 1467.9,-1148.01 1467.9,-1155.01"/>
 </g>
 <!-- proc~cmp_nc -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node3" class="node">
 <title>proc~cmp_nc</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node3"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="1056,-1358.51 917,-1358.51 917,-1334.51 1056,-1334.51 1056,-1358.51"/>
-<text text-anchor="middle" x="986.5" y="-1344.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node3"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_curve%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="1257.5,-1602.51 1128.5,-1602.51 1128.5,-1578.51 1257.5,-1578.51 1257.5,-1602.51"/>
+<text text-anchor="middle" x="1193" y="-1588.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_nc</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge2" class="edge">
 <title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M994.85,-1334.44C1011.11,-1308.82 1052.81,-1248.83 1104,-1218.51 1174.03,-1177.03 1203.84,-1198.19 1282,-1175.51 1299.99,-1170.28 1319.6,-1163.77 1336.45,-1157.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1337.74,-1161.17 1346.02,-1154.56 1335.42,-1154.57 1337.74,-1161.17"/>
+<path fill="none" stroke="#ff0000" d="M1257.77,-1580.53C1266.84,-1576.74 1275.33,-1571.57 1282,-1564.51 1336.72,-1506.6 1368.23,-1251.57 1376.68,-1173.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1380.18,-1174.18 1377.76,-1163.87 1373.22,-1173.44 1380.18,-1174.18"/>
 </g>
 <!-- proc~cmp_nc~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node4" class="node">
 <title>proc~cmp_nc~2</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node4"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="1056,-892.51 917,-892.51 917,-868.51 1056,-868.51 1056,-892.51"/>
-<text text-anchor="middle" x="986.5" y="-878.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node4"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="1056,-1358.51 917,-1358.51 917,-1334.51 1056,-1334.51 1056,-1358.51"/>
+<text text-anchor="middle" x="986.5" y="-1344.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge3" class="edge">
 <title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1056.27,-877.89C1120.95,-878.95 1217.28,-890.07 1282,-940.51 1341.29,-986.72 1366.34,-1078.26 1375.06,-1120.37"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1371.67,-1121.26 1377.02,-1130.4 1378.54,-1119.92 1371.67,-1121.26"/>
+<path fill="none" stroke="#ff0000" d="M995.84,-1334.2C1013.04,-1309.82 1054.98,-1255.35 1104,-1227.51 1174.77,-1187.31 1203.84,-1207.19 1282,-1184.51 1299.99,-1179.28 1319.6,-1172.77 1336.45,-1166.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1337.74,-1170.17 1346.02,-1163.56 1335.42,-1163.57 1337.74,-1170.17"/>
 </g>
 <!-- proc~cmp_nc~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node5" class="node">
 <title>proc~cmp_nc~3</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node5"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_curve%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="1257.5,-1522.51 1128.5,-1522.51 1128.5,-1498.51 1257.5,-1498.51 1257.5,-1522.51"/>
-<text text-anchor="middle" x="1193" y="-1508.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_nc</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node5"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="1056,-901.51 917,-901.51 917,-877.51 1056,-877.51 1056,-901.51"/>
+<text text-anchor="middle" x="986.5" y="-887.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge4" class="edge">
 <title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1257.94,-1500.07C1266.87,-1496.34 1275.28,-1491.3 1282,-1484.51 1371.91,-1393.61 1379.82,-1225.89 1379.57,-1165.19"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1383.07,-1164.79 1379.44,-1154.83 1376.07,-1164.87 1383.07,-1164.79"/>
+<path fill="none" stroke="#ff0000" d="M1056.27,-886.89C1120.95,-887.95 1217.28,-899.07 1282,-949.51 1341.29,-995.72 1366.34,-1087.26 1375.06,-1129.37"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1371.67,-1130.26 1377.02,-1139.4 1378.54,-1128.92 1371.67,-1130.26"/>
 </g>
 <!-- proc~elevate_degree_a_5_9 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node6" class="node">
 <title>proc~elevate_degree_a_5_9</title>
 <g id="a_proc~~compute_multiplicity2~~CalledByGraph_node6"><a xlink:href="../proc/elevate_degree_a_5_9.html" xlink:title="elevate_degree_A_5_9">
-<polygon fill="#d9534f" stroke="#d9534f" points="702.5,-1052.51 570.5,-1052.51 570.5,-1028.51 702.5,-1028.51 702.5,-1052.51"/>
-<text text-anchor="middle" x="636.5" y="-1038.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elevate_degree_A_5_9</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="702.5,-1051.51 570.5,-1051.51 570.5,-1027.51 702.5,-1027.51 702.5,-1051.51"/>
+<text text-anchor="middle" x="636.5" y="-1037.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elevate_degree_A_5_9</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree_a_5_9&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge5" class="edge">
 <title>proc~elevate_degree_a_5_9&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M702.59,-1031C845.36,-1011.33 1181.3,-971.92 1282,-1020.51 1325.17,-1041.33 1355.03,-1091.74 1369.34,-1120.83"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1366.31,-1122.6 1373.75,-1130.14 1372.64,-1119.61 1366.31,-1122.6"/>
+<path fill="none" stroke="#ff0000" d="M702.59,-1031.24C845.37,-1014.25 1181.34,-980.94 1282,-1029.51 1325.17,-1050.33 1355.03,-1100.74 1369.34,-1129.83"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1366.31,-1131.6 1373.75,-1139.14 1372.64,-1128.61 1366.31,-1131.6"/>
 </g>
 <!-- proc~get_continuity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node7" class="node">
 <title>proc~get_continuity</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node7"><a xlink:href="../proc/get_continuity.html" xlink:title="nurbs_volume%get_continuity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1279,-1335.51 1107,-1335.51 1107,-1311.51 1279,-1311.51 1279,-1335.51"/>
-<text text-anchor="middle" x="1193" y="-1321.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_continuity</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node7"><a xlink:href="../proc/get_continuity.html" xlink:title="nurbs_curve%get_continuity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1274.5,-1344.51 1111.5,-1344.51 1111.5,-1320.51 1274.5,-1320.51 1274.5,-1344.51"/>
+<text text-anchor="middle" x="1193" y="-1330.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_continuity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_continuity&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge6" class="edge">
 <title>proc~get_continuity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1266.27,-1311.41C1271.85,-1308.96 1277.18,-1306.02 1282,-1302.51 1330.52,-1267.13 1359.55,-1199.4 1371.94,-1164.5"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1375.33,-1165.39 1375.25,-1154.8 1368.7,-1163.13 1375.33,-1165.39"/>
+<path fill="none" stroke="#ff0000" d="M1266.27,-1320.41C1271.85,-1317.96 1277.18,-1315.02 1282,-1311.51 1330.52,-1276.13 1359.55,-1208.4 1371.94,-1173.5"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1375.33,-1174.39 1375.25,-1163.8 1368.7,-1172.13 1375.33,-1174.39"/>
 </g>
 <!-- proc~get_continuity~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node8" class="node">
 <title>proc~get_continuity~2</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node8"><a xlink:href="../proc/get_continuity~2.html" xlink:title="nurbs_surface%get_continuity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1279,-1293.51 1107,-1293.51 1107,-1269.51 1279,-1269.51 1279,-1293.51"/>
-<text text-anchor="middle" x="1193" y="-1279.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_continuity</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node8"><a xlink:href="../proc/get_continuity~2.html" xlink:title="nurbs_volume%get_continuity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1279,-1302.51 1107,-1302.51 1107,-1278.51 1279,-1278.51 1279,-1302.51"/>
+<text text-anchor="middle" x="1193" y="-1288.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_continuity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_continuity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge7" class="edge">
 <title>proc~get_continuity~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1263.94,-1269.35C1270.28,-1266.92 1276.41,-1264 1282,-1260.51 1321.06,-1236.1 1351.76,-1190.5 1367.47,-1163.7"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1370.67,-1165.17 1372.57,-1154.75 1364.58,-1161.7 1370.67,-1165.17"/>
+<path fill="none" stroke="#ff0000" d="M1263.94,-1278.35C1270.28,-1275.92 1276.41,-1273 1282,-1269.51 1321.06,-1245.1 1351.76,-1199.5 1367.47,-1172.7"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1370.67,-1174.17 1372.57,-1163.75 1364.58,-1170.7 1370.67,-1174.17"/>
 </g>
 <!-- proc~get_continuity~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node9" class="node">
 <title>proc~get_continuity~3</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node9"><a xlink:href="../proc/get_continuity~3.html" xlink:title="nurbs_curve%get_continuity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1274.5,-1251.51 1111.5,-1251.51 1111.5,-1227.51 1274.5,-1227.51 1274.5,-1251.51"/>
-<text text-anchor="middle" x="1193" y="-1237.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_continuity</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node9"><a xlink:href="../proc/get_continuity~3.html" xlink:title="nurbs_surface%get_continuity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1279,-1260.51 1107,-1260.51 1107,-1236.51 1279,-1236.51 1279,-1260.51"/>
+<text text-anchor="middle" x="1193" y="-1246.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_continuity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_continuity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge8" class="edge">
 <title>proc~get_continuity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1245.86,-1227.41C1258.02,-1223.7 1270.72,-1219.09 1282,-1213.51 1310.35,-1199.48 1339.13,-1177.17 1357.9,-1161.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1360.24,-1163.91 1365.54,-1154.74 1355.67,-1158.6 1360.24,-1163.91"/>
+<path fill="none" stroke="#ff0000" d="M1245.86,-1236.41C1258.02,-1232.7 1270.72,-1228.09 1282,-1222.51 1310.35,-1208.48 1339.13,-1186.17 1357.9,-1170.31"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1360.24,-1172.91 1365.54,-1163.74 1355.67,-1167.6 1360.24,-1172.91"/>
 </g>
 <!-- proc~get_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node10" class="node">
 <title>proc~get_multiplicity</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node10"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1282,-1564.51 1104,-1564.51 1104,-1540.51 1282,-1540.51 1282,-1564.51"/>
-<text text-anchor="middle" x="1193" y="-1550.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node10"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1277.5,-286.51 1108.5,-286.51 1108.5,-262.51 1277.5,-262.51 1277.5,-286.51"/>
+<text text-anchor="middle" x="1193" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge9" class="edge">
 <title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1270.42,-1540.29C1274.63,-1537.84 1278.54,-1534.93 1282,-1531.51 1335.28,-1478.76 1367.58,-1239.29 1376.48,-1164.73"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1379.98,-1164.94 1377.66,-1154.6 1373.03,-1164.13 1379.98,-1164.94"/>
+<path fill="none" stroke="#ff0000" d="M1197.9,-286.54C1211.19,-327.81 1255.29,-467.57 1282,-585.51 1329.45,-794.99 1365.73,-1052.74 1376.04,-1129.16"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1372.62,-1130.02 1377.42,-1139.47 1379.56,-1129.09 1372.62,-1130.02"/>
 </g>
 <!-- proc~get_multiplicity~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node11" class="node">
 <title>proc~get_multiplicity~2</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node11"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1282,-973.51 1104,-973.51 1104,-949.51 1282,-949.51 1282,-973.51"/>
-<text text-anchor="middle" x="1193" y="-959.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node11"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1282,-1522.51 1104,-1522.51 1104,-1498.51 1282,-1498.51 1282,-1522.51"/>
+<text text-anchor="middle" x="1193" y="-1508.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge10" class="edge">
 <title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1255.92,-973.55C1265.21,-977.08 1274.26,-981.63 1282,-987.51 1328.31,-1022.67 1358.01,-1086.87 1371.16,-1120.55"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1368.05,-1122.21 1374.85,-1130.34 1374.6,-1119.75 1368.05,-1122.21"/>
+<path fill="none" stroke="#ff0000" d="M1261.44,-1498.47C1269.05,-1494.93 1276.15,-1490.38 1282,-1484.51 1370.03,-1396.14 1379.11,-1232.74 1379.37,-1173.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1382.87,-1173.5 1379.33,-1163.52 1375.87,-1173.53 1382.87,-1173.5"/>
 </g>
 <!-- proc~get_multiplicity~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node12" class="node">
 <title>proc~get_multiplicity~3</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node12"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1277.5,-286.51 1108.5,-286.51 1108.5,-262.51 1277.5,-262.51 1277.5,-286.51"/>
-<text text-anchor="middle" x="1193" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node12"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1282,-982.51 1104,-982.51 1104,-958.51 1282,-958.51 1282,-982.51"/>
+<text text-anchor="middle" x="1193" y="-968.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge11" class="edge">
 <title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1199.48,-286.56C1214.88,-320.94 1258.95,-422.72 1282,-511.51 1342.65,-745.11 1370.31,-1037.86 1377.21,-1120.11"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1373.74,-1120.61 1378.05,-1130.29 1380.72,-1120.04 1373.74,-1120.61"/>
+<path fill="none" stroke="#ff0000" d="M1255.92,-982.55C1265.21,-986.08 1274.26,-990.63 1282,-996.51 1328.31,-1031.67 1358.01,-1095.87 1371.16,-1129.55"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1368.05,-1131.21 1374.85,-1139.34 1374.6,-1128.75 1368.05,-1131.21"/>
 </g>
 <!-- proc~get_nc_dir -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node13" class="node">
 <title>proc~get_nc_dir</title>
 <g id="a_proc~~compute_multiplicity2~~CalledByGraph_node13"><a xlink:href="../proc/get_nc_dir.html" xlink:title="nurbs_volume%get_nc_dir">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1269,-1095.51 1117,-1095.51 1117,-1071.51 1269,-1071.51 1269,-1095.51"/>
-<text text-anchor="middle" x="1193" y="-1081.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_nc_dir</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1269,-1104.51 1117,-1104.51 1117,-1080.51 1269,-1080.51 1269,-1104.51"/>
+<text text-anchor="middle" x="1193" y="-1090.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_nc_dir</text>
 </a>
 </g>
 </g>
 <!-- proc~get_nc_dir&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge12" class="edge">
 <title>proc~get_nc_dir&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1236.18,-1095.59C1250.74,-1099.86 1267.12,-1104.78 1282,-1109.51 1299.27,-1114.99 1318.15,-1121.34 1334.63,-1126.99"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1333.95,-1130.46 1344.54,-1130.41 1336.23,-1123.84 1333.95,-1130.46"/>
+<path fill="none" stroke="#ff0000" d="M1236.18,-1104.59C1250.74,-1108.86 1267.12,-1113.78 1282,-1118.51 1299.27,-1123.99 1318.15,-1130.34 1334.63,-1135.99"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1333.95,-1139.46 1344.54,-1139.41 1336.23,-1132.84 1333.95,-1139.46"/>
 </g>
 <!-- proc~get_nc_dir~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node14" class="node">
 <title>proc~get_nc_dir~2</title>
 <g id="a_proc~~compute_multiplicity2~~CalledByGraph_node14"><a xlink:href="../proc/get_nc_dir~2.html" xlink:title="nurbs_surface%get_nc_dir">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1269,-1053.51 1117,-1053.51 1117,-1029.51 1269,-1029.51 1269,-1053.51"/>
-<text text-anchor="middle" x="1193" y="-1039.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_nc_dir</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1269,-1062.51 1117,-1062.51 1117,-1038.51 1269,-1038.51 1269,-1062.51"/>
+<text text-anchor="middle" x="1193" y="-1048.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_nc_dir</text>
 </a>
 </g>
 </g>
 <!-- proc~get_nc_dir~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge13" class="edge">
 <title>proc~get_nc_dir~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1259.58,-1053.62C1267.33,-1056.07 1274.97,-1059.01 1282,-1062.51 1312.95,-1077.92 1342.73,-1104.88 1360.94,-1123.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1358.53,-1125.74 1368.01,-1130.47 1363.54,-1120.86 1358.53,-1125.74"/>
+<path fill="none" stroke="#ff0000" d="M1259.58,-1062.62C1267.33,-1065.07 1274.97,-1068.01 1282,-1071.51 1312.95,-1086.92 1342.73,-1113.88 1360.94,-1132.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1358.53,-1134.74 1368.01,-1139.47 1363.54,-1129.86 1358.53,-1134.74"/>
 </g>
 <!-- proc~insert_knots -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node15" class="node">
 <title>proc~insert_knots</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node15"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514,-1732.51 353,-1732.51 353,-1708.51 514,-1708.51 514,-1732.51"/>
-<text text-anchor="middle" x="433.5" y="-1718.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node15"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_curve%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="509,-492.51 358,-492.51 358,-468.51 509,-468.51 509,-492.51"/>
+<text text-anchor="middle" x="433.5" y="-478.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge14" class="edge">
 <title>proc~insert_knots&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M490.71,-1708.47C579.19,-1689.93 747.15,-1656.51 808,-1656.51 808,-1656.51 808,-1656.51 987.5,-1656.51 1123.49,-1656.51 1188.44,-1672.2 1282,-1573.51 1339.34,-1513.03 1369.23,-1244.65 1376.95,-1164.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1380.47,-1164.86 1377.93,-1154.57 1373.5,-1164.2 1380.47,-1164.86"/>
+<path fill="none" stroke="#ff0000" d="M509.4,-491.53C514.7,-494.22 519.66,-497.5 524,-501.51 562.43,-536.96 529.55,-571.01 560,-613.51 639.94,-725.07 670.75,-797.51 808,-797.51 808,-797.51 808,-797.51 987.5,-797.51 1124.24,-797.51 1182.58,-792.64 1282,-886.51 1353.53,-954.05 1372.53,-1078.69 1377.39,-1129.29"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1373.92,-1129.78 1378.27,-1139.44 1380.9,-1129.18 1373.92,-1129.78"/>
 </g>
 <!-- none~set -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_node37" class="node">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_node50" class="node">
 <title>none~set</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node37"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="693,-1442.51 580,-1442.51 580,-1418.51 693,-1418.51 693,-1442.51"/>
-<text text-anchor="middle" x="636.5" y="-1428.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node50"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="688,-286.51 585,-286.51 585,-262.51 688,-262.51 688,-286.51"/>
+<text text-anchor="middle" x="636.5" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;none~set -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge62" class="edge">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge102" class="edge">
 <title>proc~insert_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M510.35,-1708.45C515.25,-1705.97 519.86,-1703.02 524,-1699.51 544.17,-1682.37 605.96,-1513.25 627.77,-1452.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="631.19,-1453.12 631.25,-1442.52 624.6,-1450.76 631.19,-1453.12"/>
+<path fill="none" stroke="#ff0000" d="M508.45,-468.33C513.96,-465.89 519.23,-462.98 524,-459.51 581.76,-417.45 615.3,-335.52 628.69,-296.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="632.05,-297.33 631.86,-286.74 625.4,-295.14 632.05,-297.33"/>
 </g>
 <!-- proc~insert_knots~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node16" class="node">
 <title>proc~insert_knots~2</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node16"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514,-1152.51 353,-1152.51 353,-1128.51 514,-1128.51 514,-1152.51"/>
-<text text-anchor="middle" x="433.5" y="-1138.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node16"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514,-1732.51 353,-1732.51 353,-1708.51 514,-1708.51 514,-1732.51"/>
+<text text-anchor="middle" x="433.5" y="-1718.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge15" class="edge">
 <title>proc~insert_knots~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M514.21,-1147.59C589.78,-1153.68 706.52,-1161.51 808,-1161.51 808,-1161.51 808,-1161.51 987.5,-1161.51 1099.35,-1161.51 1228.97,-1153.67 1307.42,-1148.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1307.96,-1151.54 1317.68,-1147.33 1307.45,-1144.56 1307.96,-1151.54"/>
+<path fill="none" stroke="#ff0000" d="M495.3,-1708.44C505.02,-1705.88 514.88,-1702.91 524,-1699.51 657.56,-1649.72 665.46,-1550.51 808,-1550.51 808,-1550.51 808,-1550.51 987.5,-1550.51 1053.08,-1550.51 1231.53,-1573.39 1282,-1531.51 1338.44,-1484.67 1368.58,-1247.54 1376.72,-1173.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1380.21,-1173.84 1377.8,-1163.52 1373.25,-1173.09 1380.21,-1173.84"/>
 </g>
 <!-- none~set~2 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_node38" class="node">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_node37" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node38"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="693,-870.51 580,-870.51 580,-846.51 693,-846.51 693,-870.51"/>
-<text text-anchor="middle" x="636.5" y="-856.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node37"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="693,-1442.51 580,-1442.51 580,-1418.51 693,-1418.51 693,-1442.51"/>
+<text text-anchor="middle" x="636.5" y="-1428.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;none~set~2 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge77" class="edge">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge62" class="edge">
 <title>proc~insert_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M512.81,-1128.34C516.89,-1125.87 520.67,-1122.94 524,-1119.51 580.18,-1061.56 523.53,-1013.51 560,-941.51 572.78,-916.27 595.36,-892.95 612.51,-877.5"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="615.2,-879.79 620.42,-870.57 610.59,-874.53 615.2,-879.79"/>
+<path fill="none" stroke="#ff0000" d="M512.74,-1708.27C516.83,-1705.81 520.64,-1702.91 524,-1699.51 576.12,-1646.7 529.87,-1604.31 560,-1536.51 574.68,-1503.48 600.49,-1470.34 617.79,-1450.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="620.47,-1452.38 624.41,-1442.54 615.2,-1447.77 620.47,-1452.38"/>
 </g>
 <!-- proc~insert_knots~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node17" class="node">
 <title>proc~insert_knots~3</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node17"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_curve%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="509,-450.51 358,-450.51 358,-426.51 509,-426.51 509,-450.51"/>
-<text text-anchor="middle" x="433.5" y="-436.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node17"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514,-1152.51 353,-1152.51 353,-1128.51 514,-1128.51 514,-1152.51"/>
+<text text-anchor="middle" x="433.5" y="-1138.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge16" class="edge">
 <title>proc~insert_knots~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M485.71,-450.51C587.55,-474.38 805.96,-525.51 808,-525.51 808,-525.51 808,-525.51 987.5,-525.51 1133.2,-525.51 1192.77,-554.33 1282,-669.51 1338.2,-742.05 1369.22,-1036.47 1377.02,-1120.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1373.56,-1120.72 1377.95,-1130.36 1380.53,-1120.09 1373.56,-1120.72"/>
+<path fill="none" stroke="#ff0000" d="M514.13,-1150.62C589.65,-1159.33 706.36,-1170.51 808,-1170.51 808,-1170.51 808,-1170.51 987.5,-1170.51 1099.35,-1170.51 1228.97,-1162.67 1307.42,-1157.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1307.96,-1160.54 1317.68,-1156.33 1307.45,-1153.56 1307.96,-1160.54"/>
 </g>
 <!-- none~set~3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_node50" class="node">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_node38" class="node">
 <title>none~set~3</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node50"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="688,-286.51 585,-286.51 585,-262.51 688,-262.51 688,-286.51"/>
-<text text-anchor="middle" x="636.5" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node38"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="693,-870.51 580,-870.51 580,-846.51 693,-846.51 693,-870.51"/>
+<text text-anchor="middle" x="636.5" y="-856.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;none~set~3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge102" class="edge">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge77" class="edge">
 <title>proc~insert_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M495,-426.41C505.16,-422.88 515.24,-418.33 524,-412.51 570.28,-381.72 606.72,-325.76 624.2,-295.42"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="627.34,-296.96 629.19,-286.53 621.24,-293.53 627.34,-296.96"/>
+<path fill="none" stroke="#ff7500" d="M512.77,-1128.3C516.85,-1125.83 520.65,-1122.93 524,-1119.51 577.74,-1064.65 526.7,-1019.71 560,-950.51 573.6,-922.25 597.61,-895.17 614.9,-877.79"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="617.63,-880.02 622.32,-870.52 612.73,-875.03 617.63,-880.02"/>
 </g>
 <!-- proc~remove_knots -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node18" class="node">
 <title>proc~remove_knots</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node18"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-1690.51 347.5,-1690.51 347.5,-1666.51 519.5,-1666.51 519.5,-1690.51"/>
-<text text-anchor="middle" x="433.5" y="-1676.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node18"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_curve%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514.5,-450.51 352.5,-450.51 352.5,-426.51 514.5,-426.51 514.5,-450.51"/>
+<text text-anchor="middle" x="433.5" y="-436.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge17" class="edge">
 <title>proc~remove_knots&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M483.24,-1666.44C496.72,-1662.4 511.17,-1657.4 524,-1651.51 660.04,-1589.08 658.32,-1470.51 808,-1470.51 808,-1470.51 808,-1470.51 987.5,-1470.51 1129.87,-1470.51 1182.14,-1445.98 1282,-1344.51 1334.24,-1291.42 1362.6,-1204.76 1373.57,-1164.44"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1377.01,-1165.13 1376.16,-1154.57 1370.24,-1163.36 1377.01,-1165.13"/>
+<path fill="none" stroke="#ff0000" d="M494.27,-450.53C504.31,-453.12 514.53,-456.11 524,-459.51 656.47,-507 667.27,-599.51 808,-599.51 808,-599.51 808,-599.51 987.5,-599.51 1144.97,-599.51 1189.99,-668.71 1282,-796.51 1359.15,-903.67 1374.95,-1069.19 1378.18,-1128.99"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1374.69,-1129.36 1378.66,-1139.19 1381.68,-1129.03 1374.69,-1129.36"/>
 </g>
 <!-- proc~remove_knots&#45;&gt;none~set -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge65" class="edge">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge105" class="edge">
 <title>proc~remove_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M505.43,-1666.32C512.39,-1662.78 518.79,-1658.27 524,-1652.51 583.38,-1586.8 502.24,-1523.65 560,-1456.51 563.17,-1452.83 566.88,-1449.66 570.93,-1446.95"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="572.7,-1449.97 579.66,-1441.98 569.24,-1443.89 572.7,-1449.97"/>
+<path fill="none" stroke="#ff0000" d="M495,-426.41C505.16,-422.88 515.24,-418.33 524,-412.51 570.28,-381.72 606.72,-325.76 624.2,-295.42"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="627.34,-296.96 629.19,-286.53 621.24,-293.53 627.34,-296.96"/>
 </g>
 <!-- proc~remove_knots~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node19" class="node">
 <title>proc~remove_knots~2</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node19"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-1110.51 347.5,-1110.51 347.5,-1086.51 519.5,-1086.51 519.5,-1110.51"/>
-<text text-anchor="middle" x="433.5" y="-1096.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node19"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-1690.51 347.5,-1690.51 347.5,-1666.51 519.5,-1666.51 519.5,-1690.51"/>
+<text text-anchor="middle" x="433.5" y="-1676.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge18" class="edge">
 <title>proc~remove_knots~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M519.69,-1107.46C595.32,-1114.64 708.89,-1123.51 808,-1123.51 808,-1123.51 808,-1123.51 987.5,-1123.51 1099.35,-1123.51 1228.97,-1131.34 1307.42,-1136.95"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1307.45,-1140.46 1317.68,-1137.69 1307.96,-1133.48 1307.45,-1140.46"/>
+<path fill="none" stroke="#ff0000" d="M501.65,-1666.32C509.91,-1662.61 517.66,-1657.79 524,-1651.51 562.07,-1613.83 521.32,-1573.55 560,-1536.51 642.38,-1457.62 693.94,-1470.51 808,-1470.51 808,-1470.51 808,-1470.51 987.5,-1470.51 1128.34,-1470.51 1181.51,-1452.18 1282,-1353.51 1335.14,-1301.32 1363.05,-1214.22 1373.74,-1173.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1377.2,-1174.23 1376.26,-1163.67 1370.41,-1172.51 1377.2,-1174.23"/>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;none~set~2 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge80" class="edge">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge65" class="edge">
 <title>proc~remove_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M512.16,-1086.35C516.45,-1083.88 520.45,-1080.96 524,-1077.51 568.83,-1033.92 530.11,-996.43 560,-941.51 573.52,-916.66 596,-893.29 612.92,-877.72"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="615.61,-880.01 620.72,-870.73 610.94,-874.8 615.61,-880.01"/>
+<path fill="none" stroke="#ff0000" d="M505.43,-1666.32C512.39,-1662.78 518.79,-1658.27 524,-1652.51 583.38,-1586.8 502.24,-1523.65 560,-1456.51 563.17,-1452.83 566.88,-1449.66 570.93,-1446.95"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="572.7,-1449.97 579.66,-1441.98 569.24,-1443.89 572.7,-1449.97"/>
 </g>
 <!-- proc~remove_knots~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node20" class="node">
 <title>proc~remove_knots~3</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node20"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_curve%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514.5,-492.51 352.5,-492.51 352.5,-468.51 514.5,-468.51 514.5,-492.51"/>
-<text text-anchor="middle" x="433.5" y="-478.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node20"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-1110.51 347.5,-1110.51 347.5,-1086.51 519.5,-1086.51 519.5,-1110.51"/>
+<text text-anchor="middle" x="433.5" y="-1096.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge19" class="edge">
 <title>proc~remove_knots~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M504.45,-492.66C511.27,-495.09 517.91,-498.01 524,-501.51 544.17,-513.1 541,-526.09 560,-539.51 658.49,-609.07 687.42,-649.51 808,-649.51 808,-649.51 808,-649.51 987.5,-649.51 1153.03,-649.51 1184.29,-743.89 1282,-877.51 1339.42,-956.02 1366.12,-1072.14 1375.21,-1120.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1371.79,-1121.07 1377.02,-1130.28 1378.68,-1119.82 1371.79,-1121.07"/>
+<path fill="none" stroke="#ff0000" d="M518.48,-1110.54C594.05,-1120.32 708.22,-1132.51 808,-1132.51 808,-1132.51 808,-1132.51 987.5,-1132.51 1099.35,-1132.51 1228.97,-1140.34 1307.42,-1145.95"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1307.45,-1149.46 1317.68,-1146.69 1307.96,-1142.48 1307.45,-1149.46"/>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;none~set~3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge105" class="edge">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge80" class="edge">
 <title>proc~remove_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M508.45,-468.33C513.96,-465.89 519.23,-462.98 524,-459.51 581.76,-417.45 615.3,-335.52 628.69,-296.36"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="632.05,-297.33 631.86,-286.74 625.4,-295.14 632.05,-297.33"/>
+<path fill="none" stroke="#ff7500" d="M512.09,-1086.28C516.4,-1083.82 520.42,-1080.92 524,-1077.51 566.42,-1036.98 532.82,-1002.5 560,-950.51 574.53,-922.72 598.36,-895.55 615.37,-878.02"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="618.09,-880.25 622.64,-870.69 613.11,-875.32 618.09,-880.25"/>
 </g>
 <!-- proc~cmp_degree -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node21" class="node">
 <title>proc~cmp_degree</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node21"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="1068,-1442.51 905,-1442.51 905,-1418.51 1068,-1418.51 1068,-1442.51"/>
-<text text-anchor="middle" x="986.5" y="-1428.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node21"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="1063.5,-286.51 909.5,-286.51 909.5,-262.51 1063.5,-262.51 1063.5,-286.51"/>
+<text text-anchor="middle" x="986.5" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge27" class="edge">
 <title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#00ff55" d="M997.72,-1442.55C1016.5,-1463.9 1058.75,-1508.28 1104,-1531.51 1107.96,-1533.54 1112.12,-1535.38 1116.39,-1537.04"/>
-<polygon fill="#00ff55" stroke="#00ff55" points="1115.27,-1540.36 1125.87,-1540.41 1117.62,-1533.77 1115.27,-1540.36"/>
+<path fill="none" stroke="#00ff55" d="M1063.65,-274.51C1074.89,-274.51 1086.58,-274.51 1098.13,-274.51"/>
+<polygon fill="#00ff55" stroke="#00ff55" points="1098.23,-278.01 1108.23,-274.51 1098.23,-271.01 1098.23,-278.01"/>
 </g>
 <!-- proc~cmp_degree~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node22" class="node">
 <title>proc~cmp_degree~2</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node22"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="1068,-934.51 905,-934.51 905,-910.51 1068,-910.51 1068,-934.51"/>
-<text text-anchor="middle" x="986.5" y="-920.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node22"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="1068,-1442.51 905,-1442.51 905,-1418.51 1068,-1418.51 1068,-1442.51"/>
+<text text-anchor="middle" x="986.5" y="-1428.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge29" class="edge">
 <title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
-<path fill="none" stroke="#00ffa9" d="M1050.53,-934.53C1072.1,-938.64 1096.42,-943.28 1118.74,-947.54"/>
-<polygon fill="#00ffa9" stroke="#00ffa9" points="1118.35,-951.02 1128.83,-949.46 1119.66,-944.15 1118.35,-951.02"/>
+<path fill="none" stroke="#00ffa9" d="M1018.56,-1442.66C1054.2,-1456.6 1112.75,-1479.5 1151.83,-1494.79"/>
+<polygon fill="#00ffa9" stroke="#00ffa9" points="1150.73,-1498.12 1161.32,-1498.5 1153.28,-1491.6 1150.73,-1498.12"/>
 </g>
 <!-- proc~cmp_degree~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node23" class="node">
 <title>proc~cmp_degree~3</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node23"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="1063.5,-286.51 909.5,-286.51 909.5,-262.51 1063.5,-262.51 1063.5,-286.51"/>
-<text text-anchor="middle" x="986.5" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node23"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="1068,-943.51 905,-943.51 905,-919.51 1068,-919.51 1068,-943.51"/>
+<text text-anchor="middle" x="986.5" y="-929.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge31" class="edge">
 <title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#00ffff" d="M1063.65,-274.51C1074.89,-274.51 1086.58,-274.51 1098.13,-274.51"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="1098.23,-278.01 1108.23,-274.51 1098.23,-271.01 1098.23,-278.01"/>
+<path fill="none" stroke="#00ffff" d="M1050.53,-943.53C1072.1,-947.64 1096.42,-952.28 1118.74,-956.54"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="1118.35,-960.02 1128.83,-958.46 1119.66,-953.15 1118.35,-960.02"/>
 </g>
 <!-- proc~cmp_elem -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node24" class="node">
 <title>proc~cmp_elem</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node24"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_volume%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="713,-1794.51 560,-1794.51 560,-1770.51 713,-1770.51 713,-1794.51"/>
-<text text-anchor="middle" x="636.5" y="-1780.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node24"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_curve%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="708,-38.51 565,-38.51 565,-14.51 708,-14.51 708,-38.51"/>
+<text text-anchor="middle" x="636.5" y="-24.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem&#45;&gt;proc~get_multiplicity -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge28" class="edge">
 <title>proc~cmp_elem&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#00ff55" d="M666.53,-1770.47C759.34,-1731.97 1048.88,-1611.87 1153.66,-1568.41"/>
-<polygon fill="#00ff55" stroke="#00ff55" points="1155.03,-1571.63 1162.92,-1564.57 1152.34,-1565.17 1155.03,-1571.63"/>
+<path fill="none" stroke="#00ff55" d="M664.62,-38.64C755.92,-79.47 1052.17,-211.97 1155.8,-258.32"/>
+<polygon fill="#00ff55" stroke="#00ff55" points="1154.37,-261.51 1164.93,-262.4 1157.23,-255.12 1154.37,-261.51"/>
 </g>
 <!-- proc~cmp_elem~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node25" class="node">
 <title>proc~cmp_elem~2</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node25"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_surface%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="713,-974.51 560,-974.51 560,-950.51 713,-950.51 713,-974.51"/>
-<text text-anchor="middle" x="636.5" y="-960.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node25"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_volume%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="713,-1794.51 560,-1794.51 560,-1770.51 713,-1770.51 713,-1794.51"/>
+<text text-anchor="middle" x="636.5" y="-1780.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge30" class="edge">
 <title>proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2</title>
-<path fill="none" stroke="#00ffa9" d="M713.15,-962.37C811.77,-962.19 984.47,-961.88 1093.3,-961.69"/>
-<polygon fill="#00ffa9" stroke="#00ffa9" points="1093.63,-965.18 1103.62,-961.67 1093.62,-958.18 1093.63,-965.18"/>
+<path fill="none" stroke="#00ffa9" d="M662.04,-1770.47C750.87,-1726.89 1055.78,-1577.33 1158.17,-1527.1"/>
+<polygon fill="#00ffa9" stroke="#00ffa9" points="1159.99,-1530.11 1167.43,-1522.56 1156.91,-1523.82 1159.99,-1530.11"/>
 </g>
 <!-- proc~cmp_elem~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node26" class="node">
 <title>proc~cmp_elem~3</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node26"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_curve%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="708,-38.51 565,-38.51 565,-14.51 708,-14.51 708,-38.51"/>
-<text text-anchor="middle" x="636.5" y="-24.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node26"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_surface%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="713,-983.51 560,-983.51 560,-959.51 713,-959.51 713,-983.51"/>
+<text text-anchor="middle" x="636.5" y="-969.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge32" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#00ffff" d="M664.62,-38.64C755.92,-79.47 1052.17,-211.97 1155.8,-258.32"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="1154.37,-261.51 1164.93,-262.4 1157.23,-255.12 1154.37,-261.51"/>
+<path fill="none" stroke="#00ffff" d="M713.15,-971.37C811.77,-971.19 984.47,-970.88 1093.3,-970.69"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="1093.63,-974.18 1103.62,-970.67 1093.62,-967.18 1093.63,-974.18"/>
 </g>
 <!-- proc~elevate_degree -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node27" class="node">
 <title>proc~elevate_degree</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node27"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-1194.51 343.5,-1194.51 343.5,-1170.51 523.5,-1170.51 523.5,-1194.51"/>
-<text text-anchor="middle" x="433.5" y="-1180.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node27"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="518.5,-534.51 348.5,-534.51 348.5,-510.51 518.5,-510.51 518.5,-534.51"/>
+<text text-anchor="middle" x="433.5" y="-520.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree&#45;&gt;proc~elevate_degree_a_5_9 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge24" class="edge">
 <title>proc~elevate_degree&#45;&gt;proc~elevate_degree_a_5_9</title>
-<path fill="none" stroke="#ffff00" d="M504.5,-1170.44C511.31,-1167.99 517.94,-1165.05 524,-1161.51 567.44,-1136.15 603.88,-1088.42 622.39,-1061.1"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="625.36,-1062.95 627.96,-1052.68 619.53,-1059.09 625.36,-1062.95"/>
+<path fill="none" stroke="#ffff00" d="M514.09,-534.75C517.74,-537.22 521.09,-540.12 524,-543.51 589.26,-619.41 507.94,-907.01 560,-992.51 567.9,-1005.47 580.86,-1015.41 593.84,-1022.73"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="592.28,-1025.87 602.76,-1027.39 595.52,-1019.66 592.28,-1025.87"/>
 </g>
 <!-- proc~elevate_degree&#45;&gt;none~set -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge61" class="edge">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge101" class="edge">
 <title>proc~elevate_degree&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.81,-1194.52C508.54,-1198.05 516.91,-1202.61 524,-1208.51 588.93,-1262.54 619.77,-1363.83 630.68,-1408.45"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="627.29,-1409.33 632.98,-1418.27 634.11,-1407.74 627.29,-1409.33"/>
+<path fill="none" stroke="#ff0000" d="M509.67,-510.36C514.78,-507.91 519.63,-504.99 524,-501.51 591.6,-447.7 621.15,-342.49 631.21,-296.69"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="634.69,-297.14 633.31,-286.64 627.84,-295.71 634.69,-297.14"/>
 </g>
 <!-- proc~elevate_degree~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node28" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node28"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-1068.51 343.5,-1068.51 343.5,-1044.51 523.5,-1044.51 523.5,-1068.51"/>
-<text text-anchor="middle" x="433.5" y="-1054.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node28"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-1194.51 343.5,-1194.51 343.5,-1170.51 523.5,-1170.51 523.5,-1194.51"/>
+<text text-anchor="middle" x="433.5" y="-1180.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;proc~elevate_degree_a_5_9 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge25" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;proc~elevate_degree_a_5_9</title>
-<path fill="none" stroke="#ffff00" d="M523.54,-1049.42C535.72,-1048.45 548.13,-1047.46 560.04,-1046.51"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="560.67,-1049.98 570.36,-1045.69 560.11,-1043 560.67,-1049.98"/>
+<path fill="none" stroke="#ffff00" d="M504.51,-1170.46C511.32,-1168.01 517.94,-1165.06 524,-1161.51 567.59,-1135.95 603.97,-1087.82 622.43,-1060.27"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="625.44,-1062.07 627.99,-1051.78 619.59,-1058.23 625.44,-1062.07"/>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;none~set~2 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge76" class="edge">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge61" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M455.55,-1044.29C474.72,-1032.54 503.13,-1013.51 524,-992.51 543.56,-972.83 542.63,-963.14 560,-941.51 578.13,-918.92 600.66,-894.58 616.37,-878.13"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="619.08,-880.37 623.49,-870.74 614.03,-875.52 619.08,-880.37"/>
+<path fill="none" stroke="#ff0000" d="M499.81,-1194.52C508.54,-1198.05 516.91,-1202.61 524,-1208.51 588.93,-1262.54 619.77,-1363.83 630.68,-1408.45"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="627.29,-1409.33 632.98,-1418.27 634.11,-1407.74 627.29,-1409.33"/>
 </g>
 <!-- proc~elevate_degree~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node29" class="node">
 <title>proc~elevate_degree~3</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node29"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="518.5,-534.51 348.5,-534.51 348.5,-510.51 518.5,-510.51 518.5,-534.51"/>
-<text text-anchor="middle" x="433.5" y="-520.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node29"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-1068.51 343.5,-1068.51 343.5,-1044.51 523.5,-1044.51 523.5,-1068.51"/>
+<text text-anchor="middle" x="433.5" y="-1054.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;proc~elevate_degree_a_5_9 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge26" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;proc~elevate_degree_a_5_9</title>
-<path fill="none" stroke="#ffff00" d="M514.08,-534.75C517.73,-537.22 521.08,-540.12 524,-543.51 588.02,-617.84 512.72,-897.55 560,-983.51 569.26,-1000.35 585.84,-1013.7 601.1,-1023.24"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="599.48,-1026.35 609.87,-1028.41 603.03,-1020.32 599.48,-1026.35"/>
+<path fill="none" stroke="#ffff00" d="M523.54,-1048.98C535.72,-1047.95 548.13,-1046.9 560.04,-1045.89"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="560.69,-1049.35 570.36,-1045.02 560.1,-1042.37 560.69,-1049.35"/>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;none~set~3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge101" class="edge">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge76" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M509.67,-510.36C514.78,-507.91 519.63,-504.99 524,-501.51 591.6,-447.7 621.15,-342.49 631.21,-296.69"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="634.69,-297.14 633.31,-286.64 627.84,-295.71 634.69,-297.14"/>
+<path fill="none" stroke="#ff7500" d="M454.45,-1044.36C473.35,-1032.37 502.03,-1012.92 524,-992.51 529.31,-987.57 589.15,-914.94 618.91,-878.72"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="621.8,-880.72 625.44,-870.77 616.39,-876.28 621.8,-880.72"/>
 </g>
-<!-- proc~set1 -->
+<!-- proc~set1~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node30" class="node">
-<title>proc~set1</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node30"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
+<title>proc~set1~2</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node30"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="869,-1400.51 749,-1400.51 749,-1376.51 869,-1376.51 869,-1400.51"/>
 <text text-anchor="middle" x="809" y="-1386.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge20" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#ff0000" d="M860.29,-1376.47C880.58,-1371.62 904.15,-1365.98 925.34,-1360.9"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="926.29,-1364.28 935.2,-1358.54 924.66,-1357.47 926.29,-1364.28"/>
+<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<path fill="none" stroke="#ff5400" d="M860.29,-1376.47C880.58,-1371.62 904.15,-1365.98 925.34,-1360.9"/>
+<polygon fill="#ff5400" stroke="#ff5400" points="926.29,-1364.28 935.2,-1358.54 924.66,-1357.47 926.29,-1364.28"/>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_degree -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge39" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#ff0000" d="M860.29,-1400.54C880.58,-1405.4 904.15,-1411.04 925.34,-1416.11"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="924.66,-1419.55 935.2,-1418.47 926.29,-1412.74 924.66,-1419.55"/>
+<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge42" class="edge">
+<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<path fill="none" stroke="#ff5f00" d="M860.29,-1400.54C880.58,-1405.4 904.15,-1411.04 925.34,-1416.11"/>
+<polygon fill="#ff5f00" stroke="#ff5f00" points="924.66,-1419.55 935.2,-1418.47 926.29,-1412.74 924.66,-1419.55"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node31" class="node">
-<title>proc~set1~2</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node31"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="869,-892.51 749,-892.51 749,-868.51 869,-868.51 869,-892.51"/>
-<text text-anchor="middle" x="809" y="-878.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
+<title>proc~set1~3</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node31"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="869,-901.51 749,-901.51 749,-877.51 869,-877.51 869,-901.51"/>
+<text text-anchor="middle" x="809" y="-887.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge22" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
-<path fill="none" stroke="#ff5400" d="M869.42,-880.51C881.3,-880.51 893.97,-880.51 906.4,-880.51"/>
-<polygon fill="#ff5400" stroke="#ff5400" points="906.76,-884.01 916.76,-880.51 906.76,-877.01 906.76,-884.01"/>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#ffaa00" d="M869.42,-889.51C881.3,-889.51 893.97,-889.51 906.4,-889.51"/>
+<polygon fill="#ffaa00" stroke="#ffaa00" points="906.76,-893.01 916.76,-889.51 906.76,-886.01 906.76,-893.01"/>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge41" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#ff5f00" d="M860.29,-892.54C880.58,-897.4 904.15,-903.04 925.34,-908.11"/>
-<polygon fill="#ff5f00" stroke="#ff5f00" points="924.66,-911.55 935.2,-910.47 926.29,-904.74 924.66,-911.55"/>
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge44" class="edge">
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
+<path fill="none" stroke="#ffbf00" d="M860.29,-901.54C880.58,-906.4 904.15,-912.04 925.34,-917.11"/>
+<polygon fill="#ffbf00" stroke="#ffbf00" points="924.66,-920.55 935.2,-919.47 926.29,-913.74 924.66,-920.55"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set2~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node32" class="node">
-<title>proc~set2</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node32"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
+<title>proc~set2~2</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node32"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="869,-1358.51 749,-1358.51 749,-1334.51 869,-1334.51 869,-1358.51"/>
 <text text-anchor="middle" x="809" y="-1344.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge21" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#ff0000" d="M869.42,-1346.51C881.3,-1346.51 893.97,-1346.51 906.4,-1346.51"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="906.76,-1350.01 916.76,-1346.51 906.76,-1343.01 906.76,-1350.01"/>
+<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<path fill="none" stroke="#ff5400" d="M869.42,-1346.51C881.3,-1346.51 893.97,-1346.51 906.4,-1346.51"/>
+<polygon fill="#ff5400" stroke="#ff5400" points="906.76,-1350.01 916.76,-1346.51 906.76,-1343.01 906.76,-1350.01"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node33" class="node">
-<title>proc~set2~2</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node33"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="869,-850.51 749,-850.51 749,-826.51 869,-826.51 869,-850.51"/>
-<text text-anchor="middle" x="809" y="-836.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
+<title>proc~set2~3</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node33"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="869,-859.51 749,-859.51 749,-835.51 869,-835.51 869,-859.51"/>
+<text text-anchor="middle" x="809" y="-845.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge23" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
-<path fill="none" stroke="#ff5400" d="M860.29,-850.54C880.58,-855.4 904.15,-861.04 925.34,-866.11"/>
-<polygon fill="#ff5400" stroke="#ff5400" points="924.66,-869.55 935.2,-868.47 926.29,-862.74 924.66,-869.55"/>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#ffaa00" d="M860.29,-859.54C880.58,-864.4 904.15,-870.04 925.34,-875.11"/>
+<polygon fill="#ffaa00" stroke="#ffaa00" points="924.66,-878.55 935.2,-877.47 926.29,-871.74 924.66,-878.55"/>
 </g>
 <!-- program~example1_curve -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node34" class="node">
@@ -799,27 +799,27 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge35" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
-<path fill="none" stroke="#aa00ff" d="M274.17,-454.53C296.08,-452.31 322.53,-449.64 347.48,-447.11"/>
-<polygon fill="#aa00ff" stroke="#aa00ff" points="348.1,-450.57 357.7,-446.08 347.4,-443.6 348.1,-450.57"/>
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge33" class="edge">
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
+<path fill="none" stroke="#0000ff" d="M274.17,-464.48C296.08,-466.7 322.53,-469.38 347.48,-471.9"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="347.4,-475.41 357.7,-472.94 348.1,-468.45 347.4,-475.41"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge38" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
-<path fill="none" stroke="#ff0055" d="M274.17,-464.48C294.62,-466.55 319.03,-469.02 342.48,-471.4"/>
-<polygon fill="#ff0055" stroke="#ff0055" points="342.15,-474.88 352.45,-472.41 342.86,-467.92 342.15,-474.88"/>
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge36" class="edge">
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
+<path fill="none" stroke="#ff00ff" d="M274.17,-454.53C294.62,-452.46 319.03,-449.99 342.48,-447.62"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="342.86,-451.1 352.45,-446.61 342.15,-444.13 342.86,-451.1"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge55" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
-<path fill="none" stroke="#00ffff" d="M255.75,-471.51C279.38,-480.48 312.96,-492.67 343,-501.51 350.73,-503.78 358.89,-505.98 367.01,-508.03"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="366.32,-511.47 376.87,-510.47 368,-504.67 366.32,-511.47"/>
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge53" class="edge">
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
+<path fill="none" stroke="#00ff3f" d="M255.75,-471.51C279.38,-480.48 312.96,-492.67 343,-501.51 350.73,-503.78 358.89,-505.98 367.01,-508.03"/>
+<polygon fill="#00ff3f" stroke="#00ff3f" points="366.32,-511.47 376.87,-510.47 368,-504.67 366.32,-511.47"/>
 </g>
-<!-- program~example1_curve&#45;&gt;none~set~3 -->
+<!-- program~example1_curve&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge110" class="edge">
-<title>program~example1_curve&#45;&gt;none~set~3</title>
+<title>program~example1_curve&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M255.2,-447.49C278.82,-438.39 312.65,-426.05 343,-417.51 422.12,-395.23 451.13,-417.55 524,-379.51 564.1,-358.57 600.14,-319.1 619.81,-294.97"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="622.8,-296.83 626.29,-286.83 617.32,-292.47 622.8,-296.83"/>
 </g>
@@ -832,27 +832,27 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge34" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
-<path fill="none" stroke="#5400ff" d="M255.75,-1089.51C279.38,-1098.48 312.96,-1110.67 343,-1119.51 350.73,-1121.78 358.89,-1123.98 367.01,-1126.03"/>
-<polygon fill="#5400ff" stroke="#5400ff" points="366.32,-1129.47 376.87,-1128.47 368,-1122.67 366.32,-1129.47"/>
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge35" class="edge">
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#aa00ff" d="M255.75,-1089.51C279.38,-1098.48 312.96,-1110.67 343,-1119.51 350.73,-1121.78 358.89,-1123.98 367.01,-1126.03"/>
+<polygon fill="#aa00ff" stroke="#aa00ff" points="366.32,-1129.47 376.87,-1128.47 368,-1122.67 366.32,-1129.47"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge37" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
-<path fill="none" stroke="#ff00aa" d="M279.25,-1083C297.02,-1084.8 317.32,-1086.85 337.21,-1088.86"/>
-<polygon fill="#ff00aa" stroke="#ff00aa" points="336.93,-1092.35 347.23,-1089.88 337.64,-1085.39 336.93,-1092.35"/>
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge38" class="edge">
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#ff0055" d="M279.25,-1083C297.02,-1084.8 317.32,-1086.85 337.21,-1088.86"/>
+<polygon fill="#ff0055" stroke="#ff0055" points="336.93,-1092.35 347.23,-1089.88 337.64,-1085.39 336.93,-1092.35"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge54" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
-<path fill="none" stroke="#00ff9f" d="M279.25,-1072.02C295.84,-1070.34 314.64,-1068.44 333.24,-1066.55"/>
-<polygon fill="#00ff9f" stroke="#00ff9f" points="333.64,-1070.03 343.24,-1065.54 332.94,-1063.07 333.64,-1070.03"/>
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge55" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#00ffff" d="M279.25,-1072.02C295.84,-1070.34 314.64,-1068.44 333.24,-1066.55"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="333.64,-1070.03 343.24,-1065.54 332.94,-1063.07 333.64,-1070.03"/>
 </g>
-<!-- program~example3_surface&#45;&gt;none~set~2 -->
+<!-- program~example3_surface&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge86" class="edge">
-<title>program~example3_surface&#45;&gt;none~set~2</title>
+<title>program~example3_surface&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff7500" d="M257.45,-1065.46C329.87,-1038.45 500.21,-974.29 524,-959.51 561.15,-936.43 597.4,-900.33 618.04,-878.12"/>
 <polygon fill="#ff7500" stroke="#ff7500" points="620.74,-880.35 624.91,-870.61 615.57,-875.63 620.74,-880.35"/>
 </g>
@@ -865,152 +865,152 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge33" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#0000ff" d="M279.25,-1689.49C304.91,-1694.68 335.86,-1700.95 363.2,-1706.48"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="362.6,-1709.93 373.1,-1708.48 363.99,-1703.07 362.6,-1709.93"/>
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge34" class="edge">
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
+<path fill="none" stroke="#5400ff" d="M279.25,-1689.49C304.91,-1694.68 335.86,-1700.95 363.2,-1706.48"/>
+<polygon fill="#5400ff" stroke="#5400ff" points="362.6,-1709.93 373.1,-1708.48 363.99,-1703.07 362.6,-1709.93"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge36" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#ff00ff" d="M279.25,-1678.51C297.02,-1678.51 317.32,-1678.51 337.21,-1678.51"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="337.23,-1682.01 347.23,-1678.51 337.23,-1675.01 337.23,-1682.01"/>
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge37" class="edge">
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
+<path fill="none" stroke="#ff00aa" d="M279.25,-1678.51C297.02,-1678.51 317.32,-1678.51 337.21,-1678.51"/>
+<polygon fill="#ff00aa" stroke="#ff00aa" points="337.23,-1682.01 347.23,-1678.51 337.23,-1675.01 337.23,-1682.01"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~cmp_elem -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge48" class="edge">
-<title>program~example3_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#dfff00" d="M242.8,-1690.56C260,-1702.57 286.41,-1721.99 307,-1741.51 324.84,-1758.42 320.66,-1773.23 343,-1783.51 418.17,-1818.08 516.14,-1808.24 577.43,-1796.52"/>
-<polygon fill="#dfff00" stroke="#dfff00" points="578.2,-1799.93 587.32,-1794.55 576.83,-1793.07 578.2,-1799.93"/>
+<!-- program~example3_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge50" class="edge">
+<title>program~example3_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#7fff00" d="M242.8,-1690.56C260,-1702.57 286.41,-1721.99 307,-1741.51 324.84,-1758.42 320.66,-1773.23 343,-1783.51 418.17,-1818.08 516.14,-1808.24 577.43,-1796.52"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="578.2,-1799.93 587.32,-1794.55 576.83,-1793.07 578.2,-1799.93"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge53" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#00ff3f" d="M252.32,-1666.47C271.07,-1656.67 294.69,-1640.95 307,-1619.51 391,-1473.14 256.02,-1386.13 343,-1241.51 354.27,-1222.77 374.05,-1208.8 392.16,-1199.17"/>
-<polygon fill="#00ff3f" stroke="#00ff3f" points="394.05,-1202.14 401.42,-1194.53 390.91,-1195.88 394.05,-1202.14"/>
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge54" class="edge">
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
+<path fill="none" stroke="#00ff9f" d="M252.32,-1666.47C271.07,-1656.67 294.69,-1640.95 307,-1619.51 391,-1473.14 256.02,-1386.13 343,-1241.51 354.27,-1222.77 374.05,-1208.8 392.16,-1199.17"/>
+<polygon fill="#00ff9f" stroke="#00ff9f" points="394.05,-1202.14 401.42,-1194.53 390.91,-1195.88 394.05,-1202.14"/>
 </g>
-<!-- program~example3_volume&#45;&gt;none~set -->
+<!-- program~example3_volume&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge71" class="edge">
-<title>program~example3_volume&#45;&gt;none~set</title>
+<title>program~example3_volume&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M279.2,-1668.59C364.17,-1652.93 519.61,-1623.8 524,-1619.51 577.05,-1567.64 510.62,-1511.88 560,-1456.51 563.23,-1452.88 566.99,-1449.76 571.08,-1447.08"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="572.84,-1450.1 579.85,-1442.16 569.42,-1444 572.84,-1450.1"/>
 </g>
-<!-- none~set&#45;&gt;proc~set1 -->
+<!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge56" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
+<title>none~set~2&#45;&gt;proc~set1~2</title>
 <path fill="none" stroke="#009fff" d="M686.36,-1418.47C705.98,-1413.64 728.76,-1408.03 749.27,-1402.97"/>
 <polygon fill="#009fff" stroke="#009fff" points="750.26,-1406.33 759.13,-1400.54 748.59,-1399.54 750.26,-1406.33"/>
 </g>
-<!-- none~set&#45;&gt;proc~set2 -->
+<!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge58" class="edge">
-<title>none~set&#45;&gt;proc~set2</title>
+<title>none~set~2&#45;&gt;proc~set2~2</title>
 <path fill="none" stroke="#1f00ff" d="M656.7,-1418.3C678.51,-1404.77 715.42,-1382.83 749,-1367.51 753.06,-1365.65 757.33,-1363.86 761.65,-1362.14"/>
 <polygon fill="#1f00ff" stroke="#1f00ff" points="763.01,-1365.37 771.1,-1358.54 760.51,-1358.83 763.01,-1365.37"/>
 </g>
-<!-- proc~set3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_node47" class="node">
-<title>proc~set3</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node47"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
+<!-- proc~set3~2 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_node48" class="node">
+<title>proc~set3~2</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node48"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="869,-1442.51 749,-1442.51 749,-1418.51 869,-1418.51 869,-1442.51"/>
 <text text-anchor="middle" x="809" y="-1428.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge97" class="edge">
-<title>none~set&#45;&gt;proc~set3</title>
-<path fill="none" stroke="#9c00ff" d="M693.33,-1430.51C707.77,-1430.51 723.49,-1430.51 738.54,-1430.51"/>
-<polygon fill="#9c00ff" stroke="#9c00ff" points="738.82,-1434.01 748.82,-1430.51 738.82,-1427.01 738.82,-1434.01"/>
+<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge98" class="edge">
+<title>none~set~2&#45;&gt;proc~set3~2</title>
+<path fill="none" stroke="#ff00eb" d="M693.33,-1430.51C707.77,-1430.51 723.49,-1430.51 738.54,-1430.51"/>
+<polygon fill="#ff00eb" stroke="#ff00eb" points="738.82,-1434.01 748.82,-1430.51 738.82,-1427.01 738.82,-1434.01"/>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge57" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
-<path fill="none" stroke="#003fff" d="M693.33,-865.71C707.77,-867.57 723.49,-869.6 738.54,-871.54"/>
-<polygon fill="#003fff" stroke="#003fff" points="738.45,-875.06 748.82,-872.87 739.35,-868.12 738.45,-875.06"/>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
+<path fill="none" stroke="#003fff" d="M693.33,-868.66C707.91,-871.31 723.8,-874.2 738.97,-876.96"/>
+<polygon fill="#003fff" stroke="#003fff" points="738.35,-880.4 748.82,-878.75 739.61,-873.51 738.35,-880.4"/>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge59" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
-<path fill="none" stroke="#7f00ff" d="M693.33,-851.96C707.77,-850.26 723.49,-848.42 738.54,-846.66"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="739.3,-850.09 748.82,-845.45 738.48,-843.14 739.3,-850.09"/>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
+<path fill="none" stroke="#7f00ff" d="M693.33,-854.91C707.77,-853.97 723.49,-852.96 738.54,-851.99"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="739.07,-855.46 748.82,-851.33 738.62,-848.48 739.07,-855.46"/>
 </g>
-<!-- proc~set3~2 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_node48" class="node">
-<title>proc~set3~2</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node48"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="869,-934.51 749,-934.51 749,-910.51 869,-910.51 869,-934.51"/>
-<text text-anchor="middle" x="809" y="-920.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
+<!-- proc~set3~3 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_node49" class="node">
+<title>proc~set3~3</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node49"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="869,-943.51 749,-943.51 749,-919.51 869,-919.51 869,-943.51"/>
+<text text-anchor="middle" x="809" y="-929.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge98" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
-<path fill="none" stroke="#ff00eb" d="M668.18,-870.59C690.53,-879.33 721.57,-891.34 749,-901.51 753.85,-903.3 758.93,-905.16 763.99,-906.98"/>
-<polygon fill="#ff00eb" stroke="#ff00eb" points="763.03,-910.36 773.63,-910.44 765.4,-903.77 763.03,-910.36"/>
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge99" class="edge">
+<title>none~set~3&#45;&gt;proc~set3~3</title>
+<path fill="none" stroke="#ff0075" d="M661.57,-870.54C683.95,-881.53 718.37,-897.95 749,-910.51 753.48,-912.34 758.19,-914.18 762.9,-915.95"/>
+<polygon fill="#ff0075" stroke="#ff0075" points="761.95,-919.33 772.54,-919.5 764.36,-912.76 761.95,-919.33"/>
 </g>
 <!-- proc~ansatz -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node39" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node39"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-1774.51 367.5,-1774.51 367.5,-1750.51 499.5,-1750.51 499.5,-1774.51"/>
-<text text-anchor="middle" x="433.5" y="-1760.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node39"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="494.5,-38.51 372.5,-38.51 372.5,-14.51 494.5,-14.51 494.5,-38.51"/>
+<text text-anchor="middle" x="433.5" y="-24.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge46" class="edge">
 <title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#dfff00" d="M499.76,-1769C515.61,-1770.58 532.8,-1772.29 549.46,-1773.95"/>
-<polygon fill="#dfff00" stroke="#dfff00" points="549.44,-1777.46 559.74,-1774.97 550.13,-1770.5 549.44,-1777.46"/>
+<path fill="none" stroke="#dfff00" d="M494.53,-26.51C513.44,-26.51 534.63,-26.51 554.73,-26.51"/>
+<polygon fill="#dfff00" stroke="#dfff00" points="554.8,-30.01 564.8,-26.51 554.8,-23.01 554.8,-30.01"/>
 </g>
 <!-- proc~ansatz&#45;&gt;none~set -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge60" class="edge">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge100" class="edge">
 <title>proc~ansatz&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.9,-1755.31C508.72,-1752.12 517.09,-1747.67 524,-1741.51 612.07,-1662.93 630.6,-1509.73 634.48,-1452.64"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="637.98,-1452.75 635.08,-1442.56 630.99,-1452.33 637.98,-1452.75"/>
+<path fill="none" stroke="#ff0000" d="M494.67,-32.91C505.21,-36.1 515.51,-40.75 524,-47.51 591.6,-101.32 621.15,-206.52 631.21,-252.32"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="627.84,-253.3 633.31,-262.38 634.69,-251.87 627.84,-253.3"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node40" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node40"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-950.51 367.5,-950.51 367.5,-926.51 499.5,-926.51 499.5,-950.51"/>
-<text text-anchor="middle" x="433.5" y="-936.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node40"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-1774.51 367.5,-1774.51 367.5,-1750.51 499.5,-1750.51 499.5,-1774.51"/>
+<text text-anchor="middle" x="433.5" y="-1760.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;proc~cmp_elem~2 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge49" class="edge">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge48" class="edge">
 <title>proc~ansatz~2&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#7fff00" d="M499.76,-946.3C515.61,-948.19 532.8,-950.25 549.46,-952.23"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="549.39,-955.75 559.74,-953.46 550.22,-948.8 549.39,-955.75"/>
+<path fill="none" stroke="#7fff00" d="M499.76,-1769C515.61,-1770.58 532.8,-1772.29 549.46,-1773.95"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="549.44,-1777.46 559.74,-1774.97 550.13,-1770.5 549.44,-1777.46"/>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~set~2 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge75" class="edge">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge60" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M481.45,-926.48C495.31,-922.49 510.41,-917.73 524,-912.51 551.93,-901.77 582.44,-886.76 604.47,-875.28"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="606.14,-878.36 613.36,-870.61 602.88,-872.17 606.14,-878.36"/>
+<path fill="none" stroke="#ff0000" d="M499.9,-1755.31C508.72,-1752.12 517.09,-1747.67 524,-1741.51 612.07,-1662.93 630.6,-1509.73 634.48,-1452.64"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="637.98,-1452.75 635.08,-1442.56 630.99,-1452.33 637.98,-1452.75"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node41" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node41"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="494.5,-38.51 372.5,-38.51 372.5,-14.51 494.5,-14.51 494.5,-38.51"/>
-<text text-anchor="middle" x="433.5" y="-24.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node41"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-950.51 367.5,-950.51 367.5,-926.51 499.5,-926.51 499.5,-950.51"/>
+<text text-anchor="middle" x="433.5" y="-936.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;proc~cmp_elem~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge51" class="edge">
 <title>proc~ansatz~3&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#1fff00" d="M494.53,-26.51C513.44,-26.51 534.63,-26.51 554.73,-26.51"/>
-<polygon fill="#1fff00" stroke="#1fff00" points="554.8,-30.01 564.8,-26.51 554.8,-23.01 554.8,-30.01"/>
+<path fill="none" stroke="#1fff00" d="M499.76,-949.22C516.43,-951.96 534.59,-954.94 552.04,-957.8"/>
+<polygon fill="#1fff00" stroke="#1fff00" points="551.78,-961.31 562.21,-959.47 552.91,-954.4 551.78,-961.31"/>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~set~3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge100" class="edge">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge75" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M494.67,-32.91C505.21,-36.1 515.51,-40.75 524,-47.51 591.6,-101.32 621.15,-206.52 631.21,-252.32"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="627.84,-253.3 633.31,-262.38 634.69,-251.87 627.84,-253.3"/>
+<path fill="none" stroke="#ff7500" d="M481.45,-926.48C495.31,-922.49 510.41,-917.73 524,-912.51 551.93,-901.77 582.44,-886.76 604.47,-875.28"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="606.14,-878.36 613.36,-870.61 602.88,-872.17 606.14,-878.36"/>
 </g>
 <!-- proc~cmp_area -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node42" class="node">
@@ -1021,17 +1021,17 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~2 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge50" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#7fff00" d="M281.46,-950.52C300.87,-954.12 322.8,-957.62 343,-959.51 412.28,-965.98 491.2,-966.39 549.58,-965.36"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="549.94,-968.86 559.87,-965.16 549.81,-961.86 549.94,-968.86"/>
+<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~3 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge52" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~cmp_elem~3</title>
+<path fill="none" stroke="#1fff00" d="M283.6,-950.55C302.48,-953.99 323.56,-957.39 343,-959.51 412.23,-967.05 491.15,-969.96 549.55,-971.03"/>
+<polygon fill="#1fff00" stroke="#1fff00" points="549.78,-974.53 559.84,-971.2 549.9,-967.54 549.78,-974.53"/>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge90" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#9cff00" d="M299.03,-938.51C317.98,-938.51 338.36,-938.51 357.36,-938.51"/>
-<polygon fill="#9cff00" stroke="#9cff00" points="357.45,-942.01 367.45,-938.51 357.45,-935.01 357.45,-942.01"/>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge91" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#27ff00" d="M299.03,-938.51C317.98,-938.51 338.36,-938.51 357.36,-938.51"/>
+<polygon fill="#27ff00" stroke="#27ff00" points="357.45,-942.01 367.45,-938.51 357.45,-935.01 357.45,-942.01"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node43" class="node">
@@ -1042,17 +1042,17 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~cmp_elem~3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge52" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#1fff00" d="M280.85,-14.49C300.41,-10.83 322.58,-7.31 343,-5.51 423.13,1.57 443.9,1.97 524,-5.51 539.85,-6.99 556.8,-9.62 572.58,-12.54"/>
-<polygon fill="#1fff00" stroke="#1fff00" points="572.28,-16.05 582.76,-14.49 573.59,-9.17 572.28,-16.05"/>
+<!-- proc~cmp_length&#45;&gt;proc~cmp_elem -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge47" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~cmp_elem</title>
+<path fill="none" stroke="#dfff00" d="M280.85,-14.49C300.41,-10.83 322.58,-7.31 343,-5.51 423.13,1.57 443.9,1.97 524,-5.51 539.85,-6.99 556.8,-9.62 572.58,-12.54"/>
+<polygon fill="#dfff00" stroke="#dfff00" points="572.28,-16.05 582.76,-14.49 573.59,-9.17 572.28,-16.05"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge91" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#27ff00" d="M299.03,-26.51C319.64,-26.51 341.96,-26.51 362.34,-26.51"/>
-<polygon fill="#27ff00" stroke="#27ff00" points="362.49,-30.01 372.49,-26.51 362.49,-23.01 362.49,-30.01"/>
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge89" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ffeb00" d="M299.03,-26.51C319.64,-26.51 341.96,-26.51 362.34,-26.51"/>
+<polygon fill="#ffeb00" stroke="#ffeb00" points="362.49,-30.01 372.49,-26.51 362.49,-23.01 362.49,-30.01"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node44" class="node">
@@ -1063,180 +1063,180 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge47" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#dfff00" d="M244.54,-1774.64C267.22,-1787.96 306.24,-1808.5 343,-1816.51 421.6,-1833.64 444.43,-1828.37 524,-1816.51 548.19,-1812.9 574.39,-1805.12 595.31,-1797.91"/>
-<polygon fill="#dfff00" stroke="#dfff00" points="596.57,-1801.18 604.83,-1794.55 594.23,-1794.58 596.57,-1801.18"/>
+<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge49" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#7fff00" d="M244.54,-1774.64C267.22,-1787.96 306.24,-1808.5 343,-1816.51 421.6,-1833.64 444.43,-1828.37 524,-1816.51 548.19,-1812.9 574.39,-1805.12 595.31,-1797.91"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="596.57,-1801.18 604.83,-1794.55 594.23,-1794.58 596.57,-1801.18"/>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge89" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ffeb00" d="M307.01,-1762.51C323.61,-1762.51 341,-1762.51 357.35,-1762.51"/>
-<polygon fill="#ffeb00" stroke="#ffeb00" points="357.38,-1766.01 367.38,-1762.51 357.38,-1759.01 357.38,-1766.01"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge90" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#9cff00" d="M307.01,-1762.51C323.61,-1762.51 341,-1762.51 357.35,-1762.51"/>
+<polygon fill="#9cff00" stroke="#9cff00" points="357.38,-1766.01 367.38,-1762.51 357.38,-1759.01 357.38,-1766.01"/>
 </g>
-<!-- proc~set1a -->
+<!-- proc~set1 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node45" class="node">
+<title>proc~set1</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node45"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="864,-328.51 754,-328.51 754,-304.51 864,-304.51 864,-328.51"/>
+<text text-anchor="middle" x="809" y="-314.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+</a>
+</g>
+</g>
+<!-- proc~set1&#45;&gt;proc~cmp_degree -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge39" class="edge">
+<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#ff0000" d="M860.29,-304.47C880.58,-299.62 904.15,-293.98 925.34,-288.9"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="926.29,-292.28 935.2,-286.54 924.66,-285.47 926.29,-292.28"/>
+</g>
+<!-- proc~set1a -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_node46" class="node">
 <title>proc~set1a</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node45"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node46"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
 <polygon fill="#d9534f" stroke="#d9534f" points="867.5,-286.51 750.5,-286.51 750.5,-262.51 867.5,-262.51 867.5,-286.51"/>
 <text text-anchor="middle" x="809" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge43" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ffbf00" d="M867.95,-274.51C878.01,-274.51 888.67,-274.51 899.3,-274.51"/>
-<polygon fill="#ffbf00" stroke="#ffbf00" points="899.46,-278.01 909.46,-274.51 899.46,-271.01 899.46,-278.01"/>
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge40" class="edge">
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#ff0000" d="M867.95,-274.51C878.01,-274.51 888.67,-274.51 899.3,-274.51"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="899.46,-278.01 909.46,-274.51 899.46,-271.01 899.46,-278.01"/>
 </g>
-<!-- proc~set1~3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_node46" class="node">
-<title>proc~set1~3</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node46"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
+<!-- proc~set3 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_node47" class="node">
+<title>proc~set3</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node47"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="864,-244.51 754,-244.51 754,-220.51 864,-220.51 864,-244.51"/>
-<text text-anchor="middle" x="809" y="-230.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<text text-anchor="middle" x="809" y="-230.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge44" class="edge">
-<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ffbf00" d="M860.29,-244.54C880.58,-249.4 904.15,-255.04 925.34,-260.11"/>
-<polygon fill="#ffbf00" stroke="#ffbf00" points="924.66,-263.55 935.2,-262.47 926.29,-256.74 924.66,-263.55"/>
-</g>
 <!-- proc~set3&#45;&gt;proc~cmp_degree -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge40" class="edge">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge41" class="edge">
 <title>proc~set3&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#ff0000" d="M869.42,-1430.51C877.64,-1430.51 886.23,-1430.51 894.86,-1430.51"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="894.98,-1434.01 904.98,-1430.51 894.98,-1427.01 894.98,-1434.01"/>
+<path fill="none" stroke="#ff0000" d="M860.29,-244.54C880.58,-249.4 904.15,-255.04 925.34,-260.11"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="924.66,-263.55 935.2,-262.47 926.29,-256.74 924.66,-263.55"/>
 </g>
 <!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge42" class="edge">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge43" class="edge">
 <title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#ff5f00" d="M869.42,-922.51C877.64,-922.51 886.23,-922.51 894.86,-922.51"/>
-<polygon fill="#ff5f00" stroke="#ff5f00" points="894.98,-926.01 904.98,-922.51 894.98,-919.01 894.98,-926.01"/>
-</g>
-<!-- proc~set3~3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_node49" class="node">
-<title>proc~set3~3</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node49"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="864,-328.51 754,-328.51 754,-304.51 864,-304.51 864,-328.51"/>
-<text text-anchor="middle" x="809" y="-314.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
-</a>
-</g>
+<path fill="none" stroke="#ff5f00" d="M869.42,-1430.51C877.64,-1430.51 886.23,-1430.51 894.86,-1430.51"/>
+<polygon fill="#ff5f00" stroke="#ff5f00" points="894.98,-1434.01 904.98,-1430.51 894.98,-1427.01 894.98,-1434.01"/>
 </g>
 <!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge45" class="edge">
 <title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ffbf00" d="M860.29,-304.47C880.58,-299.62 904.15,-293.98 925.34,-288.9"/>
-<polygon fill="#ffbf00" stroke="#ffbf00" points="926.29,-292.28 935.2,-286.54 924.66,-285.47 926.29,-292.28"/>
+<path fill="none" stroke="#ffbf00" d="M869.42,-931.51C877.64,-931.51 886.23,-931.51 894.86,-931.51"/>
+<polygon fill="#ffbf00" stroke="#ffbf00" points="894.98,-935.01 904.98,-931.51 894.98,-928.01 894.98,-935.01"/>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
+<!-- none~set&#45;&gt;proc~set1 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge95" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
-<path fill="none" stroke="#004eff" d="M688.19,-274.51C704.52,-274.51 722.89,-274.51 740.24,-274.51"/>
-<polygon fill="#004eff" stroke="#004eff" points="740.32,-278.01 750.32,-274.51 740.32,-271.01 740.32,-278.01"/>
+<title>none~set&#45;&gt;proc~set1</title>
+<path fill="none" stroke="#004eff" d="M686.36,-286.54C705.98,-291.38 728.76,-296.99 749.27,-302.04"/>
+<polygon fill="#004eff" stroke="#004eff" points="748.59,-305.48 759.13,-304.47 750.26,-298.68 748.59,-305.48"/>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1~3 -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge96" class="edge">
-<title>none~set~3&#45;&gt;proc~set1~3</title>
-<path fill="none" stroke="#2700ff" d="M686.36,-262.47C705.98,-257.64 728.76,-252.03 749.27,-246.97"/>
-<polygon fill="#2700ff" stroke="#2700ff" points="750.26,-250.33 759.13,-244.54 748.59,-243.54 750.26,-250.33"/>
+<title>none~set&#45;&gt;proc~set1a</title>
+<path fill="none" stroke="#2700ff" d="M688.19,-274.51C704.52,-274.51 722.89,-274.51 740.24,-274.51"/>
+<polygon fill="#2700ff" stroke="#2700ff" points="740.32,-278.01 750.32,-274.51 740.32,-271.01 740.32,-278.01"/>
 </g>
-<!-- none~set~3&#45;&gt;proc~set3~3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge99" class="edge">
-<title>none~set~3&#45;&gt;proc~set3~3</title>
-<path fill="none" stroke="#ff0075" d="M686.36,-286.54C705.98,-291.38 728.76,-296.99 749.27,-302.04"/>
-<polygon fill="#ff0075" stroke="#ff0075" points="748.59,-305.48 759.13,-304.47 750.26,-298.68 748.59,-305.48"/>
+<!-- none~set&#45;&gt;proc~set3 -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge97" class="edge">
+<title>none~set&#45;&gt;proc~set3</title>
+<path fill="none" stroke="#9c00ff" d="M686.36,-262.47C705.98,-257.64 728.76,-252.03 749.27,-246.97"/>
+<polygon fill="#9c00ff" stroke="#9c00ff" points="750.26,-250.33 759.13,-244.54 748.59,-243.54 750.26,-250.33"/>
 </g>
-<!-- proc~modify_wc -->
+<!-- proc~modify_wc~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node51" class="node">
-<title>proc~modify_wc</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node51"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
+<title>proc~modify_wc~2</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node51"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
 <polygon fill="#d9534f" stroke="#d9534f" points="511.5,-1526.51 355.5,-1526.51 355.5,-1502.51 511.5,-1502.51 511.5,-1526.51"/>
 <text text-anchor="middle" x="433.5" y="-1512.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_wc&#45;&gt;none~set -->
+<!-- proc~modify_wc~2&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge63" class="edge">
-<title>proc~modify_wc&#45;&gt;none~set</title>
+<title>proc~modify_wc~2&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M503.94,-1502.43C510.93,-1499.99 517.75,-1497.04 524,-1493.51 543.97,-1482.21 540.63,-1468.8 560,-1456.51 566.12,-1452.63 572.88,-1449.25 579.77,-1446.33"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="581.18,-1449.53 589.21,-1442.62 578.62,-1443.02 581.18,-1449.53"/>
 </g>
-<!-- proc~modify_wc~2 -->
+<!-- proc~modify_wc~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node52" class="node">
-<title>proc~modify_wc~2</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node52"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
+<title>proc~modify_wc~3</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node52"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
 <polygon fill="#d9534f" stroke="#d9534f" points="511.5,-660.51 355.5,-660.51 355.5,-636.51 511.5,-636.51 511.5,-660.51"/>
 <text text-anchor="middle" x="433.5" y="-646.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_wc~2&#45;&gt;none~set~2 -->
+<!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge78" class="edge">
-<title>proc~modify_wc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M508.49,-660.64C513.99,-663.08 519.24,-666.01 524,-669.51 582.76,-712.72 615.99,-797 629.01,-836.76"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="625.74,-838.02 632.09,-846.51 632.42,-835.92 625.74,-838.02"/>
+<title>proc~modify_wc~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff7500" d="M511.79,-660.38C516.23,-662.92 520.36,-665.93 524,-669.51 570.45,-715.13 521.58,-758.94 560,-811.51 569.25,-824.17 583.05,-834.18 596.32,-841.65"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="594.89,-844.85 605.37,-846.42 598.16,-838.66 594.89,-844.85"/>
 </g>
-<!-- proc~modify_xc -->
+<!-- proc~modify_xc~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node53" class="node">
-<title>proc~modify_xc</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node53"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
+<title>proc~modify_xc~2</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node53"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="510,-1484.51 357,-1484.51 357,-1460.51 510,-1460.51 510,-1484.51"/>
 <text text-anchor="middle" x="433.5" y="-1470.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_xc&#45;&gt;none~set -->
+<!-- proc~modify_xc~2&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge64" class="edge">
-<title>proc~modify_xc&#45;&gt;none~set</title>
+<title>proc~modify_xc~2&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M492.1,-1460.47C516.47,-1455.38 544.99,-1449.42 570.15,-1444.16"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="570.9,-1447.58 579.97,-1442.11 569.47,-1440.73 570.9,-1447.58"/>
 </g>
-<!-- proc~modify_xc~2 -->
+<!-- proc~modify_xc~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node54" class="node">
-<title>proc~modify_xc~2</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node54"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
+<title>proc~modify_xc~3</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node54"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="510,-576.51 357,-576.51 357,-552.51 510,-552.51 510,-576.51"/>
 <text text-anchor="middle" x="433.5" y="-562.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_xc~2&#45;&gt;none~set~2 -->
+<!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge79" class="edge">
-<title>proc~modify_xc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M510.37,-576.54C515.26,-579.03 519.87,-581.98 524,-585.51 534.26,-594.27 603.2,-773.65 627.25,-836.77"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="624,-838.08 630.83,-846.18 630.54,-835.59 624,-838.08"/>
+<title>proc~modify_xc~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff7500" d="M510.1,-574.82C515.25,-577.67 519.98,-581.18 524,-585.51 593.27,-659.99 503.75,-726.76 560,-811.51 568.53,-824.36 581.91,-834.34 595.05,-841.74"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="593.56,-844.91 604.04,-846.44 596.81,-838.71 593.56,-844.91"/>
 </g>
-<!-- proc~set_c -->
+<!-- proc~set_c~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node55" class="node">
-<title>proc~set_c</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node55"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_volume%set_C">
+<title>proc~set_c~2</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node55"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_volume%set_C">
 <polygon fill="#d9534f" stroke="#d9534f" points="496.5,-1610.51 370.5,-1610.51 370.5,-1586.51 496.5,-1586.51 496.5,-1610.51"/>
 <text text-anchor="middle" x="433.5" y="-1596.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c&#45;&gt;none~set -->
+<!-- proc~set_c~2&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge66" class="edge">
-<title>proc~set_c&#45;&gt;none~set</title>
+<title>proc~set_c~2&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M496.56,-1592.92C506.68,-1589.63 516.34,-1584.73 524,-1577.51 564.82,-1539.01 521.18,-1497.01 560,-1456.51 563.36,-1453 567.21,-1449.97 571.37,-1447.34"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="573.13,-1450.37 580.24,-1442.51 569.78,-1444.22 573.13,-1450.37"/>
 </g>
-<!-- proc~set_c~2 -->
+<!-- proc~set_c~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node56" class="node">
-<title>proc~set_c~2</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node56"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_surface%set_C">
+<title>proc~set_c~3</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node56"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_surface%set_C">
 <polygon fill="#d9534f" stroke="#d9534f" points="496.5,-786.51 370.5,-786.51 370.5,-762.51 496.5,-762.51 496.5,-786.51"/>
 <text text-anchor="middle" x="433.5" y="-772.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c~2&#45;&gt;none~set~2 -->
+<!-- proc~set_c~3&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge81" class="edge">
-<title>proc~set_c~2&#45;&gt;none~set~2</title>
+<title>proc~set_c~3&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff7500" d="M496.35,-786.59C505.75,-789.12 515.23,-792.08 524,-795.51 554.76,-807.52 587.36,-826.8 609.31,-840.87"/>
 <polygon fill="#ff7500" stroke="#ff7500" points="607.46,-843.84 617.75,-846.36 611.27,-837.97 607.46,-843.84"/>
 </g>
@@ -1249,9 +1249,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring&#45;&gt;none~set -->
+<!-- proc~set_half_ring&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge67" class="edge">
-<title>proc~set_half_ring&#45;&gt;none~set</title>
+<title>proc~set_half_ring&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M516.25,-1430.51C533.99,-1430.51 552.52,-1430.51 569.56,-1430.51"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="569.94,-1434.01 579.94,-1430.51 569.94,-1427.01 569.94,-1434.01"/>
 </g>
@@ -1264,9 +1264,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_half_ring~2&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge82" class="edge">
-<title>proc~set_half_ring~2&#45;&gt;none~set~2</title>
+<title>proc~set_half_ring~2&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff7500" d="M516.25,-858.51C533.99,-858.51 552.52,-858.51 569.56,-858.51"/>
 <polygon fill="#ff7500" stroke="#ff7500" points="569.94,-862.01 579.94,-858.51 569.94,-855.01 569.94,-862.01"/>
 </g>
@@ -1279,9 +1279,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_hexahedron&#45;&gt;none~set -->
+<!-- proc~set_hexahedron&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge68" class="edge">
-<title>proc~set_hexahedron&#45;&gt;none~set</title>
+<title>proc~set_hexahedron&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M492.1,-1400.54C516.47,-1405.64 544.99,-1411.59 570.15,-1416.85"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="569.47,-1420.28 579.97,-1418.9 570.9,-1413.43 569.47,-1420.28"/>
 </g>
@@ -1294,9 +1294,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_ring&#45;&gt;none~set -->
+<!-- proc~set_ring&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge69" class="edge">
-<title>proc~set_ring&#45;&gt;none~set</title>
+<title>proc~set_ring&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M496.35,-1358.59C505.75,-1361.12 515.23,-1364.08 524,-1367.51 554.76,-1379.52 587.36,-1398.8 609.31,-1412.87"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="607.46,-1415.84 617.75,-1418.36 611.27,-1409.97 607.46,-1415.84"/>
 </g>
@@ -1309,11 +1309,11 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_ring~2&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge83" class="edge">
-<title>proc~set_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M503.02,-701.3C510.41,-703.99 517.58,-707.33 524,-711.51 573.17,-743.45 609.03,-804.88 625.48,-837.29"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="622.39,-838.93 629.95,-846.35 628.66,-835.83 622.39,-838.93"/>
+<title>proc~set_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff7500" d="M503.07,-698.92C510.72,-702 517.92,-706.09 524,-711.51 559.27,-742.93 530.31,-774.77 560,-811.51 570.02,-823.9 584.22,-833.94 597.62,-841.5"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="596.23,-844.73 606.7,-846.35 599.52,-838.55 596.23,-844.73"/>
 </g>
 <!-- proc~set_tetragon -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node62" class="node">
@@ -1324,11 +1324,11 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge84" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M509.69,-618.62C514.8,-621.08 519.64,-624.01 524,-627.51 592.67,-682.56 621.77,-790.31 631.47,-836.56"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="628.05,-837.32 633.43,-846.44 634.91,-835.95 628.05,-837.32"/>
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff7500" d="M512.83,-618.65C516.91,-621.13 520.68,-624.06 524,-627.51 581.81,-687.52 512.7,-742.9 560,-811.51 568.83,-824.31 582.4,-834.32 595.62,-841.75"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="594.17,-844.94 604.65,-846.48 597.42,-838.74 594.17,-844.94"/>
 </g>
 <!-- program~compute_area -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node63" class="node">
@@ -1339,9 +1339,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;none~set~2 -->
+<!-- program~compute_area&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge85" class="edge">
-<title>program~compute_area&#45;&gt;none~set~2</title>
+<title>program~compute_area&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff7500" d="M97.12,-916.4C180.4,-912.05 367.64,-900.65 524,-879.51 538.83,-877.5 554.68,-874.84 569.63,-872.08"/>
 <polygon fill="#ff7500" stroke="#ff7500" points="570.64,-875.45 579.82,-870.17 569.34,-868.57 570.64,-875.45"/>
 </g>
@@ -1355,22 +1355,22 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node64" class="node">
 <title>program~compute_length</title>
 <g id="a_proc~~compute_multiplicity2~~CalledByGraph_node64"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-121.51 3,-121.51 3,-97.51 102,-97.51 102,-121.51"/>
-<text text-anchor="middle" x="52.5" y="-107.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-79.51 3,-79.51 3,-55.51 102,-55.51 102,-79.51"/>
+<text text-anchor="middle" x="52.5" y="-65.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge93" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#00ffc4" d="M78.15,-97.44C107.4,-83.12 156.32,-59.16 189.12,-43.1"/>
-<polygon fill="#00ffc4" stroke="#00ffc4" points="190.88,-46.13 198.32,-38.59 187.8,-39.85 190.88,-46.13"/>
+<path fill="none" stroke="#00ffc4" d="M102.07,-55.76C121.15,-51.14 143.25,-45.8 163.29,-40.95"/>
+<polygon fill="#00ffc4" stroke="#00ffc4" points="164.35,-44.3 173.24,-38.54 162.7,-37.49 164.35,-44.3"/>
 </g>
-<!-- program~compute_length&#45;&gt;none~set~3 -->
+<!-- program~compute_length&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge109" class="edge">
-<title>program~compute_length&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M65.54,-121.66C81.32,-136.74 110.59,-161.88 141,-173.51 300.78,-234.6 360.92,-159.88 524,-211.51 556.04,-221.65 589.12,-241.78 610.84,-256.57"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="608.93,-259.5 619.14,-262.34 612.93,-253.76 608.93,-259.5"/>
+<title>program~compute_length&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M95.95,-79.52C110.18,-83.19 126.19,-86.92 141,-89.51 225.26,-104.2 449.37,-85.73 524,-127.51 575.42,-156.29 610.52,-219.62 626.2,-252.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="623.11,-254.65 630.44,-262.3 629.48,-251.75 623.11,-254.65"/>
 </g>
 <!-- program~compute_volume -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node65" class="node">
@@ -1381,9 +1381,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;none~set -->
+<!-- program~compute_volume&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge70" class="edge">
-<title>program~compute_volume&#45;&gt;none~set</title>
+<title>program~compute_volume&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M56.77,-1480.22C65.43,-1449.87 91.74,-1370.59 141,-1325.51 212.73,-1259.86 247.65,-1260.54 343,-1241.51 421.89,-1225.76 454.14,-1201.61 524,-1241.51 587.91,-1278.01 618.86,-1367.05 630.2,-1408.55"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="626.81,-1409.44 632.72,-1418.24 633.59,-1407.68 626.81,-1409.44"/>
 </g>
@@ -1402,9 +1402,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;none~set~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge87" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;none~set~2</title>
+<title>program~example_nurbs_surface&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff7500" d="M492.1,-828.54C516.47,-833.64 544.99,-839.59 570.15,-844.85"/>
 <polygon fill="#ff7500" stroke="#ff7500" points="569.47,-848.28 579.97,-846.9 570.9,-841.43 569.47,-848.28"/>
 </g>
@@ -1417,9 +1417,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;none~set -->
+<!-- program~example_nurbs_volume&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge72" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;none~set</title>
+<title>program~example_nurbs_volume&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M502.84,-1316.55C510.19,-1319 517.39,-1321.96 524,-1325.51 563.85,-1346.91 599.97,-1386.23 619.72,-1410.21"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="617.24,-1412.7 626.24,-1418.29 622.69,-1408.3 617.24,-1412.7"/>
 </g>
@@ -1432,9 +1432,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;none~set -->
+<!-- program~example_put_to_nurbs&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge73" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;none~set</title>
+<title>program~example_put_to_nurbs&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M499.77,-1272.17C508.31,-1275.03 516.64,-1278.72 524,-1283.51 573.17,-1315.45 609.03,-1376.88 625.48,-1409.29"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="622.39,-1410.93 629.95,-1418.35 628.66,-1407.83 622.39,-1410.93"/>
 </g>
@@ -1447,11 +1447,11 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;none~set~2 -->
+<!-- program~nearest_point_2d&#45;&gt;none~set~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge88" class="edge">
-<title>program~nearest_point_2d&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff7500" d="M485.42,-739.62C498.49,-742.72 512.19,-747.16 524,-753.51 563.85,-774.91 599.97,-814.23 619.72,-838.21"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="617.24,-840.7 626.24,-846.29 622.69,-836.3 617.24,-840.7"/>
+<title>program~nearest_point_2d&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff7500" d="M485.27,-737.29C498.77,-740.39 512.72,-745.41 524,-753.51 548.64,-771.21 538.56,-790.04 560,-811.51 571.9,-823.43 587.37,-833.72 601.21,-841.61"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="599.56,-844.7 610.01,-846.45 602.93,-838.57 599.56,-844.7"/>
 </g>
 <!-- program~nearest_point_3d -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node70" class="node">
@@ -1462,101 +1462,101 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;none~set -->
+<!-- program~nearest_point_3d&#45;&gt;none~set~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge74" class="edge">
-<title>program~nearest_point_3d&#45;&gt;none~set</title>
+<title>program~nearest_point_3d&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M485.05,-1552.86C498.85,-1549.8 513.02,-1544.51 524,-1535.51 553.84,-1511.04 531.44,-1482.45 560,-1456.51 564.04,-1452.84 568.62,-1449.68 573.49,-1446.97"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="575.06,-1450.1 582.49,-1442.55 571.97,-1443.81 575.06,-1450.1"/>
 </g>
-<!-- proc~modify_wc~3 -->
+<!-- proc~modify_wc -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node71" class="node">
-<title>proc~modify_wc~3</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node71"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
+<title>proc~modify_wc</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node71"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
 <polygon fill="#d9534f" stroke="#d9534f" points="506.5,-328.51 360.5,-328.51 360.5,-304.51 506.5,-304.51 506.5,-328.51"/>
 <text text-anchor="middle" x="433.5" y="-314.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
+<!-- proc~modify_wc&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge103" class="edge">
-<title>proc~modify_wc~3&#45;&gt;none~set~3</title>
+<title>proc~modify_wc&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M492.1,-304.47C518.02,-299.06 548.63,-292.66 574.9,-287.17"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="575.66,-290.59 584.73,-285.11 574.23,-283.73 575.66,-290.59"/>
 </g>
-<!-- proc~modify_xc~3 -->
+<!-- proc~modify_xc -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node72" class="node">
-<title>proc~modify_xc~3</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node72"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
+<title>proc~modify_xc</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node72"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="505,-286.51 362,-286.51 362,-262.51 505,-262.51 505,-286.51"/>
 <text text-anchor="middle" x="433.5" y="-272.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
+<!-- proc~modify_xc&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge104" class="edge">
-<title>proc~modify_xc~3&#45;&gt;none~set~3</title>
+<title>proc~modify_xc&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M505.08,-274.51C527.74,-274.51 552.62,-274.51 574.53,-274.51"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="574.69,-278.01 584.69,-274.51 574.69,-271.01 574.69,-278.01"/>
 </g>
-<!-- proc~set_circle -->
+<!-- proc~set_c -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node73" class="node">
-<title>proc~set_circle</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node73"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="502,-164.51 365,-164.51 365,-140.51 502,-140.51 502,-164.51"/>
-<text text-anchor="middle" x="433.5" y="-150.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
+<title>proc~set_c</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node73"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_curve%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="491.5,-80.51 375.5,-80.51 375.5,-56.51 491.5,-56.51 491.5,-80.51"/>
+<text text-anchor="middle" x="433.5" y="-66.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
 </a>
 </g>
 </g>
-<!-- proc~set_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_c&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge106" class="edge">
-<title>proc~set_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M489.93,-164.59C501.55,-168.22 513.47,-172.8 524,-178.51 561.4,-198.78 597.33,-233.31 617.87,-254.96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="615.34,-257.38 624.72,-262.31 620.46,-252.6 615.34,-257.38"/>
+<title>proc~set_c&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M491.9,-78.42C503.27,-82.18 514.59,-87.36 524,-94.51 579.39,-136.57 613.81,-214.79 628,-252.73"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="624.77,-254.1 631.47,-262.31 631.36,-251.71 624.77,-254.1"/>
 </g>
-<!-- proc~set_c~3 -->
+<!-- proc~set_circle -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node74" class="node">
-<title>proc~set_c~3</title>
-<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node74"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_curve%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="491.5,-370.51 375.5,-370.51 375.5,-346.51 491.5,-346.51 491.5,-370.51"/>
-<text text-anchor="middle" x="433.5" y="-356.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
+<title>proc~set_circle</title>
+<g id="a_proc~~compute_multiplicity2~~CalledByGraph_node74"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
+<polygon fill="#d9534f" stroke="#d9534f" points="502,-370.51 365,-370.51 365,-346.51 502,-346.51 502,-370.51"/>
+<text text-anchor="middle" x="433.5" y="-356.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c~3&#45;&gt;none~set~3 -->
+<!-- proc~set_circle&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge107" class="edge">
-<title>proc~set_c~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M491.58,-347.68C502.51,-344.89 513.74,-341.51 524,-337.51 554.76,-325.49 587.36,-306.21 609.31,-292.14"/>
+<title>proc~set_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M496.35,-346.43C505.75,-343.9 515.23,-340.93 524,-337.51 554.76,-325.49 587.36,-306.21 609.31,-292.14"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="611.27,-295.04 617.75,-286.65 607.46,-289.17 611.27,-295.04"/>
 </g>
 <!-- proc~set_half_circle -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node75" class="node">
 <title>proc~set_half_circle</title>
 <g id="a_proc~~compute_multiplicity2~~CalledByGraph_node75"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="515,-244.51 352,-244.51 352,-220.51 515,-220.51 515,-244.51"/>
-<text text-anchor="middle" x="433.5" y="-230.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="515,-160.51 352,-160.51 352,-136.51 515,-136.51 515,-160.51"/>
+<text text-anchor="middle" x="433.5" y="-146.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_half_circle&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge108" class="edge">
-<title>proc~set_half_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M492.1,-244.54C518.02,-249.96 548.63,-256.36 574.9,-261.84"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="574.23,-265.28 584.73,-263.9 575.66,-258.43 574.23,-265.28"/>
+<title>proc~set_half_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M502.84,-160.55C510.19,-163 517.39,-165.96 524,-169.51 563.85,-190.91 599.97,-230.23 619.72,-254.21"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="617.24,-256.7 626.24,-262.29 622.69,-252.3 617.24,-256.7"/>
 </g>
 <!-- program~example_nurbs_curve -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node76" class="node">
 <title>program~example_nurbs_curve</title>
 <g id="a_proc~~compute_multiplicity2~~CalledByGraph_node76"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-122.51 369,-122.51 369,-98.51 498,-98.51 498,-122.51"/>
-<text text-anchor="middle" x="433.5" y="-108.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-244.51 369,-244.51 369,-220.51 498,-220.51 498,-244.51"/>
+<text text-anchor="middle" x="433.5" y="-230.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;none~set~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge111" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M498.31,-119.8C507.35,-122.71 516.2,-126.52 524,-131.51 572.09,-162.3 608,-221.24 624.86,-252.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="621.95,-254.99 629.65,-262.27 628.17,-251.78 621.95,-254.99"/>
+<title>program~example_nurbs_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M492.1,-244.54C518.02,-249.96 548.63,-256.36 574.9,-261.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="574.23,-265.28 584.73,-263.9 575.66,-258.43 574.23,-265.28"/>
 </g>
 <!-- program~example_ppm1 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node77" class="node">
@@ -1609,9 +1609,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge113" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
 <path fill="none" stroke="#daff00" d="M271.05,-564.51C293.29,-564.51 320.72,-564.51 346.61,-564.51"/>
 <polygon fill="#daff00" stroke="#daff00" points="346.83,-568.01 356.83,-564.51 346.83,-561.01 346.83,-568.01"/>
 </g>
@@ -1625,16 +1625,16 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node80" class="node">
 <title>program~nearest_point_1d</title>
 <g id="a_proc~~compute_multiplicity2~~CalledByGraph_node80"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-80.51 382,-80.51 382,-56.51 485,-56.51 485,-80.51"/>
-<text text-anchor="middle" x="433.5" y="-66.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-202.51 382,-202.51 382,-178.51 485,-178.51 485,-202.51"/>
+<text text-anchor="middle" x="433.5" y="-188.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;none~set~3 -->
+<!-- program~nearest_point_1d&#45;&gt;none~set -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge112" class="edge">
-<title>program~nearest_point_1d&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M485.34,-73.19C498.84,-76.29 512.78,-81.33 524,-89.51 581.76,-131.57 615.3,-213.5 628.69,-252.65"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="625.4,-253.88 631.86,-262.28 632.05,-251.68 625.4,-253.88"/>
+<title>program~nearest_point_1d&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M485.44,-199.82C498.25,-202.88 511.81,-206.75 524,-211.51 554.76,-223.52 587.36,-242.8 609.31,-256.87"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="607.46,-259.84 617.75,-262.36 611.27,-253.97 607.46,-259.84"/>
 </g>
 <!-- program~nearest_point_2d_bench -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node81" class="node">
@@ -1660,9 +1660,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~set_c~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~set_c~3 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge115" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~set_c~2</title>
+<title>program~shape_c_2d&#45;&gt;proc~set_c~3</title>
 <path fill="none" stroke="#48ff00" d="M262.1,-774.51C289.25,-774.51 326.96,-774.51 360,-774.51"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="360.09,-778.01 370.09,-774.51 360.09,-771.01 360.09,-778.01"/>
 </g>
@@ -1675,9 +1675,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~set_c -->
+<!-- program~shape_c_3d&#45;&gt;proc~set_c~2 -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge114" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~set_c</title>
+<title>program~shape_c_3d&#45;&gt;proc~set_c~2</title>
 <path fill="none" stroke="#91ff00" d="M262.1,-1598.51C289.25,-1598.51 326.96,-1598.51 360,-1598.51"/>
 <polygon fill="#91ff00" stroke="#91ff00" points="360.09,-1602.01 370.09,-1598.51 360.09,-1595.01 360.09,-1602.01"/>
 </g>
@@ -1775,46 +1775,46 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node90" class="node">
 <title>program~shape_c_1d</title>
 <g id="a_proc~~compute_multiplicity2~~CalledByGraph_node90"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-370.51 186,-370.51 186,-346.51 262,-346.51 262,-370.51"/>
-<text text-anchor="middle" x="224" y="-356.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-80.51 186,-80.51 186,-56.51 262,-56.51 262,-80.51"/>
+<text text-anchor="middle" x="224" y="-66.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~set_c~3 -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge129" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~set_c~3</title>
-<path fill="none" stroke="#fff100" d="M262.1,-358.51C290.62,-358.51 330.8,-358.51 364.98,-358.51"/>
-<polygon fill="#fff100" stroke="#fff100" points="365.38,-362.01 375.38,-358.51 365.37,-355.01 365.38,-362.01"/>
+<!-- program~shape_c_1d&#45;&gt;proc~set_c -->
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge128" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~set_c</title>
+<path fill="none" stroke="#ffa100" d="M262.1,-68.51C290.62,-68.51 330.8,-68.51 364.98,-68.51"/>
+<polygon fill="#ffa100" stroke="#ffa100" points="365.38,-72.01 375.38,-68.51 365.37,-65.01 365.38,-72.01"/>
 </g>
 <!-- program~shape_circle -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node91" class="node">
 <title>program~shape_circle</title>
 <g id="a_proc~~compute_multiplicity2~~CalledByGraph_node91"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="263.5,-164.51 184.5,-164.51 184.5,-140.51 263.5,-140.51 263.5,-164.51"/>
-<text text-anchor="middle" x="224" y="-150.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="263.5,-370.51 184.5,-370.51 184.5,-346.51 263.5,-346.51 263.5,-370.51"/>
+<text text-anchor="middle" x="224" y="-356.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
 <!-- program~shape_circle&#45;&gt;proc~set_circle -->
-<g id="proc~~compute_multiplicity2~~CalledByGraph_edge128" class="edge">
+<g id="proc~~compute_multiplicity2~~CalledByGraph_edge129" class="edge">
 <title>program~shape_circle&#45;&gt;proc~set_circle</title>
-<path fill="none" stroke="#ffa100" d="M263.54,-152.51C289.03,-152.51 323.33,-152.51 354.38,-152.51"/>
-<polygon fill="#ffa100" stroke="#ffa100" points="354.76,-156.01 364.76,-152.51 354.76,-149.01 354.76,-156.01"/>
+<path fill="none" stroke="#fff100" d="M263.54,-358.51C289.03,-358.51 323.33,-358.51 354.38,-358.51"/>
+<polygon fill="#fff100" stroke="#fff100" points="354.76,-362.01 364.76,-358.51 354.76,-355.01 354.76,-362.01"/>
 </g>
 <!-- program~shape_half_circle -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_node92" class="node">
 <title>program~shape_half_circle</title>
 <g id="a_proc~~compute_multiplicity2~~CalledByGraph_node92"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="276,-244.51 172,-244.51 172,-220.51 276,-220.51 276,-244.51"/>
-<text text-anchor="middle" x="224" y="-230.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="276,-160.51 172,-160.51 172,-136.51 276,-136.51 276,-160.51"/>
+<text text-anchor="middle" x="224" y="-146.11" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
 <!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
 <g id="proc~~compute_multiplicity2~~CalledByGraph_edge130" class="edge">
 <title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
-<path fill="none" stroke="#bbff00" d="M276.03,-232.51C295.8,-232.51 319.05,-232.51 341.49,-232.51"/>
-<polygon fill="#bbff00" stroke="#bbff00" points="341.73,-236.01 351.73,-232.51 341.73,-229.01 341.73,-236.01"/>
+<path fill="none" stroke="#bbff00" d="M276.03,-148.51C295.8,-148.51 319.05,-148.51 341.49,-148.51"/>
+<polygon fill="#bbff00" stroke="#bbff00" points="341.73,-152.01 351.73,-148.51 341.73,-145.01 341.73,-152.01"/>
 </g>
 </g>
 </svg>
@@ -1934,7 +1934,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_tgc_bspline_1d_scalar.html b/proc/compute_tgc_bspline_1d_scalar.html
index ec7296684..0aff2a4e8 100644
--- a/proc/compute_tgc_bspline_1d_scalar.html
+++ b/proc/compute_tgc_bspline_1d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~88"></span>
+              <span class="anchor" id="variable-xt~27"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~39"></span>
+              <span class="anchor" id="variable-knot~25"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~73"></span>
+              <span class="anchor" id="variable-degree~20"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~78"></span>
+              <span class="anchor" id="variable-nc~20"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -350,7 +350,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-tgc~70"></span>
+          <span class="anchor" id="variable-tgc~23"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -507,7 +507,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_tgc_bspline_1d_vector.html b/proc/compute_tgc_bspline_1d_vector.html
index 5078985f3..d4d1d621e 100644
--- a/proc/compute_tgc_bspline_1d_vector.html
+++ b/proc/compute_tgc_bspline_1d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~87"></span>
+              <span class="anchor" id="variable-xt~26"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~38"></span>
+              <span class="anchor" id="variable-knot~24"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~72"></span>
+              <span class="anchor" id="variable-degree~19"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~77"></span>
+              <span class="anchor" id="variable-nc~19"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~38"></span>
+              <span class="anchor" id="variable-ng~11"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -365,7 +365,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-tgc~69"></span>
+          <span class="anchor" id="variable-tgc~22"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
@@ -522,7 +522,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_tgc_bspline_2d_scalar.html b/proc/compute_tgc_bspline_2d_scalar.html
index 4751a11b2..3c40653ab 100644
--- a/proc/compute_tgc_bspline_2d_scalar.html
+++ b/proc/compute_tgc_bspline_2d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~55"></span>
+              <span class="anchor" id="variable-xt~88"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~43"></span>
+              <span class="anchor" id="variable-knot1~44"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~43"></span>
+              <span class="anchor" id="variable-knot2~44"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~43"></span>
+              <span class="anchor" id="variable-degree~73"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~50"></span>
+              <span class="anchor" id="variable-nc~78"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -365,7 +365,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-tgc~47"></span>
+          <span class="anchor" id="variable-tgc~70"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -537,7 +537,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_tgc_bspline_2d_vector.html b/proc/compute_tgc_bspline_2d_vector.html
index 10296f7b7..94ae23167 100644
--- a/proc/compute_tgc_bspline_2d_vector.html
+++ b/proc/compute_tgc_bspline_2d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~54"></span>
+              <span class="anchor" id="variable-xt~87"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~42"></span>
+              <span class="anchor" id="variable-knot1~43"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~42"></span>
+              <span class="anchor" id="variable-knot2~43"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~42"></span>
+              <span class="anchor" id="variable-degree~72"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~49"></span>
+              <span class="anchor" id="variable-nc~77"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~24"></span>
+              <span class="anchor" id="variable-ng~37"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -380,7 +380,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-tgc~46"></span>
+          <span class="anchor" id="variable-tgc~69"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
@@ -552,7 +552,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_tgc_bspline_3d_scalar.html b/proc/compute_tgc_bspline_3d_scalar.html
index 1a1c8ed39..ec659f4e5 100644
--- a/proc/compute_tgc_bspline_3d_scalar.html
+++ b/proc/compute_tgc_bspline_3d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~28"></span>
+              <span class="anchor" id="variable-xt~55"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~21"></span>
+              <span class="anchor" id="variable-knot1~23"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~21"></span>
+              <span class="anchor" id="variable-knot2~23"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~21"></span>
+              <span class="anchor" id="variable-knot3~22"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~22"></span>
+              <span class="anchor" id="variable-degree~42"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~23"></span>
+              <span class="anchor" id="variable-nc~43"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -380,7 +380,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-tgc~24"></span>
+          <span class="anchor" id="variable-tgc~47"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -552,7 +552,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_tgc_bspline_3d_vector.html b/proc/compute_tgc_bspline_3d_vector.html
index 7ac4c855a..3ce8b842f 100644
--- a/proc/compute_tgc_bspline_3d_vector.html
+++ b/proc/compute_tgc_bspline_3d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~27"></span>
+              <span class="anchor" id="variable-xt~54"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~20"></span>
+              <span class="anchor" id="variable-knot1~22"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~20"></span>
+              <span class="anchor" id="variable-knot2~22"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~20"></span>
+              <span class="anchor" id="variable-knot3~21"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~21"></span>
+              <span class="anchor" id="variable-degree~41"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~22"></span>
+              <span class="anchor" id="variable-nc~42"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~11"></span>
+              <span class="anchor" id="variable-ng~25"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -395,7 +395,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-tgc~23"></span>
+          <span class="anchor" id="variable-tgc~46"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
@@ -567,7 +567,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_tgc_nurbs_1d_scalar.html b/proc/compute_tgc_nurbs_1d_scalar.html
index 7a18dc865..f79b97f80 100644
--- a/proc/compute_tgc_nurbs_1d_scalar.html
+++ b/proc/compute_tgc_nurbs_1d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~86"></span>
+              <span class="anchor" id="variable-xt~25"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~37"></span>
+              <span class="anchor" id="variable-knot~23"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~71"></span>
+              <span class="anchor" id="variable-degree~18"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~76"></span>
+              <span class="anchor" id="variable-nc~18"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~66"></span>
+              <span class="anchor" id="variable-wc~25"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -365,7 +365,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-tgc~68"></span>
+          <span class="anchor" id="variable-tgc~21"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -522,7 +522,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_tgc_nurbs_1d_vector.html b/proc/compute_tgc_nurbs_1d_vector.html
index c06209030..88fb5dae2 100644
--- a/proc/compute_tgc_nurbs_1d_vector.html
+++ b/proc/compute_tgc_nurbs_1d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~85"></span>
+              <span class="anchor" id="variable-xt~24"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~36"></span>
+              <span class="anchor" id="variable-knot~22"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~70"></span>
+              <span class="anchor" id="variable-degree~17"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~75"></span>
+              <span class="anchor" id="variable-nc~17"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~37"></span>
+              <span class="anchor" id="variable-ng~10"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~65"></span>
+              <span class="anchor" id="variable-wc~24"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -380,7 +380,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-tgc~67"></span>
+          <span class="anchor" id="variable-tgc~20"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
@@ -537,7 +537,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_tgc_nurbs_2d_scalar.html b/proc/compute_tgc_nurbs_2d_scalar.html
index e109aac4e..8f57846be 100644
--- a/proc/compute_tgc_nurbs_2d_scalar.html
+++ b/proc/compute_tgc_nurbs_2d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~53"></span>
+              <span class="anchor" id="variable-xt~86"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~41"></span>
+              <span class="anchor" id="variable-knot1~42"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~41"></span>
+              <span class="anchor" id="variable-knot2~42"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~41"></span>
+              <span class="anchor" id="variable-degree~71"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~48"></span>
+              <span class="anchor" id="variable-nc~76"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~44"></span>
+              <span class="anchor" id="variable-wc~64"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -380,7 +380,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-tgc~45"></span>
+          <span class="anchor" id="variable-tgc~68"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -552,7 +552,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_tgc_nurbs_2d_vector.html b/proc/compute_tgc_nurbs_2d_vector.html
index f34e95e22..035eb3807 100644
--- a/proc/compute_tgc_nurbs_2d_vector.html
+++ b/proc/compute_tgc_nurbs_2d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~52"></span>
+              <span class="anchor" id="variable-xt~85"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~40"></span>
+              <span class="anchor" id="variable-knot1~41"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~40"></span>
+              <span class="anchor" id="variable-knot2~41"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~40"></span>
+              <span class="anchor" id="variable-degree~70"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~47"></span>
+              <span class="anchor" id="variable-nc~75"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~23"></span>
+              <span class="anchor" id="variable-ng~36"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~43"></span>
+              <span class="anchor" id="variable-wc~63"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -395,7 +395,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-tgc~44"></span>
+          <span class="anchor" id="variable-tgc~67"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
@@ -567,7 +567,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_tgc_nurbs_3d_scalar.html b/proc/compute_tgc_nurbs_3d_scalar.html
index e22ecae64..5bbdfd46b 100644
--- a/proc/compute_tgc_nurbs_3d_scalar.html
+++ b/proc/compute_tgc_nurbs_3d_scalar.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~26"></span>
+              <span class="anchor" id="variable-xt~53"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~19"></span>
+              <span class="anchor" id="variable-knot1~21"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~19"></span>
+              <span class="anchor" id="variable-knot2~21"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~19"></span>
+              <span class="anchor" id="variable-knot3~20"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~20"></span>
+              <span class="anchor" id="variable-degree~40"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~21"></span>
+              <span class="anchor" id="variable-nc~41"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~20"></span>
+              <span class="anchor" id="variable-wc~44"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -395,7 +395,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-tgc~22"></span>
+          <span class="anchor" id="variable-tgc~45"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -567,7 +567,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_tgc_nurbs_3d_vector.html b/proc/compute_tgc_nurbs_3d_vector.html
index f6fb671bc..8e9834d24 100644
--- a/proc/compute_tgc_nurbs_3d_vector.html
+++ b/proc/compute_tgc_nurbs_3d_vector.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~25"></span>
+              <span class="anchor" id="variable-xt~52"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~18"></span>
+              <span class="anchor" id="variable-knot1~20"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~18"></span>
+              <span class="anchor" id="variable-knot2~20"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~18"></span>
+              <span class="anchor" id="variable-knot3~19"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~19"></span>
+              <span class="anchor" id="variable-degree~39"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~20"></span>
+              <span class="anchor" id="variable-nc~40"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~10"></span>
+              <span class="anchor" id="variable-ng~24"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~19"></span>
+              <span class="anchor" id="variable-wc~43"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -410,7 +410,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-tgc~21"></span>
+          <span class="anchor" id="variable-tgc~44"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
@@ -582,7 +582,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_xg_bspline_1d.html b/proc/compute_xg_bspline_1d.html
index 44893a78a..6c370f42a 100644
--- a/proc/compute_xg_bspline_1d.html
+++ b/proc/compute_xg_bspline_1d.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~75"></span>
+              <span class="anchor" id="variable-xt~14"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~26"></span>
+              <span class="anchor" id="variable-knot~12"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~60"></span>
+              <span class="anchor" id="variable-degree~7"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~65"></span>
+              <span class="anchor" id="variable-nc~7"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~32"></span>
+              <span class="anchor" id="variable-ng~5"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~65"></span>
+              <span class="anchor" id="variable-xc~21"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -380,7 +380,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~34"></span>
+          <span class="anchor" id="variable-xg~9"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
@@ -537,7 +537,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_xg_bspline_1d_1point.html b/proc/compute_xg_bspline_1d_1point.html
index 9b87f62d3..afd4ec6d1 100644
--- a/proc/compute_xg_bspline_1d_1point.html
+++ b/proc/compute_xg_bspline_1d_1point.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~76"></span>
+              <span class="anchor" id="variable-xt~15"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~27"></span>
+              <span class="anchor" id="variable-knot~13"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~61"></span>
+              <span class="anchor" id="variable-degree~8"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~66"></span>
+              <span class="anchor" id="variable-nc~8"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~66"></span>
+              <span class="anchor" id="variable-xc~22"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -365,7 +365,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~35"></span>
+          <span class="anchor" id="variable-xg~10"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -522,7 +522,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_xg_bspline_2d.html b/proc/compute_xg_bspline_2d.html
index 72f529a80..5de8c1365 100644
--- a/proc/compute_xg_bspline_2d.html
+++ b/proc/compute_xg_bspline_2d.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~42"></span>
+              <span class="anchor" id="variable-xt~75"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~30"></span>
+              <span class="anchor" id="variable-knot1~31"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~30"></span>
+              <span class="anchor" id="variable-knot2~31"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~30"></span>
+              <span class="anchor" id="variable-degree~60"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~37"></span>
+              <span class="anchor" id="variable-nc~65"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~18"></span>
+              <span class="anchor" id="variable-ng~31"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~43"></span>
+              <span class="anchor" id="variable-xc~61"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -395,7 +395,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~21"></span>
+          <span class="anchor" id="variable-xg~33"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
@@ -567,7 +567,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_xg_bspline_2d_1point.html b/proc/compute_xg_bspline_2d_1point.html
index 3b54b7836..5ad30fbc8 100644
--- a/proc/compute_xg_bspline_2d_1point.html
+++ b/proc/compute_xg_bspline_2d_1point.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~43"></span>
+              <span class="anchor" id="variable-xt~76"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~31"></span>
+              <span class="anchor" id="variable-knot1~32"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~31"></span>
+              <span class="anchor" id="variable-knot2~32"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~31"></span>
+              <span class="anchor" id="variable-degree~61"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~38"></span>
+              <span class="anchor" id="variable-nc~66"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~44"></span>
+              <span class="anchor" id="variable-xc~62"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -380,7 +380,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~22"></span>
+          <span class="anchor" id="variable-xg~34"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -552,7 +552,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_xg_bspline_3d.html b/proc/compute_xg_bspline_3d.html
index 540a00016..5256bd265 100644
--- a/proc/compute_xg_bspline_3d.html
+++ b/proc/compute_xg_bspline_3d.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~15"></span>
+              <span class="anchor" id="variable-xt~42"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~8"></span>
+              <span class="anchor" id="variable-knot1~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~8"></span>
+              <span class="anchor" id="variable-knot2~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~8"></span>
+              <span class="anchor" id="variable-knot3~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~9"></span>
+              <span class="anchor" id="variable-degree~29"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~10"></span>
+              <span class="anchor" id="variable-nc~30"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~5"></span>
+              <span class="anchor" id="variable-ng~19"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~19"></span>
+              <span class="anchor" id="variable-xc~39"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -410,7 +410,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~9"></span>
+          <span class="anchor" id="variable-xg~22"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
@@ -582,7 +582,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_xg_bspline_3d_1point.html b/proc/compute_xg_bspline_3d_1point.html
index e64203799..bc0a15dc0 100644
--- a/proc/compute_xg_bspline_3d_1point.html
+++ b/proc/compute_xg_bspline_3d_1point.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~16"></span>
+              <span class="anchor" id="variable-xt~43"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~9"></span>
+              <span class="anchor" id="variable-knot1~11"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~9"></span>
+              <span class="anchor" id="variable-knot2~11"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~9"></span>
+              <span class="anchor" id="variable-knot3~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~10"></span>
+              <span class="anchor" id="variable-degree~30"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~11"></span>
+              <span class="anchor" id="variable-nc~31"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~20"></span>
+              <span class="anchor" id="variable-xc~40"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -395,7 +395,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~10"></span>
+          <span class="anchor" id="variable-xg~23"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -567,7 +567,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_xg_nurbs_1d.html b/proc/compute_xg_nurbs_1d.html
index 4dffb7def..43ba87e00 100644
--- a/proc/compute_xg_nurbs_1d.html
+++ b/proc/compute_xg_nurbs_1d.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~73"></span>
+              <span class="anchor" id="variable-xt~12"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~24"></span>
+              <span class="anchor" id="variable-knot~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~58"></span>
+              <span class="anchor" id="variable-degree~5"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~63"></span>
+              <span class="anchor" id="variable-nc~5"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~31"></span>
+              <span class="anchor" id="variable-ng~4"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~63"></span>
+              <span class="anchor" id="variable-xc~19"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~59"></span>
+              <span class="anchor" id="variable-wc~18"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -395,7 +395,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~32"></span>
+          <span class="anchor" id="variable-xg~7"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
@@ -552,7 +552,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_xg_nurbs_1d_1point.html b/proc/compute_xg_nurbs_1d_1point.html
index 34fde5b7c..714a6ca6f 100644
--- a/proc/compute_xg_nurbs_1d_1point.html
+++ b/proc/compute_xg_nurbs_1d_1point.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~74"></span>
+              <span class="anchor" id="variable-xt~13"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~25"></span>
+              <span class="anchor" id="variable-knot~11"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~59"></span>
+              <span class="anchor" id="variable-degree~6"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~64"></span>
+              <span class="anchor" id="variable-nc~6"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~64"></span>
+              <span class="anchor" id="variable-xc~20"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~60"></span>
+              <span class="anchor" id="variable-wc~19"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -380,7 +380,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~33"></span>
+          <span class="anchor" id="variable-xg~8"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -537,7 +537,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_xg_nurbs_2d.html b/proc/compute_xg_nurbs_2d.html
index a015039fc..fdb58ba8c 100644
--- a/proc/compute_xg_nurbs_2d.html
+++ b/proc/compute_xg_nurbs_2d.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~40"></span>
+              <span class="anchor" id="variable-xt~73"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~28"></span>
+              <span class="anchor" id="variable-knot1~29"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~28"></span>
+              <span class="anchor" id="variable-knot2~29"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~28"></span>
+              <span class="anchor" id="variable-degree~58"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~35"></span>
+              <span class="anchor" id="variable-nc~63"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~17"></span>
+              <span class="anchor" id="variable-ng~30"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~41"></span>
+              <span class="anchor" id="variable-xc~59"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~37"></span>
+              <span class="anchor" id="variable-wc~57"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -410,7 +410,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~19"></span>
+          <span class="anchor" id="variable-xg~31"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
@@ -582,7 +582,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_xg_nurbs_2d_1point.html b/proc/compute_xg_nurbs_2d_1point.html
index 7b34cc752..0256c1c31 100644
--- a/proc/compute_xg_nurbs_2d_1point.html
+++ b/proc/compute_xg_nurbs_2d_1point.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~41"></span>
+              <span class="anchor" id="variable-xt~74"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~29"></span>
+              <span class="anchor" id="variable-knot1~30"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~29"></span>
+              <span class="anchor" id="variable-knot2~30"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~29"></span>
+              <span class="anchor" id="variable-degree~59"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~36"></span>
+              <span class="anchor" id="variable-nc~64"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~42"></span>
+              <span class="anchor" id="variable-xc~60"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~38"></span>
+              <span class="anchor" id="variable-wc~58"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -395,7 +395,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~20"></span>
+          <span class="anchor" id="variable-xg~32"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -567,7 +567,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_xg_nurbs_3d.html b/proc/compute_xg_nurbs_3d.html
index 063db0b1d..e9468f4df 100644
--- a/proc/compute_xg_nurbs_3d.html
+++ b/proc/compute_xg_nurbs_3d.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~13"></span>
+              <span class="anchor" id="variable-xt~40"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~6"></span>
+              <span class="anchor" id="variable-knot1~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~6"></span>
+              <span class="anchor" id="variable-knot2~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~6"></span>
+              <span class="anchor" id="variable-knot3~7"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~7"></span>
+              <span class="anchor" id="variable-degree~27"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~8"></span>
+              <span class="anchor" id="variable-nc~28"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~4"></span>
+              <span class="anchor" id="variable-ng~18"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~17"></span>
+              <span class="anchor" id="variable-xc~37"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -407,7 +407,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~13"></span>
+              <span class="anchor" id="variable-wc~37"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -425,7 +425,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~7"></span>
+          <span class="anchor" id="variable-xg~20"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
@@ -597,7 +597,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/compute_xg_nurbs_3d_1point.html b/proc/compute_xg_nurbs_3d_1point.html
index 6f75b661b..e917c156a 100644
--- a/proc/compute_xg_nurbs_3d_1point.html
+++ b/proc/compute_xg_nurbs_3d_1point.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~14"></span>
+              <span class="anchor" id="variable-xt~41"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~7"></span>
+              <span class="anchor" id="variable-knot1~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~7"></span>
+              <span class="anchor" id="variable-knot2~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -332,7 +332,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~7"></span>
+              <span class="anchor" id="variable-knot3~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -347,7 +347,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~8"></span>
+              <span class="anchor" id="variable-degree~28"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -362,7 +362,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~9"></span>
+              <span class="anchor" id="variable-nc~29"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -377,7 +377,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~18"></span>
+              <span class="anchor" id="variable-xc~38"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -392,7 +392,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~14"></span>
+              <span class="anchor" id="variable-wc~38"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -410,7 +410,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~8"></span>
+          <span class="anchor" id="variable-xg~21"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -582,7 +582,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/create.html b/proc/create.html
index e3630470a..960e09fa8 100644
--- a/proc/create.html
+++ b/proc/create.html
@@ -78,20 +78,20 @@ <h1>create
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.8% of total for procedures.">52 statements</a>
+                 title=" 0.4% of total for procedures.">27 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">create</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine create(this, res1, res2, res3, Xt1, Xt2, Xt3, Xt)  
+    <h2>private pure subroutine create(this, res, Xt)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~5"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~6"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1"></span>
+              <span class="anchor" id="variable-res"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -181,82 +181,7 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>res1</strong></td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-res2"></span>
-              integer,
-            </td>
-<td>intent(in),</td>
-              <td>optional</td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>res2</strong></td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-res3"></span>
-              integer,
-            </td>
-<td>intent(in),</td>
-              <td>optional</td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>res3</strong></td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-xt1~2"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td>optional,</td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>Xt1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-xt2~2"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td>optional,</td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>Xt2</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-xt3~2"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td>optional,</td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>Xt3</strong>(:)</td>
+            <td><strong>res</strong></td>
             <td>
                 
             </td>
@@ -271,7 +196,7 @@ <h3>Arguments</h3>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>Xt</strong>(:,:)</td>
+            <td><strong>Xt</strong>(:)</td>
             <td>
                 
             </td>
@@ -291,91 +216,46 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~create~~CallsGraph Pages: 1 -->
-<svg id="proccreateCallsGraph" width="417pt" height="116pt"
- viewBox="0.00 0.00 417.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~create~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
+<svg id="proccreateCallsGraph" width="307pt" height="74pt"
+ viewBox="0.00 0.00 307.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~create~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~create~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 413,-112 413,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 303,-70 303,4 -4,4"/>
 <!-- proc~create -->
 <g id="proc~~create~~CallsGraph_node1" class="node">
 <title>proc~create</title>
-<polygon fill="none" stroke="black" points="131,-66 0,-66 0,-42 131,-42 131,-66"/>
-<text text-anchor="middle" x="65.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%create</text>
+<polygon fill="none" stroke="black" points="121,-45 0,-45 0,-21 121,-21 121,-45"/>
+<text text-anchor="middle" x="60.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%create</text>
 </g>
 <!-- interface~compute_xg -->
 <g id="proc~~create~~CallsGraph_node2" class="node">
 <title>interface~compute_xg</title>
 <g id="a_proc~~create~~CallsGraph_node2"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
-<polygon fill="#a7506f" stroke="#a7506f" points="282.5,-108 203.5,-108 203.5,-84 282.5,-84 282.5,-108"/>
-<text text-anchor="middle" x="243" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="267.5,-66 188.5,-66 188.5,-42 267.5,-42 267.5,-66"/>
+<text text-anchor="middle" x="228" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~create&#45;&gt;interface~compute_xg -->
 <g id="proc~~create~~CallsGraph_edge1" class="edge">
 <title>proc~create&#45;&gt;interface~compute_xg</title>
-<path fill="none" stroke="#ff0000" d="M116.79,-66.04C140.9,-71.8 169.65,-78.69 193.52,-84.4"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="192.88,-87.84 203.42,-86.77 194.51,-81.04 192.88,-87.84"/>
-</g>
-<!-- interface~ndgrid -->
-<g id="proc~~create~~CallsGraph_node3" class="node">
-<title>interface~ndgrid</title>
-<g id="a_proc~~create~~CallsGraph_node3"><a xlink:href="../interface/ndgrid.html" xlink:title="ndgrid">
-<polygon fill="#a7506f" stroke="#a7506f" points="270,-66 216,-66 216,-42 270,-42 270,-66"/>
-<text text-anchor="middle" x="243" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid</text>
-</a>
-</g>
-</g>
-<!-- proc~create&#45;&gt;interface~ndgrid -->
-<g id="proc~~create~~CallsGraph_edge2" class="edge">
-<title>proc~create&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#ff0000" d="M131.35,-54C156.41,-54 184.15,-54 205.58,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="205.87,-57.5 215.87,-54 205.87,-50.5 205.87,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M121.25,-40.58C140.07,-42.97 160.61,-45.58 178.54,-47.85"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="178.12,-51.33 188.48,-49.11 179,-44.38 178.12,-51.33"/>
 </g>
 <!-- proc~is_rational -->
-<g id="proc~~create~~CallsGraph_node4" class="node">
+<g id="proc~~create~~CallsGraph_node3" class="node">
 <title>proc~is_rational</title>
-<g id="a_proc~~create~~CallsGraph_node4"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="319,-24 167,-24 167,0 319,0 319,-24"/>
-<text text-anchor="middle" x="243" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
+<g id="a_proc~~create~~CallsGraph_node3"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="299,-24 157,-24 157,0 299,0 299,-24"/>
+<text text-anchor="middle" x="228" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~create&#45;&gt;proc~is_rational -->
-<g id="proc~~create~~CallsGraph_edge3" class="edge">
+<g id="proc~~create~~CallsGraph_edge2" class="edge">
 <title>proc~create&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ff0000" d="M116.79,-41.96C137.08,-37.11 160.65,-31.47 181.84,-26.4"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="182.79,-29.77 191.7,-24.04 181.16,-22.96 182.79,-29.77"/>
-</g>
-<!-- proc~ndgrid2 -->
-<g id="proc~~create~~CallsGraph_node5" class="node">
-<title>proc~ndgrid2</title>
-<g id="a_proc~~create~~CallsGraph_node5"><a xlink:href="../proc/ndgrid2.html" xlink:title="ndgrid2">
-<polygon fill="#d9534f" stroke="#d9534f" points="409,-87 355,-87 355,-63 409,-63 409,-87"/>
-<text text-anchor="middle" x="382" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid2</text>
-</a>
-</g>
-</g>
-<!-- interface~ndgrid&#45;&gt;proc~ndgrid2 -->
-<g id="proc~~create~~CallsGraph_edge4" class="edge">
-<title>interface~ndgrid&#45;&gt;proc~ndgrid2</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M270.09,-58C291.19,-61.23 321.14,-65.82 344.6,-69.42"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="344.12,-72.89 354.54,-70.94 345.19,-65.97 344.12,-72.89"/>
-</g>
-<!-- proc~ndgrid3 -->
-<g id="proc~~create~~CallsGraph_node6" class="node">
-<title>proc~ndgrid3</title>
-<g id="a_proc~~create~~CallsGraph_node6"><a xlink:href="../proc/ndgrid3.html" xlink:title="ndgrid3">
-<polygon fill="#d9534f" stroke="#d9534f" points="409,-45 355,-45 355,-21 409,-21 409,-45"/>
-<text text-anchor="middle" x="382" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid3</text>
-</a>
-</g>
-</g>
-<!-- interface~ndgrid&#45;&gt;proc~ndgrid3 -->
-<g id="proc~~create~~CallsGraph_edge5" class="edge">
-<title>interface~ndgrid&#45;&gt;proc~ndgrid3</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M270.09,-50C291.19,-46.77 321.14,-42.18 344.6,-38.58"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="345.19,-42.03 354.54,-37.06 344.12,-35.11 345.19,-42.03"/>
+<path fill="none" stroke="#ff0000" d="M121.25,-25.42C129.57,-24.36 138.22,-23.26 146.84,-22.17"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="147.44,-25.62 156.92,-20.89 146.56,-18.68 147.44,-25.62"/>
 </g>
 </g>
 </svg>
@@ -471,142 +351,127 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~create~~CalledByGraph Pages: 1 -->
-<svg id="proccreateCalledByGraph" width="490pt" height="315pt"
- viewBox="0.00 0.00 490.00 315.25" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~create~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 311.25)">
+<svg id="proccreateCalledByGraph" width="470pt" height="271pt"
+ viewBox="0.00 0.00 470.00 271.08" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~create~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 267.08)">
 <title>proc~~create~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-311.25 486,-311.25 486,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-267.08 466,-267.08 466,4 -4,4"/>
 <!-- proc~create -->
 <g id="proc~~create~~CalledByGraph_node1" class="node">
 <title>proc~create</title>
-<polygon fill="none" stroke="black" points="482,-171 351,-171 351,-147 482,-147 482,-171"/>
-<text text-anchor="middle" x="416.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%create</text>
+<polygon fill="none" stroke="black" points="462,-150 341,-150 341,-126 462,-126 462,-150"/>
+<text text-anchor="middle" x="401.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%create</text>
 </g>
 <!-- proc~nearest_point2 -->
 <g id="proc~~create~~CalledByGraph_node2" class="node">
 <title>proc~nearest_point2</title>
-<g id="a_proc~~create~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_volume%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="315,-276 139,-276 139,-252 315,-252 315,-276"/>
-<text text-anchor="middle" x="227" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
+<g id="a_proc~~create~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_curve%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="305,-234 139,-234 139,-210 305,-210 305,-234"/>
+<text text-anchor="middle" x="222" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2&#45;&gt;proc~create -->
 <g id="proc~~create~~CalledByGraph_edge1" class="edge">
 <title>proc~nearest_point2&#45;&gt;proc~create</title>
-<path fill="none" stroke="#ff0000" d="M292.86,-251.88C300.51,-249.42 308.06,-246.49 315,-243 347.67,-226.55 378.96,-197.61 397.71,-178.37"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="400.34,-180.68 404.71,-171.03 395.28,-175.85 400.34,-180.68"/>
+<path fill="none" stroke="#ff0000" d="M280.29,-209.94C288.74,-207.42 297.21,-204.45 305,-201 331.5,-189.27 358.81,-170.44 377.4,-156.43"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="379.74,-159.04 385.54,-150.17 375.48,-153.49 379.74,-159.04"/>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example1_curve -->
 <g id="proc~~create~~CalledByGraph_node3" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~create~~CalledByGraph_node3"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="282,-234 172,-234 172,-210 282,-210 282,-234"/>
-<text text-anchor="middle" x="227" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~create~~CalledByGraph_node3"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-192 172,-192 172,-168 272,-168 272,-192"/>
+<text text-anchor="middle" x="222" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~create -->
+<!-- program~example1_curve&#45;&gt;proc~create -->
 <g id="proc~~create~~CalledByGraph_edge2" class="edge">
-<title>program~example3_volume&#45;&gt;proc~create</title>
-<path fill="none" stroke="#ff0000" d="M282.21,-210.33C293.15,-207.58 304.52,-204.43 315,-201 337.29,-193.7 361.58,-183.62 380.69,-175.16"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="382.21,-178.31 389.9,-171.03 379.34,-171.93 382.21,-178.31"/>
+<title>program~example1_curve&#45;&gt;proc~create</title>
+<path fill="none" stroke="#ff0000" d="M272.44,-168.3C293.35,-163.35 317.9,-157.55 339.88,-152.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="340.85,-155.71 349.78,-150 339.24,-148.9 340.85,-155.71"/>
 </g>
-<!-- program~example_nurbs_volume -->
+<!-- program~example_nurbs_curve -->
 <g id="proc~~create~~CalledByGraph_node4" class="node">
-<title>program~example_nurbs_volume</title>
-<g id="a_proc~~create~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="296.5,-192 157.5,-192 157.5,-168 296.5,-168 296.5,-192"/>
-<text text-anchor="middle" x="227" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<title>program~example_nurbs_curve</title>
+<g id="a_proc~~create~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="286.5,-150 157.5,-150 157.5,-126 286.5,-126 286.5,-150"/>
+<text text-anchor="middle" x="222" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~create -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~create -->
 <g id="proc~~create~~CalledByGraph_edge3" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~create</title>
-<path fill="none" stroke="#ff0000" d="M296.75,-172.3C311.1,-170.69 326.3,-168.99 340.85,-167.36"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="341.26,-170.84 350.81,-166.25 340.48,-163.88 341.26,-170.84"/>
+<title>program~example_nurbs_curve&#45;&gt;proc~create</title>
+<path fill="none" stroke="#ff0000" d="M286.58,-138C300.83,-138 316.02,-138 330.51,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="330.92,-141.5 340.92,-138 330.92,-134.5 330.92,-141.5"/>
 </g>
-<!-- program~nearest_point_3d -->
+<!-- program~nearest_point_1d -->
 <g id="proc~~create~~CalledByGraph_node5" class="node">
-<title>program~nearest_point_3d</title>
-<g id="a_proc~~create~~CalledByGraph_node5"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-296 0,-296 0,-272 103,-272 103,-296"/>
-<text text-anchor="middle" x="51.5" y="-281.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
+<title>program~nearest_point_1d</title>
+<g id="a_proc~~create~~CalledByGraph_node5"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-254 0,-254 0,-230 103,-230 103,-254"/>
+<text text-anchor="middle" x="51.5" y="-239.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~create -->
+<!-- program~nearest_point_1d&#45;&gt;proc~create -->
 <g id="proc~~create~~CalledByGraph_edge4" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~create</title>
-<path fill="none" stroke="#ff0000" d="M99.78,-296.05C154.53,-307.41 246.02,-318.22 315,-285 360.07,-263.3 391.21,-210.45 405.89,-180.55"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="409.12,-181.9 410.23,-171.37 402.79,-178.91 409.12,-181.9"/>
+<title>program~nearest_point_1d&#45;&gt;proc~create</title>
+<path fill="none" stroke="#ff0000" d="M103.36,-253.92C156.19,-263.69 240.05,-271.72 305,-243 343.77,-225.86 373.56,-184.34 388.93,-158.95"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="392.08,-160.49 394.1,-150.09 386.04,-156.96 392.08,-160.49"/>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
-<g id="proc~~create~~CalledByGraph_edge9" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
-<path fill="none" stroke="#ff0000" d="M103.15,-278.16C111.29,-277.22 119.94,-276.23 128.75,-275.21"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="129.19,-278.68 138.73,-274.06 128.39,-271.73 129.19,-278.68"/>
+<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2 -->
+<g id="proc~~create~~CalledByGraph_edge8" class="edge">
+<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2</title>
+<path fill="none" stroke="#ff0000" d="M103.06,-236C111.3,-235.02 120.05,-233.98 128.92,-232.93"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="129.45,-236.39 138.97,-231.74 128.63,-229.44 129.45,-236.39"/>
 </g>
-<!-- program~shape_c_3d -->
+<!-- program~shape_c_1d -->
 <g id="proc~~create~~CalledByGraph_node6" class="node">
-<title>program~shape_c_3d</title>
-<g id="a_proc~~create~~CalledByGraph_node6"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="265,-150 189,-150 189,-126 265,-126 265,-150"/>
-<text text-anchor="middle" x="227" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<title>program~shape_c_1d</title>
+<g id="a_proc~~create~~CalledByGraph_node6"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-108 184,-108 184,-84 260,-84 260,-108"/>
+<text text-anchor="middle" x="222" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~create -->
+<!-- program~shape_c_1d&#45;&gt;proc~create -->
 <g id="proc~~create~~CalledByGraph_edge5" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~create</title>
-<path fill="none" stroke="#ff0000" d="M265.04,-142.15C286.62,-144.57 314.61,-147.7 340.6,-150.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="340.49,-154.12 350.82,-151.76 341.27,-147.16 340.49,-154.12"/>
+<title>program~shape_c_1d&#45;&gt;proc~create</title>
+<path fill="none" stroke="#ff0000" d="M260.21,-104.8C283.2,-110.24 313.24,-117.35 339.63,-123.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="339,-127.04 349.54,-125.94 340.61,-120.23 339,-127.04"/>
 </g>
-<!-- program~shape_half_ring_3d -->
+<!-- program~shape_circle -->
 <g id="proc~~create~~CalledByGraph_node7" class="node">
-<title>program~shape_half_ring_3d</title>
-<g id="a_proc~~create~~CalledByGraph_node7"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="284.5,-108 169.5,-108 169.5,-84 284.5,-84 284.5,-108"/>
-<text text-anchor="middle" x="227" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<title>program~shape_circle</title>
+<g id="a_proc~~create~~CalledByGraph_node7"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="261.5,-66 182.5,-66 182.5,-42 261.5,-42 261.5,-66"/>
+<text text-anchor="middle" x="222" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~create -->
+<!-- program~shape_circle&#45;&gt;proc~create -->
 <g id="proc~~create~~CalledByGraph_edge6" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~create</title>
-<path fill="none" stroke="#ff0000" d="M283.6,-108.02C294.11,-110.69 304.96,-113.71 315,-117 337.29,-124.3 361.58,-134.38 380.69,-142.84"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="379.34,-146.07 389.9,-146.97 382.21,-139.69 379.34,-146.07"/>
+<title>program~shape_circle&#45;&gt;proc~create</title>
+<path fill="none" stroke="#ff0000" d="M261.86,-61.16C275.8,-64.45 291.43,-68.99 305,-75 331.5,-86.73 358.81,-105.56 377.4,-119.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="375.48,-122.51 385.54,-125.83 379.74,-116.96 375.48,-122.51"/>
 </g>
-<!-- program~shape_hexahedron -->
+<!-- program~shape_half_circle -->
 <g id="proc~~create~~CalledByGraph_node8" class="node">
-<title>program~shape_hexahedron</title>
-<g id="a_proc~~create~~CalledByGraph_node8"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="283.5,-66 170.5,-66 170.5,-42 283.5,-42 283.5,-66"/>
-<text text-anchor="middle" x="227" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
+<title>program~shape_half_circle</title>
+<g id="a_proc~~create~~CalledByGraph_node8"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-24 170,-24 170,0 274,0 274,-24"/>
+<text text-anchor="middle" x="222" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~create -->
+<!-- program~shape_half_circle&#45;&gt;proc~create -->
 <g id="proc~~create~~CalledByGraph_edge7" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~create</title>
-<path fill="none" stroke="#ff0000" d="M283.66,-63.4C294.38,-66.32 305.29,-70.11 315,-75 347.67,-91.45 378.96,-120.39 397.71,-139.63"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="395.28,-142.15 404.71,-146.97 400.34,-137.32 395.28,-142.15"/>
-</g>
-<!-- program~shape_ring_3d -->
-<g id="proc~~create~~CalledByGraph_node9" class="node">
-<title>program~shape_ring_3d</title>
-<g id="a_proc~~create~~CalledByGraph_node9"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-24 182,-24 182,0 272,0 272,-24"/>
-<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_ring_3d&#45;&gt;proc~create -->
-<g id="proc~~create~~CalledByGraph_edge8" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~create</title>
-<path fill="none" stroke="#ff0000" d="M272.28,-16.87C286.72,-19.93 302.29,-24.9 315,-33 356.59,-59.49 388.54,-109.22 404.42,-137.64"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="401.51,-139.61 409.35,-146.73 407.66,-136.27 401.51,-139.61"/>
+<title>program~shape_half_circle&#45;&gt;proc~create</title>
+<path fill="none" stroke="#ff0000" d="M274.28,-20.25C284.9,-23.27 295.68,-27.39 305,-33 340.76,-54.52 371,-93.52 387.38,-117.46"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="384.5,-119.45 392.96,-125.82 390.32,-115.56 384.5,-119.45"/>
 </g>
 </g>
 </svg>
@@ -722,7 +587,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/create~2.html b/proc/create~2.html
index 784682b4d..dcd6be503 100644
--- a/proc/create~2.html
+++ b/proc/create~2.html
@@ -78,20 +78,20 @@ <h1>create
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.6% of total for procedures.">42 statements</a>
+                 title=" 0.8% of total for procedures.">52 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">create</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine create(this, res1, res2, Xt1, Xt2, Xt)  
+    <h2>private pure subroutine create(this, res1, res2, res3, Xt1, Xt2, Xt3, Xt)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~73"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~66"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1~6"></span>
+              <span class="anchor" id="variable-res1~3"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2~6"></span>
+              <span class="anchor" id="variable-res2~3"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -203,7 +203,22 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt1~7"></span>
+              <span class="anchor" id="variable-res3"></span>
+              integer,
+            </td>
+<td>intent(in),</td>
+              <td>optional</td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>res3</strong></td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xt1~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -218,7 +233,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt2~7"></span>
+              <span class="anchor" id="variable-xt2~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -233,7 +248,22 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~30"></span>
+              <span class="anchor" id="variable-xt3~2"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td>optional,</td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>Xt3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xt~29"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -270,7 +300,7 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~create~2~~CallsGraph_node1" class="node">
 <title>proc~create~2</title>
 <polygon fill="none" stroke="black" points="131,-66 0,-66 0,-42 131,-42 131,-66"/>
-<text text-anchor="middle" x="65.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%create</text>
+<text text-anchor="middle" x="65.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%create</text>
 </g>
 <!-- interface~compute_xg~2 -->
 <g id="proc~~create~2~~CallsGraph_node2" class="node">
@@ -305,9 +335,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~is_rational~2 -->
 <g id="proc~~create~2~~CallsGraph_node4" class="node">
 <title>proc~is_rational~2</title>
-<g id="a_proc~~create~2~~CallsGraph_node4"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<g id="a_proc~~create~2~~CallsGraph_node4"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="319,-24 167,-24 167,0 319,0 319,-24"/>
-<text text-anchor="middle" x="243" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
+<text text-anchor="middle" x="243" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
@@ -441,202 +471,142 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~create~2~~CalledByGraph Pages: 1 -->
-<svg id="proccreate2CalledByGraph" width="490pt" height="489pt"
- viewBox="0.00 0.00 490.00 488.52" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~create~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 484.52)">
+<svg id="proccreate2CalledByGraph" width="490pt" height="315pt"
+ viewBox="0.00 0.00 490.00 315.25" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~create~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 311.25)">
 <title>proc~~create~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-484.52 486,-484.52 486,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-311.25 486,-311.25 486,4 -4,4"/>
 <!-- proc~create~2 -->
 <g id="proc~~create~2~~CalledByGraph_node1" class="node">
 <title>proc~create~2</title>
-<polygon fill="none" stroke="black" points="482,-255 351,-255 351,-231 482,-231 482,-255"/>
-<text text-anchor="middle" x="416.5" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%create</text>
+<polygon fill="none" stroke="black" points="482,-171 351,-171 351,-147 482,-147 482,-171"/>
+<text text-anchor="middle" x="416.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%create</text>
 </g>
 <!-- proc~nearest_point2~2 -->
 <g id="proc~~create~2~~CalledByGraph_node2" class="node">
 <title>proc~nearest_point2~2</title>
-<g id="a_proc~~create~2~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_surface%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="315,-444 139,-444 139,-420 315,-420 315,-444"/>
-<text text-anchor="middle" x="227" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
+<g id="a_proc~~create~2~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_volume%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="315,-276 139,-276 139,-252 315,-252 315,-276"/>
+<text text-anchor="middle" x="227" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~2&#45;&gt;proc~create~2 -->
 <g id="proc~~create~2~~CalledByGraph_edge1" class="edge">
 <title>proc~nearest_point2~2&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0000" d="M299.47,-419.86C304.98,-417.42 310.24,-414.5 315,-411 366.08,-373.42 396.09,-301.38 408.61,-265.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="411.98,-266.02 411.81,-255.43 405.33,-263.82 411.98,-266.02"/>
+<path fill="none" stroke="#ff0000" d="M292.86,-251.88C300.51,-249.42 308.06,-246.49 315,-243 347.67,-226.55 378.96,-197.61 397.71,-178.37"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="400.34,-180.68 404.71,-171.03 395.28,-175.85 400.34,-180.68"/>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~create~2~~CalledByGraph_node3" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~create~2~~CalledByGraph_node3"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="282,-402 172,-402 172,-378 282,-378 282,-402"/>
-<text text-anchor="middle" x="227" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<title>program~example3_volume</title>
+<g id="a_proc~~create~2~~CalledByGraph_node3"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="282,-234 172,-234 172,-210 282,-210 282,-234"/>
+<text text-anchor="middle" x="227" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~create~2 -->
+<!-- program~example3_volume&#45;&gt;proc~create~2 -->
 <g id="proc~~create~2~~CalledByGraph_edge2" class="edge">
-<title>program~example3_surface&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0000" d="M282.23,-382.74C293.63,-379.66 305.17,-375.26 315,-369 356.59,-342.51 388.54,-292.78 404.42,-264.36"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="407.66,-265.73 409.35,-255.27 401.51,-262.39 407.66,-265.73"/>
+<title>program~example3_volume&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#ff0000" d="M282.21,-210.33C293.15,-207.58 304.52,-204.43 315,-201 337.29,-193.7 361.58,-183.62 380.69,-175.16"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="382.21,-178.31 389.9,-171.03 379.34,-171.93 382.21,-178.31"/>
 </g>
-<!-- program~example_nurbs_surface -->
+<!-- program~example_nurbs_volume -->
 <g id="proc~~create~2~~CalledByGraph_node4" class="node">
-<title>program~example_nurbs_surface</title>
-<g id="a_proc~~create~2~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="296.5,-360 157.5,-360 157.5,-336 296.5,-336 296.5,-360"/>
-<text text-anchor="middle" x="227" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<title>program~example_nurbs_volume</title>
+<g id="a_proc~~create~2~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="296.5,-192 157.5,-192 157.5,-168 296.5,-168 296.5,-192"/>
+<text text-anchor="middle" x="227" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~create~2 -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~create~2 -->
 <g id="proc~~create~2~~CalledByGraph_edge3" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0000" d="M292.86,-335.88C300.51,-333.42 308.06,-330.49 315,-327 347.67,-310.55 378.96,-281.61 397.71,-262.37"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="400.34,-264.68 404.71,-255.03 395.28,-259.85 400.34,-264.68"/>
+<title>program~example_nurbs_volume&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#ff0000" d="M296.75,-172.3C311.1,-170.69 326.3,-168.99 340.85,-167.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="341.26,-170.84 350.81,-166.25 340.48,-163.88 341.26,-170.84"/>
 </g>
-<!-- program~example_ppm1 -->
+<!-- program~nearest_point_3d -->
 <g id="proc~~create~2~~CalledByGraph_node5" class="node">
-<title>program~example_ppm1</title>
-<g id="a_proc~~create~2~~CalledByGraph_node5"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-318 180,-318 180,-294 274,-294 274,-318"/>
-<text text-anchor="middle" x="227" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+<title>program~nearest_point_3d</title>
+<g id="a_proc~~create~2~~CalledByGraph_node5"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-296 0,-296 0,-272 103,-272 103,-296"/>
+<text text-anchor="middle" x="51.5" y="-281.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~create~2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~create~2 -->
 <g id="proc~~create~2~~CalledByGraph_edge4" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0000" d="M274.44,-296.23C287.66,-293.06 302.01,-289.25 315,-285 337.29,-277.7 361.58,-267.62 380.69,-259.16"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="382.21,-262.31 389.9,-255.03 379.34,-255.93 382.21,-262.31"/>
+<title>program~nearest_point_3d&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#ff0000" d="M99.78,-296.05C154.53,-307.41 246.02,-318.22 315,-285 360.07,-263.3 391.21,-210.45 405.89,-180.55"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="409.12,-181.9 410.23,-171.37 402.79,-178.91 409.12,-181.9"/>
+</g>
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
+<g id="proc~~create~2~~CalledByGraph_edge9" class="edge">
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
+<path fill="none" stroke="#ff0000" d="M103.15,-278.16C111.29,-277.22 119.94,-276.23 128.75,-275.21"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="129.19,-278.68 138.73,-274.06 128.39,-271.73 129.19,-278.68"/>
 </g>
-<!-- program~example_ppm2 -->
+<!-- program~shape_c_3d -->
 <g id="proc~~create~2~~CalledByGraph_node6" class="node">
-<title>program~example_ppm2</title>
-<g id="a_proc~~create~2~~CalledByGraph_node6"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-276 180,-276 180,-252 274,-252 274,-276"/>
-<text text-anchor="middle" x="227" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+<title>program~shape_c_3d</title>
+<g id="a_proc~~create~2~~CalledByGraph_node6"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="265,-150 189,-150 189,-126 265,-126 265,-150"/>
+<text text-anchor="middle" x="227" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~create~2 -->
+<!-- program~shape_c_3d&#45;&gt;proc~create~2 -->
 <g id="proc~~create~2~~CalledByGraph_edge5" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0000" d="M274.35,-258.81C294.38,-256.57 318.33,-253.88 340.76,-251.37"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="341.39,-254.82 350.94,-250.23 340.61,-247.87 341.39,-254.82"/>
+<title>program~shape_c_3d&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#ff0000" d="M265.04,-142.15C286.62,-144.57 314.61,-147.7 340.6,-150.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="340.49,-154.12 350.82,-151.76 341.27,-147.16 340.49,-154.12"/>
 </g>
-<!-- program~example_ppm3 -->
+<!-- program~shape_half_ring_3d -->
 <g id="proc~~create~2~~CalledByGraph_node7" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~create~2~~CalledByGraph_node7"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-234 180,-234 180,-210 274,-210 274,-234"/>
-<text text-anchor="middle" x="227" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+<title>program~shape_half_ring_3d</title>
+<g id="a_proc~~create~2~~CalledByGraph_node7"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="284.5,-108 169.5,-108 169.5,-84 284.5,-84 284.5,-108"/>
+<text text-anchor="middle" x="227" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~create~2 -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~create~2 -->
 <g id="proc~~create~2~~CalledByGraph_edge6" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0000" d="M274.35,-227.19C294.38,-229.43 318.33,-232.12 340.76,-234.63"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="340.61,-238.13 350.94,-235.77 341.39,-231.18 340.61,-238.13"/>
+<title>program~shape_half_ring_3d&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#ff0000" d="M283.6,-108.02C294.11,-110.69 304.96,-113.71 315,-117 337.29,-124.3 361.58,-134.38 380.69,-142.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="379.34,-146.07 389.9,-146.97 382.21,-139.69 379.34,-146.07"/>
 </g>
-<!-- program~nearest_point_2d -->
+<!-- program~shape_hexahedron -->
 <g id="proc~~create~2~~CalledByGraph_node8" class="node">
-<title>program~nearest_point_2d</title>
-<g id="a_proc~~create~2~~CalledByGraph_node8"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-464 0,-464 0,-440 103,-440 103,-464"/>
-<text text-anchor="middle" x="51.5" y="-449.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<title>program~shape_hexahedron</title>
+<g id="a_proc~~create~2~~CalledByGraph_node8"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="283.5,-66 170.5,-66 170.5,-42 283.5,-42 283.5,-66"/>
+<text text-anchor="middle" x="227" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~create~2 -->
+<!-- program~shape_hexahedron&#45;&gt;proc~create~2 -->
 <g id="proc~~create~2~~CalledByGraph_edge7" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0000" d="M90.73,-464.02C145.14,-478.67 245.98,-496.49 315,-453 381.99,-410.79 405.31,-310.21 412.56,-265.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="416.06,-265.57 414.08,-255.16 409.14,-264.54 416.06,-265.57"/>
+<title>program~shape_hexahedron&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#ff0000" d="M283.66,-63.4C294.38,-66.32 305.29,-70.11 315,-75 347.67,-91.45 378.96,-120.39 397.71,-139.63"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="395.28,-142.15 404.71,-146.97 400.34,-137.32 395.28,-142.15"/>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
-<g id="proc~~create~2~~CalledByGraph_edge13" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
-<path fill="none" stroke="#ff0000" d="M103.15,-446.16C111.29,-445.22 119.94,-444.23 128.75,-443.21"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="129.19,-446.68 138.73,-442.06 128.39,-439.73 129.19,-446.68"/>
-</g>
-<!-- program~nearest_point_2d_bench -->
+<!-- program~shape_ring_3d -->
 <g id="proc~~create~2~~CalledByGraph_node9" class="node">
-<title>program~nearest_point_2d_bench</title>
-<g id="a_proc~~create~2~~CalledByGraph_node9"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="298,-192 156,-192 156,-168 298,-168 298,-192"/>
-<text text-anchor="middle" x="227" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+<title>program~shape_ring_3d</title>
+<g id="a_proc~~create~2~~CalledByGraph_node9"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-24 182,-24 182,0 272,0 272,-24"/>
+<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~create~2 -->
+<!-- program~shape_ring_3d&#45;&gt;proc~create~2 -->
 <g id="proc~~create~2~~CalledByGraph_edge8" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0000" d="M283.6,-192.02C294.11,-194.69 304.96,-197.71 315,-201 337.29,-208.3 361.58,-218.38 380.69,-226.84"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="379.34,-230.07 389.9,-230.97 382.21,-223.69 379.34,-230.07"/>
-</g>
-<!-- program~shape_c_2d -->
-<g id="proc~~create~2~~CalledByGraph_node10" class="node">
-<title>program~shape_c_2d</title>
-<g id="a_proc~~create~2~~CalledByGraph_node10"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="265,-150 189,-150 189,-126 265,-126 265,-150"/>
-<text text-anchor="middle" x="227" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_c_2d&#45;&gt;proc~create~2 -->
-<g id="proc~~create~2~~CalledByGraph_edge9" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0000" d="M265.29,-143.11C281.19,-146.26 299.6,-151.24 315,-159 347.67,-175.45 378.96,-204.39 397.71,-223.63"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="395.28,-226.15 404.71,-230.97 400.34,-221.32 395.28,-226.15"/>
-</g>
-<!-- program~shape_half_ring_2d -->
-<g id="proc~~create~2~~CalledByGraph_node11" class="node">
-<title>program~shape_half_ring_2d</title>
-<g id="a_proc~~create~2~~CalledByGraph_node11"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="284.5,-108 169.5,-108 169.5,-84 284.5,-84 284.5,-108"/>
-<text text-anchor="middle" x="227" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~create~2 -->
-<g id="proc~~create~2~~CalledByGraph_edge10" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0000" d="M284.51,-103.89C295.16,-106.94 305.83,-111.16 315,-117 356.59,-143.49 388.54,-193.22 404.42,-221.64"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="401.51,-223.61 409.35,-230.73 407.66,-220.27 401.51,-223.61"/>
-</g>
-<!-- program~shape_ring_2d -->
-<g id="proc~~create~2~~CalledByGraph_node12" class="node">
-<title>program~shape_ring_2d</title>
-<g id="a_proc~~create~2~~CalledByGraph_node12"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-66 182,-66 182,-42 272,-42 272,-66"/>
-<text text-anchor="middle" x="227" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_ring_2d&#45;&gt;proc~create~2 -->
-<g id="proc~~create~2~~CalledByGraph_edge11" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0000" d="M272.05,-57.72C286.79,-60.68 302.61,-65.88 315,-75 366.08,-112.58 396.09,-184.62 408.61,-220.93"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="405.33,-222.18 411.81,-230.57 411.98,-219.98 405.33,-222.18"/>
-</g>
-<!-- program~shape_tetragon -->
-<g id="proc~~create~2~~CalledByGraph_node13" class="node">
-<title>program~shape_tetragon</title>
-<g id="a_proc~~create~2~~CalledByGraph_node13"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="275,-24 179,-24 179,0 275,0 275,-24"/>
-<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
-</a>
-</g>
-</g>
-<!-- program~shape_tetragon&#45;&gt;proc~create~2 -->
-<g id="proc~~create~2~~CalledByGraph_edge12" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#ff0000" d="M275.24,-15.64C289.22,-18.65 303.77,-23.91 315,-33 375.97,-82.37 402.26,-177.6 411.41,-220.77"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="408.02,-221.67 413.42,-230.79 414.88,-220.3 408.02,-221.67"/>
+<title>program~shape_ring_3d&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#ff0000" d="M272.28,-16.87C286.72,-19.93 302.29,-24.9 315,-33 356.59,-59.49 388.54,-109.22 404.42,-137.64"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="401.51,-139.61 409.35,-146.73 407.66,-136.27 401.51,-139.61"/>
 </g>
 </g>
 </svg>
@@ -752,7 +722,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/create~3.html b/proc/create~3.html
index 15444855f..8b8013987 100644
--- a/proc/create~3.html
+++ b/proc/create~3.html
@@ -78,20 +78,20 @@ <h1>create
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.4% of total for procedures.">27 statements</a>
+                 title=" 0.6% of total for procedures.">42 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">create</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine create(this, res, Xt)  
+    <h2>private pure subroutine create(this, res1, res2, Xt1, Xt2, Xt)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~137"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~134"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res"></span>
+              <span class="anchor" id="variable-res1~7"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -181,7 +181,52 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>res</strong></td>
+            <td><strong>res1</strong></td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-res2~7"></span>
+              integer,
+            </td>
+<td>intent(in),</td>
+              <td>optional</td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>res2</strong></td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xt1~7"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td>optional,</td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>Xt1</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xt2~7"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td>optional,</td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>Xt2</strong>(:)</td>
             <td>
                 
             </td>
@@ -196,7 +241,7 @@ <h3>Arguments</h3>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>Xt</strong>(:)</td>
+            <td><strong>Xt</strong>(:,:)</td>
             <td>
                 
             </td>
@@ -216,46 +261,91 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~create~3~~CallsGraph Pages: 1 -->
-<svg id="proccreate3CallsGraph" width="307pt" height="74pt"
- viewBox="0.00 0.00 307.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~create~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
+<svg id="proccreate3CallsGraph" width="417pt" height="116pt"
+ viewBox="0.00 0.00 417.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~create~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
 <title>proc~~create~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 303,-70 303,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 413,-112 413,4 -4,4"/>
 <!-- proc~create~3 -->
 <g id="proc~~create~3~~CallsGraph_node1" class="node">
 <title>proc~create~3</title>
-<polygon fill="none" stroke="black" points="121,-45 0,-45 0,-21 121,-21 121,-45"/>
-<text text-anchor="middle" x="60.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%create</text>
+<polygon fill="none" stroke="black" points="131,-66 0,-66 0,-42 131,-42 131,-66"/>
+<text text-anchor="middle" x="65.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%create</text>
 </g>
 <!-- interface~compute_xg~3 -->
 <g id="proc~~create~3~~CallsGraph_node2" class="node">
 <title>interface~compute_xg~3</title>
 <g id="a_proc~~create~3~~CallsGraph_node2"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
-<polygon fill="#a7506f" stroke="#a7506f" points="267.5,-66 188.5,-66 188.5,-42 267.5,-42 267.5,-66"/>
-<text text-anchor="middle" x="228" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="282.5,-108 203.5,-108 203.5,-84 282.5,-84 282.5,-108"/>
+<text text-anchor="middle" x="243" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
 <g id="proc~~create~3~~CallsGraph_edge1" class="edge">
 <title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M121.25,-40.58C140.07,-42.97 160.61,-45.58 178.54,-47.85"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="178.12,-51.33 188.48,-49.11 179,-44.38 178.12,-51.33"/>
+<path fill="none" stroke="#ff0000" d="M116.79,-66.04C140.9,-71.8 169.65,-78.69 193.52,-84.4"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="192.88,-87.84 203.42,-86.77 194.51,-81.04 192.88,-87.84"/>
 </g>
-<!-- proc~is_rational~3 -->
+<!-- interface~ndgrid -->
 <g id="proc~~create~3~~CallsGraph_node3" class="node">
+<title>interface~ndgrid</title>
+<g id="a_proc~~create~3~~CallsGraph_node3"><a xlink:href="../interface/ndgrid.html" xlink:title="ndgrid">
+<polygon fill="#a7506f" stroke="#a7506f" points="270,-66 216,-66 216,-42 270,-42 270,-66"/>
+<text text-anchor="middle" x="243" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid</text>
+</a>
+</g>
+</g>
+<!-- proc~create~3&#45;&gt;interface~ndgrid -->
+<g id="proc~~create~3~~CallsGraph_edge2" class="edge">
+<title>proc~create~3&#45;&gt;interface~ndgrid</title>
+<path fill="none" stroke="#ff0000" d="M131.35,-54C156.41,-54 184.15,-54 205.58,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="205.87,-57.5 215.87,-54 205.87,-50.5 205.87,-57.5"/>
+</g>
+<!-- proc~is_rational~3 -->
+<g id="proc~~create~3~~CallsGraph_node4" class="node">
 <title>proc~is_rational~3</title>
-<g id="a_proc~~create~3~~CallsGraph_node3"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="299,-24 157,-24 157,0 299,0 299,-24"/>
-<text text-anchor="middle" x="228" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
+<g id="a_proc~~create~3~~CallsGraph_node4"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="319,-24 167,-24 167,0 319,0 319,-24"/>
+<text text-anchor="middle" x="243" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
-<g id="proc~~create~3~~CallsGraph_edge2" class="edge">
+<g id="proc~~create~3~~CallsGraph_edge3" class="edge">
 <title>proc~create~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M121.25,-25.42C129.57,-24.36 138.22,-23.26 146.84,-22.17"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="147.44,-25.62 156.92,-20.89 146.56,-18.68 147.44,-25.62"/>
+<path fill="none" stroke="#ff0000" d="M116.79,-41.96C137.08,-37.11 160.65,-31.47 181.84,-26.4"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="182.79,-29.77 191.7,-24.04 181.16,-22.96 182.79,-29.77"/>
+</g>
+<!-- proc~ndgrid2 -->
+<g id="proc~~create~3~~CallsGraph_node5" class="node">
+<title>proc~ndgrid2</title>
+<g id="a_proc~~create~3~~CallsGraph_node5"><a xlink:href="../proc/ndgrid2.html" xlink:title="ndgrid2">
+<polygon fill="#d9534f" stroke="#d9534f" points="409,-87 355,-87 355,-63 409,-63 409,-87"/>
+<text text-anchor="middle" x="382" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid2</text>
+</a>
+</g>
+</g>
+<!-- interface~ndgrid&#45;&gt;proc~ndgrid2 -->
+<g id="proc~~create~3~~CallsGraph_edge4" class="edge">
+<title>interface~ndgrid&#45;&gt;proc~ndgrid2</title>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M270.09,-58C291.19,-61.23 321.14,-65.82 344.6,-69.42"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="344.12,-72.89 354.54,-70.94 345.19,-65.97 344.12,-72.89"/>
+</g>
+<!-- proc~ndgrid3 -->
+<g id="proc~~create~3~~CallsGraph_node6" class="node">
+<title>proc~ndgrid3</title>
+<g id="a_proc~~create~3~~CallsGraph_node6"><a xlink:href="../proc/ndgrid3.html" xlink:title="ndgrid3">
+<polygon fill="#d9534f" stroke="#d9534f" points="409,-45 355,-45 355,-21 409,-21 409,-45"/>
+<text text-anchor="middle" x="382" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid3</text>
+</a>
+</g>
+</g>
+<!-- interface~ndgrid&#45;&gt;proc~ndgrid3 -->
+<g id="proc~~create~3~~CallsGraph_edge5" class="edge">
+<title>interface~ndgrid&#45;&gt;proc~ndgrid3</title>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M270.09,-50C291.19,-46.77 321.14,-42.18 344.6,-38.58"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="345.19,-42.03 354.54,-37.06 344.12,-35.11 345.19,-42.03"/>
 </g>
 </g>
 </svg>
@@ -351,127 +441,202 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~create~3~~CalledByGraph Pages: 1 -->
-<svg id="proccreate3CalledByGraph" width="470pt" height="271pt"
- viewBox="0.00 0.00 470.00 271.08" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~create~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 267.08)">
+<svg id="proccreate3CalledByGraph" width="490pt" height="489pt"
+ viewBox="0.00 0.00 490.00 488.52" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~create~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 484.52)">
 <title>proc~~create~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-267.08 466,-267.08 466,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-484.52 486,-484.52 486,4 -4,4"/>
 <!-- proc~create~3 -->
 <g id="proc~~create~3~~CalledByGraph_node1" class="node">
 <title>proc~create~3</title>
-<polygon fill="none" stroke="black" points="462,-150 341,-150 341,-126 462,-126 462,-150"/>
-<text text-anchor="middle" x="401.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%create</text>
+<polygon fill="none" stroke="black" points="482,-255 351,-255 351,-231 482,-231 482,-255"/>
+<text text-anchor="middle" x="416.5" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%create</text>
 </g>
 <!-- proc~nearest_point2~3 -->
 <g id="proc~~create~3~~CalledByGraph_node2" class="node">
 <title>proc~nearest_point2~3</title>
-<g id="a_proc~~create~3~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_curve%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="305,-234 139,-234 139,-210 305,-210 305,-234"/>
-<text text-anchor="middle" x="222" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
+<g id="a_proc~~create~3~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_surface%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="315,-444 139,-444 139,-420 315,-420 315,-444"/>
+<text text-anchor="middle" x="227" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;proc~create~3 -->
 <g id="proc~~create~3~~CalledByGraph_edge1" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#ff0000" d="M280.29,-209.94C288.74,-207.42 297.21,-204.45 305,-201 331.5,-189.27 358.81,-170.44 377.4,-156.43"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="379.74,-159.04 385.54,-150.17 375.48,-153.49 379.74,-159.04"/>
+<path fill="none" stroke="#ff0000" d="M299.47,-419.86C304.98,-417.42 310.24,-414.5 315,-411 366.08,-373.42 396.09,-301.38 408.61,-265.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="411.98,-266.02 411.81,-255.43 405.33,-263.82 411.98,-266.02"/>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~create~3~~CalledByGraph_node3" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~create~3~~CalledByGraph_node3"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-192 172,-192 172,-168 272,-168 272,-192"/>
-<text text-anchor="middle" x="222" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~create~3~~CalledByGraph_node3"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="282,-402 172,-402 172,-378 282,-378 282,-402"/>
+<text text-anchor="middle" x="227" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~create~3 -->
+<!-- program~example3_surface&#45;&gt;proc~create~3 -->
 <g id="proc~~create~3~~CalledByGraph_edge2" class="edge">
-<title>program~example1_curve&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#ff0000" d="M272.44,-168.3C293.35,-163.35 317.9,-157.55 339.88,-152.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="340.85,-155.71 349.78,-150 339.24,-148.9 340.85,-155.71"/>
+<title>program~example3_surface&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0000" d="M282.23,-382.74C293.63,-379.66 305.17,-375.26 315,-369 356.59,-342.51 388.54,-292.78 404.42,-264.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="407.66,-265.73 409.35,-255.27 401.51,-262.39 407.66,-265.73"/>
 </g>
-<!-- program~example_nurbs_curve -->
+<!-- program~example_nurbs_surface -->
 <g id="proc~~create~3~~CalledByGraph_node4" class="node">
-<title>program~example_nurbs_curve</title>
-<g id="a_proc~~create~3~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="286.5,-150 157.5,-150 157.5,-126 286.5,-126 286.5,-150"/>
-<text text-anchor="middle" x="222" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<title>program~example_nurbs_surface</title>
+<g id="a_proc~~create~3~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="296.5,-360 157.5,-360 157.5,-336 296.5,-336 296.5,-360"/>
+<text text-anchor="middle" x="227" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~create~3 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~create~3 -->
 <g id="proc~~create~3~~CalledByGraph_edge3" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#ff0000" d="M286.58,-138C300.83,-138 316.02,-138 330.51,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="330.92,-141.5 340.92,-138 330.92,-134.5 330.92,-141.5"/>
+<title>program~example_nurbs_surface&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0000" d="M292.86,-335.88C300.51,-333.42 308.06,-330.49 315,-327 347.67,-310.55 378.96,-281.61 397.71,-262.37"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="400.34,-264.68 404.71,-255.03 395.28,-259.85 400.34,-264.68"/>
 </g>
-<!-- program~nearest_point_1d -->
+<!-- program~example_ppm1 -->
 <g id="proc~~create~3~~CalledByGraph_node5" class="node">
-<title>program~nearest_point_1d</title>
-<g id="a_proc~~create~3~~CalledByGraph_node5"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-254 0,-254 0,-230 103,-230 103,-254"/>
-<text text-anchor="middle" x="51.5" y="-239.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<title>program~example_ppm1</title>
+<g id="a_proc~~create~3~~CalledByGraph_node5"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-318 180,-318 180,-294 274,-294 274,-318"/>
+<text text-anchor="middle" x="227" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~create~3 -->
+<!-- program~example_ppm1&#45;&gt;proc~create~3 -->
 <g id="proc~~create~3~~CalledByGraph_edge4" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#ff0000" d="M103.36,-253.92C156.19,-263.69 240.05,-271.72 305,-243 343.77,-225.86 373.56,-184.34 388.93,-158.95"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="392.08,-160.49 394.1,-150.09 386.04,-156.96 392.08,-160.49"/>
-</g>
-<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2~3 -->
-<g id="proc~~create~3~~CalledByGraph_edge8" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2~3</title>
-<path fill="none" stroke="#ff0000" d="M103.06,-236C111.3,-235.02 120.05,-233.98 128.92,-232.93"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="129.45,-236.39 138.97,-231.74 128.63,-229.44 129.45,-236.39"/>
+<title>program~example_ppm1&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0000" d="M274.44,-296.23C287.66,-293.06 302.01,-289.25 315,-285 337.29,-277.7 361.58,-267.62 380.69,-259.16"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="382.21,-262.31 389.9,-255.03 379.34,-255.93 382.21,-262.31"/>
 </g>
-<!-- program~shape_c_1d -->
+<!-- program~example_ppm2 -->
 <g id="proc~~create~3~~CalledByGraph_node6" class="node">
-<title>program~shape_c_1d</title>
-<g id="a_proc~~create~3~~CalledByGraph_node6"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-108 184,-108 184,-84 260,-84 260,-108"/>
-<text text-anchor="middle" x="222" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<title>program~example_ppm2</title>
+<g id="a_proc~~create~3~~CalledByGraph_node6"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-276 180,-276 180,-252 274,-252 274,-276"/>
+<text text-anchor="middle" x="227" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~create~3 -->
+<!-- program~example_ppm2&#45;&gt;proc~create~3 -->
 <g id="proc~~create~3~~CalledByGraph_edge5" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#ff0000" d="M260.21,-104.8C283.2,-110.24 313.24,-117.35 339.63,-123.6"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="339,-127.04 349.54,-125.94 340.61,-120.23 339,-127.04"/>
+<title>program~example_ppm2&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0000" d="M274.35,-258.81C294.38,-256.57 318.33,-253.88 340.76,-251.37"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="341.39,-254.82 350.94,-250.23 340.61,-247.87 341.39,-254.82"/>
 </g>
-<!-- program~shape_circle -->
+<!-- program~example_ppm3 -->
 <g id="proc~~create~3~~CalledByGraph_node7" class="node">
-<title>program~shape_circle</title>
-<g id="a_proc~~create~3~~CalledByGraph_node7"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="261.5,-66 182.5,-66 182.5,-42 261.5,-42 261.5,-66"/>
-<text text-anchor="middle" x="222" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<title>program~example_ppm3</title>
+<g id="a_proc~~create~3~~CalledByGraph_node7"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-234 180,-234 180,-210 274,-210 274,-234"/>
+<text text-anchor="middle" x="227" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~create~3 -->
+<!-- program~example_ppm3&#45;&gt;proc~create~3 -->
 <g id="proc~~create~3~~CalledByGraph_edge6" class="edge">
-<title>program~shape_circle&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#ff0000" d="M261.86,-61.16C275.8,-64.45 291.43,-68.99 305,-75 331.5,-86.73 358.81,-105.56 377.4,-119.57"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="375.48,-122.51 385.54,-125.83 379.74,-116.96 375.48,-122.51"/>
+<title>program~example_ppm3&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0000" d="M274.35,-227.19C294.38,-229.43 318.33,-232.12 340.76,-234.63"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="340.61,-238.13 350.94,-235.77 341.39,-231.18 340.61,-238.13"/>
 </g>
-<!-- program~shape_half_circle -->
+<!-- program~nearest_point_2d -->
 <g id="proc~~create~3~~CalledByGraph_node8" class="node">
-<title>program~shape_half_circle</title>
-<g id="a_proc~~create~3~~CalledByGraph_node8"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-24 170,-24 170,0 274,0 274,-24"/>
-<text text-anchor="middle" x="222" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<title>program~nearest_point_2d</title>
+<g id="a_proc~~create~3~~CalledByGraph_node8"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-464 0,-464 0,-440 103,-440 103,-464"/>
+<text text-anchor="middle" x="51.5" y="-449.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~create~3 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~create~3 -->
 <g id="proc~~create~3~~CalledByGraph_edge7" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#ff0000" d="M274.28,-20.25C284.9,-23.27 295.68,-27.39 305,-33 340.76,-54.52 371,-93.52 387.38,-117.46"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="384.5,-119.45 392.96,-125.82 390.32,-115.56 384.5,-119.45"/>
+<title>program~nearest_point_2d&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0000" d="M90.73,-464.02C145.14,-478.67 245.98,-496.49 315,-453 381.99,-410.79 405.31,-310.21 412.56,-265.31"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="416.06,-265.57 414.08,-255.16 409.14,-264.54 416.06,-265.57"/>
+</g>
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
+<g id="proc~~create~3~~CalledByGraph_edge13" class="edge">
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
+<path fill="none" stroke="#ff0000" d="M103.15,-446.16C111.29,-445.22 119.94,-444.23 128.75,-443.21"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="129.19,-446.68 138.73,-442.06 128.39,-439.73 129.19,-446.68"/>
+</g>
+<!-- program~nearest_point_2d_bench -->
+<g id="proc~~create~3~~CalledByGraph_node9" class="node">
+<title>program~nearest_point_2d_bench</title>
+<g id="a_proc~~create~3~~CalledByGraph_node9"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="298,-192 156,-192 156,-168 298,-168 298,-192"/>
+<text text-anchor="middle" x="227" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+</a>
+</g>
+</g>
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~create~3 -->
+<g id="proc~~create~3~~CalledByGraph_edge8" class="edge">
+<title>program~nearest_point_2d_bench&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0000" d="M283.6,-192.02C294.11,-194.69 304.96,-197.71 315,-201 337.29,-208.3 361.58,-218.38 380.69,-226.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="379.34,-230.07 389.9,-230.97 382.21,-223.69 379.34,-230.07"/>
+</g>
+<!-- program~shape_c_2d -->
+<g id="proc~~create~3~~CalledByGraph_node10" class="node">
+<title>program~shape_c_2d</title>
+<g id="a_proc~~create~3~~CalledByGraph_node10"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="265,-150 189,-150 189,-126 265,-126 265,-150"/>
+<text text-anchor="middle" x="227" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_c_2d&#45;&gt;proc~create~3 -->
+<g id="proc~~create~3~~CalledByGraph_edge9" class="edge">
+<title>program~shape_c_2d&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0000" d="M265.29,-143.11C281.19,-146.26 299.6,-151.24 315,-159 347.67,-175.45 378.96,-204.39 397.71,-223.63"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="395.28,-226.15 404.71,-230.97 400.34,-221.32 395.28,-226.15"/>
+</g>
+<!-- program~shape_half_ring_2d -->
+<g id="proc~~create~3~~CalledByGraph_node11" class="node">
+<title>program~shape_half_ring_2d</title>
+<g id="a_proc~~create~3~~CalledByGraph_node11"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="284.5,-108 169.5,-108 169.5,-84 284.5,-84 284.5,-108"/>
+<text text-anchor="middle" x="227" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~create~3 -->
+<g id="proc~~create~3~~CalledByGraph_edge10" class="edge">
+<title>program~shape_half_ring_2d&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0000" d="M284.51,-103.89C295.16,-106.94 305.83,-111.16 315,-117 356.59,-143.49 388.54,-193.22 404.42,-221.64"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="401.51,-223.61 409.35,-230.73 407.66,-220.27 401.51,-223.61"/>
+</g>
+<!-- program~shape_ring_2d -->
+<g id="proc~~create~3~~CalledByGraph_node12" class="node">
+<title>program~shape_ring_2d</title>
+<g id="a_proc~~create~3~~CalledByGraph_node12"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-66 182,-66 182,-42 272,-42 272,-66"/>
+<text text-anchor="middle" x="227" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_ring_2d&#45;&gt;proc~create~3 -->
+<g id="proc~~create~3~~CalledByGraph_edge11" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0000" d="M272.05,-57.72C286.79,-60.68 302.61,-65.88 315,-75 366.08,-112.58 396.09,-184.62 408.61,-220.93"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="405.33,-222.18 411.81,-230.57 411.98,-219.98 405.33,-222.18"/>
+</g>
+<!-- program~shape_tetragon -->
+<g id="proc~~create~3~~CalledByGraph_node13" class="node">
+<title>program~shape_tetragon</title>
+<g id="a_proc~~create~3~~CalledByGraph_node13"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="275,-24 179,-24 179,0 275,0 275,-24"/>
+<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+</a>
+</g>
+</g>
+<!-- program~shape_tetragon&#45;&gt;proc~create~3 -->
+<g id="proc~~create~3~~CalledByGraph_edge12" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#ff0000" d="M275.24,-15.64C289.22,-18.65 303.77,-23.91 315,-33 375.97,-82.37 402.26,-177.6 411.41,-220.77"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="408.02,-221.67 413.42,-230.79 414.88,-220.3 408.02,-221.67"/>
 </g>
 </g>
 </svg>
@@ -587,7 +752,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/derivative2_scalar.html b/proc/derivative2_scalar.html
index 8b91dba54..bff754b4f 100644
--- a/proc/derivative2_scalar.html
+++ b/proc/derivative2_scalar.html
@@ -83,15 +83,15 @@ <h1>derivative2_scalar
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">derivative2_scalar</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine derivative2_scalar(this, Xt, d2Tgc, dTgc, Tgc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~37"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~38"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -176,12 +176,12 @@ <h3>Arguments</h3>
               <span class="anchor" id="variable-xt~8"></span>
               real(kind=rk),
             </td>
-<td>intent(in),</td>
+<td>intent(in)</td>
               <td></td>            <td>
-              contiguous
+              
             </td>
             <td>::</td>
-            <td><strong>Xt</strong>(:)</td>
+            <td><strong>Xt</strong></td>
             <td>
                 
             </td>
@@ -196,7 +196,7 @@ <h3>Arguments</h3>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>d2Tgc</strong>(:,:)</td>
+            <td><strong>d2Tgc</strong>(:)</td>
             <td>
                 
             </td>
@@ -211,7 +211,7 @@ <h3>Arguments</h3>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>dTgc</strong>(:,:)</td>
+            <td><strong>dTgc</strong>(:)</td>
             <td>
                 
             </td>
@@ -246,46 +246,46 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~derivative2_scalar~~CallsGraph Pages: 1 -->
-<svg id="procderivative2_scalarCallsGraph" width="391pt" height="74pt"
- viewBox="0.00 0.00 391.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procderivative2_scalarCallsGraph" width="371pt" height="74pt"
+ viewBox="0.00 0.00 371.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~derivative2_scalar~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~derivative2_scalar~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 387,-70 387,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 367,-70 367,4 -4,4"/>
 <!-- proc~derivative2_scalar -->
 <g id="proc~~derivative2_scalar~~CallsGraph_node1" class="node">
 <title>proc~derivative2_scalar</title>
-<polygon fill="none" stroke="black" points="195,-45 0,-45 0,-21 195,-21 195,-45"/>
-<text text-anchor="middle" x="97.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%derivative2_scalar</text>
+<polygon fill="none" stroke="black" points="185,-45 0,-45 0,-21 185,-21 185,-45"/>
+<text text-anchor="middle" x="92.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%derivative2_scalar</text>
 </g>
 <!-- interface~compute_d2tgc -->
 <g id="proc~~derivative2_scalar~~CallsGraph_node2" class="node">
 <title>interface~compute_d2tgc</title>
 <g id="a_proc~~derivative2_scalar~~CallsGraph_node2"><a xlink:href="../interface/compute_d2tgc.html" xlink:title="compute_d2Tgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="356,-66 258,-66 258,-42 356,-42 356,-66"/>
-<text text-anchor="middle" x="307" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="341,-66 243,-66 243,-42 341,-42 341,-66"/>
+<text text-anchor="middle" x="292" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_scalar&#45;&gt;interface~compute_d2tgc -->
 <g id="proc~~derivative2_scalar~~CallsGraph_edge1" class="edge">
 <title>proc~derivative2_scalar&#45;&gt;interface~compute_d2tgc</title>
-<path fill="none" stroke="#ff0000" d="M195.26,-42.79C213.12,-44.6 231.25,-46.43 247.53,-48.08"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="247.64,-51.61 257.94,-49.14 248.34,-44.65 247.64,-51.61"/>
+<path fill="none" stroke="#ff0000" d="M185.02,-42.73C201.26,-44.46 217.75,-46.21 232.74,-47.81"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="232.54,-51.3 242.85,-48.88 233.28,-44.34 232.54,-51.3"/>
 </g>
 <!-- proc~is_rational -->
 <g id="proc~~derivative2_scalar~~CallsGraph_node3" class="node">
 <title>proc~is_rational</title>
-<g id="a_proc~~derivative2_scalar~~CallsGraph_node3"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="383,-24 231,-24 231,0 383,0 383,-24"/>
-<text text-anchor="middle" x="307" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
+<g id="a_proc~~derivative2_scalar~~CallsGraph_node3"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="363,-24 221,-24 221,0 363,0 363,-24"/>
+<text text-anchor="middle" x="292" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_scalar&#45;&gt;proc~is_rational -->
 <g id="proc~~derivative2_scalar~~CallsGraph_edge2" class="edge">
 <title>proc~derivative2_scalar&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ff0000" d="M195.26,-23.21C203.75,-22.35 212.3,-21.48 220.69,-20.63"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="221.22,-24.1 230.82,-19.61 220.52,-17.13 221.22,-24.1"/>
+<path fill="none" stroke="#ff0000" d="M185.02,-23.27C193.56,-22.36 202.17,-21.45 210.59,-20.55"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="211.19,-24.01 220.76,-19.47 210.45,-17.05 211.19,-24.01"/>
 </g>
 </g>
 </svg>
@@ -381,61 +381,61 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~derivative2_scalar~~CalledByGraph Pages: 1 -->
-<svg id="procderivative2_scalarCalledByGraph" width="641pt" height="27pt"
- viewBox="0.00 0.00 641.00 27.46" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~derivative2_scalar~~CalledByGraph" class="graph" transform="scale(1.17 1.17) rotate(0) translate(4 28)">
+<svg id="procderivative2_scalarCalledByGraph" width="641pt" height="29pt"
+ viewBox="0.00 0.00 641.00 28.57" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~derivative2_scalar~~CalledByGraph" class="graph" transform="scale(1.12 1.12) rotate(0) translate(4 28)">
 <title>proc~~derivative2_scalar~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 743,-28 743,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 714,-28 714,4 -4,4"/>
 <!-- proc~derivative2_scalar -->
 <g id="proc~~derivative2_scalar~~CalledByGraph_node1" class="node">
 <title>proc~derivative2_scalar</title>
-<polygon fill="none" stroke="black" points="739,-24 544,-24 544,0 739,0 739,-24"/>
-<text text-anchor="middle" x="641.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%derivative2_scalar</text>
+<polygon fill="none" stroke="black" points="710,-24 525,-24 525,0 710,0 710,-24"/>
+<text text-anchor="middle" x="617.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%derivative2_scalar</text>
 </g>
 <!-- none~derivative2 -->
 <g id="proc~~derivative2_scalar~~CalledByGraph_node2" class="node">
 <title>none~derivative2</title>
-<g id="a_proc~~derivative2_scalar~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2" xlink:title="nurbs_volume%derivative2">
-<polygon fill="#a7506f" stroke="#a7506f" points="508,-24 351,-24 351,0 508,0 508,-24"/>
-<text text-anchor="middle" x="429.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2</text>
+<g id="a_proc~~derivative2_scalar~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative2" xlink:title="nurbs_curve%derivative2">
+<polygon fill="#a7506f" stroke="#a7506f" points="489,-24 341,-24 341,0 489,0 489,-24"/>
+<text text-anchor="middle" x="415" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2&#45;&gt;proc~derivative2_scalar -->
 <g id="proc~~derivative2_scalar~~CalledByGraph_edge1" class="edge">
 <title>none~derivative2&#45;&gt;proc~derivative2_scalar</title>
-<path fill="none" stroke="#ff0000" d="M508.1,-12C516.5,-12 525.15,-12 533.81,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="533.98,-15.5 543.98,-12 533.98,-8.5 533.98,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M489.24,-12C497.52,-12 506.07,-12 514.63,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="514.67,-15.5 524.67,-12 514.67,-8.5 514.67,-15.5"/>
 </g>
 <!-- proc~nearest_point2 -->
 <g id="proc~~derivative2_scalar~~CalledByGraph_node3" class="node">
 <title>proc~nearest_point2</title>
-<g id="a_proc~~derivative2_scalar~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_volume%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="315,-24 139,-24 139,0 315,0 315,-24"/>
-<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
+<g id="a_proc~~derivative2_scalar~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_curve%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="305,-24 139,-24 139,0 305,0 305,-24"/>
+<text text-anchor="middle" x="222" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2&#45;&gt;none~derivative2 -->
 <g id="proc~~derivative2_scalar~~CalledByGraph_edge2" class="edge">
 <title>proc~nearest_point2&#45;&gt;none~derivative2</title>
-<path fill="none" stroke="#ff0000" d="M315.07,-12C323.65,-12 332.37,-12 340.95,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="340.96,-15.5 350.96,-12 340.96,-8.5 340.96,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M305.11,-12C313.59,-12 322.22,-12 330.71,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="330.99,-15.5 340.99,-12 330.99,-8.5 330.99,-15.5"/>
 </g>
-<!-- program~nearest_point_3d -->
+<!-- program~nearest_point_1d -->
 <g id="proc~~derivative2_scalar~~CalledByGraph_node4" class="node">
-<title>program~nearest_point_3d</title>
-<g id="a_proc~~derivative2_scalar~~CalledByGraph_node4"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<title>program~nearest_point_1d</title>
+<g id="a_proc~~derivative2_scalar~~CalledByGraph_node4"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-24 0,-24 0,0 103,0 103,-24"/>
-<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
+<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
+<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2 -->
 <g id="proc~~derivative2_scalar~~CalledByGraph_edge3" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
-<path fill="none" stroke="#ff0000" d="M103.15,-12C111.2,-12 119.76,-12 128.46,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="128.73,-15.5 138.73,-12 128.73,-8.5 128.73,-15.5"/>
+<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2</title>
+<path fill="none" stroke="#ff0000" d="M103.06,-12C111.3,-12 120.05,-12 128.92,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="128.97,-15.5 138.97,-12 128.97,-8.5 128.97,-15.5"/>
 </g>
 </g>
 </svg>
@@ -555,7 +555,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/derivative2_scalar~2.html b/proc/derivative2_scalar~2.html
index 267a7f352..a7b0d553f 100644
--- a/proc/derivative2_scalar~2.html
+++ b/proc/derivative2_scalar~2.html
@@ -83,15 +83,15 @@ <h1>derivative2_scalar
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">derivative2_scalar</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine derivative2_scalar(this, Xt, d2Tgc, dTgc, Tgc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~105"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~98"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~36"></span>
+              <span class="anchor" id="variable-xt~35"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -218,7 +218,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~28"></span>
+              <span class="anchor" id="variable-tgc~27"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -255,7 +255,7 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~derivative2_scalar~2~~CallsGraph_node1" class="node">
 <title>proc~derivative2_scalar~2</title>
 <polygon fill="none" stroke="black" points="195,-45 0,-45 0,-21 195,-21 195,-45"/>
-<text text-anchor="middle" x="97.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%derivative2_scalar</text>
+<text text-anchor="middle" x="97.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%derivative2_scalar</text>
 </g>
 <!-- interface~compute_d2tgc~2 -->
 <g id="proc~~derivative2_scalar~2~~CallsGraph_node2" class="node">
@@ -275,9 +275,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~is_rational~2 -->
 <g id="proc~~derivative2_scalar~2~~CallsGraph_node3" class="node">
 <title>proc~is_rational~2</title>
-<g id="a_proc~~derivative2_scalar~2~~CallsGraph_node3"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<g id="a_proc~~derivative2_scalar~2~~CallsGraph_node3"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="383,-24 231,-24 231,0 383,0 383,-24"/>
-<text text-anchor="middle" x="307" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
+<text text-anchor="middle" x="307" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
@@ -390,14 +390,14 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~derivative2_scalar~2~~CalledByGraph_node1" class="node">
 <title>proc~derivative2_scalar~2</title>
 <polygon fill="none" stroke="black" points="739,-24 544,-24 544,0 739,0 739,-24"/>
-<text text-anchor="middle" x="641.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%derivative2_scalar</text>
+<text text-anchor="middle" x="641.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%derivative2_scalar</text>
 </g>
 <!-- none~derivative2~2 -->
 <g id="proc~~derivative2_scalar~2~~CalledByGraph_node2" class="node">
 <title>none~derivative2~2</title>
-<g id="a_proc~~derivative2_scalar~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~2" xlink:title="nurbs_surface%derivative2">
+<g id="a_proc~~derivative2_scalar~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2~2" xlink:title="nurbs_volume%derivative2">
 <polygon fill="#a7506f" stroke="#a7506f" points="508,-24 351,-24 351,0 508,0 508,-24"/>
-<text text-anchor="middle" x="429.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2</text>
+<text text-anchor="middle" x="429.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2</text>
 </a>
 </g>
 </g>
@@ -410,9 +410,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~nearest_point2~2 -->
 <g id="proc~~derivative2_scalar~2~~CalledByGraph_node3" class="node">
 <title>proc~nearest_point2~2</title>
-<g id="a_proc~~derivative2_scalar~2~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_surface%nearest_point2">
+<g id="a_proc~~derivative2_scalar~2~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_volume%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="315,-24 139,-24 139,0 315,0 315,-24"/>
-<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
+<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
 </a>
 </g>
 </g>
@@ -422,18 +422,18 @@ <h3 class="card-title">Called by</h3>
 <path fill="none" stroke="#ff0000" d="M315.07,-12C323.65,-12 332.37,-12 340.95,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="340.96,-15.5 350.96,-12 340.96,-8.5 340.96,-15.5"/>
 </g>
-<!-- program~nearest_point_2d -->
+<!-- program~nearest_point_3d -->
 <g id="proc~~derivative2_scalar~2~~CalledByGraph_node4" class="node">
-<title>program~nearest_point_2d</title>
-<g id="a_proc~~derivative2_scalar~2~~CalledByGraph_node4"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
+<title>program~nearest_point_3d</title>
+<g id="a_proc~~derivative2_scalar~2~~CalledByGraph_node4"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-24 0,-24 0,0 103,0 103,-24"/>
-<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
 <g id="proc~~derivative2_scalar~2~~CalledByGraph_edge3" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
 <path fill="none" stroke="#ff0000" d="M103.15,-12C111.2,-12 119.76,-12 128.46,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="128.73,-15.5 138.73,-12 128.73,-8.5 128.73,-15.5"/>
 </g>
@@ -555,7 +555,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/derivative2_scalar~3.html b/proc/derivative2_scalar~3.html
index d8ba7f3ee..c569d5aac 100644
--- a/proc/derivative2_scalar~3.html
+++ b/proc/derivative2_scalar~3.html
@@ -83,15 +83,15 @@ <h1>derivative2_scalar
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">derivative2_scalar</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine derivative2_scalar(this, Xt, d2Tgc, dTgc, Tgc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~169"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~166"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -176,12 +176,12 @@ <h3>Arguments</h3>
               <span class="anchor" id="variable-xt~69"></span>
               real(kind=rk),
             </td>
-<td>intent(in)</td>
+<td>intent(in),</td>
               <td></td>            <td>
-              
+              contiguous
             </td>
             <td>::</td>
-            <td><strong>Xt</strong></td>
+            <td><strong>Xt</strong>(:)</td>
             <td>
                 
             </td>
@@ -196,7 +196,7 @@ <h3>Arguments</h3>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>d2Tgc</strong>(:)</td>
+            <td><strong>d2Tgc</strong>(:,:)</td>
             <td>
                 
             </td>
@@ -211,7 +211,7 @@ <h3>Arguments</h3>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>dTgc</strong>(:)</td>
+            <td><strong>dTgc</strong>(:,:)</td>
             <td>
                 
             </td>
@@ -246,46 +246,46 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~derivative2_scalar~3~~CallsGraph Pages: 1 -->
-<svg id="procderivative2_scalar3CallsGraph" width="371pt" height="74pt"
- viewBox="0.00 0.00 371.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procderivative2_scalar3CallsGraph" width="391pt" height="74pt"
+ viewBox="0.00 0.00 391.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~derivative2_scalar~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~derivative2_scalar~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 367,-70 367,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 387,-70 387,4 -4,4"/>
 <!-- proc~derivative2_scalar~3 -->
 <g id="proc~~derivative2_scalar~3~~CallsGraph_node1" class="node">
 <title>proc~derivative2_scalar~3</title>
-<polygon fill="none" stroke="black" points="185,-45 0,-45 0,-21 185,-21 185,-45"/>
-<text text-anchor="middle" x="92.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%derivative2_scalar</text>
+<polygon fill="none" stroke="black" points="195,-45 0,-45 0,-21 195,-21 195,-45"/>
+<text text-anchor="middle" x="97.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%derivative2_scalar</text>
 </g>
 <!-- interface~compute_d2tgc~3 -->
 <g id="proc~~derivative2_scalar~3~~CallsGraph_node2" class="node">
 <title>interface~compute_d2tgc~3</title>
 <g id="a_proc~~derivative2_scalar~3~~CallsGraph_node2"><a xlink:href="../interface/compute_d2tgc~3.html" xlink:title="compute_d2Tgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="341,-66 243,-66 243,-42 341,-42 341,-66"/>
-<text text-anchor="middle" x="292" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="356,-66 258,-66 258,-42 356,-42 356,-66"/>
+<text text-anchor="middle" x="307" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_scalar~3&#45;&gt;interface~compute_d2tgc~3 -->
 <g id="proc~~derivative2_scalar~3~~CallsGraph_edge1" class="edge">
 <title>proc~derivative2_scalar~3&#45;&gt;interface~compute_d2tgc~3</title>
-<path fill="none" stroke="#ff0000" d="M185.02,-42.73C201.26,-44.46 217.75,-46.21 232.74,-47.81"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="232.54,-51.3 242.85,-48.88 233.28,-44.34 232.54,-51.3"/>
+<path fill="none" stroke="#ff0000" d="M195.26,-42.79C213.12,-44.6 231.25,-46.43 247.53,-48.08"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="247.64,-51.61 257.94,-49.14 248.34,-44.65 247.64,-51.61"/>
 </g>
 <!-- proc~is_rational~3 -->
 <g id="proc~~derivative2_scalar~3~~CallsGraph_node3" class="node">
 <title>proc~is_rational~3</title>
-<g id="a_proc~~derivative2_scalar~3~~CallsGraph_node3"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="363,-24 221,-24 221,0 363,0 363,-24"/>
-<text text-anchor="middle" x="292" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
+<g id="a_proc~~derivative2_scalar~3~~CallsGraph_node3"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="383,-24 231,-24 231,0 383,0 383,-24"/>
+<text text-anchor="middle" x="307" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_scalar~3&#45;&gt;proc~is_rational~3 -->
 <g id="proc~~derivative2_scalar~3~~CallsGraph_edge2" class="edge">
 <title>proc~derivative2_scalar~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M185.02,-23.27C193.56,-22.36 202.17,-21.45 210.59,-20.55"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="211.19,-24.01 220.76,-19.47 210.45,-17.05 211.19,-24.01"/>
+<path fill="none" stroke="#ff0000" d="M195.26,-23.21C203.75,-22.35 212.3,-21.48 220.69,-20.63"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="221.22,-24.1 230.82,-19.61 220.52,-17.13 221.22,-24.1"/>
 </g>
 </g>
 </svg>
@@ -381,61 +381,61 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~derivative2_scalar~3~~CalledByGraph Pages: 1 -->
-<svg id="procderivative2_scalar3CalledByGraph" width="641pt" height="29pt"
- viewBox="0.00 0.00 641.00 28.57" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~derivative2_scalar~3~~CalledByGraph" class="graph" transform="scale(1.12 1.12) rotate(0) translate(4 28)">
+<svg id="procderivative2_scalar3CalledByGraph" width="641pt" height="27pt"
+ viewBox="0.00 0.00 641.00 27.46" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~derivative2_scalar~3~~CalledByGraph" class="graph" transform="scale(1.17 1.17) rotate(0) translate(4 28)">
 <title>proc~~derivative2_scalar~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 714,-28 714,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 743,-28 743,4 -4,4"/>
 <!-- proc~derivative2_scalar~3 -->
 <g id="proc~~derivative2_scalar~3~~CalledByGraph_node1" class="node">
 <title>proc~derivative2_scalar~3</title>
-<polygon fill="none" stroke="black" points="710,-24 525,-24 525,0 710,0 710,-24"/>
-<text text-anchor="middle" x="617.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%derivative2_scalar</text>
+<polygon fill="none" stroke="black" points="739,-24 544,-24 544,0 739,0 739,-24"/>
+<text text-anchor="middle" x="641.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%derivative2_scalar</text>
 </g>
 <!-- none~derivative2~3 -->
 <g id="proc~~derivative2_scalar~3~~CalledByGraph_node2" class="node">
 <title>none~derivative2~3</title>
-<g id="a_proc~~derivative2_scalar~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative2~3" xlink:title="nurbs_curve%derivative2">
-<polygon fill="#a7506f" stroke="#a7506f" points="489,-24 341,-24 341,0 489,0 489,-24"/>
-<text text-anchor="middle" x="415" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2</text>
+<g id="a_proc~~derivative2_scalar~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~3" xlink:title="nurbs_surface%derivative2">
+<polygon fill="#a7506f" stroke="#a7506f" points="508,-24 351,-24 351,0 508,0 508,-24"/>
+<text text-anchor="middle" x="429.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2~3&#45;&gt;proc~derivative2_scalar~3 -->
 <g id="proc~~derivative2_scalar~3~~CalledByGraph_edge1" class="edge">
 <title>none~derivative2~3&#45;&gt;proc~derivative2_scalar~3</title>
-<path fill="none" stroke="#ff0000" d="M489.24,-12C497.52,-12 506.07,-12 514.63,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="514.67,-15.5 524.67,-12 514.67,-8.5 514.67,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M508.1,-12C516.5,-12 525.15,-12 533.81,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="533.98,-15.5 543.98,-12 533.98,-8.5 533.98,-15.5"/>
 </g>
 <!-- proc~nearest_point2~3 -->
 <g id="proc~~derivative2_scalar~3~~CalledByGraph_node3" class="node">
 <title>proc~nearest_point2~3</title>
-<g id="a_proc~~derivative2_scalar~3~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_curve%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="305,-24 139,-24 139,0 305,0 305,-24"/>
-<text text-anchor="middle" x="222" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
+<g id="a_proc~~derivative2_scalar~3~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_surface%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="315,-24 139,-24 139,0 315,0 315,-24"/>
+<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;none~derivative2~3 -->
 <g id="proc~~derivative2_scalar~3~~CalledByGraph_edge2" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;none~derivative2~3</title>
-<path fill="none" stroke="#ff0000" d="M305.11,-12C313.59,-12 322.22,-12 330.71,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="330.99,-15.5 340.99,-12 330.99,-8.5 330.99,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M315.07,-12C323.65,-12 332.37,-12 340.95,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="340.96,-15.5 350.96,-12 340.96,-8.5 340.96,-15.5"/>
 </g>
-<!-- program~nearest_point_1d -->
+<!-- program~nearest_point_2d -->
 <g id="proc~~derivative2_scalar~3~~CalledByGraph_node4" class="node">
-<title>program~nearest_point_1d</title>
-<g id="a_proc~~derivative2_scalar~3~~CalledByGraph_node4"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
+<title>program~nearest_point_2d</title>
+<g id="a_proc~~derivative2_scalar~3~~CalledByGraph_node4"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-24 0,-24 0,0 103,0 103,-24"/>
-<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2~3 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
 <g id="proc~~derivative2_scalar~3~~CalledByGraph_edge3" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2~3</title>
-<path fill="none" stroke="#ff0000" d="M103.06,-12C111.3,-12 120.05,-12 128.92,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="128.97,-15.5 138.97,-12 128.97,-8.5 128.97,-15.5"/>
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
+<path fill="none" stroke="#ff0000" d="M103.15,-12C111.2,-12 119.76,-12 128.46,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="128.73,-15.5 138.73,-12 128.73,-8.5 128.73,-15.5"/>
 </g>
 </g>
 </svg>
@@ -555,7 +555,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/derivative2_vector.html b/proc/derivative2_vector.html
index 963375243..2a176416a 100644
--- a/proc/derivative2_vector.html
+++ b/proc/derivative2_vector.html
@@ -78,20 +78,20 @@ <h1>derivative2_vector
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.6% of total for procedures.">43 statements</a>
+                 title=" 0.3% of total for procedures.">23 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">derivative2_vector</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine derivative2_vector(this, res1, res2, res3, Xt1, Xt2, Xt3, d2Tgc, dTgc, Tgc)  
+    <h2>private pure subroutine derivative2_vector(this, res, Xt, d2Tgc, dTgc, Tgc)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~36"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~37"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1~3"></span>
+              <span class="anchor" id="variable-res~3"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -181,44 +181,14 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>res1</strong></td>
+            <td><strong>res</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2~3"></span>
-              integer,
-            </td>
-<td>intent(in),</td>
-              <td>optional</td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>res2</strong></td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-res3~3"></span>
-              integer,
-            </td>
-<td>intent(in),</td>
-              <td>optional</td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>res3</strong></td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-xt1~4"></span>
+              <span class="anchor" id="variable-xt~7"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -226,37 +196,7 @@ <h3>Arguments</h3>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>Xt1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-xt2~4"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td>optional,</td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>Xt2</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-xt3~4"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td>optional,</td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>Xt3</strong>(:)</td>
+            <td><strong>Xt</strong>(:)</td>
             <td>
                 
             </td>
@@ -271,7 +211,7 @@ <h3>Arguments</h3>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>d2Tgc</strong>(:,:,:)</td>
+            <td><strong>d2Tgc</strong>(:,:)</td>
             <td>
                 
             </td>
@@ -286,7 +226,7 @@ <h3>Arguments</h3>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>dTgc</strong>(:,:,:)</td>
+            <td><strong>dTgc</strong>(:,:)</td>
             <td>
                 
             </td>
@@ -321,91 +261,46 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~derivative2_vector~~CallsGraph Pages: 1 -->
-<svg id="procderivative2_vectorCallsGraph" width="482pt" height="116pt"
- viewBox="0.00 0.00 482.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~derivative2_vector~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
+<svg id="procderivative2_vectorCallsGraph" width="373pt" height="74pt"
+ viewBox="0.00 0.00 373.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~derivative2_vector~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~derivative2_vector~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 478,-112 478,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 369,-70 369,4 -4,4"/>
 <!-- proc~derivative2_vector -->
 <g id="proc~~derivative2_vector~~CallsGraph_node1" class="node">
 <title>proc~derivative2_vector</title>
-<polygon fill="none" stroke="black" points="196,-66 0,-66 0,-42 196,-42 196,-66"/>
-<text text-anchor="middle" x="98" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%derivative2_vector</text>
+<polygon fill="none" stroke="black" points="187,-45 0,-45 0,-21 187,-21 187,-45"/>
+<text text-anchor="middle" x="93.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%derivative2_vector</text>
 </g>
 <!-- interface~compute_d2tgc -->
 <g id="proc~~derivative2_vector~~CallsGraph_node2" class="node">
 <title>interface~compute_d2tgc</title>
 <g id="a_proc~~derivative2_vector~~CallsGraph_node2"><a xlink:href="../interface/compute_d2tgc.html" xlink:title="compute_d2Tgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="357,-108 259,-108 259,-84 357,-84 357,-108"/>
-<text text-anchor="middle" x="308" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="343,-66 245,-66 245,-42 343,-42 343,-66"/>
+<text text-anchor="middle" x="294" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_vector&#45;&gt;interface~compute_d2tgc -->
 <g id="proc~~derivative2_vector~~CallsGraph_edge1" class="edge">
 <title>proc~derivative2_vector&#45;&gt;interface~compute_d2tgc</title>
-<path fill="none" stroke="#ff0000" d="M158.6,-66.04C186.94,-71.76 220.68,-78.57 248.83,-84.25"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="248.43,-87.74 258.92,-86.29 249.82,-80.88 248.43,-87.74"/>
-</g>
-<!-- interface~ndgrid -->
-<g id="proc~~derivative2_vector~~CallsGraph_node3" class="node">
-<title>interface~ndgrid</title>
-<g id="a_proc~~derivative2_vector~~CallsGraph_node3"><a xlink:href="../interface/ndgrid.html" xlink:title="ndgrid">
-<polygon fill="#a7506f" stroke="#a7506f" points="335,-66 281,-66 281,-42 335,-42 335,-66"/>
-<text text-anchor="middle" x="308" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid</text>
-</a>
-</g>
-</g>
-<!-- proc~derivative2_vector&#45;&gt;interface~ndgrid -->
-<g id="proc~~derivative2_vector~~CallsGraph_edge2" class="edge">
-<title>proc~derivative2_vector&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#ff0000" d="M196.3,-54C222.77,-54 249.82,-54 270.56,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="270.79,-57.5 280.79,-54 270.79,-50.5 270.79,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M187.07,-42.79C203.33,-44.51 219.83,-46.26 234.81,-47.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="234.61,-51.34 244.92,-48.91 235.35,-44.38 234.61,-51.34"/>
 </g>
 <!-- proc~is_rational -->
-<g id="proc~~derivative2_vector~~CallsGraph_node4" class="node">
+<g id="proc~~derivative2_vector~~CallsGraph_node3" class="node">
 <title>proc~is_rational</title>
-<g id="a_proc~~derivative2_vector~~CallsGraph_node4"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="384,-24 232,-24 232,0 384,0 384,-24"/>
-<text text-anchor="middle" x="308" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
+<g id="a_proc~~derivative2_vector~~CallsGraph_node3"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="365,-24 223,-24 223,0 365,0 365,-24"/>
+<text text-anchor="middle" x="294" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_vector&#45;&gt;proc~is_rational -->
-<g id="proc~~derivative2_vector~~CallsGraph_edge3" class="edge">
+<g id="proc~~derivative2_vector~~CallsGraph_edge2" class="edge">
 <title>proc~derivative2_vector&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ff0000" d="M158.6,-41.96C183.19,-37 211.85,-31.21 237.4,-26.05"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="238.28,-29.45 247.39,-24.04 236.89,-22.59 238.28,-29.45"/>
-</g>
-<!-- proc~ndgrid2 -->
-<g id="proc~~derivative2_vector~~CallsGraph_node5" class="node">
-<title>proc~ndgrid2</title>
-<g id="a_proc~~derivative2_vector~~CallsGraph_node5"><a xlink:href="../proc/ndgrid2.html" xlink:title="ndgrid2">
-<polygon fill="#d9534f" stroke="#d9534f" points="474,-87 420,-87 420,-63 474,-63 474,-87"/>
-<text text-anchor="middle" x="447" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid2</text>
-</a>
-</g>
-</g>
-<!-- interface~ndgrid&#45;&gt;proc~ndgrid2 -->
-<g id="proc~~derivative2_vector~~CallsGraph_edge4" class="edge">
-<title>interface~ndgrid&#45;&gt;proc~ndgrid2</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M335.09,-58C356.19,-61.23 386.14,-65.82 409.6,-69.42"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="409.12,-72.89 419.54,-70.94 410.19,-65.97 409.12,-72.89"/>
-</g>
-<!-- proc~ndgrid3 -->
-<g id="proc~~derivative2_vector~~CallsGraph_node6" class="node">
-<title>proc~ndgrid3</title>
-<g id="a_proc~~derivative2_vector~~CallsGraph_node6"><a xlink:href="../proc/ndgrid3.html" xlink:title="ndgrid3">
-<polygon fill="#d9534f" stroke="#d9534f" points="474,-45 420,-45 420,-21 474,-21 474,-45"/>
-<text text-anchor="middle" x="447" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid3</text>
-</a>
-</g>
-</g>
-<!-- interface~ndgrid&#45;&gt;proc~ndgrid3 -->
-<g id="proc~~derivative2_vector~~CallsGraph_edge5" class="edge">
-<title>interface~ndgrid&#45;&gt;proc~ndgrid3</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M335.09,-50C356.19,-46.77 386.14,-42.18 409.6,-38.58"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="410.19,-42.03 419.54,-37.06 409.12,-35.11 410.19,-42.03"/>
+<path fill="none" stroke="#ff0000" d="M187.07,-23.21C195.62,-22.3 204.24,-21.39 212.66,-20.5"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="213.26,-23.96 222.83,-19.42 212.52,-16.99 213.26,-23.96"/>
 </g>
 </g>
 </svg>
@@ -501,61 +396,61 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~derivative2_vector~~CalledByGraph Pages: 1 -->
-<svg id="procderivative2_vectorCalledByGraph" width="641pt" height="27pt"
- viewBox="0.00 0.00 641.00 27.42" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~derivative2_vector~~CalledByGraph" class="graph" transform="scale(1.17 1.17) rotate(0) translate(4 28)">
+<svg id="procderivative2_vectorCalledByGraph" width="641pt" height="28pt"
+ viewBox="0.00 0.00 641.00 28.49" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~derivative2_vector~~CalledByGraph" class="graph" transform="scale(1.12 1.12) rotate(0) translate(4 28)">
 <title>proc~~derivative2_vector~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 744,-28 744,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 716,-28 716,4 -4,4"/>
 <!-- proc~derivative2_vector -->
 <g id="proc~~derivative2_vector~~CalledByGraph_node1" class="node">
 <title>proc~derivative2_vector</title>
-<polygon fill="none" stroke="black" points="740,-24 544,-24 544,0 740,0 740,-24"/>
-<text text-anchor="middle" x="642" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%derivative2_vector</text>
+<polygon fill="none" stroke="black" points="712,-24 525,-24 525,0 712,0 712,-24"/>
+<text text-anchor="middle" x="618.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%derivative2_vector</text>
 </g>
 <!-- none~derivative2 -->
 <g id="proc~~derivative2_vector~~CalledByGraph_node2" class="node">
 <title>none~derivative2</title>
-<g id="a_proc~~derivative2_vector~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2" xlink:title="nurbs_volume%derivative2">
-<polygon fill="#a7506f" stroke="#a7506f" points="508,-24 351,-24 351,0 508,0 508,-24"/>
-<text text-anchor="middle" x="429.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2</text>
+<g id="a_proc~~derivative2_vector~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative2" xlink:title="nurbs_curve%derivative2">
+<polygon fill="#a7506f" stroke="#a7506f" points="489,-24 341,-24 341,0 489,0 489,-24"/>
+<text text-anchor="middle" x="415" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2&#45;&gt;proc~derivative2_vector -->
 <g id="proc~~derivative2_vector~~CalledByGraph_edge1" class="edge">
 <title>none~derivative2&#45;&gt;proc~derivative2_vector</title>
-<path fill="none" stroke="#ff0000" d="M508.28,-12C516.62,-12 525.2,-12 533.8,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="533.88,-15.5 543.88,-12 533.88,-8.5 533.88,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M489.03,-12C497.37,-12 505.98,-12 514.62,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="514.74,-15.5 524.74,-12 514.74,-8.5 514.74,-15.5"/>
 </g>
 <!-- proc~nearest_point2 -->
 <g id="proc~~derivative2_vector~~CalledByGraph_node3" class="node">
 <title>proc~nearest_point2</title>
-<g id="a_proc~~derivative2_vector~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_volume%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="315,-24 139,-24 139,0 315,0 315,-24"/>
-<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
+<g id="a_proc~~derivative2_vector~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_curve%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="305,-24 139,-24 139,0 305,0 305,-24"/>
+<text text-anchor="middle" x="222" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2&#45;&gt;none~derivative2 -->
 <g id="proc~~derivative2_vector~~CalledByGraph_edge2" class="edge">
 <title>proc~nearest_point2&#45;&gt;none~derivative2</title>
-<path fill="none" stroke="#ff0000" d="M315.07,-12C323.65,-12 332.37,-12 340.95,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="340.96,-15.5 350.96,-12 340.96,-8.5 340.96,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M305.11,-12C313.59,-12 322.22,-12 330.71,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="330.99,-15.5 340.99,-12 330.99,-8.5 330.99,-15.5"/>
 </g>
-<!-- program~nearest_point_3d -->
+<!-- program~nearest_point_1d -->
 <g id="proc~~derivative2_vector~~CalledByGraph_node4" class="node">
-<title>program~nearest_point_3d</title>
-<g id="a_proc~~derivative2_vector~~CalledByGraph_node4"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<title>program~nearest_point_1d</title>
+<g id="a_proc~~derivative2_vector~~CalledByGraph_node4"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-24 0,-24 0,0 103,0 103,-24"/>
-<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
+<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
+<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2 -->
 <g id="proc~~derivative2_vector~~CalledByGraph_edge3" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
-<path fill="none" stroke="#ff0000" d="M103.15,-12C111.2,-12 119.76,-12 128.46,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="128.73,-15.5 138.73,-12 128.73,-8.5 128.73,-15.5"/>
+<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2</title>
+<path fill="none" stroke="#ff0000" d="M103.06,-12C111.3,-12 120.05,-12 128.92,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="128.97,-15.5 138.97,-12 128.97,-8.5 128.97,-15.5"/>
 </g>
 </g>
 </svg>
@@ -675,7 +570,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/derivative2_vector~2.html b/proc/derivative2_vector~2.html
index 64a68b65d..aa54784e7 100644
--- a/proc/derivative2_vector~2.html
+++ b/proc/derivative2_vector~2.html
@@ -78,20 +78,20 @@ <h1>derivative2_vector
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.5% of total for procedures.">34 statements</a>
+                 title=" 0.6% of total for procedures.">43 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">derivative2_vector</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine derivative2_vector(this, res1, res2, Xt1, Xt2, d2Tgc, dTgc, Tgc)  
+    <h2>private pure subroutine derivative2_vector(this, res1, res2, res3, Xt1, Xt2, Xt3, d2Tgc, dTgc, Tgc)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~104"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~97"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1~8"></span>
+              <span class="anchor" id="variable-res1~5"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2~8"></span>
+              <span class="anchor" id="variable-res2~5"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -203,7 +203,22 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt1~9"></span>
+              <span class="anchor" id="variable-res3~3"></span>
+              integer,
+            </td>
+<td>intent(in),</td>
+              <td>optional</td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>res3</strong></td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xt1~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -218,7 +233,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt2~9"></span>
+              <span class="anchor" id="variable-xt2~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -231,6 +246,21 @@ <h3>Arguments</h3>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xt3~4"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td>optional,</td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>Xt3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-d2tgc~8"></span>
@@ -263,7 +293,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~27"></span>
+              <span class="anchor" id="variable-tgc~26"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -300,7 +330,7 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~derivative2_vector~2~~CallsGraph_node1" class="node">
 <title>proc~derivative2_vector~2</title>
 <polygon fill="none" stroke="black" points="196,-66 0,-66 0,-42 196,-42 196,-66"/>
-<text text-anchor="middle" x="98" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%derivative2_vector</text>
+<text text-anchor="middle" x="98" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%derivative2_vector</text>
 </g>
 <!-- interface~compute_d2tgc~2 -->
 <g id="proc~~derivative2_vector~2~~CallsGraph_node2" class="node">
@@ -335,9 +365,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~is_rational~2 -->
 <g id="proc~~derivative2_vector~2~~CallsGraph_node4" class="node">
 <title>proc~is_rational~2</title>
-<g id="a_proc~~derivative2_vector~2~~CallsGraph_node4"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<g id="a_proc~~derivative2_vector~2~~CallsGraph_node4"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="384,-24 232,-24 232,0 384,0 384,-24"/>
-<text text-anchor="middle" x="308" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
+<text text-anchor="middle" x="308" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
@@ -480,14 +510,14 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~derivative2_vector~2~~CalledByGraph_node1" class="node">
 <title>proc~derivative2_vector~2</title>
 <polygon fill="none" stroke="black" points="740,-24 544,-24 544,0 740,0 740,-24"/>
-<text text-anchor="middle" x="642" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%derivative2_vector</text>
+<text text-anchor="middle" x="642" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%derivative2_vector</text>
 </g>
 <!-- none~derivative2~2 -->
 <g id="proc~~derivative2_vector~2~~CalledByGraph_node2" class="node">
 <title>none~derivative2~2</title>
-<g id="a_proc~~derivative2_vector~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~2" xlink:title="nurbs_surface%derivative2">
+<g id="a_proc~~derivative2_vector~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2~2" xlink:title="nurbs_volume%derivative2">
 <polygon fill="#a7506f" stroke="#a7506f" points="508,-24 351,-24 351,0 508,0 508,-24"/>
-<text text-anchor="middle" x="429.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2</text>
+<text text-anchor="middle" x="429.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2</text>
 </a>
 </g>
 </g>
@@ -500,9 +530,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~nearest_point2~2 -->
 <g id="proc~~derivative2_vector~2~~CalledByGraph_node3" class="node">
 <title>proc~nearest_point2~2</title>
-<g id="a_proc~~derivative2_vector~2~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_surface%nearest_point2">
+<g id="a_proc~~derivative2_vector~2~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_volume%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="315,-24 139,-24 139,0 315,0 315,-24"/>
-<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
+<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
 </a>
 </g>
 </g>
@@ -512,18 +542,18 @@ <h3 class="card-title">Called by</h3>
 <path fill="none" stroke="#ff0000" d="M315.07,-12C323.65,-12 332.37,-12 340.95,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="340.96,-15.5 350.96,-12 340.96,-8.5 340.96,-15.5"/>
 </g>
-<!-- program~nearest_point_2d -->
+<!-- program~nearest_point_3d -->
 <g id="proc~~derivative2_vector~2~~CalledByGraph_node4" class="node">
-<title>program~nearest_point_2d</title>
-<g id="a_proc~~derivative2_vector~2~~CalledByGraph_node4"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
+<title>program~nearest_point_3d</title>
+<g id="a_proc~~derivative2_vector~2~~CalledByGraph_node4"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-24 0,-24 0,0 103,0 103,-24"/>
-<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
 <g id="proc~~derivative2_vector~2~~CalledByGraph_edge3" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
 <path fill="none" stroke="#ff0000" d="M103.15,-12C111.2,-12 119.76,-12 128.46,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="128.73,-15.5 138.73,-12 128.73,-8.5 128.73,-15.5"/>
 </g>
@@ -645,7 +675,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/derivative2_vector~3.html b/proc/derivative2_vector~3.html
index 7a751d5af..2dde169bc 100644
--- a/proc/derivative2_vector~3.html
+++ b/proc/derivative2_vector~3.html
@@ -78,20 +78,20 @@ <h1>derivative2_vector
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.3% of total for procedures.">23 statements</a>
+                 title=" 0.5% of total for procedures.">34 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">derivative2_vector</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine derivative2_vector(this, res, Xt, d2Tgc, dTgc, Tgc)  
+    <h2>private pure subroutine derivative2_vector(this, res1, res2, Xt1, Xt2, d2Tgc, dTgc, Tgc)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~168"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~165"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res~3"></span>
+              <span class="anchor" id="variable-res1~9"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -181,14 +181,29 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>res</strong></td>
+            <td><strong>res1</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~68"></span>
+              <span class="anchor" id="variable-res2~9"></span>
+              integer,
+            </td>
+<td>intent(in),</td>
+              <td>optional</td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>res2</strong></td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xt1~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -196,7 +211,22 @@ <h3>Arguments</h3>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>Xt</strong>(:)</td>
+            <td><strong>Xt1</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xt2~9"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td>optional,</td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>Xt2</strong>(:)</td>
             <td>
                 
             </td>
@@ -211,7 +241,7 @@ <h3>Arguments</h3>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>d2Tgc</strong>(:,:)</td>
+            <td><strong>d2Tgc</strong>(:,:,:)</td>
             <td>
                 
             </td>
@@ -226,7 +256,7 @@ <h3>Arguments</h3>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>dTgc</strong>(:,:)</td>
+            <td><strong>dTgc</strong>(:,:,:)</td>
             <td>
                 
             </td>
@@ -261,46 +291,91 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~derivative2_vector~3~~CallsGraph Pages: 1 -->
-<svg id="procderivative2_vector3CallsGraph" width="373pt" height="74pt"
- viewBox="0.00 0.00 373.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~derivative2_vector~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
+<svg id="procderivative2_vector3CallsGraph" width="482pt" height="116pt"
+ viewBox="0.00 0.00 482.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~derivative2_vector~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
 <title>proc~~derivative2_vector~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 369,-70 369,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 478,-112 478,4 -4,4"/>
 <!-- proc~derivative2_vector~3 -->
 <g id="proc~~derivative2_vector~3~~CallsGraph_node1" class="node">
 <title>proc~derivative2_vector~3</title>
-<polygon fill="none" stroke="black" points="187,-45 0,-45 0,-21 187,-21 187,-45"/>
-<text text-anchor="middle" x="93.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%derivative2_vector</text>
+<polygon fill="none" stroke="black" points="196,-66 0,-66 0,-42 196,-42 196,-66"/>
+<text text-anchor="middle" x="98" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%derivative2_vector</text>
 </g>
 <!-- interface~compute_d2tgc~3 -->
 <g id="proc~~derivative2_vector~3~~CallsGraph_node2" class="node">
 <title>interface~compute_d2tgc~3</title>
 <g id="a_proc~~derivative2_vector~3~~CallsGraph_node2"><a xlink:href="../interface/compute_d2tgc~3.html" xlink:title="compute_d2Tgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="343,-66 245,-66 245,-42 343,-42 343,-66"/>
-<text text-anchor="middle" x="294" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="357,-108 259,-108 259,-84 357,-84 357,-108"/>
+<text text-anchor="middle" x="308" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_vector~3&#45;&gt;interface~compute_d2tgc~3 -->
 <g id="proc~~derivative2_vector~3~~CallsGraph_edge1" class="edge">
 <title>proc~derivative2_vector~3&#45;&gt;interface~compute_d2tgc~3</title>
-<path fill="none" stroke="#ff0000" d="M187.07,-42.79C203.33,-44.51 219.83,-46.26 234.81,-47.84"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="234.61,-51.34 244.92,-48.91 235.35,-44.38 234.61,-51.34"/>
+<path fill="none" stroke="#ff0000" d="M158.6,-66.04C186.94,-71.76 220.68,-78.57 248.83,-84.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="248.43,-87.74 258.92,-86.29 249.82,-80.88 248.43,-87.74"/>
 </g>
-<!-- proc~is_rational~3 -->
+<!-- interface~ndgrid -->
 <g id="proc~~derivative2_vector~3~~CallsGraph_node3" class="node">
+<title>interface~ndgrid</title>
+<g id="a_proc~~derivative2_vector~3~~CallsGraph_node3"><a xlink:href="../interface/ndgrid.html" xlink:title="ndgrid">
+<polygon fill="#a7506f" stroke="#a7506f" points="335,-66 281,-66 281,-42 335,-42 335,-66"/>
+<text text-anchor="middle" x="308" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid</text>
+</a>
+</g>
+</g>
+<!-- proc~derivative2_vector~3&#45;&gt;interface~ndgrid -->
+<g id="proc~~derivative2_vector~3~~CallsGraph_edge2" class="edge">
+<title>proc~derivative2_vector~3&#45;&gt;interface~ndgrid</title>
+<path fill="none" stroke="#ff0000" d="M196.3,-54C222.77,-54 249.82,-54 270.56,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="270.79,-57.5 280.79,-54 270.79,-50.5 270.79,-57.5"/>
+</g>
+<!-- proc~is_rational~3 -->
+<g id="proc~~derivative2_vector~3~~CallsGraph_node4" class="node">
 <title>proc~is_rational~3</title>
-<g id="a_proc~~derivative2_vector~3~~CallsGraph_node3"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="365,-24 223,-24 223,0 365,0 365,-24"/>
-<text text-anchor="middle" x="294" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
+<g id="a_proc~~derivative2_vector~3~~CallsGraph_node4"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="384,-24 232,-24 232,0 384,0 384,-24"/>
+<text text-anchor="middle" x="308" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_vector~3&#45;&gt;proc~is_rational~3 -->
-<g id="proc~~derivative2_vector~3~~CallsGraph_edge2" class="edge">
+<g id="proc~~derivative2_vector~3~~CallsGraph_edge3" class="edge">
 <title>proc~derivative2_vector~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M187.07,-23.21C195.62,-22.3 204.24,-21.39 212.66,-20.5"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="213.26,-23.96 222.83,-19.42 212.52,-16.99 213.26,-23.96"/>
+<path fill="none" stroke="#ff0000" d="M158.6,-41.96C183.19,-37 211.85,-31.21 237.4,-26.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="238.28,-29.45 247.39,-24.04 236.89,-22.59 238.28,-29.45"/>
+</g>
+<!-- proc~ndgrid2 -->
+<g id="proc~~derivative2_vector~3~~CallsGraph_node5" class="node">
+<title>proc~ndgrid2</title>
+<g id="a_proc~~derivative2_vector~3~~CallsGraph_node5"><a xlink:href="../proc/ndgrid2.html" xlink:title="ndgrid2">
+<polygon fill="#d9534f" stroke="#d9534f" points="474,-87 420,-87 420,-63 474,-63 474,-87"/>
+<text text-anchor="middle" x="447" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid2</text>
+</a>
+</g>
+</g>
+<!-- interface~ndgrid&#45;&gt;proc~ndgrid2 -->
+<g id="proc~~derivative2_vector~3~~CallsGraph_edge4" class="edge">
+<title>interface~ndgrid&#45;&gt;proc~ndgrid2</title>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M335.09,-58C356.19,-61.23 386.14,-65.82 409.6,-69.42"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="409.12,-72.89 419.54,-70.94 410.19,-65.97 409.12,-72.89"/>
+</g>
+<!-- proc~ndgrid3 -->
+<g id="proc~~derivative2_vector~3~~CallsGraph_node6" class="node">
+<title>proc~ndgrid3</title>
+<g id="a_proc~~derivative2_vector~3~~CallsGraph_node6"><a xlink:href="../proc/ndgrid3.html" xlink:title="ndgrid3">
+<polygon fill="#d9534f" stroke="#d9534f" points="474,-45 420,-45 420,-21 474,-21 474,-45"/>
+<text text-anchor="middle" x="447" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid3</text>
+</a>
+</g>
+</g>
+<!-- interface~ndgrid&#45;&gt;proc~ndgrid3 -->
+<g id="proc~~derivative2_vector~3~~CallsGraph_edge5" class="edge">
+<title>interface~ndgrid&#45;&gt;proc~ndgrid3</title>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M335.09,-50C356.19,-46.77 386.14,-42.18 409.6,-38.58"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="410.19,-42.03 419.54,-37.06 409.12,-35.11 410.19,-42.03"/>
 </g>
 </g>
 </svg>
@@ -396,61 +471,61 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~derivative2_vector~3~~CalledByGraph Pages: 1 -->
-<svg id="procderivative2_vector3CalledByGraph" width="641pt" height="28pt"
- viewBox="0.00 0.00 641.00 28.49" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~derivative2_vector~3~~CalledByGraph" class="graph" transform="scale(1.12 1.12) rotate(0) translate(4 28)">
+<svg id="procderivative2_vector3CalledByGraph" width="641pt" height="27pt"
+ viewBox="0.00 0.00 641.00 27.42" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~derivative2_vector~3~~CalledByGraph" class="graph" transform="scale(1.17 1.17) rotate(0) translate(4 28)">
 <title>proc~~derivative2_vector~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 716,-28 716,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 744,-28 744,4 -4,4"/>
 <!-- proc~derivative2_vector~3 -->
 <g id="proc~~derivative2_vector~3~~CalledByGraph_node1" class="node">
 <title>proc~derivative2_vector~3</title>
-<polygon fill="none" stroke="black" points="712,-24 525,-24 525,0 712,0 712,-24"/>
-<text text-anchor="middle" x="618.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%derivative2_vector</text>
+<polygon fill="none" stroke="black" points="740,-24 544,-24 544,0 740,0 740,-24"/>
+<text text-anchor="middle" x="642" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%derivative2_vector</text>
 </g>
 <!-- none~derivative2~3 -->
 <g id="proc~~derivative2_vector~3~~CalledByGraph_node2" class="node">
 <title>none~derivative2~3</title>
-<g id="a_proc~~derivative2_vector~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative2~3" xlink:title="nurbs_curve%derivative2">
-<polygon fill="#a7506f" stroke="#a7506f" points="489,-24 341,-24 341,0 489,0 489,-24"/>
-<text text-anchor="middle" x="415" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2</text>
+<g id="a_proc~~derivative2_vector~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~3" xlink:title="nurbs_surface%derivative2">
+<polygon fill="#a7506f" stroke="#a7506f" points="508,-24 351,-24 351,0 508,0 508,-24"/>
+<text text-anchor="middle" x="429.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2~3&#45;&gt;proc~derivative2_vector~3 -->
 <g id="proc~~derivative2_vector~3~~CalledByGraph_edge1" class="edge">
 <title>none~derivative2~3&#45;&gt;proc~derivative2_vector~3</title>
-<path fill="none" stroke="#ff0000" d="M489.03,-12C497.37,-12 505.98,-12 514.62,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="514.74,-15.5 524.74,-12 514.74,-8.5 514.74,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M508.28,-12C516.62,-12 525.2,-12 533.8,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="533.88,-15.5 543.88,-12 533.88,-8.5 533.88,-15.5"/>
 </g>
 <!-- proc~nearest_point2~3 -->
 <g id="proc~~derivative2_vector~3~~CalledByGraph_node3" class="node">
 <title>proc~nearest_point2~3</title>
-<g id="a_proc~~derivative2_vector~3~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_curve%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="305,-24 139,-24 139,0 305,0 305,-24"/>
-<text text-anchor="middle" x="222" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
+<g id="a_proc~~derivative2_vector~3~~CalledByGraph_node3"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_surface%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="315,-24 139,-24 139,0 315,0 315,-24"/>
+<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;none~derivative2~3 -->
 <g id="proc~~derivative2_vector~3~~CalledByGraph_edge2" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;none~derivative2~3</title>
-<path fill="none" stroke="#ff0000" d="M305.11,-12C313.59,-12 322.22,-12 330.71,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="330.99,-15.5 340.99,-12 330.99,-8.5 330.99,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M315.07,-12C323.65,-12 332.37,-12 340.95,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="340.96,-15.5 350.96,-12 340.96,-8.5 340.96,-15.5"/>
 </g>
-<!-- program~nearest_point_1d -->
+<!-- program~nearest_point_2d -->
 <g id="proc~~derivative2_vector~3~~CalledByGraph_node4" class="node">
-<title>program~nearest_point_1d</title>
-<g id="a_proc~~derivative2_vector~3~~CalledByGraph_node4"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
+<title>program~nearest_point_2d</title>
+<g id="a_proc~~derivative2_vector~3~~CalledByGraph_node4"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-24 0,-24 0,0 103,0 103,-24"/>
-<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2~3 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
 <g id="proc~~derivative2_vector~3~~CalledByGraph_edge3" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2~3</title>
-<path fill="none" stroke="#ff0000" d="M103.06,-12C111.3,-12 120.05,-12 128.92,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="128.97,-15.5 138.97,-12 128.97,-8.5 128.97,-15.5"/>
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
+<path fill="none" stroke="#ff0000" d="M103.15,-12C111.2,-12 119.76,-12 128.46,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="128.73,-15.5 138.73,-12 128.73,-8.5 128.73,-15.5"/>
 </g>
 </g>
 </svg>
@@ -570,7 +645,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/derivative_scalar.html b/proc/derivative_scalar.html
index cddbe2b48..b765bc4f4 100644
--- a/proc/derivative_scalar.html
+++ b/proc/derivative_scalar.html
@@ -83,15 +83,15 @@ <h1>derivative_scalar
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">derivative_scalar</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine derivative_scalar(this, Xt, dTgc, Tgc, elem)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~35"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~36"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -176,12 +176,12 @@ <h3>Arguments</h3>
               <span class="anchor" id="variable-xt~6"></span>
               real(kind=rk),
             </td>
-<td>intent(in),</td>
+<td>intent(in)</td>
               <td></td>            <td>
-              contiguous
+              
             </td>
             <td>::</td>
-            <td><strong>Xt</strong>(:)</td>
+            <td><strong>Xt</strong></td>
             <td>
                 
             </td>
@@ -196,7 +196,7 @@ <h3>Arguments</h3>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>dTgc</strong>(:,:)</td>
+            <td><strong>dTgc</strong>(:)</td>
             <td>
                 
             </td>
@@ -218,7 +218,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem"></span>
+              <span class="anchor" id="variable-elem~2"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -246,46 +246,46 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~derivative_scalar~~CallsGraph Pages: 1 -->
-<svg id="procderivative_scalarCallsGraph" width="384pt" height="74pt"
- viewBox="0.00 0.00 384.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procderivative_scalarCallsGraph" width="364pt" height="74pt"
+ viewBox="0.00 0.00 364.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~derivative_scalar~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~derivative_scalar~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 380,-70 380,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 360,-70 360,4 -4,4"/>
 <!-- proc~derivative_scalar -->
 <g id="proc~~derivative_scalar~~CallsGraph_node1" class="node">
 <title>proc~derivative_scalar</title>
-<polygon fill="none" stroke="black" points="188,-45 0,-45 0,-21 188,-21 188,-45"/>
-<text text-anchor="middle" x="94" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%derivative_scalar</text>
+<polygon fill="none" stroke="black" points="178,-45 0,-45 0,-21 178,-21 178,-45"/>
+<text text-anchor="middle" x="89" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%derivative_scalar</text>
 </g>
 <!-- interface~compute_dtgc -->
 <g id="proc~~derivative_scalar~~CallsGraph_node2" class="node">
 <title>interface~compute_dtgc</title>
 <g id="a_proc~~derivative_scalar~~CallsGraph_node2"><a xlink:href="../interface/compute_dtgc.html" xlink:title="compute_dTgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="345.5,-66 254.5,-66 254.5,-42 345.5,-42 345.5,-66"/>
-<text text-anchor="middle" x="300" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="330.5,-66 239.5,-66 239.5,-42 330.5,-42 330.5,-66"/>
+<text text-anchor="middle" x="285" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_scalar&#45;&gt;interface~compute_dtgc -->
 <g id="proc~~derivative_scalar~~CallsGraph_edge1" class="edge">
 <title>proc~derivative_scalar&#45;&gt;interface~compute_dtgc</title>
-<path fill="none" stroke="#ff0000" d="M188.05,-42.58C207.19,-44.55 226.76,-46.56 244.03,-48.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="244.15,-51.87 254.46,-49.41 244.87,-44.91 244.15,-51.87"/>
+<path fill="none" stroke="#ff0000" d="M178.2,-42.55C195.61,-44.43 213.4,-46.36 229.3,-48.08"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="229.13,-51.58 239.45,-49.18 229.89,-44.62 229.13,-51.58"/>
 </g>
 <!-- proc~is_rational -->
 <g id="proc~~derivative_scalar~~CallsGraph_node3" class="node">
 <title>proc~is_rational</title>
-<g id="a_proc~~derivative_scalar~~CallsGraph_node3"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="376,-24 224,-24 224,0 376,0 376,-24"/>
-<text text-anchor="middle" x="300" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
+<g id="a_proc~~derivative_scalar~~CallsGraph_node3"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="356,-24 214,-24 214,0 356,0 356,-24"/>
+<text text-anchor="middle" x="285" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_scalar&#45;&gt;proc~is_rational -->
 <g id="proc~~derivative_scalar~~CallsGraph_edge2" class="edge">
 <title>proc~derivative_scalar&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ff0000" d="M188.05,-23.42C196.56,-22.55 205.16,-21.66 213.61,-20.79"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="214.23,-24.25 223.81,-19.74 213.51,-17.28 214.23,-24.25"/>
+<path fill="none" stroke="#ff0000" d="M178.2,-23.45C186.67,-22.54 195.23,-21.61 203.61,-20.7"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="204.18,-24.16 213.74,-19.61 203.42,-17.2 204.18,-24.16"/>
 </g>
 </g>
 </svg>
@@ -381,76 +381,76 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~derivative_scalar~~CalledByGraph Pages: 1 -->
-<svg id="procderivative_scalarCalledByGraph" width="641pt" height="23pt"
- viewBox="0.00 0.00 641.00 22.94" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~derivative_scalar~~CalledByGraph" class="graph" transform="scale(1.39 1.39) rotate(0) translate(4 28)">
+<svg id="procderivative_scalarCalledByGraph" width="641pt" height="24pt"
+ viewBox="0.00 0.00 641.00 24.36" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~derivative_scalar~~CalledByGraph" class="graph" transform="scale(1.31 1.31) rotate(0) translate(4 28)">
 <title>proc~~derivative_scalar~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 890,-28 890,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 838,-28 838,4 -4,4"/>
 <!-- proc~derivative_scalar -->
 <g id="proc~~derivative_scalar~~CalledByGraph_node1" class="node">
 <title>proc~derivative_scalar</title>
-<polygon fill="none" stroke="black" points="886,-24 698,-24 698,0 886,0 886,-24"/>
-<text text-anchor="middle" x="792" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%derivative_scalar</text>
+<polygon fill="none" stroke="black" points="834,-24 656,-24 656,0 834,0 834,-24"/>
+<text text-anchor="middle" x="745" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%derivative_scalar</text>
 </g>
 <!-- none~derivative -->
 <g id="proc~~derivative_scalar~~CalledByGraph_node2" class="node">
 <title>none~derivative</title>
-<g id="a_proc~~derivative_scalar~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative" xlink:title="nurbs_volume%derivative">
-<polygon fill="#a7506f" stroke="#a7506f" points="662,-24 511,-24 511,0 662,0 662,-24"/>
-<text text-anchor="middle" x="586.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative</text>
+<g id="a_proc~~derivative_scalar~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative" xlink:title="nurbs_curve%derivative">
+<polygon fill="#a7506f" stroke="#a7506f" points="620,-24 479,-24 479,0 620,0 620,-24"/>
+<text text-anchor="middle" x="549.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative</text>
 </a>
 </g>
 </g>
 <!-- none~derivative&#45;&gt;proc~derivative_scalar -->
 <g id="proc~~derivative_scalar~~CalledByGraph_edge1" class="edge">
 <title>none~derivative&#45;&gt;proc~derivative_scalar</title>
-<path fill="none" stroke="#ff0000" d="M662.12,-12C670.44,-12 679.01,-12 687.61,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="687.69,-15.5 697.69,-12 687.69,-8.5 687.69,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M620.08,-12C628.42,-12 637.04,-12 645.68,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="645.82,-15.5 655.82,-12 645.82,-8.5 645.82,-15.5"/>
 </g>
 <!-- proc~ansatz -->
 <g id="proc~~derivative_scalar~~CalledByGraph_node3" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~derivative_scalar~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-24 343,-24 343,0 475,0 475,-24"/>
-<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~derivative_scalar~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="443,-24 321,-24 321,0 443,0 443,-24"/>
+<text text-anchor="middle" x="382" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;none~derivative -->
 <g id="proc~~derivative_scalar~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz&#45;&gt;none~derivative</title>
-<path fill="none" stroke="#ff0000" d="M475.35,-12C483.69,-12 492.31,-12 500.89,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="500.93,-15.5 510.93,-12 500.93,-8.5 500.93,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M443.22,-12C451.52,-12 460.15,-12 468.74,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="468.78,-15.5 478.78,-12 468.78,-8.5 468.78,-15.5"/>
 </g>
-<!-- proc~cmp_volume -->
+<!-- proc~cmp_length -->
 <g id="proc~~derivative_scalar~~CalledByGraph_node4" class="node">
-<title>proc~cmp_volume</title>
-<g id="a_proc~~derivative_scalar~~CalledByGraph_node4"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-24 141,-24 141,0 307,0 307,-24"/>
-<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<title>proc~cmp_length</title>
+<g id="a_proc~~derivative_scalar~~CalledByGraph_node4"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
+<polygon fill="#d9534f" stroke="#d9534f" points="285,-24 135,-24 135,0 285,0 285,-24"/>
+<text text-anchor="middle" x="210" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="proc~~derivative_scalar~~CalledByGraph_edge3" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.13,-12C315.64,-12 324.26,-12 332.7,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="332.87,-15.5 342.87,-12 332.87,-8.5 332.87,-15.5"/>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M285.07,-12C293.59,-12 302.27,-12 310.74,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="310.95,-15.5 320.95,-12 310.95,-8.5 310.95,-15.5"/>
 </g>
-<!-- program~compute_volume -->
+<!-- program~compute_length -->
 <g id="proc~~derivative_scalar~~CalledByGraph_node5" class="node">
-<title>program~compute_volume</title>
-<g id="a_proc~~derivative_scalar~~CalledByGraph_node5"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-24 0,-24 0,0 105,0 105,-24"/>
-<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<title>program~compute_length</title>
+<g id="a_proc~~derivative_scalar~~CalledByGraph_node5"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-24 0,-24 0,0 99,0 99,-24"/>
+<text text-anchor="middle" x="49.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
+<!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="proc~~derivative_scalar~~CalledByGraph_edge4" class="edge">
-<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#ff0000" d="M105.28,-12C113.39,-12 121.99,-12 130.69,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="130.93,-15.5 140.93,-12 130.93,-8.5 130.93,-15.5"/>
+<title>program~compute_length&#45;&gt;proc~cmp_length</title>
+<path fill="none" stroke="#ff0000" d="M99.35,-12C107.46,-12 116.06,-12 124.75,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="124.96,-15.5 134.96,-12 124.96,-8.5 124.96,-15.5"/>
 </g>
 </g>
 </svg>
@@ -570,7 +570,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/derivative_scalar~2.html b/proc/derivative_scalar~2.html
index 7ce47ecd2..7cc1a3734 100644
--- a/proc/derivative_scalar~2.html
+++ b/proc/derivative_scalar~2.html
@@ -83,15 +83,15 @@ <h1>derivative_scalar
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">derivative_scalar</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine derivative_scalar(this, Xt, dTgc, Tgc, elem)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~103"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~96"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~34"></span>
+              <span class="anchor" id="variable-xt~33"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -203,7 +203,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~26"></span>
+              <span class="anchor" id="variable-tgc~25"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -218,7 +218,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~10"></span>
+              <span class="anchor" id="variable-elem~5"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -255,7 +255,7 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~derivative_scalar~2~~CallsGraph_node1" class="node">
 <title>proc~derivative_scalar~2</title>
 <polygon fill="none" stroke="black" points="188,-45 0,-45 0,-21 188,-21 188,-45"/>
-<text text-anchor="middle" x="94" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%derivative_scalar</text>
+<text text-anchor="middle" x="94" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%derivative_scalar</text>
 </g>
 <!-- interface~compute_dtgc~2 -->
 <g id="proc~~derivative_scalar~2~~CallsGraph_node2" class="node">
@@ -275,9 +275,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~is_rational~2 -->
 <g id="proc~~derivative_scalar~2~~CallsGraph_node3" class="node">
 <title>proc~is_rational~2</title>
-<g id="a_proc~~derivative_scalar~2~~CallsGraph_node3"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<g id="a_proc~~derivative_scalar~2~~CallsGraph_node3"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="376,-24 224,-24 224,0 376,0 376,-24"/>
-<text text-anchor="middle" x="300" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
+<text text-anchor="middle" x="300" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
@@ -381,76 +381,76 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~derivative_scalar~2~~CalledByGraph Pages: 1 -->
-<svg id="procderivative_scalar2CalledByGraph" width="641pt" height="24pt"
- viewBox="0.00 0.00 641.00 23.80" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~derivative_scalar~2~~CalledByGraph" class="graph" transform="scale(1.34 1.34) rotate(0) translate(4 28)">
+<svg id="procderivative_scalar2CalledByGraph" width="641pt" height="23pt"
+ viewBox="0.00 0.00 641.00 22.94" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~derivative_scalar~2~~CalledByGraph" class="graph" transform="scale(1.39 1.39) rotate(0) translate(4 28)">
 <title>proc~~derivative_scalar~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 858,-28 858,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 890,-28 890,4 -4,4"/>
 <!-- proc~derivative_scalar~2 -->
 <g id="proc~~derivative_scalar~2~~CalledByGraph_node1" class="node">
 <title>proc~derivative_scalar~2</title>
-<polygon fill="none" stroke="black" points="854,-24 666,-24 666,0 854,0 854,-24"/>
-<text text-anchor="middle" x="760" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%derivative_scalar</text>
+<polygon fill="none" stroke="black" points="886,-24 698,-24 698,0 886,0 886,-24"/>
+<text text-anchor="middle" x="792" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%derivative_scalar</text>
 </g>
 <!-- none~derivative~2 -->
 <g id="proc~~derivative_scalar~2~~CalledByGraph_node2" class="node">
 <title>none~derivative~2</title>
-<g id="a_proc~~derivative_scalar~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~2" xlink:title="nurbs_surface%derivative">
-<polygon fill="#a7506f" stroke="#a7506f" points="630,-24 479,-24 479,0 630,0 630,-24"/>
-<text text-anchor="middle" x="554.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative</text>
+<g id="a_proc~~derivative_scalar~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative~2" xlink:title="nurbs_volume%derivative">
+<polygon fill="#a7506f" stroke="#a7506f" points="662,-24 511,-24 511,0 662,0 662,-24"/>
+<text text-anchor="middle" x="586.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative</text>
 </a>
 </g>
 </g>
 <!-- none~derivative~2&#45;&gt;proc~derivative_scalar~2 -->
 <g id="proc~~derivative_scalar~2~~CalledByGraph_edge1" class="edge">
 <title>none~derivative~2&#45;&gt;proc~derivative_scalar~2</title>
-<path fill="none" stroke="#ff0000" d="M630.12,-12C638.44,-12 647.01,-12 655.61,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="655.69,-15.5 665.69,-12 655.69,-8.5 655.69,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M662.12,-12C670.44,-12 679.01,-12 687.61,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="687.69,-15.5 697.69,-12 687.69,-8.5 687.69,-15.5"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~derivative_scalar~2~~CalledByGraph_node3" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~derivative_scalar~2~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="443,-24 311,-24 311,0 443,0 443,-24"/>
-<text text-anchor="middle" x="377" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~derivative_scalar~2~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-24 343,-24 343,0 475,0 475,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~derivative~2 -->
 <g id="proc~~derivative_scalar~2~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~derivative~2</title>
-<path fill="none" stroke="#ff0000" d="M443.35,-12C451.69,-12 460.31,-12 468.89,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="468.93,-15.5 478.93,-12 468.93,-8.5 468.93,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M475.35,-12C483.69,-12 492.31,-12 500.89,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="500.93,-15.5 510.93,-12 500.93,-8.5 500.93,-15.5"/>
 </g>
-<!-- proc~cmp_area -->
+<!-- proc~cmp_volume -->
 <g id="proc~~derivative_scalar~2~~CalledByGraph_node4" class="node">
-<title>proc~cmp_area</title>
-<g id="a_proc~~derivative_scalar~2~~CalledByGraph_node4"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="275,-24 125,-24 125,0 275,0 275,-24"/>
-<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<title>proc~cmp_volume</title>
+<g id="a_proc~~derivative_scalar~2~~CalledByGraph_node4"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-24 141,-24 141,0 307,0 307,-24"/>
+<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
 <g id="proc~~derivative_scalar~2~~CalledByGraph_edge3" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ff0000" d="M275.22,-12C283.63,-12 292.21,-12 300.63,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="300.81,-15.5 310.81,-12 300.81,-8.5 300.81,-15.5"/>
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ff0000" d="M307.13,-12C315.64,-12 324.26,-12 332.7,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="332.87,-15.5 342.87,-12 332.87,-8.5 332.87,-15.5"/>
 </g>
-<!-- program~compute_area -->
+<!-- program~compute_volume -->
 <g id="proc~~derivative_scalar~2~~CalledByGraph_node5" class="node">
-<title>program~compute_area</title>
-<g id="a_proc~~derivative_scalar~2~~CalledByGraph_node5"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-24 0,-24 0,0 89,0 89,-24"/>
-<text text-anchor="middle" x="44.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<title>program~compute_volume</title>
+<g id="a_proc~~derivative_scalar~2~~CalledByGraph_node5"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-24 0,-24 0,0 105,0 105,-24"/>
+<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;proc~cmp_area -->
+<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="proc~~derivative_scalar~2~~CalledByGraph_edge4" class="edge">
-<title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M89.08,-12C97.19,-12 105.92,-12 114.78,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="114.81,-15.5 124.81,-12 114.81,-8.5 114.81,-15.5"/>
+<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
+<path fill="none" stroke="#ff0000" d="M105.28,-12C113.39,-12 121.99,-12 130.69,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="130.93,-15.5 140.93,-12 130.93,-8.5 130.93,-15.5"/>
 </g>
 </g>
 </svg>
@@ -570,7 +570,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/derivative_scalar~3.html b/proc/derivative_scalar~3.html
index 38e5a1c4a..dbb5b713b 100644
--- a/proc/derivative_scalar~3.html
+++ b/proc/derivative_scalar~3.html
@@ -83,15 +83,15 @@ <h1>derivative_scalar
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">derivative_scalar</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine derivative_scalar(this, Xt, dTgc, Tgc, elem)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~167"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~164"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -176,12 +176,12 @@ <h3>Arguments</h3>
               <span class="anchor" id="variable-xt~67"></span>
               real(kind=rk),
             </td>
-<td>intent(in)</td>
+<td>intent(in),</td>
               <td></td>            <td>
-              
+              contiguous
             </td>
             <td>::</td>
-            <td><strong>Xt</strong></td>
+            <td><strong>Xt</strong>(:)</td>
             <td>
                 
             </td>
@@ -196,7 +196,7 @@ <h3>Arguments</h3>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>dTgc</strong>(:)</td>
+            <td><strong>dTgc</strong>(:,:)</td>
             <td>
                 
             </td>
@@ -246,46 +246,46 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~derivative_scalar~3~~CallsGraph Pages: 1 -->
-<svg id="procderivative_scalar3CallsGraph" width="364pt" height="74pt"
- viewBox="0.00 0.00 364.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procderivative_scalar3CallsGraph" width="384pt" height="74pt"
+ viewBox="0.00 0.00 384.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~derivative_scalar~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~derivative_scalar~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 360,-70 360,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 380,-70 380,4 -4,4"/>
 <!-- proc~derivative_scalar~3 -->
 <g id="proc~~derivative_scalar~3~~CallsGraph_node1" class="node">
 <title>proc~derivative_scalar~3</title>
-<polygon fill="none" stroke="black" points="178,-45 0,-45 0,-21 178,-21 178,-45"/>
-<text text-anchor="middle" x="89" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%derivative_scalar</text>
+<polygon fill="none" stroke="black" points="188,-45 0,-45 0,-21 188,-21 188,-45"/>
+<text text-anchor="middle" x="94" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%derivative_scalar</text>
 </g>
 <!-- interface~compute_dtgc~3 -->
 <g id="proc~~derivative_scalar~3~~CallsGraph_node2" class="node">
 <title>interface~compute_dtgc~3</title>
 <g id="a_proc~~derivative_scalar~3~~CallsGraph_node2"><a xlink:href="../interface/compute_dtgc~3.html" xlink:title="compute_dTgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="330.5,-66 239.5,-66 239.5,-42 330.5,-42 330.5,-66"/>
-<text text-anchor="middle" x="285" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="345.5,-66 254.5,-66 254.5,-42 345.5,-42 345.5,-66"/>
+<text text-anchor="middle" x="300" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_scalar~3&#45;&gt;interface~compute_dtgc~3 -->
 <g id="proc~~derivative_scalar~3~~CallsGraph_edge1" class="edge">
 <title>proc~derivative_scalar~3&#45;&gt;interface~compute_dtgc~3</title>
-<path fill="none" stroke="#ff0000" d="M178.2,-42.55C195.61,-44.43 213.4,-46.36 229.3,-48.08"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="229.13,-51.58 239.45,-49.18 229.89,-44.62 229.13,-51.58"/>
+<path fill="none" stroke="#ff0000" d="M188.05,-42.58C207.19,-44.55 226.76,-46.56 244.03,-48.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="244.15,-51.87 254.46,-49.41 244.87,-44.91 244.15,-51.87"/>
 </g>
 <!-- proc~is_rational~3 -->
 <g id="proc~~derivative_scalar~3~~CallsGraph_node3" class="node">
 <title>proc~is_rational~3</title>
-<g id="a_proc~~derivative_scalar~3~~CallsGraph_node3"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="356,-24 214,-24 214,0 356,0 356,-24"/>
-<text text-anchor="middle" x="285" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
+<g id="a_proc~~derivative_scalar~3~~CallsGraph_node3"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="376,-24 224,-24 224,0 376,0 376,-24"/>
+<text text-anchor="middle" x="300" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_scalar~3&#45;&gt;proc~is_rational~3 -->
 <g id="proc~~derivative_scalar~3~~CallsGraph_edge2" class="edge">
 <title>proc~derivative_scalar~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M178.2,-23.45C186.67,-22.54 195.23,-21.61 203.61,-20.7"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="204.18,-24.16 213.74,-19.61 203.42,-17.2 204.18,-24.16"/>
+<path fill="none" stroke="#ff0000" d="M188.05,-23.42C196.56,-22.55 205.16,-21.66 213.61,-20.79"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="214.23,-24.25 223.81,-19.74 213.51,-17.28 214.23,-24.25"/>
 </g>
 </g>
 </svg>
@@ -382,75 +382,75 @@ <h3 class="card-title">Called by</h3>
  -->
 <!-- Title: proc~~derivative_scalar~3~~CalledByGraph Pages: 1 -->
 <svg id="procderivative_scalar3CalledByGraph" width="641pt" height="24pt"
- viewBox="0.00 0.00 641.00 24.36" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~derivative_scalar~3~~CalledByGraph" class="graph" transform="scale(1.31 1.31) rotate(0) translate(4 28)">
+ viewBox="0.00 0.00 641.00 23.80" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~derivative_scalar~3~~CalledByGraph" class="graph" transform="scale(1.34 1.34) rotate(0) translate(4 28)">
 <title>proc~~derivative_scalar~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 838,-28 838,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 858,-28 858,4 -4,4"/>
 <!-- proc~derivative_scalar~3 -->
 <g id="proc~~derivative_scalar~3~~CalledByGraph_node1" class="node">
 <title>proc~derivative_scalar~3</title>
-<polygon fill="none" stroke="black" points="834,-24 656,-24 656,0 834,0 834,-24"/>
-<text text-anchor="middle" x="745" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%derivative_scalar</text>
+<polygon fill="none" stroke="black" points="854,-24 666,-24 666,0 854,0 854,-24"/>
+<text text-anchor="middle" x="760" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%derivative_scalar</text>
 </g>
 <!-- none~derivative~3 -->
 <g id="proc~~derivative_scalar~3~~CalledByGraph_node2" class="node">
 <title>none~derivative~3</title>
-<g id="a_proc~~derivative_scalar~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative~3" xlink:title="nurbs_curve%derivative">
-<polygon fill="#a7506f" stroke="#a7506f" points="620,-24 479,-24 479,0 620,0 620,-24"/>
-<text text-anchor="middle" x="549.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative</text>
+<g id="a_proc~~derivative_scalar~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~3" xlink:title="nurbs_surface%derivative">
+<polygon fill="#a7506f" stroke="#a7506f" points="630,-24 479,-24 479,0 630,0 630,-24"/>
+<text text-anchor="middle" x="554.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative</text>
 </a>
 </g>
 </g>
 <!-- none~derivative~3&#45;&gt;proc~derivative_scalar~3 -->
 <g id="proc~~derivative_scalar~3~~CalledByGraph_edge1" class="edge">
 <title>none~derivative~3&#45;&gt;proc~derivative_scalar~3</title>
-<path fill="none" stroke="#ff0000" d="M620.08,-12C628.42,-12 637.04,-12 645.68,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="645.82,-15.5 655.82,-12 645.82,-8.5 645.82,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M630.12,-12C638.44,-12 647.01,-12 655.61,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="655.69,-15.5 665.69,-12 655.69,-8.5 655.69,-15.5"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="proc~~derivative_scalar~3~~CalledByGraph_node3" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~derivative_scalar~3~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="443,-24 321,-24 321,0 443,0 443,-24"/>
-<text text-anchor="middle" x="382" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~derivative_scalar~3~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="443,-24 311,-24 311,0 443,0 443,-24"/>
+<text text-anchor="middle" x="377" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~derivative~3 -->
 <g id="proc~~derivative_scalar~3~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~derivative~3</title>
-<path fill="none" stroke="#ff0000" d="M443.22,-12C451.52,-12 460.15,-12 468.74,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="468.78,-15.5 478.78,-12 468.78,-8.5 468.78,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M443.35,-12C451.69,-12 460.31,-12 468.89,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="468.93,-15.5 478.93,-12 468.93,-8.5 468.93,-15.5"/>
 </g>
-<!-- proc~cmp_length -->
+<!-- proc~cmp_area -->
 <g id="proc~~derivative_scalar~3~~CalledByGraph_node4" class="node">
-<title>proc~cmp_length</title>
-<g id="a_proc~~derivative_scalar~3~~CalledByGraph_node4"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="285,-24 135,-24 135,0 285,0 285,-24"/>
-<text text-anchor="middle" x="210" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<title>proc~cmp_area</title>
+<g id="a_proc~~derivative_scalar~3~~CalledByGraph_node4"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
+<polygon fill="#d9534f" stroke="#d9534f" points="275,-24 125,-24 125,0 275,0 275,-24"/>
+<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
 <g id="proc~~derivative_scalar~3~~CalledByGraph_edge3" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#ff0000" d="M285.07,-12C293.59,-12 302.27,-12 310.74,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="310.95,-15.5 320.95,-12 310.95,-8.5 310.95,-15.5"/>
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#ff0000" d="M275.22,-12C283.63,-12 292.21,-12 300.63,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="300.81,-15.5 310.81,-12 300.81,-8.5 300.81,-15.5"/>
 </g>
-<!-- program~compute_length -->
+<!-- program~compute_area -->
 <g id="proc~~derivative_scalar~3~~CalledByGraph_node5" class="node">
-<title>program~compute_length</title>
-<g id="a_proc~~derivative_scalar~3~~CalledByGraph_node5"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-24 0,-24 0,0 99,0 99,-24"/>
-<text text-anchor="middle" x="49.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<title>program~compute_area</title>
+<g id="a_proc~~derivative_scalar~3~~CalledByGraph_node5"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-24 0,-24 0,0 89,0 89,-24"/>
+<text text-anchor="middle" x="44.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;proc~cmp_length -->
+<!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="proc~~derivative_scalar~3~~CalledByGraph_edge4" class="edge">
-<title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#ff0000" d="M99.35,-12C107.46,-12 116.06,-12 124.75,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="124.96,-15.5 134.96,-12 124.96,-8.5 124.96,-15.5"/>
+<title>program~compute_area&#45;&gt;proc~cmp_area</title>
+<path fill="none" stroke="#ff0000" d="M89.08,-12C97.19,-12 105.92,-12 114.78,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="114.81,-15.5 124.81,-12 114.81,-8.5 114.81,-15.5"/>
 </g>
 </g>
 </svg>
@@ -570,7 +570,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/derivative_vector.html b/proc/derivative_vector.html
index 015f666d2..d41713979 100644
--- a/proc/derivative_vector.html
+++ b/proc/derivative_vector.html
@@ -78,20 +78,20 @@ <h1>derivative_vector
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.6% of total for procedures.">42 statements</a>
+                 title=" 0.3% of total for procedures.">22 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">derivative_vector</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine derivative_vector(this, res1, res2, res3, Xt1, Xt2, Xt3, dTgc, Tgc)  
+    <h2>private pure subroutine derivative_vector(this, res, Xt, dTgc, Tgc)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~34"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~35"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1~2"></span>
+              <span class="anchor" id="variable-res~2"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -181,44 +181,14 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>res1</strong></td>
+            <td><strong>res</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2~2"></span>
-              integer,
-            </td>
-<td>intent(in),</td>
-              <td>optional</td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>res2</strong></td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-res3~2"></span>
-              integer,
-            </td>
-<td>intent(in),</td>
-              <td>optional</td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>res3</strong></td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-xt1~3"></span>
+              <span class="anchor" id="variable-xt~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -226,37 +196,7 @@ <h3>Arguments</h3>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>Xt1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-xt2~3"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td>optional,</td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>Xt2</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-xt3~3"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td>optional,</td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>Xt3</strong>(:)</td>
+            <td><strong>Xt</strong>(:)</td>
             <td>
                 
             </td>
@@ -271,7 +211,7 @@ <h3>Arguments</h3>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>dTgc</strong>(:,:,:)</td>
+            <td><strong>dTgc</strong>(:,:)</td>
             <td>
                 
             </td>
@@ -306,91 +246,46 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~derivative_vector~~CallsGraph Pages: 1 -->
-<svg id="procderivative_vectorCallsGraph" width="476pt" height="116pt"
- viewBox="0.00 0.00 476.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~derivative_vector~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
+<svg id="procderivative_vectorCallsGraph" width="366pt" height="74pt"
+ viewBox="0.00 0.00 366.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~derivative_vector~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~derivative_vector~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 472,-112 472,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 362,-70 362,4 -4,4"/>
 <!-- proc~derivative_vector -->
 <g id="proc~~derivative_vector~~CallsGraph_node1" class="node">
 <title>proc~derivative_vector</title>
-<polygon fill="none" stroke="black" points="190,-66 0,-66 0,-42 190,-42 190,-66"/>
-<text text-anchor="middle" x="95" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%derivative_vector</text>
+<polygon fill="none" stroke="black" points="180,-45 0,-45 0,-21 180,-21 180,-45"/>
+<text text-anchor="middle" x="90" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%derivative_vector</text>
 </g>
 <!-- interface~compute_dtgc -->
 <g id="proc~~derivative_vector~~CallsGraph_node2" class="node">
 <title>interface~compute_dtgc</title>
 <g id="a_proc~~derivative_vector~~CallsGraph_node2"><a xlink:href="../interface/compute_dtgc.html" xlink:title="compute_dTgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="347.5,-108 256.5,-108 256.5,-84 347.5,-84 347.5,-108"/>
-<text text-anchor="middle" x="302" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="332.5,-66 241.5,-66 241.5,-42 332.5,-42 332.5,-66"/>
+<text text-anchor="middle" x="287" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_vector&#45;&gt;interface~compute_dtgc -->
 <g id="proc~~derivative_vector~~CallsGraph_edge1" class="edge">
 <title>proc~derivative_vector&#45;&gt;interface~compute_dtgc</title>
-<path fill="none" stroke="#ff0000" d="M154.74,-66.04C183.51,-71.93 217.94,-78.98 246.16,-84.77"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="245.76,-88.26 256.26,-86.83 247.17,-81.4 245.76,-88.26"/>
-</g>
-<!-- interface~ndgrid -->
-<g id="proc~~derivative_vector~~CallsGraph_node3" class="node">
-<title>interface~ndgrid</title>
-<g id="a_proc~~derivative_vector~~CallsGraph_node3"><a xlink:href="../interface/ndgrid.html" xlink:title="ndgrid">
-<polygon fill="#a7506f" stroke="#a7506f" points="329,-66 275,-66 275,-42 329,-42 329,-66"/>
-<text text-anchor="middle" x="302" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid</text>
-</a>
-</g>
-</g>
-<!-- proc~derivative_vector&#45;&gt;interface~ndgrid -->
-<g id="proc~~derivative_vector~~CallsGraph_edge2" class="edge">
-<title>proc~derivative_vector&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#ff0000" d="M190.1,-54C216.45,-54 243.55,-54 264.36,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="264.64,-57.5 274.64,-54 264.64,-50.5 264.64,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M180.23,-42.61C197.58,-44.48 215.29,-46.39 231.13,-48.09"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="230.93,-51.59 241.25,-49.18 231.68,-44.63 230.93,-51.59"/>
 </g>
 <!-- proc~is_rational -->
-<g id="proc~~derivative_vector~~CallsGraph_node4" class="node">
+<g id="proc~~derivative_vector~~CallsGraph_node3" class="node">
 <title>proc~is_rational</title>
-<g id="a_proc~~derivative_vector~~CallsGraph_node4"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="378,-24 226,-24 226,0 378,0 378,-24"/>
-<text text-anchor="middle" x="302" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
+<g id="a_proc~~derivative_vector~~CallsGraph_node3"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="358,-24 216,-24 216,0 358,0 358,-24"/>
+<text text-anchor="middle" x="287" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_vector&#45;&gt;proc~is_rational -->
-<g id="proc~~derivative_vector~~CallsGraph_edge3" class="edge">
+<g id="proc~~derivative_vector~~CallsGraph_edge2" class="edge">
 <title>proc~derivative_vector&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ff0000" d="M154.74,-41.96C178.98,-37 207.23,-31.21 232.4,-26.05"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="233.15,-29.47 242.25,-24.04 231.75,-22.62 233.15,-29.47"/>
-</g>
-<!-- proc~ndgrid2 -->
-<g id="proc~~derivative_vector~~CallsGraph_node5" class="node">
-<title>proc~ndgrid2</title>
-<g id="a_proc~~derivative_vector~~CallsGraph_node5"><a xlink:href="../proc/ndgrid2.html" xlink:title="ndgrid2">
-<polygon fill="#d9534f" stroke="#d9534f" points="468,-87 414,-87 414,-63 468,-63 468,-87"/>
-<text text-anchor="middle" x="441" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid2</text>
-</a>
-</g>
-</g>
-<!-- interface~ndgrid&#45;&gt;proc~ndgrid2 -->
-<g id="proc~~derivative_vector~~CallsGraph_edge4" class="edge">
-<title>interface~ndgrid&#45;&gt;proc~ndgrid2</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M329.09,-58C350.19,-61.23 380.14,-65.82 403.6,-69.42"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="403.12,-72.89 413.54,-70.94 404.19,-65.97 403.12,-72.89"/>
-</g>
-<!-- proc~ndgrid3 -->
-<g id="proc~~derivative_vector~~CallsGraph_node6" class="node">
-<title>proc~ndgrid3</title>
-<g id="a_proc~~derivative_vector~~CallsGraph_node6"><a xlink:href="../proc/ndgrid3.html" xlink:title="ndgrid3">
-<polygon fill="#d9534f" stroke="#d9534f" points="468,-45 414,-45 414,-21 468,-21 468,-45"/>
-<text text-anchor="middle" x="441" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid3</text>
-</a>
-</g>
-</g>
-<!-- interface~ndgrid&#45;&gt;proc~ndgrid3 -->
-<g id="proc~~derivative_vector~~CallsGraph_edge5" class="edge">
-<title>interface~ndgrid&#45;&gt;proc~ndgrid3</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M329.09,-50C350.19,-46.77 380.14,-42.18 403.6,-38.58"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="404.19,-42.03 413.54,-37.06 403.12,-35.11 404.19,-42.03"/>
+<path fill="none" stroke="#ff0000" d="M180.23,-23.39C188.71,-22.48 197.28,-21.55 205.67,-20.65"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="206.24,-24.11 215.8,-19.56 205.49,-17.15 206.24,-24.11"/>
 </g>
 </g>
 </svg>
@@ -486,76 +381,76 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~derivative_vector~~CalledByGraph Pages: 1 -->
-<svg id="procderivative_vectorCalledByGraph" width="641pt" height="23pt"
- viewBox="0.00 0.00 641.00 22.89" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~derivative_vector~~CalledByGraph" class="graph" transform="scale(1.4 1.4) rotate(0) translate(4 28)">
+<svg id="procderivative_vectorCalledByGraph" width="641pt" height="24pt"
+ viewBox="0.00 0.00 641.00 24.30" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~derivative_vector~~CalledByGraph" class="graph" transform="scale(1.32 1.32) rotate(0) translate(4 28)">
 <title>proc~~derivative_vector~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 892,-28 892,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 840,-28 840,4 -4,4"/>
 <!-- proc~derivative_vector -->
 <g id="proc~~derivative_vector~~CalledByGraph_node1" class="node">
 <title>proc~derivative_vector</title>
-<polygon fill="none" stroke="black" points="888,-24 698,-24 698,0 888,0 888,-24"/>
-<text text-anchor="middle" x="793" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%derivative_vector</text>
+<polygon fill="none" stroke="black" points="836,-24 656,-24 656,0 836,0 836,-24"/>
+<text text-anchor="middle" x="746" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%derivative_vector</text>
 </g>
 <!-- none~derivative -->
 <g id="proc~~derivative_vector~~CalledByGraph_node2" class="node">
 <title>none~derivative</title>
-<g id="a_proc~~derivative_vector~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative" xlink:title="nurbs_volume%derivative">
-<polygon fill="#a7506f" stroke="#a7506f" points="662,-24 511,-24 511,0 662,0 662,-24"/>
-<text text-anchor="middle" x="586.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative</text>
+<g id="a_proc~~derivative_vector~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative" xlink:title="nurbs_curve%derivative">
+<polygon fill="#a7506f" stroke="#a7506f" points="620,-24 479,-24 479,0 620,0 620,-24"/>
+<text text-anchor="middle" x="549.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative</text>
 </a>
 </g>
 </g>
 <!-- none~derivative&#45;&gt;proc~derivative_vector -->
 <g id="proc~~derivative_vector~~CalledByGraph_edge1" class="edge">
 <title>none~derivative&#45;&gt;proc~derivative_vector</title>
-<path fill="none" stroke="#ff0000" d="M662.2,-12C670.56,-12 679.19,-12 687.84,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="687.99,-15.5 697.99,-12 687.99,-8.5 687.99,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M620.17,-12C628.47,-12 637.07,-12 645.69,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="645.8,-15.5 655.8,-12 645.8,-8.5 645.8,-15.5"/>
 </g>
 <!-- proc~ansatz -->
 <g id="proc~~derivative_vector~~CalledByGraph_node3" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~derivative_vector~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-24 343,-24 343,0 475,0 475,-24"/>
-<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~derivative_vector~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="443,-24 321,-24 321,0 443,0 443,-24"/>
+<text text-anchor="middle" x="382" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;none~derivative -->
 <g id="proc~~derivative_vector~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz&#45;&gt;none~derivative</title>
-<path fill="none" stroke="#ff0000" d="M475.35,-12C483.69,-12 492.31,-12 500.89,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="500.93,-15.5 510.93,-12 500.93,-8.5 500.93,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M443.22,-12C451.52,-12 460.15,-12 468.74,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="468.78,-15.5 478.78,-12 468.78,-8.5 468.78,-15.5"/>
 </g>
-<!-- proc~cmp_volume -->
+<!-- proc~cmp_length -->
 <g id="proc~~derivative_vector~~CalledByGraph_node4" class="node">
-<title>proc~cmp_volume</title>
-<g id="a_proc~~derivative_vector~~CalledByGraph_node4"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-24 141,-24 141,0 307,0 307,-24"/>
-<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<title>proc~cmp_length</title>
+<g id="a_proc~~derivative_vector~~CalledByGraph_node4"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
+<polygon fill="#d9534f" stroke="#d9534f" points="285,-24 135,-24 135,0 285,0 285,-24"/>
+<text text-anchor="middle" x="210" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="proc~~derivative_vector~~CalledByGraph_edge3" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.13,-12C315.64,-12 324.26,-12 332.7,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="332.87,-15.5 342.87,-12 332.87,-8.5 332.87,-15.5"/>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M285.07,-12C293.59,-12 302.27,-12 310.74,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="310.95,-15.5 320.95,-12 310.95,-8.5 310.95,-15.5"/>
 </g>
-<!-- program~compute_volume -->
+<!-- program~compute_length -->
 <g id="proc~~derivative_vector~~CalledByGraph_node5" class="node">
-<title>program~compute_volume</title>
-<g id="a_proc~~derivative_vector~~CalledByGraph_node5"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-24 0,-24 0,0 105,0 105,-24"/>
-<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<title>program~compute_length</title>
+<g id="a_proc~~derivative_vector~~CalledByGraph_node5"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-24 0,-24 0,0 99,0 99,-24"/>
+<text text-anchor="middle" x="49.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
+<!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="proc~~derivative_vector~~CalledByGraph_edge4" class="edge">
-<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#ff0000" d="M105.28,-12C113.39,-12 121.99,-12 130.69,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="130.93,-15.5 140.93,-12 130.93,-8.5 130.93,-15.5"/>
+<title>program~compute_length&#45;&gt;proc~cmp_length</title>
+<path fill="none" stroke="#ff0000" d="M99.35,-12C107.46,-12 116.06,-12 124.75,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="124.96,-15.5 134.96,-12 124.96,-8.5 124.96,-15.5"/>
 </g>
 </g>
 </svg>
@@ -675,7 +570,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/derivative_vector~2.html b/proc/derivative_vector~2.html
index 22e98af06..9b7c313e0 100644
--- a/proc/derivative_vector~2.html
+++ b/proc/derivative_vector~2.html
@@ -78,20 +78,20 @@ <h1>derivative_vector
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.5% of total for procedures.">33 statements</a>
+                 title=" 0.6% of total for procedures.">42 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">derivative_vector</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine derivative_vector(this, res1, res2, Xt1, Xt2, dTgc, Tgc)  
+    <h2>private pure subroutine derivative_vector(this, res1, res2, res3, Xt1, Xt2, Xt3, dTgc, Tgc)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~102"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~95"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1~7"></span>
+              <span class="anchor" id="variable-res1~4"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2~7"></span>
+              <span class="anchor" id="variable-res2~4"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -203,7 +203,22 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt1~8"></span>
+              <span class="anchor" id="variable-res3~2"></span>
+              integer,
+            </td>
+<td>intent(in),</td>
+              <td>optional</td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>res3</strong></td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xt1~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -218,7 +233,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt2~8"></span>
+              <span class="anchor" id="variable-xt2~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -231,6 +246,21 @@ <h3>Arguments</h3>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xt3~3"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td>optional,</td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>Xt3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-dtgc~14"></span>
@@ -248,7 +278,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-tgc~25"></span>
+              <span class="anchor" id="variable-tgc~24"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -285,7 +315,7 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~derivative_vector~2~~CallsGraph_node1" class="node">
 <title>proc~derivative_vector~2</title>
 <polygon fill="none" stroke="black" points="190,-66 0,-66 0,-42 190,-42 190,-66"/>
-<text text-anchor="middle" x="95" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%derivative_vector</text>
+<text text-anchor="middle" x="95" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%derivative_vector</text>
 </g>
 <!-- interface~compute_dtgc~2 -->
 <g id="proc~~derivative_vector~2~~CallsGraph_node2" class="node">
@@ -320,9 +350,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~is_rational~2 -->
 <g id="proc~~derivative_vector~2~~CallsGraph_node4" class="node">
 <title>proc~is_rational~2</title>
-<g id="a_proc~~derivative_vector~2~~CallsGraph_node4"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<g id="a_proc~~derivative_vector~2~~CallsGraph_node4"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="378,-24 226,-24 226,0 378,0 378,-24"/>
-<text text-anchor="middle" x="302" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
+<text text-anchor="middle" x="302" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
@@ -456,76 +486,76 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~derivative_vector~2~~CalledByGraph Pages: 1 -->
-<svg id="procderivative_vector2CalledByGraph" width="641pt" height="24pt"
- viewBox="0.00 0.00 641.00 23.74" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~derivative_vector~2~~CalledByGraph" class="graph" transform="scale(1.35 1.35) rotate(0) translate(4 28)">
+<svg id="procderivative_vector2CalledByGraph" width="641pt" height="23pt"
+ viewBox="0.00 0.00 641.00 22.89" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~derivative_vector~2~~CalledByGraph" class="graph" transform="scale(1.4 1.4) rotate(0) translate(4 28)">
 <title>proc~~derivative_vector~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 860,-28 860,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 892,-28 892,4 -4,4"/>
 <!-- proc~derivative_vector~2 -->
 <g id="proc~~derivative_vector~2~~CalledByGraph_node1" class="node">
 <title>proc~derivative_vector~2</title>
-<polygon fill="none" stroke="black" points="856,-24 666,-24 666,0 856,0 856,-24"/>
-<text text-anchor="middle" x="761" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%derivative_vector</text>
+<polygon fill="none" stroke="black" points="888,-24 698,-24 698,0 888,0 888,-24"/>
+<text text-anchor="middle" x="793" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%derivative_vector</text>
 </g>
 <!-- none~derivative~2 -->
 <g id="proc~~derivative_vector~2~~CalledByGraph_node2" class="node">
 <title>none~derivative~2</title>
-<g id="a_proc~~derivative_vector~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~2" xlink:title="nurbs_surface%derivative">
-<polygon fill="#a7506f" stroke="#a7506f" points="630,-24 479,-24 479,0 630,0 630,-24"/>
-<text text-anchor="middle" x="554.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative</text>
+<g id="a_proc~~derivative_vector~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative~2" xlink:title="nurbs_volume%derivative">
+<polygon fill="#a7506f" stroke="#a7506f" points="662,-24 511,-24 511,0 662,0 662,-24"/>
+<text text-anchor="middle" x="586.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative</text>
 </a>
 </g>
 </g>
 <!-- none~derivative~2&#45;&gt;proc~derivative_vector~2 -->
 <g id="proc~~derivative_vector~2~~CalledByGraph_edge1" class="edge">
 <title>none~derivative~2&#45;&gt;proc~derivative_vector~2</title>
-<path fill="none" stroke="#ff0000" d="M630.2,-12C638.56,-12 647.19,-12 655.84,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="655.99,-15.5 665.99,-12 655.99,-8.5 655.99,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M662.2,-12C670.56,-12 679.19,-12 687.84,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="687.99,-15.5 697.99,-12 687.99,-8.5 687.99,-15.5"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~derivative_vector~2~~CalledByGraph_node3" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~derivative_vector~2~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="443,-24 311,-24 311,0 443,0 443,-24"/>
-<text text-anchor="middle" x="377" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~derivative_vector~2~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-24 343,-24 343,0 475,0 475,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~derivative~2 -->
 <g id="proc~~derivative_vector~2~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~derivative~2</title>
-<path fill="none" stroke="#ff0000" d="M443.35,-12C451.69,-12 460.31,-12 468.89,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="468.93,-15.5 478.93,-12 468.93,-8.5 468.93,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M475.35,-12C483.69,-12 492.31,-12 500.89,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="500.93,-15.5 510.93,-12 500.93,-8.5 500.93,-15.5"/>
 </g>
-<!-- proc~cmp_area -->
+<!-- proc~cmp_volume -->
 <g id="proc~~derivative_vector~2~~CalledByGraph_node4" class="node">
-<title>proc~cmp_area</title>
-<g id="a_proc~~derivative_vector~2~~CalledByGraph_node4"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="275,-24 125,-24 125,0 275,0 275,-24"/>
-<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<title>proc~cmp_volume</title>
+<g id="a_proc~~derivative_vector~2~~CalledByGraph_node4"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-24 141,-24 141,0 307,0 307,-24"/>
+<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
 <g id="proc~~derivative_vector~2~~CalledByGraph_edge3" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ff0000" d="M275.22,-12C283.63,-12 292.21,-12 300.63,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="300.81,-15.5 310.81,-12 300.81,-8.5 300.81,-15.5"/>
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ff0000" d="M307.13,-12C315.64,-12 324.26,-12 332.7,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="332.87,-15.5 342.87,-12 332.87,-8.5 332.87,-15.5"/>
 </g>
-<!-- program~compute_area -->
+<!-- program~compute_volume -->
 <g id="proc~~derivative_vector~2~~CalledByGraph_node5" class="node">
-<title>program~compute_area</title>
-<g id="a_proc~~derivative_vector~2~~CalledByGraph_node5"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-24 0,-24 0,0 89,0 89,-24"/>
-<text text-anchor="middle" x="44.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<title>program~compute_volume</title>
+<g id="a_proc~~derivative_vector~2~~CalledByGraph_node5"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-24 0,-24 0,0 105,0 105,-24"/>
+<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;proc~cmp_area -->
+<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="proc~~derivative_vector~2~~CalledByGraph_edge4" class="edge">
-<title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M89.08,-12C97.19,-12 105.92,-12 114.78,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="114.81,-15.5 124.81,-12 114.81,-8.5 114.81,-15.5"/>
+<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
+<path fill="none" stroke="#ff0000" d="M105.28,-12C113.39,-12 121.99,-12 130.69,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="130.93,-15.5 140.93,-12 130.93,-8.5 130.93,-15.5"/>
 </g>
 </g>
 </svg>
@@ -645,7 +675,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/derivative_vector~3.html b/proc/derivative_vector~3.html
index d085b4b31..a9497c305 100644
--- a/proc/derivative_vector~3.html
+++ b/proc/derivative_vector~3.html
@@ -78,20 +78,20 @@ <h1>derivative_vector
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.3% of total for procedures.">22 statements</a>
+                 title=" 0.5% of total for procedures.">33 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">derivative_vector</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine derivative_vector(this, res, Xt, dTgc, Tgc)  
+    <h2>private pure subroutine derivative_vector(this, res1, res2, Xt1, Xt2, dTgc, Tgc)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~166"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~163"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res~2"></span>
+              <span class="anchor" id="variable-res1~8"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -181,14 +181,29 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>res</strong></td>
+            <td><strong>res1</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~66"></span>
+              <span class="anchor" id="variable-res2~8"></span>
+              integer,
+            </td>
+<td>intent(in),</td>
+              <td>optional</td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>res2</strong></td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xt1~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -196,7 +211,22 @@ <h3>Arguments</h3>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>Xt</strong>(:)</td>
+            <td><strong>Xt1</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xt2~8"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td>optional,</td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>Xt2</strong>(:)</td>
             <td>
                 
             </td>
@@ -211,7 +241,7 @@ <h3>Arguments</h3>
               allocatable
             </td>
             <td>::</td>
-            <td><strong>dTgc</strong>(:,:)</td>
+            <td><strong>dTgc</strong>(:,:,:)</td>
             <td>
                 
             </td>
@@ -246,46 +276,91 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~derivative_vector~3~~CallsGraph Pages: 1 -->
-<svg id="procderivative_vector3CallsGraph" width="366pt" height="74pt"
- viewBox="0.00 0.00 366.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~derivative_vector~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
+<svg id="procderivative_vector3CallsGraph" width="476pt" height="116pt"
+ viewBox="0.00 0.00 476.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~derivative_vector~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
 <title>proc~~derivative_vector~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 362,-70 362,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 472,-112 472,4 -4,4"/>
 <!-- proc~derivative_vector~3 -->
 <g id="proc~~derivative_vector~3~~CallsGraph_node1" class="node">
 <title>proc~derivative_vector~3</title>
-<polygon fill="none" stroke="black" points="180,-45 0,-45 0,-21 180,-21 180,-45"/>
-<text text-anchor="middle" x="90" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%derivative_vector</text>
+<polygon fill="none" stroke="black" points="190,-66 0,-66 0,-42 190,-42 190,-66"/>
+<text text-anchor="middle" x="95" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%derivative_vector</text>
 </g>
 <!-- interface~compute_dtgc~3 -->
 <g id="proc~~derivative_vector~3~~CallsGraph_node2" class="node">
 <title>interface~compute_dtgc~3</title>
 <g id="a_proc~~derivative_vector~3~~CallsGraph_node2"><a xlink:href="../interface/compute_dtgc~3.html" xlink:title="compute_dTgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="332.5,-66 241.5,-66 241.5,-42 332.5,-42 332.5,-66"/>
-<text text-anchor="middle" x="287" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="347.5,-108 256.5,-108 256.5,-84 347.5,-84 347.5,-108"/>
+<text text-anchor="middle" x="302" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_vector~3&#45;&gt;interface~compute_dtgc~3 -->
 <g id="proc~~derivative_vector~3~~CallsGraph_edge1" class="edge">
 <title>proc~derivative_vector~3&#45;&gt;interface~compute_dtgc~3</title>
-<path fill="none" stroke="#ff0000" d="M180.23,-42.61C197.58,-44.48 215.29,-46.39 231.13,-48.09"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="230.93,-51.59 241.25,-49.18 231.68,-44.63 230.93,-51.59"/>
+<path fill="none" stroke="#ff0000" d="M154.74,-66.04C183.51,-71.93 217.94,-78.98 246.16,-84.77"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="245.76,-88.26 256.26,-86.83 247.17,-81.4 245.76,-88.26"/>
 </g>
-<!-- proc~is_rational~3 -->
+<!-- interface~ndgrid -->
 <g id="proc~~derivative_vector~3~~CallsGraph_node3" class="node">
+<title>interface~ndgrid</title>
+<g id="a_proc~~derivative_vector~3~~CallsGraph_node3"><a xlink:href="../interface/ndgrid.html" xlink:title="ndgrid">
+<polygon fill="#a7506f" stroke="#a7506f" points="329,-66 275,-66 275,-42 329,-42 329,-66"/>
+<text text-anchor="middle" x="302" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid</text>
+</a>
+</g>
+</g>
+<!-- proc~derivative_vector~3&#45;&gt;interface~ndgrid -->
+<g id="proc~~derivative_vector~3~~CallsGraph_edge2" class="edge">
+<title>proc~derivative_vector~3&#45;&gt;interface~ndgrid</title>
+<path fill="none" stroke="#ff0000" d="M190.1,-54C216.45,-54 243.55,-54 264.36,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="264.64,-57.5 274.64,-54 264.64,-50.5 264.64,-57.5"/>
+</g>
+<!-- proc~is_rational~3 -->
+<g id="proc~~derivative_vector~3~~CallsGraph_node4" class="node">
 <title>proc~is_rational~3</title>
-<g id="a_proc~~derivative_vector~3~~CallsGraph_node3"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="358,-24 216,-24 216,0 358,0 358,-24"/>
-<text text-anchor="middle" x="287" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
+<g id="a_proc~~derivative_vector~3~~CallsGraph_node4"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="378,-24 226,-24 226,0 378,0 378,-24"/>
+<text text-anchor="middle" x="302" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_vector~3&#45;&gt;proc~is_rational~3 -->
-<g id="proc~~derivative_vector~3~~CallsGraph_edge2" class="edge">
+<g id="proc~~derivative_vector~3~~CallsGraph_edge3" class="edge">
 <title>proc~derivative_vector~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M180.23,-23.39C188.71,-22.48 197.28,-21.55 205.67,-20.65"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="206.24,-24.11 215.8,-19.56 205.49,-17.15 206.24,-24.11"/>
+<path fill="none" stroke="#ff0000" d="M154.74,-41.96C178.98,-37 207.23,-31.21 232.4,-26.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="233.15,-29.47 242.25,-24.04 231.75,-22.62 233.15,-29.47"/>
+</g>
+<!-- proc~ndgrid2 -->
+<g id="proc~~derivative_vector~3~~CallsGraph_node5" class="node">
+<title>proc~ndgrid2</title>
+<g id="a_proc~~derivative_vector~3~~CallsGraph_node5"><a xlink:href="../proc/ndgrid2.html" xlink:title="ndgrid2">
+<polygon fill="#d9534f" stroke="#d9534f" points="468,-87 414,-87 414,-63 468,-63 468,-87"/>
+<text text-anchor="middle" x="441" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid2</text>
+</a>
+</g>
+</g>
+<!-- interface~ndgrid&#45;&gt;proc~ndgrid2 -->
+<g id="proc~~derivative_vector~3~~CallsGraph_edge4" class="edge">
+<title>interface~ndgrid&#45;&gt;proc~ndgrid2</title>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M329.09,-58C350.19,-61.23 380.14,-65.82 403.6,-69.42"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="403.12,-72.89 413.54,-70.94 404.19,-65.97 403.12,-72.89"/>
+</g>
+<!-- proc~ndgrid3 -->
+<g id="proc~~derivative_vector~3~~CallsGraph_node6" class="node">
+<title>proc~ndgrid3</title>
+<g id="a_proc~~derivative_vector~3~~CallsGraph_node6"><a xlink:href="../proc/ndgrid3.html" xlink:title="ndgrid3">
+<polygon fill="#d9534f" stroke="#d9534f" points="468,-45 414,-45 414,-21 468,-21 468,-45"/>
+<text text-anchor="middle" x="441" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid3</text>
+</a>
+</g>
+</g>
+<!-- interface~ndgrid&#45;&gt;proc~ndgrid3 -->
+<g id="proc~~derivative_vector~3~~CallsGraph_edge5" class="edge">
+<title>interface~ndgrid&#45;&gt;proc~ndgrid3</title>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M329.09,-50C350.19,-46.77 380.14,-42.18 403.6,-38.58"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="404.19,-42.03 413.54,-37.06 403.12,-35.11 404.19,-42.03"/>
 </g>
 </g>
 </svg>
@@ -382,75 +457,75 @@ <h3 class="card-title">Called by</h3>
  -->
 <!-- Title: proc~~derivative_vector~3~~CalledByGraph Pages: 1 -->
 <svg id="procderivative_vector3CalledByGraph" width="641pt" height="24pt"
- viewBox="0.00 0.00 641.00 24.30" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~derivative_vector~3~~CalledByGraph" class="graph" transform="scale(1.32 1.32) rotate(0) translate(4 28)">
+ viewBox="0.00 0.00 641.00 23.74" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~derivative_vector~3~~CalledByGraph" class="graph" transform="scale(1.35 1.35) rotate(0) translate(4 28)">
 <title>proc~~derivative_vector~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 840,-28 840,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 860,-28 860,4 -4,4"/>
 <!-- proc~derivative_vector~3 -->
 <g id="proc~~derivative_vector~3~~CalledByGraph_node1" class="node">
 <title>proc~derivative_vector~3</title>
-<polygon fill="none" stroke="black" points="836,-24 656,-24 656,0 836,0 836,-24"/>
-<text text-anchor="middle" x="746" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%derivative_vector</text>
+<polygon fill="none" stroke="black" points="856,-24 666,-24 666,0 856,0 856,-24"/>
+<text text-anchor="middle" x="761" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%derivative_vector</text>
 </g>
 <!-- none~derivative~3 -->
 <g id="proc~~derivative_vector~3~~CalledByGraph_node2" class="node">
 <title>none~derivative~3</title>
-<g id="a_proc~~derivative_vector~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative~3" xlink:title="nurbs_curve%derivative">
-<polygon fill="#a7506f" stroke="#a7506f" points="620,-24 479,-24 479,0 620,0 620,-24"/>
-<text text-anchor="middle" x="549.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative</text>
+<g id="a_proc~~derivative_vector~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~3" xlink:title="nurbs_surface%derivative">
+<polygon fill="#a7506f" stroke="#a7506f" points="630,-24 479,-24 479,0 630,0 630,-24"/>
+<text text-anchor="middle" x="554.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative</text>
 </a>
 </g>
 </g>
 <!-- none~derivative~3&#45;&gt;proc~derivative_vector~3 -->
 <g id="proc~~derivative_vector~3~~CalledByGraph_edge1" class="edge">
 <title>none~derivative~3&#45;&gt;proc~derivative_vector~3</title>
-<path fill="none" stroke="#ff0000" d="M620.17,-12C628.47,-12 637.07,-12 645.69,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="645.8,-15.5 655.8,-12 645.8,-8.5 645.8,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M630.2,-12C638.56,-12 647.19,-12 655.84,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="655.99,-15.5 665.99,-12 655.99,-8.5 655.99,-15.5"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="proc~~derivative_vector~3~~CalledByGraph_node3" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~derivative_vector~3~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="443,-24 321,-24 321,0 443,0 443,-24"/>
-<text text-anchor="middle" x="382" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~derivative_vector~3~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="443,-24 311,-24 311,0 443,0 443,-24"/>
+<text text-anchor="middle" x="377" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~derivative~3 -->
 <g id="proc~~derivative_vector~3~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~derivative~3</title>
-<path fill="none" stroke="#ff0000" d="M443.22,-12C451.52,-12 460.15,-12 468.74,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="468.78,-15.5 478.78,-12 468.78,-8.5 468.78,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M443.35,-12C451.69,-12 460.31,-12 468.89,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="468.93,-15.5 478.93,-12 468.93,-8.5 468.93,-15.5"/>
 </g>
-<!-- proc~cmp_length -->
+<!-- proc~cmp_area -->
 <g id="proc~~derivative_vector~3~~CalledByGraph_node4" class="node">
-<title>proc~cmp_length</title>
-<g id="a_proc~~derivative_vector~3~~CalledByGraph_node4"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="285,-24 135,-24 135,0 285,0 285,-24"/>
-<text text-anchor="middle" x="210" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<title>proc~cmp_area</title>
+<g id="a_proc~~derivative_vector~3~~CalledByGraph_node4"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
+<polygon fill="#d9534f" stroke="#d9534f" points="275,-24 125,-24 125,0 275,0 275,-24"/>
+<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
 <g id="proc~~derivative_vector~3~~CalledByGraph_edge3" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#ff0000" d="M285.07,-12C293.59,-12 302.27,-12 310.74,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="310.95,-15.5 320.95,-12 310.95,-8.5 310.95,-15.5"/>
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#ff0000" d="M275.22,-12C283.63,-12 292.21,-12 300.63,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="300.81,-15.5 310.81,-12 300.81,-8.5 300.81,-15.5"/>
 </g>
-<!-- program~compute_length -->
+<!-- program~compute_area -->
 <g id="proc~~derivative_vector~3~~CalledByGraph_node5" class="node">
-<title>program~compute_length</title>
-<g id="a_proc~~derivative_vector~3~~CalledByGraph_node5"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-24 0,-24 0,0 99,0 99,-24"/>
-<text text-anchor="middle" x="49.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<title>program~compute_area</title>
+<g id="a_proc~~derivative_vector~3~~CalledByGraph_node5"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-24 0,-24 0,0 89,0 89,-24"/>
+<text text-anchor="middle" x="44.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;proc~cmp_length -->
+<!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="proc~~derivative_vector~3~~CalledByGraph_edge4" class="edge">
-<title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#ff0000" d="M99.35,-12C107.46,-12 116.06,-12 124.75,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="124.96,-15.5 134.96,-12 124.96,-8.5 124.96,-15.5"/>
+<title>program~compute_area&#45;&gt;proc~cmp_area</title>
+<path fill="none" stroke="#ff0000" d="M89.08,-12C97.19,-12 105.92,-12 114.78,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="114.81,-15.5 124.81,-12 114.81,-8.5 114.81,-15.5"/>
 </g>
 </g>
 </svg>
@@ -570,7 +645,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/det.html b/proc/det.html
index 6d4e1192b..fb5804f5e 100644
--- a/proc/det.html
+++ b/proc/det.html
@@ -202,18 +202,18 @@ <h3 class="card-title">Called by</h3>
 <polygon fill="none" stroke="black" points="699,-79 645,-79 645,-55 699,-55 699,-79"/>
 <text text-anchor="middle" x="672" y="-64.6" font-family="Helvetica,sans-Serif" font-size="10.50">det</text>
 </g>
-<!-- proc~ansatz -->
+<!-- proc~ansatz~2 -->
 <g id="proc~~det~~CalledByGraph_node2" class="node">
-<title>proc~ansatz</title>
-<g id="a_proc~~det~~CalledByGraph_node2"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
+<title>proc~ansatz~2</title>
+<g id="a_proc~~det~~CalledByGraph_node2"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="497,-24 365,-24 365,0 497,0 497,-24"/>
 <text text-anchor="middle" x="431" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;proc~det -->
+<!-- proc~ansatz~2&#45;&gt;proc~det -->
 <g id="proc~~det~~CalledByGraph_edge1" class="edge">
-<title>proc~ansatz&#45;&gt;proc~det</title>
+<title>proc~ansatz~2&#45;&gt;proc~det</title>
 <path fill="none" stroke="#ff0000" d="M497.21,-22.33C530.85,-28.21 572.39,-36.33 609,-46 617.61,-48.27 626.75,-51.12 635.3,-53.98"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="634.4,-57.37 645,-57.31 636.67,-50.75 634.4,-57.37"/>
 </g>
@@ -226,30 +226,30 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;proc~inv -->
+<!-- proc~ansatz~2&#45;&gt;proc~inv -->
 <g id="proc~~det~~CalledByGraph_edge6" class="edge">
-<title>proc~ansatz&#45;&gt;proc~inv</title>
+<title>proc~ansatz~2&#45;&gt;proc~inv</title>
 <path fill="none" stroke="#0000ff" d="M491.15,-24.04C500.59,-26.6 510.16,-29.58 519,-33 530.69,-37.52 542.91,-43.85 553.39,-49.81"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="551.69,-52.88 562.09,-54.91 555.23,-46.84 551.69,-52.88"/>
 </g>
-<!-- proc~ansatz~2 -->
+<!-- proc~ansatz~3 -->
 <g id="proc~~det~~CalledByGraph_node3" class="node">
-<title>proc~ansatz~2</title>
-<g id="a_proc~~det~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
+<title>proc~ansatz~3</title>
+<g id="a_proc~~det~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="497,-150 365,-150 365,-126 497,-126 497,-150"/>
 <text text-anchor="middle" x="431" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;proc~det -->
+<!-- proc~ansatz~3&#45;&gt;proc~det -->
 <g id="proc~~det~~CalledByGraph_edge2" class="edge">
-<title>proc~ansatz~2&#45;&gt;proc~det</title>
+<title>proc~ansatz~3&#45;&gt;proc~det</title>
 <path fill="none" stroke="#ff0000" d="M497.11,-132.26C531.28,-127.76 573.34,-119.84 609,-106 622.47,-100.77 636.2,-92.5 647.3,-84.92"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="649.44,-87.69 655.58,-79.06 645.4,-81.98 649.44,-87.69"/>
 </g>
-<!-- proc~ansatz~2&#45;&gt;proc~inv -->
+<!-- proc~ansatz~3&#45;&gt;proc~inv -->
 <g id="proc~~det~~CalledByGraph_edge7" class="edge">
-<title>proc~ansatz~2&#45;&gt;proc~inv</title>
+<title>proc~ansatz~3&#45;&gt;proc~inv</title>
 <path fill="none" stroke="#0000ff" d="M496.34,-125.91C504.16,-123.44 511.89,-120.5 519,-117 534.92,-109.15 550.47,-96.6 562.01,-86.04"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="564.46,-88.54 569.32,-79.13 559.65,-83.46 564.46,-88.54"/>
 </g>
@@ -274,9 +274,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
 <g id="proc~~det~~CalledByGraph_edge5" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
 <path fill="none" stroke="#00ff00" d="M299.01,-138C317.12,-138 336.51,-138 354.68,-138"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="354.93,-141.5 364.93,-138 354.93,-134.5 354.93,-141.5"/>
 </g>
@@ -289,39 +289,39 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
 <g id="proc~~det~~CalledByGraph_edge4" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
 <path fill="none" stroke="#ff0000" d="M307.2,-12C322.92,-12 339.3,-12 354.78,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="354.81,-15.5 364.81,-12 354.81,-8.5 354.81,-15.5"/>
 </g>
-<!-- proc~nearest_point2 -->
+<!-- proc~nearest_point2~2 -->
 <g id="proc~~det~~CalledByGraph_node7" class="node">
-<title>proc~nearest_point2</title>
-<g id="a_proc~~det~~CalledByGraph_node7"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_volume%nearest_point2">
+<title>proc~nearest_point2~2</title>
+<g id="a_proc~~det~~CalledByGraph_node7"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_volume%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="519,-108 343,-108 343,-84 519,-84 519,-108"/>
 <text text-anchor="middle" x="431" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2&#45;&gt;proc~inv -->
+<!-- proc~nearest_point2~2&#45;&gt;proc~inv -->
 <g id="proc~~det~~CalledByGraph_edge9" class="edge">
-<title>proc~nearest_point2&#45;&gt;proc~inv</title>
+<title>proc~nearest_point2~2&#45;&gt;proc~inv</title>
 <path fill="none" stroke="#0000ff" d="M493.89,-83.95C511.18,-80.59 529.39,-77.05 544.67,-74.07"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="545.58,-77.46 554.73,-72.11 544.24,-70.59 545.58,-77.46"/>
 </g>
-<!-- proc~nearest_point2~2 -->
+<!-- proc~nearest_point2~3 -->
 <g id="proc~~det~~CalledByGraph_node8" class="node">
-<title>proc~nearest_point2~2</title>
-<g id="a_proc~~det~~CalledByGraph_node8"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_surface%nearest_point2">
+<title>proc~nearest_point2~3</title>
+<g id="a_proc~~det~~CalledByGraph_node8"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_surface%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="519,-66 343,-66 343,-42 519,-42 519,-66"/>
 <text text-anchor="middle" x="431" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2~2&#45;&gt;proc~inv -->
+<!-- proc~nearest_point2~3&#45;&gt;proc~inv -->
 <g id="proc~~det~~CalledByGraph_edge10" class="edge">
-<title>proc~nearest_point2~2&#45;&gt;proc~inv</title>
+<title>proc~nearest_point2~3&#45;&gt;proc~inv</title>
 <path fill="none" stroke="#0000ff" d="M519.11,-61.6C528.14,-62.39 536.92,-63.15 544.89,-63.85"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="544.59,-67.34 554.86,-64.72 545.2,-60.36 544.59,-67.34"/>
 </g>
@@ -364,9 +364,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
 <g id="proc~~det~~CalledByGraph_edge14" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
 <path fill="none" stroke="#7f00ff" d="M275.67,-54C292.94,-54 312.87,-54 332.55,-54"/>
 <polygon fill="#7f00ff" stroke="#7f00ff" points="332.8,-57.5 342.8,-54 332.8,-50.5 332.8,-57.5"/>
 </g>
@@ -379,9 +379,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
 <g id="proc~~det~~CalledByGraph_edge13" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
 <path fill="none" stroke="#00ffff" d="M275.67,-96C292.94,-96 312.87,-96 332.55,-96"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="332.8,-99.5 342.8,-96 332.8,-92.5 332.8,-99.5"/>
 </g>
@@ -503,7 +503,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/dyad_t1_t1.html b/proc/dyad_t1_t1.html
index 7801d4d92..bedeea05e 100644
--- a/proc/dyad_t1_t1.html
+++ b/proc/dyad_t1_t1.html
@@ -232,18 +232,18 @@ <h3 class="card-title">Called by</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M533.23,-12C541.13,-12 550.03,-12 558.76,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="558.87,-15.5 568.87,-12 558.87,-8.5 558.87,-15.5"/>
 </g>
-<!-- proc~ansatz~3 -->
+<!-- proc~ansatz -->
 <g id="proc~~dyad_t1_t1~~CalledByGraph_node3" class="node">
-<title>proc~ansatz~3</title>
-<g id="a_proc~~dyad_t1_t1~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
+<title>proc~ansatz</title>
+<g id="a_proc~~dyad_t1_t1~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="443,-24 321,-24 321,0 443,0 443,-24"/>
 <text text-anchor="middle" x="382" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;interface~dyad -->
+<!-- proc~ansatz&#45;&gt;interface~dyad -->
 <g id="proc~~dyad_t1_t1~~CalledByGraph_edge2" class="edge">
-<title>proc~ansatz~3&#45;&gt;interface~dyad</title>
+<title>proc~ansatz&#45;&gt;interface~dyad</title>
 <path fill="none" stroke="#ff0000" d="M443.29,-12C451.97,-12 460.67,-12 468.69,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="468.77,-15.5 478.77,-12 468.77,-8.5 468.77,-15.5"/>
 </g>
@@ -256,9 +256,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="proc~~dyad_t1_t1~~CalledByGraph_edge3" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
 <path fill="none" stroke="#ff0000" d="M285.07,-12C293.59,-12 302.27,-12 310.74,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="310.95,-15.5 320.95,-12 310.95,-8.5 310.95,-15.5"/>
 </g>
@@ -395,7 +395,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/elevate_degree.html b/proc/elevate_degree.html
index ea476a707..b84df19ba 100644
--- a/proc/elevate_degree.html
+++ b/proc/elevate_degree.html
@@ -78,20 +78,20 @@ <h1>elevate_degree
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 1.5% of total for procedures.">105 statements</a>
+                 title=" 0.4% of total for procedures.">28 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">elevate_degree</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine elevate_degree(this, dir, t)  
+    <h2>private pure subroutine elevate_degree(this, t)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~41"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~34"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -171,21 +171,6 @@ <h3>Arguments</h3>
                 
             </td>
         </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-dir~14"></span>
-              integer,
-            </td>
-<td>intent(in)</td>
-              <td></td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>dir</strong></td>
-            <td>
-                
-            </td>
-        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-t"></span>
@@ -216,325 +201,289 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~elevate_degree~~CallsGraph Pages: 1 -->
-<svg id="procelevate_degreeCallsGraph" width="641pt" height="158pt"
- viewBox="0.00 0.00 641.00 158.41" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~elevate_degree~~CallsGraph" class="graph" transform="scale(2.03 2.03) rotate(0) translate(4 318)">
+<svg id="procelevate_degreeCallsGraph" width="641pt" height="147pt"
+ viewBox="0.00 0.00 641.00 146.96" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~elevate_degree~~CallsGraph" class="graph" transform="scale(1.92 1.92) rotate(0) translate(4 278)">
 <title>proc~~elevate_degree~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-318 1299,-318 1299,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-278 1226,-278 1226,4 -4,4"/>
 <!-- proc~elevate_degree -->
 <g id="proc~~elevate_degree~~CallsGraph_node1" class="node">
 <title>proc~elevate_degree</title>
-<polygon fill="none" stroke="black" points="180,-167 0,-167 0,-143 180,-143 180,-167"/>
-<text text-anchor="middle" x="90" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%elevate_degree</text>
+<polygon fill="none" stroke="black" points="170,-66 0,-66 0,-42 170,-42 170,-66"/>
+<text text-anchor="middle" x="85" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%elevate_degree</text>
 </g>
-<!-- none~get_knot -->
+<!-- none~set -->
 <g id="proc~~elevate_degree~~CallsGraph_node2" class="node">
-<title>none~get_knot</title>
-<g id="a_proc~~elevate_degree~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot" xlink:title="nurbs_volume%get_knot">
-<polygon fill="#a7506f" stroke="#a7506f" points="359,-272 216,-272 216,-248 359,-248 359,-272"/>
-<text text-anchor="middle" x="287.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot</text>
+<title>none~set</title>
+<g id="a_proc~~elevate_degree~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="328.5,-169 225.5,-169 225.5,-145 328.5,-145 328.5,-169"/>
+<text text-anchor="middle" x="277" y="-154.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
-<!-- proc~elevate_degree&#45;&gt;none~get_knot -->
+<!-- proc~elevate_degree&#45;&gt;none~set -->
 <g id="proc~~elevate_degree~~CallsGraph_edge1" class="edge">
-<title>proc~elevate_degree&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0000" d="M113.43,-167.04C148.25,-185.75 215.42,-221.82 255.06,-243.12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="253.57,-246.29 264.03,-247.93 256.88,-240.12 253.57,-246.29"/>
+<title>proc~elevate_degree&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M108.17,-66.02C141.83,-84.26 205.98,-119.04 244.48,-139.91"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="243.22,-143.21 253.68,-144.9 246.56,-137.06 243.22,-143.21"/>
 </g>
-<!-- none~set -->
+<!-- proc~elevate_degree_a_5_9 -->
 <g id="proc~~elevate_degree~~CallsGraph_node3" class="node">
-<title>none~set</title>
-<g id="a_proc~~elevate_degree~~CallsGraph_node3"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="344,-167 231,-167 231,-143 344,-143 344,-167"/>
-<text text-anchor="middle" x="287.5" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<title>proc~elevate_degree_a_5_9</title>
+<g id="a_proc~~elevate_degree~~CallsGraph_node3"><a xlink:href="../proc/elevate_degree_a_5_9.html" xlink:title="elevate_degree_A_5_9">
+<polygon fill="#d9534f" stroke="#d9534f" points="343,-66 211,-66 211,-42 343,-42 343,-66"/>
+<text text-anchor="middle" x="277" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elevate_degree_A_5_9</text>
 </a>
 </g>
 </g>
-<!-- proc~elevate_degree&#45;&gt;none~set -->
+<!-- proc~elevate_degree&#45;&gt;proc~elevate_degree_a_5_9 -->
 <g id="proc~~elevate_degree~~CallsGraph_edge2" class="edge">
-<title>proc~elevate_degree&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M180.17,-155C193.76,-155 207.57,-155 220.54,-155"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="220.74,-158.5 230.74,-155 220.74,-151.5 220.74,-158.5"/>
+<title>proc~elevate_degree&#45;&gt;proc~elevate_degree_a_5_9</title>
+<path fill="none" stroke="#ff0000" d="M170.17,-54C180.26,-54 190.52,-54 200.48,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="200.73,-57.5 210.73,-54 200.73,-50.5 200.73,-57.5"/>
 </g>
-<!-- proc~elevate_degree_a_5_9 -->
+<!-- proc~is_rational -->
 <g id="proc~~elevate_degree~~CallsGraph_node4" class="node">
-<title>proc~elevate_degree_a_5_9</title>
-<g id="a_proc~~elevate_degree~~CallsGraph_node4"><a xlink:href="../proc/elevate_degree_a_5_9.html" xlink:title="elevate_degree_A_5_9">
-<polygon fill="#d9534f" stroke="#d9534f" points="353.5,-64 221.5,-64 221.5,-40 353.5,-40 353.5,-64"/>
-<text text-anchor="middle" x="287.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elevate_degree_A_5_9</text>
+<title>proc~is_rational</title>
+<g id="a_proc~~elevate_degree~~CallsGraph_node4"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="348,-24 206,-24 206,0 348,0 348,-24"/>
+<text text-anchor="middle" x="277" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~elevate_degree&#45;&gt;proc~elevate_degree_a_5_9 -->
+<!-- proc~elevate_degree&#45;&gt;proc~is_rational -->
 <g id="proc~~elevate_degree~~CallsGraph_edge3" class="edge">
-<title>proc~elevate_degree&#45;&gt;proc~elevate_degree_a_5_9</title>
-<path fill="none" stroke="#ff0000" d="M113.81,-142.98C148.59,-124.66 215.01,-89.67 254.57,-68.82"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="256.32,-71.86 263.53,-64.1 253.06,-65.66 256.32,-71.86"/>
+<title>proc~elevate_degree&#45;&gt;proc~is_rational</title>
+<path fill="none" stroke="#ff0000" d="M140.45,-41.96C162.61,-37.07 188.39,-31.37 211.49,-26.26"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="212.54,-29.61 221.55,-24.04 211.03,-22.78 212.54,-29.61"/>
 </g>
-<!-- proc~get_knot_all -->
+<!-- proc~set1 -->
 <g id="proc~~elevate_degree~~CallsGraph_node7" class="node">
-<title>proc~get_knot_all</title>
-<g id="a_proc~~elevate_degree~~CallsGraph_node7"><a xlink:href="../proc/get_knot_all.html" xlink:title="nurbs_volume%get_knot_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="556,-314 395,-314 395,-290 556,-290 556,-314"/>
-<text text-anchor="middle" x="475.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot_all</text>
+<title>proc~set1</title>
+<g id="a_proc~~elevate_degree~~CallsGraph_node7"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="497.5,-274 387.5,-274 387.5,-250 497.5,-250 497.5,-274"/>
+<text text-anchor="middle" x="442.5" y="-259.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
-<!-- none~get_knot&#45;&gt;proc~get_knot_all -->
+<!-- none~set&#45;&gt;proc~set1 -->
 <g id="proc~~elevate_degree~~CallsGraph_edge4" class="edge">
-<title>none~get_knot&#45;&gt;proc~get_knot_all</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M341.8,-272.04C363.49,-276.93 388.74,-282.63 411.35,-287.74"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="410.67,-291.17 421.19,-289.96 412.21,-284.35 410.67,-291.17"/>
+<title>none~set&#45;&gt;proc~set1</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M290.41,-169.06C309.28,-186.85 346.91,-220.25 384,-241 387.06,-242.71 390.29,-244.33 393.59,-245.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="392.43,-249.17 403,-249.89 395.19,-242.73 392.43,-249.17"/>
 </g>
-<!-- proc~get_knoti -->
+<!-- proc~set1a -->
 <g id="proc~~elevate_degree~~CallsGraph_node8" class="node">
-<title>proc~get_knoti</title>
-<g id="a_proc~~elevate_degree~~CallsGraph_node8"><a xlink:href="../proc/get_knoti.html" xlink:title="nurbs_volume%get_knoti">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="548.5,-272 402.5,-272 402.5,-248 548.5,-248 548.5,-272"/>
-<text text-anchor="middle" x="475.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knoti</text>
+<title>proc~set1a</title>
+<g id="a_proc~~elevate_degree~~CallsGraph_node8"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="501,-232 384,-232 384,-208 501,-208 501,-232"/>
+<text text-anchor="middle" x="442.5" y="-217.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
 </a>
 </g>
 </g>
-<!-- none~get_knot&#45;&gt;proc~get_knoti -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="proc~~elevate_degree~~CallsGraph_edge5" class="edge">
-<title>none~get_knot&#45;&gt;proc~get_knoti</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M359.08,-260C369.94,-260 381.23,-260 392.32,-260"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="392.42,-263.5 402.42,-260 392.42,-256.5 392.42,-263.5"/>
-</g>
-<!-- proc~set1 -->
-<g id="proc~~elevate_degree~~CallsGraph_node9" class="node">
-<title>proc~set1</title>
-<g id="a_proc~~elevate_degree~~CallsGraph_node9"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="535.5,-188 415.5,-188 415.5,-164 535.5,-164 535.5,-188"/>
-<text text-anchor="middle" x="475.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
-</a>
-</g>
-</g>
-<!-- none~set&#45;&gt;proc~set1 -->
-<g id="proc~~elevate_degree~~CallsGraph_edge6" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M344.05,-161.27C363.28,-163.44 385.08,-165.9 405.27,-168.18"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="405.02,-171.68 415.35,-169.32 405.81,-164.72 405.02,-171.68"/>
+<title>none~set&#45;&gt;proc~set1a</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M308.07,-169.17C329.24,-177.67 358.29,-189.21 384,-199 388.72,-200.8 393.67,-202.65 398.6,-204.48"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="397.4,-207.77 408,-207.94 399.82,-201.2 397.4,-207.77"/>
 </g>
 <!-- proc~set2 -->
-<g id="proc~~elevate_degree~~CallsGraph_node10" class="node">
+<g id="proc~~elevate_degree~~CallsGraph_node9" class="node">
 <title>proc~set2</title>
-<g id="a_proc~~elevate_degree~~CallsGraph_node10"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="535.5,-146 415.5,-146 415.5,-122 535.5,-122 535.5,-146"/>
-<text text-anchor="middle" x="475.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
+<g id="a_proc~~elevate_degree~~CallsGraph_node9"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="497.5,-148 387.5,-148 387.5,-124 497.5,-124 497.5,-148"/>
+<text text-anchor="middle" x="442.5" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set2 -->
-<g id="proc~~elevate_degree~~CallsGraph_edge7" class="edge">
+<g id="proc~~elevate_degree~~CallsGraph_edge6" class="edge">
 <title>none~set&#45;&gt;proc~set2</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M344.05,-148.73C363.28,-146.56 385.08,-144.1 405.27,-141.82"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="405.81,-145.28 415.35,-140.68 405.02,-138.32 405.81,-145.28"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M328.84,-150.47C344.06,-148.51 360.97,-146.34 376.95,-144.29"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="377.82,-147.71 387.29,-142.96 376.93,-140.76 377.82,-147.71"/>
 </g>
 <!-- proc~set3 -->
-<g id="proc~~elevate_degree~~CallsGraph_node11" class="node">
+<g id="proc~~elevate_degree~~CallsGraph_node10" class="node">
 <title>proc~set3</title>
-<g id="a_proc~~elevate_degree~~CallsGraph_node11"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="535.5,-230 415.5,-230 415.5,-206 535.5,-206 535.5,-230"/>
-<text text-anchor="middle" x="475.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
+<g id="a_proc~~elevate_degree~~CallsGraph_node10"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="497.5,-190 387.5,-190 387.5,-166 497.5,-166 497.5,-190"/>
+<text text-anchor="middle" x="442.5" y="-175.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set3 -->
-<g id="proc~~elevate_degree~~CallsGraph_edge8" class="edge">
+<g id="proc~~elevate_degree~~CallsGraph_edge7" class="edge">
 <title>none~set&#45;&gt;proc~set3</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M316.65,-167.15C337.93,-176.07 367.99,-188.14 395,-197 401.47,-199.12 408.29,-201.18 415.1,-203.13"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="414.47,-206.59 425.04,-205.9 416.35,-199.84 414.47,-206.59"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M328.84,-163.53C344.06,-165.49 360.97,-167.66 376.95,-169.71"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="376.93,-173.24 387.29,-171.04 377.82,-166.29 376.93,-173.24"/>
 </g>
 <!-- proc~set4 -->
-<g id="proc~~elevate_degree~~CallsGraph_node12" class="node">
+<g id="proc~~elevate_degree~~CallsGraph_node11" class="node">
 <title>proc~set4</title>
-<g id="a_proc~~elevate_degree~~CallsGraph_node12"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="535.5,-104 415.5,-104 415.5,-80 535.5,-80 535.5,-104"/>
-<text text-anchor="middle" x="475.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
+<g id="a_proc~~elevate_degree~~CallsGraph_node11"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="497.5,-106 387.5,-106 387.5,-82 497.5,-82 497.5,-106"/>
+<text text-anchor="middle" x="442.5" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set4 -->
-<g id="proc~~elevate_degree~~CallsGraph_edge9" class="edge">
+<g id="proc~~elevate_degree~~CallsGraph_edge8" class="edge">
 <title>none~set&#45;&gt;proc~set4</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M316.65,-142.85C337.93,-133.93 367.99,-121.86 395,-113 401.47,-110.88 408.29,-108.82 415.1,-106.87"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="416.35,-110.16 425.04,-104.1 414.47,-103.41 416.35,-110.16"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M308.07,-144.83C329.24,-136.33 358.29,-124.79 384,-115 388.72,-113.2 393.67,-111.35 398.6,-109.52"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="399.82,-112.8 408,-106.06 397.4,-106.23 399.82,-112.8"/>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~elevate_degree~~CallsGraph_node5" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~elevate_degree~~CallsGraph_node5"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1129,-167 1005,-167 1005,-143 1129,-143 1129,-167"/>
-<text text-anchor="middle" x="1067" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1056,-128 932,-128 932,-104 1056,-104 1056,-128"/>
+<text text-anchor="middle" x="994" y="-113.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree_a_5_9&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~elevate_degree~~CallsGraph_edge10" class="edge">
+<g id="proc~~elevate_degree~~CallsGraph_edge9" class="edge">
 <title>proc~elevate_degree_a_5_9&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#0000ff" d="M353.87,-45C477.56,-34.08 752.84,-21 969,-92 997.62,-101.4 1026.01,-121.42 1044.61,-136.38"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="1042.49,-139.17 1052.43,-142.85 1046.95,-133.78 1042.49,-139.17"/>
+<path fill="none" stroke="#00ff00" d="M343.38,-59.53C387.83,-63.3 447.97,-68.42 501,-73 650.6,-85.91 825.75,-101.28 921.5,-109.7"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="921.37,-113.2 931.64,-110.59 921.99,-106.23 921.37,-113.2"/>
 </g>
 <!-- proc~bincoeff -->
 <g id="proc~~elevate_degree~~CallsGraph_node6" class="node">
 <title>proc~bincoeff</title>
 <g id="a_proc~~elevate_degree~~CallsGraph_node6"><a xlink:href="../proc/bincoeff.html" xlink:title="bincoeff">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="503.5,-24 447.5,-24 447.5,0 503.5,0 503.5,-24"/>
-<text text-anchor="middle" x="475.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">bincoeff</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="470.5,-26 414.5,-26 414.5,-2 470.5,-2 470.5,-26"/>
+<text text-anchor="middle" x="442.5" y="-11.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">bincoeff</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree_a_5_9&#45;&gt;proc~bincoeff -->
-<g id="proc~~elevate_degree~~CallsGraph_edge11" class="edge">
+<g id="proc~~elevate_degree~~CallsGraph_edge10" class="edge">
 <title>proc~elevate_degree_a_5_9&#45;&gt;proc~bincoeff</title>
-<path fill="none" stroke="#0000ff" d="M344.31,-40C374.44,-33.52 410.81,-25.7 437.45,-19.97"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="438.46,-23.33 447.5,-17.81 436.99,-16.49 438.46,-23.33"/>
+<path fill="none" stroke="#00ff00" d="M327.06,-42C351.85,-35.93 381.45,-28.69 404.34,-23.09"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="405.46,-26.42 414.34,-20.64 403.8,-19.62 405.46,-26.42"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
-<g id="proc~~elevate_degree~~CallsGraph_node16" class="node">
+<g id="proc~~elevate_degree~~CallsGraph_node14" class="node">
 <title>proc~compute_multiplicity1</title>
-<g id="a_proc~~elevate_degree~~CallsGraph_node16"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1295,-188 1165,-188 1165,-164 1295,-164 1295,-188"/>
-<text text-anchor="middle" x="1230" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<g id="a_proc~~elevate_degree~~CallsGraph_node14"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1222,-149 1092,-149 1092,-125 1222,-125 1222,-149"/>
+<text text-anchor="middle" x="1157" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
-<g id="proc~~elevate_degree~~CallsGraph_edge12" class="edge">
+<g id="proc~~elevate_degree~~CallsGraph_edge11" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1129.33,-163C1137.69,-164.09 1146.35,-165.22 1154.92,-166.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1154.53,-169.82 1164.9,-167.64 1155.44,-162.88 1154.53,-169.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1056.33,-124C1064.69,-125.09 1073.35,-126.22 1081.92,-127.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1081.53,-130.82 1091.9,-128.64 1082.44,-123.88 1081.53,-130.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
-<g id="proc~~elevate_degree~~CallsGraph_node17" class="node">
+<g id="proc~~elevate_degree~~CallsGraph_node15" class="node">
 <title>proc~compute_multiplicity2</title>
-<g id="a_proc~~elevate_degree~~CallsGraph_node17"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1295,-146 1165,-146 1165,-122 1295,-122 1295,-146"/>
-<text text-anchor="middle" x="1230" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<g id="a_proc~~elevate_degree~~CallsGraph_node15"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1222,-107 1092,-107 1092,-83 1222,-83 1222,-107"/>
+<text text-anchor="middle" x="1157" y="-92.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
-<g id="proc~~elevate_degree~~CallsGraph_edge13" class="edge">
+<g id="proc~~elevate_degree~~CallsGraph_edge12" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1129.33,-147C1137.69,-145.91 1146.35,-144.78 1154.92,-143.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1155.44,-147.12 1164.9,-142.36 1154.53,-140.18 1155.44,-147.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1056.33,-108C1064.69,-106.91 1073.35,-105.78 1081.92,-104.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1082.44,-108.12 1091.9,-103.36 1081.53,-101.18 1082.44,-108.12"/>
 </g>
 <!-- proc~factln -->
-<g id="proc~~elevate_degree~~CallsGraph_node18" class="node">
+<g id="proc~~elevate_degree~~CallsGraph_node16" class="node">
 <title>proc~factln</title>
-<g id="a_proc~~elevate_degree~~CallsGraph_node18"><a xlink:href="../proc/factln.html" xlink:title="factln">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="700.5,-24 646.5,-24 646.5,0 700.5,0 700.5,-24"/>
-<text text-anchor="middle" x="673.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">factln</text>
+<g id="a_proc~~elevate_degree~~CallsGraph_node16"><a xlink:href="../proc/factln.html" xlink:title="factln">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="641,-26 587,-26 587,-2 641,-2 641,-26"/>
+<text text-anchor="middle" x="614" y="-11.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">factln</text>
 </a>
 </g>
 </g>
 <!-- proc~bincoeff&#45;&gt;proc~factln -->
-<g id="proc~~elevate_degree~~CallsGraph_edge14" class="edge">
+<g id="proc~~elevate_degree~~CallsGraph_edge13" class="edge">
 <title>proc~bincoeff&#45;&gt;proc~factln</title>
-<path fill="none" stroke="#ffbf00" d="M503.75,-12C538.27,-12 597.86,-12 636.2,-12"/>
-<polygon fill="#ffbf00" stroke="#ffbf00" points="636.42,-15.5 646.42,-12 636.42,-8.5 636.42,-15.5"/>
+<path fill="none" stroke="#ffda00" d="M470.73,-14C499.49,-14 544.97,-14 576.74,-14"/>
+<polygon fill="#ffda00" stroke="#ffda00" points="576.95,-17.5 586.95,-14 576.95,-10.5 576.95,-17.5"/>
 </g>
 <!-- proc~cmp_degree -->
-<g id="proc~~elevate_degree~~CallsGraph_node13" class="node">
+<g id="proc~~elevate_degree~~CallsGraph_node12" class="node">
 <title>proc~cmp_degree</title>
-<g id="a_proc~~elevate_degree~~CallsGraph_node13"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="755,-209 592,-209 592,-185 755,-185 755,-209"/>
-<text text-anchor="middle" x="673.5" y="-194.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
+<g id="a_proc~~elevate_degree~~CallsGraph_node12"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="691,-211 537,-211 537,-187 691,-187 691,-211"/>
+<text text-anchor="middle" x="614" y="-196.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~set1&#45;&gt;proc~cmp_degree -->
-<g id="proc~~elevate_degree~~CallsGraph_edge15" class="edge">
+<g id="proc~~elevate_degree~~CallsGraph_edge14" class="edge">
 <title>proc~set1&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#00ffff" d="M535.57,-182.33C550.09,-183.88 565.97,-185.59 581.6,-187.26"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="581.51,-190.77 591.82,-188.36 582.25,-183.81 581.51,-190.77"/>
-</g>
-<!-- proc~cmp_nc -->
-<g id="proc~~elevate_degree~~CallsGraph_node14" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_proc~~elevate_degree~~CallsGraph_node14"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="743,-167 604,-167 604,-143 743,-143 743,-167"/>
-<text text-anchor="middle" x="673.5" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
-</a>
+<path fill="none" stroke="#48ff00" d="M476.66,-249.94C484.64,-247.03 493.13,-243.91 501,-241 524.37,-232.35 550.44,-222.58 571.54,-214.64"/>
+<polygon fill="#48ff00" stroke="#48ff00" points="573.04,-217.82 581.16,-211.02 570.57,-211.27 573.04,-217.82"/>
 </g>
-</g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
-<g id="proc~~elevate_degree~~CallsGraph_edge16" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#00ffff" d="M535.57,-169.67C553.91,-167.71 574.41,-165.51 593.85,-163.43"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="594.34,-166.89 603.91,-162.35 593.59,-159.93 594.34,-166.89"/>
-</g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
-<g id="proc~~elevate_degree~~CallsGraph_edge17" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#003fff" d="M535.57,-140.33C553.91,-142.29 574.41,-144.49 593.85,-146.57"/>
-<polygon fill="#003fff" stroke="#003fff" points="593.59,-150.07 603.91,-147.65 594.34,-143.11 593.59,-150.07"/>
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
+<g id="proc~~elevate_degree~~CallsGraph_edge15" class="edge">
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#00ff91" d="M501.36,-212.83C509.56,-211.82 518.14,-210.75 526.74,-209.69"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="527.33,-213.14 536.82,-208.44 526.46,-206.19 527.33,-213.14"/>
 </g>
 <!-- proc~compute_knot_vector -->
-<g id="proc~~elevate_degree~~CallsGraph_node15" class="node">
+<g id="proc~~elevate_degree~~CallsGraph_node13" class="node">
 <title>proc~compute_knot_vector</title>
-<g id="a_proc~~elevate_degree~~CallsGraph_node15"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="737,-125 610,-125 610,-101 737,-101 737,-125"/>
-<text text-anchor="middle" x="673.5" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<g id="a_proc~~elevate_degree~~CallsGraph_node13"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="677.5,-148 550.5,-148 550.5,-124 677.5,-124 677.5,-148"/>
+<text text-anchor="middle" x="614" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
-<g id="proc~~elevate_degree~~CallsGraph_edge18" class="edge">
+<g id="proc~~elevate_degree~~CallsGraph_edge16" class="edge">
 <title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#003fff" d="M535.57,-127.67C555.72,-125.51 578.49,-123.07 599.59,-120.81"/>
-<polygon fill="#003fff" stroke="#003fff" points="600.23,-124.26 609.8,-119.72 599.49,-117.3 600.23,-124.26"/>
+<path fill="none" stroke="#0091ff" d="M497.6,-136C511.08,-136 525.77,-136 540,-136"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="540.26,-139.5 550.26,-136 540.26,-132.5 540.26,-139.5"/>
 </g>
 <!-- proc~set3&#45;&gt;proc~cmp_degree -->
-<g id="proc~~elevate_degree~~CallsGraph_edge19" class="edge">
+<g id="proc~~elevate_degree~~CallsGraph_edge17" class="edge">
 <title>proc~set3&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#7f00ff" d="M535.57,-211.67C550.09,-210.12 565.97,-208.41 581.6,-206.74"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="582.25,-210.19 591.82,-205.64 581.51,-203.23 582.25,-210.19"/>
+<path fill="none" stroke="#4800ff" d="M497.6,-184.7C506.97,-185.86 516.92,-187.1 526.9,-188.33"/>
+<polygon fill="#4800ff" stroke="#4800ff" points="526.51,-191.81 536.86,-189.57 527.37,-184.86 526.51,-191.81"/>
 </g>
 <!-- proc~get_multiplicity -->
-<g id="proc~~elevate_degree~~CallsGraph_node19" class="node">
+<g id="proc~~elevate_degree~~CallsGraph_node17" class="node">
 <title>proc~get_multiplicity</title>
-<g id="a_proc~~elevate_degree~~CallsGraph_node19"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="969,-208 791,-208 791,-184 969,-184 969,-208"/>
-<text text-anchor="middle" x="880" y="-193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
+<g id="a_proc~~elevate_degree~~CallsGraph_node17"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="896,-190 727,-190 727,-166 896,-166 896,-190"/>
+<text text-anchor="middle" x="811.5" y="-175.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
-<g id="proc~~elevate_degree~~CallsGraph_edge20" class="edge">
+<g id="proc~~elevate_degree~~CallsGraph_edge18" class="edge">
 <title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M755.03,-196.61C763.47,-196.56 772.11,-196.52 780.71,-196.48"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="780.8,-199.98 790.78,-196.43 780.76,-192.98 780.8,-199.98"/>
-</g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~elevate_degree~~CallsGraph_edge21" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ffff00" d="M743.14,-155C813.69,-155 923.03,-155 994.57,-155"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="994.85,-158.5 1004.85,-155 994.85,-151.5 994.85,-158.5"/>
+<path fill="none" stroke="#ff0000" d="M691.15,-190.82C699.54,-189.92 708.17,-188.99 716.75,-188.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="717.22,-191.54 726.79,-186.99 716.47,-184.58 717.22,-191.54"/>
 </g>
 <!-- proc~repelem -->
-<g id="proc~~elevate_degree~~CallsGraph_node20" class="node">
+<g id="proc~~elevate_degree~~CallsGraph_node18" class="node">
 <title>proc~repelem</title>
-<g id="a_proc~~elevate_degree~~CallsGraph_node20"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="908.5,-125 851.5,-125 851.5,-101 908.5,-101 908.5,-125"/>
-<text text-anchor="middle" x="880" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<g id="a_proc~~elevate_degree~~CallsGraph_node18"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="840,-148 783,-148 783,-124 840,-124 840,-148"/>
+<text text-anchor="middle" x="811.5" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
-<g id="proc~~elevate_degree~~CallsGraph_edge22" class="edge">
+<g id="proc~~elevate_degree~~CallsGraph_edge19" class="edge">
 <title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#00ff00" d="M737.25,-113C771.23,-113 812.1,-113 841.2,-113"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="841.36,-116.5 851.36,-113 841.35,-109.5 841.36,-116.5"/>
+<path fill="none" stroke="#cbff00" d="M677.66,-136C708.92,-136 745.69,-136 772.61,-136"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="772.78,-139.5 782.78,-136 772.78,-132.5 772.78,-139.5"/>
 </g>
 <!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~elevate_degree~~CallsGraph_edge23" class="edge">
+<g id="proc~~elevate_degree~~CallsGraph_edge20" class="edge">
 <title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M935.51,-183.92C956.21,-179.33 979.98,-174.06 1001.52,-169.29"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1002.56,-172.64 1011.56,-167.06 1001.04,-165.81 1002.56,-172.64"/>
+<path fill="none" stroke="#ff0000" d="M865.42,-166C875.65,-163.31 886.22,-160.28 896,-157 917.01,-149.96 939.88,-140.4 958.12,-132.28"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="959.8,-135.36 967.48,-128.06 956.92,-128.98 959.8,-135.36"/>
 </g>
 </g>
 </svg>
@@ -634,31 +583,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~elevate_degree~~CalledByGraph Pages: 1 -->
-<svg id="procelevate_degreeCalledByGraph" width="334pt" height="32pt"
- viewBox="0.00 0.00 334.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procelevate_degreeCalledByGraph" width="314pt" height="32pt"
+ viewBox="0.00 0.00 314.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~elevate_degree~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~elevate_degree~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 330,-28 330,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 310,-28 310,4 -4,4"/>
 <!-- proc~elevate_degree -->
 <g id="proc~~elevate_degree~~CalledByGraph_node1" class="node">
 <title>proc~elevate_degree</title>
-<polygon fill="none" stroke="black" points="326,-24 146,-24 146,0 326,0 326,-24"/>
-<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%elevate_degree</text>
+<polygon fill="none" stroke="black" points="306,-24 136,-24 136,0 306,0 306,-24"/>
+<text text-anchor="middle" x="221" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%elevate_degree</text>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example1_curve -->
 <g id="proc~~elevate_degree~~CalledByGraph_node2" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~elevate_degree~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~elevate_degree~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="100,-24 0,-24 0,0 100,0 100,-24"/>
+<text text-anchor="middle" x="50" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
 <g id="proc~~elevate_degree~~CalledByGraph_edge1" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#ff0000" d="M110.19,-12C118.33,-12 126.93,-12 135.65,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.93,-15.5 145.93,-12 135.93,-8.5 135.93,-15.5"/>
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
+<path fill="none" stroke="#ff0000" d="M100.34,-12C108.39,-12 116.96,-12 125.67,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="125.94,-15.5 135.94,-12 125.94,-8.5 125.94,-15.5"/>
 </g>
 </g>
 </svg>
@@ -774,7 +723,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/elevate_degree_a_5_9.html b/proc/elevate_degree_a_5_9.html
index 9f350753e..4ea3cf21d 100644
--- a/proc/elevate_degree_a_5_9.html
+++ b/proc/elevate_degree_a_5_9.html
@@ -156,7 +156,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-t~9"></span>
+              <span class="anchor" id="variable-t~8"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -171,7 +171,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~14"></span>
+              <span class="anchor" id="variable-knot~35"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -186,7 +186,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~50"></span>
+              <span class="anchor" id="variable-degree~49"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -468,9 +468,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~elevate_degree -->
 <g id="proc~~elevate_degree_a_5_9~~CalledByGraph_node2" class="node">
 <title>proc~elevate_degree</title>
-<g id="a_proc~~elevate_degree_a_5_9~~CalledByGraph_node2"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="326,-108 146,-108 146,-84 326,-84 326,-108"/>
-<text text-anchor="middle" x="236" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
+<g id="a_proc~~elevate_degree_a_5_9~~CalledByGraph_node2"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="321,-108 151,-108 151,-84 321,-84 321,-108"/>
+<text text-anchor="middle" x="236" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
 </a>
 </g>
 </g>
@@ -483,9 +483,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~elevate_degree~2 -->
 <g id="proc~~elevate_degree_a_5_9~~CalledByGraph_node3" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_proc~~elevate_degree_a_5_9~~CalledByGraph_node3"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
+<g id="a_proc~~elevate_degree_a_5_9~~CalledByGraph_node3"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="326,-66 146,-66 146,-42 326,-42 326,-66"/>
-<text text-anchor="middle" x="236" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<text text-anchor="middle" x="236" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
@@ -498,9 +498,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~elevate_degree~3 -->
 <g id="proc~~elevate_degree_a_5_9~~CalledByGraph_node4" class="node">
 <title>proc~elevate_degree~3</title>
-<g id="a_proc~~elevate_degree_a_5_9~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="321,-24 151,-24 151,0 321,0 321,-24"/>
-<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+<g id="a_proc~~elevate_degree_a_5_9~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="326,-24 146,-24 146,0 326,0 326,-24"/>
+<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
 </a>
 </g>
 </g>
@@ -514,46 +514,46 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~elevate_degree_a_5_9~~CalledByGraph_node5" class="node">
 <title>program~example1_curve</title>
 <g id="a_proc~~elevate_degree_a_5_9~~CalledByGraph_node5"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-24 5,-24 5,0 105,0 105,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-108 5,-108 5,-84 105,-84 105,-108"/>
+<text text-anchor="middle" x="55" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
-<g id="proc~~elevate_degree_a_5_9~~CalledByGraph_edge6" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
-<path fill="none" stroke="#0000ff" d="M105.39,-12C116.38,-12 128.39,-12 140.53,-12"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="140.73,-15.5 150.73,-12 140.73,-8.5 140.73,-15.5"/>
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
+<g id="proc~~elevate_degree_a_5_9~~CalledByGraph_edge4" class="edge">
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
+<path fill="none" stroke="#ff0000" d="M105.39,-96C116.38,-96 128.39,-96 140.53,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="140.73,-99.5 150.73,-96 140.73,-92.5 140.73,-99.5"/>
 </g>
 <!-- program~example3_surface -->
 <g id="proc~~elevate_degree_a_5_9~~CalledByGraph_node6" class="node">
 <title>program~example3_surface</title>
 <g id="a_proc~~elevate_degree_a_5_9~~CalledByGraph_node6"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-66 0,-66 0,-42 110,-42 110,-66"/>
-<text text-anchor="middle" x="55" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
-<g id="proc~~elevate_degree_a_5_9~~CalledByGraph_edge5" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
-<path fill="none" stroke="#00ff00" d="M110.19,-54C118.33,-54 126.93,-54 135.65,-54"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="135.93,-57.5 145.93,-54 135.93,-50.5 135.93,-57.5"/>
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="proc~~elevate_degree_a_5_9~~CalledByGraph_edge6" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#0000ff" d="M110.19,-12C118.33,-12 126.93,-12 135.65,-12"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="135.93,-15.5 145.93,-12 135.93,-8.5 135.93,-15.5"/>
 </g>
 <!-- program~example3_volume -->
 <g id="proc~~elevate_degree_a_5_9~~CalledByGraph_node7" class="node">
 <title>program~example3_volume</title>
 <g id="a_proc~~elevate_degree_a_5_9~~CalledByGraph_node7"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-108 0,-108 0,-84 110,-84 110,-108"/>
-<text text-anchor="middle" x="55" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-66 0,-66 0,-42 110,-42 110,-66"/>
+<text text-anchor="middle" x="55" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
-<g id="proc~~elevate_degree_a_5_9~~CalledByGraph_edge4" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#ff0000" d="M110.19,-96C118.33,-96 126.93,-96 135.65,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.93,-99.5 145.93,-96 135.93,-92.5 135.93,-99.5"/>
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
+<g id="proc~~elevate_degree_a_5_9~~CalledByGraph_edge5" class="edge">
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
+<path fill="none" stroke="#00ff00" d="M110.19,-54C118.33,-54 126.93,-54 135.65,-54"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="135.93,-57.5 145.93,-54 135.93,-50.5 135.93,-57.5"/>
 </g>
 </g>
 </svg>
@@ -669,7 +669,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/elevate_degree~2.html b/proc/elevate_degree~2.html
index 0d1bfd453..1a72ed2e3 100644
--- a/proc/elevate_degree~2.html
+++ b/proc/elevate_degree~2.html
@@ -78,20 +78,20 @@ <h1>elevate_degree
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 1.1% of total for procedures.">72 statements</a>
+                 title=" 1.5% of total for procedures.">105 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">elevate_degree</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine elevate_degree(this, dir, t)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~109"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~102"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~29"></span>
+              <span class="anchor" id="variable-dir~17"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-t~4"></span>
+              <span class="anchor" id="variable-t~5"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -216,340 +216,325 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~elevate_degree~2~~CallsGraph Pages: 1 -->
-<svg id="procelevate_degree2CallsGraph" width="641pt" height="157pt"
- viewBox="0.00 0.00 641.00 157.32" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~elevate_degree~2~~CallsGraph" class="graph" transform="scale(2.05 2.05) rotate(0) translate(4 318)">
+<svg id="procelevate_degree2CallsGraph" width="641pt" height="158pt"
+ viewBox="0.00 0.00 641.00 158.41" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~elevate_degree~2~~CallsGraph" class="graph" transform="scale(2.03 2.03) rotate(0) translate(4 318)">
 <title>proc~~elevate_degree~2~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-318 1308,-318 1308,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-318 1299,-318 1299,4 -4,4"/>
 <!-- proc~elevate_degree~2 -->
 <g id="proc~~elevate_degree~2~~CallsGraph_node1" class="node">
 <title>proc~elevate_degree~2</title>
-<polygon fill="none" stroke="black" points="180,-125 0,-125 0,-101 180,-101 180,-125"/>
-<text text-anchor="middle" x="90" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%elevate_degree</text>
+<polygon fill="none" stroke="black" points="180,-167 0,-167 0,-143 180,-143 180,-167"/>
+<text text-anchor="middle" x="90" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%elevate_degree</text>
 </g>
 <!-- none~get_knot~2 -->
 <g id="proc~~elevate_degree~2~~CallsGraph_node2" class="node">
 <title>none~get_knot~2</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~2" xlink:title="nurbs_surface%get_knot">
-<polygon fill="#a7506f" stroke="#a7506f" points="363.5,-272 220.5,-272 220.5,-248 363.5,-248 363.5,-272"/>
-<text text-anchor="middle" x="292" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot~2" xlink:title="nurbs_volume%get_knot">
+<polygon fill="#a7506f" stroke="#a7506f" points="359,-272 216,-272 216,-248 359,-248 359,-272"/>
+<text text-anchor="middle" x="287.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;none~get_knot~2 -->
 <g id="proc~~elevate_degree~2~~CallsGraph_edge1" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;none~get_knot~2</title>
-<path fill="none" stroke="#ff0000" d="M107.37,-125.03C142.38,-150.76 224.73,-211.29 266.21,-241.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="264.28,-244.7 274.41,-247.8 268.42,-239.06 264.28,-244.7"/>
+<path fill="none" stroke="#ff0000" d="M113.43,-167.04C148.25,-185.75 215.42,-221.82 255.06,-243.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="253.57,-246.29 264.03,-247.93 256.88,-240.12 253.57,-246.29"/>
 </g>
 <!-- none~set~2 -->
 <g id="proc~~elevate_degree~2~~CallsGraph_node3" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node3"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="348.5,-146 235.5,-146 235.5,-122 348.5,-122 348.5,-146"/>
-<text text-anchor="middle" x="292" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node3"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="344,-167 231,-167 231,-143 344,-143 344,-167"/>
+<text text-anchor="middle" x="287.5" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;none~set~2 -->
 <g id="proc~~elevate_degree~2~~CallsGraph_edge2" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M180.18,-122.36C195.27,-123.95 210.69,-125.57 225.04,-127.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="224.98,-130.59 235.29,-128.15 225.71,-123.63 224.98,-130.59"/>
+<path fill="none" stroke="#ff0000" d="M180.17,-155C193.76,-155 207.57,-155 220.54,-155"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="220.74,-158.5 230.74,-155 220.74,-151.5 220.74,-158.5"/>
 </g>
 <!-- proc~elevate_degree_a_5_9 -->
 <g id="proc~~elevate_degree~2~~CallsGraph_node4" class="node">
 <title>proc~elevate_degree_a_5_9</title>
 <g id="a_proc~~elevate_degree~2~~CallsGraph_node4"><a xlink:href="../proc/elevate_degree_a_5_9.html" xlink:title="elevate_degree_A_5_9">
-<polygon fill="#d9534f" stroke="#d9534f" points="358,-84 226,-84 226,-60 358,-60 358,-84"/>
-<text text-anchor="middle" x="292" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elevate_degree_A_5_9</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="353.5,-64 221.5,-64 221.5,-40 353.5,-40 353.5,-64"/>
+<text text-anchor="middle" x="287.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elevate_degree_A_5_9</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;proc~elevate_degree_a_5_9 -->
 <g id="proc~~elevate_degree~2~~CallsGraph_edge3" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;proc~elevate_degree_a_5_9</title>
-<path fill="none" stroke="#ff0000" d="M149.66,-100.98C172.45,-96.3 198.72,-90.92 222.38,-86.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="223.25,-89.46 232.35,-84.02 221.85,-82.6 223.25,-89.46"/>
-</g>
-<!-- proc~is_rational~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_node5" class="node">
-<title>proc~is_rational~2</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node5"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="368,-42 216,-42 216,-18 368,-18 368,-42"/>
-<text text-anchor="middle" x="292" y="-27.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
-</a>
-</g>
-</g>
-<!-- proc~elevate_degree~2&#45;&gt;proc~is_rational~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge4" class="edge">
-<title>proc~elevate_degree~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#ff0000" d="M112.13,-100.99C136.55,-87.47 178.24,-65.51 216,-51 221.5,-48.89 227.3,-46.89 233.14,-45.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="234.42,-48.29 242.95,-42.01 232.36,-41.6 234.42,-48.29"/>
+<path fill="none" stroke="#ff0000" d="M113.81,-142.98C148.59,-124.66 215.01,-89.67 254.57,-68.82"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="256.32,-71.86 263.53,-64.1 253.06,-65.66 256.32,-71.86"/>
 </g>
 <!-- proc~get_knot_all~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_node8" class="node">
+<g id="proc~~elevate_degree~2~~CallsGraph_node7" class="node">
 <title>proc~get_knot_all~2</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node8"><a xlink:href="../proc/get_knot_all~2.html" xlink:title="nurbs_surface%get_knot_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="565,-314 404,-314 404,-290 565,-290 565,-314"/>
-<text text-anchor="middle" x="484.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot_all</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node7"><a xlink:href="../proc/get_knot_all~2.html" xlink:title="nurbs_volume%get_knot_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="556,-314 395,-314 395,-290 556,-290 556,-314"/>
+<text text-anchor="middle" x="475.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot~2&#45;&gt;proc~get_knot_all~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge5" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge4" class="edge">
 <title>none~get_knot~2&#45;&gt;proc~get_knot_all~2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M347.59,-272.04C369.91,-276.96 395.89,-282.69 419.13,-287.81"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="418.38,-291.23 428.9,-289.96 419.89,-284.39 418.38,-291.23"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M341.8,-272.04C363.49,-276.93 388.74,-282.63 411.35,-287.74"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="410.67,-291.17 421.19,-289.96 412.21,-284.35 410.67,-291.17"/>
 </g>
 <!-- proc~get_knoti~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_node9" class="node">
+<g id="proc~~elevate_degree~2~~CallsGraph_node8" class="node">
 <title>proc~get_knoti~2</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node9"><a xlink:href="../proc/get_knoti~2.html" xlink:title="nurbs_surface%get_knoti">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="557.5,-272 411.5,-272 411.5,-248 557.5,-248 557.5,-272"/>
-<text text-anchor="middle" x="484.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knoti</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node8"><a xlink:href="../proc/get_knoti~2.html" xlink:title="nurbs_volume%get_knoti">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="548.5,-272 402.5,-272 402.5,-248 548.5,-248 548.5,-272"/>
+<text text-anchor="middle" x="475.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knoti</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot~2&#45;&gt;proc~get_knoti~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge6" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge5" class="edge">
 <title>none~get_knot~2&#45;&gt;proc~get_knoti~2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M363.66,-260C375.82,-260 388.56,-260 401,-260"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="401.36,-263.5 411.36,-260 401.36,-256.5 401.36,-263.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M359.08,-260C369.94,-260 381.23,-260 392.32,-260"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="392.42,-263.5 402.42,-260 392.42,-256.5 392.42,-263.5"/>
 </g>
 <!-- proc~set1~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_node10" class="node">
+<g id="proc~~elevate_degree~2~~CallsGraph_node9" class="node">
 <title>proc~set1~2</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node10"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="544.5,-188 424.5,-188 424.5,-164 544.5,-164 544.5,-188"/>
-<text text-anchor="middle" x="484.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node9"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="535.5,-188 415.5,-188 415.5,-164 535.5,-164 535.5,-188"/>
+<text text-anchor="middle" x="475.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set1~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge7" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge6" class="edge">
 <title>none~set~2&#45;&gt;proc~set1~2</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M347.59,-146.04C369.91,-150.96 395.89,-156.69 419.13,-161.81"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="418.38,-165.23 428.9,-163.96 419.89,-158.39 418.38,-165.23"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M344.05,-161.27C363.28,-163.44 385.08,-165.9 405.27,-168.18"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="405.02,-171.68 415.35,-169.32 405.81,-164.72 405.02,-171.68"/>
 </g>
 <!-- proc~set2~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_node11" class="node">
+<g id="proc~~elevate_degree~2~~CallsGraph_node10" class="node">
 <title>proc~set2~2</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node11"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="544.5,-146 424.5,-146 424.5,-122 544.5,-122 544.5,-146"/>
-<text text-anchor="middle" x="484.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node10"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="535.5,-146 415.5,-146 415.5,-122 535.5,-122 535.5,-146"/>
+<text text-anchor="middle" x="475.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set2~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge8" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge7" class="edge">
 <title>none~set~2&#45;&gt;proc~set2~2</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M348.61,-134C369.19,-134 392.76,-134 414.39,-134"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="414.5,-137.5 424.5,-134 414.5,-130.5 414.5,-137.5"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M344.05,-148.73C363.28,-146.56 385.08,-144.1 405.27,-141.82"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="405.81,-145.28 415.35,-140.68 405.02,-138.32 405.81,-145.28"/>
 </g>
 <!-- proc~set3~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_node12" class="node">
+<g id="proc~~elevate_degree~2~~CallsGraph_node11" class="node">
 <title>proc~set3~2</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node12"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="544.5,-230 424.5,-230 424.5,-206 544.5,-206 544.5,-230"/>
-<text text-anchor="middle" x="484.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node11"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="535.5,-230 415.5,-230 415.5,-206 535.5,-206 535.5,-230"/>
+<text text-anchor="middle" x="475.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set3~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge9" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge8" class="edge">
 <title>none~set~2&#45;&gt;proc~set3~2</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M311.11,-146.23C332.5,-160.2 369.53,-182.94 404,-197 409.33,-199.18 414.96,-201.19 420.66,-203.03"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="419.69,-206.39 430.27,-205.98 421.74,-199.7 419.69,-206.39"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M316.65,-167.15C337.93,-176.07 367.99,-188.14 395,-197 401.47,-199.12 408.29,-201.18 415.1,-203.13"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="414.47,-206.59 425.04,-205.9 416.35,-199.84 414.47,-206.59"/>
 </g>
 <!-- proc~set4~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_node13" class="node">
+<g id="proc~~elevate_degree~2~~CallsGraph_node12" class="node">
 <title>proc~set4~2</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node13"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="544.5,-104 424.5,-104 424.5,-80 544.5,-80 544.5,-104"/>
-<text text-anchor="middle" x="484.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node12"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="535.5,-104 415.5,-104 415.5,-80 535.5,-80 535.5,-104"/>
+<text text-anchor="middle" x="475.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set4~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge10" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge9" class="edge">
 <title>none~set~2&#45;&gt;proc~set4~2</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M347.59,-121.96C369.91,-117.04 395.89,-111.31 419.13,-106.19"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="419.89,-109.61 428.9,-104.04 418.38,-102.77 419.89,-109.61"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M316.65,-142.85C337.93,-133.93 367.99,-121.86 395,-113 401.47,-110.88 408.29,-108.82 415.1,-106.87"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="416.35,-110.16 425.04,-104.1 414.47,-103.41 416.35,-110.16"/>
 </g>
 <!-- interface~compute_multiplicity -->
-<g id="proc~~elevate_degree~2~~CallsGraph_node6" class="node">
+<g id="proc~~elevate_degree~2~~CallsGraph_node5" class="node">
 <title>interface~compute_multiplicity</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node6"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1138,-167 1014,-167 1014,-143 1138,-143 1138,-167"/>
-<text text-anchor="middle" x="1076" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node5"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
+<polygon fill="#a7506f" stroke="#a7506f" points="1129,-167 1005,-167 1005,-143 1129,-143 1129,-167"/>
+<text text-anchor="middle" x="1067" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree_a_5_9&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge11" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge10" class="edge">
 <title>proc~elevate_degree_a_5_9&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00ffff" d="M358.32,-62.05C482.59,-45.66 760.13,-21.39 978,-92 1006.66,-101.29 1035.04,-121.33 1053.63,-136.32"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="1051.51,-139.12 1061.44,-142.8 1055.98,-133.73 1051.51,-139.12"/>
+<path fill="none" stroke="#0000ff" d="M353.87,-45C477.56,-34.08 752.84,-21 969,-92 997.62,-101.4 1026.01,-121.42 1044.61,-136.38"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="1042.49,-139.17 1052.43,-142.85 1046.95,-133.78 1042.49,-139.17"/>
 </g>
 <!-- proc~bincoeff -->
-<g id="proc~~elevate_degree~2~~CallsGraph_node7" class="node">
+<g id="proc~~elevate_degree~2~~CallsGraph_node6" class="node">
 <title>proc~bincoeff</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node7"><a xlink:href="../proc/bincoeff.html" xlink:title="bincoeff">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="512.5,-24 456.5,-24 456.5,0 512.5,0 512.5,-24"/>
-<text text-anchor="middle" x="484.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">bincoeff</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node6"><a xlink:href="../proc/bincoeff.html" xlink:title="bincoeff">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="503.5,-24 447.5,-24 447.5,0 503.5,0 503.5,-24"/>
+<text text-anchor="middle" x="475.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">bincoeff</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree_a_5_9&#45;&gt;proc~bincoeff -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge12" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge11" class="edge">
 <title>proc~elevate_degree_a_5_9&#45;&gt;proc~bincoeff</title>
-<path fill="none" stroke="#00ffff" d="M337.98,-59.99C347.9,-57.17 358.34,-54.09 368,-51 384.2,-45.81 387.91,-43.53 404,-38 417.79,-33.26 432.99,-28.24 446.37,-23.88"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="447.77,-27.11 456.2,-20.7 445.61,-20.45 447.77,-27.11"/>
+<path fill="none" stroke="#0000ff" d="M344.31,-40C374.44,-33.52 410.81,-25.7 437.45,-19.97"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="438.46,-23.33 447.5,-17.81 436.99,-16.49 438.46,-23.33"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_node17" class="node">
+<g id="proc~~elevate_degree~2~~CallsGraph_node16" class="node">
 <title>proc~compute_multiplicity1</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node17"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1304,-188 1174,-188 1174,-164 1304,-164 1304,-188"/>
-<text text-anchor="middle" x="1239" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node16"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1295,-188 1165,-188 1165,-164 1295,-164 1295,-188"/>
+<text text-anchor="middle" x="1230" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge13" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge12" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1138.33,-163C1146.69,-164.09 1155.35,-165.22 1163.92,-166.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1163.53,-169.82 1173.9,-167.64 1164.44,-162.88 1163.53,-169.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1129.33,-163C1137.69,-164.09 1146.35,-165.22 1154.92,-166.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1154.53,-169.82 1164.9,-167.64 1155.44,-162.88 1154.53,-169.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_node18" class="node">
+<g id="proc~~elevate_degree~2~~CallsGraph_node17" class="node">
 <title>proc~compute_multiplicity2</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node18"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1304,-146 1174,-146 1174,-122 1304,-122 1304,-146"/>
-<text text-anchor="middle" x="1239" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node17"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1295,-146 1165,-146 1165,-122 1295,-122 1295,-146"/>
+<text text-anchor="middle" x="1230" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge14" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge13" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1138.33,-147C1146.69,-145.91 1155.35,-144.78 1163.92,-143.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1164.44,-147.12 1173.9,-142.36 1163.53,-140.18 1164.44,-147.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1129.33,-147C1137.69,-145.91 1146.35,-144.78 1154.92,-143.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1155.44,-147.12 1164.9,-142.36 1154.53,-140.18 1155.44,-147.12"/>
 </g>
 <!-- proc~factln -->
-<g id="proc~~elevate_degree~2~~CallsGraph_node19" class="node">
+<g id="proc~~elevate_degree~2~~CallsGraph_node18" class="node">
 <title>proc~factln</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node19"><a xlink:href="../proc/factln.html" xlink:title="factln">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="709.5,-24 655.5,-24 655.5,0 709.5,0 709.5,-24"/>
-<text text-anchor="middle" x="682.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">factln</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node18"><a xlink:href="../proc/factln.html" xlink:title="factln">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="700.5,-24 646.5,-24 646.5,0 700.5,0 700.5,-24"/>
+<text text-anchor="middle" x="673.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">factln</text>
 </a>
 </g>
 </g>
 <!-- proc~bincoeff&#45;&gt;proc~factln -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge15" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge14" class="edge">
 <title>proc~bincoeff&#45;&gt;proc~factln</title>
-<path fill="none" stroke="#ffbf00" d="M512.75,-12C547.27,-12 606.86,-12 645.2,-12"/>
-<polygon fill="#ffbf00" stroke="#ffbf00" points="645.42,-15.5 655.42,-12 645.42,-8.5 645.42,-15.5"/>
+<path fill="none" stroke="#ffbf00" d="M503.75,-12C538.27,-12 597.86,-12 636.2,-12"/>
+<polygon fill="#ffbf00" stroke="#ffbf00" points="636.42,-15.5 646.42,-12 636.42,-8.5 636.42,-15.5"/>
 </g>
 <!-- proc~cmp_degree~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_node14" class="node">
+<g id="proc~~elevate_degree~2~~CallsGraph_node13" class="node">
 <title>proc~cmp_degree~2</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node14"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="764,-209 601,-209 601,-185 764,-185 764,-209"/>
-<text text-anchor="middle" x="682.5" y="-194.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node13"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="755,-209 592,-209 592,-185 755,-185 755,-209"/>
+<text text-anchor="middle" x="673.5" y="-194.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge16" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge15" class="edge">
 <title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#00ffff" d="M544.57,-182.33C559.09,-183.88 574.97,-185.59 590.6,-187.26"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="590.51,-190.77 600.82,-188.36 591.25,-183.81 590.51,-190.77"/>
+<path fill="none" stroke="#00ffff" d="M535.57,-182.33C550.09,-183.88 565.97,-185.59 581.6,-187.26"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="581.51,-190.77 591.82,-188.36 582.25,-183.81 581.51,-190.77"/>
 </g>
 <!-- proc~cmp_nc~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_node15" class="node">
+<g id="proc~~elevate_degree~2~~CallsGraph_node14" class="node">
 <title>proc~cmp_nc~2</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node15"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="752,-167 613,-167 613,-143 752,-143 752,-167"/>
-<text text-anchor="middle" x="682.5" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node14"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="743,-167 604,-167 604,-143 743,-143 743,-167"/>
+<text text-anchor="middle" x="673.5" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
 <!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge17" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge16" class="edge">
 <title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
-<path fill="none" stroke="#00ffff" d="M544.57,-169.67C562.91,-167.71 583.41,-165.51 602.85,-163.43"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="603.34,-166.89 612.91,-162.35 602.59,-159.93 603.34,-166.89"/>
+<path fill="none" stroke="#00ffff" d="M535.57,-169.67C553.91,-167.71 574.41,-165.51 593.85,-163.43"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="594.34,-166.89 603.91,-162.35 593.59,-159.93 594.34,-166.89"/>
 </g>
 <!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge18" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge17" class="edge">
 <title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
-<path fill="none" stroke="#003fff" d="M544.57,-140.33C562.91,-142.29 583.41,-144.49 602.85,-146.57"/>
-<polygon fill="#003fff" stroke="#003fff" points="602.59,-150.07 612.91,-147.65 603.34,-143.11 602.59,-150.07"/>
+<path fill="none" stroke="#003fff" d="M535.57,-140.33C553.91,-142.29 574.41,-144.49 593.85,-146.57"/>
+<polygon fill="#003fff" stroke="#003fff" points="593.59,-150.07 603.91,-147.65 594.34,-143.11 593.59,-150.07"/>
 </g>
 <!-- proc~compute_knot_vector -->
-<g id="proc~~elevate_degree~2~~CallsGraph_node16" class="node">
+<g id="proc~~elevate_degree~2~~CallsGraph_node15" class="node">
 <title>proc~compute_knot_vector</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node16"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="746,-125 619,-125 619,-101 746,-101 746,-125"/>
-<text text-anchor="middle" x="682.5" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node15"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="737,-125 610,-125 610,-101 737,-101 737,-125"/>
+<text text-anchor="middle" x="673.5" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge19" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge18" class="edge">
 <title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#003fff" d="M544.57,-127.67C564.72,-125.51 587.49,-123.07 608.59,-120.81"/>
-<polygon fill="#003fff" stroke="#003fff" points="609.23,-124.26 618.8,-119.72 608.49,-117.3 609.23,-124.26"/>
+<path fill="none" stroke="#003fff" d="M535.57,-127.67C555.72,-125.51 578.49,-123.07 599.59,-120.81"/>
+<polygon fill="#003fff" stroke="#003fff" points="600.23,-124.26 609.8,-119.72 599.49,-117.3 600.23,-124.26"/>
 </g>
 <!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge20" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge19" class="edge">
 <title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#7f00ff" d="M544.57,-211.67C559.09,-210.12 574.97,-208.41 590.6,-206.74"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="591.25,-210.19 600.82,-205.64 590.51,-203.23 591.25,-210.19"/>
+<path fill="none" stroke="#7f00ff" d="M535.57,-211.67C550.09,-210.12 565.97,-208.41 581.6,-206.74"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="582.25,-210.19 591.82,-205.64 581.51,-203.23 582.25,-210.19"/>
 </g>
 <!-- proc~get_multiplicity~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_node20" class="node">
+<g id="proc~~elevate_degree~2~~CallsGraph_node19" class="node">
 <title>proc~get_multiplicity~2</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node20"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="978,-208 800,-208 800,-184 978,-184 978,-208"/>
-<text text-anchor="middle" x="889" y="-193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node19"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="969,-208 791,-208 791,-184 969,-184 969,-208"/>
+<text text-anchor="middle" x="880" y="-193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge21" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge20" class="edge">
 <title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
-<path fill="none" stroke="#ff0000" d="M764.03,-196.61C772.47,-196.56 781.11,-196.52 789.71,-196.48"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="789.8,-199.98 799.78,-196.43 789.76,-192.98 789.8,-199.98"/>
+<path fill="none" stroke="#ff0000" d="M755.03,-196.61C763.47,-196.56 772.11,-196.52 780.71,-196.48"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="780.8,-199.98 790.78,-196.43 780.76,-192.98 780.8,-199.98"/>
 </g>
 <!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge22" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge21" class="edge">
 <title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ffff00" d="M752.14,-155C822.69,-155 932.03,-155 1003.57,-155"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="1003.85,-158.5 1013.85,-155 1003.85,-151.5 1003.85,-158.5"/>
+<path fill="none" stroke="#ffff00" d="M743.14,-155C813.69,-155 923.03,-155 994.57,-155"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="994.85,-158.5 1004.85,-155 994.85,-151.5 994.85,-158.5"/>
 </g>
 <!-- proc~repelem -->
-<g id="proc~~elevate_degree~2~~CallsGraph_node21" class="node">
+<g id="proc~~elevate_degree~2~~CallsGraph_node20" class="node">
 <title>proc~repelem</title>
-<g id="a_proc~~elevate_degree~2~~CallsGraph_node21"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="917.5,-125 860.5,-125 860.5,-101 917.5,-101 917.5,-125"/>
-<text text-anchor="middle" x="889" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<g id="a_proc~~elevate_degree~2~~CallsGraph_node20"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="908.5,-125 851.5,-125 851.5,-101 908.5,-101 908.5,-125"/>
+<text text-anchor="middle" x="880" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge23" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge22" class="edge">
 <title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#00ff00" d="M746.25,-113C780.23,-113 821.1,-113 850.2,-113"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="850.36,-116.5 860.36,-113 850.35,-109.5 850.36,-116.5"/>
+<path fill="none" stroke="#00ff00" d="M737.25,-113C771.23,-113 812.1,-113 841.2,-113"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="841.36,-116.5 851.36,-113 841.35,-109.5 841.36,-116.5"/>
 </g>
 <!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~elevate_degree~2~~CallsGraph_edge24" class="edge">
+<g id="proc~~elevate_degree~2~~CallsGraph_edge23" class="edge">
 <title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M944.51,-183.92C965.21,-179.33 988.98,-174.06 1010.52,-169.29"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1011.56,-172.64 1020.56,-167.06 1010.04,-165.81 1011.56,-172.64"/>
+<path fill="none" stroke="#ff0000" d="M935.51,-183.92C956.21,-179.33 979.98,-174.06 1001.52,-169.29"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1002.56,-172.64 1011.56,-167.06 1001.04,-165.81 1002.56,-172.64"/>
 </g>
 </g>
 </svg>
@@ -658,20 +643,20 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~elevate_degree~2~~CalledByGraph_node1" class="node">
 <title>proc~elevate_degree~2</title>
 <polygon fill="none" stroke="black" points="326,-24 146,-24 146,0 326,0 326,-24"/>
-<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%elevate_degree</text>
+<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%elevate_degree</text>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~elevate_degree~2~~CalledByGraph_node2" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~elevate_degree~2~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<title>program~example3_volume</title>
+<g id="a_proc~~elevate_degree~2~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
 <g id="proc~~elevate_degree~2~~CalledByGraph_edge1" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
 <path fill="none" stroke="#ff0000" d="M110.19,-12C118.33,-12 126.93,-12 135.65,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="135.93,-15.5 145.93,-12 135.93,-8.5 135.93,-15.5"/>
 </g>
@@ -789,7 +774,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/elevate_degree~3.html b/proc/elevate_degree~3.html
index 633c2ebf3..b4ffab2d2 100644
--- a/proc/elevate_degree~3.html
+++ b/proc/elevate_degree~3.html
@@ -78,20 +78,20 @@ <h1>elevate_degree
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.4% of total for procedures.">28 statements</a>
+                 title=" 1.1% of total for procedures.">72 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">elevate_degree</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine elevate_degree(this, t)  
+    <h2>private pure subroutine elevate_degree(this, dir, t)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~165"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~170"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,22 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-t~11"></span>
+              <span class="anchor" id="variable-dir~32"></span>
+              integer,
+            </td>
+<td>intent(in)</td>
+              <td></td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>dir</strong></td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-t~10"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -201,289 +216,340 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~elevate_degree~3~~CallsGraph Pages: 1 -->
-<svg id="procelevate_degree3CallsGraph" width="641pt" height="147pt"
- viewBox="0.00 0.00 641.00 146.96" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~elevate_degree~3~~CallsGraph" class="graph" transform="scale(1.92 1.92) rotate(0) translate(4 278)">
+<svg id="procelevate_degree3CallsGraph" width="641pt" height="157pt"
+ viewBox="0.00 0.00 641.00 157.32" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~elevate_degree~3~~CallsGraph" class="graph" transform="scale(2.05 2.05) rotate(0) translate(4 318)">
 <title>proc~~elevate_degree~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-278 1226,-278 1226,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-318 1308,-318 1308,4 -4,4"/>
 <!-- proc~elevate_degree~3 -->
 <g id="proc~~elevate_degree~3~~CallsGraph_node1" class="node">
 <title>proc~elevate_degree~3</title>
-<polygon fill="none" stroke="black" points="170,-66 0,-66 0,-42 170,-42 170,-66"/>
-<text text-anchor="middle" x="85" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%elevate_degree</text>
+<polygon fill="none" stroke="black" points="180,-125 0,-125 0,-101 180,-101 180,-125"/>
+<text text-anchor="middle" x="90" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%elevate_degree</text>
 </g>
-<!-- none~set~3 -->
+<!-- none~get_knot~3 -->
 <g id="proc~~elevate_degree~3~~CallsGraph_node2" class="node">
+<title>none~get_knot~3</title>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~3" xlink:title="nurbs_surface%get_knot">
+<polygon fill="#a7506f" stroke="#a7506f" points="363.5,-272 220.5,-272 220.5,-248 363.5,-248 363.5,-272"/>
+<text text-anchor="middle" x="292" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
+</a>
+</g>
+</g>
+<!-- proc~elevate_degree~3&#45;&gt;none~get_knot~3 -->
+<g id="proc~~elevate_degree~3~~CallsGraph_edge1" class="edge">
+<title>proc~elevate_degree~3&#45;&gt;none~get_knot~3</title>
+<path fill="none" stroke="#ff0000" d="M107.37,-125.03C142.38,-150.76 224.73,-211.29 266.21,-241.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="264.28,-244.7 274.41,-247.8 268.42,-239.06 264.28,-244.7"/>
+</g>
+<!-- none~set~3 -->
+<g id="proc~~elevate_degree~3~~CallsGraph_node3" class="node">
 <title>none~set~3</title>
-<g id="a_proc~~elevate_degree~3~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="328.5,-169 225.5,-169 225.5,-145 328.5,-145 328.5,-169"/>
-<text text-anchor="middle" x="277" y="-154.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node3"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="348.5,-146 235.5,-146 235.5,-122 348.5,-122 348.5,-146"/>
+<text text-anchor="middle" x="292" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;none~set~3 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge1" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge2" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M108.17,-66.02C141.83,-84.26 205.98,-119.04 244.48,-139.91"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="243.22,-143.21 253.68,-144.9 246.56,-137.06 243.22,-143.21"/>
+<path fill="none" stroke="#ff0000" d="M180.18,-122.36C195.27,-123.95 210.69,-125.57 225.04,-127.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="224.98,-130.59 235.29,-128.15 225.71,-123.63 224.98,-130.59"/>
 </g>
 <!-- proc~elevate_degree_a_5_9 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_node3" class="node">
+<g id="proc~~elevate_degree~3~~CallsGraph_node4" class="node">
 <title>proc~elevate_degree_a_5_9</title>
-<g id="a_proc~~elevate_degree~3~~CallsGraph_node3"><a xlink:href="../proc/elevate_degree_a_5_9.html" xlink:title="elevate_degree_A_5_9">
-<polygon fill="#d9534f" stroke="#d9534f" points="343,-66 211,-66 211,-42 343,-42 343,-66"/>
-<text text-anchor="middle" x="277" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elevate_degree_A_5_9</text>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node4"><a xlink:href="../proc/elevate_degree_a_5_9.html" xlink:title="elevate_degree_A_5_9">
+<polygon fill="#d9534f" stroke="#d9534f" points="358,-84 226,-84 226,-60 358,-60 358,-84"/>
+<text text-anchor="middle" x="292" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elevate_degree_A_5_9</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;proc~elevate_degree_a_5_9 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge2" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge3" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;proc~elevate_degree_a_5_9</title>
-<path fill="none" stroke="#ff0000" d="M170.17,-54C180.26,-54 190.52,-54 200.48,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="200.73,-57.5 210.73,-54 200.73,-50.5 200.73,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M149.66,-100.98C172.45,-96.3 198.72,-90.92 222.38,-86.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="223.25,-89.46 232.35,-84.02 221.85,-82.6 223.25,-89.46"/>
 </g>
 <!-- proc~is_rational~3 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_node4" class="node">
+<g id="proc~~elevate_degree~3~~CallsGraph_node5" class="node">
 <title>proc~is_rational~3</title>
-<g id="a_proc~~elevate_degree~3~~CallsGraph_node4"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="348,-24 206,-24 206,0 348,0 348,-24"/>
-<text text-anchor="middle" x="277" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node5"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="368,-42 216,-42 216,-18 368,-18 368,-42"/>
+<text text-anchor="middle" x="292" y="-27.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;proc~is_rational~3 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge3" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge4" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M140.45,-41.96C162.61,-37.07 188.39,-31.37 211.49,-26.26"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="212.54,-29.61 221.55,-24.04 211.03,-22.78 212.54,-29.61"/>
+<path fill="none" stroke="#ff0000" d="M112.13,-100.99C136.55,-87.47 178.24,-65.51 216,-51 221.5,-48.89 227.3,-46.89 233.14,-45.02"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="234.42,-48.29 242.95,-42.01 232.36,-41.6 234.42,-48.29"/>
 </g>
-<!-- proc~set1a -->
-<g id="proc~~elevate_degree~3~~CallsGraph_node7" class="node">
-<title>proc~set1a</title>
-<g id="a_proc~~elevate_degree~3~~CallsGraph_node7"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="501,-274 384,-274 384,-250 501,-250 501,-274"/>
-<text text-anchor="middle" x="442.5" y="-259.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+<!-- proc~get_knot_all~3 -->
+<g id="proc~~elevate_degree~3~~CallsGraph_node8" class="node">
+<title>proc~get_knot_all~3</title>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node8"><a xlink:href="../proc/get_knot_all~3.html" xlink:title="nurbs_surface%get_knot_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="565,-314 404,-314 404,-290 565,-290 565,-314"/>
+<text text-anchor="middle" x="484.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot_all</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge4" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M290.41,-169.06C309.28,-186.85 346.91,-220.25 384,-241 387.06,-242.71 390.29,-244.33 393.59,-245.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="392.43,-249.17 403,-249.89 395.19,-242.73 392.43,-249.17"/>
+<!-- none~get_knot~3&#45;&gt;proc~get_knot_all~3 -->
+<g id="proc~~elevate_degree~3~~CallsGraph_edge5" class="edge">
+<title>none~get_knot~3&#45;&gt;proc~get_knot_all~3</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M347.59,-272.04C369.91,-276.96 395.89,-282.69 419.13,-287.81"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="418.38,-291.23 428.9,-289.96 419.89,-284.39 418.38,-291.23"/>
+</g>
+<!-- proc~get_knoti~3 -->
+<g id="proc~~elevate_degree~3~~CallsGraph_node9" class="node">
+<title>proc~get_knoti~3</title>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node9"><a xlink:href="../proc/get_knoti~3.html" xlink:title="nurbs_surface%get_knoti">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="557.5,-272 411.5,-272 411.5,-248 557.5,-248 557.5,-272"/>
+<text text-anchor="middle" x="484.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knoti</text>
+</a>
+</g>
+</g>
+<!-- none~get_knot~3&#45;&gt;proc~get_knoti~3 -->
+<g id="proc~~elevate_degree~3~~CallsGraph_edge6" class="edge">
+<title>none~get_knot~3&#45;&gt;proc~get_knoti~3</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M363.66,-260C375.82,-260 388.56,-260 401,-260"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="401.36,-263.5 411.36,-260 401.36,-256.5 401.36,-263.5"/>
 </g>
 <!-- proc~set1~3 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_node8" class="node">
+<g id="proc~~elevate_degree~3~~CallsGraph_node10" class="node">
 <title>proc~set1~3</title>
-<g id="a_proc~~elevate_degree~3~~CallsGraph_node8"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="497.5,-232 387.5,-232 387.5,-208 497.5,-208 497.5,-232"/>
-<text text-anchor="middle" x="442.5" y="-217.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node10"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="544.5,-188 424.5,-188 424.5,-164 544.5,-164 544.5,-188"/>
+<text text-anchor="middle" x="484.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set1~3 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge5" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge7" class="edge">
 <title>none~set~3&#45;&gt;proc~set1~3</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M308.07,-169.17C329.24,-177.67 358.29,-189.21 384,-199 388.72,-200.8 393.67,-202.65 398.6,-204.48"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="397.4,-207.77 408,-207.94 399.82,-201.2 397.4,-207.77"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M347.59,-146.04C369.91,-150.96 395.89,-156.69 419.13,-161.81"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="418.38,-165.23 428.9,-163.96 419.89,-158.39 418.38,-165.23"/>
 </g>
 <!-- proc~set2~3 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_node9" class="node">
+<g id="proc~~elevate_degree~3~~CallsGraph_node11" class="node">
 <title>proc~set2~3</title>
-<g id="a_proc~~elevate_degree~3~~CallsGraph_node9"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="497.5,-148 387.5,-148 387.5,-124 497.5,-124 497.5,-148"/>
-<text text-anchor="middle" x="442.5" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node11"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="544.5,-146 424.5,-146 424.5,-122 544.5,-122 544.5,-146"/>
+<text text-anchor="middle" x="484.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set2~3 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge6" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge8" class="edge">
 <title>none~set~3&#45;&gt;proc~set2~3</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M328.84,-150.47C344.06,-148.51 360.97,-146.34 376.95,-144.29"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="377.82,-147.71 387.29,-142.96 376.93,-140.76 377.82,-147.71"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M348.61,-134C369.19,-134 392.76,-134 414.39,-134"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="414.5,-137.5 424.5,-134 414.5,-130.5 414.5,-137.5"/>
 </g>
 <!-- proc~set3~3 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_node10" class="node">
+<g id="proc~~elevate_degree~3~~CallsGraph_node12" class="node">
 <title>proc~set3~3</title>
-<g id="a_proc~~elevate_degree~3~~CallsGraph_node10"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="497.5,-190 387.5,-190 387.5,-166 497.5,-166 497.5,-190"/>
-<text text-anchor="middle" x="442.5" y="-175.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node12"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="544.5,-230 424.5,-230 424.5,-206 544.5,-206 544.5,-230"/>
+<text text-anchor="middle" x="484.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set3~3 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge7" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge9" class="edge">
 <title>none~set~3&#45;&gt;proc~set3~3</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M328.84,-163.53C344.06,-165.49 360.97,-167.66 376.95,-169.71"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="376.93,-173.24 387.29,-171.04 377.82,-166.29 376.93,-173.24"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M311.11,-146.23C332.5,-160.2 369.53,-182.94 404,-197 409.33,-199.18 414.96,-201.19 420.66,-203.03"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="419.69,-206.39 430.27,-205.98 421.74,-199.7 419.69,-206.39"/>
 </g>
 <!-- proc~set4~3 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_node11" class="node">
+<g id="proc~~elevate_degree~3~~CallsGraph_node13" class="node">
 <title>proc~set4~3</title>
-<g id="a_proc~~elevate_degree~3~~CallsGraph_node11"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="497.5,-106 387.5,-106 387.5,-82 497.5,-82 497.5,-106"/>
-<text text-anchor="middle" x="442.5" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node13"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="544.5,-104 424.5,-104 424.5,-80 544.5,-80 544.5,-104"/>
+<text text-anchor="middle" x="484.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set4~3 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge8" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge10" class="edge">
 <title>none~set~3&#45;&gt;proc~set4~3</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M308.07,-144.83C329.24,-136.33 358.29,-124.79 384,-115 388.72,-113.2 393.67,-111.35 398.6,-109.52"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="399.82,-112.8 408,-106.06 397.4,-106.23 399.82,-112.8"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M347.59,-121.96C369.91,-117.04 395.89,-111.31 419.13,-106.19"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="419.89,-109.61 428.9,-104.04 418.38,-102.77 419.89,-109.61"/>
 </g>
 <!-- interface~compute_multiplicity -->
-<g id="proc~~elevate_degree~3~~CallsGraph_node5" class="node">
+<g id="proc~~elevate_degree~3~~CallsGraph_node6" class="node">
 <title>interface~compute_multiplicity</title>
-<g id="a_proc~~elevate_degree~3~~CallsGraph_node5"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1056,-128 932,-128 932,-104 1056,-104 1056,-128"/>
-<text text-anchor="middle" x="994" y="-113.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node6"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
+<polygon fill="#a7506f" stroke="#a7506f" points="1138,-167 1014,-167 1014,-143 1138,-143 1138,-167"/>
+<text text-anchor="middle" x="1076" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree_a_5_9&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge9" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge11" class="edge">
 <title>proc~elevate_degree_a_5_9&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00ff00" d="M343.38,-59.53C387.83,-63.3 447.97,-68.42 501,-73 650.6,-85.91 825.75,-101.28 921.5,-109.7"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="921.37,-113.2 931.64,-110.59 921.99,-106.23 921.37,-113.2"/>
+<path fill="none" stroke="#00ffff" d="M358.32,-62.05C482.59,-45.66 760.13,-21.39 978,-92 1006.66,-101.29 1035.04,-121.33 1053.63,-136.32"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="1051.51,-139.12 1061.44,-142.8 1055.98,-133.73 1051.51,-139.12"/>
 </g>
 <!-- proc~bincoeff -->
-<g id="proc~~elevate_degree~3~~CallsGraph_node6" class="node">
+<g id="proc~~elevate_degree~3~~CallsGraph_node7" class="node">
 <title>proc~bincoeff</title>
-<g id="a_proc~~elevate_degree~3~~CallsGraph_node6"><a xlink:href="../proc/bincoeff.html" xlink:title="bincoeff">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="470.5,-26 414.5,-26 414.5,-2 470.5,-2 470.5,-26"/>
-<text text-anchor="middle" x="442.5" y="-11.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">bincoeff</text>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node7"><a xlink:href="../proc/bincoeff.html" xlink:title="bincoeff">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="512.5,-24 456.5,-24 456.5,0 512.5,0 512.5,-24"/>
+<text text-anchor="middle" x="484.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">bincoeff</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree_a_5_9&#45;&gt;proc~bincoeff -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge10" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge12" class="edge">
 <title>proc~elevate_degree_a_5_9&#45;&gt;proc~bincoeff</title>
-<path fill="none" stroke="#00ff00" d="M327.06,-42C351.85,-35.93 381.45,-28.69 404.34,-23.09"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="405.46,-26.42 414.34,-20.64 403.8,-19.62 405.46,-26.42"/>
+<path fill="none" stroke="#00ffff" d="M337.98,-59.99C347.9,-57.17 358.34,-54.09 368,-51 384.2,-45.81 387.91,-43.53 404,-38 417.79,-33.26 432.99,-28.24 446.37,-23.88"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="447.77,-27.11 456.2,-20.7 445.61,-20.45 447.77,-27.11"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_node14" class="node">
+<g id="proc~~elevate_degree~3~~CallsGraph_node17" class="node">
 <title>proc~compute_multiplicity1</title>
-<g id="a_proc~~elevate_degree~3~~CallsGraph_node14"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1222,-149 1092,-149 1092,-125 1222,-125 1222,-149"/>
-<text text-anchor="middle" x="1157" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node17"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1304,-188 1174,-188 1174,-164 1304,-164 1304,-188"/>
+<text text-anchor="middle" x="1239" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge11" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge13" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1056.33,-124C1064.69,-125.09 1073.35,-126.22 1081.92,-127.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1081.53,-130.82 1091.9,-128.64 1082.44,-123.88 1081.53,-130.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1138.33,-163C1146.69,-164.09 1155.35,-165.22 1163.92,-166.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1163.53,-169.82 1173.9,-167.64 1164.44,-162.88 1163.53,-169.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_node15" class="node">
+<g id="proc~~elevate_degree~3~~CallsGraph_node18" class="node">
 <title>proc~compute_multiplicity2</title>
-<g id="a_proc~~elevate_degree~3~~CallsGraph_node15"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1222,-107 1092,-107 1092,-83 1222,-83 1222,-107"/>
-<text text-anchor="middle" x="1157" y="-92.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node18"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1304,-146 1174,-146 1174,-122 1304,-122 1304,-146"/>
+<text text-anchor="middle" x="1239" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge12" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge14" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1056.33,-108C1064.69,-106.91 1073.35,-105.78 1081.92,-104.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1082.44,-108.12 1091.9,-103.36 1081.53,-101.18 1082.44,-108.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1138.33,-147C1146.69,-145.91 1155.35,-144.78 1163.92,-143.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1164.44,-147.12 1173.9,-142.36 1163.53,-140.18 1164.44,-147.12"/>
 </g>
 <!-- proc~factln -->
-<g id="proc~~elevate_degree~3~~CallsGraph_node16" class="node">
+<g id="proc~~elevate_degree~3~~CallsGraph_node19" class="node">
 <title>proc~factln</title>
-<g id="a_proc~~elevate_degree~3~~CallsGraph_node16"><a xlink:href="../proc/factln.html" xlink:title="factln">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="641,-26 587,-26 587,-2 641,-2 641,-26"/>
-<text text-anchor="middle" x="614" y="-11.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">factln</text>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node19"><a xlink:href="../proc/factln.html" xlink:title="factln">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="709.5,-24 655.5,-24 655.5,0 709.5,0 709.5,-24"/>
+<text text-anchor="middle" x="682.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">factln</text>
 </a>
 </g>
 </g>
 <!-- proc~bincoeff&#45;&gt;proc~factln -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge13" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge15" class="edge">
 <title>proc~bincoeff&#45;&gt;proc~factln</title>
-<path fill="none" stroke="#ffda00" d="M470.73,-14C499.49,-14 544.97,-14 576.74,-14"/>
-<polygon fill="#ffda00" stroke="#ffda00" points="576.95,-17.5 586.95,-14 576.95,-10.5 576.95,-17.5"/>
+<path fill="none" stroke="#ffbf00" d="M512.75,-12C547.27,-12 606.86,-12 645.2,-12"/>
+<polygon fill="#ffbf00" stroke="#ffbf00" points="645.42,-15.5 655.42,-12 645.42,-8.5 645.42,-15.5"/>
 </g>
 <!-- proc~cmp_degree~3 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_node12" class="node">
+<g id="proc~~elevate_degree~3~~CallsGraph_node14" class="node">
 <title>proc~cmp_degree~3</title>
-<g id="a_proc~~elevate_degree~3~~CallsGraph_node12"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="691,-211 537,-211 537,-187 691,-187 691,-211"/>
-<text text-anchor="middle" x="614" y="-196.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node14"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="764,-209 601,-209 601,-185 764,-185 764,-209"/>
+<text text-anchor="middle" x="682.5" y="-194.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge14" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#48ff00" d="M476.66,-249.94C484.64,-247.03 493.13,-243.91 501,-241 524.37,-232.35 550.44,-222.58 571.54,-214.64"/>
-<polygon fill="#48ff00" stroke="#48ff00" points="573.04,-217.82 581.16,-211.02 570.57,-211.27 573.04,-217.82"/>
-</g>
 <!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge15" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge16" class="edge">
 <title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#00ff91" d="M497.6,-213.3C506.97,-212.14 516.92,-210.9 526.9,-209.67"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="527.37,-213.14 536.86,-208.43 526.51,-206.19 527.37,-213.14"/>
+<path fill="none" stroke="#00ffff" d="M544.57,-182.33C559.09,-183.88 574.97,-185.59 590.6,-187.26"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="590.51,-190.77 600.82,-188.36 591.25,-183.81 590.51,-190.77"/>
+</g>
+<!-- proc~cmp_nc~3 -->
+<g id="proc~~elevate_degree~3~~CallsGraph_node15" class="node">
+<title>proc~cmp_nc~3</title>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node15"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="752,-167 613,-167 613,-143 752,-143 752,-167"/>
+<text text-anchor="middle" x="682.5" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+</a>
+</g>
+</g>
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
+<g id="proc~~elevate_degree~3~~CallsGraph_edge17" class="edge">
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#00ffff" d="M544.57,-169.67C562.91,-167.71 583.41,-165.51 602.85,-163.43"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="603.34,-166.89 612.91,-162.35 602.59,-159.93 603.34,-166.89"/>
+</g>
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
+<g id="proc~~elevate_degree~3~~CallsGraph_edge18" class="edge">
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#003fff" d="M544.57,-140.33C562.91,-142.29 583.41,-144.49 602.85,-146.57"/>
+<polygon fill="#003fff" stroke="#003fff" points="602.59,-150.07 612.91,-147.65 603.34,-143.11 602.59,-150.07"/>
 </g>
 <!-- proc~compute_knot_vector -->
-<g id="proc~~elevate_degree~3~~CallsGraph_node13" class="node">
+<g id="proc~~elevate_degree~3~~CallsGraph_node16" class="node">
 <title>proc~compute_knot_vector</title>
-<g id="a_proc~~elevate_degree~3~~CallsGraph_node13"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="677.5,-148 550.5,-148 550.5,-124 677.5,-124 677.5,-148"/>
-<text text-anchor="middle" x="614" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node16"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="746,-125 619,-125 619,-101 746,-101 746,-125"/>
+<text text-anchor="middle" x="682.5" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge16" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge19" class="edge">
 <title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#0091ff" d="M497.6,-136C511.08,-136 525.77,-136 540,-136"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="540.26,-139.5 550.26,-136 540.26,-132.5 540.26,-139.5"/>
+<path fill="none" stroke="#003fff" d="M544.57,-127.67C564.72,-125.51 587.49,-123.07 608.59,-120.81"/>
+<polygon fill="#003fff" stroke="#003fff" points="609.23,-124.26 618.8,-119.72 608.49,-117.3 609.23,-124.26"/>
 </g>
 <!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge17" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge20" class="edge">
 <title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#4800ff" d="M497.6,-184.7C506.97,-185.86 516.92,-187.1 526.9,-188.33"/>
-<polygon fill="#4800ff" stroke="#4800ff" points="526.51,-191.81 536.86,-189.57 527.37,-184.86 526.51,-191.81"/>
+<path fill="none" stroke="#7f00ff" d="M544.57,-211.67C559.09,-210.12 574.97,-208.41 590.6,-206.74"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="591.25,-210.19 600.82,-205.64 590.51,-203.23 591.25,-210.19"/>
 </g>
 <!-- proc~get_multiplicity~3 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_node17" class="node">
+<g id="proc~~elevate_degree~3~~CallsGraph_node20" class="node">
 <title>proc~get_multiplicity~3</title>
-<g id="a_proc~~elevate_degree~3~~CallsGraph_node17"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="896,-190 727,-190 727,-166 896,-166 896,-190"/>
-<text text-anchor="middle" x="811.5" y="-175.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node20"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="978,-208 800,-208 800,-184 978,-184 978,-208"/>
+<text text-anchor="middle" x="889" y="-193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge18" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge21" class="edge">
 <title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#ff0000" d="M691.15,-190.82C699.54,-189.92 708.17,-188.99 716.75,-188.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="717.22,-191.54 726.79,-186.99 716.47,-184.58 717.22,-191.54"/>
+<path fill="none" stroke="#ff0000" d="M764.03,-196.61C772.47,-196.56 781.11,-196.52 789.71,-196.48"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="789.8,-199.98 799.78,-196.43 789.76,-192.98 789.8,-199.98"/>
+</g>
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
+<g id="proc~~elevate_degree~3~~CallsGraph_edge22" class="edge">
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
+<path fill="none" stroke="#ffff00" d="M752.14,-155C822.69,-155 932.03,-155 1003.57,-155"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="1003.85,-158.5 1013.85,-155 1003.85,-151.5 1003.85,-158.5"/>
 </g>
 <!-- proc~repelem -->
-<g id="proc~~elevate_degree~3~~CallsGraph_node18" class="node">
+<g id="proc~~elevate_degree~3~~CallsGraph_node21" class="node">
 <title>proc~repelem</title>
-<g id="a_proc~~elevate_degree~3~~CallsGraph_node18"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="840,-148 783,-148 783,-124 840,-124 840,-148"/>
-<text text-anchor="middle" x="811.5" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<g id="a_proc~~elevate_degree~3~~CallsGraph_node21"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="917.5,-125 860.5,-125 860.5,-101 917.5,-101 917.5,-125"/>
+<text text-anchor="middle" x="889" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge19" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge23" class="edge">
 <title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#cbff00" d="M677.66,-136C708.92,-136 745.69,-136 772.61,-136"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="772.78,-139.5 782.78,-136 772.78,-132.5 772.78,-139.5"/>
+<path fill="none" stroke="#00ff00" d="M746.25,-113C780.23,-113 821.1,-113 850.2,-113"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="850.36,-116.5 860.36,-113 850.35,-109.5 850.36,-116.5"/>
 </g>
 <!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~elevate_degree~3~~CallsGraph_edge20" class="edge">
+<g id="proc~~elevate_degree~3~~CallsGraph_edge24" class="edge">
 <title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M865.42,-166C875.65,-163.31 886.22,-160.28 896,-157 917.01,-149.96 939.88,-140.4 958.12,-132.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="959.8,-135.36 967.48,-128.06 956.92,-128.98 959.8,-135.36"/>
+<path fill="none" stroke="#ff0000" d="M944.51,-183.92C965.21,-179.33 988.98,-174.06 1010.52,-169.29"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1011.56,-172.64 1020.56,-167.06 1010.04,-165.81 1011.56,-172.64"/>
 </g>
 </g>
 </svg>
@@ -583,31 +649,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~elevate_degree~3~~CalledByGraph Pages: 1 -->
-<svg id="procelevate_degree3CalledByGraph" width="314pt" height="32pt"
- viewBox="0.00 0.00 314.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procelevate_degree3CalledByGraph" width="334pt" height="32pt"
+ viewBox="0.00 0.00 334.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~elevate_degree~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~elevate_degree~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 310,-28 310,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 330,-28 330,4 -4,4"/>
 <!-- proc~elevate_degree~3 -->
 <g id="proc~~elevate_degree~3~~CalledByGraph_node1" class="node">
 <title>proc~elevate_degree~3</title>
-<polygon fill="none" stroke="black" points="306,-24 136,-24 136,0 306,0 306,-24"/>
-<text text-anchor="middle" x="221" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%elevate_degree</text>
+<polygon fill="none" stroke="black" points="326,-24 146,-24 146,0 326,0 326,-24"/>
+<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%elevate_degree</text>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~elevate_degree~3~~CalledByGraph_node2" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~elevate_degree~3~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="100,-24 0,-24 0,0 100,0 100,-24"/>
-<text text-anchor="middle" x="50" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~elevate_degree~3~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
 <g id="proc~~elevate_degree~3~~CalledByGraph_edge1" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
-<path fill="none" stroke="#ff0000" d="M100.34,-12C108.39,-12 116.96,-12 125.67,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="125.94,-15.5 135.94,-12 125.94,-8.5 125.94,-15.5"/>
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#ff0000" d="M110.19,-12C118.33,-12 126.93,-12 135.65,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="135.93,-15.5 145.93,-12 135.93,-8.5 135.93,-15.5"/>
 </g>
 </g>
 </svg>
@@ -723,7 +789,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/export_xc.html b/proc/export_xc.html
index 44d4a60ce..7fd5d508f 100644
--- a/proc/export_xc.html
+++ b/proc/export_xc.html
@@ -83,15 +83,15 @@ <h1>export_Xc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">export_Xc</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private impure subroutine export_Xc(this, filename)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
         <tr>
             <td>
               <span class="anchor" id="variable-this~25"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -201,91 +201,91 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~export_xc~~CallsGraph Pages: 1 -->
-<svg id="procexport_xcCallsGraph" width="641pt" height="111pt"
- viewBox="0.00 0.00 641.00 110.65" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~export_xc~~CallsGraph" class="graph" transform="scale(1.05 1.05) rotate(0) translate(4 112)">
+<svg id="procexport_xcCallsGraph" width="641pt" height="114pt"
+ viewBox="0.00 0.00 641.00 114.04" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~export_xc~~CallsGraph" class="graph" transform="scale(1.02 1.02) rotate(0) translate(4 112)">
 <title>proc~~export_xc~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 668,-112 668,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 648,-112 648,4 -4,4"/>
 <!-- proc~export_xc -->
 <g id="proc~~export_xc~~CallsGraph_node1" class="node">
 <title>proc~export_xc</title>
-<polygon fill="none" stroke="black" points="150,-66 0,-66 0,-42 150,-42 150,-66"/>
-<text text-anchor="middle" x="75" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%export_Xc</text>
+<polygon fill="none" stroke="black" points="140,-66 0,-66 0,-42 140,-42 140,-66"/>
+<text text-anchor="middle" x="70" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%export_Xc</text>
 </g>
 <!-- proc~cmp_elem_xc_vis -->
 <g id="proc~~export_xc~~CallsGraph_node2" class="node">
 <title>proc~cmp_elem_xc_vis</title>
-<g id="a_proc~~export_xc~~CallsGraph_node2"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="377,-66 186,-66 186,-42 377,-42 377,-66"/>
-<text text-anchor="middle" x="281.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
+<g id="a_proc~~export_xc~~CallsGraph_node2"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="357,-66 176,-66 176,-42 357,-42 357,-66"/>
+<text text-anchor="middle" x="266.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
 <g id="proc~~export_xc~~CallsGraph_edge1" class="edge">
 <title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
-<path fill="none" stroke="#ff0000" d="M150.12,-54C158.42,-54 166.98,-54 175.57,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="175.66,-57.5 185.66,-54 175.66,-50.5 175.66,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M140.12,-54C148.44,-54 157.06,-54 165.71,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="165.85,-57.5 175.85,-54 165.85,-50.5 165.85,-57.5"/>
 </g>
 <!-- interface~elemconn_c0 -->
 <g id="proc~~export_xc~~CallsGraph_node3" class="node">
 <title>interface~elemconn_c0</title>
 <g id="a_proc~~export_xc~~CallsGraph_node3"><a xlink:href="../interface/elemconn_c0.html" xlink:title="elemConn_C0">
-<polygon fill="#a7506f" stroke="#a7506f" points="500,-66 413,-66 413,-42 500,-42 500,-66"/>
-<text text-anchor="middle" x="456.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="480,-66 393,-66 393,-42 480,-42 480,-66"/>
+<text text-anchor="middle" x="436.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~export_xc~~CallsGraph_edge2" class="edge">
 <title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M377.1,-54C385.86,-54 394.51,-54 402.69,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="402.76,-57.5 412.76,-54 402.76,-50.5 402.76,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M357.4,-54C366.07,-54 374.65,-54 382.78,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="382.8,-57.5 392.8,-54 382.8,-50.5 382.8,-57.5"/>
 </g>
 <!-- proc~cmp_elemconn_c0_l -->
 <g id="proc~~export_xc~~CallsGraph_node4" class="node">
 <title>proc~cmp_elemconn_c0_l</title>
 <g id="a_proc~~export_xc~~CallsGraph_node4"><a xlink:href="../proc/cmp_elemconn_c0_l.html" xlink:title="cmp_elemConn_C0_L">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="663.5,-108 536.5,-108 536.5,-84 663.5,-84 663.5,-108"/>
-<text text-anchor="middle" x="600" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="643.5,-108 516.5,-108 516.5,-84 643.5,-84 643.5,-108"/>
+<text text-anchor="middle" x="580" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l -->
 <g id="proc~~export_xc~~CallsGraph_edge3" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M498.05,-66.04C513.74,-70.69 531.87,-76.07 548.4,-80.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="547.86,-84.47 558.45,-83.96 549.86,-77.76 547.86,-84.47"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M478.05,-66.04C493.74,-70.69 511.87,-76.07 528.4,-80.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="527.86,-84.47 538.45,-83.96 529.86,-77.76 527.86,-84.47"/>
 </g>
 <!-- proc~cmp_elemconn_c0_s -->
 <g id="proc~~export_xc~~CallsGraph_node5" class="node">
 <title>proc~cmp_elemconn_c0_s</title>
 <g id="a_proc~~export_xc~~CallsGraph_node5"><a xlink:href="../proc/cmp_elemconn_c0_s.html" xlink:title="cmp_elemConn_C0_S">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="663.5,-66 536.5,-66 536.5,-42 663.5,-42 663.5,-66"/>
-<text text-anchor="middle" x="600" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="643.5,-66 516.5,-66 516.5,-42 643.5,-42 643.5,-66"/>
+<text text-anchor="middle" x="580" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s -->
 <g id="proc~~export_xc~~CallsGraph_edge4" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M500.34,-54C508.61,-54 517.49,-54 526.41,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="526.47,-57.5 536.47,-54 526.47,-50.5 526.47,-57.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M480.34,-54C488.61,-54 497.49,-54 506.41,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="506.47,-57.5 516.47,-54 506.47,-50.5 506.47,-57.5"/>
 </g>
 <!-- proc~cmp_elemconn_c0_v -->
 <g id="proc~~export_xc~~CallsGraph_node6" class="node">
 <title>proc~cmp_elemconn_c0_v</title>
 <g id="a_proc~~export_xc~~CallsGraph_node6"><a xlink:href="../proc/cmp_elemconn_c0_v.html" xlink:title="cmp_elemConn_C0_V">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-24 536,-24 536,0 664,0 664,-24"/>
-<text text-anchor="middle" x="600" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="644,-24 516,-24 516,0 644,0 644,-24"/>
+<text text-anchor="middle" x="580" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v -->
 <g id="proc~~export_xc~~CallsGraph_edge5" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M498.05,-41.96C513.74,-37.31 531.87,-31.93 548.4,-27.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="549.86,-30.24 558.45,-24.04 547.86,-23.53 549.86,-30.24"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M478.05,-41.96C493.74,-37.31 511.87,-31.93 528.4,-27.02"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="529.86,-30.24 538.45,-24.04 527.86,-23.53 529.86,-30.24"/>
 </g>
 </g>
 </svg>
@@ -385,121 +385,91 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~export_xc~~CalledByGraph Pages: 1 -->
-<svg id="procexport_xcCalledByGraph" width="333pt" height="284pt"
- viewBox="0.00 0.00 333.00 284.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~export_xc~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 280)">
+<svg id="procexport_xcCalledByGraph" width="313pt" height="200pt"
+ viewBox="0.00 0.00 313.00 200.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~export_xc~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 196)">
 <title>proc~~export_xc~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-280 329,-280 329,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-196 309,-196 309,4 -4,4"/>
 <!-- proc~export_xc -->
 <g id="proc~~export_xc~~CalledByGraph_node1" class="node">
 <title>proc~export_xc</title>
-<polygon fill="none" stroke="black" points="325,-150 175,-150 175,-126 325,-126 325,-150"/>
-<text text-anchor="middle" x="250" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%export_Xc</text>
+<polygon fill="none" stroke="black" points="305,-108 165,-108 165,-84 305,-84 305,-108"/>
+<text text-anchor="middle" x="235" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%export_Xc</text>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example1_curve -->
 <g id="proc~~export_xc~~CalledByGraph_node2" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~export_xc~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-276 14.5,-276 14.5,-252 124.5,-252 124.5,-276"/>
-<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~export_xc~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-192 14.5,-192 14.5,-168 114.5,-168 114.5,-192"/>
+<text text-anchor="middle" x="64.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~export_xc -->
+<!-- program~example1_curve&#45;&gt;proc~export_xc -->
 <g id="proc~~export_xc~~CalledByGraph_edge1" class="edge">
-<title>program~example3_volume&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M119.96,-251.89C126.57,-249.4 133.1,-246.46 139,-243 177.55,-220.42 213.2,-181.81 232.94,-158.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="235.83,-160.23 239.47,-150.28 230.42,-155.79 235.83,-160.23"/>
+<title>program~example1_curve&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M106.33,-167.98C113.98,-165.32 121.82,-162.29 129,-159 157.11,-146.11 187.18,-127.53 207.9,-113.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="210.07,-116.64 216.45,-108.18 206.19,-110.82 210.07,-116.64"/>
 </g>
-<!-- program~example_nurbs_volume -->
+<!-- program~example_nurbs_curve -->
 <g id="proc~~export_xc~~CalledByGraph_node3" class="node">
-<title>program~example_nurbs_volume</title>
-<g id="a_proc~~export_xc~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-234 0,-234 0,-210 139,-210 139,-234"/>
-<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<title>program~example_nurbs_curve</title>
+<g id="a_proc~~export_xc~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129,-150 0,-150 0,-126 129,-126 129,-150"/>
+<text text-anchor="middle" x="64.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~export_xc -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~export_xc -->
 <g id="proc~~export_xc~~CalledByGraph_edge2" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M114.88,-209.98C123.02,-207.33 131.35,-204.31 139,-201 168.69,-188.14 200.55,-169.28 222.3,-155.54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="224.43,-158.34 230.97,-150.01 220.66,-152.44 224.43,-158.34"/>
+<title>program~example_nurbs_curve&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M113.79,-125.96C133.17,-121.13 155.69,-115.52 175.96,-110.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="176.85,-113.85 185.71,-108.04 175.16,-107.06 176.85,-113.85"/>
 </g>
-<!-- program~example_put_to_nurbs -->
+<!-- program~shape_c_1d -->
 <g id="proc~~export_xc~~CalledByGraph_node4" class="node">
-<title>program~example_put_to_nurbs</title>
-<g id="a_proc~~export_xc~~CalledByGraph_node4"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-192 3.5,-192 3.5,-168 135.5,-168 135.5,-192"/>
-<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
+<title>program~shape_c_1d</title>
+<g id="a_proc~~export_xc~~CalledByGraph_node4"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102.5,-108 26.5,-108 26.5,-84 102.5,-84 102.5,-108"/>
+<text text-anchor="middle" x="64.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xc -->
+<!-- program~shape_c_1d&#45;&gt;proc~export_xc -->
 <g id="proc~~export_xc~~CalledByGraph_edge3" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M121.65,-167.96C142.38,-163.09 166.48,-157.42 188.1,-152.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="188.91,-155.73 197.84,-150.04 187.31,-148.92 188.91,-155.73"/>
+<title>program~shape_c_1d&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M102.9,-96C118.28,-96 136.71,-96 154.83,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="154.84,-99.5 164.84,-96 154.84,-92.5 154.84,-99.5"/>
 </g>
-<!-- program~shape_c_3d -->
+<!-- program~shape_circle -->
 <g id="proc~~export_xc~~CalledByGraph_node5" class="node">
-<title>program~shape_c_3d</title>
-<g id="a_proc~~export_xc~~CalledByGraph_node5"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
-<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<title>program~shape_circle</title>
+<g id="a_proc~~export_xc~~CalledByGraph_node5"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="104,-66 25,-66 25,-42 104,-42 104,-66"/>
+<text text-anchor="middle" x="64.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~export_xc -->
+<!-- program~shape_circle&#45;&gt;proc~export_xc -->
 <g id="proc~~export_xc~~CalledByGraph_edge4" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M107.92,-138C124.54,-138 144.82,-138 164.77,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="164.83,-141.5 174.83,-138 164.83,-134.5 164.83,-141.5"/>
+<title>program~shape_circle&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M104.16,-63.64C125.33,-68.91 151.99,-75.56 175.64,-81.45"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="175.02,-84.91 185.57,-83.93 176.71,-78.11 175.02,-84.91"/>
 </g>
-<!-- program~shape_half_ring_3d -->
+<!-- program~shape_half_circle -->
 <g id="proc~~export_xc~~CalledByGraph_node6" class="node">
-<title>program~shape_half_ring_3d</title>
-<g id="a_proc~~export_xc~~CalledByGraph_node6"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
-<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<title>program~shape_half_circle</title>
+<g id="a_proc~~export_xc~~CalledByGraph_node6"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116.5,-24 12.5,-24 12.5,0 116.5,0 116.5,-24"/>
+<text text-anchor="middle" x="64.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xc -->
+<!-- program~shape_half_circle&#45;&gt;proc~export_xc -->
 <g id="proc~~export_xc~~CalledByGraph_edge5" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M121.65,-108.04C142.38,-112.91 166.48,-118.58 188.1,-123.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="187.31,-127.08 197.84,-125.96 188.91,-120.27 187.31,-127.08"/>
-</g>
-<!-- program~shape_hexahedron -->
-<g id="proc~~export_xc~~CalledByGraph_node7" class="node">
-<title>program~shape_hexahedron</title>
-<g id="a_proc~~export_xc~~CalledByGraph_node7"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-66 13,-66 13,-42 126,-42 126,-66"/>
-<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
-</a>
-</g>
-</g>
-<!-- program~shape_hexahedron&#45;&gt;proc~export_xc -->
-<g id="proc~~export_xc~~CalledByGraph_edge6" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M114.88,-66.02C123.02,-68.67 131.35,-71.69 139,-75 168.69,-87.86 200.55,-106.72 222.3,-120.46"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="220.66,-123.56 230.97,-125.99 224.43,-117.66 220.66,-123.56"/>
-</g>
-<!-- program~shape_ring_3d -->
-<g id="proc~~export_xc~~CalledByGraph_node8" class="node">
-<title>program~shape_ring_3d</title>
-<g id="a_proc~~export_xc~~CalledByGraph_node8"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-24 24.5,-24 24.5,0 114.5,0 114.5,-24"/>
-<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_ring_3d&#45;&gt;proc~export_xc -->
-<g id="proc~~export_xc~~CalledByGraph_edge7" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~export_xc</title>
-<path fill="none" stroke="#ff0000" d="M114.54,-22.18C122.96,-25.04 131.49,-28.6 139,-33 177.55,-55.58 213.2,-94.19 232.94,-117.77"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="230.42,-120.21 239.47,-125.72 235.83,-115.77 230.42,-120.21"/>
+<title>program~shape_half_circle&#45;&gt;proc~export_xc</title>
+<path fill="none" stroke="#ff0000" d="M106.33,-24.02C113.98,-26.68 121.82,-29.71 129,-33 157.11,-45.89 187.18,-64.47 207.9,-78.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="206.19,-81.18 216.45,-83.82 210.07,-75.36 206.19,-81.18"/>
 </g>
 </g>
 </svg>
@@ -615,7 +585,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/export_xc~2.html b/proc/export_xc~2.html
index 374484d74..998a19ac4 100644
--- a/proc/export_xc~2.html
+++ b/proc/export_xc~2.html
@@ -83,15 +83,15 @@ <h1>export_Xc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">export_Xc</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private impure subroutine export_Xc(this, filename)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~93"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~86"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -210,14 +210,14 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~export_xc~2~~CallsGraph_node1" class="node">
 <title>proc~export_xc~2</title>
 <polygon fill="none" stroke="black" points="150,-66 0,-66 0,-42 150,-42 150,-66"/>
-<text text-anchor="middle" x="75" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%export_Xc</text>
+<text text-anchor="middle" x="75" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%export_Xc</text>
 </g>
 <!-- proc~cmp_elem_xc_vis~2 -->
 <g id="proc~~export_xc~2~~CallsGraph_node2" class="node">
 <title>proc~cmp_elem_xc_vis~2</title>
-<g id="a_proc~~export_xc~2~~CallsGraph_node2"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
+<g id="a_proc~~export_xc~2~~CallsGraph_node2"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="377,-66 186,-66 186,-42 377,-42 377,-66"/>
-<text text-anchor="middle" x="281.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
+<text text-anchor="middle" x="281.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
@@ -385,106 +385,121 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~export_xc~2~~CalledByGraph Pages: 1 -->
-<svg id="procexport_xc2CalledByGraph" width="333pt" height="242pt"
- viewBox="0.00 0.00 333.00 242.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~export_xc~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 238)">
+<svg id="procexport_xc2CalledByGraph" width="333pt" height="284pt"
+ viewBox="0.00 0.00 333.00 284.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~export_xc~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 280)">
 <title>proc~~export_xc~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-238 329,-238 329,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-280 329,-280 329,4 -4,4"/>
 <!-- proc~export_xc~2 -->
 <g id="proc~~export_xc~2~~CalledByGraph_node1" class="node">
 <title>proc~export_xc~2</title>
-<polygon fill="none" stroke="black" points="325,-129 175,-129 175,-105 325,-105 325,-129"/>
-<text text-anchor="middle" x="250" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%export_Xc</text>
+<polygon fill="none" stroke="black" points="325,-150 175,-150 175,-126 325,-126 325,-150"/>
+<text text-anchor="middle" x="250" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%export_Xc</text>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~export_xc~2~~CalledByGraph_node2" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~export_xc~2~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-234 14.5,-234 14.5,-210 124.5,-210 124.5,-234"/>
-<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<title>program~example3_volume</title>
+<g id="a_proc~~export_xc~2~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-276 14.5,-276 14.5,-252 124.5,-252 124.5,-276"/>
+<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~export_xc~2 -->
+<!-- program~example3_volume&#45;&gt;proc~export_xc~2 -->
 <g id="proc~~export_xc~2~~CalledByGraph_edge1" class="edge">
-<title>program~example3_surface&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M117.8,-209.92C125.07,-207.38 132.36,-204.41 139,-201 173.15,-183.45 207.52,-155.08 228.54,-136.24"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="231.13,-138.61 236.17,-129.28 226.42,-133.43 231.13,-138.61"/>
+<title>program~example3_volume&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0000" d="M119.96,-251.89C126.57,-249.4 133.1,-246.46 139,-243 177.55,-220.42 213.2,-181.81 232.94,-158.23"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="235.83,-160.23 239.47,-150.28 230.42,-155.79 235.83,-160.23"/>
 </g>
-<!-- program~example_nurbs_surface -->
+<!-- program~example_nurbs_volume -->
 <g id="proc~~export_xc~2~~CalledByGraph_node3" class="node">
-<title>program~example_nurbs_surface</title>
-<g id="a_proc~~export_xc~2~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-192 0,-192 0,-168 139,-168 139,-192"/>
-<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<title>program~example_nurbs_volume</title>
+<g id="a_proc~~export_xc~2~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-234 0,-234 0,-210 139,-210 139,-234"/>
+<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~export_xc~2 -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~export_xc~2 -->
 <g id="proc~~export_xc~2~~CalledByGraph_edge2" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M111.58,-167.9C120.65,-165.09 130.18,-162.03 139,-159 162.53,-150.91 188.55,-141.02 209.38,-132.87"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="210.83,-136.06 218.85,-129.14 208.26,-129.54 210.83,-136.06"/>
+<title>program~example_nurbs_volume&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0000" d="M114.88,-209.98C123.02,-207.33 131.35,-204.31 139,-201 168.69,-188.14 200.55,-169.28 222.3,-155.54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="224.43,-158.34 230.97,-150.01 220.66,-152.44 224.43,-158.34"/>
 </g>
-<!-- program~shape_c_2d -->
+<!-- program~example_put_to_nurbs -->
 <g id="proc~~export_xc~2~~CalledByGraph_node4" class="node">
-<title>program~shape_c_2d</title>
-<g id="a_proc~~export_xc~2~~CalledByGraph_node4"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
-<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+<title>program~example_put_to_nurbs</title>
+<g id="a_proc~~export_xc~2~~CalledByGraph_node4"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-192 3.5,-192 3.5,-168 135.5,-168 135.5,-192"/>
+<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~export_xc~2 -->
+<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xc~2 -->
 <g id="proc~~export_xc~2~~CalledByGraph_edge3" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M107.92,-133.6C124.54,-131.64 144.82,-129.26 164.77,-126.91"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="165.31,-130.37 174.83,-125.73 164.49,-123.42 165.31,-130.37"/>
+<title>program~example_put_to_nurbs&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0000" d="M121.65,-167.96C142.38,-163.09 166.48,-157.42 188.1,-152.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="188.91,-155.73 197.84,-150.04 187.31,-148.92 188.91,-155.73"/>
 </g>
-<!-- program~shape_half_ring_2d -->
+<!-- program~shape_c_3d -->
 <g id="proc~~export_xc~2~~CalledByGraph_node5" class="node">
-<title>program~shape_half_ring_2d</title>
-<g id="a_proc~~export_xc~2~~CalledByGraph_node5"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
-<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+<title>program~shape_c_3d</title>
+<g id="a_proc~~export_xc~2~~CalledByGraph_node5"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
+<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xc~2 -->
+<!-- program~shape_c_3d&#45;&gt;proc~export_xc~2 -->
 <g id="proc~~export_xc~2~~CalledByGraph_edge4" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M127.47,-102.7C139.38,-104.1 152.19,-105.61 164.85,-107.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="164.62,-110.6 174.96,-108.29 165.44,-103.64 164.62,-110.6"/>
+<title>program~shape_c_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0000" d="M107.92,-138C124.54,-138 144.82,-138 164.77,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="164.83,-141.5 174.83,-138 164.83,-134.5 164.83,-141.5"/>
 </g>
-<!-- program~shape_ring_2d -->
+<!-- program~shape_half_ring_3d -->
 <g id="proc~~export_xc~2~~CalledByGraph_node6" class="node">
-<title>program~shape_ring_2d</title>
-<g id="a_proc~~export_xc~2~~CalledByGraph_node6"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-66 24.5,-66 24.5,-42 114.5,-42 114.5,-66"/>
-<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+<title>program~shape_half_ring_3d</title>
+<g id="a_proc~~export_xc~2~~CalledByGraph_node6"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
+<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~export_xc~2 -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xc~2 -->
 <g id="proc~~export_xc~2~~CalledByGraph_edge5" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M111.58,-66.1C120.65,-68.91 130.18,-71.97 139,-75 162.53,-83.09 188.55,-92.98 209.38,-101.13"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="208.26,-104.46 218.85,-104.86 210.83,-97.94 208.26,-104.46"/>
+<title>program~shape_half_ring_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0000" d="M121.65,-108.04C142.38,-112.91 166.48,-118.58 188.1,-123.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="187.31,-127.08 197.84,-125.96 188.91,-120.27 187.31,-127.08"/>
 </g>
-<!-- program~shape_tetragon -->
+<!-- program~shape_hexahedron -->
 <g id="proc~~export_xc~2~~CalledByGraph_node7" class="node">
-<title>program~shape_tetragon</title>
-<g id="a_proc~~export_xc~2~~CalledByGraph_node7"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-24 21.5,-24 21.5,0 117.5,0 117.5,-24"/>
-<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<title>program~shape_hexahedron</title>
+<g id="a_proc~~export_xc~2~~CalledByGraph_node7"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-66 13,-66 13,-42 126,-42 126,-66"/>
+<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~export_xc~2 -->
+<!-- program~shape_hexahedron&#45;&gt;proc~export_xc~2 -->
 <g id="proc~~export_xc~2~~CalledByGraph_edge6" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~export_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M117.8,-24.08C125.07,-26.62 132.36,-29.59 139,-33 173.15,-50.55 207.52,-78.92 228.54,-97.76"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="226.42,-100.57 236.17,-104.72 231.13,-95.39 226.42,-100.57"/>
+<title>program~shape_hexahedron&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0000" d="M114.88,-66.02C123.02,-68.67 131.35,-71.69 139,-75 168.69,-87.86 200.55,-106.72 222.3,-120.46"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="220.66,-123.56 230.97,-125.99 224.43,-117.66 220.66,-123.56"/>
+</g>
+<!-- program~shape_ring_3d -->
+<g id="proc~~export_xc~2~~CalledByGraph_node8" class="node">
+<title>program~shape_ring_3d</title>
+<g id="a_proc~~export_xc~2~~CalledByGraph_node8"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-24 24.5,-24 24.5,0 114.5,0 114.5,-24"/>
+<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_ring_3d&#45;&gt;proc~export_xc~2 -->
+<g id="proc~~export_xc~2~~CalledByGraph_edge7" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~export_xc~2</title>
+<path fill="none" stroke="#ff0000" d="M114.54,-22.18C122.96,-25.04 131.49,-28.6 139,-33 177.55,-55.58 213.2,-94.19 232.94,-117.77"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="230.42,-120.21 239.47,-125.72 235.83,-115.77 230.42,-120.21"/>
 </g>
 </g>
 </svg>
@@ -600,7 +615,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/export_xc~3.html b/proc/export_xc~3.html
index 816cc3a96..0cdf0f7e9 100644
--- a/proc/export_xc~3.html
+++ b/proc/export_xc~3.html
@@ -83,15 +83,15 @@ <h1>export_Xc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">export_Xc</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private impure subroutine export_Xc(this, filename)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~156"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~154"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -201,91 +201,91 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~export_xc~3~~CallsGraph Pages: 1 -->
-<svg id="procexport_xc3CallsGraph" width="641pt" height="114pt"
- viewBox="0.00 0.00 641.00 114.04" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~export_xc~3~~CallsGraph" class="graph" transform="scale(1.02 1.02) rotate(0) translate(4 112)">
+<svg id="procexport_xc3CallsGraph" width="641pt" height="111pt"
+ viewBox="0.00 0.00 641.00 110.65" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~export_xc~3~~CallsGraph" class="graph" transform="scale(1.05 1.05) rotate(0) translate(4 112)">
 <title>proc~~export_xc~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 648,-112 648,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 668,-112 668,4 -4,4"/>
 <!-- proc~export_xc~3 -->
 <g id="proc~~export_xc~3~~CallsGraph_node1" class="node">
 <title>proc~export_xc~3</title>
-<polygon fill="none" stroke="black" points="140,-66 0,-66 0,-42 140,-42 140,-66"/>
-<text text-anchor="middle" x="70" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%export_Xc</text>
+<polygon fill="none" stroke="black" points="150,-66 0,-66 0,-42 150,-42 150,-66"/>
+<text text-anchor="middle" x="75" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%export_Xc</text>
 </g>
 <!-- proc~cmp_elem_xc_vis~3 -->
 <g id="proc~~export_xc~3~~CallsGraph_node2" class="node">
 <title>proc~cmp_elem_xc_vis~3</title>
-<g id="a_proc~~export_xc~3~~CallsGraph_node2"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="357,-66 176,-66 176,-42 357,-42 357,-66"/>
-<text text-anchor="middle" x="266.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xc_vis</text>
+<g id="a_proc~~export_xc~3~~CallsGraph_node2"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="377,-66 186,-66 186,-42 377,-42 377,-66"/>
+<text text-anchor="middle" x="281.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
 <g id="proc~~export_xc~3~~CallsGraph_edge1" class="edge">
 <title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
-<path fill="none" stroke="#ff0000" d="M140.12,-54C148.44,-54 157.06,-54 165.71,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="165.85,-57.5 175.85,-54 165.85,-50.5 165.85,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M150.12,-54C158.42,-54 166.98,-54 175.57,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="175.66,-57.5 185.66,-54 175.66,-50.5 175.66,-57.5"/>
 </g>
 <!-- interface~elemconn_c0 -->
 <g id="proc~~export_xc~3~~CallsGraph_node3" class="node">
 <title>interface~elemconn_c0</title>
 <g id="a_proc~~export_xc~3~~CallsGraph_node3"><a xlink:href="../interface/elemconn_c0.html" xlink:title="elemConn_C0">
-<polygon fill="#a7506f" stroke="#a7506f" points="480,-66 393,-66 393,-42 480,-42 480,-66"/>
-<text text-anchor="middle" x="436.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="500,-66 413,-66 413,-42 500,-42 500,-66"/>
+<text text-anchor="middle" x="456.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~export_xc~3~~CallsGraph_edge2" class="edge">
 <title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M357.4,-54C366.07,-54 374.65,-54 382.78,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="382.8,-57.5 392.8,-54 382.8,-50.5 382.8,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M377.1,-54C385.86,-54 394.51,-54 402.69,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="402.76,-57.5 412.76,-54 402.76,-50.5 402.76,-57.5"/>
 </g>
 <!-- proc~cmp_elemconn_c0_l -->
 <g id="proc~~export_xc~3~~CallsGraph_node4" class="node">
 <title>proc~cmp_elemconn_c0_l</title>
 <g id="a_proc~~export_xc~3~~CallsGraph_node4"><a xlink:href="../proc/cmp_elemconn_c0_l.html" xlink:title="cmp_elemConn_C0_L">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="643.5,-108 516.5,-108 516.5,-84 643.5,-84 643.5,-108"/>
-<text text-anchor="middle" x="580" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="663.5,-108 536.5,-108 536.5,-84 663.5,-84 663.5,-108"/>
+<text text-anchor="middle" x="600" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l -->
 <g id="proc~~export_xc~3~~CallsGraph_edge3" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M478.05,-66.04C493.74,-70.69 511.87,-76.07 528.4,-80.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="527.86,-84.47 538.45,-83.96 529.86,-77.76 527.86,-84.47"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M498.05,-66.04C513.74,-70.69 531.87,-76.07 548.4,-80.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="547.86,-84.47 558.45,-83.96 549.86,-77.76 547.86,-84.47"/>
 </g>
 <!-- proc~cmp_elemconn_c0_s -->
 <g id="proc~~export_xc~3~~CallsGraph_node5" class="node">
 <title>proc~cmp_elemconn_c0_s</title>
 <g id="a_proc~~export_xc~3~~CallsGraph_node5"><a xlink:href="../proc/cmp_elemconn_c0_s.html" xlink:title="cmp_elemConn_C0_S">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="643.5,-66 516.5,-66 516.5,-42 643.5,-42 643.5,-66"/>
-<text text-anchor="middle" x="580" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="663.5,-66 536.5,-66 536.5,-42 663.5,-42 663.5,-66"/>
+<text text-anchor="middle" x="600" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s -->
 <g id="proc~~export_xc~3~~CallsGraph_edge4" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M480.34,-54C488.61,-54 497.49,-54 506.41,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="506.47,-57.5 516.47,-54 506.47,-50.5 506.47,-57.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M500.34,-54C508.61,-54 517.49,-54 526.41,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="526.47,-57.5 536.47,-54 526.47,-50.5 526.47,-57.5"/>
 </g>
 <!-- proc~cmp_elemconn_c0_v -->
 <g id="proc~~export_xc~3~~CallsGraph_node6" class="node">
 <title>proc~cmp_elemconn_c0_v</title>
 <g id="a_proc~~export_xc~3~~CallsGraph_node6"><a xlink:href="../proc/cmp_elemconn_c0_v.html" xlink:title="cmp_elemConn_C0_V">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="644,-24 516,-24 516,0 644,0 644,-24"/>
-<text text-anchor="middle" x="580" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-24 536,-24 536,0 664,0 664,-24"/>
+<text text-anchor="middle" x="600" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v -->
 <g id="proc~~export_xc~3~~CallsGraph_edge5" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M478.05,-41.96C493.74,-37.31 511.87,-31.93 528.4,-27.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="529.86,-30.24 538.45,-24.04 527.86,-23.53 529.86,-30.24"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M498.05,-41.96C513.74,-37.31 531.87,-31.93 548.4,-27.02"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="549.86,-30.24 558.45,-24.04 547.86,-23.53 549.86,-30.24"/>
 </g>
 </g>
 </svg>
@@ -385,91 +385,106 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~export_xc~3~~CalledByGraph Pages: 1 -->
-<svg id="procexport_xc3CalledByGraph" width="313pt" height="200pt"
- viewBox="0.00 0.00 313.00 200.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~export_xc~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 196)">
+<svg id="procexport_xc3CalledByGraph" width="333pt" height="242pt"
+ viewBox="0.00 0.00 333.00 242.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~export_xc~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 238)">
 <title>proc~~export_xc~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-196 309,-196 309,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-238 329,-238 329,4 -4,4"/>
 <!-- proc~export_xc~3 -->
 <g id="proc~~export_xc~3~~CalledByGraph_node1" class="node">
 <title>proc~export_xc~3</title>
-<polygon fill="none" stroke="black" points="305,-108 165,-108 165,-84 305,-84 305,-108"/>
-<text text-anchor="middle" x="235" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%export_Xc</text>
+<polygon fill="none" stroke="black" points="325,-129 175,-129 175,-105 325,-105 325,-129"/>
+<text text-anchor="middle" x="250" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%export_Xc</text>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~export_xc~3~~CalledByGraph_node2" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~export_xc~3~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-192 14.5,-192 14.5,-168 114.5,-168 114.5,-192"/>
-<text text-anchor="middle" x="64.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~export_xc~3~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-234 14.5,-234 14.5,-210 124.5,-210 124.5,-234"/>
+<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~export_xc~3 -->
+<!-- program~example3_surface&#45;&gt;proc~export_xc~3 -->
 <g id="proc~~export_xc~3~~CalledByGraph_edge1" class="edge">
-<title>program~example1_curve&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M106.33,-167.98C113.98,-165.32 121.82,-162.29 129,-159 157.11,-146.11 187.18,-127.53 207.9,-113.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="210.07,-116.64 216.45,-108.18 206.19,-110.82 210.07,-116.64"/>
+<title>program~example3_surface&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M117.8,-209.92C125.07,-207.38 132.36,-204.41 139,-201 173.15,-183.45 207.52,-155.08 228.54,-136.24"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="231.13,-138.61 236.17,-129.28 226.42,-133.43 231.13,-138.61"/>
 </g>
-<!-- program~example_nurbs_curve -->
+<!-- program~example_nurbs_surface -->
 <g id="proc~~export_xc~3~~CalledByGraph_node3" class="node">
-<title>program~example_nurbs_curve</title>
-<g id="a_proc~~export_xc~3~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129,-150 0,-150 0,-126 129,-126 129,-150"/>
-<text text-anchor="middle" x="64.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<title>program~example_nurbs_surface</title>
+<g id="a_proc~~export_xc~3~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-192 0,-192 0,-168 139,-168 139,-192"/>
+<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~export_xc~3 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~export_xc~3 -->
 <g id="proc~~export_xc~3~~CalledByGraph_edge2" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M113.79,-125.96C133.17,-121.13 155.69,-115.52 175.96,-110.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="176.85,-113.85 185.71,-108.04 175.16,-107.06 176.85,-113.85"/>
+<title>program~example_nurbs_surface&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M111.58,-167.9C120.65,-165.09 130.18,-162.03 139,-159 162.53,-150.91 188.55,-141.02 209.38,-132.87"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="210.83,-136.06 218.85,-129.14 208.26,-129.54 210.83,-136.06"/>
 </g>
-<!-- program~shape_c_1d -->
+<!-- program~shape_c_2d -->
 <g id="proc~~export_xc~3~~CalledByGraph_node4" class="node">
-<title>program~shape_c_1d</title>
-<g id="a_proc~~export_xc~3~~CalledByGraph_node4"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102.5,-108 26.5,-108 26.5,-84 102.5,-84 102.5,-108"/>
-<text text-anchor="middle" x="64.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<title>program~shape_c_2d</title>
+<g id="a_proc~~export_xc~3~~CalledByGraph_node4"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
+<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~export_xc~3 -->
+<!-- program~shape_c_2d&#45;&gt;proc~export_xc~3 -->
 <g id="proc~~export_xc~3~~CalledByGraph_edge3" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M102.9,-96C118.28,-96 136.71,-96 154.83,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="154.84,-99.5 164.84,-96 154.84,-92.5 154.84,-99.5"/>
+<title>program~shape_c_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M107.92,-133.6C124.54,-131.64 144.82,-129.26 164.77,-126.91"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="165.31,-130.37 174.83,-125.73 164.49,-123.42 165.31,-130.37"/>
 </g>
-<!-- program~shape_circle -->
+<!-- program~shape_half_ring_2d -->
 <g id="proc~~export_xc~3~~CalledByGraph_node5" class="node">
-<title>program~shape_circle</title>
-<g id="a_proc~~export_xc~3~~CalledByGraph_node5"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="104,-66 25,-66 25,-42 104,-42 104,-66"/>
-<text text-anchor="middle" x="64.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<title>program~shape_half_ring_2d</title>
+<g id="a_proc~~export_xc~3~~CalledByGraph_node5"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
+<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~export_xc~3 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xc~3 -->
 <g id="proc~~export_xc~3~~CalledByGraph_edge4" class="edge">
-<title>program~shape_circle&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M104.16,-63.64C125.33,-68.91 151.99,-75.56 175.64,-81.45"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="175.02,-84.91 185.57,-83.93 176.71,-78.11 175.02,-84.91"/>
+<title>program~shape_half_ring_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M127.47,-102.7C139.38,-104.1 152.19,-105.61 164.85,-107.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="164.62,-110.6 174.96,-108.29 165.44,-103.64 164.62,-110.6"/>
 </g>
-<!-- program~shape_half_circle -->
+<!-- program~shape_ring_2d -->
 <g id="proc~~export_xc~3~~CalledByGraph_node6" class="node">
-<title>program~shape_half_circle</title>
-<g id="a_proc~~export_xc~3~~CalledByGraph_node6"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116.5,-24 12.5,-24 12.5,0 116.5,0 116.5,-24"/>
-<text text-anchor="middle" x="64.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<title>program~shape_ring_2d</title>
+<g id="a_proc~~export_xc~3~~CalledByGraph_node6"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-66 24.5,-66 24.5,-42 114.5,-42 114.5,-66"/>
+<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~export_xc~3 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~export_xc~3 -->
 <g id="proc~~export_xc~3~~CalledByGraph_edge5" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~export_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M106.33,-24.02C113.98,-26.68 121.82,-29.71 129,-33 157.11,-45.89 187.18,-64.47 207.9,-78.12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="206.19,-81.18 216.45,-83.82 210.07,-75.36 206.19,-81.18"/>
+<title>program~shape_ring_2d&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M111.58,-66.1C120.65,-68.91 130.18,-71.97 139,-75 162.53,-83.09 188.55,-92.98 209.38,-101.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="208.26,-104.46 218.85,-104.86 210.83,-97.94 208.26,-104.46"/>
+</g>
+<!-- program~shape_tetragon -->
+<g id="proc~~export_xc~3~~CalledByGraph_node7" class="node">
+<title>program~shape_tetragon</title>
+<g id="a_proc~~export_xc~3~~CalledByGraph_node7"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-24 21.5,-24 21.5,0 117.5,0 117.5,-24"/>
+<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+</a>
+</g>
+</g>
+<!-- program~shape_tetragon&#45;&gt;proc~export_xc~3 -->
+<g id="proc~~export_xc~3~~CalledByGraph_edge6" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~export_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M117.8,-24.08C125.07,-26.62 132.36,-29.59 139,-33 173.15,-50.55 207.52,-78.92 228.54,-97.76"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="226.42,-100.57 236.17,-104.72 231.13,-95.39 226.42,-100.57"/>
 </g>
 </g>
 </svg>
@@ -585,7 +600,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/export_xg.html b/proc/export_xg.html
index bf2504475..4cc26ced6 100644
--- a/proc/export_xg.html
+++ b/proc/export_xg.html
@@ -83,15 +83,15 @@ <h1>export_Xg
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">export_Xg</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private impure subroutine export_Xg(this, filename)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
         <tr>
             <td>
               <span class="anchor" id="variable-this~26"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -201,91 +201,91 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~export_xg~~CallsGraph Pages: 1 -->
-<svg id="procexport_xgCallsGraph" width="641pt" height="110pt"
- viewBox="0.00 0.00 641.00 110.32" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~export_xg~~CallsGraph" class="graph" transform="scale(1.05 1.05) rotate(0) translate(4 112)">
+<svg id="procexport_xgCallsGraph" width="641pt" height="114pt"
+ viewBox="0.00 0.00 641.00 113.69" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~export_xg~~CallsGraph" class="graph" transform="scale(1.02 1.02) rotate(0) translate(4 112)">
 <title>proc~~export_xg~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 670,-112 670,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 650,-112 650,4 -4,4"/>
 <!-- proc~export_xg -->
 <g id="proc~~export_xg~~CallsGraph_node1" class="node">
 <title>proc~export_xg</title>
-<polygon fill="none" stroke="black" points="151,-66 0,-66 0,-42 151,-42 151,-66"/>
-<text text-anchor="middle" x="75.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%export_Xg</text>
+<polygon fill="none" stroke="black" points="141,-66 0,-66 0,-42 141,-42 141,-66"/>
+<text text-anchor="middle" x="70.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%export_Xg</text>
 </g>
 <!-- proc~cmp_elem_xg_vis -->
 <g id="proc~~export_xg~~CallsGraph_node2" class="node">
 <title>proc~cmp_elem_xg_vis</title>
-<g id="a_proc~~export_xg~~CallsGraph_node2"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="379,-66 187,-66 187,-42 379,-42 379,-66"/>
-<text text-anchor="middle" x="283" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
+<g id="a_proc~~export_xg~~CallsGraph_node2"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="359,-66 177,-66 177,-42 359,-42 359,-66"/>
+<text text-anchor="middle" x="268" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
 <g id="proc~~export_xg~~CallsGraph_edge1" class="edge">
 <title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
-<path fill="none" stroke="#ff0000" d="M151.27,-54C159.6,-54 168.2,-54 176.82,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="176.93,-57.5 186.93,-54 176.93,-50.5 176.93,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M141.25,-54C149.53,-54 158.1,-54 166.69,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="166.78,-57.5 176.78,-54 166.78,-50.5 166.78,-57.5"/>
 </g>
 <!-- interface~elemconn_c0 -->
 <g id="proc~~export_xg~~CallsGraph_node3" class="node">
 <title>interface~elemconn_c0</title>
 <g id="a_proc~~export_xg~~CallsGraph_node3"><a xlink:href="../interface/elemconn_c0.html" xlink:title="elemConn_C0">
-<polygon fill="#a7506f" stroke="#a7506f" points="502,-66 415,-66 415,-42 502,-42 502,-66"/>
-<text text-anchor="middle" x="458.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="482,-66 395,-66 395,-42 482,-42 482,-66"/>
+<text text-anchor="middle" x="438.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~export_xg~~CallsGraph_edge2" class="edge">
 <title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M379.13,-54C387.89,-54 396.55,-54 404.72,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="404.79,-57.5 414.79,-54 404.79,-50.5 404.79,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M359.17,-54C367.86,-54 376.47,-54 384.62,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="384.67,-57.5 394.67,-54 384.67,-50.5 384.67,-57.5"/>
 </g>
 <!-- proc~cmp_elemconn_c0_l -->
 <g id="proc~~export_xg~~CallsGraph_node4" class="node">
 <title>proc~cmp_elemconn_c0_l</title>
 <g id="a_proc~~export_xg~~CallsGraph_node4"><a xlink:href="../proc/cmp_elemconn_c0_l.html" xlink:title="cmp_elemConn_C0_L">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="665.5,-108 538.5,-108 538.5,-84 665.5,-84 665.5,-108"/>
-<text text-anchor="middle" x="602" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="645.5,-108 518.5,-108 518.5,-84 645.5,-84 645.5,-108"/>
+<text text-anchor="middle" x="582" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l -->
 <g id="proc~~export_xg~~CallsGraph_edge3" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M500.05,-66.04C515.74,-70.69 533.87,-76.07 550.4,-80.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="549.86,-84.47 560.45,-83.96 551.86,-77.76 549.86,-84.47"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M480.05,-66.04C495.74,-70.69 513.87,-76.07 530.4,-80.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="529.86,-84.47 540.45,-83.96 531.86,-77.76 529.86,-84.47"/>
 </g>
 <!-- proc~cmp_elemconn_c0_s -->
 <g id="proc~~export_xg~~CallsGraph_node5" class="node">
 <title>proc~cmp_elemconn_c0_s</title>
 <g id="a_proc~~export_xg~~CallsGraph_node5"><a xlink:href="../proc/cmp_elemconn_c0_s.html" xlink:title="cmp_elemConn_C0_S">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="665.5,-66 538.5,-66 538.5,-42 665.5,-42 665.5,-66"/>
-<text text-anchor="middle" x="602" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="645.5,-66 518.5,-66 518.5,-42 645.5,-42 645.5,-66"/>
+<text text-anchor="middle" x="582" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s -->
 <g id="proc~~export_xg~~CallsGraph_edge4" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M502.34,-54C510.61,-54 519.49,-54 528.41,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="528.47,-57.5 538.47,-54 528.47,-50.5 528.47,-57.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M482.34,-54C490.61,-54 499.49,-54 508.41,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="508.47,-57.5 518.47,-54 508.47,-50.5 508.47,-57.5"/>
 </g>
 <!-- proc~cmp_elemconn_c0_v -->
 <g id="proc~~export_xg~~CallsGraph_node6" class="node">
 <title>proc~cmp_elemconn_c0_v</title>
 <g id="a_proc~~export_xg~~CallsGraph_node6"><a xlink:href="../proc/cmp_elemconn_c0_v.html" xlink:title="cmp_elemConn_C0_V">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="666,-24 538,-24 538,0 666,0 666,-24"/>
-<text text-anchor="middle" x="602" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="646,-24 518,-24 518,0 646,0 646,-24"/>
+<text text-anchor="middle" x="582" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v -->
 <g id="proc~~export_xg~~CallsGraph_edge5" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M500.05,-41.96C515.74,-37.31 533.87,-31.93 550.4,-27.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="551.86,-30.24 560.45,-24.04 549.86,-23.53 551.86,-30.24"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M480.05,-41.96C495.74,-37.31 513.87,-31.93 530.4,-27.02"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="531.86,-30.24 540.45,-24.04 529.86,-23.53 531.86,-30.24"/>
 </g>
 </g>
 </svg>
@@ -385,121 +385,91 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~export_xg~~CalledByGraph Pages: 1 -->
-<svg id="procexport_xgCalledByGraph" width="334pt" height="284pt"
- viewBox="0.00 0.00 334.00 284.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~export_xg~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 280)">
+<svg id="procexport_xgCalledByGraph" width="314pt" height="200pt"
+ viewBox="0.00 0.00 314.00 200.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~export_xg~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 196)">
 <title>proc~~export_xg~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-280 330,-280 330,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-196 310,-196 310,4 -4,4"/>
 <!-- proc~export_xg -->
 <g id="proc~~export_xg~~CalledByGraph_node1" class="node">
 <title>proc~export_xg</title>
-<polygon fill="none" stroke="black" points="326,-150 175,-150 175,-126 326,-126 326,-150"/>
-<text text-anchor="middle" x="250.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%export_Xg</text>
+<polygon fill="none" stroke="black" points="306,-108 165,-108 165,-84 306,-84 306,-108"/>
+<text text-anchor="middle" x="235.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%export_Xg</text>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example1_curve -->
 <g id="proc~~export_xg~~CalledByGraph_node2" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~export_xg~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-276 14.5,-276 14.5,-252 124.5,-252 124.5,-276"/>
-<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~export_xg~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-192 14.5,-192 14.5,-168 114.5,-168 114.5,-192"/>
+<text text-anchor="middle" x="64.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~export_xg -->
+<!-- program~example1_curve&#45;&gt;proc~export_xg -->
 <g id="proc~~export_xg~~CalledByGraph_edge1" class="edge">
-<title>program~example3_volume&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0000" d="M119.95,-251.87C126.56,-249.39 133.09,-246.45 139,-243 177.67,-220.41 213.5,-181.81 233.35,-158.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="236.24,-160.22 239.91,-150.28 230.84,-155.76 236.24,-160.22"/>
+<title>program~example1_curve&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#ff0000" d="M106.32,-167.97C113.97,-165.3 121.82,-162.28 129,-159 157.22,-146.1 187.44,-127.51 208.27,-113.87"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="210.46,-116.62 216.86,-108.18 206.59,-110.79 210.46,-116.62"/>
 </g>
-<!-- program~example_nurbs_volume -->
+<!-- program~example_nurbs_curve -->
 <g id="proc~~export_xg~~CalledByGraph_node3" class="node">
-<title>program~example_nurbs_volume</title>
-<g id="a_proc~~export_xg~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-234 0,-234 0,-210 139,-210 139,-234"/>
-<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<title>program~example_nurbs_curve</title>
+<g id="a_proc~~export_xg~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129,-150 0,-150 0,-126 129,-126 129,-150"/>
+<text text-anchor="middle" x="64.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~export_xg -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~export_xg -->
 <g id="proc~~export_xg~~CalledByGraph_edge2" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0000" d="M114.87,-209.97C123.01,-207.32 131.35,-204.31 139,-201 168.62,-188.2 200.43,-169.49 222.28,-155.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="224.43,-158.56 230.99,-150.25 220.68,-152.65 224.43,-158.56"/>
+<title>program~example_nurbs_curve&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#ff0000" d="M113.93,-125.96C133.38,-121.13 155.96,-115.52 176.29,-110.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="177.2,-113.85 186.06,-108.04 175.52,-107.05 177.2,-113.85"/>
 </g>
-<!-- program~example_put_to_nurbs -->
+<!-- program~shape_c_1d -->
 <g id="proc~~export_xg~~CalledByGraph_node4" class="node">
-<title>program~example_put_to_nurbs</title>
-<g id="a_proc~~export_xg~~CalledByGraph_node4"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-192 3.5,-192 3.5,-168 135.5,-168 135.5,-192"/>
-<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
+<title>program~shape_c_1d</title>
+<g id="a_proc~~export_xg~~CalledByGraph_node4"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102.5,-108 26.5,-108 26.5,-84 102.5,-84 102.5,-108"/>
+<text text-anchor="middle" x="64.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xg -->
+<!-- program~shape_c_1d&#45;&gt;proc~export_xg -->
 <g id="proc~~export_xg~~CalledByGraph_edge3" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0000" d="M121.79,-167.96C142.58,-163.09 166.75,-157.42 188.43,-152.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="189.26,-155.73 198.2,-150.04 187.66,-148.91 189.26,-155.73"/>
+<title>program~shape_c_1d&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#ff0000" d="M102.59,-96C118,-96 136.52,-96 154.75,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="154.83,-99.5 164.83,-96 154.83,-92.5 154.83,-99.5"/>
 </g>
-<!-- program~shape_c_3d -->
+<!-- program~shape_circle -->
 <g id="proc~~export_xg~~CalledByGraph_node5" class="node">
-<title>program~shape_c_3d</title>
-<g id="a_proc~~export_xg~~CalledByGraph_node5"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
-<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<title>program~shape_circle</title>
+<g id="a_proc~~export_xg~~CalledByGraph_node5"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="104,-66 25,-66 25,-42 104,-42 104,-66"/>
+<text text-anchor="middle" x="64.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~export_xg -->
+<!-- program~shape_circle&#45;&gt;proc~export_xg -->
 <g id="proc~~export_xg~~CalledByGraph_edge4" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0000" d="M107.59,-138C124.23,-138 144.61,-138 164.68,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="164.8,-141.5 174.8,-138 164.8,-134.5 164.8,-141.5"/>
+<title>program~shape_circle&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#ff0000" d="M104.27,-63.64C125.5,-68.91 152.25,-75.56 175.97,-81.45"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="175.37,-84.91 185.92,-83.93 177.06,-78.12 175.37,-84.91"/>
 </g>
-<!-- program~shape_half_ring_3d -->
+<!-- program~shape_half_circle -->
 <g id="proc~~export_xg~~CalledByGraph_node6" class="node">
-<title>program~shape_half_ring_3d</title>
-<g id="a_proc~~export_xg~~CalledByGraph_node6"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
-<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<title>program~shape_half_circle</title>
+<g id="a_proc~~export_xg~~CalledByGraph_node6"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116.5,-24 12.5,-24 12.5,0 116.5,0 116.5,-24"/>
+<text text-anchor="middle" x="64.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xg -->
+<!-- program~shape_half_circle&#45;&gt;proc~export_xg -->
 <g id="proc~~export_xg~~CalledByGraph_edge5" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0000" d="M121.79,-108.04C142.58,-112.91 166.75,-118.58 188.43,-123.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="187.66,-127.09 198.2,-125.96 189.26,-120.27 187.66,-127.09"/>
-</g>
-<!-- program~shape_hexahedron -->
-<g id="proc~~export_xg~~CalledByGraph_node7" class="node">
-<title>program~shape_hexahedron</title>
-<g id="a_proc~~export_xg~~CalledByGraph_node7"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-66 13,-66 13,-42 126,-42 126,-66"/>
-<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
-</a>
-</g>
-</g>
-<!-- program~shape_hexahedron&#45;&gt;proc~export_xg -->
-<g id="proc~~export_xg~~CalledByGraph_edge6" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0000" d="M114.87,-66.03C123.01,-68.68 131.35,-71.69 139,-75 168.62,-87.8 200.43,-106.51 222.28,-120.22"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="220.68,-123.35 230.99,-125.75 224.43,-117.44 220.68,-123.35"/>
-</g>
-<!-- program~shape_ring_3d -->
-<g id="proc~~export_xg~~CalledByGraph_node8" class="node">
-<title>program~shape_ring_3d</title>
-<g id="a_proc~~export_xg~~CalledByGraph_node8"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-24 24.5,-24 24.5,0 114.5,0 114.5,-24"/>
-<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_ring_3d&#45;&gt;proc~export_xg -->
-<g id="proc~~export_xg~~CalledByGraph_edge7" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~export_xg</title>
-<path fill="none" stroke="#ff0000" d="M114.53,-22.19C122.95,-25.05 131.48,-28.61 139,-33 177.67,-55.59 213.5,-94.19 233.35,-117.77"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="230.84,-120.24 239.91,-125.72 236.24,-115.78 230.84,-120.24"/>
+<title>program~shape_half_circle&#45;&gt;proc~export_xg</title>
+<path fill="none" stroke="#ff0000" d="M106.32,-24.03C113.97,-26.7 121.82,-29.72 129,-33 157.22,-45.9 187.44,-64.49 208.27,-78.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="206.59,-81.21 216.86,-83.82 210.46,-75.38 206.59,-81.21"/>
 </g>
 </g>
 </svg>
@@ -615,7 +585,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/export_xg~2.html b/proc/export_xg~2.html
index 63b146fda..8d79401d7 100644
--- a/proc/export_xg~2.html
+++ b/proc/export_xg~2.html
@@ -83,15 +83,15 @@ <h1>export_Xg
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">export_Xg</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private impure subroutine export_Xg(this, filename)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~94"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~87"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -210,14 +210,14 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~export_xg~2~~CallsGraph_node1" class="node">
 <title>proc~export_xg~2</title>
 <polygon fill="none" stroke="black" points="151,-66 0,-66 0,-42 151,-42 151,-66"/>
-<text text-anchor="middle" x="75.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%export_Xg</text>
+<text text-anchor="middle" x="75.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%export_Xg</text>
 </g>
 <!-- proc~cmp_elem_xg_vis~2 -->
 <g id="proc~~export_xg~2~~CallsGraph_node2" class="node">
 <title>proc~cmp_elem_xg_vis~2</title>
-<g id="a_proc~~export_xg~2~~CallsGraph_node2"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
+<g id="a_proc~~export_xg~2~~CallsGraph_node2"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="379,-66 187,-66 187,-42 379,-42 379,-66"/>
-<text text-anchor="middle" x="283" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
+<text text-anchor="middle" x="283" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
@@ -385,106 +385,121 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~export_xg~2~~CalledByGraph Pages: 1 -->
-<svg id="procexport_xg2CalledByGraph" width="334pt" height="242pt"
- viewBox="0.00 0.00 334.00 242.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~export_xg~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 238)">
+<svg id="procexport_xg2CalledByGraph" width="334pt" height="284pt"
+ viewBox="0.00 0.00 334.00 284.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~export_xg~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 280)">
 <title>proc~~export_xg~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-238 330,-238 330,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-280 330,-280 330,4 -4,4"/>
 <!-- proc~export_xg~2 -->
 <g id="proc~~export_xg~2~~CalledByGraph_node1" class="node">
 <title>proc~export_xg~2</title>
-<polygon fill="none" stroke="black" points="326,-129 175,-129 175,-105 326,-105 326,-129"/>
-<text text-anchor="middle" x="250.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%export_Xg</text>
+<polygon fill="none" stroke="black" points="326,-150 175,-150 175,-126 326,-126 326,-150"/>
+<text text-anchor="middle" x="250.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%export_Xg</text>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~export_xg~2~~CalledByGraph_node2" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~export_xg~2~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-234 14.5,-234 14.5,-210 124.5,-210 124.5,-234"/>
-<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<title>program~example3_volume</title>
+<g id="a_proc~~export_xg~2~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-276 14.5,-276 14.5,-252 124.5,-252 124.5,-276"/>
+<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~export_xg~2 -->
+<!-- program~example3_volume&#45;&gt;proc~export_xg~2 -->
 <g id="proc~~export_xg~2~~CalledByGraph_edge1" class="edge">
-<title>program~example3_surface&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M117.8,-209.91C125.07,-207.37 132.36,-204.4 139,-201 173.27,-183.43 207.81,-155.07 228.93,-136.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="231.54,-138.59 236.6,-129.28 226.84,-133.4 231.54,-138.59"/>
+<title>program~example3_volume&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0000" d="M119.95,-251.87C126.56,-249.39 133.09,-246.45 139,-243 177.67,-220.41 213.5,-181.81 233.35,-158.23"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="236.24,-160.22 239.91,-150.28 230.84,-155.76 236.24,-160.22"/>
 </g>
-<!-- program~example_nurbs_surface -->
+<!-- program~example_nurbs_volume -->
 <g id="proc~~export_xg~2~~CalledByGraph_node3" class="node">
-<title>program~example_nurbs_surface</title>
-<g id="a_proc~~export_xg~2~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-192 0,-192 0,-168 139,-168 139,-192"/>
-<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<title>program~example_nurbs_volume</title>
+<g id="a_proc~~export_xg~2~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-234 0,-234 0,-210 139,-210 139,-234"/>
+<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~export_xg~2 -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~export_xg~2 -->
 <g id="proc~~export_xg~2~~CalledByGraph_edge2" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M111.57,-167.89C120.64,-165.08 130.18,-162.03 139,-159 162.63,-150.9 188.77,-141 209.69,-132.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="211.17,-136.03 219.21,-129.13 208.62,-129.52 211.17,-136.03"/>
+<title>program~example_nurbs_volume&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0000" d="M114.87,-209.97C123.01,-207.32 131.35,-204.31 139,-201 168.62,-188.2 200.43,-169.49 222.28,-155.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="224.43,-158.56 230.99,-150.25 220.68,-152.65 224.43,-158.56"/>
 </g>
-<!-- program~shape_c_2d -->
+<!-- program~example_put_to_nurbs -->
 <g id="proc~~export_xg~2~~CalledByGraph_node4" class="node">
-<title>program~shape_c_2d</title>
-<g id="a_proc~~export_xg~2~~CalledByGraph_node4"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
-<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+<title>program~example_put_to_nurbs</title>
+<g id="a_proc~~export_xg~2~~CalledByGraph_node4"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-192 3.5,-192 3.5,-168 135.5,-168 135.5,-192"/>
+<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~export_xg~2 -->
+<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xg~2 -->
 <g id="proc~~export_xg~2~~CalledByGraph_edge3" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M107.59,-133.65C124.23,-131.7 144.61,-129.31 164.68,-126.95"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="165.28,-130.41 174.8,-125.76 164.46,-123.45 165.28,-130.41"/>
+<title>program~example_put_to_nurbs&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0000" d="M121.79,-167.96C142.58,-163.09 166.75,-157.42 188.43,-152.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="189.26,-155.73 198.2,-150.04 187.66,-148.91 189.26,-155.73"/>
 </g>
-<!-- program~shape_half_ring_2d -->
+<!-- program~shape_c_3d -->
 <g id="proc~~export_xg~2~~CalledByGraph_node5" class="node">
-<title>program~shape_half_ring_2d</title>
-<g id="a_proc~~export_xg~2~~CalledByGraph_node5"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
-<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+<title>program~shape_c_3d</title>
+<g id="a_proc~~export_xg~2~~CalledByGraph_node5"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
+<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xg~2 -->
+<!-- program~shape_c_3d&#45;&gt;proc~export_xg~2 -->
 <g id="proc~~export_xg~2~~CalledByGraph_edge4" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M127.14,-102.64C139.1,-104.05 151.97,-105.56 164.71,-107.05"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="164.54,-110.56 174.88,-108.25 165.36,-103.6 164.54,-110.56"/>
+<title>program~shape_c_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0000" d="M107.59,-138C124.23,-138 144.61,-138 164.68,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="164.8,-141.5 174.8,-138 164.8,-134.5 164.8,-141.5"/>
 </g>
-<!-- program~shape_ring_2d -->
+<!-- program~shape_half_ring_3d -->
 <g id="proc~~export_xg~2~~CalledByGraph_node6" class="node">
-<title>program~shape_ring_2d</title>
-<g id="a_proc~~export_xg~2~~CalledByGraph_node6"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-66 24.5,-66 24.5,-42 114.5,-42 114.5,-66"/>
-<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+<title>program~shape_half_ring_3d</title>
+<g id="a_proc~~export_xg~2~~CalledByGraph_node6"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
+<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~export_xg~2 -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xg~2 -->
 <g id="proc~~export_xg~2~~CalledByGraph_edge5" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M111.57,-66.11C120.64,-68.92 130.18,-71.97 139,-75 162.63,-83.1 188.77,-93 209.69,-101.14"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="208.62,-104.48 219.21,-104.87 211.17,-97.97 208.62,-104.48"/>
+<title>program~shape_half_ring_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0000" d="M121.79,-108.04C142.58,-112.91 166.75,-118.58 188.43,-123.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="187.66,-127.09 198.2,-125.96 189.26,-120.27 187.66,-127.09"/>
 </g>
-<!-- program~shape_tetragon -->
+<!-- program~shape_hexahedron -->
 <g id="proc~~export_xg~2~~CalledByGraph_node7" class="node">
-<title>program~shape_tetragon</title>
-<g id="a_proc~~export_xg~2~~CalledByGraph_node7"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-24 21.5,-24 21.5,0 117.5,0 117.5,-24"/>
-<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<title>program~shape_hexahedron</title>
+<g id="a_proc~~export_xg~2~~CalledByGraph_node7"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-66 13,-66 13,-42 126,-42 126,-66"/>
+<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~export_xg~2 -->
+<!-- program~shape_hexahedron&#45;&gt;proc~export_xg~2 -->
 <g id="proc~~export_xg~2~~CalledByGraph_edge6" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~export_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M117.8,-24.09C125.07,-26.63 132.36,-29.6 139,-33 173.27,-50.57 207.81,-78.93 228.93,-97.77"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="226.84,-100.6 236.6,-104.72 231.54,-95.41 226.84,-100.6"/>
+<title>program~shape_hexahedron&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0000" d="M114.87,-66.03C123.01,-68.68 131.35,-71.69 139,-75 168.62,-87.8 200.43,-106.51 222.28,-120.22"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="220.68,-123.35 230.99,-125.75 224.43,-117.44 220.68,-123.35"/>
+</g>
+<!-- program~shape_ring_3d -->
+<g id="proc~~export_xg~2~~CalledByGraph_node8" class="node">
+<title>program~shape_ring_3d</title>
+<g id="a_proc~~export_xg~2~~CalledByGraph_node8"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-24 24.5,-24 24.5,0 114.5,0 114.5,-24"/>
+<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_ring_3d&#45;&gt;proc~export_xg~2 -->
+<g id="proc~~export_xg~2~~CalledByGraph_edge7" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~export_xg~2</title>
+<path fill="none" stroke="#ff0000" d="M114.53,-22.19C122.95,-25.05 131.48,-28.61 139,-33 177.67,-55.59 213.5,-94.19 233.35,-117.77"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="230.84,-120.24 239.91,-125.72 236.24,-115.78 230.84,-120.24"/>
 </g>
 </g>
 </svg>
@@ -600,7 +615,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/export_xg~3.html b/proc/export_xg~3.html
index 3289b0c5f..6d3920980 100644
--- a/proc/export_xg~3.html
+++ b/proc/export_xg~3.html
@@ -83,15 +83,15 @@ <h1>export_Xg
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">export_Xg</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private impure subroutine export_Xg(this, filename)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~157"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~155"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -201,91 +201,91 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~export_xg~3~~CallsGraph Pages: 1 -->
-<svg id="procexport_xg3CallsGraph" width="641pt" height="114pt"
- viewBox="0.00 0.00 641.00 113.69" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~export_xg~3~~CallsGraph" class="graph" transform="scale(1.02 1.02) rotate(0) translate(4 112)">
+<svg id="procexport_xg3CallsGraph" width="641pt" height="110pt"
+ viewBox="0.00 0.00 641.00 110.32" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~export_xg~3~~CallsGraph" class="graph" transform="scale(1.05 1.05) rotate(0) translate(4 112)">
 <title>proc~~export_xg~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 650,-112 650,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 670,-112 670,4 -4,4"/>
 <!-- proc~export_xg~3 -->
 <g id="proc~~export_xg~3~~CallsGraph_node1" class="node">
 <title>proc~export_xg~3</title>
-<polygon fill="none" stroke="black" points="141,-66 0,-66 0,-42 141,-42 141,-66"/>
-<text text-anchor="middle" x="70.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%export_Xg</text>
+<polygon fill="none" stroke="black" points="151,-66 0,-66 0,-42 151,-42 151,-66"/>
+<text text-anchor="middle" x="75.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%export_Xg</text>
 </g>
 <!-- proc~cmp_elem_xg_vis~3 -->
 <g id="proc~~export_xg~3~~CallsGraph_node2" class="node">
 <title>proc~cmp_elem_xg_vis~3</title>
-<g id="a_proc~~export_xg~3~~CallsGraph_node2"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="359,-66 177,-66 177,-42 359,-42 359,-66"/>
-<text text-anchor="middle" x="268" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xg_vis</text>
+<g id="a_proc~~export_xg~3~~CallsGraph_node2"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="379,-66 187,-66 187,-42 379,-42 379,-66"/>
+<text text-anchor="middle" x="283" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
 <!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
 <g id="proc~~export_xg~3~~CallsGraph_edge1" class="edge">
 <title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
-<path fill="none" stroke="#ff0000" d="M141.25,-54C149.53,-54 158.1,-54 166.69,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="166.78,-57.5 176.78,-54 166.78,-50.5 166.78,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M151.27,-54C159.6,-54 168.2,-54 176.82,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="176.93,-57.5 186.93,-54 176.93,-50.5 176.93,-57.5"/>
 </g>
 <!-- interface~elemconn_c0 -->
 <g id="proc~~export_xg~3~~CallsGraph_node3" class="node">
 <title>interface~elemconn_c0</title>
 <g id="a_proc~~export_xg~3~~CallsGraph_node3"><a xlink:href="../interface/elemconn_c0.html" xlink:title="elemConn_C0">
-<polygon fill="#a7506f" stroke="#a7506f" points="482,-66 395,-66 395,-42 482,-42 482,-66"/>
-<text text-anchor="middle" x="438.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="502,-66 415,-66 415,-42 502,-42 502,-66"/>
+<text text-anchor="middle" x="458.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">elemConn_C0</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="proc~~export_xg~3~~CallsGraph_edge2" class="edge">
 <title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
-<path fill="none" stroke="#ff0000" d="M359.17,-54C367.86,-54 376.47,-54 384.62,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="384.67,-57.5 394.67,-54 384.67,-50.5 384.67,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M379.13,-54C387.89,-54 396.55,-54 404.72,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="404.79,-57.5 414.79,-54 404.79,-50.5 404.79,-57.5"/>
 </g>
 <!-- proc~cmp_elemconn_c0_l -->
 <g id="proc~~export_xg~3~~CallsGraph_node4" class="node">
 <title>proc~cmp_elemconn_c0_l</title>
 <g id="a_proc~~export_xg~3~~CallsGraph_node4"><a xlink:href="../proc/cmp_elemconn_c0_l.html" xlink:title="cmp_elemConn_C0_L">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="645.5,-108 518.5,-108 518.5,-84 645.5,-84 645.5,-108"/>
-<text text-anchor="middle" x="582" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="665.5,-108 538.5,-108 538.5,-84 665.5,-84 665.5,-108"/>
+<text text-anchor="middle" x="602" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_L</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l -->
 <g id="proc~~export_xg~3~~CallsGraph_edge3" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_l</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M480.05,-66.04C495.74,-70.69 513.87,-76.07 530.4,-80.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="529.86,-84.47 540.45,-83.96 531.86,-77.76 529.86,-84.47"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M500.05,-66.04C515.74,-70.69 533.87,-76.07 550.4,-80.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="549.86,-84.47 560.45,-83.96 551.86,-77.76 549.86,-84.47"/>
 </g>
 <!-- proc~cmp_elemconn_c0_s -->
 <g id="proc~~export_xg~3~~CallsGraph_node5" class="node">
 <title>proc~cmp_elemconn_c0_s</title>
 <g id="a_proc~~export_xg~3~~CallsGraph_node5"><a xlink:href="../proc/cmp_elemconn_c0_s.html" xlink:title="cmp_elemConn_C0_S">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="645.5,-66 518.5,-66 518.5,-42 645.5,-42 645.5,-66"/>
-<text text-anchor="middle" x="582" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="665.5,-66 538.5,-66 538.5,-42 665.5,-42 665.5,-66"/>
+<text text-anchor="middle" x="602" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_S</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s -->
 <g id="proc~~export_xg~3~~CallsGraph_edge4" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_s</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M482.34,-54C490.61,-54 499.49,-54 508.41,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="508.47,-57.5 518.47,-54 508.47,-50.5 508.47,-57.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M502.34,-54C510.61,-54 519.49,-54 528.41,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="528.47,-57.5 538.47,-54 528.47,-50.5 528.47,-57.5"/>
 </g>
 <!-- proc~cmp_elemconn_c0_v -->
 <g id="proc~~export_xg~3~~CallsGraph_node6" class="node">
 <title>proc~cmp_elemconn_c0_v</title>
 <g id="a_proc~~export_xg~3~~CallsGraph_node6"><a xlink:href="../proc/cmp_elemconn_c0_v.html" xlink:title="cmp_elemConn_C0_V">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="646,-24 518,-24 518,0 646,0 646,-24"/>
-<text text-anchor="middle" x="582" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="666,-24 538,-24 538,0 666,0 666,-24"/>
+<text text-anchor="middle" x="602" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cmp_elemConn_C0_V</text>
 </a>
 </g>
 </g>
 <!-- interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v -->
 <g id="proc~~export_xg~3~~CallsGraph_edge5" class="edge">
 <title>interface~elemconn_c0&#45;&gt;proc~cmp_elemconn_c0_v</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M480.05,-41.96C495.74,-37.31 513.87,-31.93 530.4,-27.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="531.86,-30.24 540.45,-24.04 529.86,-23.53 531.86,-30.24"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M500.05,-41.96C515.74,-37.31 533.87,-31.93 550.4,-27.02"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="551.86,-30.24 560.45,-24.04 549.86,-23.53 551.86,-30.24"/>
 </g>
 </g>
 </svg>
@@ -385,91 +385,106 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~export_xg~3~~CalledByGraph Pages: 1 -->
-<svg id="procexport_xg3CalledByGraph" width="314pt" height="200pt"
- viewBox="0.00 0.00 314.00 200.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~export_xg~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 196)">
+<svg id="procexport_xg3CalledByGraph" width="334pt" height="242pt"
+ viewBox="0.00 0.00 334.00 242.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~export_xg~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 238)">
 <title>proc~~export_xg~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-196 310,-196 310,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-238 330,-238 330,4 -4,4"/>
 <!-- proc~export_xg~3 -->
 <g id="proc~~export_xg~3~~CalledByGraph_node1" class="node">
 <title>proc~export_xg~3</title>
-<polygon fill="none" stroke="black" points="306,-108 165,-108 165,-84 306,-84 306,-108"/>
-<text text-anchor="middle" x="235.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%export_Xg</text>
+<polygon fill="none" stroke="black" points="326,-129 175,-129 175,-105 326,-105 326,-129"/>
+<text text-anchor="middle" x="250.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%export_Xg</text>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~export_xg~3~~CalledByGraph_node2" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~export_xg~3~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-192 14.5,-192 14.5,-168 114.5,-168 114.5,-192"/>
-<text text-anchor="middle" x="64.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~export_xg~3~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-234 14.5,-234 14.5,-210 124.5,-210 124.5,-234"/>
+<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~export_xg~3 -->
+<!-- program~example3_surface&#45;&gt;proc~export_xg~3 -->
 <g id="proc~~export_xg~3~~CalledByGraph_edge1" class="edge">
-<title>program~example1_curve&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M106.32,-167.97C113.97,-165.3 121.82,-162.28 129,-159 157.22,-146.1 187.44,-127.51 208.27,-113.87"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="210.46,-116.62 216.86,-108.18 206.59,-110.79 210.46,-116.62"/>
+<title>program~example3_surface&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M117.8,-209.91C125.07,-207.37 132.36,-204.4 139,-201 173.27,-183.43 207.81,-155.07 228.93,-136.23"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="231.54,-138.59 236.6,-129.28 226.84,-133.4 231.54,-138.59"/>
 </g>
-<!-- program~example_nurbs_curve -->
+<!-- program~example_nurbs_surface -->
 <g id="proc~~export_xg~3~~CalledByGraph_node3" class="node">
-<title>program~example_nurbs_curve</title>
-<g id="a_proc~~export_xg~3~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129,-150 0,-150 0,-126 129,-126 129,-150"/>
-<text text-anchor="middle" x="64.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<title>program~example_nurbs_surface</title>
+<g id="a_proc~~export_xg~3~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-192 0,-192 0,-168 139,-168 139,-192"/>
+<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~export_xg~3 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~export_xg~3 -->
 <g id="proc~~export_xg~3~~CalledByGraph_edge2" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M113.93,-125.96C133.38,-121.13 155.96,-115.52 176.29,-110.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="177.2,-113.85 186.06,-108.04 175.52,-107.05 177.2,-113.85"/>
+<title>program~example_nurbs_surface&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M111.57,-167.89C120.64,-165.08 130.18,-162.03 139,-159 162.63,-150.9 188.77,-141 209.69,-132.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="211.17,-136.03 219.21,-129.13 208.62,-129.52 211.17,-136.03"/>
 </g>
-<!-- program~shape_c_1d -->
+<!-- program~shape_c_2d -->
 <g id="proc~~export_xg~3~~CalledByGraph_node4" class="node">
-<title>program~shape_c_1d</title>
-<g id="a_proc~~export_xg~3~~CalledByGraph_node4"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102.5,-108 26.5,-108 26.5,-84 102.5,-84 102.5,-108"/>
-<text text-anchor="middle" x="64.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<title>program~shape_c_2d</title>
+<g id="a_proc~~export_xg~3~~CalledByGraph_node4"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
+<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~export_xg~3 -->
+<!-- program~shape_c_2d&#45;&gt;proc~export_xg~3 -->
 <g id="proc~~export_xg~3~~CalledByGraph_edge3" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M102.59,-96C118,-96 136.52,-96 154.75,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="154.83,-99.5 164.83,-96 154.83,-92.5 154.83,-99.5"/>
+<title>program~shape_c_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M107.59,-133.65C124.23,-131.7 144.61,-129.31 164.68,-126.95"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="165.28,-130.41 174.8,-125.76 164.46,-123.45 165.28,-130.41"/>
 </g>
-<!-- program~shape_circle -->
+<!-- program~shape_half_ring_2d -->
 <g id="proc~~export_xg~3~~CalledByGraph_node5" class="node">
-<title>program~shape_circle</title>
-<g id="a_proc~~export_xg~3~~CalledByGraph_node5"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="104,-66 25,-66 25,-42 104,-42 104,-66"/>
-<text text-anchor="middle" x="64.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<title>program~shape_half_ring_2d</title>
+<g id="a_proc~~export_xg~3~~CalledByGraph_node5"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
+<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~export_xg~3 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xg~3 -->
 <g id="proc~~export_xg~3~~CalledByGraph_edge4" class="edge">
-<title>program~shape_circle&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M104.27,-63.64C125.5,-68.91 152.25,-75.56 175.97,-81.45"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="175.37,-84.91 185.92,-83.93 177.06,-78.12 175.37,-84.91"/>
+<title>program~shape_half_ring_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M127.14,-102.64C139.1,-104.05 151.97,-105.56 164.71,-107.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="164.54,-110.56 174.88,-108.25 165.36,-103.6 164.54,-110.56"/>
 </g>
-<!-- program~shape_half_circle -->
+<!-- program~shape_ring_2d -->
 <g id="proc~~export_xg~3~~CalledByGraph_node6" class="node">
-<title>program~shape_half_circle</title>
-<g id="a_proc~~export_xg~3~~CalledByGraph_node6"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116.5,-24 12.5,-24 12.5,0 116.5,0 116.5,-24"/>
-<text text-anchor="middle" x="64.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<title>program~shape_ring_2d</title>
+<g id="a_proc~~export_xg~3~~CalledByGraph_node6"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-66 24.5,-66 24.5,-42 114.5,-42 114.5,-66"/>
+<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~export_xg~3 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~export_xg~3 -->
 <g id="proc~~export_xg~3~~CalledByGraph_edge5" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~export_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M106.32,-24.03C113.97,-26.7 121.82,-29.72 129,-33 157.22,-45.9 187.44,-64.49 208.27,-78.13"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="206.59,-81.21 216.86,-83.82 210.46,-75.38 206.59,-81.21"/>
+<title>program~shape_ring_2d&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M111.57,-66.11C120.64,-68.92 130.18,-71.97 139,-75 162.63,-83.1 188.77,-93 209.69,-101.14"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="208.62,-104.48 219.21,-104.87 211.17,-97.97 208.62,-104.48"/>
+</g>
+<!-- program~shape_tetragon -->
+<g id="proc~~export_xg~3~~CalledByGraph_node7" class="node">
+<title>program~shape_tetragon</title>
+<g id="a_proc~~export_xg~3~~CalledByGraph_node7"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-24 21.5,-24 21.5,0 117.5,0 117.5,-24"/>
+<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+</a>
+</g>
+</g>
+<!-- program~shape_tetragon&#45;&gt;proc~export_xg~3 -->
+<g id="proc~~export_xg~3~~CalledByGraph_edge6" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~export_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M117.8,-24.09C125.07,-26.63 132.36,-29.6 139,-33 173.27,-50.57 207.81,-78.93 228.93,-97.77"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="226.84,-100.6 236.6,-104.72 231.54,-95.41 226.84,-100.6"/>
 </g>
 </g>
 </svg>
@@ -585,7 +600,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/factln.html b/proc/factln.html
index d681cd714..930162b37 100644
--- a/proc/factln.html
+++ b/proc/factln.html
@@ -235,9 +235,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~elevate_degree -->
 <g id="proc~~factln~~CalledByGraph_node4" class="node">
 <title>proc~elevate_degree</title>
-<g id="a_proc~~factln~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="326,-108 146,-108 146,-84 326,-84 326,-108"/>
-<text text-anchor="middle" x="236" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
+<g id="a_proc~~factln~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="321,-108 151,-108 151,-84 321,-84 321,-108"/>
+<text text-anchor="middle" x="236" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
 </a>
 </g>
 </g>
@@ -250,9 +250,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~elevate_degree~2 -->
 <g id="proc~~factln~~CalledByGraph_node5" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_proc~~factln~~CalledByGraph_node5"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
+<g id="a_proc~~factln~~CalledByGraph_node5"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="326,-66 146,-66 146,-42 326,-42 326,-66"/>
-<text text-anchor="middle" x="236" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<text text-anchor="middle" x="236" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
@@ -265,9 +265,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~elevate_degree~3 -->
 <g id="proc~~factln~~CalledByGraph_node6" class="node">
 <title>proc~elevate_degree~3</title>
-<g id="a_proc~~factln~~CalledByGraph_node6"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="321,-24 151,-24 151,0 321,0 321,-24"/>
-<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+<g id="a_proc~~factln~~CalledByGraph_node6"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="326,-24 146,-24 146,0 326,0 326,-24"/>
+<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
 </a>
 </g>
 </g>
@@ -281,46 +281,46 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~factln~~CalledByGraph_node7" class="node">
 <title>program~example1_curve</title>
 <g id="a_proc~~factln~~CalledByGraph_node7"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-24 5,-24 5,0 105,0 105,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-108 5,-108 5,-84 105,-84 105,-108"/>
+<text text-anchor="middle" x="55" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
-<g id="proc~~factln~~CalledByGraph_edge8" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
-<path fill="none" stroke="#0000ff" d="M105.39,-12C116.38,-12 128.39,-12 140.53,-12"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="140.73,-15.5 150.73,-12 140.73,-8.5 140.73,-15.5"/>
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
+<g id="proc~~factln~~CalledByGraph_edge6" class="edge">
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
+<path fill="none" stroke="#ff0000" d="M105.39,-96C116.38,-96 128.39,-96 140.53,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="140.73,-99.5 150.73,-96 140.73,-92.5 140.73,-99.5"/>
 </g>
 <!-- program~example3_surface -->
 <g id="proc~~factln~~CalledByGraph_node8" class="node">
 <title>program~example3_surface</title>
 <g id="a_proc~~factln~~CalledByGraph_node8"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-66 0,-66 0,-42 110,-42 110,-66"/>
-<text text-anchor="middle" x="55" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
-<g id="proc~~factln~~CalledByGraph_edge7" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
-<path fill="none" stroke="#00ff00" d="M110.19,-54C118.33,-54 126.93,-54 135.65,-54"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="135.93,-57.5 145.93,-54 135.93,-50.5 135.93,-57.5"/>
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="proc~~factln~~CalledByGraph_edge8" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#0000ff" d="M110.19,-12C118.33,-12 126.93,-12 135.65,-12"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="135.93,-15.5 145.93,-12 135.93,-8.5 135.93,-15.5"/>
 </g>
 <!-- program~example3_volume -->
 <g id="proc~~factln~~CalledByGraph_node9" class="node">
 <title>program~example3_volume</title>
 <g id="a_proc~~factln~~CalledByGraph_node9"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-108 0,-108 0,-84 110,-84 110,-108"/>
-<text text-anchor="middle" x="55" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-66 0,-66 0,-42 110,-42 110,-66"/>
+<text text-anchor="middle" x="55" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
-<g id="proc~~factln~~CalledByGraph_edge6" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#ff0000" d="M110.19,-96C118.33,-96 126.93,-96 135.65,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.93,-99.5 145.93,-96 135.93,-92.5 135.93,-99.5"/>
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
+<g id="proc~~factln~~CalledByGraph_edge7" class="edge">
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
+<path fill="none" stroke="#00ff00" d="M110.19,-54C118.33,-54 126.93,-54 135.65,-54"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="135.93,-57.5 145.93,-54 135.93,-50.5 135.93,-57.5"/>
 </g>
 </g>
 </svg>
@@ -440,7 +440,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/finalize.html b/proc/finalize.html
index e83d54ea5..2237fa1a3 100644
--- a/proc/finalize.html
+++ b/proc/finalize.html
@@ -78,20 +78,20 @@ <h1>finalize
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.2% of total for procedures.">16 statements</a>
+                 title=" 0.2% of total for procedures.">11 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">finalize</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine finalize(this)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
         <tr>
             <td>
               <span class="anchor" id="variable-this~22"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -186,157 +186,127 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~finalize~~CalledByGraph Pages: 1 -->
-<svg id="procfinalizeCalledByGraph" width="495pt" height="359pt"
- viewBox="0.00 0.00 495.00 358.73" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~finalize~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 354.73)">
+<svg id="procfinalizeCalledByGraph" width="475pt" height="271pt"
+ viewBox="0.00 0.00 475.00 270.78" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~finalize~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 266.78)">
 <title>proc~~finalize~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-354.73 491,-354.73 491,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-266.78 471,-266.78 471,4 -4,4"/>
 <!-- proc~finalize -->
 <g id="proc~~finalize~~CalledByGraph_node1" class="node">
 <title>proc~finalize</title>
-<polygon fill="none" stroke="black" points="487,-192 351,-192 351,-168 487,-168 487,-192"/>
-<text text-anchor="middle" x="419" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%finalize</text>
+<polygon fill="none" stroke="black" points="467,-150 341,-150 341,-126 467,-126 467,-150"/>
+<text text-anchor="middle" x="404" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%finalize</text>
 </g>
 <!-- proc~nearest_point2 -->
 <g id="proc~~finalize~~CalledByGraph_node2" class="node">
 <title>proc~nearest_point2</title>
-<g id="a_proc~~finalize~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_volume%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="315,-318 139,-318 139,-294 315,-294 315,-318"/>
-<text text-anchor="middle" x="227" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
+<g id="a_proc~~finalize~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_curve%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="305,-234 139,-234 139,-210 305,-210 305,-234"/>
+<text text-anchor="middle" x="222" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2&#45;&gt;proc~finalize -->
 <g id="proc~~finalize~~CalledByGraph_edge1" class="edge">
 <title>proc~nearest_point2&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0000" d="M295.03,-293.91C301.99,-291.46 308.78,-288.53 315,-285 352.62,-263.66 385.54,-224.6 403.52,-200.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="406.58,-202.35 409.66,-192.22 400.93,-198.22 406.58,-202.35"/>
+<path fill="none" stroke="#ff0000" d="M279.82,-209.99C288.41,-207.45 297.05,-204.46 305,-201 332.17,-189.16 360.35,-170.23 379.48,-156.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="381.67,-158.94 387.59,-150.15 377.49,-153.32 381.67,-158.94"/>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example1_curve -->
 <g id="proc~~finalize~~CalledByGraph_node3" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~finalize~~CalledByGraph_node3"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="282,-276 172,-276 172,-252 282,-252 282,-276"/>
-<text text-anchor="middle" x="227" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~finalize~~CalledByGraph_node3"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-192 172,-192 172,-168 272,-168 272,-192"/>
+<text text-anchor="middle" x="222" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~finalize -->
+<!-- program~example1_curve&#45;&gt;proc~finalize -->
 <g id="proc~~finalize~~CalledByGraph_edge2" class="edge">
-<title>program~example3_volume&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0000" d="M282.21,-253.69C293.26,-250.82 304.67,-247.28 315,-243 343.51,-231.19 373.29,-212.13 393.45,-198.06"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="395.61,-200.82 401.74,-192.18 391.56,-195.11 395.61,-200.82"/>
+<title>program~example1_curve&#45;&gt;proc~finalize</title>
+<path fill="none" stroke="#ff0000" d="M272.19,-168.52C293.58,-163.53 318.89,-157.63 341.51,-152.35"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="342.42,-155.73 351.36,-150.05 340.83,-148.91 342.42,-155.73"/>
 </g>
-<!-- program~example_nurbs_volume -->
+<!-- program~example_nurbs_curve -->
 <g id="proc~~finalize~~CalledByGraph_node4" class="node">
-<title>program~example_nurbs_volume</title>
-<g id="a_proc~~finalize~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="296.5,-234 157.5,-234 157.5,-210 296.5,-210 296.5,-234"/>
-<text text-anchor="middle" x="227" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<title>program~example_nurbs_curve</title>
+<g id="a_proc~~finalize~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="286.5,-150 157.5,-150 157.5,-126 286.5,-126 286.5,-150"/>
+<text text-anchor="middle" x="222" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~finalize -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~finalize -->
 <g id="proc~~finalize~~CalledByGraph_edge3" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0000" d="M282.45,-209.96C304.61,-205.07 330.39,-199.37 353.49,-194.26"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="354.54,-197.61 363.55,-192.04 353.03,-190.78 354.54,-197.61"/>
+<title>program~example_nurbs_curve&#45;&gt;proc~finalize</title>
+<path fill="none" stroke="#ff0000" d="M286.71,-138C300.87,-138 315.99,-138 330.47,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="330.88,-141.5 340.88,-138 330.88,-134.5 330.88,-141.5"/>
 </g>
-<!-- program~example_put_to_nurbs -->
+<!-- program~nearest_point_1d -->
 <g id="proc~~finalize~~CalledByGraph_node5" class="node">
-<title>program~example_put_to_nurbs</title>
-<g id="a_proc~~finalize~~CalledByGraph_node5"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="293,-192 161,-192 161,-168 293,-168 293,-192"/>
-<text text-anchor="middle" x="227" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
+<title>program~nearest_point_1d</title>
+<g id="a_proc~~finalize~~CalledByGraph_node5"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-254 0,-254 0,-230 103,-230 103,-254"/>
+<text text-anchor="middle" x="51.5" y="-239.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~finalize -->
+<!-- program~nearest_point_1d&#45;&gt;proc~finalize -->
 <g id="proc~~finalize~~CalledByGraph_edge4" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0000" d="M293.12,-180C308.37,-180 324.75,-180 340.48,-180"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="340.7,-183.5 350.7,-180 340.7,-176.5 340.7,-183.5"/>
+<title>program~nearest_point_1d&#45;&gt;proc~finalize</title>
+<path fill="none" stroke="#ff0000" d="M103.29,-253.75C156.05,-263.38 239.87,-271.3 305,-243 344.34,-225.9 375.06,-184.37 390.98,-158.96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="394.16,-160.47 396.35,-150.1 388.17,-156.84 394.16,-160.47"/>
 </g>
-<!-- program~nearest_point_3d -->
+<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2 -->
+<g id="proc~~finalize~~CalledByGraph_edge8" class="edge">
+<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2</title>
+<path fill="none" stroke="#ff0000" d="M103.06,-236C111.3,-235.02 120.05,-233.98 128.92,-232.93"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="129.45,-236.39 138.97,-231.74 128.63,-229.44 129.45,-236.39"/>
+</g>
+<!-- program~shape_c_1d -->
 <g id="proc~~finalize~~CalledByGraph_node6" class="node">
-<title>program~nearest_point_3d</title>
-<g id="a_proc~~finalize~~CalledByGraph_node6"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-338 0,-338 0,-314 103,-314 103,-338"/>
-<text text-anchor="middle" x="51.5" y="-323.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
+<title>program~shape_c_1d</title>
+<g id="a_proc~~finalize~~CalledByGraph_node6"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-108 184,-108 184,-84 260,-84 260,-108"/>
+<text text-anchor="middle" x="222" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~finalize -->
+<!-- program~shape_c_1d&#45;&gt;proc~finalize -->
 <g id="proc~~finalize~~CalledByGraph_edge5" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0000" d="M96.76,-338.05C151.42,-350.37 245.67,-363.08 315,-327 366.11,-300.41 397.11,-235.56 410.4,-201.58"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="413.72,-202.69 413.96,-192.1 407.17,-200.23 413.72,-202.69"/>
-</g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
-<g id="proc~~finalize~~CalledByGraph_edge10" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
-<path fill="none" stroke="#ff0000" d="M103.15,-320.16C111.29,-319.22 119.94,-318.23 128.75,-317.21"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="129.19,-320.68 138.73,-316.06 128.39,-313.73 129.19,-320.68"/>
+<title>program~shape_c_1d&#45;&gt;proc~finalize</title>
+<path fill="none" stroke="#ff0000" d="M260.3,-104.7C283.77,-110.18 314.64,-117.38 341.66,-123.69"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="340.89,-127.1 351.42,-125.96 342.48,-120.28 340.89,-127.1"/>
 </g>
-<!-- program~shape_c_3d -->
+<!-- program~shape_circle -->
 <g id="proc~~finalize~~CalledByGraph_node7" class="node">
-<title>program~shape_c_3d</title>
-<g id="a_proc~~finalize~~CalledByGraph_node7"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="265,-150 189,-150 189,-126 265,-126 265,-150"/>
-<text text-anchor="middle" x="227" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<title>program~shape_circle</title>
+<g id="a_proc~~finalize~~CalledByGraph_node7"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="261.5,-66 182.5,-66 182.5,-42 261.5,-42 261.5,-66"/>
+<text text-anchor="middle" x="222" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~finalize -->
+<!-- program~shape_circle&#45;&gt;proc~finalize -->
 <g id="proc~~finalize~~CalledByGraph_edge6" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0000" d="M265.08,-146.2C290.21,-151.75 324.09,-159.24 353.57,-165.76"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="352.86,-169.18 363.38,-167.93 354.37,-162.35 352.86,-169.18"/>
+<title>program~shape_circle&#45;&gt;proc~finalize</title>
+<path fill="none" stroke="#ff0000" d="M261.82,-61.25C275.76,-64.55 291.39,-69.07 305,-75 332.17,-86.84 360.35,-105.77 379.48,-119.8"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="377.49,-122.68 387.59,-125.85 381.67,-117.06 377.49,-122.68"/>
 </g>
-<!-- program~shape_half_ring_3d -->
+<!-- program~shape_half_circle -->
 <g id="proc~~finalize~~CalledByGraph_node8" class="node">
-<title>program~shape_half_ring_3d</title>
-<g id="a_proc~~finalize~~CalledByGraph_node8"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="284.5,-108 169.5,-108 169.5,-84 284.5,-84 284.5,-108"/>
-<text text-anchor="middle" x="227" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<title>program~shape_half_circle</title>
+<g id="a_proc~~finalize~~CalledByGraph_node8"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-24 170,-24 170,0 274,0 274,-24"/>
+<text text-anchor="middle" x="222" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~finalize -->
+<!-- program~shape_half_circle&#45;&gt;proc~finalize -->
 <g id="proc~~finalize~~CalledByGraph_edge7" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0000" d="M284.52,-106.92C294.84,-109.68 305.38,-113.01 315,-117 343.51,-128.81 373.29,-147.87 393.45,-161.94"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="391.56,-164.89 401.74,-167.82 395.61,-159.18 391.56,-164.89"/>
-</g>
-<!-- program~shape_hexahedron -->
-<g id="proc~~finalize~~CalledByGraph_node9" class="node">
-<title>program~shape_hexahedron</title>
-<g id="a_proc~~finalize~~CalledByGraph_node9"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="283.5,-66 170.5,-66 170.5,-42 283.5,-42 283.5,-66"/>
-<text text-anchor="middle" x="227" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
-</a>
-</g>
-</g>
-<!-- program~shape_hexahedron&#45;&gt;proc~finalize -->
-<g id="proc~~finalize~~CalledByGraph_edge8" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0000" d="M283.6,-62.52C294.44,-65.52 305.4,-69.56 315,-75 352.62,-96.34 385.54,-135.4 403.52,-159.39"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="400.93,-161.78 409.66,-167.78 406.58,-157.65 400.93,-161.78"/>
-</g>
-<!-- program~shape_ring_3d -->
-<g id="proc~~finalize~~CalledByGraph_node10" class="node">
-<title>program~shape_ring_3d</title>
-<g id="a_proc~~finalize~~CalledByGraph_node10"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-24 182,-24 182,0 272,0 272,-24"/>
-<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_ring_3d&#45;&gt;proc~finalize -->
-<g id="proc~~finalize~~CalledByGraph_edge9" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0000" d="M272.13,-16.32C286.72,-19.34 302.42,-24.42 315,-33 361.94,-64.99 394.25,-125.95 408.97,-158.41"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="405.9,-160.12 413.13,-167.87 412.31,-157.31 405.9,-160.12"/>
+<title>program~shape_half_circle&#45;&gt;proc~finalize</title>
+<path fill="none" stroke="#ff0000" d="M274.22,-20.34C284.85,-23.36 295.65,-27.45 305,-33 341.32,-54.54 372.48,-93.54 389.41,-117.46"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="386.62,-119.59 395.18,-125.83 392.38,-115.61 386.62,-119.59"/>
 </g>
 </g>
 </svg>
@@ -452,7 +422,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/finalize~2.html b/proc/finalize~2.html
index 66451ad91..d230046bb 100644
--- a/proc/finalize~2.html
+++ b/proc/finalize~2.html
@@ -78,20 +78,20 @@ <h1>finalize
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.2% of total for procedures.">14 statements</a>
+                 title=" 0.2% of total for procedures.">16 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">finalize</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine finalize(this)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~90"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~83"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -186,202 +186,157 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~finalize~2~~CalledByGraph Pages: 1 -->
-<svg id="procfinalize2CalledByGraph" width="495pt" height="488pt"
- viewBox="0.00 0.00 495.00 488.31" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~finalize~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 484.31)">
+<svg id="procfinalize2CalledByGraph" width="495pt" height="359pt"
+ viewBox="0.00 0.00 495.00 358.73" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~finalize~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 354.73)">
 <title>proc~~finalize~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-484.31 491,-484.31 491,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-354.73 491,-354.73 491,4 -4,4"/>
 <!-- proc~finalize~2 -->
 <g id="proc~~finalize~2~~CalledByGraph_node1" class="node">
 <title>proc~finalize~2</title>
-<polygon fill="none" stroke="black" points="487,-255 351,-255 351,-231 487,-231 487,-255"/>
-<text text-anchor="middle" x="419" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%finalize</text>
+<polygon fill="none" stroke="black" points="487,-192 351,-192 351,-168 487,-168 487,-192"/>
+<text text-anchor="middle" x="419" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%finalize</text>
 </g>
 <!-- proc~nearest_point2~2 -->
 <g id="proc~~finalize~2~~CalledByGraph_node2" class="node">
 <title>proc~nearest_point2~2</title>
-<g id="a_proc~~finalize~2~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_surface%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="315,-444 139,-444 139,-420 315,-420 315,-444"/>
-<text text-anchor="middle" x="227" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
+<g id="a_proc~~finalize~2~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_volume%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="315,-318 139,-318 139,-294 315,-294 315,-318"/>
+<text text-anchor="middle" x="227" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~2&#45;&gt;proc~finalize~2 -->
 <g id="proc~~finalize~2~~CalledByGraph_edge1" class="edge">
 <title>proc~nearest_point2~2&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0000" d="M298.99,-420C304.67,-417.53 310.1,-414.56 315,-411 366.62,-373.45 397.71,-301.4 410.77,-265.08"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="414.15,-266.03 414.12,-255.43 407.53,-263.74 414.15,-266.03"/>
+<path fill="none" stroke="#ff0000" d="M295.03,-293.91C301.99,-291.46 308.78,-288.53 315,-285 352.62,-263.66 385.54,-224.6 403.52,-200.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="406.58,-202.35 409.66,-192.22 400.93,-198.22 406.58,-202.35"/>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~finalize~2~~CalledByGraph_node3" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~finalize~2~~CalledByGraph_node3"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="282,-402 172,-402 172,-378 282,-378 282,-402"/>
-<text text-anchor="middle" x="227" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<title>program~example3_volume</title>
+<g id="a_proc~~finalize~2~~CalledByGraph_node3"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="282,-276 172,-276 172,-252 282,-252 282,-276"/>
+<text text-anchor="middle" x="227" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~finalize~2 -->
+<!-- program~example3_volume&#45;&gt;proc~finalize~2 -->
 <g id="proc~~finalize~2~~CalledByGraph_edge2" class="edge">
-<title>program~example3_surface&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0000" d="M282.18,-382.65C293.58,-379.57 305.13,-375.2 315,-369 357.15,-342.5 390.08,-292.78 406.51,-264.36"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="409.77,-265.7 411.62,-255.27 403.67,-262.27 409.77,-265.7"/>
+<title>program~example3_volume&#45;&gt;proc~finalize~2</title>
+<path fill="none" stroke="#ff0000" d="M282.21,-253.69C293.26,-250.82 304.67,-247.28 315,-243 343.51,-231.19 373.29,-212.13 393.45,-198.06"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="395.61,-200.82 401.74,-192.18 391.56,-195.11 395.61,-200.82"/>
 </g>
-<!-- program~example_nurbs_surface -->
+<!-- program~example_nurbs_volume -->
 <g id="proc~~finalize~2~~CalledByGraph_node4" class="node">
-<title>program~example_nurbs_surface</title>
-<g id="a_proc~~finalize~2~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="296.5,-360 157.5,-360 157.5,-336 296.5,-336 296.5,-360"/>
-<text text-anchor="middle" x="227" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<title>program~example_nurbs_volume</title>
+<g id="a_proc~~finalize~2~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="296.5,-234 157.5,-234 157.5,-210 296.5,-210 296.5,-234"/>
+<text text-anchor="middle" x="227" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~finalize~2 -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~finalize~2 -->
 <g id="proc~~finalize~2~~CalledByGraph_edge3" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0000" d="M292.36,-335.94C300.18,-333.47 307.9,-330.52 315,-327 348.25,-310.51 380.38,-281.58 399.67,-262.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="402.36,-264.6 406.88,-255.02 397.37,-259.7 402.36,-264.6"/>
+<title>program~example_nurbs_volume&#45;&gt;proc~finalize~2</title>
+<path fill="none" stroke="#ff0000" d="M282.45,-209.96C304.61,-205.07 330.39,-199.37 353.49,-194.26"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="354.54,-197.61 363.55,-192.04 353.03,-190.78 354.54,-197.61"/>
 </g>
-<!-- program~example_ppm1 -->
+<!-- program~example_put_to_nurbs -->
 <g id="proc~~finalize~2~~CalledByGraph_node5" class="node">
-<title>program~example_ppm1</title>
-<g id="a_proc~~finalize~2~~CalledByGraph_node5"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-318 180,-318 180,-294 274,-294 274,-318"/>
-<text text-anchor="middle" x="227" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+<title>program~example_put_to_nurbs</title>
+<g id="a_proc~~finalize~2~~CalledByGraph_node5"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="293,-192 161,-192 161,-168 293,-168 293,-192"/>
+<text text-anchor="middle" x="227" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~finalize~2 -->
+<!-- program~example_put_to_nurbs&#45;&gt;proc~finalize~2 -->
 <g id="proc~~finalize~2~~CalledByGraph_edge4" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0000" d="M274.41,-296.16C287.64,-292.99 301.99,-289.2 315,-285 337.64,-277.7 362.34,-267.7 381.88,-259.29"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="383.53,-262.38 391.3,-255.18 380.74,-255.97 383.53,-262.38"/>
+<title>program~example_put_to_nurbs&#45;&gt;proc~finalize~2</title>
+<path fill="none" stroke="#ff0000" d="M293.12,-180C308.37,-180 324.75,-180 340.48,-180"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="340.7,-183.5 350.7,-180 340.7,-176.5 340.7,-183.5"/>
 </g>
-<!-- program~example_ppm2 -->
+<!-- program~nearest_point_3d -->
 <g id="proc~~finalize~2~~CalledByGraph_node6" class="node">
-<title>program~example_ppm2</title>
-<g id="a_proc~~finalize~2~~CalledByGraph_node6"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-276 180,-276 180,-252 274,-252 274,-276"/>
-<text text-anchor="middle" x="227" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+<title>program~nearest_point_3d</title>
+<g id="a_proc~~finalize~2~~CalledByGraph_node6"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-338 0,-338 0,-314 103,-314 103,-338"/>
+<text text-anchor="middle" x="51.5" y="-323.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~finalize~2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~finalize~2 -->
 <g id="proc~~finalize~2~~CalledByGraph_edge5" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0000" d="M274.48,-258.86C294.39,-256.66 318.19,-254.03 340.63,-251.55"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="341.27,-255 350.82,-250.42 340.5,-248.04 341.27,-255"/>
+<title>program~nearest_point_3d&#45;&gt;proc~finalize~2</title>
+<path fill="none" stroke="#ff0000" d="M96.76,-338.05C151.42,-350.37 245.67,-363.08 315,-327 366.11,-300.41 397.11,-235.56 410.4,-201.58"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="413.72,-202.69 413.96,-192.1 407.17,-200.23 413.72,-202.69"/>
 </g>
-<!-- program~example_ppm3 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
+<g id="proc~~finalize~2~~CalledByGraph_edge10" class="edge">
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
+<path fill="none" stroke="#ff0000" d="M103.15,-320.16C111.29,-319.22 119.94,-318.23 128.75,-317.21"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="129.19,-320.68 138.73,-316.06 128.39,-313.73 129.19,-320.68"/>
+</g>
+<!-- program~shape_c_3d -->
 <g id="proc~~finalize~2~~CalledByGraph_node7" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~finalize~2~~CalledByGraph_node7"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-234 180,-234 180,-210 274,-210 274,-234"/>
-<text text-anchor="middle" x="227" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+<title>program~shape_c_3d</title>
+<g id="a_proc~~finalize~2~~CalledByGraph_node7"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="265,-150 189,-150 189,-126 265,-126 265,-150"/>
+<text text-anchor="middle" x="227" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~finalize~2 -->
+<!-- program~shape_c_3d&#45;&gt;proc~finalize~2 -->
 <g id="proc~~finalize~2~~CalledByGraph_edge6" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0000" d="M274.48,-227.14C294.39,-229.34 318.19,-231.97 340.63,-234.45"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="340.5,-237.96 350.82,-235.58 341.27,-231 340.5,-237.96"/>
+<title>program~shape_c_3d&#45;&gt;proc~finalize~2</title>
+<path fill="none" stroke="#ff0000" d="M265.08,-146.2C290.21,-151.75 324.09,-159.24 353.57,-165.76"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="352.86,-169.18 363.38,-167.93 354.37,-162.35 352.86,-169.18"/>
 </g>
-<!-- program~nearest_point_2d -->
+<!-- program~shape_half_ring_3d -->
 <g id="proc~~finalize~2~~CalledByGraph_node8" class="node">
-<title>program~nearest_point_2d</title>
-<g id="a_proc~~finalize~2~~CalledByGraph_node8"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-464 0,-464 0,-440 103,-440 103,-464"/>
-<text text-anchor="middle" x="51.5" y="-449.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<title>program~shape_half_ring_3d</title>
+<g id="a_proc~~finalize~2~~CalledByGraph_node8"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="284.5,-108 169.5,-108 169.5,-84 284.5,-84 284.5,-108"/>
+<text text-anchor="middle" x="227" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~finalize~2 -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~finalize~2 -->
 <g id="proc~~finalize~2~~CalledByGraph_edge7" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0000" d="M91.13,-464.05C145.58,-478.57 245.97,-496.03 315,-453 382.51,-410.92 407.01,-310.27 414.8,-265.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="418.3,-265.6 416.43,-255.18 411.39,-264.49 418.3,-265.6"/>
-</g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
-<g id="proc~~finalize~2~~CalledByGraph_edge13" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
-<path fill="none" stroke="#ff0000" d="M103.15,-446.16C111.29,-445.22 119.94,-444.23 128.75,-443.21"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="129.19,-446.68 138.73,-442.06 128.39,-439.73 129.19,-446.68"/>
+<title>program~shape_half_ring_3d&#45;&gt;proc~finalize~2</title>
+<path fill="none" stroke="#ff0000" d="M284.52,-106.92C294.84,-109.68 305.38,-113.01 315,-117 343.51,-128.81 373.29,-147.87 393.45,-161.94"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="391.56,-164.89 401.74,-167.82 395.61,-159.18 391.56,-164.89"/>
 </g>
-<!-- program~nearest_point_2d_bench -->
+<!-- program~shape_hexahedron -->
 <g id="proc~~finalize~2~~CalledByGraph_node9" class="node">
-<title>program~nearest_point_2d_bench</title>
-<g id="a_proc~~finalize~2~~CalledByGraph_node9"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="298,-192 156,-192 156,-168 298,-168 298,-192"/>
-<text text-anchor="middle" x="227" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+<title>program~shape_hexahedron</title>
+<g id="a_proc~~finalize~2~~CalledByGraph_node9"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="283.5,-66 170.5,-66 170.5,-42 283.5,-42 283.5,-66"/>
+<text text-anchor="middle" x="227" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~finalize~2 -->
+<!-- program~shape_hexahedron&#45;&gt;proc~finalize~2 -->
 <g id="proc~~finalize~2~~CalledByGraph_edge8" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0000" d="M283.58,-192.09C294.09,-194.75 304.94,-197.76 315,-201 337.64,-208.3 362.34,-218.3 381.88,-226.71"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="380.74,-230.03 391.3,-230.82 383.53,-223.62 380.74,-230.03"/>
+<title>program~shape_hexahedron&#45;&gt;proc~finalize~2</title>
+<path fill="none" stroke="#ff0000" d="M283.6,-62.52C294.44,-65.52 305.4,-69.56 315,-75 352.62,-96.34 385.54,-135.4 403.52,-159.39"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="400.93,-161.78 409.66,-167.78 406.58,-157.65 400.93,-161.78"/>
 </g>
-<!-- program~shape_c_2d -->
+<!-- program~shape_ring_3d -->
 <g id="proc~~finalize~2~~CalledByGraph_node10" class="node">
-<title>program~shape_c_2d</title>
-<g id="a_proc~~finalize~2~~CalledByGraph_node10"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="265,-150 189,-150 189,-126 265,-126 265,-150"/>
-<text text-anchor="middle" x="227" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+<title>program~shape_ring_3d</title>
+<g id="a_proc~~finalize~2~~CalledByGraph_node10"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-24 182,-24 182,0 272,0 272,-24"/>
+<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~finalize~2 -->
+<!-- program~shape_ring_3d&#45;&gt;proc~finalize~2 -->
 <g id="proc~~finalize~2~~CalledByGraph_edge9" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0000" d="M265.24,-143.2C281.14,-146.37 299.55,-151.34 315,-159 348.25,-175.49 380.38,-204.42 399.67,-223.65"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="397.37,-226.3 406.88,-230.98 402.36,-221.4 397.37,-226.3"/>
-</g>
-<!-- program~shape_half_ring_2d -->
-<g id="proc~~finalize~2~~CalledByGraph_node11" class="node">
-<title>program~shape_half_ring_2d</title>
-<g id="a_proc~~finalize~2~~CalledByGraph_node11"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="284.5,-108 169.5,-108 169.5,-84 284.5,-84 284.5,-108"/>
-<text text-anchor="middle" x="227" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~finalize~2 -->
-<g id="proc~~finalize~2~~CalledByGraph_edge10" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0000" d="M284.92,-104.11C295.42,-107.14 305.92,-111.29 315,-117 357.15,-143.5 390.08,-193.22 406.51,-221.64"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="403.67,-223.73 411.62,-230.73 409.77,-220.3 403.67,-223.73"/>
-</g>
-<!-- program~shape_ring_2d -->
-<g id="proc~~finalize~2~~CalledByGraph_node12" class="node">
-<title>program~shape_ring_2d</title>
-<g id="a_proc~~finalize~2~~CalledByGraph_node12"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-66 182,-66 182,-42 272,-42 272,-66"/>
-<text text-anchor="middle" x="227" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_ring_2d&#45;&gt;proc~finalize~2 -->
-<g id="proc~~finalize~2~~CalledByGraph_edge11" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0000" d="M272.44,-57.89C287.05,-60.87 302.69,-66.04 315,-75 366.62,-112.55 397.71,-184.6 410.77,-220.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="407.53,-222.26 414.12,-230.57 414.15,-219.97 407.53,-222.26"/>
-</g>
-<!-- program~shape_tetragon -->
-<g id="proc~~finalize~2~~CalledByGraph_node13" class="node">
-<title>program~shape_tetragon</title>
-<g id="a_proc~~finalize~2~~CalledByGraph_node13"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="275,-24 179,-24 179,0 275,0 275,-24"/>
-<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
-</a>
-</g>
-</g>
-<!-- program~shape_tetragon&#45;&gt;proc~finalize~2 -->
-<g id="proc~~finalize~2~~CalledByGraph_edge12" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~finalize~2</title>
-<path fill="none" stroke="#ff0000" d="M275.19,-15.71C289.16,-18.72 303.73,-23.96 315,-33 376.5,-82.31 403.95,-177.57 413.63,-220.75"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="410.26,-221.73 415.77,-230.78 417.11,-220.27 410.26,-221.73"/>
+<title>program~shape_ring_3d&#45;&gt;proc~finalize~2</title>
+<path fill="none" stroke="#ff0000" d="M272.13,-16.32C286.72,-19.34 302.42,-24.42 315,-33 361.94,-64.99 394.25,-125.95 408.97,-158.41"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="405.9,-160.12 413.13,-167.87 412.31,-157.31 405.9,-160.12"/>
 </g>
 </g>
 </svg>
@@ -497,7 +452,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/finalize~3.html b/proc/finalize~3.html
index 0d75bb5ae..017d7fa21 100644
--- a/proc/finalize~3.html
+++ b/proc/finalize~3.html
@@ -78,20 +78,20 @@ <h1>finalize
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.2% of total for procedures.">11 statements</a>
+                 title=" 0.2% of total for procedures.">14 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">finalize</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine finalize(this)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~153"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~151"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -186,127 +186,202 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~finalize~3~~CalledByGraph Pages: 1 -->
-<svg id="procfinalize3CalledByGraph" width="475pt" height="271pt"
- viewBox="0.00 0.00 475.00 270.78" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~finalize~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 266.78)">
+<svg id="procfinalize3CalledByGraph" width="495pt" height="488pt"
+ viewBox="0.00 0.00 495.00 488.31" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~finalize~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 484.31)">
 <title>proc~~finalize~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-266.78 471,-266.78 471,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-484.31 491,-484.31 491,4 -4,4"/>
 <!-- proc~finalize~3 -->
 <g id="proc~~finalize~3~~CalledByGraph_node1" class="node">
 <title>proc~finalize~3</title>
-<polygon fill="none" stroke="black" points="467,-150 341,-150 341,-126 467,-126 467,-150"/>
-<text text-anchor="middle" x="404" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%finalize</text>
+<polygon fill="none" stroke="black" points="487,-255 351,-255 351,-231 487,-231 487,-255"/>
+<text text-anchor="middle" x="419" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%finalize</text>
 </g>
 <!-- proc~nearest_point2~3 -->
 <g id="proc~~finalize~3~~CalledByGraph_node2" class="node">
 <title>proc~nearest_point2~3</title>
-<g id="a_proc~~finalize~3~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_curve%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="305,-234 139,-234 139,-210 305,-210 305,-234"/>
-<text text-anchor="middle" x="222" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
+<g id="a_proc~~finalize~3~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_surface%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="315,-444 139,-444 139,-420 315,-420 315,-444"/>
+<text text-anchor="middle" x="227" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;proc~finalize~3 -->
 <g id="proc~~finalize~3~~CalledByGraph_edge1" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;proc~finalize~3</title>
-<path fill="none" stroke="#ff0000" d="M279.82,-209.99C288.41,-207.45 297.05,-204.46 305,-201 332.17,-189.16 360.35,-170.23 379.48,-156.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="381.67,-158.94 387.59,-150.15 377.49,-153.32 381.67,-158.94"/>
+<path fill="none" stroke="#ff0000" d="M298.99,-420C304.67,-417.53 310.1,-414.56 315,-411 366.62,-373.45 397.71,-301.4 410.77,-265.08"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="414.15,-266.03 414.12,-255.43 407.53,-263.74 414.15,-266.03"/>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~finalize~3~~CalledByGraph_node3" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~finalize~3~~CalledByGraph_node3"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-192 172,-192 172,-168 272,-168 272,-192"/>
-<text text-anchor="middle" x="222" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~finalize~3~~CalledByGraph_node3"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="282,-402 172,-402 172,-378 282,-378 282,-402"/>
+<text text-anchor="middle" x="227" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~finalize~3 -->
+<!-- program~example3_surface&#45;&gt;proc~finalize~3 -->
 <g id="proc~~finalize~3~~CalledByGraph_edge2" class="edge">
-<title>program~example1_curve&#45;&gt;proc~finalize~3</title>
-<path fill="none" stroke="#ff0000" d="M272.19,-168.52C293.58,-163.53 318.89,-157.63 341.51,-152.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="342.42,-155.73 351.36,-150.05 340.83,-148.91 342.42,-155.73"/>
+<title>program~example3_surface&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0000" d="M282.18,-382.65C293.58,-379.57 305.13,-375.2 315,-369 357.15,-342.5 390.08,-292.78 406.51,-264.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="409.77,-265.7 411.62,-255.27 403.67,-262.27 409.77,-265.7"/>
 </g>
-<!-- program~example_nurbs_curve -->
+<!-- program~example_nurbs_surface -->
 <g id="proc~~finalize~3~~CalledByGraph_node4" class="node">
-<title>program~example_nurbs_curve</title>
-<g id="a_proc~~finalize~3~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="286.5,-150 157.5,-150 157.5,-126 286.5,-126 286.5,-150"/>
-<text text-anchor="middle" x="222" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<title>program~example_nurbs_surface</title>
+<g id="a_proc~~finalize~3~~CalledByGraph_node4"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="296.5,-360 157.5,-360 157.5,-336 296.5,-336 296.5,-360"/>
+<text text-anchor="middle" x="227" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~finalize~3 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~finalize~3 -->
 <g id="proc~~finalize~3~~CalledByGraph_edge3" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~finalize~3</title>
-<path fill="none" stroke="#ff0000" d="M286.71,-138C300.87,-138 315.99,-138 330.47,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="330.88,-141.5 340.88,-138 330.88,-134.5 330.88,-141.5"/>
+<title>program~example_nurbs_surface&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0000" d="M292.36,-335.94C300.18,-333.47 307.9,-330.52 315,-327 348.25,-310.51 380.38,-281.58 399.67,-262.35"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="402.36,-264.6 406.88,-255.02 397.37,-259.7 402.36,-264.6"/>
 </g>
-<!-- program~nearest_point_1d -->
+<!-- program~example_ppm1 -->
 <g id="proc~~finalize~3~~CalledByGraph_node5" class="node">
-<title>program~nearest_point_1d</title>
-<g id="a_proc~~finalize~3~~CalledByGraph_node5"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-254 0,-254 0,-230 103,-230 103,-254"/>
-<text text-anchor="middle" x="51.5" y="-239.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<title>program~example_ppm1</title>
+<g id="a_proc~~finalize~3~~CalledByGraph_node5"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-318 180,-318 180,-294 274,-294 274,-318"/>
+<text text-anchor="middle" x="227" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~finalize~3 -->
+<!-- program~example_ppm1&#45;&gt;proc~finalize~3 -->
 <g id="proc~~finalize~3~~CalledByGraph_edge4" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~finalize~3</title>
-<path fill="none" stroke="#ff0000" d="M103.29,-253.75C156.05,-263.38 239.87,-271.3 305,-243 344.34,-225.9 375.06,-184.37 390.98,-158.96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="394.16,-160.47 396.35,-150.1 388.17,-156.84 394.16,-160.47"/>
+<title>program~example_ppm1&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0000" d="M274.41,-296.16C287.64,-292.99 301.99,-289.2 315,-285 337.64,-277.7 362.34,-267.7 381.88,-259.29"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="383.53,-262.38 391.3,-255.18 380.74,-255.97 383.53,-262.38"/>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2~3 -->
-<g id="proc~~finalize~3~~CalledByGraph_edge8" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2~3</title>
-<path fill="none" stroke="#ff0000" d="M103.06,-236C111.3,-235.02 120.05,-233.98 128.92,-232.93"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="129.45,-236.39 138.97,-231.74 128.63,-229.44 129.45,-236.39"/>
-</g>
-<!-- program~shape_c_1d -->
+<!-- program~example_ppm2 -->
 <g id="proc~~finalize~3~~CalledByGraph_node6" class="node">
-<title>program~shape_c_1d</title>
-<g id="a_proc~~finalize~3~~CalledByGraph_node6"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-108 184,-108 184,-84 260,-84 260,-108"/>
-<text text-anchor="middle" x="222" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<title>program~example_ppm2</title>
+<g id="a_proc~~finalize~3~~CalledByGraph_node6"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-276 180,-276 180,-252 274,-252 274,-276"/>
+<text text-anchor="middle" x="227" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~finalize~3 -->
+<!-- program~example_ppm2&#45;&gt;proc~finalize~3 -->
 <g id="proc~~finalize~3~~CalledByGraph_edge5" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~finalize~3</title>
-<path fill="none" stroke="#ff0000" d="M260.3,-104.7C283.77,-110.18 314.64,-117.38 341.66,-123.69"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="340.89,-127.1 351.42,-125.96 342.48,-120.28 340.89,-127.1"/>
+<title>program~example_ppm2&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0000" d="M274.48,-258.86C294.39,-256.66 318.19,-254.03 340.63,-251.55"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="341.27,-255 350.82,-250.42 340.5,-248.04 341.27,-255"/>
 </g>
-<!-- program~shape_circle -->
+<!-- program~example_ppm3 -->
 <g id="proc~~finalize~3~~CalledByGraph_node7" class="node">
-<title>program~shape_circle</title>
-<g id="a_proc~~finalize~3~~CalledByGraph_node7"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="261.5,-66 182.5,-66 182.5,-42 261.5,-42 261.5,-66"/>
-<text text-anchor="middle" x="222" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<title>program~example_ppm3</title>
+<g id="a_proc~~finalize~3~~CalledByGraph_node7"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-234 180,-234 180,-210 274,-210 274,-234"/>
+<text text-anchor="middle" x="227" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~finalize~3 -->
+<!-- program~example_ppm3&#45;&gt;proc~finalize~3 -->
 <g id="proc~~finalize~3~~CalledByGraph_edge6" class="edge">
-<title>program~shape_circle&#45;&gt;proc~finalize~3</title>
-<path fill="none" stroke="#ff0000" d="M261.82,-61.25C275.76,-64.55 291.39,-69.07 305,-75 332.17,-86.84 360.35,-105.77 379.48,-119.8"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="377.49,-122.68 387.59,-125.85 381.67,-117.06 377.49,-122.68"/>
+<title>program~example_ppm3&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0000" d="M274.48,-227.14C294.39,-229.34 318.19,-231.97 340.63,-234.45"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="340.5,-237.96 350.82,-235.58 341.27,-231 340.5,-237.96"/>
 </g>
-<!-- program~shape_half_circle -->
+<!-- program~nearest_point_2d -->
 <g id="proc~~finalize~3~~CalledByGraph_node8" class="node">
-<title>program~shape_half_circle</title>
-<g id="a_proc~~finalize~3~~CalledByGraph_node8"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-24 170,-24 170,0 274,0 274,-24"/>
-<text text-anchor="middle" x="222" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<title>program~nearest_point_2d</title>
+<g id="a_proc~~finalize~3~~CalledByGraph_node8"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-464 0,-464 0,-440 103,-440 103,-464"/>
+<text text-anchor="middle" x="51.5" y="-449.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~finalize~3 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~finalize~3 -->
 <g id="proc~~finalize~3~~CalledByGraph_edge7" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~finalize~3</title>
-<path fill="none" stroke="#ff0000" d="M274.22,-20.34C284.85,-23.36 295.65,-27.45 305,-33 341.32,-54.54 372.48,-93.54 389.41,-117.46"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="386.62,-119.59 395.18,-125.83 392.38,-115.61 386.62,-119.59"/>
+<title>program~nearest_point_2d&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0000" d="M91.13,-464.05C145.58,-478.57 245.97,-496.03 315,-453 382.51,-410.92 407.01,-310.27 414.8,-265.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="418.3,-265.6 416.43,-255.18 411.39,-264.49 418.3,-265.6"/>
+</g>
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
+<g id="proc~~finalize~3~~CalledByGraph_edge13" class="edge">
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
+<path fill="none" stroke="#ff0000" d="M103.15,-446.16C111.29,-445.22 119.94,-444.23 128.75,-443.21"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="129.19,-446.68 138.73,-442.06 128.39,-439.73 129.19,-446.68"/>
+</g>
+<!-- program~nearest_point_2d_bench -->
+<g id="proc~~finalize~3~~CalledByGraph_node9" class="node">
+<title>program~nearest_point_2d_bench</title>
+<g id="a_proc~~finalize~3~~CalledByGraph_node9"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="298,-192 156,-192 156,-168 298,-168 298,-192"/>
+<text text-anchor="middle" x="227" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+</a>
+</g>
+</g>
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~finalize~3 -->
+<g id="proc~~finalize~3~~CalledByGraph_edge8" class="edge">
+<title>program~nearest_point_2d_bench&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0000" d="M283.58,-192.09C294.09,-194.75 304.94,-197.76 315,-201 337.64,-208.3 362.34,-218.3 381.88,-226.71"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="380.74,-230.03 391.3,-230.82 383.53,-223.62 380.74,-230.03"/>
+</g>
+<!-- program~shape_c_2d -->
+<g id="proc~~finalize~3~~CalledByGraph_node10" class="node">
+<title>program~shape_c_2d</title>
+<g id="a_proc~~finalize~3~~CalledByGraph_node10"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="265,-150 189,-150 189,-126 265,-126 265,-150"/>
+<text text-anchor="middle" x="227" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_c_2d&#45;&gt;proc~finalize~3 -->
+<g id="proc~~finalize~3~~CalledByGraph_edge9" class="edge">
+<title>program~shape_c_2d&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0000" d="M265.24,-143.2C281.14,-146.37 299.55,-151.34 315,-159 348.25,-175.49 380.38,-204.42 399.67,-223.65"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="397.37,-226.3 406.88,-230.98 402.36,-221.4 397.37,-226.3"/>
+</g>
+<!-- program~shape_half_ring_2d -->
+<g id="proc~~finalize~3~~CalledByGraph_node11" class="node">
+<title>program~shape_half_ring_2d</title>
+<g id="a_proc~~finalize~3~~CalledByGraph_node11"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="284.5,-108 169.5,-108 169.5,-84 284.5,-84 284.5,-108"/>
+<text text-anchor="middle" x="227" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~finalize~3 -->
+<g id="proc~~finalize~3~~CalledByGraph_edge10" class="edge">
+<title>program~shape_half_ring_2d&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0000" d="M284.92,-104.11C295.42,-107.14 305.92,-111.29 315,-117 357.15,-143.5 390.08,-193.22 406.51,-221.64"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="403.67,-223.73 411.62,-230.73 409.77,-220.3 403.67,-223.73"/>
+</g>
+<!-- program~shape_ring_2d -->
+<g id="proc~~finalize~3~~CalledByGraph_node12" class="node">
+<title>program~shape_ring_2d</title>
+<g id="a_proc~~finalize~3~~CalledByGraph_node12"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-66 182,-66 182,-42 272,-42 272,-66"/>
+<text text-anchor="middle" x="227" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_ring_2d&#45;&gt;proc~finalize~3 -->
+<g id="proc~~finalize~3~~CalledByGraph_edge11" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0000" d="M272.44,-57.89C287.05,-60.87 302.69,-66.04 315,-75 366.62,-112.55 397.71,-184.6 410.77,-220.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="407.53,-222.26 414.12,-230.57 414.15,-219.97 407.53,-222.26"/>
+</g>
+<!-- program~shape_tetragon -->
+<g id="proc~~finalize~3~~CalledByGraph_node13" class="node">
+<title>program~shape_tetragon</title>
+<g id="a_proc~~finalize~3~~CalledByGraph_node13"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="275,-24 179,-24 179,0 275,0 275,-24"/>
+<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+</a>
+</g>
+</g>
+<!-- program~shape_tetragon&#45;&gt;proc~finalize~3 -->
+<g id="proc~~finalize~3~~CalledByGraph_edge12" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~finalize~3</title>
+<path fill="none" stroke="#ff0000" d="M275.19,-15.71C289.16,-18.72 303.73,-23.96 315,-33 376.5,-82.31 403.95,-177.57 413.63,-220.75"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="410.26,-221.73 415.77,-230.78 417.11,-220.27 410.26,-221.73"/>
 </g>
 </g>
 </svg>
@@ -422,7 +497,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/findspan.html b/proc/findspan.html
index 1a264fd05..622219f2e 100644
--- a/proc/findspan.html
+++ b/proc/findspan.html
@@ -171,7 +171,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~49"></span>
+              <span class="anchor" id="variable-degree~48"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -201,7 +201,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~13"></span>
+              <span class="anchor" id="variable-knot~34"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -250,9 +250,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~insert_knots -->
 <g id="proc~~findspan~~CalledByGraph_node2" class="node">
 <title>proc~insert_knots</title>
-<g id="a_proc~~findspan~~CalledByGraph_node2"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="312.5,-234 151.5,-234 151.5,-210 312.5,-210 312.5,-234"/>
-<text text-anchor="middle" x="232" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
+<g id="a_proc~~findspan~~CalledByGraph_node2"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_curve%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="307.5,-234 156.5,-234 156.5,-210 307.5,-210 307.5,-234"/>
+<text text-anchor="middle" x="232" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
 </a>
 </g>
 </g>
@@ -265,9 +265,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~insert_knots~2 -->
 <g id="proc~~findspan~~CalledByGraph_node3" class="node">
 <title>proc~insert_knots~2</title>
-<g id="a_proc~~findspan~~CalledByGraph_node3"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
+<g id="a_proc~~findspan~~CalledByGraph_node3"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
 <polygon fill="#d9534f" stroke="#d9534f" points="312.5,-150 151.5,-150 151.5,-126 312.5,-126 312.5,-150"/>
-<text text-anchor="middle" x="232" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+<text text-anchor="middle" x="232" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
@@ -280,9 +280,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~insert_knots~3 -->
 <g id="proc~~findspan~~CalledByGraph_node4" class="node">
 <title>proc~insert_knots~3</title>
-<g id="a_proc~~findspan~~CalledByGraph_node4"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_curve%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="307.5,-66 156.5,-66 156.5,-42 307.5,-42 307.5,-66"/>
-<text text-anchor="middle" x="232" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
+<g id="a_proc~~findspan~~CalledByGraph_node4"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="312.5,-66 151.5,-66 151.5,-42 312.5,-42 312.5,-66"/>
+<text text-anchor="middle" x="232" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
 </a>
 </g>
 </g>
@@ -295,9 +295,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~remove_knots -->
 <g id="proc~~findspan~~CalledByGraph_node5" class="node">
 <title>proc~remove_knots</title>
-<g id="a_proc~~findspan~~CalledByGraph_node5"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="318,-192 146,-192 146,-168 318,-168 318,-192"/>
-<text text-anchor="middle" x="232" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
+<g id="a_proc~~findspan~~CalledByGraph_node5"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_curve%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="313,-192 151,-192 151,-168 313,-168 313,-192"/>
+<text text-anchor="middle" x="232" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
 </a>
 </g>
 </g>
@@ -310,9 +310,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~remove_knots~2 -->
 <g id="proc~~findspan~~CalledByGraph_node6" class="node">
 <title>proc~remove_knots~2</title>
-<g id="a_proc~~findspan~~CalledByGraph_node6"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
+<g id="a_proc~~findspan~~CalledByGraph_node6"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
 <polygon fill="#d9534f" stroke="#d9534f" points="318,-108 146,-108 146,-84 318,-84 318,-108"/>
-<text text-anchor="middle" x="232" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
+<text text-anchor="middle" x="232" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
 </a>
 </g>
 </g>
@@ -325,9 +325,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~remove_knots~3 -->
 <g id="proc~~findspan~~CalledByGraph_node7" class="node">
 <title>proc~remove_knots~3</title>
-<g id="a_proc~~findspan~~CalledByGraph_node7"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_curve%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="313,-24 151,-24 151,0 313,0 313,-24"/>
-<text text-anchor="middle" x="232" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
+<g id="a_proc~~findspan~~CalledByGraph_node7"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="318,-24 146,-24 146,0 318,0 318,-24"/>
+<text text-anchor="middle" x="232" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
@@ -341,64 +341,64 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~findspan~~CalledByGraph_node8" class="node">
 <title>program~example1_curve</title>
 <g id="a_proc~~findspan~~CalledByGraph_node8"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-45 5,-45 5,-21 105,-21 105,-45"/>
-<text text-anchor="middle" x="55" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-202 5,-202 5,-178 105,-178 105,-202"/>
+<text text-anchor="middle" x="55" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
-<g id="proc~~findspan~~CalledByGraph_edge9" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
-<path fill="none" stroke="#00ff00" d="M105.21,-38.91C117.98,-40.44 132.11,-42.13 146.15,-43.82"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="145.99,-47.32 156.33,-45.04 146.82,-40.37 145.99,-47.32"/>
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
+<g id="proc~~findspan~~CalledByGraph_edge7" class="edge">
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
+<path fill="none" stroke="#ff0000" d="M105.21,-199C120.76,-201.84 138.32,-205.05 155.28,-208.15"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="154.71,-211.61 165.18,-209.96 155.97,-204.72 154.71,-211.61"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
-<g id="proc~~findspan~~CalledByGraph_edge12" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
-<path fill="none" stroke="#ff00ff" d="M105.21,-27.09C116.27,-25.77 128.34,-24.32 140.49,-22.86"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="141.19,-26.3 150.7,-21.64 140.35,-19.35 141.19,-26.3"/>
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
+<g id="proc~~findspan~~CalledByGraph_edge10" class="edge">
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
+<path fill="none" stroke="#00ffff" d="M105.21,-187.19C116.27,-186.56 128.34,-185.87 140.49,-185.17"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="140.91,-188.65 150.7,-184.59 140.52,-181.66 140.91,-188.65"/>
 </g>
 <!-- program~example3_surface -->
 <g id="proc~~findspan~~CalledByGraph_node9" class="node">
 <title>program~example3_surface</title>
 <g id="a_proc~~findspan~~CalledByGraph_node9"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-139 0,-139 0,-115 110,-115 110,-139"/>
-<text text-anchor="middle" x="55" y="-124.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-45 0,-45 0,-21 110,-21 110,-45"/>
+<text text-anchor="middle" x="55" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
-<g id="proc~~findspan~~CalledByGraph_edge8" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
-<path fill="none" stroke="#ffff00" d="M110.41,-130.42C120.22,-131.04 130.68,-131.69 141.18,-132.35"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="141.05,-135.85 151.25,-132.99 141.49,-128.87 141.05,-135.85"/>
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
+<g id="proc~~findspan~~CalledByGraph_edge9" class="edge">
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#00ff00" d="M110.41,-39.53C120.22,-40.71 130.68,-41.96 141.18,-43.22"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="140.9,-46.71 151.25,-44.43 141.74,-39.76 140.9,-46.71"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
-<g id="proc~~findspan~~CalledByGraph_edge11" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
-<path fill="none" stroke="#0000ff" d="M110.41,-117.36C123.94,-114.96 138.72,-112.35 153.13,-109.79"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="153.8,-113.23 163.04,-108.04 152.58,-106.34 153.8,-113.23"/>
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
+<g id="proc~~findspan~~CalledByGraph_edge12" class="edge">
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#ff00ff" d="M110.41,-26.47C118.49,-25.5 127.01,-24.48 135.63,-23.44"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="136.26,-26.89 145.77,-22.23 135.43,-19.94 136.26,-26.89"/>
 </g>
 <!-- program~example3_volume -->
 <g id="proc~~findspan~~CalledByGraph_node10" class="node">
 <title>program~example3_volume</title>
 <g id="a_proc~~findspan~~CalledByGraph_node10"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-202 0,-202 0,-178 110,-178 110,-202"/>
-<text text-anchor="middle" x="55" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-139 0,-139 0,-115 110,-115 110,-139"/>
+<text text-anchor="middle" x="55" y="-124.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
-<g id="proc~~findspan~~CalledByGraph_edge7" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#ff0000" d="M110.41,-199.95C124.65,-202.55 140.26,-205.41 155.39,-208.17"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="154.77,-211.62 165.24,-209.98 156.03,-204.73 154.77,-211.62"/>
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
+<g id="proc~~findspan~~CalledByGraph_edge8" class="edge">
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
+<path fill="none" stroke="#ffff00" d="M110.41,-130.42C120.22,-131.04 130.68,-131.69 141.18,-132.35"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="141.05,-135.85 151.25,-132.99 141.49,-128.87 141.05,-135.85"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
-<g id="proc~~findspan~~CalledByGraph_edge10" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#00ffff" d="M110.41,-186.89C118.49,-186.43 127.01,-185.94 135.63,-185.45"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="135.99,-188.93 145.77,-184.87 135.59,-181.95 135.99,-188.93"/>
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
+<g id="proc~~findspan~~CalledByGraph_edge11" class="edge">
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
+<path fill="none" stroke="#0000ff" d="M110.41,-117.36C123.94,-114.96 138.72,-112.35 153.13,-109.79"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="153.8,-113.23 163.04,-108.04 152.58,-106.34 153.8,-113.23"/>
 </g>
 </g>
 </svg>
@@ -514,7 +514,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/gauss_legendre_1d.html b/proc/gauss_legendre_1d.html
index 4be5a18a9..51f595893 100644
--- a/proc/gauss_legendre_1d.html
+++ b/proc/gauss_legendre_1d.html
@@ -171,7 +171,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~51"></span>
+              <span class="anchor" id="variable-degree~50"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -375,9 +375,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~ansatz -->
 <g id="proc~~gauss_legendre_1d~~CalledByGraph_node3" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~gauss_legendre_1d~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-108 343,-108 343,-84 475,-84 475,-108"/>
-<text text-anchor="middle" x="409" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~gauss_legendre_1d~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="470,-108 348,-108 348,-84 470,-84 470,-108"/>
+<text text-anchor="middle" x="409" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
@@ -390,9 +390,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~ansatz~2 -->
 <g id="proc~~gauss_legendre_1d~~CalledByGraph_node4" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~gauss_legendre_1d~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
+<g id="a_proc~~gauss_legendre_1d~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="475,-66 343,-66 343,-42 475,-42 475,-66"/>
-<text text-anchor="middle" x="409" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<text text-anchor="middle" x="409" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
@@ -405,9 +405,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~ansatz~3 -->
 <g id="proc~~gauss_legendre_1d~~CalledByGraph_node5" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~gauss_legendre_1d~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="470,-24 348,-24 348,0 470,0 470,-24"/>
-<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~gauss_legendre_1d~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-24 343,-24 343,0 475,0 475,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
@@ -421,91 +421,91 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~gauss_legendre_1d~~CalledByGraph_node6" class="node">
 <title>proc~cmp_area</title>
 <g id="a_proc~~gauss_legendre_1d~~CalledByGraph_node6"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-66 149,-66 149,-42 299,-42 299,-66"/>
-<text text-anchor="middle" x="224" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-24 149,-24 149,0 299,0 299,-24"/>
+<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~gauss_legendre_1d~~CalledByGraph_edge6" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#00ff00" d="M299.17,-54C310.24,-54 321.67,-54 332.77,-54"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="332.85,-57.5 342.85,-54 332.85,-50.5 332.85,-57.5"/>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~gauss_legendre_1d~~CalledByGraph_edge7" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#0000ff" d="M299.17,-12C310.24,-12 321.67,-12 332.77,-12"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="332.85,-15.5 342.85,-12 332.85,-8.5 332.85,-15.5"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="proc~~gauss_legendre_1d~~CalledByGraph_node7" class="node">
 <title>proc~cmp_length</title>
 <g id="a_proc~~gauss_legendre_1d~~CalledByGraph_node7"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-24 149,-24 149,0 299,0 299,-24"/>
-<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-108 149,-108 149,-84 299,-84 299,-108"/>
+<text text-anchor="middle" x="224" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="proc~~gauss_legendre_1d~~CalledByGraph_edge7" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#0000ff" d="M299.17,-12C311.79,-12 324.86,-12 337.38,-12"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="337.75,-15.5 347.75,-12 337.75,-8.5 337.75,-15.5"/>
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
+<g id="proc~~gauss_legendre_1d~~CalledByGraph_edge5" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M299.17,-96C311.79,-96 324.86,-96 337.38,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="337.75,-99.5 347.75,-96 337.75,-92.5 337.75,-99.5"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="proc~~gauss_legendre_1d~~CalledByGraph_node8" class="node">
 <title>proc~cmp_volume</title>
 <g id="a_proc~~gauss_legendre_1d~~CalledByGraph_node8"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-108 141,-108 141,-84 307,-84 307,-108"/>
-<text text-anchor="middle" x="224" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-66 141,-66 141,-42 307,-42 307,-66"/>
+<text text-anchor="middle" x="224" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~gauss_legendre_1d~~CalledByGraph_edge5" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.13,-96C315.64,-96 324.26,-96 332.7,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="332.87,-99.5 342.87,-96 332.87,-92.5 332.87,-99.5"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~gauss_legendre_1d~~CalledByGraph_edge6" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#00ff00" d="M307.13,-54C315.64,-54 324.26,-54 332.7,-54"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="332.87,-57.5 342.87,-54 332.87,-50.5 332.87,-57.5"/>
 </g>
 <!-- program~compute_area -->
 <g id="proc~~gauss_legendre_1d~~CalledByGraph_node9" class="node">
 <title>program~compute_area</title>
 <g id="a_proc~~gauss_legendre_1d~~CalledByGraph_node9"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-66 8,-66 8,-42 97,-42 97,-66"/>
-<text text-anchor="middle" x="52.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-24 8,-24 8,0 97,0 97,-24"/>
+<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
 <!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="proc~~gauss_legendre_1d~~CalledByGraph_edge8" class="edge">
 <title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M97.15,-54C109.86,-54 124.19,-54 138.52,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="138.92,-57.5 148.92,-54 138.92,-50.5 138.92,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M97.15,-12C109.86,-12 124.19,-12 138.52,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="138.92,-15.5 148.92,-12 138.92,-8.5 138.92,-15.5"/>
 </g>
 <!-- program~compute_length -->
 <g id="proc~~gauss_legendre_1d~~CalledByGraph_node10" class="node">
 <title>program~compute_length</title>
 <g id="a_proc~~gauss_legendre_1d~~CalledByGraph_node10"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-24 3,-24 3,0 102,0 102,-24"/>
-<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-108 3,-108 3,-84 102,-84 102,-108"/>
+<text text-anchor="middle" x="52.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="proc~~gauss_legendre_1d~~CalledByGraph_edge9" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#00ff00" d="M102.07,-12C113.57,-12 126.17,-12 138.75,-12"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="138.82,-15.5 148.82,-12 138.82,-8.5 138.82,-15.5"/>
+<path fill="none" stroke="#00ff00" d="M102.07,-96C113.57,-96 126.17,-96 138.75,-96"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="138.82,-99.5 148.82,-96 138.82,-92.5 138.82,-99.5"/>
 </g>
 <!-- program~compute_volume -->
 <g id="proc~~gauss_legendre_1d~~CalledByGraph_node11" class="node">
 <title>program~compute_volume</title>
 <g id="a_proc~~gauss_legendre_1d~~CalledByGraph_node11"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-108 0,-108 0,-84 105,-84 105,-108"/>
-<text text-anchor="middle" x="52.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-66 0,-66 0,-42 105,-42 105,-66"/>
+<text text-anchor="middle" x="52.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
 <!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="proc~~gauss_legendre_1d~~CalledByGraph_edge10" class="edge">
 <title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#0000ff" d="M105.28,-96C113.39,-96 121.99,-96 130.69,-96"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="130.93,-99.5 140.93,-96 130.93,-92.5 130.93,-99.5"/>
+<path fill="none" stroke="#0000ff" d="M105.28,-54C113.39,-54 121.99,-54 130.69,-54"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="130.93,-57.5 140.93,-54 130.93,-50.5 130.93,-57.5"/>
 </g>
 </g>
 </svg>
@@ -625,7 +625,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/gauss_legendre_2d.html b/proc/gauss_legendre_2d.html
index 9c3daa05a..723adf23c 100644
--- a/proc/gauss_legendre_2d.html
+++ b/proc/gauss_legendre_2d.html
@@ -186,7 +186,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~52"></span>
+              <span class="anchor" id="variable-degree~51"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -450,9 +450,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~ansatz -->
 <g id="proc~~gauss_legendre_2d~~CalledByGraph_node3" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~gauss_legendre_2d~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-108 343,-108 343,-84 475,-84 475,-108"/>
-<text text-anchor="middle" x="409" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~gauss_legendre_2d~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="470,-108 348,-108 348,-84 470,-84 470,-108"/>
+<text text-anchor="middle" x="409" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
@@ -465,9 +465,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~ansatz~2 -->
 <g id="proc~~gauss_legendre_2d~~CalledByGraph_node4" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~gauss_legendre_2d~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
+<g id="a_proc~~gauss_legendre_2d~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="475,-66 343,-66 343,-42 475,-42 475,-66"/>
-<text text-anchor="middle" x="409" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<text text-anchor="middle" x="409" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
@@ -480,9 +480,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~ansatz~3 -->
 <g id="proc~~gauss_legendre_2d~~CalledByGraph_node5" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~gauss_legendre_2d~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="470,-24 348,-24 348,0 470,0 470,-24"/>
-<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~gauss_legendre_2d~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-24 343,-24 343,0 475,0 475,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
@@ -496,91 +496,91 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~gauss_legendre_2d~~CalledByGraph_node6" class="node">
 <title>proc~cmp_area</title>
 <g id="a_proc~~gauss_legendre_2d~~CalledByGraph_node6"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-66 149,-66 149,-42 299,-42 299,-66"/>
-<text text-anchor="middle" x="224" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-24 149,-24 149,0 299,0 299,-24"/>
+<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~gauss_legendre_2d~~CalledByGraph_edge6" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#00ff00" d="M299.17,-54C310.24,-54 321.67,-54 332.77,-54"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="332.85,-57.5 342.85,-54 332.85,-50.5 332.85,-57.5"/>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~gauss_legendre_2d~~CalledByGraph_edge7" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#0000ff" d="M299.17,-12C310.24,-12 321.67,-12 332.77,-12"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="332.85,-15.5 342.85,-12 332.85,-8.5 332.85,-15.5"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="proc~~gauss_legendre_2d~~CalledByGraph_node7" class="node">
 <title>proc~cmp_length</title>
 <g id="a_proc~~gauss_legendre_2d~~CalledByGraph_node7"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-24 149,-24 149,0 299,0 299,-24"/>
-<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-108 149,-108 149,-84 299,-84 299,-108"/>
+<text text-anchor="middle" x="224" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="proc~~gauss_legendre_2d~~CalledByGraph_edge7" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#0000ff" d="M299.17,-12C311.79,-12 324.86,-12 337.38,-12"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="337.75,-15.5 347.75,-12 337.75,-8.5 337.75,-15.5"/>
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
+<g id="proc~~gauss_legendre_2d~~CalledByGraph_edge5" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M299.17,-96C311.79,-96 324.86,-96 337.38,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="337.75,-99.5 347.75,-96 337.75,-92.5 337.75,-99.5"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="proc~~gauss_legendre_2d~~CalledByGraph_node8" class="node">
 <title>proc~cmp_volume</title>
 <g id="a_proc~~gauss_legendre_2d~~CalledByGraph_node8"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-108 141,-108 141,-84 307,-84 307,-108"/>
-<text text-anchor="middle" x="224" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-66 141,-66 141,-42 307,-42 307,-66"/>
+<text text-anchor="middle" x="224" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~gauss_legendre_2d~~CalledByGraph_edge5" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.13,-96C315.64,-96 324.26,-96 332.7,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="332.87,-99.5 342.87,-96 332.87,-92.5 332.87,-99.5"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~gauss_legendre_2d~~CalledByGraph_edge6" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#00ff00" d="M307.13,-54C315.64,-54 324.26,-54 332.7,-54"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="332.87,-57.5 342.87,-54 332.87,-50.5 332.87,-57.5"/>
 </g>
 <!-- program~compute_area -->
 <g id="proc~~gauss_legendre_2d~~CalledByGraph_node9" class="node">
 <title>program~compute_area</title>
 <g id="a_proc~~gauss_legendre_2d~~CalledByGraph_node9"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-66 8,-66 8,-42 97,-42 97,-66"/>
-<text text-anchor="middle" x="52.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-24 8,-24 8,0 97,0 97,-24"/>
+<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
 <!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="proc~~gauss_legendre_2d~~CalledByGraph_edge8" class="edge">
 <title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M97.15,-54C109.86,-54 124.19,-54 138.52,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="138.92,-57.5 148.92,-54 138.92,-50.5 138.92,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M97.15,-12C109.86,-12 124.19,-12 138.52,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="138.92,-15.5 148.92,-12 138.92,-8.5 138.92,-15.5"/>
 </g>
 <!-- program~compute_length -->
 <g id="proc~~gauss_legendre_2d~~CalledByGraph_node10" class="node">
 <title>program~compute_length</title>
 <g id="a_proc~~gauss_legendre_2d~~CalledByGraph_node10"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-24 3,-24 3,0 102,0 102,-24"/>
-<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-108 3,-108 3,-84 102,-84 102,-108"/>
+<text text-anchor="middle" x="52.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="proc~~gauss_legendre_2d~~CalledByGraph_edge9" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#00ff00" d="M102.07,-12C113.57,-12 126.17,-12 138.75,-12"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="138.82,-15.5 148.82,-12 138.82,-8.5 138.82,-15.5"/>
+<path fill="none" stroke="#00ff00" d="M102.07,-96C113.57,-96 126.17,-96 138.75,-96"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="138.82,-99.5 148.82,-96 138.82,-92.5 138.82,-99.5"/>
 </g>
 <!-- program~compute_volume -->
 <g id="proc~~gauss_legendre_2d~~CalledByGraph_node11" class="node">
 <title>program~compute_volume</title>
 <g id="a_proc~~gauss_legendre_2d~~CalledByGraph_node11"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-108 0,-108 0,-84 105,-84 105,-108"/>
-<text text-anchor="middle" x="52.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-66 0,-66 0,-42 105,-42 105,-66"/>
+<text text-anchor="middle" x="52.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
 <!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="proc~~gauss_legendre_2d~~CalledByGraph_edge10" class="edge">
 <title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#0000ff" d="M105.28,-96C113.39,-96 121.99,-96 130.69,-96"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="130.93,-99.5 140.93,-96 130.93,-92.5 130.93,-99.5"/>
+<path fill="none" stroke="#0000ff" d="M105.28,-54C113.39,-54 121.99,-54 130.69,-54"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="130.93,-57.5 140.93,-54 130.93,-50.5 130.93,-57.5"/>
 </g>
 </g>
 </svg>
@@ -700,7 +700,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/gauss_legendre_3d.html b/proc/gauss_legendre_3d.html
index 2e6c54d2a..5c46bf803 100644
--- a/proc/gauss_legendre_3d.html
+++ b/proc/gauss_legendre_3d.html
@@ -201,7 +201,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~53"></span>
+              <span class="anchor" id="variable-degree~52"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -465,9 +465,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~ansatz -->
 <g id="proc~~gauss_legendre_3d~~CalledByGraph_node3" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~gauss_legendre_3d~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-108 343,-108 343,-84 475,-84 475,-108"/>
-<text text-anchor="middle" x="409" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~gauss_legendre_3d~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="470,-108 348,-108 348,-84 470,-84 470,-108"/>
+<text text-anchor="middle" x="409" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
@@ -480,9 +480,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~ansatz~2 -->
 <g id="proc~~gauss_legendre_3d~~CalledByGraph_node4" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~gauss_legendre_3d~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
+<g id="a_proc~~gauss_legendre_3d~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="475,-66 343,-66 343,-42 475,-42 475,-66"/>
-<text text-anchor="middle" x="409" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<text text-anchor="middle" x="409" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
@@ -495,9 +495,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~ansatz~3 -->
 <g id="proc~~gauss_legendre_3d~~CalledByGraph_node5" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~gauss_legendre_3d~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="470,-24 348,-24 348,0 470,0 470,-24"/>
-<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~gauss_legendre_3d~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-24 343,-24 343,0 475,0 475,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
@@ -511,91 +511,91 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~gauss_legendre_3d~~CalledByGraph_node6" class="node">
 <title>proc~cmp_area</title>
 <g id="a_proc~~gauss_legendre_3d~~CalledByGraph_node6"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-66 149,-66 149,-42 299,-42 299,-66"/>
-<text text-anchor="middle" x="224" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-24 149,-24 149,0 299,0 299,-24"/>
+<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~gauss_legendre_3d~~CalledByGraph_edge6" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#00ff00" d="M299.17,-54C310.24,-54 321.67,-54 332.77,-54"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="332.85,-57.5 342.85,-54 332.85,-50.5 332.85,-57.5"/>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~gauss_legendre_3d~~CalledByGraph_edge7" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#0000ff" d="M299.17,-12C310.24,-12 321.67,-12 332.77,-12"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="332.85,-15.5 342.85,-12 332.85,-8.5 332.85,-15.5"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="proc~~gauss_legendre_3d~~CalledByGraph_node7" class="node">
 <title>proc~cmp_length</title>
 <g id="a_proc~~gauss_legendre_3d~~CalledByGraph_node7"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-24 149,-24 149,0 299,0 299,-24"/>
-<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-108 149,-108 149,-84 299,-84 299,-108"/>
+<text text-anchor="middle" x="224" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="proc~~gauss_legendre_3d~~CalledByGraph_edge7" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#0000ff" d="M299.17,-12C311.79,-12 324.86,-12 337.38,-12"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="337.75,-15.5 347.75,-12 337.75,-8.5 337.75,-15.5"/>
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
+<g id="proc~~gauss_legendre_3d~~CalledByGraph_edge5" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M299.17,-96C311.79,-96 324.86,-96 337.38,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="337.75,-99.5 347.75,-96 337.75,-92.5 337.75,-99.5"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="proc~~gauss_legendre_3d~~CalledByGraph_node8" class="node">
 <title>proc~cmp_volume</title>
 <g id="a_proc~~gauss_legendre_3d~~CalledByGraph_node8"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-108 141,-108 141,-84 307,-84 307,-108"/>
-<text text-anchor="middle" x="224" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-66 141,-66 141,-42 307,-42 307,-66"/>
+<text text-anchor="middle" x="224" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~gauss_legendre_3d~~CalledByGraph_edge5" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.13,-96C315.64,-96 324.26,-96 332.7,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="332.87,-99.5 342.87,-96 332.87,-92.5 332.87,-99.5"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~gauss_legendre_3d~~CalledByGraph_edge6" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#00ff00" d="M307.13,-54C315.64,-54 324.26,-54 332.7,-54"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="332.87,-57.5 342.87,-54 332.87,-50.5 332.87,-57.5"/>
 </g>
 <!-- program~compute_area -->
 <g id="proc~~gauss_legendre_3d~~CalledByGraph_node9" class="node">
 <title>program~compute_area</title>
 <g id="a_proc~~gauss_legendre_3d~~CalledByGraph_node9"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-66 8,-66 8,-42 97,-42 97,-66"/>
-<text text-anchor="middle" x="52.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-24 8,-24 8,0 97,0 97,-24"/>
+<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
 <!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="proc~~gauss_legendre_3d~~CalledByGraph_edge8" class="edge">
 <title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M97.15,-54C109.86,-54 124.19,-54 138.52,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="138.92,-57.5 148.92,-54 138.92,-50.5 138.92,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M97.15,-12C109.86,-12 124.19,-12 138.52,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="138.92,-15.5 148.92,-12 138.92,-8.5 138.92,-15.5"/>
 </g>
 <!-- program~compute_length -->
 <g id="proc~~gauss_legendre_3d~~CalledByGraph_node10" class="node">
 <title>program~compute_length</title>
 <g id="a_proc~~gauss_legendre_3d~~CalledByGraph_node10"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-24 3,-24 3,0 102,0 102,-24"/>
-<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-108 3,-108 3,-84 102,-84 102,-108"/>
+<text text-anchor="middle" x="52.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="proc~~gauss_legendre_3d~~CalledByGraph_edge9" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#00ff00" d="M102.07,-12C113.57,-12 126.17,-12 138.75,-12"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="138.82,-15.5 148.82,-12 138.82,-8.5 138.82,-15.5"/>
+<path fill="none" stroke="#00ff00" d="M102.07,-96C113.57,-96 126.17,-96 138.75,-96"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="138.82,-99.5 148.82,-96 138.82,-92.5 138.82,-99.5"/>
 </g>
 <!-- program~compute_volume -->
 <g id="proc~~gauss_legendre_3d~~CalledByGraph_node11" class="node">
 <title>program~compute_volume</title>
 <g id="a_proc~~gauss_legendre_3d~~CalledByGraph_node11"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-108 0,-108 0,-84 105,-84 105,-108"/>
-<text text-anchor="middle" x="52.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-66 0,-66 0,-42 105,-42 105,-66"/>
+<text text-anchor="middle" x="52.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
 <!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="proc~~gauss_legendre_3d~~CalledByGraph_edge10" class="edge">
 <title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#0000ff" d="M105.28,-96C113.39,-96 121.99,-96 130.69,-96"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="130.93,-99.5 140.93,-96 130.93,-92.5 130.93,-99.5"/>
+<path fill="none" stroke="#0000ff" d="M105.28,-54C113.39,-54 121.99,-54 130.69,-54"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="130.93,-57.5 140.93,-54 130.93,-50.5 130.93,-57.5"/>
 </g>
 </g>
 </svg>
@@ -715,7 +715,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/generate_xc.html b/proc/generate_xc.html
index 30d19db25..c9fdcf6bb 100644
--- a/proc/generate_xc.html
+++ b/proc/generate_xc.html
@@ -77,20 +77,20 @@ <h1>generate_Xc
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.2% of total for procedures.">16 statements</a>
+                 title=" 0.3% of total for procedures.">18 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/demo_volume.f90"> Source File</a>
+              <a href="../src/demo_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/demo_volume.f90.html'>demo_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../program/example_nurbs_volume.html'>example_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/demo_curve.f90.html'>demo_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../program/example_nurbs_curve.html'>example_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">generate_Xc</li>
           </ol>
         </nav>
@@ -136,7 +136,7 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2> function generate_Xc(L) result(control_points)  
+    <h2> function generate_Xc(num_coils, radius, height, num_points_per_coil) result(control_points)  
 </h2>
     
 
@@ -155,7 +155,22 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-l~2"></span>
+              <span class="anchor" id="variable-num_coils"></span>
+              integer,
+            </td>
+<td>intent(in)</td>
+              <td></td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>num_coils</strong></td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-radius"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -163,7 +178,37 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>L</strong></td>
+            <td><strong>radius</strong></td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-height"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in)</td>
+              <td></td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>height</strong></td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-num_points_per_coil"></span>
+              integer,
+            </td>
+<td>intent(in)</td>
+              <td></td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>num_points_per_coil</strong></td>
             <td>
                 
             </td>
@@ -190,31 +235,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~generate_xc~~CalledByGraph Pages: 1 -->
-<svg id="procgenerate_xcCalledByGraph" width="263pt" height="32pt"
- viewBox="0.00 0.00 263.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procgenerate_xcCalledByGraph" width="253pt" height="32pt"
+ viewBox="0.00 0.00 253.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~generate_xc~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~generate_xc~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 259,-28 259,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 249,-28 249,4 -4,4"/>
 <!-- proc~generate_xc -->
 <g id="proc~~generate_xc~~CalledByGraph_node1" class="node">
 <title>proc~generate_xc</title>
-<polygon fill="none" stroke="black" points="255,-24 175,-24 175,0 255,0 255,-24"/>
-<text text-anchor="middle" x="215" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">generate_Xc</text>
+<polygon fill="none" stroke="black" points="245,-24 165,-24 165,0 245,0 245,-24"/>
+<text text-anchor="middle" x="205" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">generate_Xc</text>
 </g>
-<!-- program~example_nurbs_volume -->
+<!-- program~example_nurbs_curve -->
 <g id="proc~~generate_xc~~CalledByGraph_node2" class="node">
-<title>program~example_nurbs_volume</title>
-<g id="a_proc~~generate_xc~~CalledByGraph_node2"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-24 0,-24 0,0 139,0 139,-24"/>
-<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<title>program~example_nurbs_curve</title>
+<g id="a_proc~~generate_xc~~CalledByGraph_node2"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129,-24 0,-24 0,0 129,0 129,-24"/>
+<text text-anchor="middle" x="64.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~generate_xc -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~generate_xc -->
 <g id="proc~~generate_xc~~CalledByGraph_edge1" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~generate_xc</title>
-<path fill="none" stroke="#ff0000" d="M139.31,-12C147.91,-12 156.56,-12 164.78,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="164.91,-15.5 174.91,-12 164.91,-8.5 164.91,-15.5"/>
+<title>program~example_nurbs_curve&#45;&gt;proc~generate_xc</title>
+<path fill="none" stroke="#ff0000" d="M129.07,-12C137.68,-12 146.39,-12 154.69,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="154.94,-15.5 164.94,-12 154.94,-8.5 154.94,-15.5"/>
 </g>
 </g>
 </svg>
@@ -330,7 +375,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/generate_xc~2.html b/proc/generate_xc~2.html
index 3e7fc84a5..199926227 100644
--- a/proc/generate_xc~2.html
+++ b/proc/generate_xc~2.html
@@ -360,7 +360,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/generate_xc~3.html b/proc/generate_xc~3.html
index 718831e94..d01cba6be 100644
--- a/proc/generate_xc~3.html
+++ b/proc/generate_xc~3.html
@@ -77,20 +77,20 @@ <h1>generate_Xc
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.3% of total for procedures.">18 statements</a>
+                 title=" 0.3% of total for procedures.">19 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/demo_curve.f90"> Source File</a>
+              <a href="../src/demo_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/demo_curve.f90.html'>demo_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../program/example_nurbs_curve.html'>example_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/demo_surface.f90.html'>demo_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../program/example_nurbs_surface.html'>example_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">generate_Xc</li>
           </ol>
         </nav>
@@ -136,7 +136,7 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2> function generate_Xc(num_coils, radius, height, num_points_per_coil) result(control_points)  
+    <h2> function generate_Xc(num_rows, num_cols, peak_height) result(control_points)  
 </h2>
     
 
@@ -155,7 +155,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-num_coils"></span>
+              <span class="anchor" id="variable-num_rows~2"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -163,29 +163,29 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>num_coils</strong></td>
+            <td><strong>num_rows</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-radius"></span>
-              real(kind=rk),
+              <span class="anchor" id="variable-num_cols~2"></span>
+              integer,
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
               
             </td>
             <td>::</td>
-            <td><strong>radius</strong></td>
+            <td><strong>num_cols</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-height~2"></span>
+              <span class="anchor" id="variable-peak_height~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -193,22 +193,7 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>height</strong></td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-num_points_per_coil"></span>
-              integer,
-            </td>
-<td>intent(in)</td>
-              <td></td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>num_points_per_coil</strong></td>
+            <td><strong>peak_height</strong></td>
             <td>
                 
             </td>
@@ -235,31 +220,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~generate_xc~3~~CalledByGraph Pages: 1 -->
-<svg id="procgenerate_xc3CalledByGraph" width="253pt" height="32pt"
- viewBox="0.00 0.00 253.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procgenerate_xc3CalledByGraph" width="263pt" height="32pt"
+ viewBox="0.00 0.00 263.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~generate_xc~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~generate_xc~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 249,-28 249,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 259,-28 259,4 -4,4"/>
 <!-- proc~generate_xc~3 -->
 <g id="proc~~generate_xc~3~~CalledByGraph_node1" class="node">
 <title>proc~generate_xc~3</title>
-<polygon fill="none" stroke="black" points="245,-24 165,-24 165,0 245,0 245,-24"/>
-<text text-anchor="middle" x="205" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">generate_Xc</text>
+<polygon fill="none" stroke="black" points="255,-24 175,-24 175,0 255,0 255,-24"/>
+<text text-anchor="middle" x="215" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">generate_Xc</text>
 </g>
-<!-- program~example_nurbs_curve -->
+<!-- program~example_nurbs_surface -->
 <g id="proc~~generate_xc~3~~CalledByGraph_node2" class="node">
-<title>program~example_nurbs_curve</title>
-<g id="a_proc~~generate_xc~3~~CalledByGraph_node2"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129,-24 0,-24 0,0 129,0 129,-24"/>
-<text text-anchor="middle" x="64.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<title>program~example_nurbs_surface</title>
+<g id="a_proc~~generate_xc~3~~CalledByGraph_node2"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-24 0,-24 0,0 139,0 139,-24"/>
+<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~generate_xc~3 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~generate_xc~3 -->
 <g id="proc~~generate_xc~3~~CalledByGraph_edge1" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~generate_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M129.07,-12C137.68,-12 146.39,-12 154.69,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="154.94,-15.5 164.94,-12 154.94,-8.5 154.94,-15.5"/>
+<title>program~example_nurbs_surface&#45;&gt;proc~generate_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M139.31,-12C147.91,-12 156.56,-12 164.78,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="164.91,-15.5 174.91,-12 164.91,-8.5 164.91,-15.5"/>
 </g>
 </g>
 </svg>
@@ -375,7 +360,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/generate_xc~4.html b/proc/generate_xc~4.html
index 99b9cd695..cb6892c8c 100644
--- a/proc/generate_xc~4.html
+++ b/proc/generate_xc~4.html
@@ -77,20 +77,20 @@ <h1>generate_Xc
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.3% of total for procedures.">19 statements</a>
+                 title=" 0.2% of total for procedures.">16 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/demo_surface.f90"> Source File</a>
+              <a href="../src/example_volume_1.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/demo_surface.f90.html'>demo_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../program/example_nurbs_surface.html'>example_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/example_volume_1.f90.html'>example_volume_1.f90</a></li>
+                <li class="breadcrumb-item"><a href='../program/example3_volume.html'>example3_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">generate_Xc</li>
           </ol>
         </nav>
@@ -136,7 +136,7 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2> function generate_Xc(num_rows, num_cols, peak_height) result(control_points)  
+    <h2> function generate_Xc(L) result(control_points)  
 </h2>
     
 
@@ -155,37 +155,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-num_rows~2"></span>
-              integer,
-            </td>
-<td>intent(in)</td>
-              <td></td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>num_rows</strong></td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-num_cols~2"></span>
-              integer,
-            </td>
-<td>intent(in)</td>
-              <td></td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>num_cols</strong></td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-peak_height~2"></span>
+              <span class="anchor" id="variable-l"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -193,7 +163,7 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>peak_height</strong></td>
+            <td><strong>L</strong></td>
             <td>
                 
             </td>
@@ -220,31 +190,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~generate_xc~4~~CalledByGraph Pages: 1 -->
-<svg id="procgenerate_xc4CalledByGraph" width="263pt" height="32pt"
- viewBox="0.00 0.00 263.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procgenerate_xc4CalledByGraph" width="234pt" height="32pt"
+ viewBox="0.00 0.00 234.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~generate_xc~4~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~generate_xc~4~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 259,-28 259,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 230,-28 230,4 -4,4"/>
 <!-- proc~generate_xc~4 -->
 <g id="proc~~generate_xc~4~~CalledByGraph_node1" class="node">
 <title>proc~generate_xc~4</title>
-<polygon fill="none" stroke="black" points="255,-24 175,-24 175,0 255,0 255,-24"/>
-<text text-anchor="middle" x="215" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">generate_Xc</text>
+<polygon fill="none" stroke="black" points="226,-24 146,-24 146,0 226,0 226,-24"/>
+<text text-anchor="middle" x="186" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">generate_Xc</text>
 </g>
-<!-- program~example_nurbs_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~generate_xc~4~~CalledByGraph_node2" class="node">
-<title>program~example_nurbs_surface</title>
-<g id="a_proc~~generate_xc~4~~CalledByGraph_node2"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-24 0,-24 0,0 139,0 139,-24"/>
-<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<title>program~example3_volume</title>
+<g id="a_proc~~generate_xc~4~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~generate_xc~4 -->
+<!-- program~example3_volume&#45;&gt;proc~generate_xc~4 -->
 <g id="proc~~generate_xc~4~~CalledByGraph_edge1" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~generate_xc~4</title>
-<path fill="none" stroke="#ff0000" d="M139.31,-12C147.91,-12 156.56,-12 164.78,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="164.91,-15.5 174.91,-12 164.91,-8.5 164.91,-15.5"/>
+<title>program~example3_volume&#45;&gt;proc~generate_xc~4</title>
+<path fill="none" stroke="#ff0000" d="M110.33,-12C118.66,-12 127.22,-12 135.44,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="135.62,-15.5 145.62,-12 135.62,-8.5 135.62,-15.5"/>
 </g>
 </g>
 </svg>
@@ -360,7 +330,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/generate_xc~5.html b/proc/generate_xc~5.html
index c7829a6e6..a4832a063 100644
--- a/proc/generate_xc~5.html
+++ b/proc/generate_xc~5.html
@@ -82,15 +82,15 @@ <h1>generate_Xc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/example_volume_1.f90"> Source File</a>
+              <a href="../src/demo_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/example_volume_1.f90.html'>example_volume_1.f90</a></li>
-                <li class="breadcrumb-item"><a href='../program/example3_volume.html'>example3_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/demo_volume.f90.html'>demo_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../program/example_nurbs_volume.html'>example_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">generate_Xc</li>
           </ol>
         </nav>
@@ -155,7 +155,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-l~4"></span>
+              <span class="anchor" id="variable-l~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -190,31 +190,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~generate_xc~5~~CalledByGraph Pages: 1 -->
-<svg id="procgenerate_xc5CalledByGraph" width="234pt" height="32pt"
- viewBox="0.00 0.00 234.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procgenerate_xc5CalledByGraph" width="263pt" height="32pt"
+ viewBox="0.00 0.00 263.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~generate_xc~5~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~generate_xc~5~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 230,-28 230,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 259,-28 259,4 -4,4"/>
 <!-- proc~generate_xc~5 -->
 <g id="proc~~generate_xc~5~~CalledByGraph_node1" class="node">
 <title>proc~generate_xc~5</title>
-<polygon fill="none" stroke="black" points="226,-24 146,-24 146,0 226,0 226,-24"/>
-<text text-anchor="middle" x="186" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">generate_Xc</text>
+<polygon fill="none" stroke="black" points="255,-24 175,-24 175,0 255,0 255,-24"/>
+<text text-anchor="middle" x="215" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">generate_Xc</text>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example_nurbs_volume -->
 <g id="proc~~generate_xc~5~~CalledByGraph_node2" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~generate_xc~5~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example_nurbs_volume</title>
+<g id="a_proc~~generate_xc~5~~CalledByGraph_node2"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-24 0,-24 0,0 139,0 139,-24"/>
+<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~generate_xc~5 -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~generate_xc~5 -->
 <g id="proc~~generate_xc~5~~CalledByGraph_edge1" class="edge">
-<title>program~example3_volume&#45;&gt;proc~generate_xc~5</title>
-<path fill="none" stroke="#ff0000" d="M110.33,-12C118.66,-12 127.22,-12 135.44,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.62,-15.5 145.62,-12 135.62,-8.5 135.62,-15.5"/>
+<title>program~example_nurbs_volume&#45;&gt;proc~generate_xc~5</title>
+<path fill="none" stroke="#ff0000" d="M139.31,-12C147.91,-12 156.56,-12 164.78,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="164.91,-15.5 174.91,-12 164.91,-8.5 164.91,-15.5"/>
 </g>
 </g>
 </svg>
@@ -330,7 +330,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_continuity.html b/proc/get_continuity.html
index 8677da0ca..42f20dd24 100644
--- a/proc/get_continuity.html
+++ b/proc/get_continuity.html
@@ -78,20 +78,20 @@ <h1>get_continuity
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.4% of total for procedures.">26 statements</a>
+                 title=" 0.1% of total for procedures.">9 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_continuity</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure function get_continuity(this, dir) result(c)  
+    <h2>private pure function get_continuity(this) result(c)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
         <tr>
             <td>
               <span class="anchor" id="variable-this~30"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -169,21 +169,6 @@ <h3>Arguments</h3>
             <td><strong>this</strong></td>
             <td>
                 
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-dir~10"></span>
-              integer,
-            </td>
-<td>intent(in)</td>
-              <td></td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>dir</strong></td>
-            <td>
-                
             </td>
         </tr>
     </tbody>
@@ -208,61 +193,61 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_continuity~~CallsGraph Pages: 1 -->
-<svg id="procget_continuityCallsGraph" width="506pt" height="74pt"
- viewBox="0.00 0.00 506.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procget_continuityCallsGraph" width="497pt" height="74pt"
+ viewBox="0.00 0.00 497.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~get_continuity~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~get_continuity~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 502,-70 502,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 493,-70 493,4 -4,4"/>
 <!-- proc~get_continuity -->
 <g id="proc~~get_continuity~~CallsGraph_node1" class="node">
 <title>proc~get_continuity</title>
-<polygon fill="none" stroke="black" points="172,-45 0,-45 0,-21 172,-21 172,-45"/>
-<text text-anchor="middle" x="86" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_continuity</text>
+<polygon fill="none" stroke="black" points="163,-45 0,-45 0,-21 163,-21 163,-45"/>
+<text text-anchor="middle" x="81.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_continuity</text>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~get_continuity~~CallsGraph_node2" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~get_continuity~~CallsGraph_node2"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="332,-45 208,-45 208,-21 332,-21 332,-45"/>
-<text text-anchor="middle" x="270" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="323,-45 199,-45 199,-21 323,-21 323,-45"/>
+<text text-anchor="middle" x="261" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_continuity&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~get_continuity~~CallsGraph_edge1" class="edge">
 <title>proc~get_continuity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M172.14,-33C180.69,-33 189.31,-33 197.69,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="197.79,-36.5 207.79,-33 197.79,-29.5 197.79,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M163.2,-33C171.73,-33 180.36,-33 188.77,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="188.9,-36.5 198.9,-33 188.9,-29.5 188.9,-36.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~get_continuity~~CallsGraph_node3" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~get_continuity~~CallsGraph_node3"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="498,-66 368,-66 368,-42 498,-42 498,-66"/>
-<text text-anchor="middle" x="433" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="489,-66 359,-66 359,-42 489,-42 489,-66"/>
+<text text-anchor="middle" x="424" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~get_continuity~~CallsGraph_edge2" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M332.33,-41C340.69,-42.09 349.35,-43.22 357.92,-44.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="357.53,-47.82 367.9,-45.64 358.44,-40.88 357.53,-47.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M323.33,-41C331.69,-42.09 340.35,-43.22 348.92,-44.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="348.53,-47.82 358.9,-45.64 349.44,-40.88 348.53,-47.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~get_continuity~~CallsGraph_node4" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~get_continuity~~CallsGraph_node4"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="498,-24 368,-24 368,0 498,0 498,-24"/>
-<text text-anchor="middle" x="433" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="489,-24 359,-24 359,0 489,0 489,-24"/>
+<text text-anchor="middle" x="424" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~get_continuity~~CallsGraph_edge3" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M332.33,-25C340.69,-23.91 349.35,-22.78 357.92,-21.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="358.44,-25.12 367.9,-20.36 357.53,-18.18 358.44,-25.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M323.33,-25C331.69,-23.91 340.35,-22.78 348.92,-21.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="349.44,-25.12 358.9,-20.36 348.53,-18.18 349.44,-25.12"/>
 </g>
 </g>
 </svg>
@@ -378,7 +363,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_continuity~2.html b/proc/get_continuity~2.html
index 05ef09d7f..cd699573e 100644
--- a/proc/get_continuity~2.html
+++ b/proc/get_continuity~2.html
@@ -78,20 +78,20 @@ <h1>get_continuity
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.3% of total for procedures.">20 statements</a>
+                 title=" 0.4% of total for procedures.">26 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_continuity</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_continuity(this, dir) result(c)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~98"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~91"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~25"></span>
+              <span class="anchor" id="variable-dir~13"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -217,7 +217,7 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~get_continuity~2~~CallsGraph_node1" class="node">
 <title>proc~get_continuity~2</title>
 <polygon fill="none" stroke="black" points="172,-45 0,-45 0,-21 172,-21 172,-45"/>
-<text text-anchor="middle" x="86" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_continuity</text>
+<text text-anchor="middle" x="86" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_continuity</text>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~get_continuity~2~~CallsGraph_node2" class="node">
@@ -378,7 +378,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_continuity~3.html b/proc/get_continuity~3.html
index 0a8edb5ec..8fe2647cf 100644
--- a/proc/get_continuity~3.html
+++ b/proc/get_continuity~3.html
@@ -78,20 +78,20 @@ <h1>get_continuity
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.1% of total for procedures.">9 statements</a>
+                 title=" 0.3% of total for procedures.">20 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_continuity</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure function get_continuity(this) result(c)  
+    <h2>private pure function get_continuity(this, dir) result(c)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~161"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~159"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -169,6 +169,21 @@ <h3>Arguments</h3>
             <td><strong>this</strong></td>
             <td>
                 
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-dir~28"></span>
+              integer,
+            </td>
+<td>intent(in)</td>
+              <td></td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>dir</strong></td>
+            <td>
+                
             </td>
         </tr>
     </tbody>
@@ -193,61 +208,61 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_continuity~3~~CallsGraph Pages: 1 -->
-<svg id="procget_continuity3CallsGraph" width="497pt" height="74pt"
- viewBox="0.00 0.00 497.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procget_continuity3CallsGraph" width="506pt" height="74pt"
+ viewBox="0.00 0.00 506.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~get_continuity~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~get_continuity~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 493,-70 493,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 502,-70 502,4 -4,4"/>
 <!-- proc~get_continuity~3 -->
 <g id="proc~~get_continuity~3~~CallsGraph_node1" class="node">
 <title>proc~get_continuity~3</title>
-<polygon fill="none" stroke="black" points="163,-45 0,-45 0,-21 163,-21 163,-45"/>
-<text text-anchor="middle" x="81.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_continuity</text>
+<polygon fill="none" stroke="black" points="172,-45 0,-45 0,-21 172,-21 172,-45"/>
+<text text-anchor="middle" x="86" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_continuity</text>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~get_continuity~3~~CallsGraph_node2" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~get_continuity~3~~CallsGraph_node2"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="323,-45 199,-45 199,-21 323,-21 323,-45"/>
-<text text-anchor="middle" x="261" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="332,-45 208,-45 208,-21 332,-21 332,-45"/>
+<text text-anchor="middle" x="270" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_continuity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~get_continuity~3~~CallsGraph_edge1" class="edge">
 <title>proc~get_continuity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M163.2,-33C171.73,-33 180.36,-33 188.77,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="188.9,-36.5 198.9,-33 188.9,-29.5 188.9,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M172.14,-33C180.69,-33 189.31,-33 197.69,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="197.79,-36.5 207.79,-33 197.79,-29.5 197.79,-36.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~get_continuity~3~~CallsGraph_node3" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~get_continuity~3~~CallsGraph_node3"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="489,-66 359,-66 359,-42 489,-42 489,-66"/>
-<text text-anchor="middle" x="424" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="498,-66 368,-66 368,-42 498,-42 498,-66"/>
+<text text-anchor="middle" x="433" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~get_continuity~3~~CallsGraph_edge2" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M323.33,-41C331.69,-42.09 340.35,-43.22 348.92,-44.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="348.53,-47.82 358.9,-45.64 349.44,-40.88 348.53,-47.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M332.33,-41C340.69,-42.09 349.35,-43.22 357.92,-44.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="357.53,-47.82 367.9,-45.64 358.44,-40.88 357.53,-47.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~get_continuity~3~~CallsGraph_node4" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~get_continuity~3~~CallsGraph_node4"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="489,-24 359,-24 359,0 489,0 489,-24"/>
-<text text-anchor="middle" x="424" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="498,-24 368,-24 368,0 498,0 498,-24"/>
+<text text-anchor="middle" x="433" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~get_continuity~3~~CallsGraph_edge3" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M323.33,-25C331.69,-23.91 340.35,-22.78 348.92,-21.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="349.44,-25.12 358.9,-20.36 348.53,-18.18 349.44,-25.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M332.33,-25C340.69,-23.91 349.35,-22.78 357.92,-21.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="358.44,-25.12 367.9,-20.36 357.53,-18.18 358.44,-25.12"/>
 </g>
 </g>
 </svg>
@@ -363,7 +378,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_degree.html b/proc/get_degree.html
index 8a10f8a79..9a2c38956 100644
--- a/proc/get_degree.html
+++ b/proc/get_degree.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~150"></span>
+              <span class="anchor" id="variable-this~19"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -176,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-degree~57"></span>
+          <span class="anchor" id="variable-degree~4"></span>
           integer
         </small>
       </h3>
@@ -333,7 +333,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_degree_all.html b/proc/get_degree_all.html
index 4fbb4445d..5b71c7844 100644
--- a/proc/get_degree_all.html
+++ b/proc/get_degree_all.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~18"></span>
+              <span class="anchor" id="variable-this~79"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -176,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-degree~4"></span>
+          <span class="anchor" id="variable-degree~24"></span>
           integer, (3)
         </small>
       </h3>
@@ -204,18 +204,18 @@ <h3 class="card-title">Called by</h3>
 <polygon fill="none" stroke="black" points="514,-24 339,-24 339,0 514,0 514,-24"/>
 <text text-anchor="middle" x="426.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_degree_all</text>
 </g>
-<!-- none~get_degree -->
+<!-- none~get_degree~2 -->
 <g id="proc~~get_degree_all~~CalledByGraph_node2" class="node">
-<title>none~get_degree</title>
-<g id="a_proc~~get_degree_all~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_degree" xlink:title="nurbs_volume%get_degree">
+<title>none~get_degree~2</title>
+<g id="a_proc~~get_degree_all~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_degree~2" xlink:title="nurbs_volume%get_degree">
 <polygon fill="#a7506f" stroke="#a7506f" points="303,-24 146,-24 146,0 303,0 303,-24"/>
 <text text-anchor="middle" x="224.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_degree</text>
 </a>
 </g>
 </g>
-<!-- none~get_degree&#45;&gt;proc~get_degree_all -->
+<!-- none~get_degree~2&#45;&gt;proc~get_degree_all -->
 <g id="proc~~get_degree_all~~CalledByGraph_edge1" class="edge">
-<title>none~get_degree&#45;&gt;proc~get_degree_all</title>
+<title>none~get_degree~2&#45;&gt;proc~get_degree_all</title>
 <path fill="none" stroke="#ff0000" d="M303.11,-12C311.56,-12 320.22,-12 328.86,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="328.97,-15.5 338.97,-12 328.97,-8.5 328.97,-15.5"/>
 </g>
@@ -228,9 +228,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;none~get_degree -->
+<!-- program~example3_volume&#45;&gt;none~get_degree~2 -->
 <g id="proc~~get_degree_all~~CalledByGraph_edge2" class="edge">
-<title>program~example3_volume&#45;&gt;none~get_degree</title>
+<title>program~example3_volume&#45;&gt;none~get_degree~2</title>
 <path fill="none" stroke="#ff0000" d="M110.38,-12C118.55,-12 127.15,-12 135.8,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="135.97,-15.5 145.97,-12 135.97,-8.5 135.97,-15.5"/>
 </g>
@@ -348,7 +348,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_degree_all~2.html b/proc/get_degree_all~2.html
index d5cfecb98..9748457bf 100644
--- a/proc/get_degree_all~2.html
+++ b/proc/get_degree_all~2.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~86"></span>
+              <span class="anchor" id="variable-this~147"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -176,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-degree~26"></span>
+          <span class="anchor" id="variable-degree~56"></span>
           integer, (2)
         </small>
       </h3>
@@ -204,18 +204,18 @@ <h3 class="card-title">Called by</h3>
 <polygon fill="none" stroke="black" points="514,-24 339,-24 339,0 514,0 514,-24"/>
 <text text-anchor="middle" x="426.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_degree_all</text>
 </g>
-<!-- none~get_degree~2 -->
+<!-- none~get_degree~3 -->
 <g id="proc~~get_degree_all~2~~CalledByGraph_node2" class="node">
-<title>none~get_degree~2</title>
-<g id="a_proc~~get_degree_all~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_degree~2" xlink:title="nurbs_surface%get_degree">
+<title>none~get_degree~3</title>
+<g id="a_proc~~get_degree_all~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_degree~3" xlink:title="nurbs_surface%get_degree">
 <polygon fill="#a7506f" stroke="#a7506f" points="303,-24 146,-24 146,0 303,0 303,-24"/>
 <text text-anchor="middle" x="224.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_degree</text>
 </a>
 </g>
 </g>
-<!-- none~get_degree~2&#45;&gt;proc~get_degree_all~2 -->
+<!-- none~get_degree~3&#45;&gt;proc~get_degree_all~2 -->
 <g id="proc~~get_degree_all~2~~CalledByGraph_edge1" class="edge">
-<title>none~get_degree~2&#45;&gt;proc~get_degree_all~2</title>
+<title>none~get_degree~3&#45;&gt;proc~get_degree_all~2</title>
 <path fill="none" stroke="#ff0000" d="M303.11,-12C311.56,-12 320.22,-12 328.86,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="328.97,-15.5 338.97,-12 328.97,-8.5 328.97,-15.5"/>
 </g>
@@ -228,9 +228,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;none~get_degree~2 -->
+<!-- program~example3_surface&#45;&gt;none~get_degree~3 -->
 <g id="proc~~get_degree_all~2~~CalledByGraph_edge2" class="edge">
-<title>program~example3_surface&#45;&gt;none~get_degree~2</title>
+<title>program~example3_surface&#45;&gt;none~get_degree~3</title>
 <path fill="none" stroke="#ff0000" d="M110.38,-12C118.55,-12 127.15,-12 135.8,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="135.97,-15.5 145.97,-12 135.97,-8.5 135.97,-15.5"/>
 </g>
@@ -348,7 +348,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_degree_dir.html b/proc/get_degree_dir.html
index 01c627b30..7d00d5e73 100644
--- a/proc/get_degree_dir.html
+++ b/proc/get_degree_dir.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~19"></span>
+              <span class="anchor" id="variable-this~80"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~5"></span>
+              <span class="anchor" id="variable-dir~8"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -191,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-degree~5"></span>
+          <span class="anchor" id="variable-degree~25"></span>
           integer
         </small>
       </h3>
@@ -219,18 +219,18 @@ <h3 class="card-title">Called by</h3>
 <polygon fill="none" stroke="black" points="516,-24 339,-24 339,0 516,0 516,-24"/>
 <text text-anchor="middle" x="427.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_degree_dir</text>
 </g>
-<!-- none~get_degree -->
+<!-- none~get_degree~2 -->
 <g id="proc~~get_degree_dir~~CalledByGraph_node2" class="node">
-<title>none~get_degree</title>
-<g id="a_proc~~get_degree_dir~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_degree" xlink:title="nurbs_volume%get_degree">
+<title>none~get_degree~2</title>
+<g id="a_proc~~get_degree_dir~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_degree~2" xlink:title="nurbs_volume%get_degree">
 <polygon fill="#a7506f" stroke="#a7506f" points="303,-24 146,-24 146,0 303,0 303,-24"/>
 <text text-anchor="middle" x="224.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_degree</text>
 </a>
 </g>
 </g>
-<!-- none~get_degree&#45;&gt;proc~get_degree_dir -->
+<!-- none~get_degree~2&#45;&gt;proc~get_degree_dir -->
 <g id="proc~~get_degree_dir~~CalledByGraph_edge1" class="edge">
-<title>none~get_degree&#45;&gt;proc~get_degree_dir</title>
+<title>none~get_degree~2&#45;&gt;proc~get_degree_dir</title>
 <path fill="none" stroke="#ff0000" d="M303.21,-12C311.63,-12 320.27,-12 328.88,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="328.97,-15.5 338.97,-12 328.97,-8.5 328.97,-15.5"/>
 </g>
@@ -243,9 +243,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;none~get_degree -->
+<!-- program~example3_volume&#45;&gt;none~get_degree~2 -->
 <g id="proc~~get_degree_dir~~CalledByGraph_edge2" class="edge">
-<title>program~example3_volume&#45;&gt;none~get_degree</title>
+<title>program~example3_volume&#45;&gt;none~get_degree~2</title>
 <path fill="none" stroke="#ff0000" d="M110.38,-12C118.55,-12 127.15,-12 135.8,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="135.97,-15.5 145.97,-12 135.97,-8.5 135.97,-15.5"/>
 </g>
@@ -363,7 +363,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_degree_dir~2.html b/proc/get_degree_dir~2.html
index 5595a9dd3..9963d01f9 100644
--- a/proc/get_degree_dir~2.html
+++ b/proc/get_degree_dir~2.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~87"></span>
+              <span class="anchor" id="variable-this~148"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~20"></span>
+              <span class="anchor" id="variable-dir~23"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -191,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-degree~27"></span>
+          <span class="anchor" id="variable-degree~57"></span>
           integer
         </small>
       </h3>
@@ -219,18 +219,18 @@ <h3 class="card-title">Called by</h3>
 <polygon fill="none" stroke="black" points="516,-24 339,-24 339,0 516,0 516,-24"/>
 <text text-anchor="middle" x="427.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_degree_dir</text>
 </g>
-<!-- none~get_degree~2 -->
+<!-- none~get_degree~3 -->
 <g id="proc~~get_degree_dir~2~~CalledByGraph_node2" class="node">
-<title>none~get_degree~2</title>
-<g id="a_proc~~get_degree_dir~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_degree~2" xlink:title="nurbs_surface%get_degree">
+<title>none~get_degree~3</title>
+<g id="a_proc~~get_degree_dir~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_degree~3" xlink:title="nurbs_surface%get_degree">
 <polygon fill="#a7506f" stroke="#a7506f" points="303,-24 146,-24 146,0 303,0 303,-24"/>
 <text text-anchor="middle" x="224.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_degree</text>
 </a>
 </g>
 </g>
-<!-- none~get_degree~2&#45;&gt;proc~get_degree_dir~2 -->
+<!-- none~get_degree~3&#45;&gt;proc~get_degree_dir~2 -->
 <g id="proc~~get_degree_dir~2~~CalledByGraph_edge1" class="edge">
-<title>none~get_degree~2&#45;&gt;proc~get_degree_dir~2</title>
+<title>none~get_degree~3&#45;&gt;proc~get_degree_dir~2</title>
 <path fill="none" stroke="#ff0000" d="M303.21,-12C311.63,-12 320.27,-12 328.88,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="328.97,-15.5 338.97,-12 328.97,-8.5 328.97,-15.5"/>
 </g>
@@ -243,9 +243,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;none~get_degree~2 -->
+<!-- program~example3_surface&#45;&gt;none~get_degree~3 -->
 <g id="proc~~get_degree_dir~2~~CalledByGraph_edge2" class="edge">
-<title>program~example3_surface&#45;&gt;none~get_degree~2</title>
+<title>program~example3_surface&#45;&gt;none~get_degree~3</title>
 <path fill="none" stroke="#ff0000" d="M110.38,-12C118.55,-12 127.15,-12 135.8,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="135.97,-15.5 145.97,-12 135.97,-8.5 135.97,-15.5"/>
 </g>
@@ -363,7 +363,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_elem.html b/proc/get_elem.html
index b6a434708..3a012c21a 100644
--- a/proc/get_elem.html
+++ b/proc/get_elem.html
@@ -83,15 +83,15 @@ <h1>get_elem
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_elem</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_elem(this) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~48"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~47"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -212,7 +212,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_elem_xc_vis.html b/proc/get_elem_xc_vis.html
index 2a3e5fd70..dd5b76523 100644
--- a/proc/get_elem_xc_vis.html
+++ b/proc/get_elem_xc_vis.html
@@ -83,15 +83,15 @@ <h1>get_elem_Xc_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_elem_Xc_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_elem_Xc_vis(this) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~46"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~45"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -212,7 +212,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_elem_xc_vis~2.html b/proc/get_elem_xc_vis~2.html
index 4ec4f2469..6e711857e 100644
--- a/proc/get_elem_xc_vis~2.html
+++ b/proc/get_elem_xc_vis~2.html
@@ -83,15 +83,15 @@ <h1>get_elem_Xc_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_elem_Xc_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_elem_Xc_vis(this) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~114"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~107"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -176,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-elemconn~25"></span>
+          <span class="anchor" id="variable-elemconn~21"></span>
           integer, allocatable, (:,:)
         </small>
       </h3>
@@ -212,7 +212,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_elem_xc_vis~3.html b/proc/get_elem_xc_vis~3.html
index 93fb2ea58..bc0b0249f 100644
--- a/proc/get_elem_xc_vis~3.html
+++ b/proc/get_elem_xc_vis~3.html
@@ -83,15 +83,15 @@ <h1>get_elem_Xc_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_elem_Xc_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_elem_Xc_vis(this) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~176"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~175"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -212,7 +212,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_elem_xg_vis.html b/proc/get_elem_xg_vis.html
index 15e7c603e..3004df526 100644
--- a/proc/get_elem_xg_vis.html
+++ b/proc/get_elem_xg_vis.html
@@ -83,15 +83,15 @@ <h1>get_elem_Xg_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_elem_Xg_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_elem_Xg_vis(this) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~47"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~46"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -212,7 +212,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_elem_xg_vis~2.html b/proc/get_elem_xg_vis~2.html
index 6e5479fa4..5945c5f55 100644
--- a/proc/get_elem_xg_vis~2.html
+++ b/proc/get_elem_xg_vis~2.html
@@ -83,15 +83,15 @@ <h1>get_elem_Xg_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_elem_Xg_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_elem_Xg_vis(this) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~115"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~108"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -176,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-elemconn~26"></span>
+          <span class="anchor" id="variable-elemconn~22"></span>
           integer, allocatable, (:,:)
         </small>
       </h3>
@@ -212,7 +212,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_elem_xg_vis~3.html b/proc/get_elem_xg_vis~3.html
index 5f1ec06c3..e7157c8c8 100644
--- a/proc/get_elem_xg_vis~3.html
+++ b/proc/get_elem_xg_vis~3.html
@@ -83,15 +83,15 @@ <h1>get_elem_Xg_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_elem_Xg_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_elem_Xg_vis(this) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~177"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~176"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -212,7 +212,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_elem~2.html b/proc/get_elem~2.html
index 34f8699f4..c21bf3351 100644
--- a/proc/get_elem~2.html
+++ b/proc/get_elem~2.html
@@ -83,15 +83,15 @@ <h1>get_elem
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_elem</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_elem(this) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~116"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~109"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -176,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-elemconn~27"></span>
+          <span class="anchor" id="variable-elemconn~23"></span>
           integer, allocatable, (:,:)
         </small>
       </h3>
@@ -212,7 +212,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_elem~3.html b/proc/get_elem~3.html
index 98f8195be..e545ae324 100644
--- a/proc/get_elem~3.html
+++ b/proc/get_elem~3.html
@@ -83,15 +83,15 @@ <h1>get_elem
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_elem</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_elem(this) result(elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~178"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~177"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -212,7 +212,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_knot_all.html b/proc/get_knot_all.html
index a9f1647d2..e31264da1 100644
--- a/proc/get_knot_all.html
+++ b/proc/get_knot_all.html
@@ -78,20 +78,20 @@ <h1>get_knot_all
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.4% of total for procedures.">26 statements</a>
+                 title=" 0.1% of total for procedures.">9 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_knot_all</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure function get_knot_all(this, dir) result(knot)  
+    <h2>private pure function get_knot_all(this) result(knot)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
         <tr>
             <td>
               <span class="anchor" id="variable-this~20"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -169,21 +169,6 @@ <h3>Arguments</h3>
             <td><strong>this</strong></td>
             <td>
                 
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-dir~6"></span>
-              integer,
-            </td>
-<td>intent(in)</td>
-              <td></td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>dir</strong></td>
-            <td>
-                
             </td>
         </tr>
     </tbody>
@@ -191,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-knot"></span>
+          <span class="anchor" id="variable-knot~5"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -208,147 +193,80 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_knot_all~~CalledByGraph Pages: 1 -->
-<svg id="procget_knot_allCalledByGraph" width="641pt" height="204pt"
- viewBox="0.00 0.00 641.00 203.93" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~get_knot_all~~CalledByGraph" class="graph" transform="scale(1.11 1.11) rotate(0) translate(4 221.89)">
+<svg id="procget_knot_allCalledByGraph" width="510pt" height="116pt"
+ viewBox="0.00 0.00 510.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~get_knot_all~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
 <title>proc~~get_knot_all~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-221.89 706,-221.89 706,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 506,-112 506,4 -4,4"/>
 <!-- proc~get_knot_all -->
 <g id="proc~~get_knot_all~~CalledByGraph_node1" class="node">
 <title>proc~get_knot_all</title>
-<polygon fill="none" stroke="black" points="702,-129 541,-129 541,-105 702,-105 702,-129"/>
-<text text-anchor="middle" x="621.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_knot_all</text>
+<polygon fill="none" stroke="black" points="502,-66 351,-66 351,-42 502,-42 502,-66"/>
+<text text-anchor="middle" x="426.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_knot_all</text>
 </g>
 <!-- none~get_knot -->
 <g id="proc~~get_knot_all~~CalledByGraph_node2" class="node">
 <title>none~get_knot</title>
-<g id="a_proc~~get_knot_all~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot" xlink:title="nurbs_volume%get_knot">
-<polygon fill="#a7506f" stroke="#a7506f" points="505,-129 362,-129 362,-105 505,-105 505,-129"/>
-<text text-anchor="middle" x="433.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot</text>
+<g id="a_proc~~get_knot_all~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_knot" xlink:title="nurbs_curve%get_knot">
+<polygon fill="#a7506f" stroke="#a7506f" points="315,-66 182,-66 182,-42 315,-42 315,-66"/>
+<text text-anchor="middle" x="248.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot&#45;&gt;proc~get_knot_all -->
 <g id="proc~~get_knot_all~~CalledByGraph_edge1" class="edge">
 <title>none~get_knot&#45;&gt;proc~get_knot_all</title>
-<path fill="none" stroke="#ff0000" d="M505.08,-117C513.5,-117 522.19,-117 530.83,-117"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="530.94,-120.5 540.94,-117 530.94,-113.5 530.94,-120.5"/>
-</g>
-<!-- proc~elevate_degree -->
-<g id="proc~~get_knot_all~~CalledByGraph_node3" class="node">
-<title>proc~elevate_degree</title>
-<g id="a_proc~~get_knot_all~~CalledByGraph_node3"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="326,-192 146,-192 146,-168 326,-168 326,-192"/>
-<text text-anchor="middle" x="236" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
-</a>
-</g>
-</g>
-<!-- proc~elevate_degree&#45;&gt;none~get_knot -->
-<g id="proc~~get_knot_all~~CalledByGraph_edge2" class="edge">
-<title>proc~elevate_degree&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0000" d="M293.36,-168C304.26,-165.31 315.55,-162.28 326,-159 349.47,-151.65 375.14,-141.59 395.39,-133.16"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="397.01,-136.27 404.86,-129.17 394.29,-129.82 397.01,-136.27"/>
-</g>
-<!-- proc~insert_knots -->
-<g id="proc~~get_knot_all~~CalledByGraph_node4" class="node">
-<title>proc~insert_knots</title>
-<g id="a_proc~~get_knot_all~~CalledByGraph_node4"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="316.5,-150 155.5,-150 155.5,-126 316.5,-126 316.5,-150"/>
-<text text-anchor="middle" x="236" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
-</a>
-</g>
-</g>
-<!-- proc~insert_knots&#45;&gt;none~get_knot -->
-<g id="proc~~get_knot_all~~CalledByGraph_edge3" class="edge">
-<title>proc~insert_knots&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0000" d="M316.52,-129.46C328.13,-128.21 340.09,-126.93 351.73,-125.68"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="352.28,-129.14 361.85,-124.59 351.53,-122.18 352.28,-129.14"/>
+<path fill="none" stroke="#ff0000" d="M315.04,-54C323.4,-54 332.04,-54 340.65,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="340.72,-57.5 350.72,-54 340.72,-50.5 340.72,-57.5"/>
 </g>
 <!-- proc~modify_wc -->
-<g id="proc~~get_knot_all~~CalledByGraph_node5" class="node">
+<g id="proc~~get_knot_all~~CalledByGraph_node3" class="node">
 <title>proc~modify_wc</title>
-<g id="a_proc~~get_knot_all~~CalledByGraph_node5"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="314,-66 158,-66 158,-42 314,-42 314,-66"/>
-<text text-anchor="middle" x="236" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
+<g id="a_proc~~get_knot_all~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="146,-108 0,-108 0,-84 146,-84 146,-108"/>
+<text text-anchor="middle" x="73" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~get_knot -->
-<g id="proc~~get_knot_all~~CalledByGraph_edge4" class="edge">
+<g id="proc~~get_knot_all~~CalledByGraph_edge2" class="edge">
 <title>proc~modify_wc&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0000" d="M293.36,-66C304.26,-68.69 315.55,-71.72 326,-75 349.47,-82.35 375.14,-92.41 395.39,-100.84"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="394.29,-104.18 404.86,-104.83 397.01,-97.73 394.29,-104.18"/>
+<path fill="none" stroke="#ff0000" d="M123.72,-83.96C143.77,-79.11 167.08,-73.47 188.02,-68.4"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="188.88,-71.79 197.77,-66.04 187.23,-64.99 188.88,-71.79"/>
 </g>
 <!-- proc~modify_xc -->
-<g id="proc~~get_knot_all~~CalledByGraph_node6" class="node">
+<g id="proc~~get_knot_all~~CalledByGraph_node4" class="node">
 <title>proc~modify_xc</title>
-<g id="a_proc~~get_knot_all~~CalledByGraph_node6"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="312.5,-24 159.5,-24 159.5,0 312.5,0 312.5,-24"/>
-<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
+<g id="a_proc~~get_knot_all~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="144.5,-66 1.5,-66 1.5,-42 144.5,-42 144.5,-66"/>
+<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~get_knot -->
-<g id="proc~~get_knot_all~~CalledByGraph_edge5" class="edge">
+<g id="proc~~get_knot_all~~CalledByGraph_edge3" class="edge">
 <title>proc~modify_xc&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0000" d="M302.78,-24.06C310.79,-26.53 318.71,-29.48 326,-33 360.26,-49.54 393.69,-78.66 413.7,-97.89"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="411.33,-100.47 420.93,-104.97 416.23,-95.48 411.33,-100.47"/>
+<path fill="none" stroke="#ff0000" d="M144.57,-54C153.5,-54 162.67,-54 171.67,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="171.75,-57.5 181.75,-54 171.75,-50.5 171.75,-57.5"/>
 </g>
-<!-- proc~remove_knots -->
-<g id="proc~~get_knot_all~~CalledByGraph_node7" class="node">
-<title>proc~remove_knots</title>
-<g id="a_proc~~get_knot_all~~CalledByGraph_node7"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="322,-108 150,-108 150,-84 322,-84 322,-108"/>
-<text text-anchor="middle" x="236" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
-</a>
-</g>
-</g>
-<!-- proc~remove_knots&#45;&gt;none~get_knot -->
-<g id="proc~~get_knot_all~~CalledByGraph_edge6" class="edge">
-<title>proc~remove_knots&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0000" d="M322.18,-105.15C332.03,-106.21 342.06,-107.28 351.85,-108.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="351.63,-111.83 361.94,-109.42 352.37,-104.87 351.63,-111.83"/>
-</g>
-<!-- program~example3_volume -->
-<g id="proc~~get_knot_all~~CalledByGraph_node8" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~get_knot_all~~CalledByGraph_node8"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-171 0,-171 0,-147 110,-147 110,-171"/>
-<text text-anchor="middle" x="55" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<!-- program~example1_curve -->
+<g id="proc~~get_knot_all~~CalledByGraph_node5" class="node">
+<title>program~example1_curve</title>
+<g id="a_proc~~get_knot_all~~CalledByGraph_node5"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="123,-24 23,-24 23,0 123,0 123,-24"/>
+<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;none~get_knot -->
-<g id="proc~~get_knot_all~~CalledByGraph_edge7" class="edge">
-<title>program~example3_volume&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0000" d="M75.48,-171.15C93.13,-181.4 120.24,-195.29 146,-201 224.1,-218.33 250.42,-227.22 326,-201 362.53,-188.33 396.02,-157.35 415.33,-136.77"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="418.09,-138.93 422.25,-129.19 412.92,-134.21 418.09,-138.93"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
-<g id="proc~~get_knot_all~~CalledByGraph_edge8" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#ff0000" d="M110.19,-165.36C118.42,-166.32 127.11,-167.34 135.94,-168.38"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.59,-171.86 145.93,-169.55 136.41,-164.91 135.59,-171.86"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
-<g id="proc~~get_knot_all~~CalledByGraph_edge9" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#ffff00" d="M110.19,-152.64C121.29,-151.34 133.24,-149.94 145.2,-148.53"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="145.71,-152 155.24,-147.36 144.9,-145.05 145.71,-152"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
-<g id="proc~~get_knot_all~~CalledByGraph_edge10" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#0000ff" d="M78.4,-146.97C96.29,-137.76 122.22,-125.26 146,-117 152.45,-114.76 159.24,-112.68 166.08,-110.77"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="167.35,-114.06 176.1,-108.1 165.54,-107.29 167.35,-114.06"/>
+<!-- program~example1_curve&#45;&gt;none~get_knot -->
+<g id="proc~~get_knot_all~~CalledByGraph_edge4" class="edge">
+<title>program~example1_curve&#45;&gt;none~get_knot</title>
+<path fill="none" stroke="#ff0000" d="M123.25,-23.92C143.41,-28.8 166.9,-34.49 188,-39.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="187.28,-43.02 197.82,-41.97 188.93,-36.22 187.28,-43.02"/>
 </g>
 </g>
 </svg>
-</div>                <script>
-                  var panprocget_knot_allCalledByGraph = svgPanZoom('#procget_knot_allCalledByGraph',
-                    {zoomEnabled: true, controlIconsEnabled: true, fit: true, center: true,}
-                  );
-                </script>          <div>
+</div>          <div>
             <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
           </div>
           <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
@@ -460,7 +378,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_knot_all~2.html b/proc/get_knot_all~2.html
index 12a30a65e..e31155c78 100644
--- a/proc/get_knot_all~2.html
+++ b/proc/get_knot_all~2.html
@@ -78,20 +78,20 @@ <h1>get_knot_all
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.3% of total for procedures.">20 statements</a>
+                 title=" 0.4% of total for procedures.">26 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_knot_all</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_knot_all(this, dir) result(knot)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~88"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~81"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~21"></span>
+              <span class="anchor" id="variable-dir~9"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -191,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-knot~4"></span>
+          <span class="anchor" id="variable-knot~26"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -217,14 +217,14 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~get_knot_all~2~~CalledByGraph_node1" class="node">
 <title>proc~get_knot_all~2</title>
 <polygon fill="none" stroke="black" points="702,-129 541,-129 541,-105 702,-105 702,-129"/>
-<text text-anchor="middle" x="621.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_knot_all</text>
+<text text-anchor="middle" x="621.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_knot_all</text>
 </g>
 <!-- none~get_knot~2 -->
 <g id="proc~~get_knot_all~2~~CalledByGraph_node2" class="node">
 <title>none~get_knot~2</title>
-<g id="a_proc~~get_knot_all~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~2" xlink:title="nurbs_surface%get_knot">
+<g id="a_proc~~get_knot_all~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot~2" xlink:title="nurbs_volume%get_knot">
 <polygon fill="#a7506f" stroke="#a7506f" points="505,-129 362,-129 362,-105 505,-105 505,-129"/>
-<text text-anchor="middle" x="433.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
+<text text-anchor="middle" x="433.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot</text>
 </a>
 </g>
 </g>
@@ -237,9 +237,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~elevate_degree~2 -->
 <g id="proc~~get_knot_all~2~~CalledByGraph_node3" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_proc~~get_knot_all~2~~CalledByGraph_node3"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
+<g id="a_proc~~get_knot_all~2~~CalledByGraph_node3"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="326,-192 146,-192 146,-168 326,-168 326,-192"/>
-<text text-anchor="middle" x="236" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<text text-anchor="middle" x="236" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
@@ -252,9 +252,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~insert_knots~2 -->
 <g id="proc~~get_knot_all~2~~CalledByGraph_node4" class="node">
 <title>proc~insert_knots~2</title>
-<g id="a_proc~~get_knot_all~2~~CalledByGraph_node4"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
+<g id="a_proc~~get_knot_all~2~~CalledByGraph_node4"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
 <polygon fill="#d9534f" stroke="#d9534f" points="316.5,-150 155.5,-150 155.5,-126 316.5,-126 316.5,-150"/>
-<text text-anchor="middle" x="236" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+<text text-anchor="middle" x="236" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
@@ -267,9 +267,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~modify_wc~2 -->
 <g id="proc~~get_knot_all~2~~CalledByGraph_node5" class="node">
 <title>proc~modify_wc~2</title>
-<g id="a_proc~~get_knot_all~2~~CalledByGraph_node5"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
+<g id="a_proc~~get_knot_all~2~~CalledByGraph_node5"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
 <polygon fill="#d9534f" stroke="#d9534f" points="314,-66 158,-66 158,-42 314,-42 314,-66"/>
-<text text-anchor="middle" x="236" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+<text text-anchor="middle" x="236" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
@@ -282,9 +282,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~modify_xc~2 -->
 <g id="proc~~get_knot_all~2~~CalledByGraph_node6" class="node">
 <title>proc~modify_xc~2</title>
-<g id="a_proc~~get_knot_all~2~~CalledByGraph_node6"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
+<g id="a_proc~~get_knot_all~2~~CalledByGraph_node6"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="312.5,-24 159.5,-24 159.5,0 312.5,0 312.5,-24"/>
-<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
@@ -297,9 +297,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~remove_knots~2 -->
 <g id="proc~~get_knot_all~2~~CalledByGraph_node7" class="node">
 <title>proc~remove_knots~2</title>
-<g id="a_proc~~get_knot_all~2~~CalledByGraph_node7"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
+<g id="a_proc~~get_knot_all~2~~CalledByGraph_node7"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
 <polygon fill="#d9534f" stroke="#d9534f" points="322,-108 150,-108 150,-84 322,-84 322,-108"/>
-<text text-anchor="middle" x="236" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
+<text text-anchor="middle" x="236" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
 </a>
 </g>
 </g>
@@ -309,54 +309,39 @@ <h3 class="card-title">Called by</h3>
 <path fill="none" stroke="#ff0000" d="M322.18,-105.15C332.03,-106.21 342.06,-107.28 351.85,-108.34"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="351.63,-111.83 361.94,-109.42 352.37,-104.87 351.63,-111.83"/>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~get_knot_all~2~~CalledByGraph_node8" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~get_knot_all~2~~CalledByGraph_node8"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<title>program~example3_volume</title>
+<g id="a_proc~~get_knot_all~2~~CalledByGraph_node8"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-171 0,-171 0,-147 110,-147 110,-171"/>
-<text text-anchor="middle" x="55" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<text text-anchor="middle" x="55" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;none~get_knot~2 -->
+<!-- program~example3_volume&#45;&gt;none~get_knot~2 -->
 <g id="proc~~get_knot_all~2~~CalledByGraph_edge7" class="edge">
-<title>program~example3_surface&#45;&gt;none~get_knot~2</title>
+<title>program~example3_volume&#45;&gt;none~get_knot~2</title>
 <path fill="none" stroke="#ff0000" d="M75.48,-171.15C93.13,-181.4 120.24,-195.29 146,-201 224.1,-218.33 250.42,-227.22 326,-201 362.53,-188.33 396.02,-157.35 415.33,-136.77"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="418.09,-138.93 422.25,-129.19 412.92,-134.21 418.09,-138.93"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
 <g id="proc~~get_knot_all~2~~CalledByGraph_edge8" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
 <path fill="none" stroke="#ff0000" d="M110.19,-165.36C118.42,-166.32 127.11,-167.34 135.94,-168.38"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="135.59,-171.86 145.93,-169.55 136.41,-164.91 135.59,-171.86"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
 <g id="proc~~get_knot_all~2~~CalledByGraph_edge9" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
 <path fill="none" stroke="#ffff00" d="M110.19,-152.64C121.29,-151.34 133.24,-149.94 145.2,-148.53"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="145.71,-152 155.24,-147.36 144.9,-145.05 145.71,-152"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
-<g id="proc~~get_knot_all~2~~CalledByGraph_edge11" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
+<g id="proc~~get_knot_all~2~~CalledByGraph_edge10" class="edge">
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
 <path fill="none" stroke="#0000ff" d="M78.4,-146.97C96.29,-137.76 122.22,-125.26 146,-117 152.45,-114.76 159.24,-112.68 166.08,-110.77"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="167.35,-114.06 176.1,-108.1 165.54,-107.29 167.35,-114.06"/>
 </g>
-<!-- program~example_ppm3 -->
-<g id="proc~~get_knot_all~2~~CalledByGraph_node9" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~get_knot_all~2~~CalledByGraph_node9"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-24 8,-24 8,0 102,0 102,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
-<g id="proc~~get_knot_all~2~~CalledByGraph_edge10" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#00ffff" d="M102.1,-12C116.51,-12 132.9,-12 149.13,-12"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="149.2,-15.5 159.2,-12 149.2,-8.5 149.2,-15.5"/>
-</g>
 </g>
 </svg>
 </div>                <script>
@@ -475,7 +460,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_knot_all~3.html b/proc/get_knot_all~3.html
index 07162625a..03c0dee0c 100644
--- a/proc/get_knot_all~3.html
+++ b/proc/get_knot_all~3.html
@@ -78,20 +78,20 @@ <h1>get_knot_all
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.1% of total for procedures.">9 statements</a>
+                 title=" 0.3% of total for procedures.">20 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_knot_all</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure function get_knot_all(this) result(knot)  
+    <h2>private pure function get_knot_all(this, dir) result(knot)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~151"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~149"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -169,6 +169,21 @@ <h3>Arguments</h3>
             <td><strong>this</strong></td>
             <td>
                 
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-dir~24"></span>
+              integer,
+            </td>
+<td>intent(in)</td>
+              <td></td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>dir</strong></td>
+            <td>
+                
             </td>
         </tr>
     </tbody>
@@ -176,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-knot~19"></span>
+          <span class="anchor" id="variable-knot~37"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -193,80 +208,162 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_knot_all~3~~CalledByGraph Pages: 1 -->
-<svg id="procget_knot_all3CalledByGraph" width="510pt" height="116pt"
- viewBox="0.00 0.00 510.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~get_knot_all~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
+<svg id="procget_knot_all3CalledByGraph" width="641pt" height="204pt"
+ viewBox="0.00 0.00 641.00 203.93" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~get_knot_all~3~~CalledByGraph" class="graph" transform="scale(1.11 1.11) rotate(0) translate(4 221.89)">
 <title>proc~~get_knot_all~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 506,-112 506,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-221.89 706,-221.89 706,4 -4,4"/>
 <!-- proc~get_knot_all~3 -->
 <g id="proc~~get_knot_all~3~~CalledByGraph_node1" class="node">
 <title>proc~get_knot_all~3</title>
-<polygon fill="none" stroke="black" points="502,-66 351,-66 351,-42 502,-42 502,-66"/>
-<text text-anchor="middle" x="426.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_knot_all</text>
+<polygon fill="none" stroke="black" points="702,-129 541,-129 541,-105 702,-105 702,-129"/>
+<text text-anchor="middle" x="621.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_knot_all</text>
 </g>
 <!-- none~get_knot~3 -->
 <g id="proc~~get_knot_all~3~~CalledByGraph_node2" class="node">
 <title>none~get_knot~3</title>
-<g id="a_proc~~get_knot_all~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_knot~3" xlink:title="nurbs_curve%get_knot">
-<polygon fill="#a7506f" stroke="#a7506f" points="315,-66 182,-66 182,-42 315,-42 315,-66"/>
-<text text-anchor="middle" x="248.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot</text>
+<g id="a_proc~~get_knot_all~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~3" xlink:title="nurbs_surface%get_knot">
+<polygon fill="#a7506f" stroke="#a7506f" points="505,-129 362,-129 362,-105 505,-105 505,-129"/>
+<text text-anchor="middle" x="433.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot~3&#45;&gt;proc~get_knot_all~3 -->
 <g id="proc~~get_knot_all~3~~CalledByGraph_edge1" class="edge">
 <title>none~get_knot~3&#45;&gt;proc~get_knot_all~3</title>
-<path fill="none" stroke="#ff0000" d="M315.04,-54C323.4,-54 332.04,-54 340.65,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="340.72,-57.5 350.72,-54 340.72,-50.5 340.72,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M505.08,-117C513.5,-117 522.19,-117 530.83,-117"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="530.94,-120.5 540.94,-117 530.94,-113.5 530.94,-120.5"/>
 </g>
-<!-- proc~modify_wc~3 -->
+<!-- proc~elevate_degree~3 -->
 <g id="proc~~get_knot_all~3~~CalledByGraph_node3" class="node">
+<title>proc~elevate_degree~3</title>
+<g id="a_proc~~get_knot_all~3~~CalledByGraph_node3"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="326,-192 146,-192 146,-168 326,-168 326,-192"/>
+<text text-anchor="middle" x="236" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+</a>
+</g>
+</g>
+<!-- proc~elevate_degree~3&#45;&gt;none~get_knot~3 -->
+<g id="proc~~get_knot_all~3~~CalledByGraph_edge2" class="edge">
+<title>proc~elevate_degree~3&#45;&gt;none~get_knot~3</title>
+<path fill="none" stroke="#ff0000" d="M293.36,-168C304.26,-165.31 315.55,-162.28 326,-159 349.47,-151.65 375.14,-141.59 395.39,-133.16"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="397.01,-136.27 404.86,-129.17 394.29,-129.82 397.01,-136.27"/>
+</g>
+<!-- proc~insert_knots~3 -->
+<g id="proc~~get_knot_all~3~~CalledByGraph_node4" class="node">
+<title>proc~insert_knots~3</title>
+<g id="a_proc~~get_knot_all~3~~CalledByGraph_node4"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="316.5,-150 155.5,-150 155.5,-126 316.5,-126 316.5,-150"/>
+<text text-anchor="middle" x="236" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+</a>
+</g>
+</g>
+<!-- proc~insert_knots~3&#45;&gt;none~get_knot~3 -->
+<g id="proc~~get_knot_all~3~~CalledByGraph_edge3" class="edge">
+<title>proc~insert_knots~3&#45;&gt;none~get_knot~3</title>
+<path fill="none" stroke="#ff0000" d="M316.52,-129.46C328.13,-128.21 340.09,-126.93 351.73,-125.68"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="352.28,-129.14 361.85,-124.59 351.53,-122.18 352.28,-129.14"/>
+</g>
+<!-- proc~modify_wc~3 -->
+<g id="proc~~get_knot_all~3~~CalledByGraph_node5" class="node">
 <title>proc~modify_wc~3</title>
-<g id="a_proc~~get_knot_all~3~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="146,-108 0,-108 0,-84 146,-84 146,-108"/>
-<text text-anchor="middle" x="73" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
+<g id="a_proc~~get_knot_all~3~~CalledByGraph_node5"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="314,-66 158,-66 158,-42 314,-42 314,-66"/>
+<text text-anchor="middle" x="236" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~get_knot~3 -->
-<g id="proc~~get_knot_all~3~~CalledByGraph_edge2" class="edge">
+<g id="proc~~get_knot_all~3~~CalledByGraph_edge4" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~get_knot~3</title>
-<path fill="none" stroke="#ff0000" d="M123.72,-83.96C143.77,-79.11 167.08,-73.47 188.02,-68.4"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="188.88,-71.79 197.77,-66.04 187.23,-64.99 188.88,-71.79"/>
+<path fill="none" stroke="#ff0000" d="M293.36,-66C304.26,-68.69 315.55,-71.72 326,-75 349.47,-82.35 375.14,-92.41 395.39,-100.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="394.29,-104.18 404.86,-104.83 397.01,-97.73 394.29,-104.18"/>
 </g>
 <!-- proc~modify_xc~3 -->
-<g id="proc~~get_knot_all~3~~CalledByGraph_node4" class="node">
+<g id="proc~~get_knot_all~3~~CalledByGraph_node6" class="node">
 <title>proc~modify_xc~3</title>
-<g id="a_proc~~get_knot_all~3~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="144.5,-66 1.5,-66 1.5,-42 144.5,-42 144.5,-66"/>
-<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
+<g id="a_proc~~get_knot_all~3~~CalledByGraph_node6"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="312.5,-24 159.5,-24 159.5,0 312.5,0 312.5,-24"/>
+<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~get_knot~3 -->
-<g id="proc~~get_knot_all~3~~CalledByGraph_edge3" class="edge">
+<g id="proc~~get_knot_all~3~~CalledByGraph_edge5" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~get_knot~3</title>
-<path fill="none" stroke="#ff0000" d="M144.57,-54C153.5,-54 162.67,-54 171.67,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="171.75,-57.5 181.75,-54 171.75,-50.5 171.75,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M302.78,-24.06C310.79,-26.53 318.71,-29.48 326,-33 360.26,-49.54 393.69,-78.66 413.7,-97.89"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="411.33,-100.47 420.93,-104.97 416.23,-95.48 411.33,-100.47"/>
 </g>
-<!-- program~example1_curve -->
-<g id="proc~~get_knot_all~3~~CalledByGraph_node5" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~get_knot_all~3~~CalledByGraph_node5"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="123,-24 23,-24 23,0 123,0 123,-24"/>
-<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<!-- proc~remove_knots~3 -->
+<g id="proc~~get_knot_all~3~~CalledByGraph_node7" class="node">
+<title>proc~remove_knots~3</title>
+<g id="a_proc~~get_knot_all~3~~CalledByGraph_node7"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="322,-108 150,-108 150,-84 322,-84 322,-108"/>
+<text text-anchor="middle" x="236" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;none~get_knot~3 -->
-<g id="proc~~get_knot_all~3~~CalledByGraph_edge4" class="edge">
-<title>program~example1_curve&#45;&gt;none~get_knot~3</title>
-<path fill="none" stroke="#ff0000" d="M123.25,-23.92C143.41,-28.8 166.9,-34.49 188,-39.6"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="187.28,-43.02 197.82,-41.97 188.93,-36.22 187.28,-43.02"/>
+<!-- proc~remove_knots~3&#45;&gt;none~get_knot~3 -->
+<g id="proc~~get_knot_all~3~~CalledByGraph_edge6" class="edge">
+<title>proc~remove_knots~3&#45;&gt;none~get_knot~3</title>
+<path fill="none" stroke="#ff0000" d="M322.18,-105.15C332.03,-106.21 342.06,-107.28 351.85,-108.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="351.63,-111.83 361.94,-109.42 352.37,-104.87 351.63,-111.83"/>
+</g>
+<!-- program~example3_surface -->
+<g id="proc~~get_knot_all~3~~CalledByGraph_node8" class="node">
+<title>program~example3_surface</title>
+<g id="a_proc~~get_knot_all~3~~CalledByGraph_node8"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-171 0,-171 0,-147 110,-147 110,-171"/>
+<text text-anchor="middle" x="55" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+</a>
+</g>
+</g>
+<!-- program~example3_surface&#45;&gt;none~get_knot~3 -->
+<g id="proc~~get_knot_all~3~~CalledByGraph_edge7" class="edge">
+<title>program~example3_surface&#45;&gt;none~get_knot~3</title>
+<path fill="none" stroke="#ff0000" d="M75.48,-171.15C93.13,-181.4 120.24,-195.29 146,-201 224.1,-218.33 250.42,-227.22 326,-201 362.53,-188.33 396.02,-157.35 415.33,-136.77"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="418.09,-138.93 422.25,-129.19 412.92,-134.21 418.09,-138.93"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="proc~~get_knot_all~3~~CalledByGraph_edge8" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#ff0000" d="M110.19,-165.36C118.42,-166.32 127.11,-167.34 135.94,-168.38"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="135.59,-171.86 145.93,-169.55 136.41,-164.91 135.59,-171.86"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
+<g id="proc~~get_knot_all~3~~CalledByGraph_edge9" class="edge">
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#ffff00" d="M110.19,-152.64C121.29,-151.34 133.24,-149.94 145.2,-148.53"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="145.71,-152 155.24,-147.36 144.9,-145.05 145.71,-152"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
+<g id="proc~~get_knot_all~3~~CalledByGraph_edge11" class="edge">
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#0000ff" d="M78.4,-146.97C96.29,-137.76 122.22,-125.26 146,-117 152.45,-114.76 159.24,-112.68 166.08,-110.77"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="167.35,-114.06 176.1,-108.1 165.54,-107.29 167.35,-114.06"/>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~get_knot_all~3~~CalledByGraph_node9" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~get_knot_all~3~~CalledByGraph_node9"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-24 8,-24 8,0 102,0 102,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
+<g id="proc~~get_knot_all~3~~CalledByGraph_edge10" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#00ffff" d="M102.1,-12C116.51,-12 132.9,-12 149.13,-12"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="149.2,-15.5 159.2,-12 149.2,-8.5 149.2,-15.5"/>
 </g>
 </g>
 </svg>
-</div>          <div>
+</div>                <script>
+                  var panprocget_knot_all3CalledByGraph = svgPanZoom('#procget_knot_all3CalledByGraph',
+                    {zoomEnabled: true, controlIconsEnabled: true, fit: true, center: true,}
+                  );
+                </script>          <div>
             <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
           </div>
           <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
@@ -378,7 +475,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_knoti.html b/proc/get_knoti.html
index d35629b8f..7a0ba181d 100644
--- a/proc/get_knoti.html
+++ b/proc/get_knoti.html
@@ -78,20 +78,20 @@ <h1>get_knoti
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.6% of total for procedures.">39 statements</a>
+                 title=" 0.2% of total for procedures.">14 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_knoti</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure function get_knoti(this, dir, i) result(knot)  
+    <h2>private pure function get_knoti(this, i) result(knot)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
         <tr>
             <td>
               <span class="anchor" id="variable-this~21"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -173,22 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~7"></span>
-              integer,
-            </td>
-<td>intent(in)</td>
-              <td></td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>dir</strong></td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-i~3"></span>
+              <span class="anchor" id="variable-i~7"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -206,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-knot~2"></span>
+          <span class="anchor" id="variable-knot~6"></span>
           real(kind=rk)
         </small>
       </h3>
@@ -223,147 +208,80 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_knoti~~CalledByGraph Pages: 1 -->
-<svg id="procget_knotiCalledByGraph" width="641pt" height="208pt"
- viewBox="0.00 0.00 641.00 208.33" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~get_knoti~~CalledByGraph" class="graph" transform="scale(1.08 1.08) rotate(0) translate(4 221.89)">
+<svg id="procget_knotiCalledByGraph" width="495pt" height="116pt"
+ viewBox="0.00 0.00 495.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~get_knoti~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
 <title>proc~~get_knoti~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-221.89 691,-221.89 691,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 491,-112 491,4 -4,4"/>
 <!-- proc~get_knoti -->
 <g id="proc~~get_knoti~~CalledByGraph_node1" class="node">
 <title>proc~get_knoti</title>
-<polygon fill="none" stroke="black" points="687,-129 541,-129 541,-105 687,-105 687,-129"/>
-<text text-anchor="middle" x="614" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_knoti</text>
+<polygon fill="none" stroke="black" points="487,-66 351,-66 351,-42 487,-42 487,-66"/>
+<text text-anchor="middle" x="419" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_knoti</text>
 </g>
 <!-- none~get_knot -->
 <g id="proc~~get_knoti~~CalledByGraph_node2" class="node">
 <title>none~get_knot</title>
-<g id="a_proc~~get_knoti~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot" xlink:title="nurbs_volume%get_knot">
-<polygon fill="#a7506f" stroke="#a7506f" points="505,-129 362,-129 362,-105 505,-105 505,-129"/>
-<text text-anchor="middle" x="433.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot</text>
+<g id="a_proc~~get_knoti~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_knot" xlink:title="nurbs_curve%get_knot">
+<polygon fill="#a7506f" stroke="#a7506f" points="315,-66 182,-66 182,-42 315,-42 315,-66"/>
+<text text-anchor="middle" x="248.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot&#45;&gt;proc~get_knoti -->
 <g id="proc~~get_knoti~~CalledByGraph_edge1" class="edge">
 <title>none~get_knot&#45;&gt;proc~get_knoti</title>
-<path fill="none" stroke="#ff0000" d="M505.05,-117C513.52,-117 522.23,-117 530.86,-117"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="530.92,-120.5 540.92,-117 530.92,-113.5 530.92,-120.5"/>
-</g>
-<!-- proc~elevate_degree -->
-<g id="proc~~get_knoti~~CalledByGraph_node3" class="node">
-<title>proc~elevate_degree</title>
-<g id="a_proc~~get_knoti~~CalledByGraph_node3"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="326,-192 146,-192 146,-168 326,-168 326,-192"/>
-<text text-anchor="middle" x="236" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
-</a>
-</g>
-</g>
-<!-- proc~elevate_degree&#45;&gt;none~get_knot -->
-<g id="proc~~get_knoti~~CalledByGraph_edge2" class="edge">
-<title>proc~elevate_degree&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0000" d="M293.36,-168C304.26,-165.31 315.55,-162.28 326,-159 349.47,-151.65 375.14,-141.59 395.39,-133.16"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="397.01,-136.27 404.86,-129.17 394.29,-129.82 397.01,-136.27"/>
-</g>
-<!-- proc~insert_knots -->
-<g id="proc~~get_knoti~~CalledByGraph_node4" class="node">
-<title>proc~insert_knots</title>
-<g id="a_proc~~get_knoti~~CalledByGraph_node4"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="316.5,-150 155.5,-150 155.5,-126 316.5,-126 316.5,-150"/>
-<text text-anchor="middle" x="236" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
-</a>
-</g>
-</g>
-<!-- proc~insert_knots&#45;&gt;none~get_knot -->
-<g id="proc~~get_knoti~~CalledByGraph_edge3" class="edge">
-<title>proc~insert_knots&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0000" d="M316.52,-129.46C328.13,-128.21 340.09,-126.93 351.73,-125.68"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="352.28,-129.14 361.85,-124.59 351.53,-122.18 352.28,-129.14"/>
+<path fill="none" stroke="#ff0000" d="M315.13,-54C323.56,-54 332.26,-54 340.86,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="340.88,-57.5 350.88,-54 340.88,-50.5 340.88,-57.5"/>
 </g>
 <!-- proc~modify_wc -->
-<g id="proc~~get_knoti~~CalledByGraph_node5" class="node">
+<g id="proc~~get_knoti~~CalledByGraph_node3" class="node">
 <title>proc~modify_wc</title>
-<g id="a_proc~~get_knoti~~CalledByGraph_node5"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="314,-66 158,-66 158,-42 314,-42 314,-66"/>
-<text text-anchor="middle" x="236" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
+<g id="a_proc~~get_knoti~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="146,-108 0,-108 0,-84 146,-84 146,-108"/>
+<text text-anchor="middle" x="73" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~get_knot -->
-<g id="proc~~get_knoti~~CalledByGraph_edge4" class="edge">
+<g id="proc~~get_knoti~~CalledByGraph_edge2" class="edge">
 <title>proc~modify_wc&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0000" d="M293.36,-66C304.26,-68.69 315.55,-71.72 326,-75 349.47,-82.35 375.14,-92.41 395.39,-100.84"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="394.29,-104.18 404.86,-104.83 397.01,-97.73 394.29,-104.18"/>
+<path fill="none" stroke="#ff0000" d="M123.72,-83.96C143.77,-79.11 167.08,-73.47 188.02,-68.4"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="188.88,-71.79 197.77,-66.04 187.23,-64.99 188.88,-71.79"/>
 </g>
 <!-- proc~modify_xc -->
-<g id="proc~~get_knoti~~CalledByGraph_node6" class="node">
+<g id="proc~~get_knoti~~CalledByGraph_node4" class="node">
 <title>proc~modify_xc</title>
-<g id="a_proc~~get_knoti~~CalledByGraph_node6"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="312.5,-24 159.5,-24 159.5,0 312.5,0 312.5,-24"/>
-<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
+<g id="a_proc~~get_knoti~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="144.5,-66 1.5,-66 1.5,-42 144.5,-42 144.5,-66"/>
+<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~get_knot -->
-<g id="proc~~get_knoti~~CalledByGraph_edge5" class="edge">
+<g id="proc~~get_knoti~~CalledByGraph_edge3" class="edge">
 <title>proc~modify_xc&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0000" d="M302.78,-24.06C310.79,-26.53 318.71,-29.48 326,-33 360.26,-49.54 393.69,-78.66 413.7,-97.89"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="411.33,-100.47 420.93,-104.97 416.23,-95.48 411.33,-100.47"/>
-</g>
-<!-- proc~remove_knots -->
-<g id="proc~~get_knoti~~CalledByGraph_node7" class="node">
-<title>proc~remove_knots</title>
-<g id="a_proc~~get_knoti~~CalledByGraph_node7"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="322,-108 150,-108 150,-84 322,-84 322,-108"/>
-<text text-anchor="middle" x="236" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
-</a>
-</g>
-</g>
-<!-- proc~remove_knots&#45;&gt;none~get_knot -->
-<g id="proc~~get_knoti~~CalledByGraph_edge6" class="edge">
-<title>proc~remove_knots&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0000" d="M322.18,-105.15C332.03,-106.21 342.06,-107.28 351.85,-108.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="351.63,-111.83 361.94,-109.42 352.37,-104.87 351.63,-111.83"/>
+<path fill="none" stroke="#ff0000" d="M144.57,-54C153.5,-54 162.67,-54 171.67,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="171.75,-57.5 181.75,-54 171.75,-50.5 171.75,-57.5"/>
 </g>
-<!-- program~example3_volume -->
-<g id="proc~~get_knoti~~CalledByGraph_node8" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~get_knoti~~CalledByGraph_node8"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-171 0,-171 0,-147 110,-147 110,-171"/>
-<text text-anchor="middle" x="55" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<!-- program~example1_curve -->
+<g id="proc~~get_knoti~~CalledByGraph_node5" class="node">
+<title>program~example1_curve</title>
+<g id="a_proc~~get_knoti~~CalledByGraph_node5"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="123,-24 23,-24 23,0 123,0 123,-24"/>
+<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;none~get_knot -->
-<g id="proc~~get_knoti~~CalledByGraph_edge7" class="edge">
-<title>program~example3_volume&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0000" d="M75.48,-171.15C93.13,-181.4 120.24,-195.29 146,-201 224.1,-218.33 250.42,-227.22 326,-201 362.53,-188.33 396.02,-157.35 415.33,-136.77"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="418.09,-138.93 422.25,-129.19 412.92,-134.21 418.09,-138.93"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
-<g id="proc~~get_knoti~~CalledByGraph_edge8" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#ff0000" d="M110.19,-165.36C118.42,-166.32 127.11,-167.34 135.94,-168.38"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.59,-171.86 145.93,-169.55 136.41,-164.91 135.59,-171.86"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
-<g id="proc~~get_knoti~~CalledByGraph_edge9" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#ffff00" d="M110.19,-152.64C121.29,-151.34 133.24,-149.94 145.2,-148.53"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="145.71,-152 155.24,-147.36 144.9,-145.05 145.71,-152"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
-<g id="proc~~get_knoti~~CalledByGraph_edge10" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#0000ff" d="M78.4,-146.97C96.29,-137.76 122.22,-125.26 146,-117 152.45,-114.76 159.24,-112.68 166.08,-110.77"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="167.35,-114.06 176.1,-108.1 165.54,-107.29 167.35,-114.06"/>
+<!-- program~example1_curve&#45;&gt;none~get_knot -->
+<g id="proc~~get_knoti~~CalledByGraph_edge4" class="edge">
+<title>program~example1_curve&#45;&gt;none~get_knot</title>
+<path fill="none" stroke="#ff0000" d="M123.25,-23.92C143.41,-28.8 166.9,-34.49 188,-39.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="187.28,-43.02 197.82,-41.97 188.93,-36.22 187.28,-43.02"/>
 </g>
 </g>
 </svg>
-</div>                <script>
-                  var panprocget_knotiCalledByGraph = svgPanZoom('#procget_knotiCalledByGraph',
-                    {zoomEnabled: true, controlIconsEnabled: true, fit: true, center: true,}
-                  );
-                </script>          <div>
+</div>          <div>
             <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
           </div>
           <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
@@ -475,7 +393,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_knoti~2.html b/proc/get_knoti~2.html
index 0f5839f83..1d26d5eea 100644
--- a/proc/get_knoti~2.html
+++ b/proc/get_knoti~2.html
@@ -78,20 +78,20 @@ <h1>get_knoti
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.4% of total for procedures.">29 statements</a>
+                 title=" 0.6% of total for procedures.">39 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_knoti</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_knoti(this, dir, i) result(knot)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~89"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~82"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~22"></span>
+              <span class="anchor" id="variable-dir~10"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-i~34"></span>
+              <span class="anchor" id="variable-i~35"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -206,7 +206,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-knot~5"></span>
+          <span class="anchor" id="variable-knot~27"></span>
           real(kind=rk)
         </small>
       </h3>
@@ -232,14 +232,14 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~get_knoti~2~~CalledByGraph_node1" class="node">
 <title>proc~get_knoti~2</title>
 <polygon fill="none" stroke="black" points="687,-129 541,-129 541,-105 687,-105 687,-129"/>
-<text text-anchor="middle" x="614" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_knoti</text>
+<text text-anchor="middle" x="614" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_knoti</text>
 </g>
 <!-- none~get_knot~2 -->
 <g id="proc~~get_knoti~2~~CalledByGraph_node2" class="node">
 <title>none~get_knot~2</title>
-<g id="a_proc~~get_knoti~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~2" xlink:title="nurbs_surface%get_knot">
+<g id="a_proc~~get_knoti~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot~2" xlink:title="nurbs_volume%get_knot">
 <polygon fill="#a7506f" stroke="#a7506f" points="505,-129 362,-129 362,-105 505,-105 505,-129"/>
-<text text-anchor="middle" x="433.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
+<text text-anchor="middle" x="433.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot</text>
 </a>
 </g>
 </g>
@@ -252,9 +252,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~elevate_degree~2 -->
 <g id="proc~~get_knoti~2~~CalledByGraph_node3" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_proc~~get_knoti~2~~CalledByGraph_node3"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
+<g id="a_proc~~get_knoti~2~~CalledByGraph_node3"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="326,-192 146,-192 146,-168 326,-168 326,-192"/>
-<text text-anchor="middle" x="236" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<text text-anchor="middle" x="236" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
@@ -267,9 +267,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~insert_knots~2 -->
 <g id="proc~~get_knoti~2~~CalledByGraph_node4" class="node">
 <title>proc~insert_knots~2</title>
-<g id="a_proc~~get_knoti~2~~CalledByGraph_node4"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
+<g id="a_proc~~get_knoti~2~~CalledByGraph_node4"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
 <polygon fill="#d9534f" stroke="#d9534f" points="316.5,-150 155.5,-150 155.5,-126 316.5,-126 316.5,-150"/>
-<text text-anchor="middle" x="236" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+<text text-anchor="middle" x="236" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
@@ -282,9 +282,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~modify_wc~2 -->
 <g id="proc~~get_knoti~2~~CalledByGraph_node5" class="node">
 <title>proc~modify_wc~2</title>
-<g id="a_proc~~get_knoti~2~~CalledByGraph_node5"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
+<g id="a_proc~~get_knoti~2~~CalledByGraph_node5"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
 <polygon fill="#d9534f" stroke="#d9534f" points="314,-66 158,-66 158,-42 314,-42 314,-66"/>
-<text text-anchor="middle" x="236" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+<text text-anchor="middle" x="236" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
@@ -297,9 +297,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~modify_xc~2 -->
 <g id="proc~~get_knoti~2~~CalledByGraph_node6" class="node">
 <title>proc~modify_xc~2</title>
-<g id="a_proc~~get_knoti~2~~CalledByGraph_node6"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
+<g id="a_proc~~get_knoti~2~~CalledByGraph_node6"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="312.5,-24 159.5,-24 159.5,0 312.5,0 312.5,-24"/>
-<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
@@ -312,9 +312,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~remove_knots~2 -->
 <g id="proc~~get_knoti~2~~CalledByGraph_node7" class="node">
 <title>proc~remove_knots~2</title>
-<g id="a_proc~~get_knoti~2~~CalledByGraph_node7"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
+<g id="a_proc~~get_knoti~2~~CalledByGraph_node7"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
 <polygon fill="#d9534f" stroke="#d9534f" points="322,-108 150,-108 150,-84 322,-84 322,-108"/>
-<text text-anchor="middle" x="236" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
+<text text-anchor="middle" x="236" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
 </a>
 </g>
 </g>
@@ -324,54 +324,39 @@ <h3 class="card-title">Called by</h3>
 <path fill="none" stroke="#ff0000" d="M322.18,-105.15C332.03,-106.21 342.06,-107.28 351.85,-108.34"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="351.63,-111.83 361.94,-109.42 352.37,-104.87 351.63,-111.83"/>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~get_knoti~2~~CalledByGraph_node8" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~get_knoti~2~~CalledByGraph_node8"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<title>program~example3_volume</title>
+<g id="a_proc~~get_knoti~2~~CalledByGraph_node8"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-171 0,-171 0,-147 110,-147 110,-171"/>
-<text text-anchor="middle" x="55" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<text text-anchor="middle" x="55" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;none~get_knot~2 -->
+<!-- program~example3_volume&#45;&gt;none~get_knot~2 -->
 <g id="proc~~get_knoti~2~~CalledByGraph_edge7" class="edge">
-<title>program~example3_surface&#45;&gt;none~get_knot~2</title>
+<title>program~example3_volume&#45;&gt;none~get_knot~2</title>
 <path fill="none" stroke="#ff0000" d="M75.48,-171.15C93.13,-181.4 120.24,-195.29 146,-201 224.1,-218.33 250.42,-227.22 326,-201 362.53,-188.33 396.02,-157.35 415.33,-136.77"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="418.09,-138.93 422.25,-129.19 412.92,-134.21 418.09,-138.93"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
 <g id="proc~~get_knoti~2~~CalledByGraph_edge8" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
 <path fill="none" stroke="#ff0000" d="M110.19,-165.36C118.42,-166.32 127.11,-167.34 135.94,-168.38"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="135.59,-171.86 145.93,-169.55 136.41,-164.91 135.59,-171.86"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
 <g id="proc~~get_knoti~2~~CalledByGraph_edge9" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
 <path fill="none" stroke="#ffff00" d="M110.19,-152.64C121.29,-151.34 133.24,-149.94 145.2,-148.53"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="145.71,-152 155.24,-147.36 144.9,-145.05 145.71,-152"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
-<g id="proc~~get_knoti~2~~CalledByGraph_edge11" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
+<g id="proc~~get_knoti~2~~CalledByGraph_edge10" class="edge">
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
 <path fill="none" stroke="#0000ff" d="M78.4,-146.97C96.29,-137.76 122.22,-125.26 146,-117 152.45,-114.76 159.24,-112.68 166.08,-110.77"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="167.35,-114.06 176.1,-108.1 165.54,-107.29 167.35,-114.06"/>
 </g>
-<!-- program~example_ppm3 -->
-<g id="proc~~get_knoti~2~~CalledByGraph_node9" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~get_knoti~2~~CalledByGraph_node9"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-24 8,-24 8,0 102,0 102,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
-<g id="proc~~get_knoti~2~~CalledByGraph_edge10" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#00ffff" d="M102.1,-12C116.51,-12 132.9,-12 149.13,-12"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="149.2,-15.5 159.2,-12 149.2,-8.5 149.2,-15.5"/>
-</g>
 </g>
 </svg>
 </div>                <script>
@@ -490,7 +475,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_knoti~3.html b/proc/get_knoti~3.html
index 8f3171ef0..9d2b210a6 100644
--- a/proc/get_knoti~3.html
+++ b/proc/get_knoti~3.html
@@ -78,20 +78,20 @@ <h1>get_knoti
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.2% of total for procedures.">14 statements</a>
+                 title=" 0.4% of total for procedures.">29 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_knoti</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure function get_knoti(this, i) result(knot)  
+    <h2>private pure function get_knoti(this, dir, i) result(knot)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~152"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~150"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -173,7 +173,22 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-i~87"></span>
+              <span class="anchor" id="variable-dir~25"></span>
+              integer,
+            </td>
+<td>intent(in)</td>
+              <td></td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>dir</strong></td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-i~86"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -191,7 +206,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-knot~20"></span>
+          <span class="anchor" id="variable-knot~38"></span>
           real(kind=rk)
         </small>
       </h3>
@@ -208,80 +223,162 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_knoti~3~~CalledByGraph Pages: 1 -->
-<svg id="procget_knoti3CalledByGraph" width="495pt" height="116pt"
- viewBox="0.00 0.00 495.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~get_knoti~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
+<svg id="procget_knoti3CalledByGraph" width="641pt" height="208pt"
+ viewBox="0.00 0.00 641.00 208.33" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~get_knoti~3~~CalledByGraph" class="graph" transform="scale(1.08 1.08) rotate(0) translate(4 221.89)">
 <title>proc~~get_knoti~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 491,-112 491,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-221.89 691,-221.89 691,4 -4,4"/>
 <!-- proc~get_knoti~3 -->
 <g id="proc~~get_knoti~3~~CalledByGraph_node1" class="node">
 <title>proc~get_knoti~3</title>
-<polygon fill="none" stroke="black" points="487,-66 351,-66 351,-42 487,-42 487,-66"/>
-<text text-anchor="middle" x="419" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_knoti</text>
+<polygon fill="none" stroke="black" points="687,-129 541,-129 541,-105 687,-105 687,-129"/>
+<text text-anchor="middle" x="614" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_knoti</text>
 </g>
 <!-- none~get_knot~3 -->
 <g id="proc~~get_knoti~3~~CalledByGraph_node2" class="node">
 <title>none~get_knot~3</title>
-<g id="a_proc~~get_knoti~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_knot~3" xlink:title="nurbs_curve%get_knot">
-<polygon fill="#a7506f" stroke="#a7506f" points="315,-66 182,-66 182,-42 315,-42 315,-66"/>
-<text text-anchor="middle" x="248.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot</text>
+<g id="a_proc~~get_knoti~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~3" xlink:title="nurbs_surface%get_knot">
+<polygon fill="#a7506f" stroke="#a7506f" points="505,-129 362,-129 362,-105 505,-105 505,-129"/>
+<text text-anchor="middle" x="433.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot~3&#45;&gt;proc~get_knoti~3 -->
 <g id="proc~~get_knoti~3~~CalledByGraph_edge1" class="edge">
 <title>none~get_knot~3&#45;&gt;proc~get_knoti~3</title>
-<path fill="none" stroke="#ff0000" d="M315.13,-54C323.56,-54 332.26,-54 340.86,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="340.88,-57.5 350.88,-54 340.88,-50.5 340.88,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M505.05,-117C513.52,-117 522.23,-117 530.86,-117"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="530.92,-120.5 540.92,-117 530.92,-113.5 530.92,-120.5"/>
 </g>
-<!-- proc~modify_wc~3 -->
+<!-- proc~elevate_degree~3 -->
 <g id="proc~~get_knoti~3~~CalledByGraph_node3" class="node">
+<title>proc~elevate_degree~3</title>
+<g id="a_proc~~get_knoti~3~~CalledByGraph_node3"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="326,-192 146,-192 146,-168 326,-168 326,-192"/>
+<text text-anchor="middle" x="236" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+</a>
+</g>
+</g>
+<!-- proc~elevate_degree~3&#45;&gt;none~get_knot~3 -->
+<g id="proc~~get_knoti~3~~CalledByGraph_edge2" class="edge">
+<title>proc~elevate_degree~3&#45;&gt;none~get_knot~3</title>
+<path fill="none" stroke="#ff0000" d="M293.36,-168C304.26,-165.31 315.55,-162.28 326,-159 349.47,-151.65 375.14,-141.59 395.39,-133.16"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="397.01,-136.27 404.86,-129.17 394.29,-129.82 397.01,-136.27"/>
+</g>
+<!-- proc~insert_knots~3 -->
+<g id="proc~~get_knoti~3~~CalledByGraph_node4" class="node">
+<title>proc~insert_knots~3</title>
+<g id="a_proc~~get_knoti~3~~CalledByGraph_node4"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="316.5,-150 155.5,-150 155.5,-126 316.5,-126 316.5,-150"/>
+<text text-anchor="middle" x="236" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+</a>
+</g>
+</g>
+<!-- proc~insert_knots~3&#45;&gt;none~get_knot~3 -->
+<g id="proc~~get_knoti~3~~CalledByGraph_edge3" class="edge">
+<title>proc~insert_knots~3&#45;&gt;none~get_knot~3</title>
+<path fill="none" stroke="#ff0000" d="M316.52,-129.46C328.13,-128.21 340.09,-126.93 351.73,-125.68"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="352.28,-129.14 361.85,-124.59 351.53,-122.18 352.28,-129.14"/>
+</g>
+<!-- proc~modify_wc~3 -->
+<g id="proc~~get_knoti~3~~CalledByGraph_node5" class="node">
 <title>proc~modify_wc~3</title>
-<g id="a_proc~~get_knoti~3~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="146,-108 0,-108 0,-84 146,-84 146,-108"/>
-<text text-anchor="middle" x="73" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
+<g id="a_proc~~get_knoti~3~~CalledByGraph_node5"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="314,-66 158,-66 158,-42 314,-42 314,-66"/>
+<text text-anchor="middle" x="236" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~get_knot~3 -->
-<g id="proc~~get_knoti~3~~CalledByGraph_edge2" class="edge">
+<g id="proc~~get_knoti~3~~CalledByGraph_edge4" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~get_knot~3</title>
-<path fill="none" stroke="#ff0000" d="M123.72,-83.96C143.77,-79.11 167.08,-73.47 188.02,-68.4"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="188.88,-71.79 197.77,-66.04 187.23,-64.99 188.88,-71.79"/>
+<path fill="none" stroke="#ff0000" d="M293.36,-66C304.26,-68.69 315.55,-71.72 326,-75 349.47,-82.35 375.14,-92.41 395.39,-100.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="394.29,-104.18 404.86,-104.83 397.01,-97.73 394.29,-104.18"/>
 </g>
 <!-- proc~modify_xc~3 -->
-<g id="proc~~get_knoti~3~~CalledByGraph_node4" class="node">
+<g id="proc~~get_knoti~3~~CalledByGraph_node6" class="node">
 <title>proc~modify_xc~3</title>
-<g id="a_proc~~get_knoti~3~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="144.5,-66 1.5,-66 1.5,-42 144.5,-42 144.5,-66"/>
-<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
+<g id="a_proc~~get_knoti~3~~CalledByGraph_node6"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="312.5,-24 159.5,-24 159.5,0 312.5,0 312.5,-24"/>
+<text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~get_knot~3 -->
-<g id="proc~~get_knoti~3~~CalledByGraph_edge3" class="edge">
+<g id="proc~~get_knoti~3~~CalledByGraph_edge5" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~get_knot~3</title>
-<path fill="none" stroke="#ff0000" d="M144.57,-54C153.5,-54 162.67,-54 171.67,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="171.75,-57.5 181.75,-54 171.75,-50.5 171.75,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M302.78,-24.06C310.79,-26.53 318.71,-29.48 326,-33 360.26,-49.54 393.69,-78.66 413.7,-97.89"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="411.33,-100.47 420.93,-104.97 416.23,-95.48 411.33,-100.47"/>
 </g>
-<!-- program~example1_curve -->
-<g id="proc~~get_knoti~3~~CalledByGraph_node5" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~get_knoti~3~~CalledByGraph_node5"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="123,-24 23,-24 23,0 123,0 123,-24"/>
-<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<!-- proc~remove_knots~3 -->
+<g id="proc~~get_knoti~3~~CalledByGraph_node7" class="node">
+<title>proc~remove_knots~3</title>
+<g id="a_proc~~get_knoti~3~~CalledByGraph_node7"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="322,-108 150,-108 150,-84 322,-84 322,-108"/>
+<text text-anchor="middle" x="236" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;none~get_knot~3 -->
-<g id="proc~~get_knoti~3~~CalledByGraph_edge4" class="edge">
-<title>program~example1_curve&#45;&gt;none~get_knot~3</title>
-<path fill="none" stroke="#ff0000" d="M123.25,-23.92C143.41,-28.8 166.9,-34.49 188,-39.6"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="187.28,-43.02 197.82,-41.97 188.93,-36.22 187.28,-43.02"/>
+<!-- proc~remove_knots~3&#45;&gt;none~get_knot~3 -->
+<g id="proc~~get_knoti~3~~CalledByGraph_edge6" class="edge">
+<title>proc~remove_knots~3&#45;&gt;none~get_knot~3</title>
+<path fill="none" stroke="#ff0000" d="M322.18,-105.15C332.03,-106.21 342.06,-107.28 351.85,-108.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="351.63,-111.83 361.94,-109.42 352.37,-104.87 351.63,-111.83"/>
+</g>
+<!-- program~example3_surface -->
+<g id="proc~~get_knoti~3~~CalledByGraph_node8" class="node">
+<title>program~example3_surface</title>
+<g id="a_proc~~get_knoti~3~~CalledByGraph_node8"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-171 0,-171 0,-147 110,-147 110,-171"/>
+<text text-anchor="middle" x="55" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+</a>
+</g>
+</g>
+<!-- program~example3_surface&#45;&gt;none~get_knot~3 -->
+<g id="proc~~get_knoti~3~~CalledByGraph_edge7" class="edge">
+<title>program~example3_surface&#45;&gt;none~get_knot~3</title>
+<path fill="none" stroke="#ff0000" d="M75.48,-171.15C93.13,-181.4 120.24,-195.29 146,-201 224.1,-218.33 250.42,-227.22 326,-201 362.53,-188.33 396.02,-157.35 415.33,-136.77"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="418.09,-138.93 422.25,-129.19 412.92,-134.21 418.09,-138.93"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="proc~~get_knoti~3~~CalledByGraph_edge8" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#ff0000" d="M110.19,-165.36C118.42,-166.32 127.11,-167.34 135.94,-168.38"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="135.59,-171.86 145.93,-169.55 136.41,-164.91 135.59,-171.86"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
+<g id="proc~~get_knoti~3~~CalledByGraph_edge9" class="edge">
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#ffff00" d="M110.19,-152.64C121.29,-151.34 133.24,-149.94 145.2,-148.53"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="145.71,-152 155.24,-147.36 144.9,-145.05 145.71,-152"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
+<g id="proc~~get_knoti~3~~CalledByGraph_edge11" class="edge">
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#0000ff" d="M78.4,-146.97C96.29,-137.76 122.22,-125.26 146,-117 152.45,-114.76 159.24,-112.68 166.08,-110.77"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="167.35,-114.06 176.1,-108.1 165.54,-107.29 167.35,-114.06"/>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~get_knoti~3~~CalledByGraph_node9" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~get_knoti~3~~CalledByGraph_node9"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-24 8,-24 8,0 102,0 102,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
+<g id="proc~~get_knoti~3~~CalledByGraph_edge10" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#00ffff" d="M102.1,-12C116.51,-12 132.9,-12 149.13,-12"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="149.2,-15.5 159.2,-12 149.2,-8.5 149.2,-15.5"/>
 </g>
 </g>
 </svg>
-</div>          <div>
+</div>                <script>
+                  var panprocget_knoti3CalledByGraph = svgPanZoom('#procget_knoti3CalledByGraph',
+                    {zoomEnabled: true, controlIconsEnabled: true, fit: true, center: true,}
+                  );
+                </script>          <div>
             <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
           </div>
           <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
@@ -393,7 +490,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_multiplicity.html b/proc/get_multiplicity.html
index 785fb244c..27fa2fbd2 100644
--- a/proc/get_multiplicity.html
+++ b/proc/get_multiplicity.html
@@ -78,20 +78,20 @@ <h1>get_multiplicity
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.4% of total for procedures.">26 statements</a>
+                 title=" 0.1% of total for procedures.">9 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_multiplicity</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure function get_multiplicity(this, dir) result(m)  
+    <h2>private pure function get_multiplicity(this) result(m)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
         <tr>
             <td>
               <span class="anchor" id="variable-this~29"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -169,21 +169,6 @@ <h3>Arguments</h3>
             <td><strong>this</strong></td>
             <td>
                 
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-dir~9"></span>
-              integer,
-            </td>
-<td>intent(in)</td>
-              <td></td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>dir</strong></td>
-            <td>
-                
             </td>
         </tr>
     </tbody>
@@ -191,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-m~2"></span>
+          <span class="anchor" id="variable-m~3"></span>
           integer, allocatable, (:)
         </small>
       </h3>
@@ -208,61 +193,61 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_multiplicity~~CallsGraph Pages: 1 -->
-<svg id="procget_multiplicityCallsGraph" width="512pt" height="74pt"
- viewBox="0.00 0.00 512.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procget_multiplicityCallsGraph" width="503pt" height="74pt"
+ viewBox="0.00 0.00 503.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~get_multiplicity~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~get_multiplicity~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 508,-70 508,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 499,-70 499,4 -4,4"/>
 <!-- proc~get_multiplicity -->
 <g id="proc~~get_multiplicity~~CallsGraph_node1" class="node">
 <title>proc~get_multiplicity</title>
-<polygon fill="none" stroke="black" points="178,-45 0,-45 0,-21 178,-21 178,-45"/>
-<text text-anchor="middle" x="89" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_multiplicity</text>
+<polygon fill="none" stroke="black" points="169,-45 0,-45 0,-21 169,-21 169,-45"/>
+<text text-anchor="middle" x="84.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_multiplicity</text>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~get_multiplicity~~CallsGraph_node2" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~get_multiplicity~~CallsGraph_node2"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="338,-45 214,-45 214,-21 338,-21 338,-45"/>
-<text text-anchor="middle" x="276" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="329,-45 205,-45 205,-21 329,-21 329,-45"/>
+<text text-anchor="middle" x="267" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~get_multiplicity~~CallsGraph_edge1" class="edge">
 <title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M178.17,-33C186.77,-33 195.42,-33 203.82,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="203.93,-36.5 213.93,-33 203.93,-29.5 203.93,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M169.15,-33C177.73,-33 186.4,-33 194.84,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="194.99,-36.5 204.99,-33 194.99,-29.5 194.99,-36.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~get_multiplicity~~CallsGraph_node3" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~get_multiplicity~~CallsGraph_node3"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="504,-66 374,-66 374,-42 504,-42 504,-66"/>
-<text text-anchor="middle" x="439" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="495,-66 365,-66 365,-42 495,-42 495,-66"/>
+<text text-anchor="middle" x="430" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~get_multiplicity~~CallsGraph_edge2" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M338.33,-41C346.69,-42.09 355.35,-43.22 363.92,-44.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="363.53,-47.82 373.9,-45.64 364.44,-40.88 363.53,-47.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M329.33,-41C337.69,-42.09 346.35,-43.22 354.92,-44.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="354.53,-47.82 364.9,-45.64 355.44,-40.88 354.53,-47.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~get_multiplicity~~CallsGraph_node4" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~get_multiplicity~~CallsGraph_node4"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="504,-24 374,-24 374,0 504,0 504,-24"/>
-<text text-anchor="middle" x="439" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="495,-24 365,-24 365,0 495,0 495,-24"/>
+<text text-anchor="middle" x="430" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~get_multiplicity~~CallsGraph_edge3" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M338.33,-25C346.69,-23.91 355.35,-22.78 363.92,-21.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="364.44,-25.12 373.9,-20.36 363.53,-18.18 364.44,-25.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M329.33,-25C337.69,-23.91 346.35,-22.78 354.92,-21.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="355.44,-25.12 364.9,-20.36 354.53,-18.18 355.44,-25.12"/>
 </g>
 </g>
 </svg>
@@ -358,439 +343,409 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_multiplicity~~CalledByGraph Pages: 1 -->
-<svg id="procget_multiplicityCalledByGraph" width="641pt" height="331pt"
- viewBox="0.00 0.00 641.00 331.03" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~get_multiplicity~~CalledByGraph" class="graph" transform="scale(2.01 2.01) rotate(0) translate(4 662.2)">
+<svg id="procget_multiplicityCalledByGraph" width="641pt" height="284pt"
+ viewBox="0.00 0.00 641.00 283.61" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~get_multiplicity~~CalledByGraph" class="graph" transform="scale(1.91 1.91) rotate(0) translate(4 538.45)">
 <title>proc~~get_multiplicity~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-662.2 1286,-662.2 1286,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-538.45 1222,-538.45 1222,4 -4,4"/>
 <!-- proc~get_multiplicity -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node1" class="node">
 <title>proc~get_multiplicity</title>
-<polygon fill="none" stroke="black" points="1282,-500 1104,-500 1104,-476 1282,-476 1282,-500"/>
-<text text-anchor="middle" x="1193" y="-485.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_multiplicity</text>
+<polygon fill="none" stroke="black" points="1218,-429 1049,-429 1049,-405 1218,-405 1218,-429"/>
+<text text-anchor="middle" x="1133.5" y="-414.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_multiplicity</text>
 </g>
 <!-- proc~cmp_degree -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node2" class="node">
 <title>proc~cmp_degree</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node2"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="1068,-378 905,-378 905,-354 1068,-354 1068,-378"/>
-<text text-anchor="middle" x="986.5" y="-363.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node2"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="1013,-339 859,-339 859,-315 1013,-315 1013,-339"/>
+<text text-anchor="middle" x="936" y="-324.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="proc~~get_multiplicity~~CalledByGraph_edge1" class="edge">
 <title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M1007.86,-378.14C1044.37,-399.93 1121.11,-445.71 1163.08,-470.75"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1161.35,-473.79 1171.73,-475.91 1164.93,-467.78 1161.35,-473.79"/>
+<path fill="none" stroke="#ff0000" d="M963.37,-339.14C997.86,-355.02 1058.43,-382.9 1096.95,-400.63"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1095.69,-403.91 1106.24,-404.91 1098.62,-397.55 1095.69,-403.91"/>
 </g>
 <!-- proc~cmp_elem -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node3" class="node">
 <title>proc~cmp_elem</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_volume%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="713,-622 560,-622 560,-598 713,-598 713,-622"/>
-<text text-anchor="middle" x="636.5" y="-607.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_curve%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="670,-520 527,-520 527,-496 670,-496 670,-520"/>
+<text text-anchor="middle" x="598.5" y="-505.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem&#45;&gt;proc~get_multiplicity -->
 <g id="proc~~get_multiplicity~~CalledByGraph_edge2" class="edge">
 <title>proc~cmp_elem&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M692.19,-597.97C795.12,-575.32 1017.19,-526.46 1127.33,-502.23"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1128.3,-505.6 1137.32,-500.03 1126.8,-498.76 1128.3,-505.6"/>
+<path fill="none" stroke="#ff0000" d="M670,-495.96C768.85,-479.09 948.14,-448.48 1052.07,-430.73"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1052.93,-434.14 1062.2,-429 1051.75,-427.24 1052.93,-434.14"/>
 </g>
 <!-- proc~ansatz -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node4" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node4"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-642 367.5,-642 367.5,-618 499.5,-618 499.5,-642"/>
-<text text-anchor="middle" x="433.5" y="-627.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node4"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="467,-520 345,-520 345,-496 467,-496 467,-520"/>
+<text text-anchor="middle" x="406" y="-505.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge5" class="edge">
+<g id="proc~~get_multiplicity~~CalledByGraph_edge6" class="edge">
 <title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#00ffff" d="M499.76,-623.51C515.61,-621.93 532.8,-620.22 549.46,-618.56"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="550.13,-622.01 559.74,-617.54 549.44,-615.05 550.13,-622.01"/>
+<path fill="none" stroke="#00ffff" d="M467.01,-508C482.73,-508 499.93,-508 516.54,-508"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="516.79,-511.5 526.79,-508 516.79,-504.5 516.79,-511.5"/>
 </g>
 <!-- none~set -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node9" class="node">
 <title>none~set</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node9"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="693,-336 580,-336 580,-312 693,-312 693,-336"/>
-<text text-anchor="middle" x="636.5" y="-321.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node9"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="650,-297 547,-297 547,-273 650,-273 650,-297"/>
+<text text-anchor="middle" x="598.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;none~set -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge12" class="edge">
+<g id="proc~~get_multiplicity~~CalledByGraph_edge13" class="edge">
 <title>proc~ansatz&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M457.65,-617.97C477.41,-606.74 505.5,-588.38 524,-566 581.87,-496.01 616.55,-391.05 629.58,-345.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="633.02,-346.6 632.36,-336.03 626.29,-344.7 633.02,-346.6"/>
+<path fill="none" stroke="#ff0000" d="M466.87,-495.84C475.55,-492.33 483.92,-487.81 491,-482 548.64,-434.65 579.7,-347.63 591.65,-306.99"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="595.04,-307.84 594.4,-297.27 588.31,-305.94 595.04,-307.84"/>
 </g>
-<!-- proc~cmp_volume -->
+<!-- proc~cmp_length -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node5" class="node">
-<title>proc~cmp_volume</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node5"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-642 141,-642 141,-618 307,-618 307,-642"/>
-<text text-anchor="middle" x="224" y="-627.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<title>proc~cmp_length</title>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node5"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
+<polygon fill="#d9534f" stroke="#d9534f" points="285,-520 135,-520 135,-496 285,-496 285,-520"/>
+<text text-anchor="middle" x="210" y="-505.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge6" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#00ffff" d="M280.82,-642.03C341.2,-653.17 440.11,-665.94 524,-651 550.77,-646.23 579.53,-635.51 601.14,-626.22"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="602.79,-629.32 610.53,-622.08 599.97,-622.91 602.79,-629.32"/>
+<!-- proc~cmp_length&#45;&gt;proc~cmp_elem -->
+<g id="proc~~get_multiplicity~~CalledByGraph_edge7" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~cmp_elem</title>
+<path fill="none" stroke="#00ffff" d="M263.03,-520.02C281.26,-523.67 301.93,-527.2 321,-529 396.22,-536.12 415.8,-536.34 491,-529 506.01,-527.53 522.04,-524.93 537,-522.05"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="538.03,-525.41 547.15,-520.02 536.65,-518.55 538.03,-525.41"/>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="proc~~get_multiplicity~~CalledByGraph_edge8" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.01,-630C323.61,-630 341,-630 357.35,-630"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="357.38,-633.5 367.38,-630 357.38,-626.5 357.38,-633.5"/>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M285.17,-508C301.32,-508 318.36,-508 334.36,-508"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="334.71,-511.5 344.71,-508 334.71,-504.5 334.71,-511.5"/>
 </g>
 <!-- proc~set1 -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node6" class="node">
 <title>proc~set1</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node6"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="869,-378 749,-378 749,-354 869,-354 869,-378"/>
-<text text-anchor="middle" x="809" y="-363.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node6"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="819.5,-360 709.5,-360 709.5,-336 819.5,-336 819.5,-360"/>
+<text text-anchor="middle" x="764.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
 <!-- proc~set1&#45;&gt;proc~cmp_degree -->
 <g id="proc~~get_multiplicity~~CalledByGraph_edge3" class="edge">
 <title>proc~set1&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#ff0000" d="M869.42,-366C877.64,-366 886.23,-366 894.86,-366"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="894.98,-369.5 904.98,-366 894.98,-362.5 894.98,-369.5"/>
+<path fill="none" stroke="#ff0000" d="M819.6,-341.3C828.97,-340.14 838.92,-338.9 848.9,-337.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="849.37,-341.14 858.86,-336.43 848.51,-334.19 849.37,-341.14"/>
 </g>
-<!-- proc~set3 -->
+<!-- proc~set1a -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node7" class="node">
-<title>proc~set3</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node7"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="869,-336 749,-336 749,-312 869,-312 869,-336"/>
-<text text-anchor="middle" x="809" y="-321.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
+<title>proc~set1a</title>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node7"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="823,-318 706,-318 706,-294 823,-294 823,-318"/>
+<text text-anchor="middle" x="764.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
 </a>
 </g>
 </g>
-<!-- proc~set3&#45;&gt;proc~cmp_degree -->
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
 <g id="proc~~get_multiplicity~~CalledByGraph_edge4" class="edge">
-<title>proc~set3&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#ff0000" d="M860.29,-336.04C880.58,-340.89 904.15,-346.53 925.34,-351.6"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="924.66,-355.04 935.2,-353.96 926.29,-348.23 924.66,-355.04"/>
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#ff0000" d="M823.36,-313.17C831.56,-314.18 840.14,-315.25 848.74,-316.31"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="848.46,-319.81 858.82,-317.56 849.33,-312.86 848.46,-319.81"/>
 </g>
-<!-- program~example3_volume -->
+<!-- proc~set3 -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node8" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node8"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-356 169,-356 169,-332 279,-332 279,-356"/>
-<text text-anchor="middle" x="224" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
-</a>
-</g>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~cmp_elem -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge7" class="edge">
-<title>program~example3_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#00ffff" d="M229.06,-356.41C240.81,-390.33 278.23,-485.27 343,-533 403.27,-577.41 487.12,-596.24 549.6,-604.2"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="549.48,-607.71 559.83,-605.43 550.32,-600.76 549.48,-607.71"/>
-</g>
-<!-- program~example3_volume&#45;&gt;none~set -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge23" class="edge">
-<title>program~example3_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M279.07,-332.32C299.06,-328.54 321.96,-324.86 343,-323 420.7,-316.14 510.47,-317.87 569.85,-320.36"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="569.7,-323.85 579.84,-320.79 570,-316.86 569.7,-323.85"/>
-</g>
-<!-- proc~elevate_degree -->
-<g id="proc~~get_multiplicity~~CalledByGraph_node11" class="node">
-<title>proc~elevate_degree</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node11"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-276 343.5,-276 343.5,-252 523.5,-252 523.5,-276"/>
-<text text-anchor="middle" x="433.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
-</a>
-</g>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge27" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#ff0000" d="M248.52,-331.99C272.04,-320.29 309.42,-302.48 343,-290 353.67,-286.03 365.24,-282.28 376.41,-278.93"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="377.48,-282.26 386.09,-276.08 375.51,-275.54 377.48,-282.26"/>
-</g>
-<!-- proc~insert_knots -->
-<g id="proc~~get_multiplicity~~CalledByGraph_node12" class="node">
-<title>proc~insert_knots</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node12"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514,-398 353,-398 353,-374 514,-374 514,-398"/>
-<text text-anchor="middle" x="433.5" y="-383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
-</a>
-</g>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge28" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#ff7f00" d="M279.25,-354.98C304.91,-360.18 335.86,-366.44 363.2,-371.97"/>
-<polygon fill="#ff7f00" stroke="#ff7f00" points="362.6,-375.42 373.1,-373.98 363.99,-368.56 362.6,-375.42"/>
-</g>
-<!-- proc~remove_knots -->
-<g id="proc~~get_multiplicity~~CalledByGraph_node15" class="node">
-<title>proc~remove_knots</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node15"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-356 347.5,-356 347.5,-332 519.5,-332 519.5,-356"/>
-<text text-anchor="middle" x="433.5" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
+<title>proc~set3</title>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node8"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="819.5,-276 709.5,-276 709.5,-252 819.5,-252 819.5,-276"/>
+<text text-anchor="middle" x="764.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge29" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#00ff00" d="M279.25,-344C297.02,-344 317.32,-344 337.21,-344"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="337.23,-347.5 347.23,-344 337.23,-340.5 337.23,-347.5"/>
+<!-- proc~set3&#45;&gt;proc~cmp_degree -->
+<g id="proc~~get_multiplicity~~CalledByGraph_edge5" class="edge">
+<title>proc~set3&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#ff0000" d="M798.66,-276.06C806.64,-278.97 815.13,-282.09 823,-285 846.37,-293.65 872.44,-303.42 893.54,-311.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="892.57,-314.73 903.16,-314.98 895.04,-308.18 892.57,-314.73"/>
 </g>
 <!-- none~set&#45;&gt;proc~set1 -->
 <g id="proc~~get_multiplicity~~CalledByGraph_edge10" class="edge">
 <title>none~set&#45;&gt;proc~set1</title>
-<path fill="none" stroke="#00ff66" d="M686.36,-336.04C705.98,-340.87 728.76,-346.48 749.27,-351.53"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="748.59,-354.97 759.13,-353.96 750.26,-348.17 748.59,-354.97"/>
+<path fill="none" stroke="#00ff66" d="M629.72,-297.15C650.99,-305.65 680.17,-317.19 706,-327 710.72,-328.79 715.67,-330.64 720.61,-332.47"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="719.41,-335.76 730,-335.93 721.83,-329.19 719.41,-335.76"/>
 </g>
-<!-- none~set&#45;&gt;proc~set3 -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="proc~~get_multiplicity~~CalledByGraph_edge11" class="edge">
+<title>none~set&#45;&gt;proc~set1a</title>
+<path fill="none" stroke="#0066ff" d="M650.04,-291.47C664.56,-293.33 680.62,-295.39 695.99,-297.35"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="695.59,-300.83 705.96,-298.63 696.48,-293.89 695.59,-300.83"/>
+</g>
+<!-- none~set&#45;&gt;proc~set3 -->
+<g id="proc~~get_multiplicity~~CalledByGraph_edge12" class="edge">
 <title>none~set&#45;&gt;proc~set3</title>
-<path fill="none" stroke="#0066ff" d="M693.33,-324C707.77,-324 723.49,-324 738.54,-324"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="738.82,-327.5 748.82,-324 738.82,-320.5 738.82,-327.5"/>
+<path fill="none" stroke="#cc00ff" d="M650.04,-278.53C665.63,-276.53 683.01,-274.31 699.38,-272.21"/>
+<polygon fill="#cc00ff" stroke="#cc00ff" points="699.95,-275.67 709.42,-270.92 699.06,-268.72 699.95,-275.67"/>
 </g>
-<!-- program~compute_volume -->
+<!-- program~compute_length -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node10" class="node">
-<title>program~compute_volume</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node10"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-603 0,-603 0,-579 105,-579 105,-603"/>
-<text text-anchor="middle" x="52.5" y="-588.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<title>program~compute_length</title>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node10"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-500 0,-500 0,-476 99,-476 99,-500"/>
+<text text-anchor="middle" x="49.5" y="-485.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
+<!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="proc~~get_multiplicity~~CalledByGraph_edge9" class="edge">
-<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#cbff00" d="M105.28,-602.91C122.77,-606.94 142.49,-611.48 160.72,-615.67"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="160.13,-619.13 170.66,-617.96 161.7,-612.3 160.13,-619.13"/>
+<title>program~compute_length&#45;&gt;proc~cmp_length</title>
+<path fill="none" stroke="#cbff00" d="M99.35,-494.16C107.54,-495.2 116.25,-496.3 125.03,-497.4"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="124.6,-500.88 134.96,-498.66 125.48,-493.93 124.6,-500.88"/>
 </g>
-<!-- program~compute_volume&#45;&gt;none~set -->
+<!-- program~compute_length&#45;&gt;none~set -->
 <g id="proc~~get_multiplicity~~CalledByGraph_edge22" class="edge">
-<title>program~compute_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M105.12,-599.03C197.84,-610.56 394.92,-621.63 524,-533 590.26,-487.51 620.33,-389.66 630.86,-345.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="634.3,-346.56 633.12,-336.03 627.48,-344.99 634.3,-346.56"/>
+<title>program~compute_length&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M99.12,-486.77C199.48,-483.46 425.64,-471.79 491,-433 541.08,-403.28 574.18,-339.84 588.84,-306.5"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="592.11,-307.76 592.8,-297.19 585.67,-305.02 592.11,-307.76"/>
+</g>
+<!-- proc~elevate_degree -->
+<g id="proc~~get_multiplicity~~CalledByGraph_node11" class="node">
+<title>proc~elevate_degree</title>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node11"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="491,-402 321,-402 321,-378 491,-378 491,-402"/>
+<text text-anchor="middle" x="406" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+</a>
+</g>
 </g>
 <!-- proc~elevate_degree&#45;&gt;none~set -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge13" class="edge">
+<g id="proc~~get_multiplicity~~CalledByGraph_edge14" class="edge">
 <title>proc~elevate_degree&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M476.42,-276.05C491.44,-280.41 508.49,-285.38 524,-290 544.66,-296.15 567.43,-303.07 586.97,-309.05"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="585.99,-312.41 596.58,-311.99 588.04,-305.72 585.99,-312.41"/>
+<path fill="none" stroke="#ff0000" d="M468.2,-377.95C476.06,-375.47 483.85,-372.51 491,-369 524.96,-352.32 558.25,-323.49 578.32,-304.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="580.86,-306.74 585.59,-297.26 575.98,-301.73 580.86,-306.74"/>
+</g>
+<!-- proc~insert_knots -->
+<g id="proc~~get_multiplicity~~CalledByGraph_node12" class="node">
+<title>proc~insert_knots</title>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node12"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_curve%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-360 330.5,-360 330.5,-336 481.5,-336 481.5,-360"/>
+<text text-anchor="middle" x="406" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
+</a>
+</g>
 </g>
 <!-- proc~insert_knots&#45;&gt;none~set -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge14" class="edge">
+<g id="proc~~get_multiplicity~~CalledByGraph_edge15" class="edge">
 <title>proc~insert_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M490.64,-373.94C501.76,-371.23 513.3,-368.21 524,-365 548.22,-357.74 574.81,-348.03 595.95,-339.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="597.5,-343.03 605.55,-336.14 594.96,-336.51 597.5,-343.03"/>
+<path fill="none" stroke="#ff0000" d="M459.72,-335.94C470.16,-333.24 480.98,-330.21 491,-327 514.42,-319.49 540.09,-309.43 560.35,-301.03"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="561.96,-304.15 569.83,-297.06 559.26,-297.7 561.96,-304.15"/>
 </g>
 <!-- proc~modify_wc -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node13" class="node">
 <title>proc~modify_wc</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node13"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-234 355.5,-234 355.5,-210 511.5,-210 511.5,-234"/>
-<text text-anchor="middle" x="433.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node13"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="479,-276 333,-276 333,-252 479,-252 479,-276"/>
+<text text-anchor="middle" x="406" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~set -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge15" class="edge">
+<g id="proc~~get_multiplicity~~CalledByGraph_edge16" class="edge">
 <title>proc~modify_wc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.57,-234.03C507.97,-236.52 516.31,-239.48 524,-243 558.76,-258.92 593.57,-286.52 614.82,-305.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="612.73,-307.85 622.54,-311.86 617.37,-302.61 612.73,-307.85"/>
+<path fill="none" stroke="#ff0000" d="M479.02,-271.94C498.04,-274.04 518.39,-276.28 536.75,-278.3"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="536.4,-281.79 546.73,-279.4 537.17,-274.83 536.4,-281.79"/>
 </g>
 <!-- proc~modify_xc -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node14" class="node">
 <title>proc~modify_xc</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node14"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="510,-192 357,-192 357,-168 510,-168 510,-192"/>
-<text text-anchor="middle" x="433.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node14"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-234 334.5,-234 334.5,-210 477.5,-210 477.5,-234"/>
+<text text-anchor="middle" x="406" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~set -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge16" class="edge">
+<g id="proc~~get_multiplicity~~CalledByGraph_edge17" class="edge">
 <title>proc~modify_xc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M504.53,-192.02C511.34,-194.48 517.95,-197.44 524,-201 567.73,-226.76 604.06,-275.28 622.47,-303.06"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="619.64,-305.13 628.02,-311.62 625.52,-301.33 619.64,-305.13"/>
+<path fill="none" stroke="#ff0000" d="M459.72,-234.06C470.16,-236.76 480.98,-239.79 491,-243 514.42,-250.51 540.09,-260.57 560.35,-268.97"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="559.26,-272.3 569.83,-272.94 561.96,-265.85 559.26,-272.3"/>
+</g>
+<!-- proc~remove_knots -->
+<g id="proc~~get_multiplicity~~CalledByGraph_node15" class="node">
+<title>proc~remove_knots</title>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node15"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_curve%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="487,-318 325,-318 325,-294 487,-294 487,-318"/>
+<text text-anchor="middle" x="406" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
+</a>
+</g>
 </g>
 <!-- proc~remove_knots&#45;&gt;none~set -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge17" class="edge">
+<g id="proc~~get_multiplicity~~CalledByGraph_edge18" class="edge">
 <title>proc~remove_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M519.74,-335.52C536.42,-333.86 553.67,-332.14 569.6,-330.56"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="570.25,-334.01 579.86,-329.54 569.56,-327.04 570.25,-334.01"/>
+<path fill="none" stroke="#ff0000" d="M487.24,-297.15C503.84,-295.33 521.06,-293.43 536.82,-291.69"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="537.39,-295.15 546.95,-290.57 536.62,-288.19 537.39,-295.15"/>
 </g>
 <!-- proc~set_c -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node16" class="node">
 <title>proc~set_c</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node16"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_volume%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-150 370.5,-150 370.5,-126 496.5,-126 496.5,-150"/>
-<text text-anchor="middle" x="433.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node16"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_curve%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="464,-192 348,-192 348,-168 464,-168 464,-192"/>
+<text text-anchor="middle" x="406" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c&#45;&gt;none~set -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge18" class="edge">
+<g id="proc~~get_multiplicity~~CalledByGraph_edge19" class="edge">
 <title>proc~set_c&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M496.76,-146.23C506.4,-149.26 515.85,-153.38 524,-159 577.11,-195.61 612.03,-266.5 627.07,-302.26"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="623.92,-303.81 630.94,-311.75 630.4,-301.17 623.92,-303.81"/>
+<path fill="none" stroke="#ff0000" d="M464.19,-190.82C473.39,-193.54 482.63,-196.89 491,-201 524.96,-217.68 558.25,-246.51 578.32,-265.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="575.98,-268.27 585.59,-272.74 580.86,-263.26 575.98,-268.27"/>
 </g>
-<!-- proc~set_half_ring -->
+<!-- proc~set_circle -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node17" class="node">
-<title>proc~set_half_ring</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node17"><a xlink:href="../proc/set_half_ring.html" xlink:title="nurbs_volume%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="516,-108 351,-108 351,-84 516,-84 516,-108"/>
-<text text-anchor="middle" x="433.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
+<title>proc~set_circle</title>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node17"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
+<polygon fill="#d9534f" stroke="#d9534f" points="474.5,-150 337.5,-150 337.5,-126 474.5,-126 474.5,-150"/>
+<text text-anchor="middle" x="406" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring&#45;&gt;none~set -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge19" class="edge">
-<title>proc~set_half_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M509.08,-108.13C514.39,-110.58 519.44,-113.51 524,-117 586.9,-165.18 618.52,-259.3 630.13,-302"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="626.8,-303.12 632.71,-311.91 633.58,-301.36 626.8,-303.12"/>
+<!-- proc~set_circle&#45;&gt;none~set -->
+<g id="proc~~get_multiplicity~~CalledByGraph_edge20" class="edge">
+<title>proc~set_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M472.86,-150.16C479.22,-152.59 485.39,-155.5 491,-159 534.03,-185.8 568.47,-235.77 585.63,-264.06"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="582.67,-265.93 590.77,-272.76 588.69,-262.37 582.67,-265.93"/>
 </g>
-<!-- proc~set_hexahedron -->
+<!-- proc~set_half_circle -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node18" class="node">
-<title>proc~set_hexahedron</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node18"><a xlink:href="../proc/set_hexahedron.html" xlink:title="nurbs_volume%set_hexahedron">
-<polygon fill="#d9534f" stroke="#d9534f" points="524,-66 343,-66 343,-42 524,-42 524,-66"/>
-<text text-anchor="middle" x="433.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
+<title>proc~set_half_circle</title>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node18"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
+<polygon fill="#d9534f" stroke="#d9534f" points="487.5,-108 324.5,-108 324.5,-84 487.5,-84 487.5,-108"/>
+<text text-anchor="middle" x="406" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_hexahedron&#45;&gt;none~set -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge20" class="edge">
-<title>proc~set_hexahedron&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M510.24,-66.19C515.16,-68.64 519.82,-71.55 524,-75 596.86,-135.15 623.87,-252.73 632.25,-301.73"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="628.84,-302.56 633.88,-311.87 635.75,-301.45 628.84,-302.56"/>
+<!-- proc~set_half_circle&#45;&gt;none~set -->
+<g id="proc~~get_multiplicity~~CalledByGraph_edge21" class="edge">
+<title>proc~set_half_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M475.08,-108.1C480.72,-110.55 486.13,-113.48 491,-117 543.24,-154.72 575.9,-226.7 589.78,-262.96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="586.59,-264.42 593.34,-272.59 593.15,-262 586.59,-264.42"/>
 </g>
-<!-- proc~set_ring -->
+<!-- program~example1_curve -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node19" class="node">
-<title>proc~set_ring</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node19"><a xlink:href="../proc/set_ring.html" xlink:title="nurbs_volume%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="503,-24 364,-24 364,0 503,0 503,-24"/>
-<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node19"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-381 160,-381 160,-357 260,-357 260,-381"/>
+<text text-anchor="middle" x="210" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring&#45;&gt;none~set -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge21" class="edge">
-<title>proc~set_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.41,-20.72C510.91,-23.75 517.99,-27.75 524,-33 607.12,-105.56 628.57,-247.2 633.86,-301.8"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="630.37,-302.14 634.73,-311.8 637.34,-301.53 630.37,-302.14"/>
+<!-- program~example1_curve&#45;&gt;none~set -->
+<g id="proc~~get_multiplicity~~CalledByGraph_edge23" class="edge">
+<title>program~example1_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M234.77,-381.16C284.7,-404.92 403.16,-451.77 491,-411 537.45,-389.44 570.97,-336.54 586.96,-306.59"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="590.23,-307.88 591.7,-297.39 584.01,-304.67 590.23,-307.88"/>
+</g>
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
+<g id="proc~~get_multiplicity~~CalledByGraph_edge26" class="edge">
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
+<path fill="none" stroke="#ff0000" d="M260.21,-374.33C275.59,-375.99 293.12,-377.89 310.54,-379.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="310.45,-383.29 320.77,-380.88 311.21,-376.33 310.45,-383.29"/>
 </g>
-<!-- program~example_nurbs_volume -->
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
+<g id="proc~~get_multiplicity~~CalledByGraph_edge27" class="edge">
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
+<path fill="none" stroke="#ff8b00" d="M260.21,-363.67C278.44,-361.7 299.67,-359.4 320.17,-357.18"/>
+<polygon fill="#ff8b00" stroke="#ff8b00" points="320.6,-360.66 330.16,-356.1 319.84,-353.7 320.6,-360.66"/>
+</g>
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
+<g id="proc~~get_multiplicity~~CalledByGraph_edge28" class="edge">
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
+<path fill="none" stroke="#00ff2e" d="M239.62,-356.99C261.63,-348.02 292.92,-335.84 321,-327 328.08,-324.77 335.55,-322.62 343,-320.6"/>
+<polygon fill="#00ff2e" stroke="#00ff2e" points="343.97,-323.97 352.75,-318.03 342.19,-317.2 343.97,-323.97"/>
+</g>
+<!-- program~example_nurbs_curve -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node20" class="node">
-<title>program~example_nurbs_volume</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node20"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-524 364,-524 364,-500 503,-500 503,-524"/>
-<text text-anchor="middle" x="433.5" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<title>program~example_nurbs_curve</title>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node20"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 341.5,-66 341.5,-42 470.5,-42 470.5,-66"/>
+<text text-anchor="middle" x="406" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;none~set -->
+<!-- program~example_nurbs_curve&#45;&gt;none~set -->
 <g id="proc~~get_multiplicity~~CalledByGraph_edge24" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.27,-501.58C510.62,-498.83 517.7,-495.37 524,-491 577.45,-453.94 612.22,-382.19 627.14,-346"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="630.52,-346.98 630.98,-336.39 624.02,-344.38 630.52,-346.98"/>
+<title>program~example_nurbs_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M470.8,-63.64C478.07,-66.51 485.01,-70.22 491,-75 553.17,-124.58 582.35,-220.06 592.78,-263.06"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="589.37,-263.85 595.04,-272.8 596.19,-262.27 589.37,-263.85"/>
 </g>
-<!-- program~example_put_to_nurbs -->
+<!-- program~nearest_point_1d -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node21" class="node">
-<title>program~example_put_to_nurbs</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node21"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-482 367.5,-482 367.5,-458 499.5,-458 499.5,-482"/>
-<text text-anchor="middle" x="433.5" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
+<title>program~nearest_point_1d</title>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node21"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="457.5,-24 354.5,-24 354.5,0 457.5,0 457.5,-24"/>
+<text text-anchor="middle" x="406" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;none~set -->
+<!-- program~nearest_point_1d&#45;&gt;none~set -->
 <g id="proc~~get_multiplicity~~CalledByGraph_edge25" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.9,-459.64C508.33,-456.89 516.59,-453.4 524,-449 568.24,-422.69 604.6,-373.01 622.84,-344.85"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="625.93,-346.52 628.31,-336.19 620.01,-342.78 625.93,-346.52"/>
+<title>program~nearest_point_1d&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M457.69,-16.81C469.65,-19.95 481.64,-24.98 491,-33 563.12,-94.74 587.55,-213.69 594.79,-262.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="591.32,-263.36 596.15,-272.79 598.26,-262.41 591.32,-263.36"/>
 </g>
-<!-- program~nearest_point_3d -->
+<!-- program~shape_c_1d -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node22" class="node">
-<title>program~nearest_point_3d</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node22"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-440 382,-440 382,-416 485,-416 485,-440"/>
-<text text-anchor="middle" x="433.5" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
+<title>program~shape_c_1d</title>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node22"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-192 172,-192 172,-168 248,-168 248,-192"/>
+<text text-anchor="middle" x="210" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;none~set -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge26" class="edge">
-<title>program~nearest_point_3d&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M485.42,-419.84C498.36,-416.76 511.99,-412.58 524,-407 559.32,-390.58 594.42,-361.88 615.54,-342.9"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="617.9,-345.49 622.92,-336.15 613.18,-340.32 617.9,-345.49"/>
+<!-- program~shape_c_1d&#45;&gt;proc~set_c -->
+<g id="proc~~get_multiplicity~~CalledByGraph_edge29" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~set_c</title>
+<path fill="none" stroke="#00ffb9" d="M248.41,-180C273.62,-180 307.6,-180 337.47,-180"/>
+<polygon fill="#00ffb9" stroke="#00ffb9" points="337.84,-183.5 347.84,-180 337.84,-176.5 337.84,-183.5"/>
 </g>
-<!-- program~shape_c_3d -->
+<!-- program~shape_circle -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node23" class="node">
-<title>program~shape_c_3d</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node23"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-150 186,-150 186,-126 262,-126 262,-150"/>
-<text text-anchor="middle" x="224" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<title>program~shape_circle</title>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node23"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249.5,-150 170.5,-150 170.5,-126 249.5,-126 249.5,-150"/>
+<text text-anchor="middle" x="210" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~set_c -->
+<!-- program~shape_circle&#45;&gt;proc~set_circle -->
 <g id="proc~~get_multiplicity~~CalledByGraph_edge30" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~set_c</title>
-<path fill="none" stroke="#00ff7f" d="M262.1,-138C289.25,-138 326.96,-138 360,-138"/>
-<polygon fill="#00ff7f" stroke="#00ff7f" points="360.09,-141.5 370.09,-138 360.09,-134.5 360.09,-141.5"/>
+<title>program~shape_circle&#45;&gt;proc~set_circle</title>
+<path fill="none" stroke="#00b9ff" d="M249.79,-138C271.95,-138 300.54,-138 327.13,-138"/>
+<polygon fill="#00b9ff" stroke="#00b9ff" points="327.21,-141.5 337.21,-138 327.21,-134.5 327.21,-141.5"/>
 </g>
-<!-- program~shape_half_ring_3d -->
+<!-- program~shape_half_circle -->
 <g id="proc~~get_multiplicity~~CalledByGraph_node24" class="node">
-<title>program~shape_half_ring_3d</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node24"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-108 166.5,-108 166.5,-84 281.5,-84 281.5,-108"/>
-<text text-anchor="middle" x="224" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<title>program~shape_half_circle</title>
+<g id="a_proc~~get_multiplicity~~CalledByGraph_node24"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-108 158,-108 158,-84 262,-84 262,-108"/>
+<text text-anchor="middle" x="210" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~set_half_ring -->
+<!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
 <g id="proc~~get_multiplicity~~CalledByGraph_edge31" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~set_half_ring</title>
-<path fill="none" stroke="#00ffff" d="M281.7,-96C299.97,-96 320.71,-96 340.84,-96"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="340.97,-99.5 350.97,-96 340.97,-92.5 340.97,-99.5"/>
-</g>
-<!-- program~shape_hexahedron -->
-<g id="proc~~get_multiplicity~~CalledByGraph_node25" class="node">
-<title>program~shape_hexahedron</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node25"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-66 167.5,-66 167.5,-42 280.5,-42 280.5,-66"/>
-<text text-anchor="middle" x="224" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
-</a>
-</g>
-</g>
-<!-- program~shape_hexahedron&#45;&gt;proc~set_hexahedron -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge32" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~set_hexahedron</title>
-<path fill="none" stroke="#007fff" d="M280.61,-54C296.56,-54 314.47,-54 332.24,-54"/>
-<polygon fill="#007fff" stroke="#007fff" points="332.67,-57.5 342.67,-54 332.67,-50.5 332.67,-57.5"/>
-</g>
-<!-- program~shape_ring_3d -->
-<g id="proc~~get_multiplicity~~CalledByGraph_node26" class="node">
-<title>program~shape_ring_3d</title>
-<g id="a_proc~~get_multiplicity~~CalledByGraph_node26"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-24 179,-24 179,0 269,0 269,-24"/>
-<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_ring_3d&#45;&gt;proc~set_ring -->
-<g id="proc~~get_multiplicity~~CalledByGraph_edge33" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~set_ring</title>
-<path fill="none" stroke="#0000ff" d="M269.01,-12C293.59,-12 324.96,-12 353.63,-12"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="353.65,-15.5 363.65,-12 353.65,-8.5 353.65,-15.5"/>
+<title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
+<path fill="none" stroke="#002eff" d="M262.22,-96C278.08,-96 296.06,-96 313.78,-96"/>
+<polygon fill="#002eff" stroke="#002eff" points="314.17,-99.5 324.17,-96 314.17,-92.5 314.17,-99.5"/>
 </g>
 </g>
 </svg>
@@ -910,7 +865,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_multiplicity~2.html b/proc/get_multiplicity~2.html
index 137994aa1..40a81cdca 100644
--- a/proc/get_multiplicity~2.html
+++ b/proc/get_multiplicity~2.html
@@ -78,20 +78,20 @@ <h1>get_multiplicity
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.3% of total for procedures.">20 statements</a>
+                 title=" 0.4% of total for procedures.">26 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_multiplicity</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_multiplicity(this, dir) result(m)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~97"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~90"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~24"></span>
+              <span class="anchor" id="variable-dir~12"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -191,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-m~4"></span>
+          <span class="anchor" id="variable-m~5"></span>
           integer, allocatable, (:)
         </small>
       </h3>
@@ -217,7 +217,7 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~get_multiplicity~2~~CallsGraph_node1" class="node">
 <title>proc~get_multiplicity~2</title>
 <polygon fill="none" stroke="black" points="178,-45 0,-45 0,-21 178,-21 178,-45"/>
-<text text-anchor="middle" x="89" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_multiplicity</text>
+<text text-anchor="middle" x="89" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_multiplicity</text>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~get_multiplicity~2~~CallsGraph_node2" class="node">
@@ -358,496 +358,439 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_multiplicity~2~~CalledByGraph Pages: 1 -->
-<svg id="procget_multiplicity2CalledByGraph" width="641pt" height="341pt"
- viewBox="0.00 0.00 641.00 340.96" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~get_multiplicity~2~~CalledByGraph" class="graph" transform="scale(1.96 1.96) rotate(0) translate(4 664.63)">
+<svg id="procget_multiplicity2CalledByGraph" width="641pt" height="331pt"
+ viewBox="0.00 0.00 641.00 331.03" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~get_multiplicity~2~~CalledByGraph" class="graph" transform="scale(2.01 2.01) rotate(0) translate(4 662.2)">
 <title>proc~~get_multiplicity~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-664.63 1253,-664.63 1253,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-662.2 1286,-662.2 1286,4 -4,4"/>
 <!-- proc~get_multiplicity~2 -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_node1" class="node">
 <title>proc~get_multiplicity~2</title>
-<polygon fill="none" stroke="black" points="1249,-545 1071,-545 1071,-521 1249,-521 1249,-545"/>
-<text text-anchor="middle" x="1160" y="-530.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_multiplicity</text>
+<polygon fill="none" stroke="black" points="1282,-500 1104,-500 1104,-476 1282,-476 1282,-500"/>
+<text text-anchor="middle" x="1193" y="-485.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_multiplicity</text>
 </g>
 <!-- proc~cmp_degree~2 -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_node2" class="node">
 <title>proc~cmp_degree~2</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node2"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="1035,-444 872,-444 872,-420 1035,-420 1035,-444"/>
-<text text-anchor="middle" x="953.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node2"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="1068,-378 905,-378 905,-354 1068,-354 1068,-378"/>
+<text text-anchor="middle" x="986.5" y="-363.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_edge1" class="edge">
 <title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
-<path fill="none" stroke="#ff0000" d="M979.17,-444.18C1015.73,-462.24 1084.4,-496.16 1125.49,-516.45"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1124.05,-519.64 1134.56,-520.93 1127.15,-513.36 1124.05,-519.64"/>
+<path fill="none" stroke="#ff0000" d="M1007.86,-378.14C1044.37,-399.93 1121.11,-445.71 1163.08,-470.75"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1161.35,-473.79 1171.73,-475.91 1164.93,-467.78 1161.35,-473.79"/>
 </g>
 <!-- proc~cmp_elem~2 -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_node3" class="node">
 <title>proc~cmp_elem~2</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_surface%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="680,-646 527,-646 527,-622 680,-622 680,-646"/>
-<text text-anchor="middle" x="603.5" y="-631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_volume%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="713,-622 560,-622 560,-598 713,-598 713,-622"/>
+<text text-anchor="middle" x="636.5" y="-607.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_edge2" class="edge">
 <title>proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2</title>
-<path fill="none" stroke="#ff0000" d="M670.56,-621.97C774.01,-603.12 973.7,-566.75 1082.98,-546.85"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1083.73,-550.27 1092.94,-545.03 1082.48,-543.38 1083.73,-550.27"/>
+<path fill="none" stroke="#ff0000" d="M692.19,-597.97C795.12,-575.32 1017.19,-526.46 1127.33,-502.23"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1128.3,-505.6 1137.32,-500.03 1126.8,-498.76 1128.3,-505.6"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_node4" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="467,-646 335,-646 335,-622 467,-622 467,-646"/>
-<text text-anchor="middle" x="401" y="-631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-642 367.5,-642 367.5,-618 499.5,-618 499.5,-642"/>
+<text text-anchor="middle" x="433.5" y="-627.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;proc~cmp_elem~2 -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_edge5" class="edge">
 <title>proc~ansatz~2&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#00ffff" d="M467.1,-634C482.91,-634 500.06,-634 516.67,-634"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="516.93,-637.5 526.93,-634 516.93,-630.5 516.93,-637.5"/>
+<path fill="none" stroke="#00ffff" d="M499.76,-623.51C515.61,-621.93 532.8,-620.22 549.46,-618.56"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="550.13,-622.01 559.74,-617.54 549.44,-615.05 550.13,-622.01"/>
 </g>
 <!-- none~set~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_node8" class="node">
+<g id="proc~~get_multiplicity~2~~CalledByGraph_node9" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node8"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="660,-402 547,-402 547,-378 660,-378 660,-402"/>
-<text text-anchor="middle" x="603.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node9"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="693,-336 580,-336 580,-312 693,-312 693,-336"/>
+<text text-anchor="middle" x="636.5" y="-321.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~set~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge11" class="edge">
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge12" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M466.91,-621.89C475.6,-618.38 483.93,-613.85 491,-608 555.02,-555.04 586.27,-455.89 597.48,-411.94"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="600.93,-412.56 599.9,-402.02 594.13,-410.9 600.93,-412.56"/>
+<path fill="none" stroke="#ff0000" d="M457.65,-617.97C477.41,-606.74 505.5,-588.38 524,-566 581.87,-496.01 616.55,-391.05 629.58,-345.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="633.02,-346.6 632.36,-336.03 626.29,-344.7 633.02,-346.6"/>
 </g>
-<!-- proc~cmp_area -->
+<!-- proc~cmp_volume -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_node5" class="node">
-<title>proc~cmp_area</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node5"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="275,-646 125,-646 125,-622 275,-622 275,-646"/>
-<text text-anchor="middle" x="200" y="-631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<title>proc~cmp_volume</title>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node5"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-642 141,-642 141,-618 307,-618 307,-642"/>
+<text text-anchor="middle" x="224" y="-627.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~2 -->
+<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem~2 -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_edge6" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#00ffff" d="M253.03,-646.02C271.26,-649.67 291.93,-653.2 311,-655 390.64,-662.53 411.35,-662.44 491,-655 506.85,-653.52 523.8,-650.88 539.58,-647.97"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="540.59,-651.34 549.76,-646.02 539.28,-644.46 540.59,-651.34"/>
+<title>proc~cmp_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#00ffff" d="M280.82,-642.03C341.2,-653.17 440.11,-665.94 524,-651 550.77,-646.23 579.53,-635.51 601.14,-626.22"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="602.79,-629.32 610.53,-622.08 599.97,-622.91 602.79,-629.32"/>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge7" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ff0000" d="M275.1,-634C291.15,-634 308.13,-634 324.24,-634"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="324.68,-637.5 334.68,-634 324.68,-630.5 324.68,-637.5"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge8" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ff0000" d="M307.01,-630C323.61,-630 341,-630 357.35,-630"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="357.38,-633.5 367.38,-630 357.38,-626.5 357.38,-633.5"/>
 </g>
 <!-- proc~set1~2 -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_node6" class="node">
 <title>proc~set1~2</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node6"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="836,-402 716,-402 716,-378 836,-378 836,-402"/>
-<text text-anchor="middle" x="776" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node6"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="869,-378 749,-378 749,-354 869,-354 869,-378"/>
+<text text-anchor="middle" x="809" y="-363.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
 <!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_edge3" class="edge">
 <title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#ff0000" d="M827.29,-402.04C847.58,-406.89 871.15,-412.53 892.34,-417.6"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="891.66,-421.04 902.2,-419.96 893.29,-414.23 891.66,-421.04"/>
+<path fill="none" stroke="#ff0000" d="M869.42,-366C877.64,-366 886.23,-366 894.86,-366"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="894.98,-369.5 904.98,-366 894.98,-362.5 894.98,-369.5"/>
 </g>
 <!-- proc~set3~2 -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_node7" class="node">
 <title>proc~set3~2</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node7"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="836,-444 716,-444 716,-420 836,-420 836,-444"/>
-<text text-anchor="middle" x="776" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node7"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="869,-336 749,-336 749,-312 869,-312 869,-336"/>
+<text text-anchor="middle" x="809" y="-321.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
 <!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_edge4" class="edge">
 <title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#ff0000" d="M836.42,-432C844.64,-432 853.23,-432 861.86,-432"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="861.98,-435.5 871.98,-432 861.98,-428.5 861.98,-435.5"/>
+<path fill="none" stroke="#ff0000" d="M860.29,-336.04C880.58,-340.89 904.15,-346.53 925.34,-351.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="924.66,-355.04 935.2,-353.96 926.29,-348.23 924.66,-355.04"/>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge9" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
-<path fill="none" stroke="#00ffff" d="M660.33,-390C674.77,-390 690.49,-390 705.54,-390"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="705.82,-393.5 715.82,-390 705.82,-386.5 705.82,-393.5"/>
-</g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge10" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
-<path fill="none" stroke="#7f00ff" d="M653.36,-402.04C672.98,-406.87 695.76,-412.48 716.27,-417.53"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="715.59,-420.97 726.13,-419.96 717.26,-414.17 715.59,-420.97"/>
-</g>
-<!-- program~compute_area -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_node9" class="node">
-<title>program~compute_area</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node9"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-626 0,-626 0,-602 89,-602 89,-626"/>
-<text text-anchor="middle" x="44.5" y="-611.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<!-- program~example3_volume -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_node8" class="node">
+<title>program~example3_volume</title>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node8"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-356 169,-356 169,-332 279,-332 279,-356"/>
+<text text-anchor="middle" x="224" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;proc~cmp_area -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge8" class="edge">
-<title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#7fff00" d="M89.08,-619.68C97.19,-620.73 105.92,-621.87 114.78,-623.03"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="114.45,-626.51 124.81,-624.33 115.35,-619.57 114.45,-626.51"/>
+<!-- program~example3_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge7" class="edge">
+<title>program~example3_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#00ffff" d="M229.06,-356.41C240.81,-390.33 278.23,-485.27 343,-533 403.27,-577.41 487.12,-596.24 549.6,-604.2"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="549.48,-607.71 559.83,-605.43 550.32,-600.76 549.48,-607.71"/>
 </g>
-<!-- program~compute_area&#45;&gt;none~set~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge21" class="edge">
-<title>program~compute_area&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M89.02,-612.42C194.46,-608.28 457.41,-595.96 491,-575 552.04,-536.91 584.21,-452.01 596.5,-411.85"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="599.87,-412.8 599.33,-402.22 593.15,-410.83 599.87,-412.8"/>
+<!-- program~example3_volume&#45;&gt;none~set~2 -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge23" class="edge">
+<title>program~example3_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M279.07,-332.32C299.06,-328.54 321.96,-324.86 343,-323 420.7,-316.14 510.47,-317.87 569.85,-320.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="569.7,-323.85 579.84,-320.79 570,-316.86 569.7,-323.85"/>
 </g>
 <!-- proc~elevate_degree~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_node10" class="node">
+<g id="proc~~get_multiplicity~2~~CalledByGraph_node11" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node10"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="491,-360 311,-360 311,-336 491,-336 491,-360"/>
-<text text-anchor="middle" x="401" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node11"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-276 343.5,-276 343.5,-252 523.5,-252 523.5,-276"/>
+<text text-anchor="middle" x="433.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~elevate_degree~2&#45;&gt;none~set~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge12" class="edge">
-<title>proc~elevate_degree~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M459.46,-360.04C483.56,-365.08 511.73,-370.99 536.66,-376.21"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="536.26,-379.7 546.77,-378.32 537.7,-372.85 536.26,-379.7"/>
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge27" class="edge">
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
+<path fill="none" stroke="#ff0000" d="M248.52,-331.99C272.04,-320.29 309.42,-302.48 343,-290 353.67,-286.03 365.24,-282.28 376.41,-278.93"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="377.48,-282.26 386.09,-276.08 375.51,-275.54 377.48,-282.26"/>
 </g>
 <!-- proc~insert_knots~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_node11" class="node">
+<g id="proc~~get_multiplicity~2~~CalledByGraph_node12" class="node">
 <title>proc~insert_knots~2</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node11"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-318 320.5,-318 320.5,-294 481.5,-294 481.5,-318"/>
-<text text-anchor="middle" x="401" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node12"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514,-398 353,-398 353,-374 514,-374 514,-398"/>
+<text text-anchor="middle" x="433.5" y="-383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
-<!-- proc~insert_knots~2&#45;&gt;none~set~2 -->
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge28" class="edge">
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
+<path fill="none" stroke="#ff7f00" d="M279.25,-354.98C304.91,-360.18 335.86,-366.44 363.2,-371.97"/>
+<polygon fill="#ff7f00" stroke="#ff7f00" points="362.6,-375.42 373.1,-373.98 363.99,-368.56 362.6,-375.42"/>
+</g>
+<!-- proc~remove_knots~2 -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_node15" class="node">
+<title>proc~remove_knots~2</title>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node15"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-356 347.5,-356 347.5,-332 519.5,-332 519.5,-356"/>
+<text text-anchor="middle" x="433.5" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
+</a>
+</g>
+</g>
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge29" class="edge">
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
+<path fill="none" stroke="#00ff00" d="M279.25,-344C297.02,-344 317.32,-344 337.21,-344"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="337.23,-347.5 347.23,-344 337.23,-340.5 337.23,-347.5"/>
+</g>
+<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge10" class="edge">
+<title>none~set~2&#45;&gt;proc~set1~2</title>
+<path fill="none" stroke="#00ff66" d="M686.36,-336.04C705.98,-340.87 728.76,-346.48 749.27,-351.53"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="748.59,-354.97 759.13,-353.96 750.26,-348.17 748.59,-354.97"/>
+</g>
+<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge11" class="edge">
+<title>none~set~2&#45;&gt;proc~set3~2</title>
+<path fill="none" stroke="#0066ff" d="M693.33,-324C707.77,-324 723.49,-324 738.54,-324"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="738.82,-327.5 748.82,-324 738.82,-320.5 738.82,-327.5"/>
+</g>
+<!-- program~compute_volume -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_node10" class="node">
+<title>program~compute_volume</title>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node10"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-603 0,-603 0,-579 105,-579 105,-603"/>
+<text text-anchor="middle" x="52.5" y="-588.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+</a>
+</g>
+</g>
+<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge9" class="edge">
+<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
+<path fill="none" stroke="#cbff00" d="M105.28,-602.91C122.77,-606.94 142.49,-611.48 160.72,-615.67"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="160.13,-619.13 170.66,-617.96 161.7,-612.3 160.13,-619.13"/>
+</g>
+<!-- program~compute_volume&#45;&gt;none~set~2 -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge22" class="edge">
+<title>program~compute_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M105.12,-599.03C197.84,-610.56 394.92,-621.63 524,-533 590.26,-487.51 620.33,-389.66 630.86,-345.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="634.3,-346.56 633.12,-336.03 627.48,-344.99 634.3,-346.56"/>
+</g>
+<!-- proc~elevate_degree~2&#45;&gt;none~set~2 -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_edge13" class="edge">
+<title>proc~elevate_degree~2&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M476.42,-276.05C491.44,-280.41 508.49,-285.38 524,-290 544.66,-296.15 567.43,-303.07 586.97,-309.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="585.99,-312.41 596.58,-311.99 588.04,-305.72 585.99,-312.41"/>
+</g>
+<!-- proc~insert_knots~2&#45;&gt;none~set~2 -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge14" class="edge">
 <title>proc~insert_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M463.5,-318.1C472.85,-320.63 482.28,-323.59 491,-327 521.75,-339.04 554.36,-358.31 576.31,-372.38"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="574.45,-375.35 584.74,-377.86 578.27,-369.48 574.45,-375.35"/>
+<path fill="none" stroke="#ff0000" d="M490.64,-373.94C501.76,-371.23 513.3,-368.21 524,-365 548.22,-357.74 574.81,-348.03 595.95,-339.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="597.5,-343.03 605.55,-336.14 594.96,-336.51 597.5,-343.03"/>
 </g>
 <!-- proc~modify_wc~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_node12" class="node">
+<g id="proc~~get_multiplicity~2~~CalledByGraph_node13" class="node">
 <title>proc~modify_wc~2</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node12"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="479,-276 323,-276 323,-252 479,-252 479,-276"/>
-<text text-anchor="middle" x="401" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node13"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-234 355.5,-234 355.5,-210 511.5,-210 511.5,-234"/>
+<text text-anchor="middle" x="433.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~set~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge14" class="edge">
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge15" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M469.96,-276.07C477.27,-278.52 484.43,-281.47 491,-285 530.83,-306.43 566.96,-345.74 586.72,-369.71"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="584.23,-372.2 593.24,-377.78 589.68,-367.8 584.23,-372.2"/>
+<path fill="none" stroke="#ff0000" d="M499.57,-234.03C507.97,-236.52 516.31,-239.48 524,-243 558.76,-258.92 593.57,-286.52 614.82,-305.02"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="612.73,-307.85 622.54,-311.86 617.37,-302.61 612.73,-307.85"/>
 </g>
 <!-- proc~modify_xc~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_node13" class="node">
+<g id="proc~~get_multiplicity~2~~CalledByGraph_node14" class="node">
 <title>proc~modify_xc~2</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node13"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-234 324.5,-234 324.5,-210 477.5,-210 477.5,-234"/>
-<text text-anchor="middle" x="401" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node14"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="510,-192 357,-192 357,-168 510,-168 510,-192"/>
+<text text-anchor="middle" x="433.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~set~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge15" class="edge">
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge16" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M473.34,-234.05C479.55,-236.5 485.54,-239.45 491,-243 540.15,-274.98 576.02,-336.39 592.47,-368.79"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="589.38,-370.43 596.95,-377.85 595.66,-367.33 589.38,-370.43"/>
-</g>
-<!-- proc~remove_knots~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_node14" class="node">
-<title>proc~remove_knots~2</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node14"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="487,-524 315,-524 315,-500 487,-500 487,-524"/>
-<text text-anchor="middle" x="401" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
-</a>
-</g>
+<path fill="none" stroke="#ff0000" d="M504.53,-192.02C511.34,-194.48 517.95,-197.44 524,-201 567.73,-226.76 604.06,-275.28 622.47,-303.06"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="619.64,-305.13 628.02,-311.62 625.52,-301.33 619.64,-305.13"/>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;none~set~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge16" class="edge">
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge17" class="edge">
 <title>proc~remove_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M457.12,-499.88C468.68,-496.26 480.53,-491.69 491,-486 528.38,-465.7 564.32,-431.18 584.87,-409.54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="587.45,-411.89 591.71,-402.19 582.33,-407.12 587.45,-411.89"/>
+<path fill="none" stroke="#ff0000" d="M519.74,-335.52C536.42,-333.86 553.67,-332.14 569.6,-330.56"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="570.25,-334.01 579.86,-329.54 569.56,-327.04 570.25,-334.01"/>
 </g>
 <!-- proc~set_c~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_node15" class="node">
+<g id="proc~~get_multiplicity~2~~CalledByGraph_node16" class="node">
 <title>proc~set_c~2</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node15"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_surface%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="464,-566 338,-566 338,-542 464,-542 464,-566"/>
-<text text-anchor="middle" x="401" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node16"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_volume%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-150 370.5,-150 370.5,-126 496.5,-126 496.5,-150"/>
+<text text-anchor="middle" x="433.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c~2&#45;&gt;none~set~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge17" class="edge">
-<title>proc~set_c~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M464.06,-545.11C473.53,-542.16 482.85,-538.23 491,-533 539.07,-502.18 574.99,-443.25 591.85,-411.52"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="595.17,-412.73 596.65,-402.24 588.95,-409.51 595.17,-412.73"/>
-</g>
-<!-- proc~set_half_ring~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_node16" class="node">
-<title>proc~set_half_ring~2</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node16"><a xlink:href="../proc/set_half_ring~2.html" xlink:title="nurbs_surface%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="483.5,-150 318.5,-150 318.5,-126 483.5,-126 483.5,-150"/>
-<text text-anchor="middle" x="401" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
-</a>
-</g>
-</g>
-<!-- proc~set_half_ring~2&#45;&gt;none~set~2 -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_edge18" class="edge">
-<title>proc~set_half_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M476.78,-150.15C481.86,-152.6 486.67,-155.52 491,-159 559.64,-214.1 588.75,-321.82 598.46,-368.06"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="595.04,-368.81 600.43,-377.94 601.91,-367.44 595.04,-368.81"/>
+<title>proc~set_c~2&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M496.76,-146.23C506.4,-149.26 515.85,-153.38 524,-159 577.11,-195.61 612.03,-266.5 627.07,-302.26"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="623.92,-303.81 630.94,-311.75 630.4,-301.17 623.92,-303.81"/>
 </g>
-<!-- proc~set_ring~2 -->
+<!-- proc~set_half_ring -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_node17" class="node">
-<title>proc~set_ring~2</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node17"><a xlink:href="../proc/set_ring~2.html" xlink:title="nurbs_surface%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="470.5,-108 331.5,-108 331.5,-84 470.5,-84 470.5,-108"/>
-<text text-anchor="middle" x="401" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
+<title>proc~set_half_ring</title>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node17"><a xlink:href="../proc/set_half_ring.html" xlink:title="nurbs_volume%set_half_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="516,-108 351,-108 351,-84 516,-84 516,-108"/>
+<text text-anchor="middle" x="433.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_half_ring&#45;&gt;none~set~2 -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_edge19" class="edge">
-<title>proc~set_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M470.87,-105.07C478.18,-108.06 485.09,-111.94 491,-117 569.67,-184.26 593.62,-315.54 600.22,-367.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="596.77,-368.42 601.4,-377.95 603.72,-367.61 596.77,-368.42"/>
+<title>proc~set_half_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M509.08,-108.13C514.39,-110.58 519.44,-113.51 524,-117 586.9,-165.18 618.52,-259.3 630.13,-302"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="626.8,-303.12 632.71,-311.91 633.58,-301.36 626.8,-303.12"/>
 </g>
-<!-- proc~set_tetragon -->
+<!-- proc~set_hexahedron -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_node18" class="node">
-<title>proc~set_tetragon</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node18"><a xlink:href="../proc/set_tetragon.html" xlink:title="nurbs_surface%set_tetragon">
-<polygon fill="#d9534f" stroke="#d9534f" points="483,-192 319,-192 319,-168 483,-168 483,-192"/>
-<text text-anchor="middle" x="401" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
+<title>proc~set_hexahedron</title>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node18"><a xlink:href="../proc/set_hexahedron.html" xlink:title="nurbs_volume%set_hexahedron">
+<polygon fill="#d9534f" stroke="#d9534f" points="524,-66 343,-66 343,-42 524,-42 524,-66"/>
+<text text-anchor="middle" x="433.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
+<!-- proc~set_hexahedron&#45;&gt;none~set~2 -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_edge20" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M475.58,-192.16C481.05,-194.6 486.27,-197.52 491,-201 549.57,-244.13 582.8,-328.06 595.9,-367.94"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="592.58,-369.04 598.94,-377.51 599.25,-366.92 592.58,-369.04"/>
+<title>proc~set_hexahedron&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M510.24,-66.19C515.16,-68.64 519.82,-71.55 524,-75 596.86,-135.15 623.87,-252.73 632.25,-301.73"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="628.84,-302.56 633.88,-311.87 635.75,-301.45 628.84,-302.56"/>
 </g>
-<!-- program~example3_surface -->
+<!-- proc~set_ring -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_node19" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node19"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="255,-422 145,-422 145,-398 255,-398 255,-422"/>
-<text text-anchor="middle" x="200" y="-407.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<title>proc~set_ring</title>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node19"><a xlink:href="../proc/set_ring.html" xlink:title="nurbs_volume%set_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="503,-24 364,-24 364,0 503,0 503,-24"/>
+<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;none~set~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge22" class="edge">
-<title>program~example3_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M224.27,-422.05C246.03,-432.59 279.77,-447.11 311,-453 389.62,-467.82 413.63,-473.35 491,-453 523.88,-444.35 557.27,-423.55 578.82,-408.21"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="581.01,-410.94 587.03,-402.22 576.88,-405.29 581.01,-410.94"/>
-</g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge25" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
-<path fill="none" stroke="#ff0000" d="M230.54,-397.84C252.49,-389.09 283.3,-377.39 311,-369 318.48,-366.73 326.37,-364.56 334.24,-362.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="335.32,-365.87 344.17,-360.04 333.62,-359.08 335.32,-365.87"/>
-</g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge26" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
-<path fill="none" stroke="#ff7f00" d="M213.38,-397.84C232.62,-379.65 271.59,-345.51 311,-327 315.55,-324.86 320.34,-322.93 325.24,-321.19"/>
-<polygon fill="#ff7f00" stroke="#ff7f00" points="326.35,-324.51 334.76,-318.07 324.17,-317.86 326.35,-324.51"/>
-</g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge28" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
-<path fill="none" stroke="#00ff00" d="M215.36,-422.2C235.52,-438.77 273.91,-468.34 311,-486 319.63,-490.11 329.04,-493.71 338.41,-496.82"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="337.54,-500.21 348.13,-499.88 339.64,-493.54 337.54,-500.21"/>
+<!-- proc~set_ring&#45;&gt;none~set~2 -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge21" class="edge">
+<title>proc~set_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M503.41,-20.72C510.91,-23.75 517.99,-27.75 524,-33 607.12,-105.56 628.57,-247.2 633.86,-301.8"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="630.37,-302.14 634.73,-311.8 637.34,-301.53 630.37,-302.14"/>
 </g>
-<!-- program~example_nurbs_surface -->
+<!-- program~example_nurbs_volume -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_node20" class="node">
-<title>program~example_nurbs_surface</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node20"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-444 331.5,-444 331.5,-420 470.5,-420 470.5,-444"/>
-<text text-anchor="middle" x="401" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<title>program~example_nurbs_volume</title>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node20"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-524 364,-524 364,-500 503,-500 503,-524"/>
+<text text-anchor="middle" x="433.5" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;none~set~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge23" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M459.46,-419.96C483.56,-414.92 511.73,-409.01 536.66,-403.79"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="537.7,-407.15 546.77,-401.68 536.26,-400.3 537.7,-407.15"/>
+<!-- program~example_nurbs_volume&#45;&gt;none~set~2 -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge24" class="edge">
+<title>program~example_nurbs_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M503.27,-501.58C510.62,-498.83 517.7,-495.37 524,-491 577.45,-453.94 612.22,-382.19 627.14,-346"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="630.52,-346.98 630.98,-336.39 624.02,-344.38 630.52,-346.98"/>
 </g>
-<!-- program~nearest_point_2d -->
+<!-- program~example_put_to_nurbs -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_node21" class="node">
-<title>program~nearest_point_2d</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node21"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452.5,-402 349.5,-402 349.5,-378 452.5,-378 452.5,-402"/>
-<text text-anchor="middle" x="401" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<title>program~example_put_to_nurbs</title>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node21"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-482 367.5,-482 367.5,-458 499.5,-458 499.5,-482"/>
+<text text-anchor="middle" x="433.5" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;none~set~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge24" class="edge">
-<title>program~nearest_point_2d&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M452.59,-390C478.11,-390 509.36,-390 536.71,-390"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="536.98,-393.5 546.98,-390 536.98,-386.5 536.98,-393.5"/>
+<!-- program~example_put_to_nurbs&#45;&gt;none~set~2 -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge25" class="edge">
+<title>program~example_put_to_nurbs&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M499.9,-459.64C508.33,-456.89 516.59,-453.4 524,-449 568.24,-422.69 604.6,-373.01 622.84,-344.85"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="625.93,-346.52 628.31,-336.19 620.01,-342.78 625.93,-346.52"/>
 </g>
-<!-- program~example_ppm1 -->
+<!-- program~nearest_point_3d -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_node22" class="node">
-<title>program~example_ppm1</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node22"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-108 153,-108 153,-84 247,-84 247,-108"/>
-<text text-anchor="middle" x="200" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+<title>program~nearest_point_3d</title>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node22"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-440 382,-440 382,-416 485,-416 485,-440"/>
+<text text-anchor="middle" x="433.5" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~set_ring~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge32" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#007fff" d="M247.15,-96C269.15,-96 296.09,-96 321.19,-96"/>
-<polygon fill="#007fff" stroke="#007fff" points="321.45,-99.5 331.45,-96 321.45,-92.5 321.45,-99.5"/>
-</g>
-<!-- program~example_ppm1&#45;&gt;proc~set_tetragon -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge34" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0000ff" d="M247.02,-104.55C256.72,-107.56 266.56,-111.6 275,-117 295.71,-130.25 290,-146.21 311,-159 314.01,-160.83 317.16,-162.5 320.41,-164.03"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="319.22,-167.32 329.8,-167.95 321.92,-160.87 319.22,-167.32"/>
+<!-- program~nearest_point_3d&#45;&gt;none~set~2 -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge26" class="edge">
+<title>program~nearest_point_3d&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M485.42,-419.84C498.36,-416.76 511.99,-412.58 524,-407 559.32,-390.58 594.42,-361.88 615.54,-342.9"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="617.9,-345.49 622.92,-336.15 613.18,-340.32 617.9,-345.49"/>
 </g>
-<!-- program~example_ppm2 -->
+<!-- program~shape_c_3d -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_node23" class="node">
-<title>program~example_ppm2</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node23"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-150 153,-150 153,-126 247,-126 247,-150"/>
-<text text-anchor="middle" x="200" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+<title>program~shape_c_3d</title>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node23"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-150 186,-150 186,-126 262,-126 262,-150"/>
+<text text-anchor="middle" x="224" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~set_half_ring~2 -->
+<!-- program~shape_c_3d&#45;&gt;proc~set_c~2 -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_edge30" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#00ffff" d="M247.15,-138C265.39,-138 287.03,-138 308.19,-138"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="308.2,-141.5 318.2,-138 308.2,-134.5 308.2,-141.5"/>
-</g>
-<!-- program~example_ppm2&#45;&gt;proc~set_tetragon -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge35" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0000ff" d="M247.15,-147.74C272.73,-153.14 304.98,-159.95 333.26,-165.91"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="332.57,-169.34 343.07,-167.99 334.01,-162.5 332.57,-169.34"/>
+<title>program~shape_c_3d&#45;&gt;proc~set_c~2</title>
+<path fill="none" stroke="#00ff7f" d="M262.1,-138C289.25,-138 326.96,-138 360,-138"/>
+<polygon fill="#00ff7f" stroke="#00ff7f" points="360.09,-141.5 370.09,-138 360.09,-134.5 360.09,-141.5"/>
 </g>
-<!-- program~example_ppm3 -->
+<!-- program~shape_half_ring_3d -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_node24" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node24"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-276 153,-276 153,-252 247,-252 247,-276"/>
-<text text-anchor="middle" x="200" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+<title>program~shape_half_ring_3d</title>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node24"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-108 166.5,-108 166.5,-84 281.5,-84 281.5,-108"/>
+<text text-anchor="middle" x="224" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge27" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#7fff00" d="M247.15,-254.26C272.73,-248.86 304.98,-242.05 333.26,-236.09"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="334.01,-239.5 343.07,-234.01 332.57,-232.66 334.01,-239.5"/>
-</g>
-<!-- program~example_ppm3&#45;&gt;proc~set_tetragon -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge36" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0000ff" d="M247.02,-255.45C256.72,-252.44 266.56,-248.4 275,-243 295.71,-229.75 290,-213.79 311,-201 314.01,-199.17 317.16,-197.5 320.41,-195.97"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="321.92,-199.13 329.8,-192.05 319.22,-192.68 321.92,-199.13"/>
+<!-- program~shape_half_ring_3d&#45;&gt;proc~set_half_ring -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge31" class="edge">
+<title>program~shape_half_ring_3d&#45;&gt;proc~set_half_ring</title>
+<path fill="none" stroke="#00ffff" d="M281.7,-96C299.97,-96 320.71,-96 340.84,-96"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="340.97,-99.5 350.97,-96 340.97,-92.5 340.97,-99.5"/>
 </g>
-<!-- program~nearest_point_2d_bench -->
+<!-- program~shape_hexahedron -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_node25" class="node">
-<title>program~nearest_point_2d_bench</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node25"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-192 129,-192 129,-168 271,-168 271,-192"/>
-<text text-anchor="middle" x="200" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+<title>program~shape_hexahedron</title>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node25"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-66 167.5,-66 167.5,-42 280.5,-42 280.5,-66"/>
+<text text-anchor="middle" x="224" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge37" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0000ff" d="M271.16,-180C283.34,-180 296.17,-180 308.82,-180"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="308.91,-183.5 318.91,-180 308.91,-176.5 308.91,-183.5"/>
+<!-- program~shape_hexahedron&#45;&gt;proc~set_hexahedron -->
+<g id="proc~~get_multiplicity~2~~CalledByGraph_edge32" class="edge">
+<title>program~shape_hexahedron&#45;&gt;proc~set_hexahedron</title>
+<path fill="none" stroke="#007fff" d="M280.61,-54C296.56,-54 314.47,-54 332.24,-54"/>
+<polygon fill="#007fff" stroke="#007fff" points="332.67,-57.5 342.67,-54 332.67,-50.5 332.67,-57.5"/>
 </g>
-<!-- program~shape_c_2d -->
+<!-- program~shape_ring_3d -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_node26" class="node">
-<title>program~shape_c_2d</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node26"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="238,-566 162,-566 162,-542 238,-542 238,-566"/>
-<text text-anchor="middle" x="200" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_c_2d&#45;&gt;proc~set_c~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge29" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~set_c~2</title>
-<path fill="none" stroke="#00ff7f" d="M238.43,-554C263.52,-554 297.37,-554 327.6,-554"/>
-<polygon fill="#00ff7f" stroke="#00ff7f" points="327.7,-557.5 337.7,-554 327.7,-550.5 327.7,-557.5"/>
-</g>
-<!-- program~shape_half_ring_2d -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_node27" class="node">
-<title>program~shape_half_ring_2d</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node27"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="257.5,-66 142.5,-66 142.5,-42 257.5,-42 257.5,-66"/>
-<text text-anchor="middle" x="200" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+<title>program~shape_ring_3d</title>
+<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node26"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-24 179,-24 179,0 269,0 269,-24"/>
+<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2 -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge31" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#00ffff" d="M257.09,-66.07C263.38,-68.53 269.49,-71.47 275,-75 295.71,-88.25 290,-104.21 311,-117 314.01,-118.83 317.16,-120.5 320.41,-122.03"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="319.22,-125.32 329.8,-125.95 321.92,-118.87 319.22,-125.32"/>
-</g>
-<!-- program~shape_ring_2d -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_node28" class="node">
-<title>program~shape_ring_2d</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node28"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="245,-24 155,-24 155,0 245,0 245,-24"/>
-<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_ring_2d&#45;&gt;proc~set_ring~2 -->
+<!-- program~shape_ring_3d&#45;&gt;proc~set_ring -->
 <g id="proc~~get_multiplicity~2~~CalledByGraph_edge33" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#007fff" d="M245.28,-23.08C255.18,-25.97 265.54,-29.31 275,-33 308.53,-46.07 345.09,-65.1 369.96,-78.82"/>
-<polygon fill="#007fff" stroke="#007fff" points="368.45,-81.98 378.89,-83.8 371.86,-75.87 368.45,-81.98"/>
-</g>
-<!-- program~shape_tetragon -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_node29" class="node">
-<title>program~shape_tetragon</title>
-<g id="a_proc~~get_multiplicity~2~~CalledByGraph_node29"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-234 152,-234 152,-210 248,-210 248,-234"/>
-<text text-anchor="middle" x="200" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
-</a>
-</g>
-</g>
-<!-- program~shape_tetragon&#45;&gt;proc~set_tetragon -->
-<g id="proc~~get_multiplicity~2~~CalledByGraph_edge38" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0000ff" d="M248.16,-212.05C273.44,-206.71 305.03,-200.04 332.84,-194.17"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="333.83,-197.54 342.89,-192.05 332.39,-190.69 333.83,-197.54"/>
+<title>program~shape_ring_3d&#45;&gt;proc~set_ring</title>
+<path fill="none" stroke="#0000ff" d="M269.01,-12C293.59,-12 324.96,-12 353.63,-12"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="353.65,-15.5 363.65,-12 353.65,-8.5 353.65,-15.5"/>
 </g>
 </g>
 </svg>
@@ -967,7 +910,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_multiplicity~3.html b/proc/get_multiplicity~3.html
index 0718b716c..75e2ea894 100644
--- a/proc/get_multiplicity~3.html
+++ b/proc/get_multiplicity~3.html
@@ -78,20 +78,20 @@ <h1>get_multiplicity
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.1% of total for procedures.">9 statements</a>
+                 title=" 0.3% of total for procedures.">20 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_multiplicity</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure function get_multiplicity(this) result(m)  
+    <h2>private pure function get_multiplicity(this, dir) result(m)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~160"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~158"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -169,6 +169,21 @@ <h3>Arguments</h3>
             <td><strong>this</strong></td>
             <td>
                 
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-dir~27"></span>
+              integer,
+            </td>
+<td>intent(in)</td>
+              <td></td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>dir</strong></td>
+            <td>
+                
             </td>
         </tr>
     </tbody>
@@ -193,61 +208,61 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_multiplicity~3~~CallsGraph Pages: 1 -->
-<svg id="procget_multiplicity3CallsGraph" width="503pt" height="74pt"
- viewBox="0.00 0.00 503.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procget_multiplicity3CallsGraph" width="512pt" height="74pt"
+ viewBox="0.00 0.00 512.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~get_multiplicity~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~get_multiplicity~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 499,-70 499,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 508,-70 508,4 -4,4"/>
 <!-- proc~get_multiplicity~3 -->
 <g id="proc~~get_multiplicity~3~~CallsGraph_node1" class="node">
 <title>proc~get_multiplicity~3</title>
-<polygon fill="none" stroke="black" points="169,-45 0,-45 0,-21 169,-21 169,-45"/>
-<text text-anchor="middle" x="84.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_multiplicity</text>
+<polygon fill="none" stroke="black" points="178,-45 0,-45 0,-21 178,-21 178,-45"/>
+<text text-anchor="middle" x="89" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_multiplicity</text>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~get_multiplicity~3~~CallsGraph_node2" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~get_multiplicity~3~~CallsGraph_node2"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="329,-45 205,-45 205,-21 329,-21 329,-45"/>
-<text text-anchor="middle" x="267" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="338,-45 214,-45 214,-21 338,-21 338,-45"/>
+<text text-anchor="middle" x="276" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~get_multiplicity~3~~CallsGraph_edge1" class="edge">
 <title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M169.15,-33C177.73,-33 186.4,-33 194.84,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="194.99,-36.5 204.99,-33 194.99,-29.5 194.99,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M178.17,-33C186.77,-33 195.42,-33 203.82,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="203.93,-36.5 213.93,-33 203.93,-29.5 203.93,-36.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~get_multiplicity~3~~CallsGraph_node3" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~get_multiplicity~3~~CallsGraph_node3"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="495,-66 365,-66 365,-42 495,-42 495,-66"/>
-<text text-anchor="middle" x="430" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="504,-66 374,-66 374,-42 504,-42 504,-66"/>
+<text text-anchor="middle" x="439" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~get_multiplicity~3~~CallsGraph_edge2" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M329.33,-41C337.69,-42.09 346.35,-43.22 354.92,-44.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="354.53,-47.82 364.9,-45.64 355.44,-40.88 354.53,-47.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M338.33,-41C346.69,-42.09 355.35,-43.22 363.92,-44.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="363.53,-47.82 373.9,-45.64 364.44,-40.88 363.53,-47.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~get_multiplicity~3~~CallsGraph_node4" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~get_multiplicity~3~~CallsGraph_node4"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="495,-24 365,-24 365,0 495,0 495,-24"/>
-<text text-anchor="middle" x="430" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="504,-24 374,-24 374,0 504,0 504,-24"/>
+<text text-anchor="middle" x="439" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~get_multiplicity~3~~CallsGraph_edge3" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M329.33,-25C337.69,-23.91 346.35,-22.78 354.92,-21.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="355.44,-25.12 364.9,-20.36 354.53,-18.18 355.44,-25.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M338.33,-25C346.69,-23.91 355.35,-22.78 363.92,-21.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="364.44,-25.12 373.9,-20.36 363.53,-18.18 364.44,-25.12"/>
 </g>
 </g>
 </svg>
@@ -343,409 +358,496 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_multiplicity~3~~CalledByGraph Pages: 1 -->
-<svg id="procget_multiplicity3CalledByGraph" width="641pt" height="284pt"
- viewBox="0.00 0.00 641.00 283.61" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~get_multiplicity~3~~CalledByGraph" class="graph" transform="scale(1.91 1.91) rotate(0) translate(4 538.45)">
+<svg id="procget_multiplicity3CalledByGraph" width="641pt" height="341pt"
+ viewBox="0.00 0.00 641.00 340.96" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~get_multiplicity~3~~CalledByGraph" class="graph" transform="scale(1.96 1.96) rotate(0) translate(4 664.63)">
 <title>proc~~get_multiplicity~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-538.45 1222,-538.45 1222,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-664.63 1253,-664.63 1253,4 -4,4"/>
 <!-- proc~get_multiplicity~3 -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_node1" class="node">
 <title>proc~get_multiplicity~3</title>
-<polygon fill="none" stroke="black" points="1218,-429 1049,-429 1049,-405 1218,-405 1218,-429"/>
-<text text-anchor="middle" x="1133.5" y="-414.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_multiplicity</text>
+<polygon fill="none" stroke="black" points="1249,-545 1071,-545 1071,-521 1249,-521 1249,-545"/>
+<text text-anchor="middle" x="1160" y="-530.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_multiplicity</text>
 </g>
 <!-- proc~cmp_degree~3 -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_node2" class="node">
 <title>proc~cmp_degree~3</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node2"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="1013,-339 859,-339 859,-315 1013,-315 1013,-339"/>
-<text text-anchor="middle" x="936" y="-324.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node2"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="1035,-444 872,-444 872,-420 1035,-420 1035,-444"/>
+<text text-anchor="middle" x="953.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_edge1" class="edge">
 <title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#ff0000" d="M963.37,-339.14C997.86,-355.02 1058.43,-382.9 1096.95,-400.63"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1095.69,-403.91 1106.24,-404.91 1098.62,-397.55 1095.69,-403.91"/>
+<path fill="none" stroke="#ff0000" d="M979.17,-444.18C1015.73,-462.24 1084.4,-496.16 1125.49,-516.45"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1124.05,-519.64 1134.56,-520.93 1127.15,-513.36 1124.05,-519.64"/>
 </g>
 <!-- proc~cmp_elem~3 -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_node3" class="node">
 <title>proc~cmp_elem~3</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_curve%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="670,-520 527,-520 527,-496 670,-496 670,-520"/>
-<text text-anchor="middle" x="598.5" y="-505.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node3"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_surface%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="680,-646 527,-646 527,-622 680,-622 680,-646"/>
+<text text-anchor="middle" x="603.5" y="-631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_edge2" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#ff0000" d="M670,-495.96C768.85,-479.09 948.14,-448.48 1052.07,-430.73"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1052.93,-434.14 1062.2,-429 1051.75,-427.24 1052.93,-434.14"/>
+<path fill="none" stroke="#ff0000" d="M670.56,-621.97C774.01,-603.12 973.7,-566.75 1082.98,-546.85"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1083.73,-550.27 1092.94,-545.03 1082.48,-543.38 1083.73,-550.27"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_node4" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="467,-520 345,-520 345,-496 467,-496 467,-520"/>
-<text text-anchor="middle" x="406" y="-505.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="467,-646 335,-646 335,-622 467,-622 467,-646"/>
+<text text-anchor="middle" x="401" y="-631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;proc~cmp_elem~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge6" class="edge">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge5" class="edge">
 <title>proc~ansatz~3&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#00ffff" d="M467.01,-508C482.73,-508 499.93,-508 516.54,-508"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="516.79,-511.5 526.79,-508 516.79,-504.5 516.79,-511.5"/>
+<path fill="none" stroke="#00ffff" d="M467.1,-634C482.91,-634 500.06,-634 516.67,-634"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="516.93,-637.5 526.93,-634 516.93,-630.5 516.93,-637.5"/>
 </g>
 <!-- none~set~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_node9" class="node">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_node8" class="node">
 <title>none~set~3</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node9"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="650,-297 547,-297 547,-273 650,-273 650,-297"/>
-<text text-anchor="middle" x="598.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node8"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="660,-402 547,-402 547,-378 660,-378 660,-402"/>
+<text text-anchor="middle" x="603.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~set~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge13" class="edge">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge11" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M466.87,-495.84C475.55,-492.33 483.92,-487.81 491,-482 548.64,-434.65 579.7,-347.63 591.65,-306.99"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="595.04,-307.84 594.4,-297.27 588.31,-305.94 595.04,-307.84"/>
+<path fill="none" stroke="#ff0000" d="M466.91,-621.89C475.6,-618.38 483.93,-613.85 491,-608 555.02,-555.04 586.27,-455.89 597.48,-411.94"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="600.93,-412.56 599.9,-402.02 594.13,-410.9 600.93,-412.56"/>
 </g>
-<!-- proc~cmp_length -->
+<!-- proc~cmp_area -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_node5" class="node">
-<title>proc~cmp_length</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node5"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="285,-520 135,-520 135,-496 285,-496 285,-520"/>
-<text text-anchor="middle" x="210" y="-505.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<title>proc~cmp_area</title>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node5"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
+<polygon fill="#d9534f" stroke="#d9534f" points="275,-646 125,-646 125,-622 275,-622 275,-646"/>
+<text text-anchor="middle" x="200" y="-631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~cmp_elem~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge7" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#00ffff" d="M263.03,-520.02C281.26,-523.67 301.93,-527.2 321,-529 396.22,-536.12 415.8,-536.34 491,-529 506.01,-527.53 522.04,-524.93 537,-522.05"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="538.03,-525.41 547.15,-520.02 536.65,-518.55 538.03,-525.41"/>
-</g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge8" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#ff0000" d="M285.17,-508C301.32,-508 318.36,-508 334.36,-508"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="334.71,-511.5 344.71,-508 334.71,-504.5 334.71,-511.5"/>
-</g>
-<!-- proc~set1a -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_node6" class="node">
-<title>proc~set1a</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node6"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="823,-360 706,-360 706,-336 823,-336 823,-360"/>
-<text text-anchor="middle" x="764.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
-</a>
-</g>
+<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~3 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge6" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~cmp_elem~3</title>
+<path fill="none" stroke="#00ffff" d="M253.03,-646.02C271.26,-649.67 291.93,-653.2 311,-655 390.64,-662.53 411.35,-662.44 491,-655 506.85,-653.52 523.8,-650.88 539.58,-647.97"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="540.59,-651.34 549.76,-646.02 539.28,-644.46 540.59,-651.34"/>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge3" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ff0000" d="M823.36,-340.83C831.56,-339.82 840.14,-338.75 848.74,-337.69"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="849.33,-341.14 858.82,-336.44 848.46,-334.19 849.33,-341.14"/>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge7" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#ff0000" d="M275.1,-634C291.15,-634 308.13,-634 324.24,-634"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="324.68,-637.5 334.68,-634 324.68,-630.5 324.68,-637.5"/>
 </g>
 <!-- proc~set1~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_node7" class="node">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_node6" class="node">
 <title>proc~set1~3</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node7"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="819.5,-318 709.5,-318 709.5,-294 819.5,-294 819.5,-318"/>
-<text text-anchor="middle" x="764.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node6"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="836,-402 716,-402 716,-378 836,-378 836,-402"/>
+<text text-anchor="middle" x="776" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
 <!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge4" class="edge">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge3" class="edge">
 <title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ff0000" d="M819.6,-312.7C828.97,-313.86 838.92,-315.1 848.9,-316.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="848.51,-319.81 858.86,-317.57 849.37,-312.86 848.51,-319.81"/>
+<path fill="none" stroke="#ff0000" d="M827.29,-402.04C847.58,-406.89 871.15,-412.53 892.34,-417.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="891.66,-421.04 902.2,-419.96 893.29,-414.23 891.66,-421.04"/>
 </g>
 <!-- proc~set3~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_node8" class="node">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_node7" class="node">
 <title>proc~set3~3</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node8"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="819.5,-276 709.5,-276 709.5,-252 819.5,-252 819.5,-276"/>
-<text text-anchor="middle" x="764.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node7"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="836,-444 716,-444 716,-420 836,-420 836,-444"/>
+<text text-anchor="middle" x="776" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
 <!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge5" class="edge">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge4" class="edge">
 <title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ff0000" d="M798.66,-276.06C806.64,-278.97 815.13,-282.09 823,-285 846.37,-293.65 872.44,-303.42 893.54,-311.36"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="892.57,-314.73 903.16,-314.98 895.04,-308.18 892.57,-314.73"/>
-</g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge10" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
-<path fill="none" stroke="#00ff66" d="M629.72,-297.15C650.99,-305.65 680.17,-317.19 706,-327 710.72,-328.79 715.67,-330.64 720.61,-332.47"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="719.41,-335.76 730,-335.93 721.83,-329.19 719.41,-335.76"/>
+<path fill="none" stroke="#ff0000" d="M836.42,-432C844.64,-432 853.23,-432 861.86,-432"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="861.98,-435.5 871.98,-432 861.98,-428.5 861.98,-435.5"/>
 </g>
 <!-- none~set~3&#45;&gt;proc~set1~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge11" class="edge">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge9" class="edge">
 <title>none~set~3&#45;&gt;proc~set1~3</title>
-<path fill="none" stroke="#0066ff" d="M650.04,-291.47C665.63,-293.47 683.01,-295.69 699.38,-297.79"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="699.06,-301.28 709.42,-299.08 699.95,-294.33 699.06,-301.28"/>
+<path fill="none" stroke="#00ffff" d="M660.33,-390C674.77,-390 690.49,-390 705.54,-390"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="705.82,-393.5 715.82,-390 705.82,-386.5 705.82,-393.5"/>
 </g>
 <!-- none~set~3&#45;&gt;proc~set3~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge12" class="edge">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge10" class="edge">
 <title>none~set~3&#45;&gt;proc~set3~3</title>
-<path fill="none" stroke="#cc00ff" d="M650.04,-278.53C665.63,-276.53 683.01,-274.31 699.38,-272.21"/>
-<polygon fill="#cc00ff" stroke="#cc00ff" points="699.95,-275.67 709.42,-270.92 699.06,-268.72 699.95,-275.67"/>
+<path fill="none" stroke="#7f00ff" d="M653.36,-402.04C672.98,-406.87 695.76,-412.48 716.27,-417.53"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="715.59,-420.97 726.13,-419.96 717.26,-414.17 715.59,-420.97"/>
 </g>
-<!-- program~compute_length -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_node10" class="node">
-<title>program~compute_length</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node10"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-500 0,-500 0,-476 99,-476 99,-500"/>
-<text text-anchor="middle" x="49.5" y="-485.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<!-- program~compute_area -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_node9" class="node">
+<title>program~compute_area</title>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node9"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-626 0,-626 0,-602 89,-602 89,-626"/>
+<text text-anchor="middle" x="44.5" y="-611.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;proc~cmp_length -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge9" class="edge">
-<title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#cbff00" d="M99.35,-494.16C107.54,-495.2 116.25,-496.3 125.03,-497.4"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="124.6,-500.88 134.96,-498.66 125.48,-493.93 124.6,-500.88"/>
+<!-- program~compute_area&#45;&gt;proc~cmp_area -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge8" class="edge">
+<title>program~compute_area&#45;&gt;proc~cmp_area</title>
+<path fill="none" stroke="#7fff00" d="M89.08,-619.68C97.19,-620.73 105.92,-621.87 114.78,-623.03"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="114.45,-626.51 124.81,-624.33 115.35,-619.57 114.45,-626.51"/>
 </g>
-<!-- program~compute_length&#45;&gt;none~set~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge22" class="edge">
-<title>program~compute_length&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M99.12,-486.77C199.48,-483.46 425.64,-471.79 491,-433 541.08,-403.28 574.18,-339.84 588.84,-306.5"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="592.11,-307.76 592.8,-297.19 585.67,-305.02 592.11,-307.76"/>
+<!-- program~compute_area&#45;&gt;none~set~3 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge21" class="edge">
+<title>program~compute_area&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M89.02,-612.42C194.46,-608.28 457.41,-595.96 491,-575 552.04,-536.91 584.21,-452.01 596.5,-411.85"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="599.87,-412.8 599.33,-402.22 593.15,-410.83 599.87,-412.8"/>
 </g>
 <!-- proc~elevate_degree~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_node11" class="node">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_node10" class="node">
 <title>proc~elevate_degree~3</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node11"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="491,-402 321,-402 321,-378 491,-378 491,-402"/>
-<text text-anchor="middle" x="406" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node10"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="491,-360 311,-360 311,-336 491,-336 491,-360"/>
+<text text-anchor="middle" x="401" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;none~set~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge14" class="edge">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge12" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M468.2,-377.95C476.06,-375.47 483.85,-372.51 491,-369 524.96,-352.32 558.25,-323.49 578.32,-304.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="580.86,-306.74 585.59,-297.26 575.98,-301.73 580.86,-306.74"/>
+<path fill="none" stroke="#ff0000" d="M459.46,-360.04C483.56,-365.08 511.73,-370.99 536.66,-376.21"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="536.26,-379.7 546.77,-378.32 537.7,-372.85 536.26,-379.7"/>
 </g>
 <!-- proc~insert_knots~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_node12" class="node">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_node11" class="node">
 <title>proc~insert_knots~3</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node12"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_curve%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-360 330.5,-360 330.5,-336 481.5,-336 481.5,-360"/>
-<text text-anchor="middle" x="406" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node11"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-318 320.5,-318 320.5,-294 481.5,-294 481.5,-318"/>
+<text text-anchor="middle" x="401" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;none~set~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge15" class="edge">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge13" class="edge">
 <title>proc~insert_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M459.72,-335.94C470.16,-333.24 480.98,-330.21 491,-327 514.42,-319.49 540.09,-309.43 560.35,-301.03"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="561.96,-304.15 569.83,-297.06 559.26,-297.7 561.96,-304.15"/>
+<path fill="none" stroke="#ff0000" d="M463.5,-318.1C472.85,-320.63 482.28,-323.59 491,-327 521.75,-339.04 554.36,-358.31 576.31,-372.38"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="574.45,-375.35 584.74,-377.86 578.27,-369.48 574.45,-375.35"/>
 </g>
 <!-- proc~modify_wc~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_node13" class="node">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_node12" class="node">
 <title>proc~modify_wc~3</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node13"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="479,-276 333,-276 333,-252 479,-252 479,-276"/>
-<text text-anchor="middle" x="406" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node12"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="479,-276 323,-276 323,-252 479,-252 479,-276"/>
+<text text-anchor="middle" x="401" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge16" class="edge">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge14" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M479.02,-271.94C498.04,-274.04 518.39,-276.28 536.75,-278.3"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="536.4,-281.79 546.73,-279.4 537.17,-274.83 536.4,-281.79"/>
+<path fill="none" stroke="#ff0000" d="M469.96,-276.07C477.27,-278.52 484.43,-281.47 491,-285 530.83,-306.43 566.96,-345.74 586.72,-369.71"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="584.23,-372.2 593.24,-377.78 589.68,-367.8 584.23,-372.2"/>
 </g>
 <!-- proc~modify_xc~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_node14" class="node">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_node13" class="node">
 <title>proc~modify_xc~3</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node14"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-234 334.5,-234 334.5,-210 477.5,-210 477.5,-234"/>
-<text text-anchor="middle" x="406" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node13"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-234 324.5,-234 324.5,-210 477.5,-210 477.5,-234"/>
+<text text-anchor="middle" x="401" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge17" class="edge">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge15" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M459.72,-234.06C470.16,-236.76 480.98,-239.79 491,-243 514.42,-250.51 540.09,-260.57 560.35,-268.97"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="559.26,-272.3 569.83,-272.94 561.96,-265.85 559.26,-272.3"/>
+<path fill="none" stroke="#ff0000" d="M473.34,-234.05C479.55,-236.5 485.54,-239.45 491,-243 540.15,-274.98 576.02,-336.39 592.47,-368.79"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="589.38,-370.43 596.95,-377.85 595.66,-367.33 589.38,-370.43"/>
 </g>
 <!-- proc~remove_knots~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_node15" class="node">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_node14" class="node">
 <title>proc~remove_knots~3</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node15"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_curve%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="487,-318 325,-318 325,-294 487,-294 487,-318"/>
-<text text-anchor="middle" x="406" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node14"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="487,-524 315,-524 315,-500 487,-500 487,-524"/>
+<text text-anchor="middle" x="401" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;none~set~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge18" class="edge">
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge16" class="edge">
 <title>proc~remove_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M487.24,-297.15C503.84,-295.33 521.06,-293.43 536.82,-291.69"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="537.39,-295.15 546.95,-290.57 536.62,-288.19 537.39,-295.15"/>
+<path fill="none" stroke="#ff0000" d="M457.12,-499.88C468.68,-496.26 480.53,-491.69 491,-486 528.38,-465.7 564.32,-431.18 584.87,-409.54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="587.45,-411.89 591.71,-402.19 582.33,-407.12 587.45,-411.89"/>
+</g>
+<!-- proc~set_c~3 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_node15" class="node">
+<title>proc~set_c~3</title>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node15"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_surface%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="464,-566 338,-566 338,-542 464,-542 464,-566"/>
+<text text-anchor="middle" x="401" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
+</a>
 </g>
-<!-- proc~set_circle -->
+</g>
+<!-- proc~set_c~3&#45;&gt;none~set~3 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge17" class="edge">
+<title>proc~set_c~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M464.06,-545.11C473.53,-542.16 482.85,-538.23 491,-533 539.07,-502.18 574.99,-443.25 591.85,-411.52"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="595.17,-412.73 596.65,-402.24 588.95,-409.51 595.17,-412.73"/>
+</g>
+<!-- proc~set_half_ring~2 -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_node16" class="node">
-<title>proc~set_circle</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node16"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="474.5,-192 337.5,-192 337.5,-168 474.5,-168 474.5,-192"/>
-<text text-anchor="middle" x="406" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
+<title>proc~set_half_ring~2</title>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node16"><a xlink:href="../proc/set_half_ring~2.html" xlink:title="nurbs_surface%set_half_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="483.5,-150 318.5,-150 318.5,-126 483.5,-126 483.5,-150"/>
+<text text-anchor="middle" x="401" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_circle&#45;&gt;none~set~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge19" class="edge">
-<title>proc~set_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M468.2,-192.05C476.06,-194.53 483.85,-197.49 491,-201 524.96,-217.68 558.25,-246.51 578.32,-265.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="575.98,-268.27 585.59,-272.74 580.86,-263.26 575.98,-268.27"/>
+<!-- proc~set_half_ring~2&#45;&gt;none~set~3 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge18" class="edge">
+<title>proc~set_half_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M476.78,-150.15C481.86,-152.6 486.67,-155.52 491,-159 559.64,-214.1 588.75,-321.82 598.46,-368.06"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="595.04,-368.81 600.43,-377.94 601.91,-367.44 595.04,-368.81"/>
 </g>
-<!-- proc~set_c~3 -->
+<!-- proc~set_ring~2 -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_node17" class="node">
-<title>proc~set_c~3</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node17"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_curve%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="464,-150 348,-150 348,-126 464,-126 464,-150"/>
-<text text-anchor="middle" x="406" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
+<title>proc~set_ring~2</title>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node17"><a xlink:href="../proc/set_ring~2.html" xlink:title="nurbs_surface%set_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="470.5,-108 331.5,-108 331.5,-84 470.5,-84 470.5,-108"/>
+<text text-anchor="middle" x="401" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c~3&#45;&gt;none~set~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge20" class="edge">
-<title>proc~set_c~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M464.09,-147.14C473.5,-150.06 482.83,-153.91 491,-159 534.03,-185.8 568.47,-235.77 585.63,-264.06"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="582.67,-265.93 590.77,-272.76 588.69,-262.37 582.67,-265.93"/>
+<!-- proc~set_ring~2&#45;&gt;none~set~3 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge19" class="edge">
+<title>proc~set_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M470.87,-105.07C478.18,-108.06 485.09,-111.94 491,-117 569.67,-184.26 593.62,-315.54 600.22,-367.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="596.77,-368.42 601.4,-377.95 603.72,-367.61 596.77,-368.42"/>
 </g>
-<!-- proc~set_half_circle -->
+<!-- proc~set_tetragon -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_node18" class="node">
-<title>proc~set_half_circle</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node18"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="487.5,-108 324.5,-108 324.5,-84 487.5,-84 487.5,-108"/>
-<text text-anchor="middle" x="406" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
+<title>proc~set_tetragon</title>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node18"><a xlink:href="../proc/set_tetragon.html" xlink:title="nurbs_surface%set_tetragon">
+<polygon fill="#d9534f" stroke="#d9534f" points="483,-192 319,-192 319,-168 483,-168 483,-192"/>
+<text text-anchor="middle" x="401" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_circle&#45;&gt;none~set~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge21" class="edge">
-<title>proc~set_half_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M475.08,-108.1C480.72,-110.55 486.13,-113.48 491,-117 543.24,-154.72 575.9,-226.7 589.78,-262.96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="586.59,-264.42 593.34,-272.59 593.15,-262 586.59,-264.42"/>
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge20" class="edge">
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M475.58,-192.16C481.05,-194.6 486.27,-197.52 491,-201 549.57,-244.13 582.8,-328.06 595.9,-367.94"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="592.58,-369.04 598.94,-377.51 599.25,-366.92 592.58,-369.04"/>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_node19" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node19"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-381 160,-381 160,-357 260,-357 260,-381"/>
-<text text-anchor="middle" x="210" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node19"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="255,-422 145,-422 145,-398 255,-398 255,-422"/>
+<text text-anchor="middle" x="200" y="-407.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;none~set~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge23" class="edge">
-<title>program~example1_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M234.77,-381.16C284.7,-404.92 403.16,-451.77 491,-411 537.45,-389.44 570.97,-336.54 586.96,-306.59"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="590.23,-307.88 591.7,-297.39 584.01,-304.67 590.23,-307.88"/>
+<!-- program~example3_surface&#45;&gt;none~set~3 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge22" class="edge">
+<title>program~example3_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M224.27,-422.05C246.03,-432.59 279.77,-447.11 311,-453 389.62,-467.82 413.63,-473.35 491,-453 523.88,-444.35 557.27,-423.55 578.82,-408.21"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="581.01,-410.94 587.03,-402.22 576.88,-405.29 581.01,-410.94"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge26" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
-<path fill="none" stroke="#ff0000" d="M260.21,-374.33C275.59,-375.99 293.12,-377.89 310.54,-379.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="310.45,-383.29 320.77,-380.88 311.21,-376.33 310.45,-383.29"/>
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge25" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#ff0000" d="M230.54,-397.84C252.49,-389.09 283.3,-377.39 311,-369 318.48,-366.73 326.37,-364.56 334.24,-362.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="335.32,-365.87 344.17,-360.04 333.62,-359.08 335.32,-365.87"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge27" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
-<path fill="none" stroke="#ff8b00" d="M260.21,-363.67C278.44,-361.7 299.67,-359.4 320.17,-357.18"/>
-<polygon fill="#ff8b00" stroke="#ff8b00" points="320.6,-360.66 330.16,-356.1 319.84,-353.7 320.6,-360.66"/>
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge26" class="edge">
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#ff7f00" d="M213.38,-397.84C232.62,-379.65 271.59,-345.51 311,-327 315.55,-324.86 320.34,-322.93 325.24,-321.19"/>
+<polygon fill="#ff7f00" stroke="#ff7f00" points="326.35,-324.51 334.76,-318.07 324.17,-317.86 326.35,-324.51"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_edge28" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
-<path fill="none" stroke="#00ff2e" d="M239.62,-356.99C261.63,-348.02 292.92,-335.84 321,-327 328.08,-324.77 335.55,-322.62 343,-320.6"/>
-<polygon fill="#00ff2e" stroke="#00ff2e" points="343.97,-323.97 352.75,-318.03 342.19,-317.2 343.97,-323.97"/>
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#00ff00" d="M215.36,-422.2C235.52,-438.77 273.91,-468.34 311,-486 319.63,-490.11 329.04,-493.71 338.41,-496.82"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="337.54,-500.21 348.13,-499.88 339.64,-493.54 337.54,-500.21"/>
 </g>
-<!-- program~example_nurbs_curve -->
+<!-- program~example_nurbs_surface -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_node20" class="node">
-<title>program~example_nurbs_curve</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node20"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 341.5,-66 341.5,-42 470.5,-42 470.5,-66"/>
-<text text-anchor="middle" x="406" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<title>program~example_nurbs_surface</title>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node20"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-444 331.5,-444 331.5,-420 470.5,-420 470.5,-444"/>
+<text text-anchor="middle" x="401" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;none~set~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge24" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M470.8,-63.64C478.07,-66.51 485.01,-70.22 491,-75 553.17,-124.58 582.35,-220.06 592.78,-263.06"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="589.37,-263.85 595.04,-272.8 596.19,-262.27 589.37,-263.85"/>
+<!-- program~example_nurbs_surface&#45;&gt;none~set~3 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge23" class="edge">
+<title>program~example_nurbs_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M459.46,-419.96C483.56,-414.92 511.73,-409.01 536.66,-403.79"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="537.7,-407.15 546.77,-401.68 536.26,-400.3 537.7,-407.15"/>
 </g>
-<!-- program~nearest_point_1d -->
+<!-- program~nearest_point_2d -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_node21" class="node">
-<title>program~nearest_point_1d</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node21"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="457.5,-24 354.5,-24 354.5,0 457.5,0 457.5,-24"/>
-<text text-anchor="middle" x="406" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<title>program~nearest_point_2d</title>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node21"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452.5,-402 349.5,-402 349.5,-378 452.5,-378 452.5,-402"/>
+<text text-anchor="middle" x="401" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;none~set~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge25" class="edge">
-<title>program~nearest_point_1d&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M457.69,-16.81C469.65,-19.95 481.64,-24.98 491,-33 563.12,-94.74 587.55,-213.69 594.79,-262.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="591.32,-263.36 596.15,-272.79 598.26,-262.41 591.32,-263.36"/>
+<!-- program~nearest_point_2d&#45;&gt;none~set~3 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge24" class="edge">
+<title>program~nearest_point_2d&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M452.59,-390C478.11,-390 509.36,-390 536.71,-390"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="536.98,-393.5 546.98,-390 536.98,-386.5 536.98,-393.5"/>
 </g>
-<!-- program~shape_c_1d -->
+<!-- program~example_ppm1 -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_node22" class="node">
-<title>program~shape_c_1d</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node22"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-150 172,-150 172,-126 248,-126 248,-150"/>
-<text text-anchor="middle" x="210" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<title>program~example_ppm1</title>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node22"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-108 153,-108 153,-84 247,-84 247,-108"/>
+<text text-anchor="middle" x="200" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~set_c~3 -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge30" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~set_c~3</title>
-<path fill="none" stroke="#00b9ff" d="M248.41,-138C273.62,-138 307.6,-138 337.47,-138"/>
-<polygon fill="#00b9ff" stroke="#00b9ff" points="337.84,-141.5 347.84,-138 337.84,-134.5 337.84,-141.5"/>
+<!-- program~example_ppm1&#45;&gt;proc~set_ring~2 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge32" class="edge">
+<title>program~example_ppm1&#45;&gt;proc~set_ring~2</title>
+<path fill="none" stroke="#007fff" d="M247.15,-96C269.15,-96 296.09,-96 321.19,-96"/>
+<polygon fill="#007fff" stroke="#007fff" points="321.45,-99.5 331.45,-96 321.45,-92.5 321.45,-99.5"/>
+</g>
+<!-- program~example_ppm1&#45;&gt;proc~set_tetragon -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge34" class="edge">
+<title>program~example_ppm1&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0000ff" d="M247.02,-104.55C256.72,-107.56 266.56,-111.6 275,-117 295.71,-130.25 290,-146.21 311,-159 314.01,-160.83 317.16,-162.5 320.41,-164.03"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="319.22,-167.32 329.8,-167.95 321.92,-160.87 319.22,-167.32"/>
 </g>
-<!-- program~shape_circle -->
+<!-- program~example_ppm2 -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_node23" class="node">
-<title>program~shape_circle</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node23"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249.5,-192 170.5,-192 170.5,-168 249.5,-168 249.5,-192"/>
-<text text-anchor="middle" x="210" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<title>program~example_ppm2</title>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node23"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-150 153,-150 153,-126 247,-126 247,-150"/>
+<text text-anchor="middle" x="200" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~set_circle -->
-<g id="proc~~get_multiplicity~3~~CalledByGraph_edge29" class="edge">
-<title>program~shape_circle&#45;&gt;proc~set_circle</title>
-<path fill="none" stroke="#00ffb9" d="M249.79,-180C271.95,-180 300.54,-180 327.13,-180"/>
-<polygon fill="#00ffb9" stroke="#00ffb9" points="327.21,-183.5 337.21,-180 327.21,-176.5 327.21,-183.5"/>
+<!-- program~example_ppm2&#45;&gt;proc~set_half_ring~2 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge30" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~set_half_ring~2</title>
+<path fill="none" stroke="#00ffff" d="M247.15,-138C265.39,-138 287.03,-138 308.19,-138"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="308.2,-141.5 318.2,-138 308.2,-134.5 308.2,-141.5"/>
 </g>
-<!-- program~shape_half_circle -->
+<!-- program~example_ppm2&#45;&gt;proc~set_tetragon -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge35" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0000ff" d="M247.15,-147.74C272.73,-153.14 304.98,-159.95 333.26,-165.91"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="332.57,-169.34 343.07,-167.99 334.01,-162.5 332.57,-169.34"/>
+</g>
+<!-- program~example_ppm3 -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_node24" class="node">
-<title>program~shape_half_circle</title>
-<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node24"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-108 158,-108 158,-84 262,-84 262,-108"/>
-<text text-anchor="middle" x="210" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<title>program~example_ppm3</title>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node24"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-276 153,-276 153,-252 247,-252 247,-276"/>
+<text text-anchor="middle" x="200" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge27" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#7fff00" d="M247.15,-254.26C272.73,-248.86 304.98,-242.05 333.26,-236.09"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="334.01,-239.5 343.07,-234.01 332.57,-232.66 334.01,-239.5"/>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~set_tetragon -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge36" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0000ff" d="M247.02,-255.45C256.72,-252.44 266.56,-248.4 275,-243 295.71,-229.75 290,-213.79 311,-201 314.01,-199.17 317.16,-197.5 320.41,-195.97"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="321.92,-199.13 329.8,-192.05 319.22,-192.68 321.92,-199.13"/>
+</g>
+<!-- program~nearest_point_2d_bench -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_node25" class="node">
+<title>program~nearest_point_2d_bench</title>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node25"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-192 129,-192 129,-168 271,-168 271,-192"/>
+<text text-anchor="middle" x="200" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge37" class="edge">
+<title>program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0000ff" d="M271.16,-180C283.34,-180 296.17,-180 308.82,-180"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="308.91,-183.5 318.91,-180 308.91,-176.5 308.91,-183.5"/>
+</g>
+<!-- program~shape_c_2d -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_node26" class="node">
+<title>program~shape_c_2d</title>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node26"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="238,-566 162,-566 162,-542 238,-542 238,-566"/>
+<text text-anchor="middle" x="200" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_c_2d&#45;&gt;proc~set_c~3 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge29" class="edge">
+<title>program~shape_c_2d&#45;&gt;proc~set_c~3</title>
+<path fill="none" stroke="#00ff7f" d="M238.43,-554C263.52,-554 297.37,-554 327.6,-554"/>
+<polygon fill="#00ff7f" stroke="#00ff7f" points="327.7,-557.5 337.7,-554 327.7,-550.5 327.7,-557.5"/>
+</g>
+<!-- program~shape_half_ring_2d -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_node27" class="node">
+<title>program~shape_half_ring_2d</title>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node27"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="257.5,-66 142.5,-66 142.5,-42 257.5,-42 257.5,-66"/>
+<text text-anchor="middle" x="200" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2 -->
 <g id="proc~~get_multiplicity~3~~CalledByGraph_edge31" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
-<path fill="none" stroke="#002eff" d="M262.22,-96C278.08,-96 296.06,-96 313.78,-96"/>
-<polygon fill="#002eff" stroke="#002eff" points="314.17,-99.5 324.17,-96 314.17,-92.5 314.17,-99.5"/>
+<title>program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2</title>
+<path fill="none" stroke="#00ffff" d="M257.09,-66.07C263.38,-68.53 269.49,-71.47 275,-75 295.71,-88.25 290,-104.21 311,-117 314.01,-118.83 317.16,-120.5 320.41,-122.03"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="319.22,-125.32 329.8,-125.95 321.92,-118.87 319.22,-125.32"/>
+</g>
+<!-- program~shape_ring_2d -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_node28" class="node">
+<title>program~shape_ring_2d</title>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node28"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="245,-24 155,-24 155,0 245,0 245,-24"/>
+<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_ring_2d&#45;&gt;proc~set_ring~2 -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge33" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~set_ring~2</title>
+<path fill="none" stroke="#007fff" d="M245.28,-23.08C255.18,-25.97 265.54,-29.31 275,-33 308.53,-46.07 345.09,-65.1 369.96,-78.82"/>
+<polygon fill="#007fff" stroke="#007fff" points="368.45,-81.98 378.89,-83.8 371.86,-75.87 368.45,-81.98"/>
+</g>
+<!-- program~shape_tetragon -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_node29" class="node">
+<title>program~shape_tetragon</title>
+<g id="a_proc~~get_multiplicity~3~~CalledByGraph_node29"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-234 152,-234 152,-210 248,-210 248,-234"/>
+<text text-anchor="middle" x="200" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+</a>
+</g>
+</g>
+<!-- program~shape_tetragon&#45;&gt;proc~set_tetragon -->
+<g id="proc~~get_multiplicity~3~~CalledByGraph_edge38" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0000ff" d="M248.16,-212.05C273.44,-206.71 305.03,-200.04 332.84,-194.17"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="333.83,-197.54 342.89,-192.05 332.39,-190.69 333.83,-197.54"/>
 </g>
 </g>
 </svg>
@@ -865,7 +967,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_nc.html b/proc/get_nc.html
index 9e4b4bddd..e9b3c2fe2 100644
--- a/proc/get_nc.html
+++ b/proc/get_nc.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~163"></span>
+              <span class="anchor" id="variable-this~32"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
@@ -176,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-nc~62"></span>
+          <span class="anchor" id="variable-nc~4"></span>
           integer
         </small>
       </h3>
@@ -212,7 +212,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_nc_all.html b/proc/get_nc_all.html
index 6eecf9bd6..8f28bf855 100644
--- a/proc/get_nc_all.html
+++ b/proc/get_nc_all.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~32"></span>
+              <span class="anchor" id="variable-this~93"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -176,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-nc~5"></span>
+          <span class="anchor" id="variable-nc~25"></span>
           integer, (3)
         </small>
       </h3>
@@ -212,7 +212,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_nc_all~2.html b/proc/get_nc_all~2.html
index 2394df2a3..f7aa0c666 100644
--- a/proc/get_nc_all~2.html
+++ b/proc/get_nc_all~2.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~100"></span>
+              <span class="anchor" id="variable-this~161"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -176,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-nc~32"></span>
+          <span class="anchor" id="variable-nc~60"></span>
           integer, (2)
         </small>
       </h3>
@@ -212,7 +212,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_nc_dir.html b/proc/get_nc_dir.html
index a5771104b..6f20b66d1 100644
--- a/proc/get_nc_dir.html
+++ b/proc/get_nc_dir.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~33"></span>
+              <span class="anchor" id="variable-this~94"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~12"></span>
+              <span class="anchor" id="variable-dir~15"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -191,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-nc~6"></span>
+          <span class="anchor" id="variable-nc~26"></span>
           integer
         </small>
       </h3>
@@ -378,7 +378,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_nc_dir~2.html b/proc/get_nc_dir~2.html
index 8bd661b33..004c17c1a 100644
--- a/proc/get_nc_dir~2.html
+++ b/proc/get_nc_dir~2.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~101"></span>
+              <span class="anchor" id="variable-this~162"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~27"></span>
+              <span class="anchor" id="variable-dir~30"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -191,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-nc~33"></span>
+          <span class="anchor" id="variable-nc~61"></span>
           integer
         </small>
       </h3>
@@ -378,7 +378,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_ng.html b/proc/get_ng.html
index d9874efa0..bc20899e4 100644
--- a/proc/get_ng.html
+++ b/proc/get_ng.html
@@ -83,15 +83,15 @@ <h1>get_ng
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_ng</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_ng(this) result(ng)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~16"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~17"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -177,7 +177,7 @@ <h3>Arguments</h3>
       <h3>Return Value
         <small>
           <span class="anchor" id="variable-ng~2"></span>
-          integer, (3)
+          integer
         </small>
       </h3>
       
@@ -212,7 +212,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_ng~2.html b/proc/get_ng~2.html
index 6227f7676..4ba673627 100644
--- a/proc/get_ng~2.html
+++ b/proc/get_ng~2.html
@@ -83,15 +83,15 @@ <h1>get_ng
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_ng</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_ng(this) result(ng)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~84"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~77"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -176,163 +176,12 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-ng~15"></span>
-          integer, (2)
+          <span class="anchor" id="variable-ng~16"></span>
+          integer, (3)
         </small>
       </h3>
       
     <br>
-    <div class="card">
-      <div class="card-header">
-  <h3 class="card-title">Called by</h3>
-      </div>
-      <div class="card-body">
-  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.43.0 (0)
- -->
-<!-- Title: proc~~get_ng~2~~CalledByGraph Pages: 1 -->
-<svg id="procget_ng2CalledByGraph" width="271pt" height="116pt"
- viewBox="0.00 0.00 271.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~get_ng~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
-<title>proc~~get_ng~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 267,-112 267,4 -4,4"/>
-<!-- proc~get_ng~2 -->
-<g id="proc~~get_ng~2~~CalledByGraph_node1" class="node">
-<title>proc~get_ng~2</title>
-<polygon fill="none" stroke="black" points="263,-66 130,-66 130,-42 263,-42 263,-66"/>
-<text text-anchor="middle" x="196.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_ng</text>
-</g>
-<!-- program~example_ppm1 -->
-<g id="proc~~get_ng~2~~CalledByGraph_node2" class="node">
-<title>program~example_ppm1</title>
-<g id="a_proc~~get_ng~2~~CalledByGraph_node2"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-108 0,-108 0,-84 94,-84 94,-108"/>
-<text text-anchor="middle" x="47" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm1&#45;&gt;proc~get_ng~2 -->
-<g id="proc~~get_ng~2~~CalledByGraph_edge1" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~get_ng~2</title>
-<path fill="none" stroke="#ff0000" d="M90.27,-83.96C106.78,-79.26 125.88,-73.82 143.24,-68.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="144.57,-72.14 153.23,-66.04 142.65,-65.41 144.57,-72.14"/>
-</g>
-<!-- program~example_ppm2 -->
-<g id="proc~~get_ng~2~~CalledByGraph_node3" class="node">
-<title>program~example_ppm2</title>
-<g id="a_proc~~get_ng~2~~CalledByGraph_node3"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-66 0,-66 0,-42 94,-42 94,-66"/>
-<text text-anchor="middle" x="47" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm2&#45;&gt;proc~get_ng~2 -->
-<g id="proc~~get_ng~2~~CalledByGraph_edge2" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~get_ng~2</title>
-<path fill="none" stroke="#ff0000" d="M94.27,-54C102.4,-54 111.06,-54 119.76,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="119.95,-57.5 129.95,-54 119.95,-50.5 119.95,-57.5"/>
-</g>
-<!-- program~example_ppm3 -->
-<g id="proc~~get_ng~2~~CalledByGraph_node4" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~get_ng~2~~CalledByGraph_node4"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
-<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm3&#45;&gt;proc~get_ng~2 -->
-<g id="proc~~get_ng~2~~CalledByGraph_edge3" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~get_ng~2</title>
-<path fill="none" stroke="#ff0000" d="M90.27,-24.04C106.78,-28.74 125.88,-34.18 143.24,-39.12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="142.65,-42.59 153.23,-41.96 144.57,-35.86 142.65,-42.59"/>
-</g>
-</g>
-</svg>
-</div>          <div>
-            <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
-          </div>
-          <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
-            <div class="modal-dialog modal-lg" role="document">
-              <div class="modal-content">
-                <div class="modal-header">
-                  <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
-                  <button type="button" class="btn-close" data-bs-dismiss="modal" aria-label="Close"></button>
-                </div>
-                <div class="modal-body">
-<p>Nodes of different colours represent the following: </p>
-<?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.43.0 (0)
- -->
-<!-- Title: Graph Key Pages: 1 -->
-<svg width="641pt" height="28pt"
- viewBox="0.00 0.00 641.00 27.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="graph0" class="graph" transform="scale(1.16 1.16) rotate(0) translate(4 28)">
-<title>Graph Key</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 741.5,-28 741.5,4 -4,4"/>
-<!-- Subroutine -->
-<g id="node1" class="node">
-<title>Subroutine</title>
-<polygon fill="#d9534f" stroke="#d9534f" points="70,-24 0,-24 0,0 70,0 70,-24"/>
-<text text-anchor="middle" x="35" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
-</g>
-<!-- Function -->
-<g id="node2" class="node">
-<title>Function</title>
-<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-24 88,-24 88,0 146,0 146,-24"/>
-<text text-anchor="middle" x="117" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
-</g>
-<!-- Interface -->
-<g id="node3" class="node">
-<title>Interface</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="225.5,-24 164.5,-24 164.5,0 225.5,0 225.5,-24"/>
-<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
-</g>
-<!-- Type Bound Procedure -->
-<g id="node4" class="node">
-<title>Type Bound Procedure</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="374,-24 244,-24 244,0 374,0 374,-24"/>
-<text text-anchor="middle" x="309" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Type Bound Procedure</text>
-</g>
-<!-- Unknown Procedure Type -->
-<g id="node5" class="node">
-<title>Unknown Procedure Type</title>
-<polygon fill="#777777" stroke="#777777" points="537.5,-24 392.5,-24 392.5,0 537.5,0 537.5,-24"/>
-<text text-anchor="middle" x="465" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
-</g>
-<!-- Program -->
-<g id="node6" class="node">
-<title>Program</title>
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-24 556,-24 556,0 614,0 614,-24"/>
-<text text-anchor="middle" x="585" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
-</g>
-<!-- This Page&#39;s Entity -->
-<g id="node7" class="node">
-<title>This Page&#39;s Entity</title>
-<polygon fill="none" stroke="black" points="737.5,-24 632.5,-24 632.5,0 737.5,0 737.5,-24"/>
-<text text-anchor="middle" x="685" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
-</g>
-</g>
-</svg>
-
-<p>Solid arrows point from a procedure to one which it calls. Dashed 
-arrows point from an interface to procedures which implement that interface.
-This could include the module procedures in a generic interface or the
-implementation in a submodule of an interface in a parent module.
-</p>
- Where possible, edges connecting nodes are
-given different colours to make them easier to distinguish in
-large graphs.</div>
-            </div>
-          </div>
-        </div>
-      </div>
-    </div>
-    <br>
 
 
     
@@ -363,7 +212,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_ng~3.html b/proc/get_ng~3.html
index 11fa8a2c0..325bce312 100644
--- a/proc/get_ng~3.html
+++ b/proc/get_ng~3.html
@@ -83,15 +83,15 @@ <h1>get_ng
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_ng</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_ng(this) result(ng)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~148"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~145"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -176,12 +176,163 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-ng~29"></span>
-          integer
+          <span class="anchor" id="variable-ng~28"></span>
+          integer, (2)
         </small>
       </h3>
       
     <br>
+    <div class="card">
+      <div class="card-header">
+  <h3 class="card-title">Called by</h3>
+      </div>
+      <div class="card-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.43.0 (0)
+ -->
+<!-- Title: proc~~get_ng~3~~CalledByGraph Pages: 1 -->
+<svg id="procget_ng3CalledByGraph" width="271pt" height="116pt"
+ viewBox="0.00 0.00 271.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~get_ng~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
+<title>proc~~get_ng~3~~CalledByGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 267,-112 267,4 -4,4"/>
+<!-- proc~get_ng~3 -->
+<g id="proc~~get_ng~3~~CalledByGraph_node1" class="node">
+<title>proc~get_ng~3</title>
+<polygon fill="none" stroke="black" points="263,-66 130,-66 130,-42 263,-42 263,-66"/>
+<text text-anchor="middle" x="196.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_ng</text>
+</g>
+<!-- program~example_ppm1 -->
+<g id="proc~~get_ng~3~~CalledByGraph_node2" class="node">
+<title>program~example_ppm1</title>
+<g id="a_proc~~get_ng~3~~CalledByGraph_node2"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-108 0,-108 0,-84 94,-84 94,-108"/>
+<text text-anchor="middle" x="47" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm1&#45;&gt;proc~get_ng~3 -->
+<g id="proc~~get_ng~3~~CalledByGraph_edge1" class="edge">
+<title>program~example_ppm1&#45;&gt;proc~get_ng~3</title>
+<path fill="none" stroke="#ff0000" d="M90.27,-83.96C106.78,-79.26 125.88,-73.82 143.24,-68.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="144.57,-72.14 153.23,-66.04 142.65,-65.41 144.57,-72.14"/>
+</g>
+<!-- program~example_ppm2 -->
+<g id="proc~~get_ng~3~~CalledByGraph_node3" class="node">
+<title>program~example_ppm2</title>
+<g id="a_proc~~get_ng~3~~CalledByGraph_node3"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-66 0,-66 0,-42 94,-42 94,-66"/>
+<text text-anchor="middle" x="47" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm2&#45;&gt;proc~get_ng~3 -->
+<g id="proc~~get_ng~3~~CalledByGraph_edge2" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~get_ng~3</title>
+<path fill="none" stroke="#ff0000" d="M94.27,-54C102.4,-54 111.06,-54 119.76,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="119.95,-57.5 129.95,-54 119.95,-50.5 119.95,-57.5"/>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~get_ng~3~~CalledByGraph_node4" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~get_ng~3~~CalledByGraph_node4"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
+<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~get_ng~3 -->
+<g id="proc~~get_ng~3~~CalledByGraph_edge3" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~get_ng~3</title>
+<path fill="none" stroke="#ff0000" d="M90.27,-24.04C106.78,-28.74 125.88,-34.18 143.24,-39.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="142.65,-42.59 153.23,-41.96 144.57,-35.86 142.65,-42.59"/>
+</g>
+</g>
+</svg>
+</div>          <div>
+            <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
+          </div>
+          <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
+            <div class="modal-dialog modal-lg" role="document">
+              <div class="modal-content">
+                <div class="modal-header">
+                  <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
+                  <button type="button" class="btn-close" data-bs-dismiss="modal" aria-label="Close"></button>
+                </div>
+                <div class="modal-body">
+<p>Nodes of different colours represent the following: </p>
+<?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.43.0 (0)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="641pt" height="28pt"
+ viewBox="0.00 0.00 641.00 27.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1.16 1.16) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 741.5,-28 741.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="70,-24 0,-24 0,0 70,0 70,-24"/>
+<text text-anchor="middle" x="35" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-24 88,-24 88,0 146,0 146,-24"/>
+<text text-anchor="middle" x="117" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="225.5,-24 164.5,-24 164.5,0 225.5,0 225.5,-24"/>
+<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Type Bound Procedure -->
+<g id="node4" class="node">
+<title>Type Bound Procedure</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="374,-24 244,-24 244,0 374,0 374,-24"/>
+<text text-anchor="middle" x="309" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Type Bound Procedure</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node5" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="537.5,-24 392.5,-24 392.5,0 537.5,0 537.5,-24"/>
+<text text-anchor="middle" x="465" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node6" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-24 556,-24 556,0 614,0 614,-24"/>
+<text text-anchor="middle" x="585" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node7" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="737.5,-24 632.5,-24 632.5,0 737.5,0 737.5,-24"/>
+<text text-anchor="middle" x="685" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+<p>Solid arrows point from a procedure to one which it calls. Dashed 
+arrows point from an interface to procedures which implement that interface.
+This could include the module procedures in a generic interface or the
+implementation in a submodule of an interface in a parent module.
+</p>
+ Where possible, edges connecting nodes are
+given different colours to make them easier to distinguish in
+large graphs.</div>
+            </div>
+          </div>
+        </div>
+      </div>
+    </div>
+    <br>
 
 
     
@@ -212,7 +363,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_wc_all.html b/proc/get_wc_all.html
index db8fb6207..1ebbcecb9 100644
--- a/proc/get_wc_all.html
+++ b/proc/get_wc_all.html
@@ -83,15 +83,15 @@ <h1>get_Wc_all
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Wc_all</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Wc_all(this) result(Wc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~13"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~14"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -176,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-wc~7"></span>
+          <span class="anchor" id="variable-wc~13"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -193,61 +193,61 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_wc_all~~CalledByGraph Pages: 1 -->
-<svg id="procget_wc_allCalledByGraph" width="526pt" height="74pt"
- viewBox="0.00 0.00 526.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procget_wc_allCalledByGraph" width="498pt" height="74pt"
+ viewBox="0.00 0.00 498.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~get_wc_all~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~get_wc_all~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 522,-70 522,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 494,-70 494,4 -4,4"/>
 <!-- proc~get_wc_all -->
 <g id="proc~~get_wc_all~~CalledByGraph_node1" class="node">
 <title>proc~get_wc_all</title>
-<polygon fill="none" stroke="black" points="518,-45 364,-45 364,-21 518,-21 518,-45"/>
-<text text-anchor="middle" x="441" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_Wc_all</text>
+<polygon fill="none" stroke="black" points="490,-45 345,-45 345,-21 490,-21 490,-45"/>
+<text text-anchor="middle" x="417.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_Wc_all</text>
 </g>
 <!-- none~get_wc -->
 <g id="proc~~get_wc_all~~CalledByGraph_node2" class="node">
 <title>none~get_wc</title>
-<g id="a_proc~~get_wc_all~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_wc" xlink:title="nurbs_volume%get_Wc">
-<polygon fill="#a7506f" stroke="#a7506f" points="328,-45 192,-45 192,-21 328,-21 328,-45"/>
-<text text-anchor="middle" x="260" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wc</text>
+<g id="a_proc~~get_wc_all~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_wc" xlink:title="nurbs_curve%get_Wc">
+<polygon fill="#a7506f" stroke="#a7506f" points="309,-45 182,-45 182,-21 309,-21 309,-45"/>
+<text text-anchor="middle" x="245.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wc</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc&#45;&gt;proc~get_wc_all -->
 <g id="proc~~get_wc_all~~CalledByGraph_edge1" class="edge">
 <title>none~get_wc&#45;&gt;proc~get_wc_all</title>
-<path fill="none" stroke="#ff0000" d="M328.16,-33C336.5,-33 345.12,-33 353.7,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="353.74,-36.5 363.74,-33 353.74,-29.5 353.74,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M309.32,-33C317.52,-33 326.02,-33 334.48,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="334.76,-36.5 344.76,-33 334.76,-29.5 334.76,-36.5"/>
 </g>
 <!-- proc~modify_wc -->
 <g id="proc~~get_wc_all~~CalledByGraph_node3" class="node">
 <title>proc~modify_wc</title>
-<g id="a_proc~~get_wc_all~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="156,-66 0,-66 0,-42 156,-42 156,-66"/>
-<text text-anchor="middle" x="78" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
+<g id="a_proc~~get_wc_all~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="146,-66 0,-66 0,-42 146,-42 146,-66"/>
+<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~get_wc -->
 <g id="proc~~get_wc_all~~CalledByGraph_edge2" class="edge">
 <title>proc~modify_wc&#45;&gt;none~get_wc</title>
-<path fill="none" stroke="#ff0000" d="M156.12,-45C164.69,-44 173.42,-42.98 182,-41.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="182.44,-45.46 191.97,-40.82 181.63,-38.5 182.44,-45.46"/>
+<path fill="none" stroke="#ff0000" d="M146.31,-45.09C154.7,-44.06 163.26,-43.01 171.65,-41.97"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="172.29,-45.42 181.79,-40.72 171.43,-38.47 172.29,-45.42"/>
 </g>
 <!-- proc~modify_xc -->
 <g id="proc~~get_wc_all~~CalledByGraph_node4" class="node">
 <title>proc~modify_xc</title>
-<g id="a_proc~~get_wc_all~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="154.5,-24 1.5,-24 1.5,0 154.5,0 154.5,-24"/>
-<text text-anchor="middle" x="78" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
+<g id="a_proc~~get_wc_all~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="144.5,-24 1.5,-24 1.5,0 144.5,0 144.5,-24"/>
+<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~get_wc -->
 <g id="proc~~get_wc_all~~CalledByGraph_edge3" class="edge">
 <title>proc~modify_xc&#45;&gt;none~get_wc</title>
-<path fill="none" stroke="#ff0000" d="M154.55,-20.81C163.57,-21.87 172.79,-22.94 181.83,-24"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="181.6,-27.49 191.94,-25.18 182.41,-20.54 181.6,-27.49"/>
+<path fill="none" stroke="#ff0000" d="M144.83,-20.72C153.73,-21.82 162.86,-22.94 171.79,-24.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="171.43,-27.53 181.78,-25.28 172.28,-20.58 171.43,-27.53"/>
 </g>
 </g>
 </svg>
@@ -363,7 +363,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_wc_all~2.html b/proc/get_wc_all~2.html
index 1d8018fa3..adcf83361 100644
--- a/proc/get_wc_all~2.html
+++ b/proc/get_wc_all~2.html
@@ -83,15 +83,15 @@ <h1>get_Wc_all
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Wc_all</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Wc_all(this) result(Wc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~81"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~74"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -193,84 +193,65 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_wc_all~2~~CalledByGraph Pages: 1 -->
-<svg id="procget_wc_all2CalledByGraph" width="641pt" height="72pt"
- viewBox="0.00 0.00 641.00 72.31" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~get_wc_all~2~~CalledByGraph" class="graph" transform="scale(1.02 1.02) rotate(0) translate(4 70)">
+<svg id="procget_wc_all2CalledByGraph" width="526pt" height="74pt"
+ viewBox="0.00 0.00 526.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~get_wc_all~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~get_wc_all~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 652,-70 652,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 522,-70 522,4 -4,4"/>
 <!-- proc~get_wc_all~2 -->
 <g id="proc~~get_wc_all~2~~CalledByGraph_node1" class="node">
 <title>proc~get_wc_all~2</title>
-<polygon fill="none" stroke="black" points="648,-45 494,-45 494,-21 648,-21 648,-45"/>
-<text text-anchor="middle" x="571" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_Wc_all</text>
+<polygon fill="none" stroke="black" points="518,-45 364,-45 364,-21 518,-21 518,-45"/>
+<text text-anchor="middle" x="441" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_Wc_all</text>
 </g>
 <!-- none~get_wc~2 -->
 <g id="proc~~get_wc_all~2~~CalledByGraph_node2" class="node">
 <title>none~get_wc~2</title>
-<g id="a_proc~~get_wc_all~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_wc~2" xlink:title="nurbs_surface%get_Wc">
-<polygon fill="#a7506f" stroke="#a7506f" points="458,-45 322,-45 322,-21 458,-21 458,-45"/>
-<text text-anchor="middle" x="390" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc</text>
+<g id="a_proc~~get_wc_all~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_wc~2" xlink:title="nurbs_volume%get_Wc">
+<polygon fill="#a7506f" stroke="#a7506f" points="328,-45 192,-45 192,-21 328,-21 328,-45"/>
+<text text-anchor="middle" x="260" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wc</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc~2&#45;&gt;proc~get_wc_all~2 -->
 <g id="proc~~get_wc_all~2~~CalledByGraph_edge1" class="edge">
 <title>none~get_wc~2&#45;&gt;proc~get_wc_all~2</title>
-<path fill="none" stroke="#ff0000" d="M458.16,-33C466.5,-33 475.12,-33 483.7,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="483.74,-36.5 493.74,-33 483.74,-29.5 483.74,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M328.16,-33C336.5,-33 345.12,-33 353.7,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="353.74,-36.5 363.74,-33 353.74,-29.5 353.74,-36.5"/>
 </g>
 <!-- proc~modify_wc~2 -->
 <g id="proc~~get_wc_all~2~~CalledByGraph_node3" class="node">
 <title>proc~modify_wc~2</title>
-<g id="a_proc~~get_wc_all~2~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="286,-66 130,-66 130,-42 286,-42 286,-66"/>
-<text text-anchor="middle" x="208" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+<g id="a_proc~~get_wc_all~2~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="156,-66 0,-66 0,-42 156,-42 156,-66"/>
+<text text-anchor="middle" x="78" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~get_wc~2 -->
 <g id="proc~~get_wc_all~2~~CalledByGraph_edge2" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~get_wc~2</title>
-<path fill="none" stroke="#ff0000" d="M286.12,-45C294.69,-44 303.42,-42.98 312,-41.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="312.44,-45.46 321.97,-40.82 311.63,-38.5 312.44,-45.46"/>
+<path fill="none" stroke="#ff0000" d="M156.12,-45C164.69,-44 173.42,-42.98 182,-41.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="182.44,-45.46 191.97,-40.82 181.63,-38.5 182.44,-45.46"/>
 </g>
 <!-- proc~modify_xc~2 -->
 <g id="proc~~get_wc_all~2~~CalledByGraph_node4" class="node">
 <title>proc~modify_xc~2</title>
-<g id="a_proc~~get_wc_all~2~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="284.5,-24 131.5,-24 131.5,0 284.5,0 284.5,-24"/>
-<text text-anchor="middle" x="208" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+<g id="a_proc~~get_wc_all~2~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="154.5,-24 1.5,-24 1.5,0 154.5,0 154.5,-24"/>
+<text text-anchor="middle" x="78" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~get_wc~2 -->
 <g id="proc~~get_wc_all~2~~CalledByGraph_edge3" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~get_wc~2</title>
-<path fill="none" stroke="#ff0000" d="M284.55,-20.81C293.57,-21.87 302.79,-22.94 311.83,-24"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="311.6,-27.49 321.94,-25.18 312.41,-20.54 311.6,-27.49"/>
-</g>
-<!-- program~example_ppm3 -->
-<g id="proc~~get_wc_all~2~~CalledByGraph_node5" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~get_wc_all~2~~CalledByGraph_node5"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
-<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
-<g id="proc~~get_wc_all~2~~CalledByGraph_edge4" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#00ffff" d="M94.42,-12C102.9,-12 111.99,-12 121.2,-12"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="121.21,-15.5 131.21,-12 121.21,-8.5 121.21,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M154.55,-20.81C163.57,-21.87 172.79,-22.94 181.83,-24"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="181.6,-27.49 191.94,-25.18 182.41,-20.54 181.6,-27.49"/>
 </g>
 </g>
 </svg>
-</div>                <script>
-                  var panprocget_wc_all2CalledByGraph = svgPanZoom('#procget_wc_all2CalledByGraph',
-                    {zoomEnabled: true, controlIconsEnabled: true, fit: true, center: true,}
-                  );
-                </script>          <div>
+</div>          <div>
             <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
           </div>
           <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
@@ -382,7 +363,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_wc_all~3.html b/proc/get_wc_all~3.html
index 43c1fd1be..71192b681 100644
--- a/proc/get_wc_all~3.html
+++ b/proc/get_wc_all~3.html
@@ -83,15 +83,15 @@ <h1>get_Wc_all
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Wc_all</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Wc_all(this) result(Wc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~145"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~142"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -176,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-wc~54"></span>
+          <span class="anchor" id="variable-wc~51"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -193,65 +193,84 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_wc_all~3~~CalledByGraph Pages: 1 -->
-<svg id="procget_wc_all3CalledByGraph" width="498pt" height="74pt"
- viewBox="0.00 0.00 498.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~get_wc_all~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
+<svg id="procget_wc_all3CalledByGraph" width="641pt" height="72pt"
+ viewBox="0.00 0.00 641.00 72.31" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~get_wc_all~3~~CalledByGraph" class="graph" transform="scale(1.02 1.02) rotate(0) translate(4 70)">
 <title>proc~~get_wc_all~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 494,-70 494,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 652,-70 652,4 -4,4"/>
 <!-- proc~get_wc_all~3 -->
 <g id="proc~~get_wc_all~3~~CalledByGraph_node1" class="node">
 <title>proc~get_wc_all~3</title>
-<polygon fill="none" stroke="black" points="490,-45 345,-45 345,-21 490,-21 490,-45"/>
-<text text-anchor="middle" x="417.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_Wc_all</text>
+<polygon fill="none" stroke="black" points="648,-45 494,-45 494,-21 648,-21 648,-45"/>
+<text text-anchor="middle" x="571" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_Wc_all</text>
 </g>
 <!-- none~get_wc~3 -->
 <g id="proc~~get_wc_all~3~~CalledByGraph_node2" class="node">
 <title>none~get_wc~3</title>
-<g id="a_proc~~get_wc_all~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_wc~3" xlink:title="nurbs_curve%get_Wc">
-<polygon fill="#a7506f" stroke="#a7506f" points="309,-45 182,-45 182,-21 309,-21 309,-45"/>
-<text text-anchor="middle" x="245.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wc</text>
+<g id="a_proc~~get_wc_all~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_wc~3" xlink:title="nurbs_surface%get_Wc">
+<polygon fill="#a7506f" stroke="#a7506f" points="458,-45 322,-45 322,-21 458,-21 458,-45"/>
+<text text-anchor="middle" x="390" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc~3&#45;&gt;proc~get_wc_all~3 -->
 <g id="proc~~get_wc_all~3~~CalledByGraph_edge1" class="edge">
 <title>none~get_wc~3&#45;&gt;proc~get_wc_all~3</title>
-<path fill="none" stroke="#ff0000" d="M309.32,-33C317.52,-33 326.02,-33 334.48,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="334.76,-36.5 344.76,-33 334.76,-29.5 334.76,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M458.16,-33C466.5,-33 475.12,-33 483.7,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="483.74,-36.5 493.74,-33 483.74,-29.5 483.74,-36.5"/>
 </g>
 <!-- proc~modify_wc~3 -->
 <g id="proc~~get_wc_all~3~~CalledByGraph_node3" class="node">
 <title>proc~modify_wc~3</title>
-<g id="a_proc~~get_wc_all~3~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="146,-66 0,-66 0,-42 146,-42 146,-66"/>
-<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
+<g id="a_proc~~get_wc_all~3~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="286,-66 130,-66 130,-42 286,-42 286,-66"/>
+<text text-anchor="middle" x="208" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~get_wc~3 -->
 <g id="proc~~get_wc_all~3~~CalledByGraph_edge2" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~get_wc~3</title>
-<path fill="none" stroke="#ff0000" d="M146.31,-45.09C154.7,-44.06 163.26,-43.01 171.65,-41.97"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="172.29,-45.42 181.79,-40.72 171.43,-38.47 172.29,-45.42"/>
+<path fill="none" stroke="#ff0000" d="M286.12,-45C294.69,-44 303.42,-42.98 312,-41.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="312.44,-45.46 321.97,-40.82 311.63,-38.5 312.44,-45.46"/>
 </g>
 <!-- proc~modify_xc~3 -->
 <g id="proc~~get_wc_all~3~~CalledByGraph_node4" class="node">
 <title>proc~modify_xc~3</title>
-<g id="a_proc~~get_wc_all~3~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="144.5,-24 1.5,-24 1.5,0 144.5,0 144.5,-24"/>
-<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
+<g id="a_proc~~get_wc_all~3~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="284.5,-24 131.5,-24 131.5,0 284.5,0 284.5,-24"/>
+<text text-anchor="middle" x="208" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~get_wc~3 -->
 <g id="proc~~get_wc_all~3~~CalledByGraph_edge3" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~get_wc~3</title>
-<path fill="none" stroke="#ff0000" d="M144.83,-20.72C153.73,-21.82 162.86,-22.94 171.79,-24.05"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="171.43,-27.53 181.78,-25.28 172.28,-20.58 171.43,-27.53"/>
+<path fill="none" stroke="#ff0000" d="M284.55,-20.81C293.57,-21.87 302.79,-22.94 311.83,-24"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="311.6,-27.49 321.94,-25.18 312.41,-20.54 311.6,-27.49"/>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~get_wc_all~3~~CalledByGraph_node5" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~get_wc_all~3~~CalledByGraph_node5"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
+<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
+<g id="proc~~get_wc_all~3~~CalledByGraph_edge4" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#00ffff" d="M94.42,-12C102.9,-12 111.99,-12 121.2,-12"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="121.21,-15.5 131.21,-12 121.21,-8.5 121.21,-15.5"/>
 </g>
 </g>
 </svg>
-</div>          <div>
+</div>                <script>
+                  var panprocget_wc_all3CalledByGraph = svgPanZoom('#procget_wc_all3CalledByGraph',
+                    {zoomEnabled: true, controlIconsEnabled: true, fit: true, center: true,}
+                  );
+                </script>          <div>
             <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
           </div>
           <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
@@ -363,7 +382,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_wci.html b/proc/get_wci.html
index a8bca2449..ff463cace 100644
--- a/proc/get_wci.html
+++ b/proc/get_wci.html
@@ -83,15 +83,15 @@ <h1>get_Wci
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Wci</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Wci(this, n) result(Wc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~14"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~15"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -191,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-wc~8"></span>
+          <span class="anchor" id="variable-wc~14"></span>
           real(kind=rk)
         </small>
       </h3>
@@ -208,61 +208,61 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_wci~~CalledByGraph Pages: 1 -->
-<svg id="procget_wciCalledByGraph" width="511pt" height="74pt"
- viewBox="0.00 0.00 511.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procget_wciCalledByGraph" width="483pt" height="74pt"
+ viewBox="0.00 0.00 483.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~get_wci~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~get_wci~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 507,-70 507,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 479,-70 479,4 -4,4"/>
 <!-- proc~get_wci -->
 <g id="proc~~get_wci~~CalledByGraph_node1" class="node">
 <title>proc~get_wci</title>
-<polygon fill="none" stroke="black" points="503,-45 364,-45 364,-21 503,-21 503,-45"/>
-<text text-anchor="middle" x="433.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_Wci</text>
+<polygon fill="none" stroke="black" points="475,-45 345,-45 345,-21 475,-21 475,-45"/>
+<text text-anchor="middle" x="410" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_Wci</text>
 </g>
 <!-- none~get_wc -->
 <g id="proc~~get_wci~~CalledByGraph_node2" class="node">
 <title>none~get_wc</title>
-<g id="a_proc~~get_wci~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_wc" xlink:title="nurbs_volume%get_Wc">
-<polygon fill="#a7506f" stroke="#a7506f" points="328,-45 192,-45 192,-21 328,-21 328,-45"/>
-<text text-anchor="middle" x="260" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wc</text>
+<g id="a_proc~~get_wci~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_wc" xlink:title="nurbs_curve%get_Wc">
+<polygon fill="#a7506f" stroke="#a7506f" points="309,-45 182,-45 182,-21 309,-21 309,-45"/>
+<text text-anchor="middle" x="245.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wc</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc&#45;&gt;proc~get_wci -->
 <g id="proc~~get_wci~~CalledByGraph_edge1" class="edge">
 <title>none~get_wc&#45;&gt;proc~get_wci</title>
-<path fill="none" stroke="#ff0000" d="M328.29,-33C336.72,-33 345.4,-33 353.98,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="354,-36.5 364,-33 354,-29.5 354,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M309.33,-33C317.64,-33 326.23,-33 334.72,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="335,-36.5 345,-33 335,-29.5 335,-36.5"/>
 </g>
 <!-- proc~modify_wc -->
 <g id="proc~~get_wci~~CalledByGraph_node3" class="node">
 <title>proc~modify_wc</title>
-<g id="a_proc~~get_wci~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="156,-66 0,-66 0,-42 156,-42 156,-66"/>
-<text text-anchor="middle" x="78" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
+<g id="a_proc~~get_wci~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="146,-66 0,-66 0,-42 146,-42 146,-66"/>
+<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~get_wc -->
 <g id="proc~~get_wci~~CalledByGraph_edge2" class="edge">
 <title>proc~modify_wc&#45;&gt;none~get_wc</title>
-<path fill="none" stroke="#ff0000" d="M156.12,-45C164.69,-44 173.42,-42.98 182,-41.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="182.44,-45.46 191.97,-40.82 181.63,-38.5 182.44,-45.46"/>
+<path fill="none" stroke="#ff0000" d="M146.31,-45.09C154.7,-44.06 163.26,-43.01 171.65,-41.97"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="172.29,-45.42 181.79,-40.72 171.43,-38.47 172.29,-45.42"/>
 </g>
 <!-- proc~modify_xc -->
 <g id="proc~~get_wci~~CalledByGraph_node4" class="node">
 <title>proc~modify_xc</title>
-<g id="a_proc~~get_wci~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="154.5,-24 1.5,-24 1.5,0 154.5,0 154.5,-24"/>
-<text text-anchor="middle" x="78" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
+<g id="a_proc~~get_wci~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="144.5,-24 1.5,-24 1.5,0 144.5,0 144.5,-24"/>
+<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~get_wc -->
 <g id="proc~~get_wci~~CalledByGraph_edge3" class="edge">
 <title>proc~modify_xc&#45;&gt;none~get_wc</title>
-<path fill="none" stroke="#ff0000" d="M154.55,-20.81C163.57,-21.87 172.79,-22.94 181.83,-24"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="181.6,-27.49 191.94,-25.18 182.41,-20.54 181.6,-27.49"/>
+<path fill="none" stroke="#ff0000" d="M144.83,-20.72C153.73,-21.82 162.86,-22.94 171.79,-24.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="171.43,-27.53 181.78,-25.28 172.28,-20.58 171.43,-27.53"/>
 </g>
 </g>
 </svg>
@@ -378,7 +378,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_wci~2.html b/proc/get_wci~2.html
index 588adc35c..c77139bb1 100644
--- a/proc/get_wci~2.html
+++ b/proc/get_wci~2.html
@@ -83,15 +83,15 @@ <h1>get_Wci
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Wci</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Wci(this, n) result(Wc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~82"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~75"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~13"></span>
+              <span class="anchor" id="variable-n~10"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -208,84 +208,65 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_wci~2~~CalledByGraph Pages: 1 -->
-<svg id="procget_wci2CalledByGraph" width="641pt" height="74pt"
- viewBox="0.00 0.00 641.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procget_wci2CalledByGraph" width="511pt" height="74pt"
+ viewBox="0.00 0.00 511.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~get_wci~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~get_wci~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 637,-70 637,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 507,-70 507,4 -4,4"/>
 <!-- proc~get_wci~2 -->
 <g id="proc~~get_wci~2~~CalledByGraph_node1" class="node">
 <title>proc~get_wci~2</title>
-<polygon fill="none" stroke="black" points="633,-45 494,-45 494,-21 633,-21 633,-45"/>
-<text text-anchor="middle" x="563.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_Wci</text>
+<polygon fill="none" stroke="black" points="503,-45 364,-45 364,-21 503,-21 503,-45"/>
+<text text-anchor="middle" x="433.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_Wci</text>
 </g>
 <!-- none~get_wc~2 -->
 <g id="proc~~get_wci~2~~CalledByGraph_node2" class="node">
 <title>none~get_wc~2</title>
-<g id="a_proc~~get_wci~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_wc~2" xlink:title="nurbs_surface%get_Wc">
-<polygon fill="#a7506f" stroke="#a7506f" points="458,-45 322,-45 322,-21 458,-21 458,-45"/>
-<text text-anchor="middle" x="390" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc</text>
+<g id="a_proc~~get_wci~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_wc~2" xlink:title="nurbs_volume%get_Wc">
+<polygon fill="#a7506f" stroke="#a7506f" points="328,-45 192,-45 192,-21 328,-21 328,-45"/>
+<text text-anchor="middle" x="260" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wc</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc~2&#45;&gt;proc~get_wci~2 -->
 <g id="proc~~get_wci~2~~CalledByGraph_edge1" class="edge">
 <title>none~get_wc~2&#45;&gt;proc~get_wci~2</title>
-<path fill="none" stroke="#ff0000" d="M458.29,-33C466.72,-33 475.4,-33 483.98,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="484,-36.5 494,-33 484,-29.5 484,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M328.29,-33C336.72,-33 345.4,-33 353.98,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="354,-36.5 364,-33 354,-29.5 354,-36.5"/>
 </g>
 <!-- proc~modify_wc~2 -->
 <g id="proc~~get_wci~2~~CalledByGraph_node3" class="node">
 <title>proc~modify_wc~2</title>
-<g id="a_proc~~get_wci~2~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="286,-66 130,-66 130,-42 286,-42 286,-66"/>
-<text text-anchor="middle" x="208" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+<g id="a_proc~~get_wci~2~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="156,-66 0,-66 0,-42 156,-42 156,-66"/>
+<text text-anchor="middle" x="78" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~get_wc~2 -->
 <g id="proc~~get_wci~2~~CalledByGraph_edge2" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~get_wc~2</title>
-<path fill="none" stroke="#ff0000" d="M286.12,-45C294.69,-44 303.42,-42.98 312,-41.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="312.44,-45.46 321.97,-40.82 311.63,-38.5 312.44,-45.46"/>
+<path fill="none" stroke="#ff0000" d="M156.12,-45C164.69,-44 173.42,-42.98 182,-41.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="182.44,-45.46 191.97,-40.82 181.63,-38.5 182.44,-45.46"/>
 </g>
 <!-- proc~modify_xc~2 -->
 <g id="proc~~get_wci~2~~CalledByGraph_node4" class="node">
 <title>proc~modify_xc~2</title>
-<g id="a_proc~~get_wci~2~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="284.5,-24 131.5,-24 131.5,0 284.5,0 284.5,-24"/>
-<text text-anchor="middle" x="208" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+<g id="a_proc~~get_wci~2~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="154.5,-24 1.5,-24 1.5,0 154.5,0 154.5,-24"/>
+<text text-anchor="middle" x="78" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~get_wc~2 -->
 <g id="proc~~get_wci~2~~CalledByGraph_edge3" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~get_wc~2</title>
-<path fill="none" stroke="#ff0000" d="M284.55,-20.81C293.57,-21.87 302.79,-22.94 311.83,-24"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="311.6,-27.49 321.94,-25.18 312.41,-20.54 311.6,-27.49"/>
-</g>
-<!-- program~example_ppm3 -->
-<g id="proc~~get_wci~2~~CalledByGraph_node5" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~get_wci~2~~CalledByGraph_node5"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
-<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
-<g id="proc~~get_wci~2~~CalledByGraph_edge4" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#00ffff" d="M94.42,-12C102.9,-12 111.99,-12 121.2,-12"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="121.21,-15.5 131.21,-12 121.21,-8.5 121.21,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M154.55,-20.81C163.57,-21.87 172.79,-22.94 181.83,-24"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="181.6,-27.49 191.94,-25.18 182.41,-20.54 181.6,-27.49"/>
 </g>
 </g>
 </svg>
-</div>                <script>
-                  var panprocget_wci2CalledByGraph = svgPanZoom('#procget_wci2CalledByGraph',
-                    {zoomEnabled: true, controlIconsEnabled: true, fit: true, center: true,}
-                  );
-                </script>          <div>
+</div>          <div>
             <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
           </div>
           <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
@@ -397,7 +378,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_wci~3.html b/proc/get_wci~3.html
index ae082ecbe..0ed62c875 100644
--- a/proc/get_wci~3.html
+++ b/proc/get_wci~3.html
@@ -83,15 +83,15 @@ <h1>get_Wci
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Wci</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Wci(this, n) result(Wc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~146"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~143"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -191,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-wc~55"></span>
+          <span class="anchor" id="variable-wc~52"></span>
           real(kind=rk)
         </small>
       </h3>
@@ -208,65 +208,84 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_wci~3~~CalledByGraph Pages: 1 -->
-<svg id="procget_wci3CalledByGraph" width="483pt" height="74pt"
- viewBox="0.00 0.00 483.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procget_wci3CalledByGraph" width="641pt" height="74pt"
+ viewBox="0.00 0.00 641.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~get_wci~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~get_wci~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 479,-70 479,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 637,-70 637,4 -4,4"/>
 <!-- proc~get_wci~3 -->
 <g id="proc~~get_wci~3~~CalledByGraph_node1" class="node">
 <title>proc~get_wci~3</title>
-<polygon fill="none" stroke="black" points="475,-45 345,-45 345,-21 475,-21 475,-45"/>
-<text text-anchor="middle" x="410" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_Wci</text>
+<polygon fill="none" stroke="black" points="633,-45 494,-45 494,-21 633,-21 633,-45"/>
+<text text-anchor="middle" x="563.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_Wci</text>
 </g>
 <!-- none~get_wc~3 -->
 <g id="proc~~get_wci~3~~CalledByGraph_node2" class="node">
 <title>none~get_wc~3</title>
-<g id="a_proc~~get_wci~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_wc~3" xlink:title="nurbs_curve%get_Wc">
-<polygon fill="#a7506f" stroke="#a7506f" points="309,-45 182,-45 182,-21 309,-21 309,-45"/>
-<text text-anchor="middle" x="245.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wc</text>
+<g id="a_proc~~get_wci~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_wc~3" xlink:title="nurbs_surface%get_Wc">
+<polygon fill="#a7506f" stroke="#a7506f" points="458,-45 322,-45 322,-21 458,-21 458,-45"/>
+<text text-anchor="middle" x="390" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc~3&#45;&gt;proc~get_wci~3 -->
 <g id="proc~~get_wci~3~~CalledByGraph_edge1" class="edge">
 <title>none~get_wc~3&#45;&gt;proc~get_wci~3</title>
-<path fill="none" stroke="#ff0000" d="M309.33,-33C317.64,-33 326.23,-33 334.72,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="335,-36.5 345,-33 335,-29.5 335,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M458.29,-33C466.72,-33 475.4,-33 483.98,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="484,-36.5 494,-33 484,-29.5 484,-36.5"/>
 </g>
 <!-- proc~modify_wc~3 -->
 <g id="proc~~get_wci~3~~CalledByGraph_node3" class="node">
 <title>proc~modify_wc~3</title>
-<g id="a_proc~~get_wci~3~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="146,-66 0,-66 0,-42 146,-42 146,-66"/>
-<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
+<g id="a_proc~~get_wci~3~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="286,-66 130,-66 130,-42 286,-42 286,-66"/>
+<text text-anchor="middle" x="208" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~get_wc~3 -->
 <g id="proc~~get_wci~3~~CalledByGraph_edge2" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~get_wc~3</title>
-<path fill="none" stroke="#ff0000" d="M146.31,-45.09C154.7,-44.06 163.26,-43.01 171.65,-41.97"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="172.29,-45.42 181.79,-40.72 171.43,-38.47 172.29,-45.42"/>
+<path fill="none" stroke="#ff0000" d="M286.12,-45C294.69,-44 303.42,-42.98 312,-41.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="312.44,-45.46 321.97,-40.82 311.63,-38.5 312.44,-45.46"/>
 </g>
 <!-- proc~modify_xc~3 -->
 <g id="proc~~get_wci~3~~CalledByGraph_node4" class="node">
 <title>proc~modify_xc~3</title>
-<g id="a_proc~~get_wci~3~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="144.5,-24 1.5,-24 1.5,0 144.5,0 144.5,-24"/>
-<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
+<g id="a_proc~~get_wci~3~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="284.5,-24 131.5,-24 131.5,0 284.5,0 284.5,-24"/>
+<text text-anchor="middle" x="208" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~get_wc~3 -->
 <g id="proc~~get_wci~3~~CalledByGraph_edge3" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~get_wc~3</title>
-<path fill="none" stroke="#ff0000" d="M144.83,-20.72C153.73,-21.82 162.86,-22.94 171.79,-24.05"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="171.43,-27.53 181.78,-25.28 172.28,-20.58 171.43,-27.53"/>
+<path fill="none" stroke="#ff0000" d="M284.55,-20.81C293.57,-21.87 302.79,-22.94 311.83,-24"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="311.6,-27.49 321.94,-25.18 312.41,-20.54 311.6,-27.49"/>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~get_wci~3~~CalledByGraph_node5" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~get_wci~3~~CalledByGraph_node5"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
+<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
+<g id="proc~~get_wci~3~~CalledByGraph_edge4" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#00ffff" d="M94.42,-12C102.9,-12 111.99,-12 121.2,-12"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="121.21,-15.5 131.21,-12 121.21,-8.5 121.21,-15.5"/>
 </g>
 </g>
 </svg>
-</div>          <div>
+</div>                <script>
+                  var panprocget_wci3CalledByGraph = svgPanZoom('#procget_wci3CalledByGraph',
+                    {zoomEnabled: true, controlIconsEnabled: true, fit: true, center: true,}
+                  );
+                </script>          <div>
             <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
           </div>
           <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
@@ -378,7 +397,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xc_all.html b/proc/get_xc_all.html
index d4d4dbb73..f0be75392 100644
--- a/proc/get_xc_all.html
+++ b/proc/get_xc_all.html
@@ -83,15 +83,15 @@ <h1>get_Xc_all
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xc_all</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xc_all(this) result(Xc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~7"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~8"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -176,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xc~8"></span>
+          <span class="anchor" id="variable-xc~13"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
@@ -193,61 +193,61 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_xc_all~~CalledByGraph Pages: 1 -->
-<svg id="procget_xc_allCalledByGraph" width="520pt" height="74pt"
- viewBox="0.00 0.00 520.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procget_xc_allCalledByGraph" width="492pt" height="74pt"
+ viewBox="0.00 0.00 492.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~get_xc_all~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~get_xc_all~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 516,-70 516,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 488,-70 488,4 -4,4"/>
 <!-- proc~get_xc_all -->
 <g id="proc~~get_xc_all~~CalledByGraph_node1" class="node">
 <title>proc~get_xc_all</title>
-<polygon fill="none" stroke="black" points="512,-45 361,-45 361,-21 512,-21 512,-45"/>
-<text text-anchor="middle" x="436.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_Xc_all</text>
+<polygon fill="none" stroke="black" points="484,-45 342,-45 342,-21 484,-21 484,-45"/>
+<text text-anchor="middle" x="413" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_Xc_all</text>
 </g>
 <!-- none~get_xc -->
 <g id="proc~~get_xc_all~~CalledByGraph_node2" class="node">
 <title>none~get_xc</title>
-<g id="a_proc~~get_xc_all~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_xc" xlink:title="nurbs_volume%get_Xc">
-<polygon fill="#a7506f" stroke="#a7506f" points="325,-45 192,-45 192,-21 325,-21 325,-45"/>
-<text text-anchor="middle" x="258.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc</text>
+<g id="a_proc~~get_xc_all~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_xc" xlink:title="nurbs_curve%get_Xc">
+<polygon fill="#a7506f" stroke="#a7506f" points="306,-45 182,-45 182,-21 306,-21 306,-45"/>
+<text text-anchor="middle" x="244" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc&#45;&gt;proc~get_xc_all -->
 <g id="proc~~get_xc_all~~CalledByGraph_edge1" class="edge">
 <title>none~get_xc&#45;&gt;proc~get_xc_all</title>
-<path fill="none" stroke="#ff0000" d="M325.04,-33C333.4,-33 342.04,-33 350.65,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="350.72,-36.5 360.72,-33 350.72,-29.5 350.72,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M306.24,-33C314.53,-33 323.15,-33 331.71,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="331.73,-36.5 341.73,-33 331.73,-29.5 331.73,-36.5"/>
 </g>
 <!-- proc~modify_wc -->
 <g id="proc~~get_xc_all~~CalledByGraph_node3" class="node">
 <title>proc~modify_wc</title>
-<g id="a_proc~~get_xc_all~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="156,-66 0,-66 0,-42 156,-42 156,-66"/>
-<text text-anchor="middle" x="78" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
+<g id="a_proc~~get_xc_all~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="146,-66 0,-66 0,-42 146,-42 146,-66"/>
+<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~get_xc -->
 <g id="proc~~get_xc_all~~CalledByGraph_edge2" class="edge">
 <title>proc~modify_wc&#45;&gt;none~get_xc</title>
-<path fill="none" stroke="#ff0000" d="M156.25,-44.91C164.69,-43.92 173.28,-42.91 181.7,-41.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="182.35,-45.37 191.87,-40.72 181.53,-38.41 182.35,-45.37"/>
+<path fill="none" stroke="#ff0000" d="M146.16,-45.03C154.74,-43.97 163.49,-42.88 172.05,-41.82"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="172.49,-45.29 181.98,-40.58 171.63,-38.34 172.49,-45.29"/>
 </g>
 <!-- proc~modify_xc -->
 <g id="proc~~get_xc_all~~CalledByGraph_node4" class="node">
 <title>proc~modify_xc</title>
-<g id="a_proc~~get_xc_all~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="154.5,-24 1.5,-24 1.5,0 154.5,0 154.5,-24"/>
-<text text-anchor="middle" x="78" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
+<g id="a_proc~~get_xc_all~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="144.5,-24 1.5,-24 1.5,0 144.5,0 144.5,-24"/>
+<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~get_xc -->
 <g id="proc~~get_xc_all~~CalledByGraph_edge3" class="edge">
 <title>proc~modify_xc&#45;&gt;none~get_xc</title>
-<path fill="none" stroke="#ff0000" d="M154.7,-20.91C163.67,-21.96 172.84,-23.04 181.81,-24.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="181.5,-27.58 191.85,-25.28 182.32,-20.63 181.5,-27.58"/>
+<path fill="none" stroke="#ff0000" d="M144.69,-20.78C153.7,-21.9 162.91,-23.05 171.92,-24.17"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="171.63,-27.66 181.98,-25.42 172.49,-20.71 171.63,-27.66"/>
 </g>
 </g>
 </svg>
@@ -363,7 +363,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xc_all~2.html b/proc/get_xc_all~2.html
index db29f6269..a3e7ffb26 100644
--- a/proc/get_xc_all~2.html
+++ b/proc/get_xc_all~2.html
@@ -83,15 +83,15 @@ <h1>get_Xc_all
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xc_all</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xc_all(this) result(Xc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~75"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~68"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -176,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xc~32"></span>
+          <span class="anchor" id="variable-xc~28"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
@@ -193,84 +193,65 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_xc_all~2~~CalledByGraph Pages: 1 -->
-<svg id="procget_xc_all2CalledByGraph" width="641pt" height="73pt"
- viewBox="0.00 0.00 641.00 72.98" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~get_xc_all~2~~CalledByGraph" class="graph" transform="scale(1.01 1.01) rotate(0) translate(4 70)">
+<svg id="procget_xc_all2CalledByGraph" width="520pt" height="74pt"
+ viewBox="0.00 0.00 520.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~get_xc_all~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~get_xc_all~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 646,-70 646,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 516,-70 516,4 -4,4"/>
 <!-- proc~get_xc_all~2 -->
 <g id="proc~~get_xc_all~2~~CalledByGraph_node1" class="node">
 <title>proc~get_xc_all~2</title>
-<polygon fill="none" stroke="black" points="642,-45 491,-45 491,-21 642,-21 642,-45"/>
-<text text-anchor="middle" x="566.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_Xc_all</text>
+<polygon fill="none" stroke="black" points="512,-45 361,-45 361,-21 512,-21 512,-45"/>
+<text text-anchor="middle" x="436.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_Xc_all</text>
 </g>
 <!-- none~get_xc~2 -->
 <g id="proc~~get_xc_all~2~~CalledByGraph_node2" class="node">
 <title>none~get_xc~2</title>
-<g id="a_proc~~get_xc_all~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xc~2" xlink:title="nurbs_surface%get_Xc">
-<polygon fill="#a7506f" stroke="#a7506f" points="455,-45 322,-45 322,-21 455,-21 455,-45"/>
-<text text-anchor="middle" x="388.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc</text>
+<g id="a_proc~~get_xc_all~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_xc~2" xlink:title="nurbs_volume%get_Xc">
+<polygon fill="#a7506f" stroke="#a7506f" points="325,-45 192,-45 192,-21 325,-21 325,-45"/>
+<text text-anchor="middle" x="258.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~2&#45;&gt;proc~get_xc_all~2 -->
 <g id="proc~~get_xc_all~2~~CalledByGraph_edge1" class="edge">
 <title>none~get_xc~2&#45;&gt;proc~get_xc_all~2</title>
-<path fill="none" stroke="#ff0000" d="M455.04,-33C463.4,-33 472.04,-33 480.65,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="480.72,-36.5 490.72,-33 480.72,-29.5 480.72,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M325.04,-33C333.4,-33 342.04,-33 350.65,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="350.72,-36.5 360.72,-33 350.72,-29.5 350.72,-36.5"/>
 </g>
 <!-- proc~modify_wc~2 -->
 <g id="proc~~get_xc_all~2~~CalledByGraph_node3" class="node">
 <title>proc~modify_wc~2</title>
-<g id="a_proc~~get_xc_all~2~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="286,-66 130,-66 130,-42 286,-42 286,-66"/>
-<text text-anchor="middle" x="208" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+<g id="a_proc~~get_xc_all~2~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="156,-66 0,-66 0,-42 156,-42 156,-66"/>
+<text text-anchor="middle" x="78" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~get_xc~2 -->
 <g id="proc~~get_xc_all~2~~CalledByGraph_edge2" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~get_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M286.25,-44.91C294.69,-43.92 303.28,-42.91 311.7,-41.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="312.35,-45.37 321.87,-40.72 311.53,-38.41 312.35,-45.37"/>
+<path fill="none" stroke="#ff0000" d="M156.25,-44.91C164.69,-43.92 173.28,-42.91 181.7,-41.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="182.35,-45.37 191.87,-40.72 181.53,-38.41 182.35,-45.37"/>
 </g>
 <!-- proc~modify_xc~2 -->
 <g id="proc~~get_xc_all~2~~CalledByGraph_node4" class="node">
 <title>proc~modify_xc~2</title>
-<g id="a_proc~~get_xc_all~2~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="284.5,-24 131.5,-24 131.5,0 284.5,0 284.5,-24"/>
-<text text-anchor="middle" x="208" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+<g id="a_proc~~get_xc_all~2~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="154.5,-24 1.5,-24 1.5,0 154.5,0 154.5,-24"/>
+<text text-anchor="middle" x="78" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~get_xc~2 -->
 <g id="proc~~get_xc_all~2~~CalledByGraph_edge3" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~get_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M284.7,-20.91C293.67,-21.96 302.84,-23.04 311.81,-24.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="311.5,-27.58 321.85,-25.28 312.32,-20.63 311.5,-27.58"/>
-</g>
-<!-- program~example_ppm3 -->
-<g id="proc~~get_xc_all~2~~CalledByGraph_node5" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~get_xc_all~2~~CalledByGraph_node5"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
-<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
-<g id="proc~~get_xc_all~2~~CalledByGraph_edge4" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#00ffff" d="M94.42,-12C102.9,-12 111.99,-12 121.2,-12"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="121.21,-15.5 131.21,-12 121.21,-8.5 121.21,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M154.7,-20.91C163.67,-21.96 172.84,-23.04 181.81,-24.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="181.5,-27.58 191.85,-25.28 182.32,-20.63 181.5,-27.58"/>
 </g>
 </g>
 </svg>
-</div>                <script>
-                  var panprocget_xc_all2CalledByGraph = svgPanZoom('#procget_xc_all2CalledByGraph',
-                    {zoomEnabled: true, controlIconsEnabled: true, fit: true, center: true,}
-                  );
-                </script>          <div>
+</div>          <div>
             <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
           </div>
           <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
@@ -382,7 +363,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xc_all~3.html b/proc/get_xc_all~3.html
index 5127e32e6..c0030decc 100644
--- a/proc/get_xc_all~3.html
+++ b/proc/get_xc_all~3.html
@@ -83,15 +83,15 @@ <h1>get_Xc_all
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xc_all</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xc_all(this) result(Xc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~139"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~136"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -176,7 +176,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xc~57"></span>
+          <span class="anchor" id="variable-xc~50"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
@@ -193,65 +193,84 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_xc_all~3~~CalledByGraph Pages: 1 -->
-<svg id="procget_xc_all3CalledByGraph" width="492pt" height="74pt"
- viewBox="0.00 0.00 492.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~get_xc_all~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
+<svg id="procget_xc_all3CalledByGraph" width="641pt" height="73pt"
+ viewBox="0.00 0.00 641.00 72.98" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~get_xc_all~3~~CalledByGraph" class="graph" transform="scale(1.01 1.01) rotate(0) translate(4 70)">
 <title>proc~~get_xc_all~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 488,-70 488,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 646,-70 646,4 -4,4"/>
 <!-- proc~get_xc_all~3 -->
 <g id="proc~~get_xc_all~3~~CalledByGraph_node1" class="node">
 <title>proc~get_xc_all~3</title>
-<polygon fill="none" stroke="black" points="484,-45 342,-45 342,-21 484,-21 484,-45"/>
-<text text-anchor="middle" x="413" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_Xc_all</text>
+<polygon fill="none" stroke="black" points="642,-45 491,-45 491,-21 642,-21 642,-45"/>
+<text text-anchor="middle" x="566.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_Xc_all</text>
 </g>
 <!-- none~get_xc~3 -->
 <g id="proc~~get_xc_all~3~~CalledByGraph_node2" class="node">
 <title>none~get_xc~3</title>
-<g id="a_proc~~get_xc_all~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_xc~3" xlink:title="nurbs_curve%get_Xc">
-<polygon fill="#a7506f" stroke="#a7506f" points="306,-45 182,-45 182,-21 306,-21 306,-45"/>
-<text text-anchor="middle" x="244" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc</text>
+<g id="a_proc~~get_xc_all~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xc~3" xlink:title="nurbs_surface%get_Xc">
+<polygon fill="#a7506f" stroke="#a7506f" points="455,-45 322,-45 322,-21 455,-21 455,-45"/>
+<text text-anchor="middle" x="388.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~3&#45;&gt;proc~get_xc_all~3 -->
 <g id="proc~~get_xc_all~3~~CalledByGraph_edge1" class="edge">
 <title>none~get_xc~3&#45;&gt;proc~get_xc_all~3</title>
-<path fill="none" stroke="#ff0000" d="M306.24,-33C314.53,-33 323.15,-33 331.71,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="331.73,-36.5 341.73,-33 331.73,-29.5 331.73,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M455.04,-33C463.4,-33 472.04,-33 480.65,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="480.72,-36.5 490.72,-33 480.72,-29.5 480.72,-36.5"/>
 </g>
 <!-- proc~modify_wc~3 -->
 <g id="proc~~get_xc_all~3~~CalledByGraph_node3" class="node">
 <title>proc~modify_wc~3</title>
-<g id="a_proc~~get_xc_all~3~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="146,-66 0,-66 0,-42 146,-42 146,-66"/>
-<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
+<g id="a_proc~~get_xc_all~3~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="286,-66 130,-66 130,-42 286,-42 286,-66"/>
+<text text-anchor="middle" x="208" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~get_xc~3 -->
 <g id="proc~~get_xc_all~3~~CalledByGraph_edge2" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~get_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M146.16,-45.03C154.74,-43.97 163.49,-42.88 172.05,-41.82"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="172.49,-45.29 181.98,-40.58 171.63,-38.34 172.49,-45.29"/>
+<path fill="none" stroke="#ff0000" d="M286.25,-44.91C294.69,-43.92 303.28,-42.91 311.7,-41.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="312.35,-45.37 321.87,-40.72 311.53,-38.41 312.35,-45.37"/>
 </g>
 <!-- proc~modify_xc~3 -->
 <g id="proc~~get_xc_all~3~~CalledByGraph_node4" class="node">
 <title>proc~modify_xc~3</title>
-<g id="a_proc~~get_xc_all~3~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="144.5,-24 1.5,-24 1.5,0 144.5,0 144.5,-24"/>
-<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
+<g id="a_proc~~get_xc_all~3~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="284.5,-24 131.5,-24 131.5,0 284.5,0 284.5,-24"/>
+<text text-anchor="middle" x="208" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~get_xc~3 -->
 <g id="proc~~get_xc_all~3~~CalledByGraph_edge3" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~get_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M144.69,-20.78C153.7,-21.9 162.91,-23.05 171.92,-24.17"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="171.63,-27.66 181.98,-25.42 172.49,-20.71 171.63,-27.66"/>
+<path fill="none" stroke="#ff0000" d="M284.7,-20.91C293.67,-21.96 302.84,-23.04 311.81,-24.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="311.5,-27.58 321.85,-25.28 312.32,-20.63 311.5,-27.58"/>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~get_xc_all~3~~CalledByGraph_node5" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~get_xc_all~3~~CalledByGraph_node5"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
+<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
+<g id="proc~~get_xc_all~3~~CalledByGraph_edge4" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#00ffff" d="M94.42,-12C102.9,-12 111.99,-12 121.2,-12"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="121.21,-15.5 131.21,-12 121.21,-8.5 121.21,-15.5"/>
 </g>
 </g>
 </svg>
-</div>          <div>
+</div>                <script>
+                  var panprocget_xc_all3CalledByGraph = svgPanZoom('#procget_xc_all3CalledByGraph',
+                    {zoomEnabled: true, controlIconsEnabled: true, fit: true, center: true,}
+                  );
+                </script>          <div>
             <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
           </div>
           <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
@@ -363,7 +382,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xci.html b/proc/get_xci.html
index df575beb1..46e9db59b 100644
--- a/proc/get_xci.html
+++ b/proc/get_xci.html
@@ -83,15 +83,15 @@ <h1>get_Xci
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xci</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xci(this, n) result(Xc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~8"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~9"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -191,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xc~9"></span>
+          <span class="anchor" id="variable-xc~14"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -208,61 +208,61 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_xci~~CalledByGraph Pages: 1 -->
-<svg id="procget_xciCalledByGraph" width="505pt" height="74pt"
- viewBox="0.00 0.00 505.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procget_xciCalledByGraph" width="477pt" height="74pt"
+ viewBox="0.00 0.00 477.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~get_xci~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~get_xci~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 501,-70 501,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 473,-70 473,4 -4,4"/>
 <!-- proc~get_xci -->
 <g id="proc~~get_xci~~CalledByGraph_node1" class="node">
 <title>proc~get_xci</title>
-<polygon fill="none" stroke="black" points="497,-45 361,-45 361,-21 497,-21 497,-45"/>
-<text text-anchor="middle" x="429" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_Xci</text>
+<polygon fill="none" stroke="black" points="469,-45 342,-45 342,-21 469,-21 469,-45"/>
+<text text-anchor="middle" x="405.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_Xci</text>
 </g>
 <!-- none~get_xc -->
 <g id="proc~~get_xci~~CalledByGraph_node2" class="node">
 <title>none~get_xc</title>
-<g id="a_proc~~get_xci~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_xc" xlink:title="nurbs_volume%get_Xc">
-<polygon fill="#a7506f" stroke="#a7506f" points="325,-45 192,-45 192,-21 325,-21 325,-45"/>
-<text text-anchor="middle" x="258.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc</text>
+<g id="a_proc~~get_xci~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_xc" xlink:title="nurbs_curve%get_Xc">
+<polygon fill="#a7506f" stroke="#a7506f" points="306,-45 182,-45 182,-21 306,-21 306,-45"/>
+<text text-anchor="middle" x="244" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc&#45;&gt;proc~get_xci -->
 <g id="proc~~get_xci~~CalledByGraph_edge1" class="edge">
 <title>none~get_xc&#45;&gt;proc~get_xci</title>
-<path fill="none" stroke="#ff0000" d="M325.13,-33C333.56,-33 342.26,-33 350.86,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="350.88,-36.5 360.88,-33 350.88,-29.5 350.88,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M306.21,-33C314.52,-33 323.11,-33 331.59,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="331.87,-36.5 341.87,-33 331.87,-29.5 331.87,-36.5"/>
 </g>
 <!-- proc~modify_wc -->
 <g id="proc~~get_xci~~CalledByGraph_node3" class="node">
 <title>proc~modify_wc</title>
-<g id="a_proc~~get_xci~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="156,-66 0,-66 0,-42 156,-42 156,-66"/>
-<text text-anchor="middle" x="78" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
+<g id="a_proc~~get_xci~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="146,-66 0,-66 0,-42 146,-42 146,-66"/>
+<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~get_xc -->
 <g id="proc~~get_xci~~CalledByGraph_edge2" class="edge">
 <title>proc~modify_wc&#45;&gt;none~get_xc</title>
-<path fill="none" stroke="#ff0000" d="M156.25,-44.91C164.69,-43.92 173.28,-42.91 181.7,-41.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="182.35,-45.37 191.87,-40.72 181.53,-38.41 182.35,-45.37"/>
+<path fill="none" stroke="#ff0000" d="M146.16,-45.03C154.74,-43.97 163.49,-42.88 172.05,-41.82"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="172.49,-45.29 181.98,-40.58 171.63,-38.34 172.49,-45.29"/>
 </g>
 <!-- proc~modify_xc -->
 <g id="proc~~get_xci~~CalledByGraph_node4" class="node">
 <title>proc~modify_xc</title>
-<g id="a_proc~~get_xci~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="154.5,-24 1.5,-24 1.5,0 154.5,0 154.5,-24"/>
-<text text-anchor="middle" x="78" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
+<g id="a_proc~~get_xci~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="144.5,-24 1.5,-24 1.5,0 144.5,0 144.5,-24"/>
+<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~get_xc -->
 <g id="proc~~get_xci~~CalledByGraph_edge3" class="edge">
 <title>proc~modify_xc&#45;&gt;none~get_xc</title>
-<path fill="none" stroke="#ff0000" d="M154.7,-20.91C163.67,-21.96 172.84,-23.04 181.81,-24.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="181.5,-27.58 191.85,-25.28 182.32,-20.63 181.5,-27.58"/>
+<path fill="none" stroke="#ff0000" d="M144.69,-20.78C153.7,-21.9 162.91,-23.05 171.92,-24.17"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="171.63,-27.66 181.98,-25.42 172.49,-20.71 171.63,-27.66"/>
 </g>
 </g>
 </svg>
@@ -378,7 +378,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xcid.html b/proc/get_xcid.html
index 39a6bf111..89686d55c 100644
--- a/proc/get_xcid.html
+++ b/proc/get_xcid.html
@@ -83,15 +83,15 @@ <h1>get_Xcid
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xcid</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xcid(this, n, dir) result(Xc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~9"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~10"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -206,7 +206,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xc~10"></span>
+          <span class="anchor" id="variable-xc~15"></span>
           real(kind=rk)
         </small>
       </h3>
@@ -223,61 +223,61 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_xcid~~CalledByGraph Pages: 1 -->
-<svg id="procget_xcidCalledByGraph" width="512pt" height="74pt"
- viewBox="0.00 0.00 512.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procget_xcidCalledByGraph" width="483pt" height="74pt"
+ viewBox="0.00 0.00 483.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~get_xcid~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~get_xcid~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 508,-70 508,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 479,-70 479,4 -4,4"/>
 <!-- proc~get_xcid -->
 <g id="proc~~get_xcid~~CalledByGraph_node1" class="node">
 <title>proc~get_xcid</title>
-<polygon fill="none" stroke="black" points="504,-45 361,-45 361,-21 504,-21 504,-45"/>
-<text text-anchor="middle" x="432.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_Xcid</text>
+<polygon fill="none" stroke="black" points="475,-45 342,-45 342,-21 475,-21 475,-45"/>
+<text text-anchor="middle" x="408.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_Xcid</text>
 </g>
 <!-- none~get_xc -->
 <g id="proc~~get_xcid~~CalledByGraph_node2" class="node">
 <title>none~get_xc</title>
-<g id="a_proc~~get_xcid~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_xc" xlink:title="nurbs_volume%get_Xc">
-<polygon fill="#a7506f" stroke="#a7506f" points="325,-45 192,-45 192,-21 325,-21 325,-45"/>
-<text text-anchor="middle" x="258.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc</text>
+<g id="a_proc~~get_xcid~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_xc" xlink:title="nurbs_curve%get_Xc">
+<polygon fill="#a7506f" stroke="#a7506f" points="306,-45 182,-45 182,-21 306,-21 306,-45"/>
+<text text-anchor="middle" x="244" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc&#45;&gt;proc~get_xcid -->
 <g id="proc~~get_xcid~~CalledByGraph_edge1" class="edge">
 <title>none~get_xc&#45;&gt;proc~get_xcid</title>
-<path fill="none" stroke="#ff0000" d="M325.02,-33C333.41,-33 342.08,-33 350.68,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="350.72,-36.5 360.72,-33 350.72,-29.5 350.72,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M306.43,-33C314.68,-33 323.21,-33 331.66,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="331.91,-36.5 341.91,-33 331.91,-29.5 331.91,-36.5"/>
 </g>
 <!-- proc~modify_wc -->
 <g id="proc~~get_xcid~~CalledByGraph_node3" class="node">
 <title>proc~modify_wc</title>
-<g id="a_proc~~get_xcid~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="156,-66 0,-66 0,-42 156,-42 156,-66"/>
-<text text-anchor="middle" x="78" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
+<g id="a_proc~~get_xcid~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="146,-66 0,-66 0,-42 146,-42 146,-66"/>
+<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~get_xc -->
 <g id="proc~~get_xcid~~CalledByGraph_edge2" class="edge">
 <title>proc~modify_wc&#45;&gt;none~get_xc</title>
-<path fill="none" stroke="#ff0000" d="M156.25,-44.91C164.69,-43.92 173.28,-42.91 181.7,-41.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="182.35,-45.37 191.87,-40.72 181.53,-38.41 182.35,-45.37"/>
+<path fill="none" stroke="#ff0000" d="M146.16,-45.03C154.74,-43.97 163.49,-42.88 172.05,-41.82"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="172.49,-45.29 181.98,-40.58 171.63,-38.34 172.49,-45.29"/>
 </g>
 <!-- proc~modify_xc -->
 <g id="proc~~get_xcid~~CalledByGraph_node4" class="node">
 <title>proc~modify_xc</title>
-<g id="a_proc~~get_xcid~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="154.5,-24 1.5,-24 1.5,0 154.5,0 154.5,-24"/>
-<text text-anchor="middle" x="78" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
+<g id="a_proc~~get_xcid~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="144.5,-24 1.5,-24 1.5,0 144.5,0 144.5,-24"/>
+<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~get_xc -->
 <g id="proc~~get_xcid~~CalledByGraph_edge3" class="edge">
 <title>proc~modify_xc&#45;&gt;none~get_xc</title>
-<path fill="none" stroke="#ff0000" d="M154.7,-20.91C163.67,-21.96 172.84,-23.04 181.81,-24.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="181.5,-27.58 191.85,-25.28 182.32,-20.63 181.5,-27.58"/>
+<path fill="none" stroke="#ff0000" d="M144.69,-20.78C153.7,-21.9 162.91,-23.05 171.92,-24.17"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="171.63,-27.66 181.98,-25.42 172.49,-20.71 171.63,-27.66"/>
 </g>
 </g>
 </svg>
@@ -393,7 +393,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xcid~2.html b/proc/get_xcid~2.html
index fdaf358f7..7ff1c0a53 100644
--- a/proc/get_xcid~2.html
+++ b/proc/get_xcid~2.html
@@ -83,15 +83,15 @@ <h1>get_Xcid
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xcid</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xcid(this, n, dir) result(Xc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~77"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~70"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~10"></span>
+              <span class="anchor" id="variable-n~7"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~16"></span>
+              <span class="anchor" id="variable-dir~4"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -206,7 +206,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xc~34"></span>
+          <span class="anchor" id="variable-xc~30"></span>
           real(kind=rk)
         </small>
       </h3>
@@ -223,84 +223,65 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_xcid~2~~CalledByGraph Pages: 1 -->
-<svg id="procget_xcid2CalledByGraph" width="641pt" height="74pt"
- viewBox="0.00 0.00 641.00 73.88" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procget_xcid2CalledByGraph" width="512pt" height="74pt"
+ viewBox="0.00 0.00 512.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~get_xcid~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~get_xcid~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 638,-70 638,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 508,-70 508,4 -4,4"/>
 <!-- proc~get_xcid~2 -->
 <g id="proc~~get_xcid~2~~CalledByGraph_node1" class="node">
 <title>proc~get_xcid~2</title>
-<polygon fill="none" stroke="black" points="634,-45 491,-45 491,-21 634,-21 634,-45"/>
-<text text-anchor="middle" x="562.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_Xcid</text>
+<polygon fill="none" stroke="black" points="504,-45 361,-45 361,-21 504,-21 504,-45"/>
+<text text-anchor="middle" x="432.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_Xcid</text>
 </g>
 <!-- none~get_xc~2 -->
 <g id="proc~~get_xcid~2~~CalledByGraph_node2" class="node">
 <title>none~get_xc~2</title>
-<g id="a_proc~~get_xcid~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xc~2" xlink:title="nurbs_surface%get_Xc">
-<polygon fill="#a7506f" stroke="#a7506f" points="455,-45 322,-45 322,-21 455,-21 455,-45"/>
-<text text-anchor="middle" x="388.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc</text>
+<g id="a_proc~~get_xcid~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_xc~2" xlink:title="nurbs_volume%get_Xc">
+<polygon fill="#a7506f" stroke="#a7506f" points="325,-45 192,-45 192,-21 325,-21 325,-45"/>
+<text text-anchor="middle" x="258.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~2&#45;&gt;proc~get_xcid~2 -->
 <g id="proc~~get_xcid~2~~CalledByGraph_edge1" class="edge">
 <title>none~get_xc~2&#45;&gt;proc~get_xcid~2</title>
-<path fill="none" stroke="#ff0000" d="M455.02,-33C463.41,-33 472.08,-33 480.68,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="480.72,-36.5 490.72,-33 480.72,-29.5 480.72,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M325.02,-33C333.41,-33 342.08,-33 350.68,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="350.72,-36.5 360.72,-33 350.72,-29.5 350.72,-36.5"/>
 </g>
 <!-- proc~modify_wc~2 -->
 <g id="proc~~get_xcid~2~~CalledByGraph_node3" class="node">
 <title>proc~modify_wc~2</title>
-<g id="a_proc~~get_xcid~2~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="286,-66 130,-66 130,-42 286,-42 286,-66"/>
-<text text-anchor="middle" x="208" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+<g id="a_proc~~get_xcid~2~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="156,-66 0,-66 0,-42 156,-42 156,-66"/>
+<text text-anchor="middle" x="78" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~get_xc~2 -->
 <g id="proc~~get_xcid~2~~CalledByGraph_edge2" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~get_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M286.25,-44.91C294.69,-43.92 303.28,-42.91 311.7,-41.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="312.35,-45.37 321.87,-40.72 311.53,-38.41 312.35,-45.37"/>
+<path fill="none" stroke="#ff0000" d="M156.25,-44.91C164.69,-43.92 173.28,-42.91 181.7,-41.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="182.35,-45.37 191.87,-40.72 181.53,-38.41 182.35,-45.37"/>
 </g>
 <!-- proc~modify_xc~2 -->
 <g id="proc~~get_xcid~2~~CalledByGraph_node4" class="node">
 <title>proc~modify_xc~2</title>
-<g id="a_proc~~get_xcid~2~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="284.5,-24 131.5,-24 131.5,0 284.5,0 284.5,-24"/>
-<text text-anchor="middle" x="208" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+<g id="a_proc~~get_xcid~2~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="154.5,-24 1.5,-24 1.5,0 154.5,0 154.5,-24"/>
+<text text-anchor="middle" x="78" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~get_xc~2 -->
 <g id="proc~~get_xcid~2~~CalledByGraph_edge3" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~get_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M284.7,-20.91C293.67,-21.96 302.84,-23.04 311.81,-24.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="311.5,-27.58 321.85,-25.28 312.32,-20.63 311.5,-27.58"/>
-</g>
-<!-- program~example_ppm3 -->
-<g id="proc~~get_xcid~2~~CalledByGraph_node5" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~get_xcid~2~~CalledByGraph_node5"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
-<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
-<g id="proc~~get_xcid~2~~CalledByGraph_edge4" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#00ffff" d="M94.42,-12C102.9,-12 111.99,-12 121.2,-12"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="121.21,-15.5 131.21,-12 121.21,-8.5 121.21,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M154.7,-20.91C163.67,-21.96 172.84,-23.04 181.81,-24.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="181.5,-27.58 191.85,-25.28 182.32,-20.63 181.5,-27.58"/>
 </g>
 </g>
 </svg>
-</div>                <script>
-                  var panprocget_xcid2CalledByGraph = svgPanZoom('#procget_xcid2CalledByGraph',
-                    {zoomEnabled: true, controlIconsEnabled: true, fit: true, center: true,}
-                  );
-                </script>          <div>
+</div>          <div>
             <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
           </div>
           <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
@@ -412,7 +393,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xcid~3.html b/proc/get_xcid~3.html
index cb690319b..fa4efa710 100644
--- a/proc/get_xcid~3.html
+++ b/proc/get_xcid~3.html
@@ -83,15 +83,15 @@ <h1>get_Xcid
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xcid</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xcid(this, n, dir) result(Xc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~141"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~138"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~31"></span>
+              <span class="anchor" id="variable-dir~19"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -206,7 +206,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xc~59"></span>
+          <span class="anchor" id="variable-xc~52"></span>
           real(kind=rk)
         </small>
       </h3>
@@ -223,65 +223,84 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_xcid~3~~CalledByGraph Pages: 1 -->
-<svg id="procget_xcid3CalledByGraph" width="483pt" height="74pt"
- viewBox="0.00 0.00 483.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procget_xcid3CalledByGraph" width="641pt" height="74pt"
+ viewBox="0.00 0.00 641.00 73.88" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~get_xcid~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~get_xcid~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 479,-70 479,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 638,-70 638,4 -4,4"/>
 <!-- proc~get_xcid~3 -->
 <g id="proc~~get_xcid~3~~CalledByGraph_node1" class="node">
 <title>proc~get_xcid~3</title>
-<polygon fill="none" stroke="black" points="475,-45 342,-45 342,-21 475,-21 475,-45"/>
-<text text-anchor="middle" x="408.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_Xcid</text>
+<polygon fill="none" stroke="black" points="634,-45 491,-45 491,-21 634,-21 634,-45"/>
+<text text-anchor="middle" x="562.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_Xcid</text>
 </g>
 <!-- none~get_xc~3 -->
 <g id="proc~~get_xcid~3~~CalledByGraph_node2" class="node">
 <title>none~get_xc~3</title>
-<g id="a_proc~~get_xcid~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_xc~3" xlink:title="nurbs_curve%get_Xc">
-<polygon fill="#a7506f" stroke="#a7506f" points="306,-45 182,-45 182,-21 306,-21 306,-45"/>
-<text text-anchor="middle" x="244" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc</text>
+<g id="a_proc~~get_xcid~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xc~3" xlink:title="nurbs_surface%get_Xc">
+<polygon fill="#a7506f" stroke="#a7506f" points="455,-45 322,-45 322,-21 455,-21 455,-45"/>
+<text text-anchor="middle" x="388.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~3&#45;&gt;proc~get_xcid~3 -->
 <g id="proc~~get_xcid~3~~CalledByGraph_edge1" class="edge">
 <title>none~get_xc~3&#45;&gt;proc~get_xcid~3</title>
-<path fill="none" stroke="#ff0000" d="M306.43,-33C314.68,-33 323.21,-33 331.66,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="331.91,-36.5 341.91,-33 331.91,-29.5 331.91,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M455.02,-33C463.41,-33 472.08,-33 480.68,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="480.72,-36.5 490.72,-33 480.72,-29.5 480.72,-36.5"/>
 </g>
 <!-- proc~modify_wc~3 -->
 <g id="proc~~get_xcid~3~~CalledByGraph_node3" class="node">
 <title>proc~modify_wc~3</title>
-<g id="a_proc~~get_xcid~3~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="146,-66 0,-66 0,-42 146,-42 146,-66"/>
-<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
+<g id="a_proc~~get_xcid~3~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="286,-66 130,-66 130,-42 286,-42 286,-66"/>
+<text text-anchor="middle" x="208" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~get_xc~3 -->
 <g id="proc~~get_xcid~3~~CalledByGraph_edge2" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~get_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M146.16,-45.03C154.74,-43.97 163.49,-42.88 172.05,-41.82"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="172.49,-45.29 181.98,-40.58 171.63,-38.34 172.49,-45.29"/>
+<path fill="none" stroke="#ff0000" d="M286.25,-44.91C294.69,-43.92 303.28,-42.91 311.7,-41.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="312.35,-45.37 321.87,-40.72 311.53,-38.41 312.35,-45.37"/>
 </g>
 <!-- proc~modify_xc~3 -->
 <g id="proc~~get_xcid~3~~CalledByGraph_node4" class="node">
 <title>proc~modify_xc~3</title>
-<g id="a_proc~~get_xcid~3~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="144.5,-24 1.5,-24 1.5,0 144.5,0 144.5,-24"/>
-<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
+<g id="a_proc~~get_xcid~3~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="284.5,-24 131.5,-24 131.5,0 284.5,0 284.5,-24"/>
+<text text-anchor="middle" x="208" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~get_xc~3 -->
 <g id="proc~~get_xcid~3~~CalledByGraph_edge3" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~get_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M144.69,-20.78C153.7,-21.9 162.91,-23.05 171.92,-24.17"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="171.63,-27.66 181.98,-25.42 172.49,-20.71 171.63,-27.66"/>
+<path fill="none" stroke="#ff0000" d="M284.7,-20.91C293.67,-21.96 302.84,-23.04 311.81,-24.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="311.5,-27.58 321.85,-25.28 312.32,-20.63 311.5,-27.58"/>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~get_xcid~3~~CalledByGraph_node5" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~get_xcid~3~~CalledByGraph_node5"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
+<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
+<g id="proc~~get_xcid~3~~CalledByGraph_edge4" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#00ffff" d="M94.42,-12C102.9,-12 111.99,-12 121.2,-12"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="121.21,-15.5 131.21,-12 121.21,-8.5 121.21,-15.5"/>
 </g>
 </g>
 </svg>
-</div>          <div>
+</div>                <script>
+                  var panprocget_xcid3CalledByGraph = svgPanZoom('#procget_xcid3CalledByGraph',
+                    {zoomEnabled: true, controlIconsEnabled: true, fit: true, center: true,}
+                  );
+                </script>          <div>
             <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
           </div>
           <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
@@ -393,7 +412,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xci~2.html b/proc/get_xci~2.html
index fa9e07292..5ccca6f7d 100644
--- a/proc/get_xci~2.html
+++ b/proc/get_xci~2.html
@@ -83,15 +83,15 @@ <h1>get_Xci
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xci</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xci(this, n) result(Xc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~76"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~69"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~9"></span>
+              <span class="anchor" id="variable-n~6"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -191,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xc~33"></span>
+          <span class="anchor" id="variable-xc~29"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -208,76 +208,61 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_xci~2~~CalledByGraph Pages: 1 -->
-<svg id="procget_xci2CalledByGraph" width="635pt" height="74pt"
- viewBox="0.00 0.00 635.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procget_xci2CalledByGraph" width="505pt" height="74pt"
+ viewBox="0.00 0.00 505.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~get_xci~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~get_xci~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 631,-70 631,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 501,-70 501,4 -4,4"/>
 <!-- proc~get_xci~2 -->
 <g id="proc~~get_xci~2~~CalledByGraph_node1" class="node">
 <title>proc~get_xci~2</title>
-<polygon fill="none" stroke="black" points="627,-45 491,-45 491,-21 627,-21 627,-45"/>
-<text text-anchor="middle" x="559" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_Xci</text>
+<polygon fill="none" stroke="black" points="497,-45 361,-45 361,-21 497,-21 497,-45"/>
+<text text-anchor="middle" x="429" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%get_Xci</text>
 </g>
 <!-- none~get_xc~2 -->
 <g id="proc~~get_xci~2~~CalledByGraph_node2" class="node">
 <title>none~get_xc~2</title>
-<g id="a_proc~~get_xci~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xc~2" xlink:title="nurbs_surface%get_Xc">
-<polygon fill="#a7506f" stroke="#a7506f" points="455,-45 322,-45 322,-21 455,-21 455,-45"/>
-<text text-anchor="middle" x="388.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc</text>
+<g id="a_proc~~get_xci~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_xc~2" xlink:title="nurbs_volume%get_Xc">
+<polygon fill="#a7506f" stroke="#a7506f" points="325,-45 192,-45 192,-21 325,-21 325,-45"/>
+<text text-anchor="middle" x="258.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~2&#45;&gt;proc~get_xci~2 -->
 <g id="proc~~get_xci~2~~CalledByGraph_edge1" class="edge">
 <title>none~get_xc~2&#45;&gt;proc~get_xci~2</title>
-<path fill="none" stroke="#ff0000" d="M455.13,-33C463.56,-33 472.26,-33 480.86,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="480.88,-36.5 490.88,-33 480.88,-29.5 480.88,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M325.13,-33C333.56,-33 342.26,-33 350.86,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="350.88,-36.5 360.88,-33 350.88,-29.5 350.88,-36.5"/>
 </g>
 <!-- proc~modify_wc~2 -->
 <g id="proc~~get_xci~2~~CalledByGraph_node3" class="node">
 <title>proc~modify_wc~2</title>
-<g id="a_proc~~get_xci~2~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="286,-66 130,-66 130,-42 286,-42 286,-66"/>
-<text text-anchor="middle" x="208" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+<g id="a_proc~~get_xci~2~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="156,-66 0,-66 0,-42 156,-42 156,-66"/>
+<text text-anchor="middle" x="78" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~get_xc~2 -->
 <g id="proc~~get_xci~2~~CalledByGraph_edge2" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~get_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M286.25,-44.91C294.69,-43.92 303.28,-42.91 311.7,-41.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="312.35,-45.37 321.87,-40.72 311.53,-38.41 312.35,-45.37"/>
+<path fill="none" stroke="#ff0000" d="M156.25,-44.91C164.69,-43.92 173.28,-42.91 181.7,-41.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="182.35,-45.37 191.87,-40.72 181.53,-38.41 182.35,-45.37"/>
 </g>
 <!-- proc~modify_xc~2 -->
 <g id="proc~~get_xci~2~~CalledByGraph_node4" class="node">
 <title>proc~modify_xc~2</title>
-<g id="a_proc~~get_xci~2~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="284.5,-24 131.5,-24 131.5,0 284.5,0 284.5,-24"/>
-<text text-anchor="middle" x="208" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+<g id="a_proc~~get_xci~2~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="154.5,-24 1.5,-24 1.5,0 154.5,0 154.5,-24"/>
+<text text-anchor="middle" x="78" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~get_xc~2 -->
 <g id="proc~~get_xci~2~~CalledByGraph_edge3" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~get_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M284.7,-20.91C293.67,-21.96 302.84,-23.04 311.81,-24.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="311.5,-27.58 321.85,-25.28 312.32,-20.63 311.5,-27.58"/>
-</g>
-<!-- program~example_ppm3 -->
-<g id="proc~~get_xci~2~~CalledByGraph_node5" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~get_xci~2~~CalledByGraph_node5"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
-<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
-<g id="proc~~get_xci~2~~CalledByGraph_edge4" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#00ffff" d="M94.42,-12C102.9,-12 111.99,-12 121.2,-12"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="121.21,-15.5 131.21,-12 121.21,-8.5 121.21,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M154.7,-20.91C163.67,-21.96 172.84,-23.04 181.81,-24.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="181.5,-27.58 191.85,-25.28 182.32,-20.63 181.5,-27.58"/>
 </g>
 </g>
 </svg>
@@ -393,7 +378,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xci~3.html b/proc/get_xci~3.html
index 1d5a786e0..a761911c5 100644
--- a/proc/get_xci~3.html
+++ b/proc/get_xci~3.html
@@ -83,15 +83,15 @@ <h1>get_Xci
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xci</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xci(this, n) result(Xc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~140"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~137"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -191,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xc~58"></span>
+          <span class="anchor" id="variable-xc~51"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -208,61 +208,76 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_xci~3~~CalledByGraph Pages: 1 -->
-<svg id="procget_xci3CalledByGraph" width="477pt" height="74pt"
- viewBox="0.00 0.00 477.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procget_xci3CalledByGraph" width="635pt" height="74pt"
+ viewBox="0.00 0.00 635.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~get_xci~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~get_xci~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 473,-70 473,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 631,-70 631,4 -4,4"/>
 <!-- proc~get_xci~3 -->
 <g id="proc~~get_xci~3~~CalledByGraph_node1" class="node">
 <title>proc~get_xci~3</title>
-<polygon fill="none" stroke="black" points="469,-45 342,-45 342,-21 469,-21 469,-45"/>
-<text text-anchor="middle" x="405.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%get_Xci</text>
+<polygon fill="none" stroke="black" points="627,-45 491,-45 491,-21 627,-21 627,-45"/>
+<text text-anchor="middle" x="559" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_Xci</text>
 </g>
 <!-- none~get_xc~3 -->
 <g id="proc~~get_xci~3~~CalledByGraph_node2" class="node">
 <title>none~get_xc~3</title>
-<g id="a_proc~~get_xci~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_xc~3" xlink:title="nurbs_curve%get_Xc">
-<polygon fill="#a7506f" stroke="#a7506f" points="306,-45 182,-45 182,-21 306,-21 306,-45"/>
-<text text-anchor="middle" x="244" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc</text>
+<g id="a_proc~~get_xci~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xc~3" xlink:title="nurbs_surface%get_Xc">
+<polygon fill="#a7506f" stroke="#a7506f" points="455,-45 322,-45 322,-21 455,-21 455,-45"/>
+<text text-anchor="middle" x="388.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~3&#45;&gt;proc~get_xci~3 -->
 <g id="proc~~get_xci~3~~CalledByGraph_edge1" class="edge">
 <title>none~get_xc~3&#45;&gt;proc~get_xci~3</title>
-<path fill="none" stroke="#ff0000" d="M306.21,-33C314.52,-33 323.11,-33 331.59,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="331.87,-36.5 341.87,-33 331.87,-29.5 331.87,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M455.13,-33C463.56,-33 472.26,-33 480.86,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="480.88,-36.5 490.88,-33 480.88,-29.5 480.88,-36.5"/>
 </g>
 <!-- proc~modify_wc~3 -->
 <g id="proc~~get_xci~3~~CalledByGraph_node3" class="node">
 <title>proc~modify_wc~3</title>
-<g id="a_proc~~get_xci~3~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="146,-66 0,-66 0,-42 146,-42 146,-66"/>
-<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
+<g id="a_proc~~get_xci~3~~CalledByGraph_node3"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="286,-66 130,-66 130,-42 286,-42 286,-66"/>
+<text text-anchor="middle" x="208" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~get_xc~3 -->
 <g id="proc~~get_xci~3~~CalledByGraph_edge2" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~get_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M146.16,-45.03C154.74,-43.97 163.49,-42.88 172.05,-41.82"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="172.49,-45.29 181.98,-40.58 171.63,-38.34 172.49,-45.29"/>
+<path fill="none" stroke="#ff0000" d="M286.25,-44.91C294.69,-43.92 303.28,-42.91 311.7,-41.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="312.35,-45.37 321.87,-40.72 311.53,-38.41 312.35,-45.37"/>
 </g>
 <!-- proc~modify_xc~3 -->
 <g id="proc~~get_xci~3~~CalledByGraph_node4" class="node">
 <title>proc~modify_xc~3</title>
-<g id="a_proc~~get_xci~3~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="144.5,-24 1.5,-24 1.5,0 144.5,0 144.5,-24"/>
-<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
+<g id="a_proc~~get_xci~3~~CalledByGraph_node4"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="284.5,-24 131.5,-24 131.5,0 284.5,0 284.5,-24"/>
+<text text-anchor="middle" x="208" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~get_xc~3 -->
 <g id="proc~~get_xci~3~~CalledByGraph_edge3" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~get_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M144.69,-20.78C153.7,-21.9 162.91,-23.05 171.92,-24.17"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="171.63,-27.66 181.98,-25.42 172.49,-20.71 171.63,-27.66"/>
+<path fill="none" stroke="#ff0000" d="M284.7,-20.91C293.67,-21.96 302.84,-23.04 311.81,-24.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="311.5,-27.58 321.85,-25.28 312.32,-20.63 311.5,-27.58"/>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~get_xci~3~~CalledByGraph_node5" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~get_xci~3~~CalledByGraph_node5"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
+<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
+<g id="proc~~get_xci~3~~CalledByGraph_edge4" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#00ffff" d="M94.42,-12C102.9,-12 111.99,-12 121.2,-12"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="121.21,-15.5 131.21,-12 121.21,-8.5 121.21,-15.5"/>
 </g>
 </g>
 </svg>
@@ -378,7 +393,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xg_all.html b/proc/get_xg_all.html
index 6a3ce0f43..b89b1ee6b 100644
--- a/proc/get_xg_all.html
+++ b/proc/get_xg_all.html
@@ -83,15 +83,15 @@ <h1>get_Xg_all
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xg_all</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xg_all(this) result(Xg)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~10"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~11"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -212,7 +212,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xg_all~2.html b/proc/get_xg_all~2.html
index 40c9ab092..cb1dd5556 100644
--- a/proc/get_xg_all~2.html
+++ b/proc/get_xg_all~2.html
@@ -83,15 +83,15 @@ <h1>get_Xg_all
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xg_all</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xg_all(this) result(Xg)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~78"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~71"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -176,178 +176,12 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~15"></span>
+          <span class="anchor" id="variable-xg~16"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
       
     <br>
-    <div class="card">
-      <div class="card-header">
-  <h3 class="card-title">Called by</h3>
-      </div>
-      <div class="card-body">
-  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.43.0 (0)
- -->
-<!-- Title: proc~~get_xg_all~2~~CalledByGraph Pages: 1 -->
-<svg id="procget_xg_all2CalledByGraph" width="460pt" height="116pt"
- viewBox="0.00 0.00 460.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~get_xg_all~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
-<title>proc~~get_xg_all~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 456,-112 456,4 -4,4"/>
-<!-- proc~get_xg_all~2 -->
-<g id="proc~~get_xg_all~2~~CalledByGraph_node1" class="node">
-<title>proc~get_xg_all~2</title>
-<polygon fill="none" stroke="black" points="452,-66 300,-66 300,-42 452,-42 452,-66"/>
-<text text-anchor="middle" x="376" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_Xg_all</text>
-</g>
-<!-- none~get_xg~2 -->
-<g id="proc~~get_xg_all~2~~CalledByGraph_node2" class="node">
-<title>none~get_xg~2</title>
-<g id="a_proc~~get_xg_all~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xg~2" xlink:title="nurbs_surface%get_Xg">
-<polygon fill="#a7506f" stroke="#a7506f" points="264,-66 130,-66 130,-42 264,-42 264,-66"/>
-<text text-anchor="middle" x="197" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xg</text>
-</a>
-</g>
-</g>
-<!-- none~get_xg~2&#45;&gt;proc~get_xg_all~2 -->
-<g id="proc~~get_xg_all~2~~CalledByGraph_edge1" class="edge">
-<title>none~get_xg~2&#45;&gt;proc~get_xg_all~2</title>
-<path fill="none" stroke="#ff0000" d="M264.16,-54C272.56,-54 281.24,-54 289.89,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="289.99,-57.5 299.99,-54 289.99,-50.5 289.99,-57.5"/>
-</g>
-<!-- program~example_ppm1 -->
-<g id="proc~~get_xg_all~2~~CalledByGraph_node3" class="node">
-<title>program~example_ppm1</title>
-<g id="a_proc~~get_xg_all~2~~CalledByGraph_node3"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-108 0,-108 0,-84 94,-84 94,-108"/>
-<text text-anchor="middle" x="47" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm1&#45;&gt;none~get_xg~2 -->
-<g id="proc~~get_xg_all~2~~CalledByGraph_edge2" class="edge">
-<title>program~example_ppm1&#45;&gt;none~get_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M90.41,-83.96C106.98,-79.26 126.14,-73.82 143.56,-68.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="144.92,-72.13 153.58,-66.04 143.01,-65.4 144.92,-72.13"/>
-</g>
-<!-- program~example_ppm2 -->
-<g id="proc~~get_xg_all~2~~CalledByGraph_node4" class="node">
-<title>program~example_ppm2</title>
-<g id="a_proc~~get_xg_all~2~~CalledByGraph_node4"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-66 0,-66 0,-42 94,-42 94,-66"/>
-<text text-anchor="middle" x="47" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm2&#45;&gt;none~get_xg~2 -->
-<g id="proc~~get_xg_all~2~~CalledByGraph_edge3" class="edge">
-<title>program~example_ppm2&#45;&gt;none~get_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M94.02,-54C102.19,-54 110.9,-54 119.65,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="119.91,-57.5 129.91,-54 119.91,-50.5 119.91,-57.5"/>
-</g>
-<!-- program~example_ppm3 -->
-<g id="proc~~get_xg_all~2~~CalledByGraph_node5" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~get_xg_all~2~~CalledByGraph_node5"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
-<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm3&#45;&gt;none~get_xg~2 -->
-<g id="proc~~get_xg_all~2~~CalledByGraph_edge4" class="edge">
-<title>program~example_ppm3&#45;&gt;none~get_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M90.41,-24.04C106.98,-28.74 126.14,-34.18 143.56,-39.12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="143.01,-42.6 153.58,-41.96 144.92,-35.87 143.01,-42.6"/>
-</g>
-</g>
-</svg>
-</div>          <div>
-            <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
-          </div>
-          <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
-            <div class="modal-dialog modal-lg" role="document">
-              <div class="modal-content">
-                <div class="modal-header">
-                  <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
-                  <button type="button" class="btn-close" data-bs-dismiss="modal" aria-label="Close"></button>
-                </div>
-                <div class="modal-body">
-<p>Nodes of different colours represent the following: </p>
-<?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.43.0 (0)
- -->
-<!-- Title: Graph Key Pages: 1 -->
-<svg width="641pt" height="28pt"
- viewBox="0.00 0.00 641.00 27.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="graph0" class="graph" transform="scale(1.16 1.16) rotate(0) translate(4 28)">
-<title>Graph Key</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 741.5,-28 741.5,4 -4,4"/>
-<!-- Subroutine -->
-<g id="node1" class="node">
-<title>Subroutine</title>
-<polygon fill="#d9534f" stroke="#d9534f" points="70,-24 0,-24 0,0 70,0 70,-24"/>
-<text text-anchor="middle" x="35" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
-</g>
-<!-- Function -->
-<g id="node2" class="node">
-<title>Function</title>
-<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-24 88,-24 88,0 146,0 146,-24"/>
-<text text-anchor="middle" x="117" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
-</g>
-<!-- Interface -->
-<g id="node3" class="node">
-<title>Interface</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="225.5,-24 164.5,-24 164.5,0 225.5,0 225.5,-24"/>
-<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
-</g>
-<!-- Type Bound Procedure -->
-<g id="node4" class="node">
-<title>Type Bound Procedure</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="374,-24 244,-24 244,0 374,0 374,-24"/>
-<text text-anchor="middle" x="309" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Type Bound Procedure</text>
-</g>
-<!-- Unknown Procedure Type -->
-<g id="node5" class="node">
-<title>Unknown Procedure Type</title>
-<polygon fill="#777777" stroke="#777777" points="537.5,-24 392.5,-24 392.5,0 537.5,0 537.5,-24"/>
-<text text-anchor="middle" x="465" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
-</g>
-<!-- Program -->
-<g id="node6" class="node">
-<title>Program</title>
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-24 556,-24 556,0 614,0 614,-24"/>
-<text text-anchor="middle" x="585" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
-</g>
-<!-- This Page&#39;s Entity -->
-<g id="node7" class="node">
-<title>This Page&#39;s Entity</title>
-<polygon fill="none" stroke="black" points="737.5,-24 632.5,-24 632.5,0 737.5,0 737.5,-24"/>
-<text text-anchor="middle" x="685" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
-</g>
-</g>
-</svg>
-
-<p>Solid arrows point from a procedure to one which it calls. Dashed 
-arrows point from an interface to procedures which implement that interface.
-This could include the module procedures in a generic interface or the
-implementation in a submodule of an interface in a parent module.
-</p>
- Where possible, edges connecting nodes are
-given different colours to make them easier to distinguish in
-large graphs.</div>
-            </div>
-          </div>
-        </div>
-      </div>
-    </div>
-    <br>
 
 
     
@@ -378,7 +212,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xg_all~3.html b/proc/get_xg_all~3.html
index 11f754c59..e4e6e9726 100644
--- a/proc/get_xg_all~3.html
+++ b/proc/get_xg_all~3.html
@@ -83,15 +83,15 @@ <h1>get_Xg_all
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xg_all</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xg_all(this) result(Xg)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~142"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~139"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -176,12 +176,178 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~28"></span>
+          <span class="anchor" id="variable-xg~27"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
       
     <br>
+    <div class="card">
+      <div class="card-header">
+  <h3 class="card-title">Called by</h3>
+      </div>
+      <div class="card-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.43.0 (0)
+ -->
+<!-- Title: proc~~get_xg_all~3~~CalledByGraph Pages: 1 -->
+<svg id="procget_xg_all3CalledByGraph" width="460pt" height="116pt"
+ viewBox="0.00 0.00 460.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~get_xg_all~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
+<title>proc~~get_xg_all~3~~CalledByGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 456,-112 456,4 -4,4"/>
+<!-- proc~get_xg_all~3 -->
+<g id="proc~~get_xg_all~3~~CalledByGraph_node1" class="node">
+<title>proc~get_xg_all~3</title>
+<polygon fill="none" stroke="black" points="452,-66 300,-66 300,-42 452,-42 452,-66"/>
+<text text-anchor="middle" x="376" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_Xg_all</text>
+</g>
+<!-- none~get_xg~3 -->
+<g id="proc~~get_xg_all~3~~CalledByGraph_node2" class="node">
+<title>none~get_xg~3</title>
+<g id="a_proc~~get_xg_all~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xg~3" xlink:title="nurbs_surface%get_Xg">
+<polygon fill="#a7506f" stroke="#a7506f" points="264,-66 130,-66 130,-42 264,-42 264,-66"/>
+<text text-anchor="middle" x="197" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xg</text>
+</a>
+</g>
+</g>
+<!-- none~get_xg~3&#45;&gt;proc~get_xg_all~3 -->
+<g id="proc~~get_xg_all~3~~CalledByGraph_edge1" class="edge">
+<title>none~get_xg~3&#45;&gt;proc~get_xg_all~3</title>
+<path fill="none" stroke="#ff0000" d="M264.16,-54C272.56,-54 281.24,-54 289.89,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="289.99,-57.5 299.99,-54 289.99,-50.5 289.99,-57.5"/>
+</g>
+<!-- program~example_ppm1 -->
+<g id="proc~~get_xg_all~3~~CalledByGraph_node3" class="node">
+<title>program~example_ppm1</title>
+<g id="a_proc~~get_xg_all~3~~CalledByGraph_node3"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-108 0,-108 0,-84 94,-84 94,-108"/>
+<text text-anchor="middle" x="47" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm1&#45;&gt;none~get_xg~3 -->
+<g id="proc~~get_xg_all~3~~CalledByGraph_edge2" class="edge">
+<title>program~example_ppm1&#45;&gt;none~get_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M90.41,-83.96C106.98,-79.26 126.14,-73.82 143.56,-68.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="144.92,-72.13 153.58,-66.04 143.01,-65.4 144.92,-72.13"/>
+</g>
+<!-- program~example_ppm2 -->
+<g id="proc~~get_xg_all~3~~CalledByGraph_node4" class="node">
+<title>program~example_ppm2</title>
+<g id="a_proc~~get_xg_all~3~~CalledByGraph_node4"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-66 0,-66 0,-42 94,-42 94,-66"/>
+<text text-anchor="middle" x="47" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm2&#45;&gt;none~get_xg~3 -->
+<g id="proc~~get_xg_all~3~~CalledByGraph_edge3" class="edge">
+<title>program~example_ppm2&#45;&gt;none~get_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M94.02,-54C102.19,-54 110.9,-54 119.65,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="119.91,-57.5 129.91,-54 119.91,-50.5 119.91,-57.5"/>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~get_xg_all~3~~CalledByGraph_node5" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~get_xg_all~3~~CalledByGraph_node5"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
+<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm3&#45;&gt;none~get_xg~3 -->
+<g id="proc~~get_xg_all~3~~CalledByGraph_edge4" class="edge">
+<title>program~example_ppm3&#45;&gt;none~get_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M90.41,-24.04C106.98,-28.74 126.14,-34.18 143.56,-39.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="143.01,-42.6 153.58,-41.96 144.92,-35.87 143.01,-42.6"/>
+</g>
+</g>
+</svg>
+</div>          <div>
+            <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
+          </div>
+          <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
+            <div class="modal-dialog modal-lg" role="document">
+              <div class="modal-content">
+                <div class="modal-header">
+                  <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
+                  <button type="button" class="btn-close" data-bs-dismiss="modal" aria-label="Close"></button>
+                </div>
+                <div class="modal-body">
+<p>Nodes of different colours represent the following: </p>
+<?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.43.0 (0)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="641pt" height="28pt"
+ viewBox="0.00 0.00 641.00 27.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1.16 1.16) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 741.5,-28 741.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="70,-24 0,-24 0,0 70,0 70,-24"/>
+<text text-anchor="middle" x="35" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-24 88,-24 88,0 146,0 146,-24"/>
+<text text-anchor="middle" x="117" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="225.5,-24 164.5,-24 164.5,0 225.5,0 225.5,-24"/>
+<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Type Bound Procedure -->
+<g id="node4" class="node">
+<title>Type Bound Procedure</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="374,-24 244,-24 244,0 374,0 374,-24"/>
+<text text-anchor="middle" x="309" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Type Bound Procedure</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node5" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="537.5,-24 392.5,-24 392.5,0 537.5,0 537.5,-24"/>
+<text text-anchor="middle" x="465" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node6" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-24 556,-24 556,0 614,0 614,-24"/>
+<text text-anchor="middle" x="585" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node7" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="737.5,-24 632.5,-24 632.5,0 737.5,0 737.5,-24"/>
+<text text-anchor="middle" x="685" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+<p>Solid arrows point from a procedure to one which it calls. Dashed 
+arrows point from an interface to procedures which implement that interface.
+This could include the module procedures in a generic interface or the
+implementation in a submodule of an interface in a parent module.
+</p>
+ Where possible, edges connecting nodes are
+given different colours to make them easier to distinguish in
+large graphs.</div>
+            </div>
+          </div>
+        </div>
+      </div>
+    </div>
+    <br>
 
 
     
@@ -212,7 +378,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xgi.html b/proc/get_xgi.html
index a3e454850..5cae60d52 100644
--- a/proc/get_xgi.html
+++ b/proc/get_xgi.html
@@ -83,15 +83,15 @@ <h1>get_Xgi
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xgi</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xgi(this, n) result(Xg)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~11"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~12"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -227,7 +227,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xgid.html b/proc/get_xgid.html
index f8d4c2f1d..f4b370c93 100644
--- a/proc/get_xgid.html
+++ b/proc/get_xgid.html
@@ -83,15 +83,15 @@ <h1>get_Xgid
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xgid</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xgid(this, n, dir) result(Xg)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~12"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~13"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -242,7 +242,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xgid~2.html b/proc/get_xgid~2.html
index 934039059..1cebada50 100644
--- a/proc/get_xgid~2.html
+++ b/proc/get_xgid~2.html
@@ -83,15 +83,15 @@ <h1>get_Xgid
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xgid</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xgid(this, n, dir) result(Xg)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~80"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~73"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~12"></span>
+              <span class="anchor" id="variable-n~9"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~17"></span>
+              <span class="anchor" id="variable-dir~5"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -206,178 +206,12 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~17"></span>
+          <span class="anchor" id="variable-xg~18"></span>
           real(kind=rk)
         </small>
       </h3>
       
     <br>
-    <div class="card">
-      <div class="card-header">
-  <h3 class="card-title">Called by</h3>
-      </div>
-      <div class="card-body">
-  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.43.0 (0)
- -->
-<!-- Title: proc~~get_xgid~2~~CalledByGraph Pages: 1 -->
-<svg id="procget_xgid2CalledByGraph" width="452pt" height="116pt"
- viewBox="0.00 0.00 452.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~get_xgid~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
-<title>proc~~get_xgid~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 448,-112 448,4 -4,4"/>
-<!-- proc~get_xgid~2 -->
-<g id="proc~~get_xgid~2~~CalledByGraph_node1" class="node">
-<title>proc~get_xgid~2</title>
-<polygon fill="none" stroke="black" points="444,-66 300,-66 300,-42 444,-42 444,-66"/>
-<text text-anchor="middle" x="372" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_Xgid</text>
-</g>
-<!-- none~get_xg~2 -->
-<g id="proc~~get_xgid~2~~CalledByGraph_node2" class="node">
-<title>none~get_xg~2</title>
-<g id="a_proc~~get_xgid~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xg~2" xlink:title="nurbs_surface%get_Xg">
-<polygon fill="#a7506f" stroke="#a7506f" points="264,-66 130,-66 130,-42 264,-42 264,-66"/>
-<text text-anchor="middle" x="197" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xg</text>
-</a>
-</g>
-</g>
-<!-- none~get_xg~2&#45;&gt;proc~get_xgid~2 -->
-<g id="proc~~get_xgid~2~~CalledByGraph_edge1" class="edge">
-<title>none~get_xg~2&#45;&gt;proc~get_xgid~2</title>
-<path fill="none" stroke="#ff0000" d="M264.39,-54C272.66,-54 281.18,-54 289.64,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="289.9,-57.5 299.9,-54 289.9,-50.5 289.9,-57.5"/>
-</g>
-<!-- program~example_ppm1 -->
-<g id="proc~~get_xgid~2~~CalledByGraph_node3" class="node">
-<title>program~example_ppm1</title>
-<g id="a_proc~~get_xgid~2~~CalledByGraph_node3"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-108 0,-108 0,-84 94,-84 94,-108"/>
-<text text-anchor="middle" x="47" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm1&#45;&gt;none~get_xg~2 -->
-<g id="proc~~get_xgid~2~~CalledByGraph_edge2" class="edge">
-<title>program~example_ppm1&#45;&gt;none~get_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M90.41,-83.96C106.98,-79.26 126.14,-73.82 143.56,-68.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="144.92,-72.13 153.58,-66.04 143.01,-65.4 144.92,-72.13"/>
-</g>
-<!-- program~example_ppm2 -->
-<g id="proc~~get_xgid~2~~CalledByGraph_node4" class="node">
-<title>program~example_ppm2</title>
-<g id="a_proc~~get_xgid~2~~CalledByGraph_node4"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-66 0,-66 0,-42 94,-42 94,-66"/>
-<text text-anchor="middle" x="47" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm2&#45;&gt;none~get_xg~2 -->
-<g id="proc~~get_xgid~2~~CalledByGraph_edge3" class="edge">
-<title>program~example_ppm2&#45;&gt;none~get_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M94.02,-54C102.19,-54 110.9,-54 119.65,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="119.91,-57.5 129.91,-54 119.91,-50.5 119.91,-57.5"/>
-</g>
-<!-- program~example_ppm3 -->
-<g id="proc~~get_xgid~2~~CalledByGraph_node5" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~get_xgid~2~~CalledByGraph_node5"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
-<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm3&#45;&gt;none~get_xg~2 -->
-<g id="proc~~get_xgid~2~~CalledByGraph_edge4" class="edge">
-<title>program~example_ppm3&#45;&gt;none~get_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M90.41,-24.04C106.98,-28.74 126.14,-34.18 143.56,-39.12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="143.01,-42.6 153.58,-41.96 144.92,-35.87 143.01,-42.6"/>
-</g>
-</g>
-</svg>
-</div>          <div>
-            <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
-          </div>
-          <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
-            <div class="modal-dialog modal-lg" role="document">
-              <div class="modal-content">
-                <div class="modal-header">
-                  <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
-                  <button type="button" class="btn-close" data-bs-dismiss="modal" aria-label="Close"></button>
-                </div>
-                <div class="modal-body">
-<p>Nodes of different colours represent the following: </p>
-<?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.43.0 (0)
- -->
-<!-- Title: Graph Key Pages: 1 -->
-<svg width="641pt" height="28pt"
- viewBox="0.00 0.00 641.00 27.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="graph0" class="graph" transform="scale(1.16 1.16) rotate(0) translate(4 28)">
-<title>Graph Key</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 741.5,-28 741.5,4 -4,4"/>
-<!-- Subroutine -->
-<g id="node1" class="node">
-<title>Subroutine</title>
-<polygon fill="#d9534f" stroke="#d9534f" points="70,-24 0,-24 0,0 70,0 70,-24"/>
-<text text-anchor="middle" x="35" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
-</g>
-<!-- Function -->
-<g id="node2" class="node">
-<title>Function</title>
-<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-24 88,-24 88,0 146,0 146,-24"/>
-<text text-anchor="middle" x="117" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
-</g>
-<!-- Interface -->
-<g id="node3" class="node">
-<title>Interface</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="225.5,-24 164.5,-24 164.5,0 225.5,0 225.5,-24"/>
-<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
-</g>
-<!-- Type Bound Procedure -->
-<g id="node4" class="node">
-<title>Type Bound Procedure</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="374,-24 244,-24 244,0 374,0 374,-24"/>
-<text text-anchor="middle" x="309" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Type Bound Procedure</text>
-</g>
-<!-- Unknown Procedure Type -->
-<g id="node5" class="node">
-<title>Unknown Procedure Type</title>
-<polygon fill="#777777" stroke="#777777" points="537.5,-24 392.5,-24 392.5,0 537.5,0 537.5,-24"/>
-<text text-anchor="middle" x="465" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
-</g>
-<!-- Program -->
-<g id="node6" class="node">
-<title>Program</title>
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-24 556,-24 556,0 614,0 614,-24"/>
-<text text-anchor="middle" x="585" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
-</g>
-<!-- This Page&#39;s Entity -->
-<g id="node7" class="node">
-<title>This Page&#39;s Entity</title>
-<polygon fill="none" stroke="black" points="737.5,-24 632.5,-24 632.5,0 737.5,0 737.5,-24"/>
-<text text-anchor="middle" x="685" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
-</g>
-</g>
-</svg>
-
-<p>Solid arrows point from a procedure to one which it calls. Dashed 
-arrows point from an interface to procedures which implement that interface.
-This could include the module procedures in a generic interface or the
-implementation in a submodule of an interface in a parent module.
-</p>
- Where possible, edges connecting nodes are
-given different colours to make them easier to distinguish in
-large graphs.</div>
-            </div>
-          </div>
-        </div>
-      </div>
-    </div>
-    <br>
 
 
     
@@ -408,7 +242,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xgid~3.html b/proc/get_xgid~3.html
index 738c9411b..96fa0922a 100644
--- a/proc/get_xgid~3.html
+++ b/proc/get_xgid~3.html
@@ -83,15 +83,15 @@ <h1>get_Xgid
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xgid</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xgid(this, n, dir) result(Xg)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~144"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~141"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~32"></span>
+              <span class="anchor" id="variable-dir~20"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -206,12 +206,178 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~30"></span>
+          <span class="anchor" id="variable-xg~29"></span>
           real(kind=rk)
         </small>
       </h3>
       
     <br>
+    <div class="card">
+      <div class="card-header">
+  <h3 class="card-title">Called by</h3>
+      </div>
+      <div class="card-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.43.0 (0)
+ -->
+<!-- Title: proc~~get_xgid~3~~CalledByGraph Pages: 1 -->
+<svg id="procget_xgid3CalledByGraph" width="452pt" height="116pt"
+ viewBox="0.00 0.00 452.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~get_xgid~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
+<title>proc~~get_xgid~3~~CalledByGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 448,-112 448,4 -4,4"/>
+<!-- proc~get_xgid~3 -->
+<g id="proc~~get_xgid~3~~CalledByGraph_node1" class="node">
+<title>proc~get_xgid~3</title>
+<polygon fill="none" stroke="black" points="444,-66 300,-66 300,-42 444,-42 444,-66"/>
+<text text-anchor="middle" x="372" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_Xgid</text>
+</g>
+<!-- none~get_xg~3 -->
+<g id="proc~~get_xgid~3~~CalledByGraph_node2" class="node">
+<title>none~get_xg~3</title>
+<g id="a_proc~~get_xgid~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xg~3" xlink:title="nurbs_surface%get_Xg">
+<polygon fill="#a7506f" stroke="#a7506f" points="264,-66 130,-66 130,-42 264,-42 264,-66"/>
+<text text-anchor="middle" x="197" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xg</text>
+</a>
+</g>
+</g>
+<!-- none~get_xg~3&#45;&gt;proc~get_xgid~3 -->
+<g id="proc~~get_xgid~3~~CalledByGraph_edge1" class="edge">
+<title>none~get_xg~3&#45;&gt;proc~get_xgid~3</title>
+<path fill="none" stroke="#ff0000" d="M264.39,-54C272.66,-54 281.18,-54 289.64,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="289.9,-57.5 299.9,-54 289.9,-50.5 289.9,-57.5"/>
+</g>
+<!-- program~example_ppm1 -->
+<g id="proc~~get_xgid~3~~CalledByGraph_node3" class="node">
+<title>program~example_ppm1</title>
+<g id="a_proc~~get_xgid~3~~CalledByGraph_node3"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-108 0,-108 0,-84 94,-84 94,-108"/>
+<text text-anchor="middle" x="47" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm1&#45;&gt;none~get_xg~3 -->
+<g id="proc~~get_xgid~3~~CalledByGraph_edge2" class="edge">
+<title>program~example_ppm1&#45;&gt;none~get_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M90.41,-83.96C106.98,-79.26 126.14,-73.82 143.56,-68.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="144.92,-72.13 153.58,-66.04 143.01,-65.4 144.92,-72.13"/>
+</g>
+<!-- program~example_ppm2 -->
+<g id="proc~~get_xgid~3~~CalledByGraph_node4" class="node">
+<title>program~example_ppm2</title>
+<g id="a_proc~~get_xgid~3~~CalledByGraph_node4"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-66 0,-66 0,-42 94,-42 94,-66"/>
+<text text-anchor="middle" x="47" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm2&#45;&gt;none~get_xg~3 -->
+<g id="proc~~get_xgid~3~~CalledByGraph_edge3" class="edge">
+<title>program~example_ppm2&#45;&gt;none~get_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M94.02,-54C102.19,-54 110.9,-54 119.65,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="119.91,-57.5 129.91,-54 119.91,-50.5 119.91,-57.5"/>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~get_xgid~3~~CalledByGraph_node5" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~get_xgid~3~~CalledByGraph_node5"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
+<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm3&#45;&gt;none~get_xg~3 -->
+<g id="proc~~get_xgid~3~~CalledByGraph_edge4" class="edge">
+<title>program~example_ppm3&#45;&gt;none~get_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M90.41,-24.04C106.98,-28.74 126.14,-34.18 143.56,-39.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="143.01,-42.6 153.58,-41.96 144.92,-35.87 143.01,-42.6"/>
+</g>
+</g>
+</svg>
+</div>          <div>
+            <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
+          </div>
+          <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
+            <div class="modal-dialog modal-lg" role="document">
+              <div class="modal-content">
+                <div class="modal-header">
+                  <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
+                  <button type="button" class="btn-close" data-bs-dismiss="modal" aria-label="Close"></button>
+                </div>
+                <div class="modal-body">
+<p>Nodes of different colours represent the following: </p>
+<?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.43.0 (0)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="641pt" height="28pt"
+ viewBox="0.00 0.00 641.00 27.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1.16 1.16) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 741.5,-28 741.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="70,-24 0,-24 0,0 70,0 70,-24"/>
+<text text-anchor="middle" x="35" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-24 88,-24 88,0 146,0 146,-24"/>
+<text text-anchor="middle" x="117" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="225.5,-24 164.5,-24 164.5,0 225.5,0 225.5,-24"/>
+<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Type Bound Procedure -->
+<g id="node4" class="node">
+<title>Type Bound Procedure</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="374,-24 244,-24 244,0 374,0 374,-24"/>
+<text text-anchor="middle" x="309" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Type Bound Procedure</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node5" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="537.5,-24 392.5,-24 392.5,0 537.5,0 537.5,-24"/>
+<text text-anchor="middle" x="465" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node6" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-24 556,-24 556,0 614,0 614,-24"/>
+<text text-anchor="middle" x="585" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node7" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="737.5,-24 632.5,-24 632.5,0 737.5,0 737.5,-24"/>
+<text text-anchor="middle" x="685" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+<p>Solid arrows point from a procedure to one which it calls. Dashed 
+arrows point from an interface to procedures which implement that interface.
+This could include the module procedures in a generic interface or the
+implementation in a submodule of an interface in a parent module.
+</p>
+ Where possible, edges connecting nodes are
+given different colours to make them easier to distinguish in
+large graphs.</div>
+            </div>
+          </div>
+        </div>
+      </div>
+    </div>
+    <br>
 
 
     
@@ -242,7 +408,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xgi~2.html b/proc/get_xgi~2.html
index cab4bfa16..ba1d22475 100644
--- a/proc/get_xgi~2.html
+++ b/proc/get_xgi~2.html
@@ -83,15 +83,15 @@ <h1>get_Xgi
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xgi</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xgi(this, n) result(Xg)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~79"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~72"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-n~11"></span>
+              <span class="anchor" id="variable-n~8"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -191,178 +191,12 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~16"></span>
+          <span class="anchor" id="variable-xg~17"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
       
     <br>
-    <div class="card">
-      <div class="card-header">
-  <h3 class="card-title">Called by</h3>
-      </div>
-      <div class="card-body">
-  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.43.0 (0)
- -->
-<!-- Title: proc~~get_xgi~2~~CalledByGraph Pages: 1 -->
-<svg id="procget_xgi2CalledByGraph" width="445pt" height="116pt"
- viewBox="0.00 0.00 445.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~get_xgi~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
-<title>proc~~get_xgi~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 441,-112 441,4 -4,4"/>
-<!-- proc~get_xgi~2 -->
-<g id="proc~~get_xgi~2~~CalledByGraph_node1" class="node">
-<title>proc~get_xgi~2</title>
-<polygon fill="none" stroke="black" points="437,-66 300,-66 300,-42 437,-42 437,-66"/>
-<text text-anchor="middle" x="368.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_Xgi</text>
-</g>
-<!-- none~get_xg~2 -->
-<g id="proc~~get_xgi~2~~CalledByGraph_node2" class="node">
-<title>none~get_xg~2</title>
-<g id="a_proc~~get_xgi~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xg~2" xlink:title="nurbs_surface%get_Xg">
-<polygon fill="#a7506f" stroke="#a7506f" points="264,-66 130,-66 130,-42 264,-42 264,-66"/>
-<text text-anchor="middle" x="197" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xg</text>
-</a>
-</g>
-</g>
-<!-- none~get_xg~2&#45;&gt;proc~get_xgi~2 -->
-<g id="proc~~get_xgi~2~~CalledByGraph_edge1" class="edge">
-<title>none~get_xg~2&#45;&gt;proc~get_xgi~2</title>
-<path fill="none" stroke="#ff0000" d="M264.02,-54C272.5,-54 281.25,-54 289.9,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="289.99,-57.5 299.99,-54 289.99,-50.5 289.99,-57.5"/>
-</g>
-<!-- program~example_ppm1 -->
-<g id="proc~~get_xgi~2~~CalledByGraph_node3" class="node">
-<title>program~example_ppm1</title>
-<g id="a_proc~~get_xgi~2~~CalledByGraph_node3"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-108 0,-108 0,-84 94,-84 94,-108"/>
-<text text-anchor="middle" x="47" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm1&#45;&gt;none~get_xg~2 -->
-<g id="proc~~get_xgi~2~~CalledByGraph_edge2" class="edge">
-<title>program~example_ppm1&#45;&gt;none~get_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M90.41,-83.96C106.98,-79.26 126.14,-73.82 143.56,-68.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="144.92,-72.13 153.58,-66.04 143.01,-65.4 144.92,-72.13"/>
-</g>
-<!-- program~example_ppm2 -->
-<g id="proc~~get_xgi~2~~CalledByGraph_node4" class="node">
-<title>program~example_ppm2</title>
-<g id="a_proc~~get_xgi~2~~CalledByGraph_node4"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-66 0,-66 0,-42 94,-42 94,-66"/>
-<text text-anchor="middle" x="47" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm2&#45;&gt;none~get_xg~2 -->
-<g id="proc~~get_xgi~2~~CalledByGraph_edge3" class="edge">
-<title>program~example_ppm2&#45;&gt;none~get_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M94.02,-54C102.19,-54 110.9,-54 119.65,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="119.91,-57.5 129.91,-54 119.91,-50.5 119.91,-57.5"/>
-</g>
-<!-- program~example_ppm3 -->
-<g id="proc~~get_xgi~2~~CalledByGraph_node5" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~get_xgi~2~~CalledByGraph_node5"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
-<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm3&#45;&gt;none~get_xg~2 -->
-<g id="proc~~get_xgi~2~~CalledByGraph_edge4" class="edge">
-<title>program~example_ppm3&#45;&gt;none~get_xg~2</title>
-<path fill="none" stroke="#ff0000" d="M90.41,-24.04C106.98,-28.74 126.14,-34.18 143.56,-39.12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="143.01,-42.6 153.58,-41.96 144.92,-35.87 143.01,-42.6"/>
-</g>
-</g>
-</svg>
-</div>          <div>
-            <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
-          </div>
-          <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
-            <div class="modal-dialog modal-lg" role="document">
-              <div class="modal-content">
-                <div class="modal-header">
-                  <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
-                  <button type="button" class="btn-close" data-bs-dismiss="modal" aria-label="Close"></button>
-                </div>
-                <div class="modal-body">
-<p>Nodes of different colours represent the following: </p>
-<?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.43.0 (0)
- -->
-<!-- Title: Graph Key Pages: 1 -->
-<svg width="641pt" height="28pt"
- viewBox="0.00 0.00 641.00 27.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="graph0" class="graph" transform="scale(1.16 1.16) rotate(0) translate(4 28)">
-<title>Graph Key</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 741.5,-28 741.5,4 -4,4"/>
-<!-- Subroutine -->
-<g id="node1" class="node">
-<title>Subroutine</title>
-<polygon fill="#d9534f" stroke="#d9534f" points="70,-24 0,-24 0,0 70,0 70,-24"/>
-<text text-anchor="middle" x="35" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
-</g>
-<!-- Function -->
-<g id="node2" class="node">
-<title>Function</title>
-<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-24 88,-24 88,0 146,0 146,-24"/>
-<text text-anchor="middle" x="117" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
-</g>
-<!-- Interface -->
-<g id="node3" class="node">
-<title>Interface</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="225.5,-24 164.5,-24 164.5,0 225.5,0 225.5,-24"/>
-<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
-</g>
-<!-- Type Bound Procedure -->
-<g id="node4" class="node">
-<title>Type Bound Procedure</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="374,-24 244,-24 244,0 374,0 374,-24"/>
-<text text-anchor="middle" x="309" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Type Bound Procedure</text>
-</g>
-<!-- Unknown Procedure Type -->
-<g id="node5" class="node">
-<title>Unknown Procedure Type</title>
-<polygon fill="#777777" stroke="#777777" points="537.5,-24 392.5,-24 392.5,0 537.5,0 537.5,-24"/>
-<text text-anchor="middle" x="465" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
-</g>
-<!-- Program -->
-<g id="node6" class="node">
-<title>Program</title>
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-24 556,-24 556,0 614,0 614,-24"/>
-<text text-anchor="middle" x="585" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
-</g>
-<!-- This Page&#39;s Entity -->
-<g id="node7" class="node">
-<title>This Page&#39;s Entity</title>
-<polygon fill="none" stroke="black" points="737.5,-24 632.5,-24 632.5,0 737.5,0 737.5,-24"/>
-<text text-anchor="middle" x="685" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
-</g>
-</g>
-</svg>
-
-<p>Solid arrows point from a procedure to one which it calls. Dashed 
-arrows point from an interface to procedures which implement that interface.
-This could include the module procedures in a generic interface or the
-implementation in a submodule of an interface in a parent module.
-</p>
- Where possible, edges connecting nodes are
-given different colours to make them easier to distinguish in
-large graphs.</div>
-            </div>
-          </div>
-        </div>
-      </div>
-    </div>
-    <br>
 
 
     
@@ -393,7 +227,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xgi~3.html b/proc/get_xgi~3.html
index acd2abdcc..4c4e27923 100644
--- a/proc/get_xgi~3.html
+++ b/proc/get_xgi~3.html
@@ -83,15 +83,15 @@ <h1>get_Xgi
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xgi</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xgi(this, n) result(Xg)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~143"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~140"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -191,12 +191,178 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xg~29"></span>
+          <span class="anchor" id="variable-xg~28"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
       
     <br>
+    <div class="card">
+      <div class="card-header">
+  <h3 class="card-title">Called by</h3>
+      </div>
+      <div class="card-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.43.0 (0)
+ -->
+<!-- Title: proc~~get_xgi~3~~CalledByGraph Pages: 1 -->
+<svg id="procget_xgi3CalledByGraph" width="445pt" height="116pt"
+ viewBox="0.00 0.00 445.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~get_xgi~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
+<title>proc~~get_xgi~3~~CalledByGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 441,-112 441,4 -4,4"/>
+<!-- proc~get_xgi~3 -->
+<g id="proc~~get_xgi~3~~CalledByGraph_node1" class="node">
+<title>proc~get_xgi~3</title>
+<polygon fill="none" stroke="black" points="437,-66 300,-66 300,-42 437,-42 437,-66"/>
+<text text-anchor="middle" x="368.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%get_Xgi</text>
+</g>
+<!-- none~get_xg~3 -->
+<g id="proc~~get_xgi~3~~CalledByGraph_node2" class="node">
+<title>none~get_xg~3</title>
+<g id="a_proc~~get_xgi~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xg~3" xlink:title="nurbs_surface%get_Xg">
+<polygon fill="#a7506f" stroke="#a7506f" points="264,-66 130,-66 130,-42 264,-42 264,-66"/>
+<text text-anchor="middle" x="197" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xg</text>
+</a>
+</g>
+</g>
+<!-- none~get_xg~3&#45;&gt;proc~get_xgi~3 -->
+<g id="proc~~get_xgi~3~~CalledByGraph_edge1" class="edge">
+<title>none~get_xg~3&#45;&gt;proc~get_xgi~3</title>
+<path fill="none" stroke="#ff0000" d="M264.02,-54C272.5,-54 281.25,-54 289.9,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="289.99,-57.5 299.99,-54 289.99,-50.5 289.99,-57.5"/>
+</g>
+<!-- program~example_ppm1 -->
+<g id="proc~~get_xgi~3~~CalledByGraph_node3" class="node">
+<title>program~example_ppm1</title>
+<g id="a_proc~~get_xgi~3~~CalledByGraph_node3"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-108 0,-108 0,-84 94,-84 94,-108"/>
+<text text-anchor="middle" x="47" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm1&#45;&gt;none~get_xg~3 -->
+<g id="proc~~get_xgi~3~~CalledByGraph_edge2" class="edge">
+<title>program~example_ppm1&#45;&gt;none~get_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M90.41,-83.96C106.98,-79.26 126.14,-73.82 143.56,-68.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="144.92,-72.13 153.58,-66.04 143.01,-65.4 144.92,-72.13"/>
+</g>
+<!-- program~example_ppm2 -->
+<g id="proc~~get_xgi~3~~CalledByGraph_node4" class="node">
+<title>program~example_ppm2</title>
+<g id="a_proc~~get_xgi~3~~CalledByGraph_node4"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-66 0,-66 0,-42 94,-42 94,-66"/>
+<text text-anchor="middle" x="47" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm2&#45;&gt;none~get_xg~3 -->
+<g id="proc~~get_xgi~3~~CalledByGraph_edge3" class="edge">
+<title>program~example_ppm2&#45;&gt;none~get_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M94.02,-54C102.19,-54 110.9,-54 119.65,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="119.91,-57.5 129.91,-54 119.91,-50.5 119.91,-57.5"/>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~get_xgi~3~~CalledByGraph_node5" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~get_xgi~3~~CalledByGraph_node5"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
+<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm3&#45;&gt;none~get_xg~3 -->
+<g id="proc~~get_xgi~3~~CalledByGraph_edge4" class="edge">
+<title>program~example_ppm3&#45;&gt;none~get_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M90.41,-24.04C106.98,-28.74 126.14,-34.18 143.56,-39.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="143.01,-42.6 153.58,-41.96 144.92,-35.87 143.01,-42.6"/>
+</g>
+</g>
+</svg>
+</div>          <div>
+            <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
+          </div>
+          <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
+            <div class="modal-dialog modal-lg" role="document">
+              <div class="modal-content">
+                <div class="modal-header">
+                  <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
+                  <button type="button" class="btn-close" data-bs-dismiss="modal" aria-label="Close"></button>
+                </div>
+                <div class="modal-body">
+<p>Nodes of different colours represent the following: </p>
+<?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.43.0 (0)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="641pt" height="28pt"
+ viewBox="0.00 0.00 641.00 27.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1.16 1.16) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 741.5,-28 741.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="70,-24 0,-24 0,0 70,0 70,-24"/>
+<text text-anchor="middle" x="35" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-24 88,-24 88,0 146,0 146,-24"/>
+<text text-anchor="middle" x="117" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="225.5,-24 164.5,-24 164.5,0 225.5,0 225.5,-24"/>
+<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Type Bound Procedure -->
+<g id="node4" class="node">
+<title>Type Bound Procedure</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="374,-24 244,-24 244,0 374,0 374,-24"/>
+<text text-anchor="middle" x="309" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Type Bound Procedure</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node5" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="537.5,-24 392.5,-24 392.5,0 537.5,0 537.5,-24"/>
+<text text-anchor="middle" x="465" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node6" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-24 556,-24 556,0 614,0 614,-24"/>
+<text text-anchor="middle" x="585" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node7" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="737.5,-24 632.5,-24 632.5,0 737.5,0 737.5,-24"/>
+<text text-anchor="middle" x="685" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+<p>Solid arrows point from a procedure to one which it calls. Dashed 
+arrows point from an interface to procedures which implement that interface.
+This could include the module procedures in a generic interface or the
+implementation in a submodule of an interface in a parent module.
+</p>
+ Where possible, edges connecting nodes are
+given different colours to make them easier to distinguish in
+large graphs.</div>
+            </div>
+          </div>
+        </div>
+      </div>
+    </div>
+    <br>
 
 
     
@@ -227,7 +393,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xt.html b/proc/get_xt.html
index 206ffc1a8..579f2c501 100644
--- a/proc/get_xt.html
+++ b/proc/get_xt.html
@@ -78,20 +78,20 @@ <h1>get_Xt
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.4% of total for procedures.">26 statements</a>
+                 title=" 0.1% of total for procedures.">9 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xt</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure function get_Xt(this, dir) result(Xt)  
+    <h2>private pure function get_Xt(this) result(Xt)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~15"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~16"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -169,21 +169,6 @@ <h3>Arguments</h3>
             <td><strong>this</strong></td>
             <td>
                 
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-dir~3"></span>
-              integer,
-            </td>
-<td>intent(in)</td>
-              <td></td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>dir</strong></td>
-            <td>
-                
             </td>
         </tr>
     </tbody>
@@ -227,7 +212,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xt~2.html b/proc/get_xt~2.html
index 690eaf8b5..b7d2a7a80 100644
--- a/proc/get_xt~2.html
+++ b/proc/get_xt~2.html
@@ -78,20 +78,20 @@ <h1>get_Xt
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.3% of total for procedures.">20 statements</a>
+                 title=" 0.4% of total for procedures.">26 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xt</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function get_Xt(this, dir) result(Xt)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~83"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~76"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~18"></span>
+              <span class="anchor" id="variable-dir~6"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -191,7 +191,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xt~32"></span>
+          <span class="anchor" id="variable-xt~31"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -227,7 +227,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/get_xt~3.html b/proc/get_xt~3.html
index f429ac6df..c68b45812 100644
--- a/proc/get_xt~3.html
+++ b/proc/get_xt~3.html
@@ -78,20 +78,20 @@ <h1>get_Xt
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.1% of total for procedures.">9 statements</a>
+                 title=" 0.3% of total for procedures.">20 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">get_Xt</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure function get_Xt(this) result(Xt)  
+    <h2>private pure function get_Xt(this, dir) result(Xt)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~147"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~144"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -169,6 +169,21 @@ <h3>Arguments</h3>
             <td><strong>this</strong></td>
             <td>
                 
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-dir~21"></span>
+              integer,
+            </td>
+<td>intent(in)</td>
+              <td></td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>dir</strong></td>
+            <td>
+                
             </td>
         </tr>
     </tbody>
@@ -212,7 +227,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/hexahedron_xc.html b/proc/hexahedron_xc.html
index 24fd41550..d6b215de6 100644
--- a/proc/hexahedron_xc.html
+++ b/proc/hexahedron_xc.html
@@ -156,7 +156,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-l~6"></span>
+              <span class="anchor" id="variable-l~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -171,7 +171,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~56"></span>
+              <span class="anchor" id="variable-nc~49"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -189,7 +189,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xc~48"></span>
+          <span class="anchor" id="variable-xc~43"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
@@ -376,7 +376,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/insert_knot_a_5_1.html b/proc/insert_knot_a_5_1.html
index 759cbb62f..99cbcd19f 100644
--- a/proc/insert_knot_a_5_1.html
+++ b/proc/insert_knot_a_5_1.html
@@ -333,9 +333,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~insert_knots -->
 <g id="proc~~insert_knot_a_5_1~~CalledByGraph_node2" class="node">
 <title>proc~insert_knots</title>
-<g id="a_proc~~insert_knot_a_5_1~~CalledByGraph_node2"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-108 146,-108 146,-84 307,-84 307,-108"/>
-<text text-anchor="middle" x="226.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
+<g id="a_proc~~insert_knot_a_5_1~~CalledByGraph_node2"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_curve%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="302,-108 151,-108 151,-84 302,-84 302,-108"/>
+<text text-anchor="middle" x="226.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
 </a>
 </g>
 </g>
@@ -348,9 +348,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~insert_knots~2 -->
 <g id="proc~~insert_knot_a_5_1~~CalledByGraph_node3" class="node">
 <title>proc~insert_knots~2</title>
-<g id="a_proc~~insert_knot_a_5_1~~CalledByGraph_node3"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
+<g id="a_proc~~insert_knot_a_5_1~~CalledByGraph_node3"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
 <polygon fill="#d9534f" stroke="#d9534f" points="307,-66 146,-66 146,-42 307,-42 307,-66"/>
-<text text-anchor="middle" x="226.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+<text text-anchor="middle" x="226.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
@@ -363,9 +363,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~insert_knots~3 -->
 <g id="proc~~insert_knot_a_5_1~~CalledByGraph_node4" class="node">
 <title>proc~insert_knots~3</title>
-<g id="a_proc~~insert_knot_a_5_1~~CalledByGraph_node4"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_curve%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="302,-24 151,-24 151,0 302,0 302,-24"/>
-<text text-anchor="middle" x="226.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
+<g id="a_proc~~insert_knot_a_5_1~~CalledByGraph_node4"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-24 146,-24 146,0 307,0 307,-24"/>
+<text text-anchor="middle" x="226.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
 </a>
 </g>
 </g>
@@ -379,46 +379,46 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~insert_knot_a_5_1~~CalledByGraph_node5" class="node">
 <title>program~example1_curve</title>
 <g id="a_proc~~insert_knot_a_5_1~~CalledByGraph_node5"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-24 5,-24 5,0 105,0 105,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-108 5,-108 5,-84 105,-84 105,-108"/>
+<text text-anchor="middle" x="55" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
-<g id="proc~~insert_knot_a_5_1~~CalledByGraph_edge6" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
-<path fill="none" stroke="#0000ff" d="M105.03,-12C116.18,-12 128.34,-12 140.51,-12"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="140.71,-15.5 150.71,-12 140.71,-8.5 140.71,-15.5"/>
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
+<g id="proc~~insert_knot_a_5_1~~CalledByGraph_edge4" class="edge">
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
+<path fill="none" stroke="#ff0000" d="M105.03,-96C116.18,-96 128.34,-96 140.51,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="140.71,-99.5 150.71,-96 140.71,-92.5 140.71,-99.5"/>
 </g>
 <!-- program~example3_surface -->
 <g id="proc~~insert_knot_a_5_1~~CalledByGraph_node6" class="node">
 <title>program~example3_surface</title>
 <g id="a_proc~~insert_knot_a_5_1~~CalledByGraph_node6"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-66 0,-66 0,-42 110,-42 110,-66"/>
-<text text-anchor="middle" x="55" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
-<g id="proc~~insert_knot_a_5_1~~CalledByGraph_edge5" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
-<path fill="none" stroke="#00ff00" d="M110.1,-54C118.31,-54 126.98,-54 135.71,-54"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="135.97,-57.5 145.97,-54 135.97,-50.5 135.97,-57.5"/>
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
+<g id="proc~~insert_knot_a_5_1~~CalledByGraph_edge6" class="edge">
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#0000ff" d="M110.1,-12C118.31,-12 126.98,-12 135.71,-12"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="135.97,-15.5 145.97,-12 135.97,-8.5 135.97,-15.5"/>
 </g>
 <!-- program~example3_volume -->
 <g id="proc~~insert_knot_a_5_1~~CalledByGraph_node7" class="node">
 <title>program~example3_volume</title>
 <g id="a_proc~~insert_knot_a_5_1~~CalledByGraph_node7"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-108 0,-108 0,-84 110,-84 110,-108"/>
-<text text-anchor="middle" x="55" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-66 0,-66 0,-42 110,-42 110,-66"/>
+<text text-anchor="middle" x="55" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
-<g id="proc~~insert_knot_a_5_1~~CalledByGraph_edge4" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#ff0000" d="M110.1,-96C118.31,-96 126.98,-96 135.71,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.97,-99.5 145.97,-96 135.97,-92.5 135.97,-99.5"/>
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
+<g id="proc~~insert_knot_a_5_1~~CalledByGraph_edge5" class="edge">
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
+<path fill="none" stroke="#00ff00" d="M110.1,-54C118.31,-54 126.98,-54 135.71,-54"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="135.97,-57.5 145.97,-54 135.97,-50.5 135.97,-57.5"/>
 </g>
 </g>
 </svg>
@@ -534,7 +534,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/insert_knots.html b/proc/insert_knots.html
index 28b47da3d..ca3e0796d 100644
--- a/proc/insert_knots.html
+++ b/proc/insert_knots.html
@@ -78,20 +78,20 @@ <h1>insert_knots
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 2.3% of total for procedures.">154 statements</a>
+                 title=" 0.6% of total for procedures.">43 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">insert_knots</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine insert_knots(this, dir, Xth, r)  
+    <h2>private pure subroutine insert_knots(this, Xth, r)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~40"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~33"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -171,21 +171,6 @@ <h3>Arguments</h3>
                 
             </td>
         </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-dir~13"></span>
-              integer,
-            </td>
-<td>intent(in)</td>
-              <td></td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>dir</strong></td>
-            <td>
-                
-            </td>
-        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-xth"></span>
@@ -231,310 +216,274 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~insert_knots~~CallsGraph Pages: 1 -->
-<svg id="procinsert_knotsCallsGraph" width="641pt" height="135pt"
- viewBox="0.00 0.00 641.00 134.79" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~insert_knots~~CallsGraph" class="graph" transform="scale(2 2) rotate(0) translate(4 266)">
+<svg id="procinsert_knotsCallsGraph" width="641pt" height="133pt"
+ viewBox="0.00 0.00 641.00 132.86" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~insert_knots~~CallsGraph" class="graph" transform="scale(1.89 1.89) rotate(0) translate(4 247)">
 <title>proc~~insert_knots~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-266 1280,-266 1280,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-247 1207,-247 1207,4 -4,4"/>
 <!-- proc~insert_knots -->
 <g id="proc~~insert_knots~~CallsGraph_node1" class="node">
 <title>proc~insert_knots</title>
-<polygon fill="none" stroke="black" points="161,-129 0,-129 0,-105 161,-105 161,-129"/>
-<text text-anchor="middle" x="80.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%insert_knots</text>
+<polygon fill="none" stroke="black" points="151,-108 0,-108 0,-84 151,-84 151,-108"/>
+<text text-anchor="middle" x="75.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%insert_knots</text>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~insert_knots~~CallsGraph_node2" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~insert_knots~~CallsGraph_node2"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1110,-150 986,-150 986,-126 1110,-126 1110,-150"/>
-<text text-anchor="middle" x="1048" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1037,-222 913,-222 913,-198 1037,-198 1037,-222"/>
+<text text-anchor="middle" x="975" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~insert_knots~~CallsGraph_edge1" class="edge">
 <title>proc~insert_knots&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M94.59,-129.28C114.91,-147.66 155.99,-182.18 197,-201 304.29,-250.24 337.46,-262 455.5,-262 455.5,-262 455.5,-262 655.5,-262 795.83,-262 951.79,-188.7 1016.4,-154.82"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1018.07,-157.89 1025.26,-150.12 1014.79,-151.71 1018.07,-157.89"/>
-</g>
-<!-- none~get_knot -->
-<g id="proc~~insert_knots~~CallsGraph_node3" class="node">
-<title>none~get_knot</title>
-<g id="a_proc~~insert_knots~~CallsGraph_node3"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot" xlink:title="nurbs_volume%get_knot">
-<polygon fill="#a7506f" stroke="#a7506f" points="340,-192 197,-192 197,-168 340,-168 340,-192"/>
-<text text-anchor="middle" x="268.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot</text>
-</a>
-</g>
-</g>
-<!-- proc~insert_knots&#45;&gt;none~get_knot -->
-<g id="proc~~insert_knots~~CallsGraph_edge2" class="edge">
-<title>proc~insert_knots&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0000" d="M117.36,-129.15C147.31,-139.29 190.15,-153.8 222.42,-164.73"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="221.47,-168.1 232.06,-168 223.71,-161.47 221.47,-168.1"/>
+<path fill="none" stroke="#ff0000" d="M92.41,-108.11C139.83,-142.96 285.4,-241 422.5,-241 422.5,-241 422.5,-241 596,-241 703.07,-241 826.62,-228.49 902.52,-219.37"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="903.41,-222.79 912.91,-218.1 902.56,-215.84 903.41,-222.79"/>
 </g>
 <!-- none~set -->
-<g id="proc~~insert_knots~~CallsGraph_node4" class="node">
+<g id="proc~~insert_knots~~CallsGraph_node3" class="node">
 <title>none~set</title>
-<g id="a_proc~~insert_knots~~CallsGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="325,-129 212,-129 212,-105 325,-105 325,-129"/>
-<text text-anchor="middle" x="268.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<g id="a_proc~~insert_knots~~CallsGraph_node3"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="309.5,-150 206.5,-150 206.5,-126 309.5,-126 309.5,-150"/>
+<text text-anchor="middle" x="258" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;none~set -->
-<g id="proc~~insert_knots~~CallsGraph_edge3" class="edge">
+<g id="proc~~insert_knots~~CallsGraph_edge2" class="edge">
 <title>proc~insert_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M161.19,-117C174.65,-117 188.49,-117 201.55,-117"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="201.83,-120.5 211.83,-117 201.83,-113.5 201.83,-120.5"/>
+<path fill="none" stroke="#ff0000" d="M128.22,-108.04C149.45,-112.98 174.18,-118.73 196.27,-123.87"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="195.67,-127.32 206.2,-126.18 197.26,-120.51 195.67,-127.32"/>
 </g>
 <!-- proc~findspan -->
-<g id="proc~~insert_knots~~CallsGraph_node5" class="node">
+<g id="proc~~insert_knots~~CallsGraph_node4" class="node">
 <title>proc~findspan</title>
-<g id="a_proc~~insert_knots~~CallsGraph_node5"><a xlink:href="../proc/findspan.html" xlink:title="findspan">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="297.5,-87 239.5,-87 239.5,-63 297.5,-63 297.5,-87"/>
-<text text-anchor="middle" x="268.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">findspan</text>
+<g id="a_proc~~insert_knots~~CallsGraph_node4"><a xlink:href="../proc/findspan.html" xlink:title="findspan">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="287,-108 229,-108 229,-84 287,-84 287,-108"/>
+<text text-anchor="middle" x="258" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">findspan</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;proc~findspan -->
-<g id="proc~~insert_knots~~CallsGraph_edge4" class="edge">
+<g id="proc~~insert_knots~~CallsGraph_edge3" class="edge">
 <title>proc~insert_knots&#45;&gt;proc~findspan</title>
-<path fill="none" stroke="#ff0000" d="M134.8,-104.96C165.07,-98.13 202.25,-89.73 229.54,-83.57"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="230.5,-86.94 239.49,-81.33 228.96,-80.11 230.5,-86.94"/>
+<path fill="none" stroke="#ff0000" d="M151.22,-96C174.4,-96 199,-96 218.63,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="218.7,-99.5 228.7,-96 218.7,-92.5 218.7,-99.5"/>
 </g>
 <!-- proc~insert_knot_a_5_1 -->
-<g id="proc~~insert_knots~~CallsGraph_node6" class="node">
+<g id="proc~~insert_knots~~CallsGraph_node5" class="node">
 <title>proc~insert_knot_a_5_1</title>
-<g id="a_proc~~insert_knots~~CallsGraph_node6"><a xlink:href="../proc/insert_knot_a_5_1.html" xlink:title="insert_knot_A_5_1">
-<polygon fill="#d9534f" stroke="#d9534f" points="322.5,-45 214.5,-45 214.5,-21 322.5,-21 322.5,-45"/>
-<text text-anchor="middle" x="268.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">insert_knot_A_5_1</text>
+<g id="a_proc~~insert_knots~~CallsGraph_node5"><a xlink:href="../proc/insert_knot_a_5_1.html" xlink:title="insert_knot_A_5_1">
+<polygon fill="#d9534f" stroke="#d9534f" points="312,-66 204,-66 204,-42 312,-42 312,-66"/>
+<text text-anchor="middle" x="258" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">insert_knot_A_5_1</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;proc~insert_knot_a_5_1 -->
-<g id="proc~~insert_knots~~CallsGraph_edge5" class="edge">
+<g id="proc~~insert_knots~~CallsGraph_edge4" class="edge">
 <title>proc~insert_knots&#45;&gt;proc~insert_knot_a_5_1</title>
-<path fill="none" stroke="#ff0000" d="M100.9,-104.77C123.36,-91 161.78,-68.66 197,-54 201.81,-52 206.89,-50.1 212.01,-48.32"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="213.48,-51.52 221.88,-45.06 211.28,-44.88 213.48,-51.52"/>
+<path fill="none" stroke="#ff0000" d="M128.22,-83.96C149.18,-79.09 173.55,-73.42 195.42,-68.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="196.32,-71.71 205.27,-66.04 194.74,-64.89 196.32,-71.71"/>
+</g>
+<!-- proc~is_rational -->
+<g id="proc~~insert_knots~~CallsGraph_node6" class="node">
+<title>proc~is_rational</title>
+<g id="a_proc~~insert_knots~~CallsGraph_node6"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="329,-24 187,-24 187,0 329,0 329,-24"/>
+<text text-anchor="middle" x="258" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
+</a>
+</g>
+</g>
+<!-- proc~insert_knots&#45;&gt;proc~is_rational -->
+<g id="proc~~insert_knots~~CallsGraph_edge5" class="edge">
+<title>proc~insert_knots&#45;&gt;proc~is_rational</title>
+<path fill="none" stroke="#ff0000" d="M94.61,-83.96C115.97,-70.18 152.9,-47.61 187,-33 191.69,-30.99 196.63,-29.09 201.64,-27.32"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="202.92,-30.59 211.28,-24.08 200.68,-23.95 202.92,-30.59"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~insert_knots~~CallsGraph_node7" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~insert_knots~~CallsGraph_node7"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1276,-171 1146,-171 1146,-147 1276,-147 1276,-171"/>
-<text text-anchor="middle" x="1211" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1203,-243 1073,-243 1073,-219 1203,-219 1203,-243"/>
+<text text-anchor="middle" x="1138" y="-228.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~insert_knots~~CallsGraph_edge6" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1110.33,-146C1118.69,-147.09 1127.35,-148.22 1135.92,-149.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1135.53,-152.82 1145.9,-150.64 1136.44,-145.88 1135.53,-152.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1037.33,-218C1045.69,-219.09 1054.35,-220.22 1062.92,-221.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1062.53,-224.82 1072.9,-222.64 1063.44,-217.88 1062.53,-224.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~insert_knots~~CallsGraph_node8" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~insert_knots~~CallsGraph_node8"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1276,-129 1146,-129 1146,-105 1276,-105 1276,-129"/>
-<text text-anchor="middle" x="1211" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1203,-201 1073,-201 1073,-177 1203,-177 1203,-201"/>
+<text text-anchor="middle" x="1138" y="-186.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~insert_knots~~CallsGraph_edge7" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1110.33,-130C1118.69,-128.91 1127.35,-127.78 1135.92,-126.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1136.44,-130.12 1145.9,-125.36 1135.53,-123.18 1136.44,-130.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1037.33,-202C1045.69,-200.91 1054.35,-199.78 1062.92,-198.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1063.44,-202.12 1072.9,-197.36 1062.53,-195.18 1063.44,-202.12"/>
 </g>
-<!-- proc~get_knot_all -->
+<!-- proc~set1 -->
 <g id="proc~~insert_knots~~CallsGraph_node9" class="node">
-<title>proc~get_knot_all</title>
-<g id="a_proc~~insert_knots~~CallsGraph_node9"><a xlink:href="../proc/get_knot_all.html" xlink:title="nurbs_volume%get_knot_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="537,-234 376,-234 376,-210 537,-210 537,-234"/>
-<text text-anchor="middle" x="456.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot_all</text>
+<title>proc~set1</title>
+<g id="a_proc~~insert_knots~~CallsGraph_node9"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="478.5,-213 368.5,-213 368.5,-189 478.5,-189 478.5,-213"/>
+<text text-anchor="middle" x="423.5" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
-<!-- none~get_knot&#45;&gt;proc~get_knot_all -->
+<!-- none~set&#45;&gt;proc~set1 -->
 <g id="proc~~insert_knots~~CallsGraph_edge8" class="edge">
-<title>none~get_knot&#45;&gt;proc~get_knot_all</title>
-<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M322.8,-192.04C344.49,-196.93 369.74,-202.63 392.35,-207.74"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="391.67,-211.17 402.19,-209.96 393.21,-204.35 391.67,-211.17"/>
+<title>none~set&#45;&gt;proc~set1</title>
+<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M289.07,-150.17C310.24,-158.67 339.29,-170.21 365,-180 369.72,-181.8 374.67,-183.65 379.6,-185.48"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="378.4,-188.77 389,-188.94 380.82,-182.2 378.4,-188.77"/>
 </g>
-<!-- proc~get_knoti -->
+<!-- proc~set1a -->
 <g id="proc~~insert_knots~~CallsGraph_node10" class="node">
-<title>proc~get_knoti</title>
-<g id="a_proc~~insert_knots~~CallsGraph_node10"><a xlink:href="../proc/get_knoti.html" xlink:title="nurbs_volume%get_knoti">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="529.5,-192 383.5,-192 383.5,-168 529.5,-168 529.5,-192"/>
-<text text-anchor="middle" x="456.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knoti</text>
+<title>proc~set1a</title>
+<g id="a_proc~~insert_knots~~CallsGraph_node10"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="482,-171 365,-171 365,-147 482,-147 482,-171"/>
+<text text-anchor="middle" x="423.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
 </a>
 </g>
 </g>
-<!-- none~get_knot&#45;&gt;proc~get_knoti -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="proc~~insert_knots~~CallsGraph_edge9" class="edge">
-<title>none~get_knot&#45;&gt;proc~get_knoti</title>
-<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M340.08,-180C350.94,-180 362.23,-180 373.32,-180"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="373.42,-183.5 383.42,-180 373.42,-176.5 373.42,-183.5"/>
-</g>
-<!-- proc~set1 -->
-<g id="proc~~insert_knots~~CallsGraph_node11" class="node">
-<title>proc~set1</title>
-<g id="a_proc~~insert_knots~~CallsGraph_node11"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="516.5,-108 396.5,-108 396.5,-84 516.5,-84 516.5,-108"/>
-<text text-anchor="middle" x="456.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
-</a>
-</g>
-</g>
-<!-- none~set&#45;&gt;proc~set1 -->
-<g id="proc~~insert_knots~~CallsGraph_edge10" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
-<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M325.05,-110.73C344.28,-108.56 366.08,-106.1 386.27,-103.82"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="386.81,-107.28 396.35,-102.68 386.02,-100.32 386.81,-107.28"/>
+<title>none~set&#45;&gt;proc~set1a</title>
+<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M309.84,-144.53C324,-146.35 339.62,-148.36 354.6,-150.28"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="354.48,-153.79 364.85,-151.59 355.37,-146.85 354.48,-153.79"/>
 </g>
 <!-- proc~set2 -->
-<g id="proc~~insert_knots~~CallsGraph_node12" class="node">
+<g id="proc~~insert_knots~~CallsGraph_node11" class="node">
 <title>proc~set2</title>
-<g id="a_proc~~insert_knots~~CallsGraph_node12"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="516.5,-66 396.5,-66 396.5,-42 516.5,-42 516.5,-66"/>
-<text text-anchor="middle" x="456.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
+<g id="a_proc~~insert_knots~~CallsGraph_node11"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="478.5,-87 368.5,-87 368.5,-63 478.5,-63 478.5,-87"/>
+<text text-anchor="middle" x="423.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set2 -->
-<g id="proc~~insert_knots~~CallsGraph_edge11" class="edge">
+<g id="proc~~insert_knots~~CallsGraph_edge10" class="edge">
 <title>none~set&#45;&gt;proc~set2</title>
-<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M315.95,-104.88C324.09,-102.28 332.38,-99.3 340,-96 357,-88.64 358.89,-82.1 376,-75 381.11,-72.88 386.49,-70.92 391.95,-69.12"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="393.3,-72.37 401.82,-66.06 391.23,-65.68 393.3,-72.37"/>
+<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M304.75,-125.98C312.95,-123.35 321.32,-120.34 329,-117 345.99,-109.62 348.23,-103.88 365,-96 368.84,-94.2 372.88,-92.44 376.97,-90.77"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="378.49,-93.94 386.52,-87.02 375.93,-87.42 378.49,-93.94"/>
 </g>
 <!-- proc~set3 -->
-<g id="proc~~insert_knots~~CallsGraph_node13" class="node">
+<g id="proc~~insert_knots~~CallsGraph_node12" class="node">
 <title>proc~set3</title>
-<g id="a_proc~~insert_knots~~CallsGraph_node13"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="516.5,-150 396.5,-150 396.5,-126 516.5,-126 516.5,-150"/>
-<text text-anchor="middle" x="456.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
+<g id="a_proc~~insert_knots~~CallsGraph_node12"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="478.5,-129 368.5,-129 368.5,-105 478.5,-105 478.5,-129"/>
+<text text-anchor="middle" x="423.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set3 -->
-<g id="proc~~insert_knots~~CallsGraph_edge12" class="edge">
+<g id="proc~~insert_knots~~CallsGraph_edge11" class="edge">
 <title>none~set&#45;&gt;proc~set3</title>
-<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M325.05,-123.27C344.28,-125.44 366.08,-127.9 386.27,-130.18"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="386.02,-133.68 396.35,-131.32 386.81,-126.72 386.02,-133.68"/>
+<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M309.84,-131.47C325.06,-129.51 341.97,-127.34 357.95,-125.29"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="358.82,-128.71 368.29,-123.96 357.93,-121.76 358.82,-128.71"/>
 </g>
 <!-- proc~set4 -->
-<g id="proc~~insert_knots~~CallsGraph_node14" class="node">
+<g id="proc~~insert_knots~~CallsGraph_node13" class="node">
 <title>proc~set4</title>
-<g id="a_proc~~insert_knots~~CallsGraph_node14"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="516.5,-24 396.5,-24 396.5,0 516.5,0 516.5,-24"/>
-<text text-anchor="middle" x="456.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
+<g id="a_proc~~insert_knots~~CallsGraph_node13"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="478.5,-45 368.5,-45 368.5,-21 478.5,-21 478.5,-45"/>
+<text text-anchor="middle" x="423.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set4 -->
-<g id="proc~~insert_knots~~CallsGraph_edge13" class="edge">
+<g id="proc~~insert_knots~~CallsGraph_edge12" class="edge">
 <title>none~set&#45;&gt;proc~set4</title>
-<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M325.05,-105C330.4,-102.54 335.5,-99.57 340,-96 365.27,-75.96 350.42,-52.64 376,-33 379.38,-30.41 383.04,-28.13 386.89,-26.14"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="388.45,-29.28 396.13,-21.98 385.58,-22.89 388.45,-29.28"/>
+<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M309.51,-127.96C316.5,-125.16 323.24,-121.58 329,-117 354.25,-96.93 340.35,-74.8 365,-54 366.55,-52.69 368.2,-51.46 369.9,-50.3"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="371.99,-53.14 378.91,-45.11 368.49,-47.07 371.99,-53.14"/>
 </g>
 <!-- proc~cmp_degree -->
-<g id="proc~~insert_knots~~CallsGraph_node15" class="node">
+<g id="proc~~insert_knots~~CallsGraph_node14" class="node">
 <title>proc~cmp_degree</title>
-<g id="a_proc~~insert_knots~~CallsGraph_node15"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="736,-150 573,-150 573,-126 736,-126 736,-150"/>
-<text text-anchor="middle" x="654.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
+<g id="a_proc~~insert_knots~~CallsGraph_node14"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="672,-181 518,-181 518,-157 672,-157 672,-181"/>
+<text text-anchor="middle" x="595" y="-166.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~set1&#45;&gt;proc~cmp_degree -->
-<g id="proc~~insert_knots~~CallsGraph_edge14" class="edge">
+<g id="proc~~insert_knots~~CallsGraph_edge13" class="edge">
 <title>proc~set1&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#00ffff" d="M513.67,-108.04C536.63,-112.96 563.37,-118.69 587.27,-123.81"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="586.81,-127.29 597.33,-125.96 588.28,-120.45 586.81,-127.29"/>
+<path fill="none" stroke="#48ff00" d="M478.6,-190.79C491.85,-188.28 506.26,-185.56 520.26,-182.92"/>
+<polygon fill="#48ff00" stroke="#48ff00" points="521.19,-186.31 530.36,-181.01 519.89,-179.43 521.19,-186.31"/>
 </g>
-<!-- proc~cmp_nc -->
-<g id="proc~~insert_knots~~CallsGraph_node16" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_proc~~insert_knots~~CallsGraph_node16"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="724,-108 585,-108 585,-84 724,-84 724,-108"/>
-<text text-anchor="middle" x="654.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
-</a>
-</g>
-</g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
-<g id="proc~~insert_knots~~CallsGraph_edge15" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#00ffff" d="M516.57,-96C534.91,-96 555.41,-96 574.85,-96"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="574.91,-99.5 584.91,-96 574.91,-92.5 574.91,-99.5"/>
-</g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
-<g id="proc~~insert_knots~~CallsGraph_edge16" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#003fff" d="M513.67,-66.04C536.63,-70.96 563.37,-76.69 587.27,-81.81"/>
-<polygon fill="#003fff" stroke="#003fff" points="586.81,-85.29 597.33,-83.96 588.28,-78.45 586.81,-85.29"/>
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
+<g id="proc~~insert_knots~~CallsGraph_edge14" class="edge">
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#00ff91" d="M482.36,-162.41C490.56,-162.9 499.14,-163.4 507.74,-163.91"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="507.63,-167.41 517.82,-164.51 508.04,-160.42 507.63,-167.41"/>
 </g>
 <!-- proc~compute_knot_vector -->
-<g id="proc~~insert_knots~~CallsGraph_node17" class="node">
+<g id="proc~~insert_knots~~CallsGraph_node15" class="node">
 <title>proc~compute_knot_vector</title>
-<g id="a_proc~~insert_knots~~CallsGraph_node17"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="718,-66 591,-66 591,-42 718,-42 718,-66"/>
-<text text-anchor="middle" x="654.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<g id="a_proc~~insert_knots~~CallsGraph_node15"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="658.5,-87 531.5,-87 531.5,-63 658.5,-63 658.5,-87"/>
+<text text-anchor="middle" x="595" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
-<g id="proc~~insert_knots~~CallsGraph_edge17" class="edge">
+<g id="proc~~insert_knots~~CallsGraph_edge15" class="edge">
 <title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#003fff" d="M516.57,-54C536.72,-54 559.49,-54 580.59,-54"/>
-<polygon fill="#003fff" stroke="#003fff" points="580.8,-57.5 590.8,-54 580.8,-50.5 580.8,-57.5"/>
+<path fill="none" stroke="#0091ff" d="M478.6,-75C492.08,-75 506.77,-75 521,-75"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="521.26,-78.5 531.26,-75 521.26,-71.5 521.26,-78.5"/>
 </g>
 <!-- proc~set3&#45;&gt;proc~cmp_degree -->
-<g id="proc~~insert_knots~~CallsGraph_edge18" class="edge">
+<g id="proc~~insert_knots~~CallsGraph_edge16" class="edge">
 <title>proc~set3&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#7f00ff" d="M516.57,-138C531.09,-138 546.97,-138 562.6,-138"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="562.82,-141.5 572.82,-138 562.82,-134.5 562.82,-141.5"/>
+<path fill="none" stroke="#4800ff" d="M463.81,-129.06C488.01,-136.48 519.22,-146.06 545.01,-153.97"/>
+<polygon fill="#4800ff" stroke="#4800ff" points="544.02,-157.33 554.61,-156.91 546.07,-150.64 544.02,-157.33"/>
 </g>
 <!-- proc~get_multiplicity -->
-<g id="proc~~insert_knots~~CallsGraph_node18" class="node">
+<g id="proc~~insert_knots~~CallsGraph_node16" class="node">
 <title>proc~get_multiplicity</title>
-<g id="a_proc~~insert_knots~~CallsGraph_node18"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="950,-150 772,-150 772,-126 950,-126 950,-150"/>
-<text text-anchor="middle" x="861" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
+<g id="a_proc~~insert_knots~~CallsGraph_node16"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="877,-192 708,-192 708,-168 877,-168 877,-192"/>
+<text text-anchor="middle" x="792.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
-<g id="proc~~insert_knots~~CallsGraph_edge19" class="edge">
+<g id="proc~~insert_knots~~CallsGraph_edge17" class="edge">
 <title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M736.03,-138C744.47,-138 753.11,-138 761.71,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="761.78,-141.5 771.78,-138 761.78,-134.5 761.78,-141.5"/>
-</g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~insert_knots~~CallsGraph_edge20" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00ff00" d="M724.23,-98.14C784.1,-100.66 873.13,-105.99 950,-117 962.38,-118.77 975.54,-121.23 988.04,-123.84"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="987.39,-127.28 997.9,-125.95 988.86,-120.43 987.39,-127.28"/>
+<path fill="none" stroke="#ff0000" d="M672.15,-173.28C680.54,-173.76 689.17,-174.24 697.75,-174.73"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="697.61,-178.22 707.79,-175.29 698,-171.23 697.61,-178.22"/>
 </g>
 <!-- proc~repelem -->
-<g id="proc~~insert_knots~~CallsGraph_node19" class="node">
+<g id="proc~~insert_knots~~CallsGraph_node17" class="node">
 <title>proc~repelem</title>
-<g id="a_proc~~insert_knots~~CallsGraph_node19"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="889.5,-66 832.5,-66 832.5,-42 889.5,-42 889.5,-66"/>
-<text text-anchor="middle" x="861" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<g id="a_proc~~insert_knots~~CallsGraph_node17"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="821,-87 764,-87 764,-63 821,-63 821,-87"/>
+<text text-anchor="middle" x="792.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
-<g id="proc~~insert_knots~~CallsGraph_edge21" class="edge">
+<g id="proc~~insert_knots~~CallsGraph_edge18" class="edge">
 <title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#0000ff" d="M718.25,-54C752.23,-54 793.1,-54 822.2,-54"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="822.36,-57.5 832.36,-54 822.35,-50.5 822.36,-57.5"/>
+<path fill="none" stroke="#00ffff" d="M658.66,-75C689.92,-75 726.69,-75 753.61,-75"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="753.78,-78.5 763.78,-75 753.78,-71.5 753.78,-78.5"/>
 </g>
 <!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~insert_knots~~CallsGraph_edge22" class="edge">
+<g id="proc~~insert_knots~~CallsGraph_edge19" class="edge">
 <title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M950.17,-138C958.77,-138 967.42,-138 975.82,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="975.93,-141.5 985.93,-138 975.93,-134.5 975.93,-141.5"/>
+<path fill="none" stroke="#ff0000" d="M865.88,-192.03C878.06,-194.05 890.7,-196.15 902.85,-198.17"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="902.48,-201.66 912.92,-199.85 903.63,-194.76 902.48,-201.66"/>
 </g>
 </g>
 </svg>
@@ -634,31 +583,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~insert_knots~~CalledByGraph Pages: 1 -->
-<svg id="procinsert_knotsCalledByGraph" width="315pt" height="32pt"
- viewBox="0.00 0.00 315.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procinsert_knotsCalledByGraph" width="295pt" height="32pt"
+ viewBox="0.00 0.00 295.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~insert_knots~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~insert_knots~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 311,-28 311,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 291,-28 291,4 -4,4"/>
 <!-- proc~insert_knots -->
 <g id="proc~~insert_knots~~CalledByGraph_node1" class="node">
 <title>proc~insert_knots</title>
-<polygon fill="none" stroke="black" points="307,-24 146,-24 146,0 307,0 307,-24"/>
-<text text-anchor="middle" x="226.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%insert_knots</text>
+<polygon fill="none" stroke="black" points="287,-24 136,-24 136,0 287,0 287,-24"/>
+<text text-anchor="middle" x="211.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%insert_knots</text>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example1_curve -->
 <g id="proc~~insert_knots~~CalledByGraph_node2" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~insert_knots~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~insert_knots~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="100,-24 0,-24 0,0 100,0 100,-24"/>
+<text text-anchor="middle" x="50" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
 <g id="proc~~insert_knots~~CalledByGraph_edge1" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#ff0000" d="M110.1,-12C118.31,-12 126.98,-12 135.71,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.97,-15.5 145.97,-12 135.97,-8.5 135.97,-15.5"/>
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
+<path fill="none" stroke="#ff0000" d="M100.16,-12C108.31,-12 116.98,-12 125.72,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="125.99,-15.5 135.99,-12 125.99,-8.5 125.99,-15.5"/>
 </g>
 </g>
 </svg>
@@ -774,7 +723,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/insert_knots~2.html b/proc/insert_knots~2.html
index 1806daafd..047310858 100644
--- a/proc/insert_knots~2.html
+++ b/proc/insert_knots~2.html
@@ -78,20 +78,20 @@ <h1>insert_knots
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 1.5% of total for procedures.">104 statements</a>
+                 title=" 2.3% of total for procedures.">154 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">insert_knots</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine insert_knots(this, dir, Xth, r)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~108"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~101"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~28"></span>
+              <span class="anchor" id="variable-dir~16"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -231,325 +231,310 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~insert_knots~2~~CallsGraph Pages: 1 -->
-<svg id="procinsert_knots2CallsGraph" width="641pt" height="144pt"
- viewBox="0.00 0.00 641.00 144.26" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~insert_knots~2~~CallsGraph" class="graph" transform="scale(2.02 2.02) rotate(0) translate(4 287)">
+<svg id="procinsert_knots2CallsGraph" width="641pt" height="135pt"
+ viewBox="0.00 0.00 641.00 134.79" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~insert_knots~2~~CallsGraph" class="graph" transform="scale(2 2) rotate(0) translate(4 266)">
 <title>proc~~insert_knots~2~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-287 1289,-287 1289,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-266 1280,-266 1280,4 -4,4"/>
 <!-- proc~insert_knots~2 -->
 <g id="proc~~insert_knots~2~~CallsGraph_node1" class="node">
 <title>proc~insert_knots~2</title>
 <polygon fill="none" stroke="black" points="161,-129 0,-129 0,-105 161,-105 161,-129"/>
-<text text-anchor="middle" x="80.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%insert_knots</text>
+<text text-anchor="middle" x="80.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%insert_knots</text>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~insert_knots~2~~CallsGraph_node2" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~insert_knots~2~~CallsGraph_node2"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1119,-171 995,-171 995,-147 1119,-147 1119,-171"/>
-<text text-anchor="middle" x="1057" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1110,-150 986,-150 986,-126 1110,-126 1110,-150"/>
+<text text-anchor="middle" x="1048" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~insert_knots~2~~CallsGraph_edge1" class="edge">
 <title>proc~insert_knots~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M91.18,-129.24C109.4,-151.39 151.11,-198.05 197,-222 305.1,-278.42 342.56,-283 464.5,-283 464.5,-283 464.5,-283 664.5,-283 804.83,-283 960.79,-209.7 1025.4,-175.82"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1027.07,-178.89 1034.26,-171.12 1023.79,-172.71 1027.07,-178.89"/>
+<path fill="none" stroke="#ff0000" d="M94.59,-129.28C114.91,-147.66 155.99,-182.18 197,-201 304.29,-250.24 337.46,-262 455.5,-262 455.5,-262 455.5,-262 655.5,-262 795.83,-262 951.79,-188.7 1016.4,-154.82"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1018.07,-157.89 1025.26,-150.12 1014.79,-151.71 1018.07,-157.89"/>
 </g>
 <!-- none~get_knot~2 -->
 <g id="proc~~insert_knots~2~~CallsGraph_node3" class="node">
 <title>none~get_knot~2</title>
-<g id="a_proc~~insert_knots~2~~CallsGraph_node3"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~2" xlink:title="nurbs_surface%get_knot">
-<polygon fill="#a7506f" stroke="#a7506f" points="344.5,-213 201.5,-213 201.5,-189 344.5,-189 344.5,-213"/>
-<text text-anchor="middle" x="273" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
+<g id="a_proc~~insert_knots~2~~CallsGraph_node3"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot~2" xlink:title="nurbs_volume%get_knot">
+<polygon fill="#a7506f" stroke="#a7506f" points="340,-192 197,-192 197,-168 340,-168 340,-192"/>
+<text text-anchor="middle" x="268.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;none~get_knot~2 -->
 <g id="proc~~insert_knots~2~~CallsGraph_edge2" class="edge">
 <title>proc~insert_knots~2&#45;&gt;none~get_knot~2</title>
-<path fill="none" stroke="#ff0000" d="M108.79,-129.04C142.04,-143.69 198.32,-168.51 235.33,-184.83"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="234.19,-188.15 244.76,-188.99 237.02,-181.75 234.19,-188.15"/>
+<path fill="none" stroke="#ff0000" d="M117.36,-129.15C147.31,-139.29 190.15,-153.8 222.42,-164.73"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="221.47,-168.1 232.06,-168 223.71,-161.47 221.47,-168.1"/>
 </g>
 <!-- none~set~2 -->
 <g id="proc~~insert_knots~2~~CallsGraph_node4" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~insert_knots~2~~CallsGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="329.5,-150 216.5,-150 216.5,-126 329.5,-126 329.5,-150"/>
-<text text-anchor="middle" x="273" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<g id="a_proc~~insert_knots~2~~CallsGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="325,-129 212,-129 212,-105 325,-105 325,-129"/>
+<text text-anchor="middle" x="268.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;none~set~2 -->
 <g id="proc~~insert_knots~2~~CallsGraph_edge3" class="edge">
 <title>proc~insert_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M161.19,-125.78C176.12,-127.43 191.57,-129.13 206.03,-130.73"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="206.04,-134.25 216.36,-131.87 206.81,-127.29 206.04,-134.25"/>
+<path fill="none" stroke="#ff0000" d="M161.19,-117C174.65,-117 188.49,-117 201.55,-117"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="201.83,-120.5 211.83,-117 201.83,-113.5 201.83,-120.5"/>
 </g>
 <!-- proc~findspan -->
 <g id="proc~~insert_knots~2~~CallsGraph_node5" class="node">
 <title>proc~findspan</title>
 <g id="a_proc~~insert_knots~2~~CallsGraph_node5"><a xlink:href="../proc/findspan.html" xlink:title="findspan">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="302,-108 244,-108 244,-84 302,-84 302,-108"/>
-<text text-anchor="middle" x="273" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">findspan</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="297.5,-87 239.5,-87 239.5,-63 297.5,-63 297.5,-87"/>
+<text text-anchor="middle" x="268.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">findspan</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;proc~findspan -->
 <g id="proc~~insert_knots~2~~CallsGraph_edge4" class="edge">
 <title>proc~insert_knots~2&#45;&gt;proc~findspan</title>
-<path fill="none" stroke="#ff0000" d="M161.19,-108.22C186.3,-105.45 212.91,-102.51 233.75,-100.22"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="234.23,-103.68 243.79,-99.11 233.47,-96.73 234.23,-103.68"/>
+<path fill="none" stroke="#ff0000" d="M134.8,-104.96C165.07,-98.13 202.25,-89.73 229.54,-83.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="230.5,-86.94 239.49,-81.33 228.96,-80.11 230.5,-86.94"/>
 </g>
 <!-- proc~insert_knot_a_5_1 -->
 <g id="proc~~insert_knots~2~~CallsGraph_node6" class="node">
 <title>proc~insert_knot_a_5_1</title>
 <g id="a_proc~~insert_knots~2~~CallsGraph_node6"><a xlink:href="../proc/insert_knot_a_5_1.html" xlink:title="insert_knot_A_5_1">
-<polygon fill="#d9534f" stroke="#d9534f" points="327,-66 219,-66 219,-42 327,-42 327,-66"/>
-<text text-anchor="middle" x="273" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">insert_knot_A_5_1</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="322.5,-45 214.5,-45 214.5,-21 322.5,-21 322.5,-45"/>
+<text text-anchor="middle" x="268.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">insert_knot_A_5_1</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;proc~insert_knot_a_5_1 -->
 <g id="proc~~insert_knots~2~~CallsGraph_edge5" class="edge">
 <title>proc~insert_knots~2&#45;&gt;proc~insert_knot_a_5_1</title>
-<path fill="none" stroke="#ff0000" d="M112.65,-104.95C135.77,-96.18 168.15,-84.27 197,-75 203.4,-72.94 210.14,-70.89 216.86,-68.93"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="217.98,-72.24 226.62,-66.11 216.04,-65.52 217.98,-72.24"/>
-</g>
-<!-- proc~is_rational~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_node7" class="node">
-<title>proc~is_rational~2</title>
-<g id="a_proc~~insert_knots~2~~CallsGraph_node7"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="349,-24 197,-24 197,0 349,0 349,-24"/>
-<text text-anchor="middle" x="273" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
-</a>
-</g>
-</g>
-<!-- proc~insert_knots~2&#45;&gt;proc~is_rational~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge6" class="edge">
-<title>proc~insert_knots~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#ff0000" d="M94.69,-104.93C115.14,-86.83 156.38,-52.66 197,-33 201.08,-31.02 205.38,-29.21 209.77,-27.54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="211.2,-30.74 219.47,-24.12 208.88,-24.14 211.2,-30.74"/>
+<path fill="none" stroke="#ff0000" d="M100.9,-104.77C123.36,-91 161.78,-68.66 197,-54 201.81,-52 206.89,-50.1 212.01,-48.32"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="213.48,-51.52 221.88,-45.06 211.28,-44.88 213.48,-51.52"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
-<g id="proc~~insert_knots~2~~CallsGraph_node8" class="node">
+<g id="proc~~insert_knots~2~~CallsGraph_node7" class="node">
 <title>proc~compute_multiplicity1</title>
-<g id="a_proc~~insert_knots~2~~CallsGraph_node8"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1285,-192 1155,-192 1155,-168 1285,-168 1285,-192"/>
-<text text-anchor="middle" x="1220" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<g id="a_proc~~insert_knots~2~~CallsGraph_node7"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1276,-171 1146,-171 1146,-147 1276,-147 1276,-171"/>
+<text text-anchor="middle" x="1211" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge7" class="edge">
+<g id="proc~~insert_knots~2~~CallsGraph_edge6" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1119.33,-167C1127.69,-168.09 1136.35,-169.22 1144.92,-170.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1144.53,-173.82 1154.9,-171.64 1145.44,-166.88 1144.53,-173.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1110.33,-146C1118.69,-147.09 1127.35,-148.22 1135.92,-149.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1135.53,-152.82 1145.9,-150.64 1136.44,-145.88 1135.53,-152.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_node9" class="node">
+<g id="proc~~insert_knots~2~~CallsGraph_node8" class="node">
 <title>proc~compute_multiplicity2</title>
-<g id="a_proc~~insert_knots~2~~CallsGraph_node9"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1285,-150 1155,-150 1155,-126 1285,-126 1285,-150"/>
-<text text-anchor="middle" x="1220" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<g id="a_proc~~insert_knots~2~~CallsGraph_node8"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1276,-129 1146,-129 1146,-105 1276,-105 1276,-129"/>
+<text text-anchor="middle" x="1211" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge8" class="edge">
+<g id="proc~~insert_knots~2~~CallsGraph_edge7" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1119.33,-151C1127.69,-149.91 1136.35,-148.78 1144.92,-147.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1145.44,-151.12 1154.9,-146.36 1144.53,-144.18 1145.44,-151.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1110.33,-130C1118.69,-128.91 1127.35,-127.78 1135.92,-126.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1136.44,-130.12 1145.9,-125.36 1135.53,-123.18 1136.44,-130.12"/>
 </g>
 <!-- proc~get_knot_all~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_node10" class="node">
+<g id="proc~~insert_knots~2~~CallsGraph_node9" class="node">
 <title>proc~get_knot_all~2</title>
-<g id="a_proc~~insert_knots~2~~CallsGraph_node10"><a xlink:href="../proc/get_knot_all~2.html" xlink:title="nurbs_surface%get_knot_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="546,-255 385,-255 385,-231 546,-231 546,-255"/>
-<text text-anchor="middle" x="465.5" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot_all</text>
+<g id="a_proc~~insert_knots~2~~CallsGraph_node9"><a xlink:href="../proc/get_knot_all~2.html" xlink:title="nurbs_volume%get_knot_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="537,-234 376,-234 376,-210 537,-210 537,-234"/>
+<text text-anchor="middle" x="456.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot~2&#45;&gt;proc~get_knot_all~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge9" class="edge">
+<g id="proc~~insert_knots~2~~CallsGraph_edge8" class="edge">
 <title>none~get_knot~2&#45;&gt;proc~get_knot_all~2</title>
-<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M328.59,-213.04C350.91,-217.96 376.89,-223.69 400.13,-228.81"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="399.38,-232.23 409.9,-230.96 400.89,-225.39 399.38,-232.23"/>
+<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M322.8,-192.04C344.49,-196.93 369.74,-202.63 392.35,-207.74"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="391.67,-211.17 402.19,-209.96 393.21,-204.35 391.67,-211.17"/>
 </g>
 <!-- proc~get_knoti~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_node11" class="node">
+<g id="proc~~insert_knots~2~~CallsGraph_node10" class="node">
 <title>proc~get_knoti~2</title>
-<g id="a_proc~~insert_knots~2~~CallsGraph_node11"><a xlink:href="../proc/get_knoti~2.html" xlink:title="nurbs_surface%get_knoti">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="538.5,-213 392.5,-213 392.5,-189 538.5,-189 538.5,-213"/>
-<text text-anchor="middle" x="465.5" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knoti</text>
+<g id="a_proc~~insert_knots~2~~CallsGraph_node10"><a xlink:href="../proc/get_knoti~2.html" xlink:title="nurbs_volume%get_knoti">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="529.5,-192 383.5,-192 383.5,-168 529.5,-168 529.5,-192"/>
+<text text-anchor="middle" x="456.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knoti</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot~2&#45;&gt;proc~get_knoti~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge10" class="edge">
+<g id="proc~~insert_knots~2~~CallsGraph_edge9" class="edge">
 <title>none~get_knot~2&#45;&gt;proc~get_knoti~2</title>
-<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M344.66,-201C356.82,-201 369.56,-201 382,-201"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="382.36,-204.5 392.36,-201 382.36,-197.5 382.36,-204.5"/>
+<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M340.08,-180C350.94,-180 362.23,-180 373.32,-180"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="373.42,-183.5 383.42,-180 373.42,-176.5 373.42,-183.5"/>
 </g>
 <!-- proc~set1~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_node12" class="node">
+<g id="proc~~insert_knots~2~~CallsGraph_node11" class="node">
 <title>proc~set1~2</title>
-<g id="a_proc~~insert_knots~2~~CallsGraph_node12"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="525.5,-129 405.5,-129 405.5,-105 525.5,-105 525.5,-129"/>
-<text text-anchor="middle" x="465.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
+<g id="a_proc~~insert_knots~2~~CallsGraph_node11"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="516.5,-108 396.5,-108 396.5,-84 516.5,-84 516.5,-108"/>
+<text text-anchor="middle" x="456.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set1~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge11" class="edge">
+<g id="proc~~insert_knots~2~~CallsGraph_edge10" class="edge">
 <title>none~set~2&#45;&gt;proc~set1~2</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M329.61,-131.87C350.19,-129.6 373.76,-127 395.39,-124.62"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="395.94,-128.08 405.5,-123.5 395.17,-121.12 395.94,-128.08"/>
+<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M325.05,-110.73C344.28,-108.56 366.08,-106.1 386.27,-103.82"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="386.81,-107.28 396.35,-102.68 386.02,-100.32 386.81,-107.28"/>
 </g>
 <!-- proc~set2~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_node13" class="node">
+<g id="proc~~insert_knots~2~~CallsGraph_node12" class="node">
 <title>proc~set2~2</title>
-<g id="a_proc~~insert_knots~2~~CallsGraph_node13"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="525.5,-87 405.5,-87 405.5,-63 525.5,-63 525.5,-87"/>
-<text text-anchor="middle" x="465.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
+<g id="a_proc~~insert_knots~2~~CallsGraph_node12"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="516.5,-66 396.5,-66 396.5,-42 516.5,-42 516.5,-66"/>
+<text text-anchor="middle" x="456.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set2~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge12" class="edge">
+<g id="proc~~insert_knots~2~~CallsGraph_edge11" class="edge">
 <title>none~set~2&#45;&gt;proc~set2~2</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M323.83,-125.98C332.36,-123.37 341.03,-120.37 349,-117 366.06,-109.78 367.89,-103.1 385,-96 390.11,-93.88 395.49,-91.92 400.95,-90.12"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="402.3,-93.37 410.82,-87.06 400.23,-86.68 402.3,-93.37"/>
+<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M315.95,-104.88C324.09,-102.28 332.38,-99.3 340,-96 357,-88.64 358.89,-82.1 376,-75 381.11,-72.88 386.49,-70.92 391.95,-69.12"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="393.3,-72.37 401.82,-66.06 391.23,-65.68 393.3,-72.37"/>
 </g>
 <!-- proc~set3~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_node14" class="node">
+<g id="proc~~insert_knots~2~~CallsGraph_node13" class="node">
 <title>proc~set3~2</title>
-<g id="a_proc~~insert_knots~2~~CallsGraph_node14"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="525.5,-171 405.5,-171 405.5,-147 525.5,-147 525.5,-171"/>
-<text text-anchor="middle" x="465.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
+<g id="a_proc~~insert_knots~2~~CallsGraph_node13"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="516.5,-150 396.5,-150 396.5,-126 516.5,-126 516.5,-150"/>
+<text text-anchor="middle" x="456.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set3~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge13" class="edge">
+<g id="proc~~insert_knots~2~~CallsGraph_edge12" class="edge">
 <title>none~set~2&#45;&gt;proc~set3~2</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M329.61,-144.13C350.19,-146.4 373.76,-149 395.39,-151.38"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="395.17,-154.88 405.5,-152.5 395.94,-147.92 395.17,-154.88"/>
+<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M325.05,-123.27C344.28,-125.44 366.08,-127.9 386.27,-130.18"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="386.02,-133.68 396.35,-131.32 386.81,-126.72 386.02,-133.68"/>
 </g>
 <!-- proc~set4~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_node15" class="node">
+<g id="proc~~insert_knots~2~~CallsGraph_node14" class="node">
 <title>proc~set4~2</title>
-<g id="a_proc~~insert_knots~2~~CallsGraph_node15"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="525.5,-45 405.5,-45 405.5,-21 525.5,-21 525.5,-45"/>
-<text text-anchor="middle" x="465.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
+<g id="a_proc~~insert_knots~2~~CallsGraph_node14"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="516.5,-24 396.5,-24 396.5,0 516.5,0 516.5,-24"/>
+<text text-anchor="middle" x="456.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set4~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge14" class="edge">
+<g id="proc~~insert_knots~2~~CallsGraph_edge13" class="edge">
 <title>none~set~2&#45;&gt;proc~set4~2</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M329.64,-127.8C336.58,-125.02 343.24,-121.49 349,-117 374.43,-97.17 359.42,-73.64 385,-54 388.38,-51.41 392.04,-49.13 395.89,-47.14"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="397.45,-50.28 405.13,-42.98 394.58,-43.89 397.45,-50.28"/>
+<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M325.05,-105C330.4,-102.54 335.5,-99.57 340,-96 365.27,-75.96 350.42,-52.64 376,-33 379.38,-30.41 383.04,-28.13 386.89,-26.14"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="388.45,-29.28 396.13,-21.98 385.58,-22.89 388.45,-29.28"/>
 </g>
 <!-- proc~cmp_degree~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_node16" class="node">
+<g id="proc~~insert_knots~2~~CallsGraph_node15" class="node">
 <title>proc~cmp_degree~2</title>
-<g id="a_proc~~insert_knots~2~~CallsGraph_node16"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="745,-171 582,-171 582,-147 745,-147 745,-171"/>
-<text text-anchor="middle" x="663.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
+<g id="a_proc~~insert_knots~2~~CallsGraph_node15"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="736,-150 573,-150 573,-126 736,-126 736,-150"/>
+<text text-anchor="middle" x="654.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge15" class="edge">
+<g id="proc~~insert_knots~2~~CallsGraph_edge14" class="edge">
 <title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#00ffff" d="M522.67,-129.04C545.63,-133.96 572.37,-139.69 596.27,-144.81"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="595.81,-148.29 606.33,-146.96 597.28,-141.45 595.81,-148.29"/>
+<path fill="none" stroke="#00ffff" d="M513.67,-108.04C536.63,-112.96 563.37,-118.69 587.27,-123.81"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="586.81,-127.29 597.33,-125.96 588.28,-120.45 586.81,-127.29"/>
 </g>
 <!-- proc~cmp_nc~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_node17" class="node">
+<g id="proc~~insert_knots~2~~CallsGraph_node16" class="node">
 <title>proc~cmp_nc~2</title>
-<g id="a_proc~~insert_knots~2~~CallsGraph_node17"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="733,-129 594,-129 594,-105 733,-105 733,-129"/>
-<text text-anchor="middle" x="663.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+<g id="a_proc~~insert_knots~2~~CallsGraph_node16"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="724,-108 585,-108 585,-84 724,-84 724,-108"/>
+<text text-anchor="middle" x="654.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
 <!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge16" class="edge">
+<g id="proc~~insert_knots~2~~CallsGraph_edge15" class="edge">
 <title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
-<path fill="none" stroke="#00ffff" d="M525.57,-117C543.91,-117 564.41,-117 583.85,-117"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="583.91,-120.5 593.91,-117 583.91,-113.5 583.91,-120.5"/>
+<path fill="none" stroke="#00ffff" d="M516.57,-96C534.91,-96 555.41,-96 574.85,-96"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="574.91,-99.5 584.91,-96 574.91,-92.5 574.91,-99.5"/>
 </g>
 <!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge17" class="edge">
+<g id="proc~~insert_knots~2~~CallsGraph_edge16" class="edge">
 <title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
-<path fill="none" stroke="#003fff" d="M522.67,-87.04C545.63,-91.96 572.37,-97.69 596.27,-102.81"/>
-<polygon fill="#003fff" stroke="#003fff" points="595.81,-106.29 606.33,-104.96 597.28,-99.45 595.81,-106.29"/>
+<path fill="none" stroke="#003fff" d="M513.67,-66.04C536.63,-70.96 563.37,-76.69 587.27,-81.81"/>
+<polygon fill="#003fff" stroke="#003fff" points="586.81,-85.29 597.33,-83.96 588.28,-78.45 586.81,-85.29"/>
 </g>
 <!-- proc~compute_knot_vector -->
-<g id="proc~~insert_knots~2~~CallsGraph_node18" class="node">
+<g id="proc~~insert_knots~2~~CallsGraph_node17" class="node">
 <title>proc~compute_knot_vector</title>
-<g id="a_proc~~insert_knots~2~~CallsGraph_node18"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="727,-87 600,-87 600,-63 727,-63 727,-87"/>
-<text text-anchor="middle" x="663.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<g id="a_proc~~insert_knots~2~~CallsGraph_node17"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="718,-66 591,-66 591,-42 718,-42 718,-66"/>
+<text text-anchor="middle" x="654.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge18" class="edge">
+<g id="proc~~insert_knots~2~~CallsGraph_edge17" class="edge">
 <title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#003fff" d="M525.57,-75C545.72,-75 568.49,-75 589.59,-75"/>
-<polygon fill="#003fff" stroke="#003fff" points="589.8,-78.5 599.8,-75 589.8,-71.5 589.8,-78.5"/>
+<path fill="none" stroke="#003fff" d="M516.57,-54C536.72,-54 559.49,-54 580.59,-54"/>
+<polygon fill="#003fff" stroke="#003fff" points="580.8,-57.5 590.8,-54 580.8,-50.5 580.8,-57.5"/>
 </g>
 <!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge19" class="edge">
+<g id="proc~~insert_knots~2~~CallsGraph_edge18" class="edge">
 <title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#7f00ff" d="M525.57,-159C540.09,-159 555.97,-159 571.6,-159"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="571.82,-162.5 581.82,-159 571.82,-155.5 571.82,-162.5"/>
+<path fill="none" stroke="#7f00ff" d="M516.57,-138C531.09,-138 546.97,-138 562.6,-138"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="562.82,-141.5 572.82,-138 562.82,-134.5 562.82,-141.5"/>
 </g>
 <!-- proc~get_multiplicity~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_node19" class="node">
+<g id="proc~~insert_knots~2~~CallsGraph_node18" class="node">
 <title>proc~get_multiplicity~2</title>
-<g id="a_proc~~insert_knots~2~~CallsGraph_node19"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="959,-171 781,-171 781,-147 959,-147 959,-171"/>
-<text text-anchor="middle" x="870" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
+<g id="a_proc~~insert_knots~2~~CallsGraph_node18"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="950,-150 772,-150 772,-126 950,-126 950,-150"/>
+<text text-anchor="middle" x="861" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge20" class="edge">
+<g id="proc~~insert_knots~2~~CallsGraph_edge19" class="edge">
 <title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
-<path fill="none" stroke="#ff0000" d="M745.03,-159C753.47,-159 762.11,-159 770.71,-159"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="770.78,-162.5 780.78,-159 770.78,-155.5 770.78,-162.5"/>
+<path fill="none" stroke="#ff0000" d="M736.03,-138C744.47,-138 753.11,-138 761.71,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="761.78,-141.5 771.78,-138 761.78,-134.5 761.78,-141.5"/>
 </g>
 <!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge21" class="edge">
+<g id="proc~~insert_knots~2~~CallsGraph_edge20" class="edge">
 <title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00ff00" d="M733.23,-119.14C793.1,-121.66 882.13,-126.99 959,-138 971.38,-139.77 984.54,-142.23 997.04,-144.84"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="996.39,-148.28 1006.9,-146.95 997.86,-141.43 996.39,-148.28"/>
+<path fill="none" stroke="#00ff00" d="M724.23,-98.14C784.1,-100.66 873.13,-105.99 950,-117 962.38,-118.77 975.54,-121.23 988.04,-123.84"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="987.39,-127.28 997.9,-125.95 988.86,-120.43 987.39,-127.28"/>
 </g>
 <!-- proc~repelem -->
-<g id="proc~~insert_knots~2~~CallsGraph_node20" class="node">
+<g id="proc~~insert_knots~2~~CallsGraph_node19" class="node">
 <title>proc~repelem</title>
-<g id="a_proc~~insert_knots~2~~CallsGraph_node20"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="898.5,-87 841.5,-87 841.5,-63 898.5,-63 898.5,-87"/>
-<text text-anchor="middle" x="870" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<g id="a_proc~~insert_knots~2~~CallsGraph_node19"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="889.5,-66 832.5,-66 832.5,-42 889.5,-42 889.5,-66"/>
+<text text-anchor="middle" x="861" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge22" class="edge">
+<g id="proc~~insert_knots~2~~CallsGraph_edge21" class="edge">
 <title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#0000ff" d="M727.25,-75C761.23,-75 802.1,-75 831.2,-75"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="831.36,-78.5 841.36,-75 831.35,-71.5 831.36,-78.5"/>
+<path fill="none" stroke="#0000ff" d="M718.25,-54C752.23,-54 793.1,-54 822.2,-54"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="822.36,-57.5 832.36,-54 822.35,-50.5 822.36,-57.5"/>
 </g>
 <!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~insert_knots~2~~CallsGraph_edge23" class="edge">
+<g id="proc~~insert_knots~2~~CallsGraph_edge22" class="edge">
 <title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M959.17,-159C967.77,-159 976.42,-159 984.82,-159"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="984.93,-162.5 994.93,-159 984.93,-155.5 984.93,-162.5"/>
+<path fill="none" stroke="#ff0000" d="M950.17,-138C958.77,-138 967.42,-138 975.82,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="975.93,-141.5 985.93,-138 975.93,-134.5 975.93,-141.5"/>
 </g>
 </g>
 </svg>
@@ -658,20 +643,20 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~insert_knots~2~~CalledByGraph_node1" class="node">
 <title>proc~insert_knots~2</title>
 <polygon fill="none" stroke="black" points="307,-24 146,-24 146,0 307,0 307,-24"/>
-<text text-anchor="middle" x="226.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%insert_knots</text>
+<text text-anchor="middle" x="226.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%insert_knots</text>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~insert_knots~2~~CalledByGraph_node2" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~insert_knots~2~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<title>program~example3_volume</title>
+<g id="a_proc~~insert_knots~2~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
 <g id="proc~~insert_knots~2~~CalledByGraph_edge1" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
 <path fill="none" stroke="#ff0000" d="M110.1,-12C118.31,-12 126.98,-12 135.71,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="135.97,-15.5 145.97,-12 135.97,-8.5 135.97,-15.5"/>
 </g>
@@ -789,7 +774,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/insert_knots~3.html b/proc/insert_knots~3.html
index 2aaee3ef2..408994b14 100644
--- a/proc/insert_knots~3.html
+++ b/proc/insert_knots~3.html
@@ -78,20 +78,20 @@ <h1>insert_knots
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.6% of total for procedures.">43 statements</a>
+                 title=" 1.5% of total for procedures.">104 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">insert_knots</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine insert_knots(this, Xth, r)  
+    <h2>private pure subroutine insert_knots(this, dir, Xth, r)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~164"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~169"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -171,6 +171,21 @@ <h3>Arguments</h3>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-dir~31"></span>
+              integer,
+            </td>
+<td>intent(in)</td>
+              <td></td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>dir</strong></td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-xth~10"></span>
@@ -216,274 +231,325 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~insert_knots~3~~CallsGraph Pages: 1 -->
-<svg id="procinsert_knots3CallsGraph" width="641pt" height="133pt"
- viewBox="0.00 0.00 641.00 132.86" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~insert_knots~3~~CallsGraph" class="graph" transform="scale(1.89 1.89) rotate(0) translate(4 247)">
+<svg id="procinsert_knots3CallsGraph" width="641pt" height="144pt"
+ viewBox="0.00 0.00 641.00 144.26" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~insert_knots~3~~CallsGraph" class="graph" transform="scale(2.02 2.02) rotate(0) translate(4 287)">
 <title>proc~~insert_knots~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-247 1207,-247 1207,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-287 1289,-287 1289,4 -4,4"/>
 <!-- proc~insert_knots~3 -->
 <g id="proc~~insert_knots~3~~CallsGraph_node1" class="node">
 <title>proc~insert_knots~3</title>
-<polygon fill="none" stroke="black" points="151,-108 0,-108 0,-84 151,-84 151,-108"/>
-<text text-anchor="middle" x="75.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%insert_knots</text>
+<polygon fill="none" stroke="black" points="161,-129 0,-129 0,-105 161,-105 161,-129"/>
+<text text-anchor="middle" x="80.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%insert_knots</text>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~insert_knots~3~~CallsGraph_node2" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~insert_knots~3~~CallsGraph_node2"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1037,-222 913,-222 913,-198 1037,-198 1037,-222"/>
-<text text-anchor="middle" x="975" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1119,-171 995,-171 995,-147 1119,-147 1119,-171"/>
+<text text-anchor="middle" x="1057" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~insert_knots~3~~CallsGraph_edge1" class="edge">
 <title>proc~insert_knots~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M92.41,-108.11C139.83,-142.96 285.4,-241 422.5,-241 422.5,-241 422.5,-241 596,-241 703.07,-241 826.62,-228.49 902.52,-219.37"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="903.41,-222.79 912.91,-218.1 902.56,-215.84 903.41,-222.79"/>
+<path fill="none" stroke="#ff0000" d="M91.18,-129.24C109.4,-151.39 151.11,-198.05 197,-222 305.1,-278.42 342.56,-283 464.5,-283 464.5,-283 464.5,-283 664.5,-283 804.83,-283 960.79,-209.7 1025.4,-175.82"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1027.07,-178.89 1034.26,-171.12 1023.79,-172.71 1027.07,-178.89"/>
 </g>
-<!-- none~set~3 -->
+<!-- none~get_knot~3 -->
 <g id="proc~~insert_knots~3~~CallsGraph_node3" class="node">
+<title>none~get_knot~3</title>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node3"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~3" xlink:title="nurbs_surface%get_knot">
+<polygon fill="#a7506f" stroke="#a7506f" points="344.5,-213 201.5,-213 201.5,-189 344.5,-189 344.5,-213"/>
+<text text-anchor="middle" x="273" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
+</a>
+</g>
+</g>
+<!-- proc~insert_knots~3&#45;&gt;none~get_knot~3 -->
+<g id="proc~~insert_knots~3~~CallsGraph_edge2" class="edge">
+<title>proc~insert_knots~3&#45;&gt;none~get_knot~3</title>
+<path fill="none" stroke="#ff0000" d="M108.79,-129.04C142.04,-143.69 198.32,-168.51 235.33,-184.83"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="234.19,-188.15 244.76,-188.99 237.02,-181.75 234.19,-188.15"/>
+</g>
+<!-- none~set~3 -->
+<g id="proc~~insert_knots~3~~CallsGraph_node4" class="node">
 <title>none~set~3</title>
-<g id="a_proc~~insert_knots~3~~CallsGraph_node3"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="309.5,-150 206.5,-150 206.5,-126 309.5,-126 309.5,-150"/>
-<text text-anchor="middle" x="258" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="329.5,-150 216.5,-150 216.5,-126 329.5,-126 329.5,-150"/>
+<text text-anchor="middle" x="273" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;none~set~3 -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge2" class="edge">
+<g id="proc~~insert_knots~3~~CallsGraph_edge3" class="edge">
 <title>proc~insert_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M128.22,-108.04C149.45,-112.98 174.18,-118.73 196.27,-123.87"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="195.67,-127.32 206.2,-126.18 197.26,-120.51 195.67,-127.32"/>
+<path fill="none" stroke="#ff0000" d="M161.19,-125.78C176.12,-127.43 191.57,-129.13 206.03,-130.73"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="206.04,-134.25 216.36,-131.87 206.81,-127.29 206.04,-134.25"/>
 </g>
 <!-- proc~findspan -->
-<g id="proc~~insert_knots~3~~CallsGraph_node4" class="node">
+<g id="proc~~insert_knots~3~~CallsGraph_node5" class="node">
 <title>proc~findspan</title>
-<g id="a_proc~~insert_knots~3~~CallsGraph_node4"><a xlink:href="../proc/findspan.html" xlink:title="findspan">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="287,-108 229,-108 229,-84 287,-84 287,-108"/>
-<text text-anchor="middle" x="258" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">findspan</text>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node5"><a xlink:href="../proc/findspan.html" xlink:title="findspan">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="302,-108 244,-108 244,-84 302,-84 302,-108"/>
+<text text-anchor="middle" x="273" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">findspan</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;proc~findspan -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge3" class="edge">
+<g id="proc~~insert_knots~3~~CallsGraph_edge4" class="edge">
 <title>proc~insert_knots~3&#45;&gt;proc~findspan</title>
-<path fill="none" stroke="#ff0000" d="M151.22,-96C174.4,-96 199,-96 218.63,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="218.7,-99.5 228.7,-96 218.7,-92.5 218.7,-99.5"/>
+<path fill="none" stroke="#ff0000" d="M161.19,-108.22C186.3,-105.45 212.91,-102.51 233.75,-100.22"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="234.23,-103.68 243.79,-99.11 233.47,-96.73 234.23,-103.68"/>
 </g>
 <!-- proc~insert_knot_a_5_1 -->
-<g id="proc~~insert_knots~3~~CallsGraph_node5" class="node">
+<g id="proc~~insert_knots~3~~CallsGraph_node6" class="node">
 <title>proc~insert_knot_a_5_1</title>
-<g id="a_proc~~insert_knots~3~~CallsGraph_node5"><a xlink:href="../proc/insert_knot_a_5_1.html" xlink:title="insert_knot_A_5_1">
-<polygon fill="#d9534f" stroke="#d9534f" points="312,-66 204,-66 204,-42 312,-42 312,-66"/>
-<text text-anchor="middle" x="258" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">insert_knot_A_5_1</text>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node6"><a xlink:href="../proc/insert_knot_a_5_1.html" xlink:title="insert_knot_A_5_1">
+<polygon fill="#d9534f" stroke="#d9534f" points="327,-66 219,-66 219,-42 327,-42 327,-66"/>
+<text text-anchor="middle" x="273" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">insert_knot_A_5_1</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;proc~insert_knot_a_5_1 -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge4" class="edge">
+<g id="proc~~insert_knots~3~~CallsGraph_edge5" class="edge">
 <title>proc~insert_knots~3&#45;&gt;proc~insert_knot_a_5_1</title>
-<path fill="none" stroke="#ff0000" d="M128.22,-83.96C149.18,-79.09 173.55,-73.42 195.42,-68.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="196.32,-71.71 205.27,-66.04 194.74,-64.89 196.32,-71.71"/>
+<path fill="none" stroke="#ff0000" d="M112.65,-104.95C135.77,-96.18 168.15,-84.27 197,-75 203.4,-72.94 210.14,-70.89 216.86,-68.93"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="217.98,-72.24 226.62,-66.11 216.04,-65.52 217.98,-72.24"/>
 </g>
 <!-- proc~is_rational~3 -->
-<g id="proc~~insert_knots~3~~CallsGraph_node6" class="node">
+<g id="proc~~insert_knots~3~~CallsGraph_node7" class="node">
 <title>proc~is_rational~3</title>
-<g id="a_proc~~insert_knots~3~~CallsGraph_node6"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="329,-24 187,-24 187,0 329,0 329,-24"/>
-<text text-anchor="middle" x="258" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node7"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="349,-24 197,-24 197,0 349,0 349,-24"/>
+<text text-anchor="middle" x="273" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;proc~is_rational~3 -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge5" class="edge">
+<g id="proc~~insert_knots~3~~CallsGraph_edge6" class="edge">
 <title>proc~insert_knots~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M94.61,-83.96C115.97,-70.18 152.9,-47.61 187,-33 191.69,-30.99 196.63,-29.09 201.64,-27.32"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="202.92,-30.59 211.28,-24.08 200.68,-23.95 202.92,-30.59"/>
+<path fill="none" stroke="#ff0000" d="M94.69,-104.93C115.14,-86.83 156.38,-52.66 197,-33 201.08,-31.02 205.38,-29.21 209.77,-27.54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="211.2,-30.74 219.47,-24.12 208.88,-24.14 211.2,-30.74"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
-<g id="proc~~insert_knots~3~~CallsGraph_node7" class="node">
+<g id="proc~~insert_knots~3~~CallsGraph_node8" class="node">
 <title>proc~compute_multiplicity1</title>
-<g id="a_proc~~insert_knots~3~~CallsGraph_node7"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1203,-243 1073,-243 1073,-219 1203,-219 1203,-243"/>
-<text text-anchor="middle" x="1138" y="-228.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node8"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1285,-192 1155,-192 1155,-168 1285,-168 1285,-192"/>
+<text text-anchor="middle" x="1220" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge6" class="edge">
+<g id="proc~~insert_knots~3~~CallsGraph_edge7" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1037.33,-218C1045.69,-219.09 1054.35,-220.22 1062.92,-221.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1062.53,-224.82 1072.9,-222.64 1063.44,-217.88 1062.53,-224.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1119.33,-167C1127.69,-168.09 1136.35,-169.22 1144.92,-170.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1144.53,-173.82 1154.9,-171.64 1145.44,-166.88 1144.53,-173.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
-<g id="proc~~insert_knots~3~~CallsGraph_node8" class="node">
+<g id="proc~~insert_knots~3~~CallsGraph_node9" class="node">
 <title>proc~compute_multiplicity2</title>
-<g id="a_proc~~insert_knots~3~~CallsGraph_node8"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1203,-201 1073,-201 1073,-177 1203,-177 1203,-201"/>
-<text text-anchor="middle" x="1138" y="-186.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node9"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1285,-150 1155,-150 1155,-126 1285,-126 1285,-150"/>
+<text text-anchor="middle" x="1220" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge7" class="edge">
+<g id="proc~~insert_knots~3~~CallsGraph_edge8" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1037.33,-202C1045.69,-200.91 1054.35,-199.78 1062.92,-198.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1063.44,-202.12 1072.9,-197.36 1062.53,-195.18 1063.44,-202.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1119.33,-151C1127.69,-149.91 1136.35,-148.78 1144.92,-147.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1145.44,-151.12 1154.9,-146.36 1144.53,-144.18 1145.44,-151.12"/>
 </g>
-<!-- proc~set1a -->
-<g id="proc~~insert_knots~3~~CallsGraph_node9" class="node">
-<title>proc~set1a</title>
-<g id="a_proc~~insert_knots~3~~CallsGraph_node9"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="482,-213 365,-213 365,-189 482,-189 482,-213"/>
-<text text-anchor="middle" x="423.5" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+<!-- proc~get_knot_all~3 -->
+<g id="proc~~insert_knots~3~~CallsGraph_node10" class="node">
+<title>proc~get_knot_all~3</title>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node10"><a xlink:href="../proc/get_knot_all~3.html" xlink:title="nurbs_surface%get_knot_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="546,-255 385,-255 385,-231 546,-231 546,-255"/>
+<text text-anchor="middle" x="465.5" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot_all</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge8" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
-<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M289.07,-150.17C310.24,-158.67 339.29,-170.21 365,-180 369.72,-181.8 374.67,-183.65 379.6,-185.48"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="378.4,-188.77 389,-188.94 380.82,-182.2 378.4,-188.77"/>
+<!-- none~get_knot~3&#45;&gt;proc~get_knot_all~3 -->
+<g id="proc~~insert_knots~3~~CallsGraph_edge9" class="edge">
+<title>none~get_knot~3&#45;&gt;proc~get_knot_all~3</title>
+<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M328.59,-213.04C350.91,-217.96 376.89,-223.69 400.13,-228.81"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="399.38,-232.23 409.9,-230.96 400.89,-225.39 399.38,-232.23"/>
+</g>
+<!-- proc~get_knoti~3 -->
+<g id="proc~~insert_knots~3~~CallsGraph_node11" class="node">
+<title>proc~get_knoti~3</title>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node11"><a xlink:href="../proc/get_knoti~3.html" xlink:title="nurbs_surface%get_knoti">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="538.5,-213 392.5,-213 392.5,-189 538.5,-189 538.5,-213"/>
+<text text-anchor="middle" x="465.5" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knoti</text>
+</a>
+</g>
+</g>
+<!-- none~get_knot~3&#45;&gt;proc~get_knoti~3 -->
+<g id="proc~~insert_knots~3~~CallsGraph_edge10" class="edge">
+<title>none~get_knot~3&#45;&gt;proc~get_knoti~3</title>
+<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M344.66,-201C356.82,-201 369.56,-201 382,-201"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="382.36,-204.5 392.36,-201 382.36,-197.5 382.36,-204.5"/>
 </g>
 <!-- proc~set1~3 -->
-<g id="proc~~insert_knots~3~~CallsGraph_node10" class="node">
+<g id="proc~~insert_knots~3~~CallsGraph_node12" class="node">
 <title>proc~set1~3</title>
-<g id="a_proc~~insert_knots~3~~CallsGraph_node10"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="478.5,-171 368.5,-171 368.5,-147 478.5,-147 478.5,-171"/>
-<text text-anchor="middle" x="423.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node12"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="525.5,-129 405.5,-129 405.5,-105 525.5,-105 525.5,-129"/>
+<text text-anchor="middle" x="465.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set1~3 -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge9" class="edge">
+<g id="proc~~insert_knots~3~~CallsGraph_edge11" class="edge">
 <title>none~set~3&#45;&gt;proc~set1~3</title>
-<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M309.84,-144.53C325.06,-146.49 341.97,-148.66 357.95,-150.71"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="357.93,-154.24 368.29,-152.04 358.82,-147.29 357.93,-154.24"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M329.61,-131.87C350.19,-129.6 373.76,-127 395.39,-124.62"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="395.94,-128.08 405.5,-123.5 395.17,-121.12 395.94,-128.08"/>
 </g>
 <!-- proc~set2~3 -->
-<g id="proc~~insert_knots~3~~CallsGraph_node11" class="node">
+<g id="proc~~insert_knots~3~~CallsGraph_node13" class="node">
 <title>proc~set2~3</title>
-<g id="a_proc~~insert_knots~3~~CallsGraph_node11"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="478.5,-87 368.5,-87 368.5,-63 478.5,-63 478.5,-87"/>
-<text text-anchor="middle" x="423.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node13"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="525.5,-87 405.5,-87 405.5,-63 525.5,-63 525.5,-87"/>
+<text text-anchor="middle" x="465.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set2~3 -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge10" class="edge">
+<g id="proc~~insert_knots~3~~CallsGraph_edge12" class="edge">
 <title>none~set~3&#45;&gt;proc~set2~3</title>
-<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M304.75,-125.98C312.95,-123.35 321.32,-120.34 329,-117 345.99,-109.62 348.23,-103.88 365,-96 368.84,-94.2 372.88,-92.44 376.97,-90.77"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="378.49,-93.94 386.52,-87.02 375.93,-87.42 378.49,-93.94"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M323.83,-125.98C332.36,-123.37 341.03,-120.37 349,-117 366.06,-109.78 367.89,-103.1 385,-96 390.11,-93.88 395.49,-91.92 400.95,-90.12"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="402.3,-93.37 410.82,-87.06 400.23,-86.68 402.3,-93.37"/>
 </g>
 <!-- proc~set3~3 -->
-<g id="proc~~insert_knots~3~~CallsGraph_node12" class="node">
+<g id="proc~~insert_knots~3~~CallsGraph_node14" class="node">
 <title>proc~set3~3</title>
-<g id="a_proc~~insert_knots~3~~CallsGraph_node12"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="478.5,-129 368.5,-129 368.5,-105 478.5,-105 478.5,-129"/>
-<text text-anchor="middle" x="423.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node14"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="525.5,-171 405.5,-171 405.5,-147 525.5,-147 525.5,-171"/>
+<text text-anchor="middle" x="465.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set3~3 -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge11" class="edge">
+<g id="proc~~insert_knots~3~~CallsGraph_edge13" class="edge">
 <title>none~set~3&#45;&gt;proc~set3~3</title>
-<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M309.84,-131.47C325.06,-129.51 341.97,-127.34 357.95,-125.29"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="358.82,-128.71 368.29,-123.96 357.93,-121.76 358.82,-128.71"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M329.61,-144.13C350.19,-146.4 373.76,-149 395.39,-151.38"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="395.17,-154.88 405.5,-152.5 395.94,-147.92 395.17,-154.88"/>
 </g>
 <!-- proc~set4~3 -->
-<g id="proc~~insert_knots~3~~CallsGraph_node13" class="node">
+<g id="proc~~insert_knots~3~~CallsGraph_node15" class="node">
 <title>proc~set4~3</title>
-<g id="a_proc~~insert_knots~3~~CallsGraph_node13"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="478.5,-45 368.5,-45 368.5,-21 478.5,-21 478.5,-45"/>
-<text text-anchor="middle" x="423.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node15"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="525.5,-45 405.5,-45 405.5,-21 525.5,-21 525.5,-45"/>
+<text text-anchor="middle" x="465.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set4~3 -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge12" class="edge">
+<g id="proc~~insert_knots~3~~CallsGraph_edge14" class="edge">
 <title>none~set~3&#45;&gt;proc~set4~3</title>
-<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M309.51,-127.96C316.5,-125.16 323.24,-121.58 329,-117 354.25,-96.93 340.35,-74.8 365,-54 366.55,-52.69 368.2,-51.46 369.9,-50.3"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="371.99,-53.14 378.91,-45.11 368.49,-47.07 371.99,-53.14"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M329.64,-127.8C336.58,-125.02 343.24,-121.49 349,-117 374.43,-97.17 359.42,-73.64 385,-54 388.38,-51.41 392.04,-49.13 395.89,-47.14"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="397.45,-50.28 405.13,-42.98 394.58,-43.89 397.45,-50.28"/>
 </g>
 <!-- proc~cmp_degree~3 -->
-<g id="proc~~insert_knots~3~~CallsGraph_node14" class="node">
+<g id="proc~~insert_knots~3~~CallsGraph_node16" class="node">
 <title>proc~cmp_degree~3</title>
-<g id="a_proc~~insert_knots~3~~CallsGraph_node14"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="672,-181 518,-181 518,-157 672,-157 672,-181"/>
-<text text-anchor="middle" x="595" y="-166.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node16"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="745,-171 582,-171 582,-147 745,-147 745,-171"/>
+<text text-anchor="middle" x="663.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge13" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#48ff00" d="M482.36,-190.08C494.54,-187.78 507.55,-185.32 520.23,-182.93"/>
-<polygon fill="#48ff00" stroke="#48ff00" points="521.13,-186.32 530.3,-181.03 519.83,-179.44 521.13,-186.32"/>
-</g>
 <!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge14" class="edge">
+<g id="proc~~insert_knots~3~~CallsGraph_edge15" class="edge">
 <title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#00ff91" d="M478.6,-162.19C487.87,-162.74 497.72,-163.32 507.59,-163.9"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="507.68,-167.41 517.86,-164.51 508.09,-160.43 507.68,-167.41"/>
+<path fill="none" stroke="#00ffff" d="M522.67,-129.04C545.63,-133.96 572.37,-139.69 596.27,-144.81"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="595.81,-148.29 606.33,-146.96 597.28,-141.45 595.81,-148.29"/>
+</g>
+<!-- proc~cmp_nc~3 -->
+<g id="proc~~insert_knots~3~~CallsGraph_node17" class="node">
+<title>proc~cmp_nc~3</title>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node17"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="733,-129 594,-129 594,-105 733,-105 733,-129"/>
+<text text-anchor="middle" x="663.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+</a>
+</g>
+</g>
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
+<g id="proc~~insert_knots~3~~CallsGraph_edge16" class="edge">
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#00ffff" d="M525.57,-117C543.91,-117 564.41,-117 583.85,-117"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="583.91,-120.5 593.91,-117 583.91,-113.5 583.91,-120.5"/>
+</g>
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
+<g id="proc~~insert_knots~3~~CallsGraph_edge17" class="edge">
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#003fff" d="M522.67,-87.04C545.63,-91.96 572.37,-97.69 596.27,-102.81"/>
+<polygon fill="#003fff" stroke="#003fff" points="595.81,-106.29 606.33,-104.96 597.28,-99.45 595.81,-106.29"/>
 </g>
 <!-- proc~compute_knot_vector -->
-<g id="proc~~insert_knots~3~~CallsGraph_node15" class="node">
+<g id="proc~~insert_knots~3~~CallsGraph_node18" class="node">
 <title>proc~compute_knot_vector</title>
-<g id="a_proc~~insert_knots~3~~CallsGraph_node15"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="658.5,-87 531.5,-87 531.5,-63 658.5,-63 658.5,-87"/>
-<text text-anchor="middle" x="595" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node18"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="727,-87 600,-87 600,-63 727,-63 727,-87"/>
+<text text-anchor="middle" x="663.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge15" class="edge">
+<g id="proc~~insert_knots~3~~CallsGraph_edge18" class="edge">
 <title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#0091ff" d="M478.6,-75C492.08,-75 506.77,-75 521,-75"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="521.26,-78.5 531.26,-75 521.26,-71.5 521.26,-78.5"/>
+<path fill="none" stroke="#003fff" d="M525.57,-75C545.72,-75 568.49,-75 589.59,-75"/>
+<polygon fill="#003fff" stroke="#003fff" points="589.8,-78.5 599.8,-75 589.8,-71.5 589.8,-78.5"/>
 </g>
 <!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge16" class="edge">
+<g id="proc~~insert_knots~3~~CallsGraph_edge19" class="edge">
 <title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#4800ff" d="M463.81,-129.06C488.01,-136.48 519.22,-146.06 545.01,-153.97"/>
-<polygon fill="#4800ff" stroke="#4800ff" points="544.02,-157.33 554.61,-156.91 546.07,-150.64 544.02,-157.33"/>
+<path fill="none" stroke="#7f00ff" d="M525.57,-159C540.09,-159 555.97,-159 571.6,-159"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="571.82,-162.5 581.82,-159 571.82,-155.5 571.82,-162.5"/>
 </g>
 <!-- proc~get_multiplicity~3 -->
-<g id="proc~~insert_knots~3~~CallsGraph_node16" class="node">
+<g id="proc~~insert_knots~3~~CallsGraph_node19" class="node">
 <title>proc~get_multiplicity~3</title>
-<g id="a_proc~~insert_knots~3~~CallsGraph_node16"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="877,-192 708,-192 708,-168 877,-168 877,-192"/>
-<text text-anchor="middle" x="792.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node19"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="959,-171 781,-171 781,-147 959,-147 959,-171"/>
+<text text-anchor="middle" x="870" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge17" class="edge">
+<g id="proc~~insert_knots~3~~CallsGraph_edge20" class="edge">
 <title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#ff0000" d="M672.15,-173.28C680.54,-173.76 689.17,-174.24 697.75,-174.73"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="697.61,-178.22 707.79,-175.29 698,-171.23 697.61,-178.22"/>
+<path fill="none" stroke="#ff0000" d="M745.03,-159C753.47,-159 762.11,-159 770.71,-159"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="770.78,-162.5 780.78,-159 770.78,-155.5 770.78,-162.5"/>
+</g>
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
+<g id="proc~~insert_knots~3~~CallsGraph_edge21" class="edge">
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
+<path fill="none" stroke="#00ff00" d="M733.23,-119.14C793.1,-121.66 882.13,-126.99 959,-138 971.38,-139.77 984.54,-142.23 997.04,-144.84"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="996.39,-148.28 1006.9,-146.95 997.86,-141.43 996.39,-148.28"/>
 </g>
 <!-- proc~repelem -->
-<g id="proc~~insert_knots~3~~CallsGraph_node17" class="node">
+<g id="proc~~insert_knots~3~~CallsGraph_node20" class="node">
 <title>proc~repelem</title>
-<g id="a_proc~~insert_knots~3~~CallsGraph_node17"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="821,-87 764,-87 764,-63 821,-63 821,-87"/>
-<text text-anchor="middle" x="792.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<g id="a_proc~~insert_knots~3~~CallsGraph_node20"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="898.5,-87 841.5,-87 841.5,-63 898.5,-63 898.5,-87"/>
+<text text-anchor="middle" x="870" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge18" class="edge">
+<g id="proc~~insert_knots~3~~CallsGraph_edge22" class="edge">
 <title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#00ffff" d="M658.66,-75C689.92,-75 726.69,-75 753.61,-75"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="753.78,-78.5 763.78,-75 753.78,-71.5 753.78,-78.5"/>
+<path fill="none" stroke="#0000ff" d="M727.25,-75C761.23,-75 802.1,-75 831.2,-75"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="831.36,-78.5 841.36,-75 831.35,-71.5 831.36,-78.5"/>
 </g>
 <!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~insert_knots~3~~CallsGraph_edge19" class="edge">
+<g id="proc~~insert_knots~3~~CallsGraph_edge23" class="edge">
 <title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M865.88,-192.03C878.06,-194.05 890.7,-196.15 902.85,-198.17"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="902.48,-201.66 912.92,-199.85 903.63,-194.76 902.48,-201.66"/>
+<path fill="none" stroke="#ff0000" d="M959.17,-159C967.77,-159 976.42,-159 984.82,-159"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="984.93,-162.5 994.93,-159 984.93,-155.5 984.93,-162.5"/>
 </g>
 </g>
 </svg>
@@ -583,31 +649,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~insert_knots~3~~CalledByGraph Pages: 1 -->
-<svg id="procinsert_knots3CalledByGraph" width="295pt" height="32pt"
- viewBox="0.00 0.00 295.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procinsert_knots3CalledByGraph" width="315pt" height="32pt"
+ viewBox="0.00 0.00 315.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~insert_knots~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~insert_knots~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 291,-28 291,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 311,-28 311,4 -4,4"/>
 <!-- proc~insert_knots~3 -->
 <g id="proc~~insert_knots~3~~CalledByGraph_node1" class="node">
 <title>proc~insert_knots~3</title>
-<polygon fill="none" stroke="black" points="287,-24 136,-24 136,0 287,0 287,-24"/>
-<text text-anchor="middle" x="211.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%insert_knots</text>
+<polygon fill="none" stroke="black" points="307,-24 146,-24 146,0 307,0 307,-24"/>
+<text text-anchor="middle" x="226.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%insert_knots</text>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~insert_knots~3~~CalledByGraph_node2" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~insert_knots~3~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="100,-24 0,-24 0,0 100,0 100,-24"/>
-<text text-anchor="middle" x="50" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~insert_knots~3~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
 <g id="proc~~insert_knots~3~~CalledByGraph_edge1" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
-<path fill="none" stroke="#ff0000" d="M100.16,-12C108.31,-12 116.98,-12 125.72,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="125.99,-15.5 135.99,-12 125.99,-8.5 125.99,-15.5"/>
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#ff0000" d="M110.1,-12C118.31,-12 126.98,-12 135.71,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="135.97,-15.5 145.97,-12 135.97,-8.5 135.97,-15.5"/>
 </g>
 </g>
 </svg>
@@ -723,7 +789,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/inv.html b/proc/inv.html
index 5145f16bd..cd6cf94d0 100644
--- a/proc/inv.html
+++ b/proc/inv.html
@@ -334,63 +334,63 @@ <h3 class="card-title">Called by</h3>
 <path fill="none" stroke="#ff0000" d="M557.2,-87.01C548.54,-95.97 556.8,-105 582,-105 597.35,-105 606.42,-101.65 609.2,-97"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="612.54,-95.92 606.8,-87.01 605.74,-97.55 612.54,-95.92"/>
 </g>
-<!-- proc~ansatz -->
+<!-- proc~ansatz~2 -->
 <g id="proc~~inv~~CalledByGraph_node2" class="node">
-<title>proc~ansatz</title>
-<g id="a_proc~~inv~~CalledByGraph_node2"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
+<title>proc~ansatz~2</title>
+<g id="a_proc~~inv~~CalledByGraph_node2"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="497,-150 365,-150 365,-126 497,-126 497,-150"/>
 <text text-anchor="middle" x="431" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;proc~inv -->
+<!-- proc~ansatz~2&#45;&gt;proc~inv -->
 <g id="proc~~inv~~CalledByGraph_edge1" class="edge">
-<title>proc~ansatz&#45;&gt;proc~inv</title>
+<title>proc~ansatz~2&#45;&gt;proc~inv</title>
 <path fill="none" stroke="#ff0000" d="M494.22,-125.88C502.71,-123.39 511.18,-120.45 519,-117 532.84,-110.89 546.9,-101.65 558.13,-93.4"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="560.26,-96.18 566.11,-87.35 556.03,-90.6 560.26,-96.18"/>
 </g>
-<!-- proc~ansatz~2 -->
+<!-- proc~ansatz~3 -->
 <g id="proc~~inv~~CalledByGraph_node3" class="node">
-<title>proc~ansatz~2</title>
-<g id="a_proc~~inv~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
+<title>proc~ansatz~3</title>
+<g id="a_proc~~inv~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="497,-108 365,-108 365,-84 497,-84 497,-108"/>
 <text text-anchor="middle" x="431" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;proc~inv -->
+<!-- proc~ansatz~3&#45;&gt;proc~inv -->
 <g id="proc~~inv~~CalledByGraph_edge2" class="edge">
-<title>proc~ansatz~2&#45;&gt;proc~inv</title>
+<title>proc~ansatz~3&#45;&gt;proc~inv</title>
 <path fill="none" stroke="#ff0000" d="M497.35,-86.79C513.71,-84.48 530.67,-82.09 545,-80.07"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="545.52,-83.54 554.93,-78.67 544.54,-76.6 545.52,-83.54"/>
 </g>
-<!-- proc~nearest_point2 -->
+<!-- proc~nearest_point2~2 -->
 <g id="proc~~inv~~CalledByGraph_node4" class="node">
-<title>proc~nearest_point2</title>
-<g id="a_proc~~inv~~CalledByGraph_node4"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_volume%nearest_point2">
+<title>proc~nearest_point2~2</title>
+<g id="a_proc~~inv~~CalledByGraph_node4"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_volume%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="519,-66 343,-66 343,-42 519,-42 519,-66"/>
 <text text-anchor="middle" x="431" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2&#45;&gt;proc~inv -->
+<!-- proc~nearest_point2~2&#45;&gt;proc~inv -->
 <g id="proc~~inv~~CalledByGraph_edge4" class="edge">
-<title>proc~nearest_point2&#45;&gt;proc~inv</title>
+<title>proc~nearest_point2~2&#45;&gt;proc~inv</title>
 <path fill="none" stroke="#ff0000" d="M517.38,-66.03C526.98,-67.39 536.33,-68.7 544.79,-69.9"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="544.57,-73.4 554.96,-71.33 545.55,-66.47 544.57,-73.4"/>
 </g>
-<!-- proc~nearest_point2~2 -->
+<!-- proc~nearest_point2~3 -->
 <g id="proc~~inv~~CalledByGraph_node5" class="node">
-<title>proc~nearest_point2~2</title>
-<g id="a_proc~~inv~~CalledByGraph_node5"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_surface%nearest_point2">
+<title>proc~nearest_point2~3</title>
+<g id="a_proc~~inv~~CalledByGraph_node5"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_surface%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="519,-24 343,-24 343,0 519,0 519,-24"/>
 <text text-anchor="middle" x="431" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2~2&#45;&gt;proc~inv -->
+<!-- proc~nearest_point2~3&#45;&gt;proc~inv -->
 <g id="proc~~inv~~CalledByGraph_edge5" class="edge">
-<title>proc~nearest_point2~2&#45;&gt;proc~inv</title>
+<title>proc~nearest_point2~3&#45;&gt;proc~inv</title>
 <path fill="none" stroke="#ff0000" d="M494.22,-24.12C502.71,-26.61 511.18,-29.55 519,-33 532.84,-39.11 546.9,-48.35 558.13,-56.6"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="556.03,-59.4 566.11,-62.65 560.26,-53.82 556.03,-59.4"/>
 </g>
@@ -403,9 +403,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
 <g id="proc~~inv~~CalledByGraph_edge7" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
 <path fill="none" stroke="#7fff00" d="M299.01,-96C317.12,-96 336.51,-96 354.68,-96"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="354.93,-99.5 364.93,-96 354.93,-92.5 354.93,-99.5"/>
 </g>
@@ -418,9 +418,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
 <g id="proc~~inv~~CalledByGraph_edge6" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
 <path fill="none" stroke="#ff0000" d="M307.2,-138C322.92,-138 339.3,-138 354.78,-138"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="354.81,-141.5 364.81,-138 354.81,-134.5 354.81,-141.5"/>
 </g>
@@ -433,9 +433,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
 <g id="proc~~inv~~CalledByGraph_edge9" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
 <path fill="none" stroke="#7f00ff" d="M275.67,-12C292.94,-12 312.87,-12 332.55,-12"/>
 <polygon fill="#7f00ff" stroke="#7f00ff" points="332.8,-15.5 342.8,-12 332.8,-8.5 332.8,-15.5"/>
 </g>
@@ -448,9 +448,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
 <g id="proc~~inv~~CalledByGraph_edge8" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
 <path fill="none" stroke="#00ffff" d="M275.67,-54C292.94,-54 312.87,-54 332.55,-54"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="332.8,-57.5 342.8,-54 332.8,-50.5 332.8,-57.5"/>
 </g>
@@ -598,7 +598,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/is_rational.html b/proc/is_rational.html
index f47900c00..246014ed7 100644
--- a/proc/is_rational.html
+++ b/proc/is_rational.html
@@ -83,15 +83,15 @@ <h1>is_rational
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">is_rational</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function is_rational(this) result(r)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~42"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~41"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -193,361 +193,409 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~is_rational~~CalledByGraph Pages: 1 -->
-<svg id="procis_rationalCalledByGraph" width="641pt" height="234pt"
- viewBox="0.00 0.00 641.00 233.91" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~is_rational~~CalledByGraph" class="graph" transform="scale(1.78 1.78) rotate(0) translate(4 412)">
+<svg id="procis_rationalCalledByGraph" width="641pt" height="268pt"
+ viewBox="0.00 0.00 641.00 268.27" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~is_rational~~CalledByGraph" class="graph" transform="scale(1.68 1.68) rotate(0) translate(4 448)">
 <title>proc~~is_rational~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412 1136,-412 1136,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-448 1076,-448 1076,4 -4,4"/>
 <!-- proc~is_rational -->
 <g id="proc~~is_rational~~CalledByGraph_node1" class="node">
 <title>proc~is_rational</title>
-<polygon fill="none" stroke="black" points="1132,-170 980,-170 980,-146 1132,-146 1132,-170"/>
-<text text-anchor="middle" x="1056" y="-155.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%is_rational</text>
+<polygon fill="none" stroke="black" points="1072,-234 930,-234 930,-210 1072,-210 1072,-234"/>
+<text text-anchor="middle" x="1001" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%is_rational</text>
 </g>
 <!-- proc~basis_scalar -->
 <g id="proc~~is_rational~~CalledByGraph_node2" class="node">
 <title>proc~basis_scalar</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node2"><a xlink:href="../proc/basis_scalar.html" xlink:title="nurbs_volume%basis_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="927,-310 765,-310 765,-286 927,-286 927,-310"/>
-<text text-anchor="middle" x="846" y="-295.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%basis_scalar</text>
+<g id="a_proc~~is_rational~~CalledByGraph_node2"><a xlink:href="../proc/basis_scalar.html" xlink:title="nurbs_curve%basis_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="876.5,-444 724.5,-444 724.5,-420 876.5,-420 876.5,-444"/>
+<text text-anchor="middle" x="800.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%basis_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_scalar&#45;&gt;proc~is_rational -->
 <g id="proc~~is_rational~~CalledByGraph_edge1" class="edge">
 <title>proc~basis_scalar&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ff0000" d="M924.08,-285.92C931.03,-283.47 937.78,-280.53 944,-277 987.26,-252.42 1023.52,-205.35 1041.95,-178.36"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1044.86,-180.3 1047.5,-170.04 1039.04,-176.42 1044.86,-180.3"/>
+<path fill="none" stroke="#ff0000" d="M876.66,-420.8C882.84,-418.16 888.72,-414.94 894,-411 951.71,-367.9 982.39,-283.56 994.19,-243.77"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="997.59,-244.59 996.96,-234.02 990.86,-242.68 997.59,-244.59"/>
 </g>
 <!-- proc~basis_vector -->
 <g id="proc~~is_rational~~CalledByGraph_node3" class="node">
 <title>proc~basis_vector</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node3"><a xlink:href="../proc/basis_vector.html" xlink:title="nurbs_volume%basis_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="927.5,-268 764.5,-268 764.5,-244 927.5,-244 927.5,-268"/>
-<text text-anchor="middle" x="846" y="-253.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%basis_vector</text>
+<g id="a_proc~~is_rational~~CalledByGraph_node3"><a xlink:href="../proc/basis_vector.html" xlink:title="nurbs_curve%basis_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="877.5,-402 723.5,-402 723.5,-378 877.5,-378 877.5,-402"/>
+<text text-anchor="middle" x="800.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%basis_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_vector&#45;&gt;proc~is_rational -->
 <g id="proc~~is_rational~~CalledByGraph_edge2" class="edge">
 <title>proc~basis_vector&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ff0000" d="M903.94,-243.93C917.36,-240.22 931.42,-235.6 944,-230 976.28,-215.64 1009.84,-192.54 1031.49,-176.39"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1033.87,-178.98 1039.72,-170.16 1029.64,-173.4 1033.87,-178.98"/>
+<path fill="none" stroke="#ff0000" d="M876.67,-377.95C882.77,-375.5 888.64,-372.54 894,-369 941.82,-337.35 975.28,-276.25 990.59,-243.68"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="993.95,-244.73 994.92,-234.18 987.58,-241.83 993.95,-244.73"/>
 </g>
 <!-- proc~cmp_xg -->
 <g id="proc~~is_rational~~CalledByGraph_node4" class="node">
 <title>proc~cmp_xg</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node4"><a xlink:href="../proc/cmp_xg.html" xlink:title="nurbs_volume%cmp_Xg">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="703.5,-170 563.5,-170 563.5,-146 703.5,-146 703.5,-170"/>
-<text text-anchor="middle" x="633.5" y="-155.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_Xg</text>
+<g id="a_proc~~is_rational~~CalledByGraph_node4"><a xlink:href="../proc/cmp_xg.html" xlink:title="nurbs_curve%cmp_Xg">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="662,-108 532,-108 532,-84 662,-84 662,-108"/>
+<text text-anchor="middle" x="597" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_xg&#45;&gt;proc~is_rational -->
 <g id="proc~~is_rational~~CalledByGraph_edge3" class="edge">
 <title>proc~cmp_xg&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ff0000" d="M703.52,-158.71C718.2,-158.83 733.62,-158.94 748,-159 835.11,-159.38 856.89,-159.39 944,-159 952.31,-158.96 960.97,-158.91 969.63,-158.85"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="969.79,-162.35 979.77,-158.77 969.74,-155.35 969.79,-162.35"/>
+<path fill="none" stroke="#ff0000" d="M653.87,-108.05C659.91,-110.51 665.75,-113.46 671,-117 692.52,-131.52 684.9,-149.37 707,-163 708.2,-163.74 843.29,-190.76 929.6,-207.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="929.12,-211.45 939.61,-209.97 930.49,-204.59 929.12,-211.45"/>
 </g>
 <!-- proc~create -->
 <g id="proc~~is_rational~~CalledByGraph_node5" class="node">
 <title>proc~create</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node5"><a xlink:href="../proc/create.html" xlink:title="nurbs_volume%create">
-<polygon fill="#d9534f" stroke="#d9534f" points="699,-244 568,-244 568,-220 699,-220 699,-244"/>
-<text text-anchor="middle" x="633.5" y="-229.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
+<g id="a_proc~~is_rational~~CalledByGraph_node5"><a xlink:href="../proc/create.html" xlink:title="nurbs_curve%create">
+<polygon fill="#d9534f" stroke="#d9534f" points="861,-234 740,-234 740,-210 861,-210 861,-234"/>
+<text text-anchor="middle" x="800.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%create</text>
 </a>
 </g>
 </g>
 <!-- proc~create&#45;&gt;proc~is_rational -->
 <g id="proc~~is_rational~~CalledByGraph_edge4" class="edge">
 <title>proc~create&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ff0000" d="M699.28,-220.6C773.96,-207.46 896.65,-185.87 976.63,-171.79"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="977.41,-175.21 986.65,-170.03 976.2,-168.31 977.41,-175.21"/>
+<path fill="none" stroke="#ff0000" d="M861.06,-222C879.44,-222 899.99,-222 919.54,-222"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="919.65,-225.5 929.65,-222 919.65,-218.5 919.65,-225.5"/>
 </g>
 <!-- proc~derivative2_scalar -->
 <g id="proc~~is_rational~~CalledByGraph_node6" class="node">
 <title>proc~derivative2_scalar</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node6"><a xlink:href="../proc/derivative2_scalar.html" xlink:title="nurbs_volume%derivative2_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="943.5,-150 748.5,-150 748.5,-126 943.5,-126 943.5,-150"/>
-<text text-anchor="middle" x="846" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_scalar</text>
+<g id="a_proc~~is_rational~~CalledByGraph_node6"><a xlink:href="../proc/derivative2_scalar.html" xlink:title="nurbs_curve%derivative2_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="893,-154 708,-154 708,-130 893,-130 893,-154"/>
+<text text-anchor="middle" x="800.5" y="-139.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_scalar&#45;&gt;proc~is_rational -->
 <g id="proc~~is_rational~~CalledByGraph_edge5" class="edge">
 <title>proc~derivative2_scalar&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ff0000" d="M943.69,-147.3C952.39,-148.13 961.15,-148.98 969.73,-149.8"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="969.43,-153.29 979.71,-150.76 970.1,-146.32 969.43,-153.29"/>
+<path fill="none" stroke="#ff0000" d="M851.54,-154.13C865.47,-158.02 880.48,-162.72 894,-168 920.69,-178.43 949.59,-193.42 970.46,-204.96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="969.01,-208.16 979.45,-209.99 972.43,-202.05 969.01,-208.16"/>
 </g>
 <!-- proc~derivative2_vector -->
 <g id="proc~~is_rational~~CalledByGraph_node7" class="node">
 <title>proc~derivative2_vector</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node7"><a xlink:href="../proc/derivative2_vector.html" xlink:title="nurbs_volume%derivative2_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="944,-108 748,-108 748,-84 944,-84 944,-108"/>
-<text text-anchor="middle" x="846" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_vector</text>
+<g id="a_proc~~is_rational~~CalledByGraph_node7"><a xlink:href="../proc/derivative2_vector.html" xlink:title="nurbs_curve%derivative2_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="894,-112 707,-112 707,-88 894,-88 894,-112"/>
+<text text-anchor="middle" x="800.5" y="-97.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_vector&#45;&gt;proc~is_rational -->
 <g id="proc~~is_rational~~CalledByGraph_edge6" class="edge">
 <title>proc~derivative2_vector&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ff0000" d="M908.9,-108.04C920.63,-110.7 932.75,-113.72 944,-117 968.35,-124.09 995.03,-133.88 1016.12,-142.11"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1015.11,-145.48 1025.7,-145.89 1017.68,-138.96 1015.11,-145.48"/>
+<path fill="none" stroke="#ff0000" d="M873.12,-112.14C880.38,-114.58 887.47,-117.5 894,-121 931.74,-141.24 965.72,-178.58 984.54,-201.75"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="982.02,-204.22 990.98,-209.87 987.51,-199.87 982.02,-204.22"/>
 </g>
 <!-- proc~derivative_scalar -->
 <g id="proc~~is_rational~~CalledByGraph_node8" class="node">
 <title>proc~derivative_scalar</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node8"><a xlink:href="../proc/derivative_scalar.html" xlink:title="nurbs_volume%derivative_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="940,-66 752,-66 752,-42 940,-42 940,-66"/>
-<text text-anchor="middle" x="846" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_scalar</text>
+<g id="a_proc~~is_rational~~CalledByGraph_node8"><a xlink:href="../proc/derivative_scalar.html" xlink:title="nurbs_curve%derivative_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="889.5,-69 711.5,-69 711.5,-45 889.5,-45 889.5,-69"/>
+<text text-anchor="middle" x="800.5" y="-54.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_scalar&#45;&gt;proc~is_rational -->
 <g id="proc~~is_rational~~CalledByGraph_edge7" class="edge">
 <title>proc~derivative_scalar&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ff0000" d="M919.37,-66.04C927.85,-68.51 936.24,-71.46 944,-75 979.18,-91.03 1013.92,-119.64 1034.92,-138.71"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1032.81,-141.53 1042.53,-145.76 1037.57,-136.39 1032.81,-141.53"/>
+<path fill="none" stroke="#ff0000" d="M874.27,-69.04C881.23,-71.73 887.94,-75 894,-79 940.78,-109.87 974.48,-168.77 990.16,-200.5"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="987.12,-202.27 994.6,-209.77 993.43,-199.24 987.12,-202.27"/>
 </g>
 <!-- proc~derivative_vector -->
 <g id="proc~~is_rational~~CalledByGraph_node9" class="node">
 <title>proc~derivative_vector</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node9"><a xlink:href="../proc/derivative_vector.html" xlink:title="nurbs_volume%derivative_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="941,-24 751,-24 751,0 941,0 941,-24"/>
-<text text-anchor="middle" x="846" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_vector</text>
+<g id="a_proc~~is_rational~~CalledByGraph_node9"><a xlink:href="../proc/derivative_vector.html" xlink:title="nurbs_curve%derivative_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="890.5,-25 710.5,-25 710.5,-1 890.5,-1 890.5,-25"/>
+<text text-anchor="middle" x="800.5" y="-10.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_vector&#45;&gt;proc~is_rational -->
 <g id="proc~~is_rational~~CalledByGraph_edge8" class="edge">
 <title>proc~derivative_vector&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ff0000" d="M924.43,-24.01C931.27,-26.47 937.9,-29.44 944,-33 988.35,-58.92 1024.43,-108.75 1042.48,-137.04"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1039.64,-139.1 1047.9,-145.74 1045.58,-135.4 1039.64,-139.1"/>
+<path fill="none" stroke="#ff0000" d="M874.8,-25.15C881.65,-28.04 888.2,-31.6 894,-36 950.45,-78.76 981.59,-160.9 993.82,-200.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="990.49,-201.19 996.72,-209.76 997.19,-199.17 990.49,-201.19"/>
 </g>
-<!-- none~derivative -->
+<!-- proc~elevate_degree -->
 <g id="proc~~is_rational~~CalledByGraph_node10" class="node">
+<title>proc~elevate_degree</title>
+<g id="a_proc~~is_rational~~CalledByGraph_node10"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="885.5,-360 715.5,-360 715.5,-336 885.5,-336 885.5,-360"/>
+<text text-anchor="middle" x="800.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+</a>
+</g>
+</g>
+<!-- proc~elevate_degree&#45;&gt;proc~is_rational -->
+<g id="proc~~is_rational~~CalledByGraph_edge9" class="edge">
+<title>proc~elevate_degree&#45;&gt;proc~is_rational</title>
+<path fill="none" stroke="#ff0000" d="M873.19,-335.98C880.43,-333.53 887.5,-330.57 894,-327 932.63,-305.8 966.72,-266.41 985.26,-242.37"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="988.14,-244.36 991.36,-234.27 982.55,-240.15 988.14,-244.36"/>
+</g>
+<!-- proc~insert_knots -->
+<g id="proc~~is_rational~~CalledByGraph_node11" class="node">
+<title>proc~insert_knots</title>
+<g id="a_proc~~is_rational~~CalledByGraph_node11"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_curve%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="876,-318 725,-318 725,-294 876,-294 876,-318"/>
+<text text-anchor="middle" x="800.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
+</a>
+</g>
+</g>
+<!-- proc~insert_knots&#45;&gt;proc~is_rational -->
+<g id="proc~~is_rational~~CalledByGraph_edge10" class="edge">
+<title>proc~insert_knots&#45;&gt;proc~is_rational</title>
+<path fill="none" stroke="#ff0000" d="M866.48,-293.97C875.86,-291.45 885.28,-288.48 894,-285 923.4,-273.27 954.2,-254.07 974.98,-239.94"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="977,-242.8 983.24,-234.24 973.02,-237.04 977,-242.8"/>
+</g>
+<!-- proc~remove_knots -->
+<g id="proc~~is_rational~~CalledByGraph_node12" class="node">
+<title>proc~remove_knots</title>
+<g id="a_proc~~is_rational~~CalledByGraph_node12"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_curve%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="881.5,-276 719.5,-276 719.5,-252 881.5,-252 881.5,-276"/>
+<text text-anchor="middle" x="800.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
+</a>
+</g>
+</g>
+<!-- proc~remove_knots&#45;&gt;proc~is_rational -->
+<g id="proc~~is_rational~~CalledByGraph_edge11" class="edge">
+<title>proc~remove_knots&#45;&gt;proc~is_rational</title>
+<path fill="none" stroke="#ff0000" d="M858.38,-251.96C881.74,-247.02 908.96,-241.26 933.25,-236.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="934.05,-239.53 943.11,-234.04 932.6,-232.68 934.05,-239.53"/>
+</g>
+<!-- none~derivative -->
+<g id="proc~~is_rational~~CalledByGraph_node13" class="node">
 <title>none~derivative</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node10"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative" xlink:title="nurbs_volume%derivative">
-<polygon fill="#a7506f" stroke="#a7506f" points="709,-45 558,-45 558,-21 709,-21 709,-45"/>
-<text text-anchor="middle" x="633.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative</text>
+<g id="a_proc~~is_rational~~CalledByGraph_node13"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative" xlink:title="nurbs_curve%derivative">
+<polygon fill="#a7506f" stroke="#a7506f" points="667.5,-24 526.5,-24 526.5,0 667.5,0 667.5,-24"/>
+<text text-anchor="middle" x="597" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative</text>
 </a>
 </g>
 </g>
 <!-- none~derivative&#45;&gt;proc~derivative_scalar -->
-<g id="proc~~is_rational~~CalledByGraph_edge20" class="edge">
+<g id="proc~~is_rational~~CalledByGraph_edge22" class="edge">
 <title>none~derivative&#45;&gt;proc~derivative_scalar</title>
-<path fill="none" stroke="#7f00ff" d="M709.01,-40.43C719.61,-41.49 730.65,-42.59 741.68,-43.69"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="741.48,-47.19 751.78,-44.7 742.17,-40.22 741.48,-47.19"/>
+<path fill="none" stroke="#00b9ff" d="M651.73,-24C677.47,-29.75 708.49,-36.68 735.45,-42.7"/>
+<polygon fill="#00b9ff" stroke="#00b9ff" points="735.04,-46.19 745.57,-44.96 736.57,-39.36 735.04,-46.19"/>
 </g>
 <!-- none~derivative&#45;&gt;proc~derivative_vector -->
-<g id="proc~~is_rational~~CalledByGraph_edge21" class="edge">
+<g id="proc~~is_rational~~CalledByGraph_edge23" class="edge">
 <title>none~derivative&#45;&gt;proc~derivative_vector</title>
-<path fill="none" stroke="#ff00bf" d="M709.01,-25.57C719.23,-24.55 729.87,-23.49 740.5,-22.43"/>
-<polygon fill="#ff00bf" stroke="#ff00bf" points="741.07,-25.89 750.68,-21.41 740.38,-18.92 741.07,-25.89"/>
+<path fill="none" stroke="#002eff" d="M667.63,-12.35C678.17,-12.4 689.21,-12.45 700.23,-12.51"/>
+<polygon fill="#002eff" stroke="#002eff" points="700.31,-16.01 710.32,-12.56 700.34,-9.01 700.31,-16.01"/>
 </g>
 <!-- none~derivative2 -->
-<g id="proc~~is_rational~~CalledByGraph_node11" class="node">
+<g id="proc~~is_rational~~CalledByGraph_node14" class="node">
 <title>none~derivative2</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node11"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2" xlink:title="nurbs_volume%derivative2">
-<polygon fill="#a7506f" stroke="#a7506f" points="712,-118 555,-118 555,-94 712,-94 712,-118"/>
-<text text-anchor="middle" x="633.5" y="-103.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2</text>
+<g id="a_proc~~is_rational~~CalledByGraph_node14"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative2" xlink:title="nurbs_curve%derivative2">
+<polygon fill="#a7506f" stroke="#a7506f" points="671,-66 523,-66 523,-42 671,-42 671,-66"/>
+<text text-anchor="middle" x="597" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2&#45;&gt;proc~derivative2_scalar -->
-<g id="proc~~is_rational~~CalledByGraph_edge18" class="edge">
+<g id="proc~~is_rational~~CalledByGraph_edge20" class="edge">
 <title>none~derivative2&#45;&gt;proc~derivative2_scalar</title>
-<path fill="none" stroke="#00ffff" d="M712.28,-117.82C726.46,-119.98 741.36,-122.24 755.83,-124.45"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="755.36,-127.91 765.78,-125.96 756.42,-120.99 755.36,-127.91"/>
+<path fill="none" stroke="#00ff2e" d="M653.87,-66.05C659.91,-68.51 665.75,-71.46 671,-75 692.52,-89.52 685.07,-107.1 707,-121 709.78,-122.76 712.69,-124.38 715.7,-125.86"/>
+<polygon fill="#00ff2e" stroke="#00ff2e" points="714.39,-129.11 724.95,-129.91 717.19,-122.69 714.39,-129.11"/>
 </g>
 <!-- none~derivative2&#45;&gt;proc~derivative2_vector -->
-<g id="proc~~is_rational~~CalledByGraph_edge19" class="edge">
+<g id="proc~~is_rational~~CalledByGraph_edge21" class="edge">
 <title>none~derivative2&#45;&gt;proc~derivative2_vector</title>
-<path fill="none" stroke="#003fff" d="M712.28,-102.3C720.62,-101.91 729.2,-101.5 737.8,-101.09"/>
-<polygon fill="#003fff" stroke="#003fff" points="738.06,-104.58 747.88,-100.61 737.73,-97.59 738.06,-104.58"/>
+<path fill="none" stroke="#00ffb9" d="M650.68,-66.03C677.06,-72.05 709.18,-79.38 736.82,-85.69"/>
+<polygon fill="#00ffb9" stroke="#00ffb9" points="736.25,-89.15 746.78,-87.96 737.81,-82.33 736.25,-89.15"/>
 </g>
 <!-- proc~nearest_point2 -->
-<g id="proc~~is_rational~~CalledByGraph_node12" class="node">
+<g id="proc~~is_rational~~CalledByGraph_node15" class="node">
 <title>proc~nearest_point2</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node12"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_volume%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="519,-118 343,-118 343,-94 519,-94 519,-118"/>
-<text text-anchor="middle" x="431" y="-103.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
+<g id="a_proc~~is_rational~~CalledByGraph_node15"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_curve%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="487,-190 321,-190 321,-166 487,-166 487,-190"/>
+<text text-anchor="middle" x="404" y="-175.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2&#45;&gt;proc~cmp_xg -->
-<g id="proc~~is_rational~~CalledByGraph_edge9" class="edge">
+<g id="proc~~is_rational~~CalledByGraph_edge12" class="edge">
 <title>proc~nearest_point2&#45;&gt;proc~cmp_xg</title>
-<path fill="none" stroke="#7fff00" d="M483.13,-118.07C494.93,-120.93 507.41,-124.02 519,-127 538.96,-132.13 560.82,-138.04 579.98,-143.31"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="579.16,-146.71 589.73,-146 581.02,-139.96 579.16,-146.71"/>
+<path fill="none" stroke="#e7ff00" d="M425.31,-165.93C448.37,-152.6 487.43,-131.15 523,-117 528.13,-114.96 533.54,-113.02 538.99,-111.21"/>
+<polygon fill="#e7ff00" stroke="#e7ff00" points="540.34,-114.46 548.81,-108.1 538.22,-107.79 540.34,-114.46"/>
 </g>
 <!-- proc~nearest_point2&#45;&gt;proc~create -->
-<g id="proc~~is_rational~~CalledByGraph_edge10" class="edge">
+<g id="proc~~is_rational~~CalledByGraph_edge13" class="edge">
 <title>proc~nearest_point2&#45;&gt;proc~create</title>
-<path fill="none" stroke="#00ff3f" d="M502.34,-118.12C508.23,-120.56 513.87,-123.49 519,-127 542.18,-142.9 535.07,-159.18 555,-179 568.78,-192.71 586.54,-205.14 601.58,-214.52"/>
-<polygon fill="#00ff3f" stroke="#00ff3f" points="600.17,-217.76 610.54,-219.95 603.8,-211.77 600.17,-217.76"/>
+<path fill="none" stroke="#5cff00" d="M420.69,-190.07C442.31,-205.87 483.13,-232.75 523,-243 586.7,-259.38 605.44,-248.32 671,-243 690.19,-241.44 710.84,-238.6 729.85,-235.49"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="730.65,-238.91 739.93,-233.8 729.48,-232 730.65,-238.91"/>
 </g>
 <!-- proc~nearest_point2&#45;&gt;none~derivative2 -->
-<g id="proc~~is_rational~~CalledByGraph_edge23" class="edge">
+<g id="proc~~is_rational~~CalledByGraph_edge28" class="edge">
 <title>proc~nearest_point2&#45;&gt;none~derivative2</title>
-<path fill="none" stroke="#ff9900" d="M519.07,-106C527.65,-106 536.37,-106 544.95,-106"/>
-<polygon fill="#ff9900" stroke="#ff9900" points="544.96,-109.5 554.96,-106 544.96,-102.5 544.96,-109.5"/>
+<path fill="none" stroke="#ffaa00" d="M415.44,-165.92C434.61,-144.48 477.63,-99.72 523,-75 526.48,-73.1 530.16,-71.36 533.92,-69.76"/>
+<polygon fill="#ffaa00" stroke="#ffaa00" points="535.37,-72.96 543.44,-66.09 532.85,-66.43 535.37,-72.96"/>
 </g>
-<!-- program~example3_volume -->
-<g id="proc~~is_rational~~CalledByGraph_node13" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node13"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="486,-408 376,-408 376,-384 486,-384 486,-408"/>
-<text text-anchor="middle" x="431" y="-393.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<!-- program~example1_curve -->
+<g id="proc~~is_rational~~CalledByGraph_node16" class="node">
+<title>program~example1_curve</title>
+<g id="a_proc~~is_rational~~CalledByGraph_node16"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="647,-394 547,-394 547,-370 647,-370 647,-394"/>
+<text text-anchor="middle" x="597" y="-379.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~create -->
-<g id="proc~~is_rational~~CalledByGraph_edge11" class="edge">
-<title>program~example3_volume&#45;&gt;proc~create</title>
-<path fill="none" stroke="#00ff3f" d="M486.24,-388.76C497.64,-385.67 509.18,-381.27 519,-375 567.66,-343.92 604.54,-284.67 621.76,-253.07"/>
-<polygon fill="#00ff3f" stroke="#00ff3f" points="624.87,-254.69 626.47,-244.22 618.69,-251.4 624.87,-254.69"/>
+<!-- program~example1_curve&#45;&gt;proc~create -->
+<g id="proc~~is_rational~~CalledByGraph_edge14" class="edge">
+<title>program~example1_curve&#45;&gt;proc~create</title>
+<path fill="none" stroke="#5cff00" d="M647.19,-375.11C655.98,-371.98 664.42,-367.48 671,-361 710.08,-322.54 666.84,-280.33 707,-243 713.57,-236.89 721.54,-232.43 730.01,-229.19"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="731.3,-232.45 739.73,-226.04 729.14,-225.79 731.3,-232.45"/>
 </g>
-<!-- program~example_nurbs_volume -->
-<g id="proc~~is_rational~~CalledByGraph_node14" class="node">
-<title>program~example_nurbs_volume</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node14"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="500.5,-366 361.5,-366 361.5,-342 500.5,-342 500.5,-366"/>
-<text text-anchor="middle" x="431" y="-351.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
-</a>
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
+<g id="proc~~is_rational~~CalledByGraph_edge24" class="edge">
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
+<path fill="none" stroke="#5c00ff" d="M647.03,-373.73C668.43,-370.12 694.1,-365.78 718.22,-361.71"/>
+<polygon fill="#5c00ff" stroke="#5c00ff" points="718.81,-365.16 728.09,-360.05 717.65,-358.26 718.81,-365.16"/>
 </g>
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
+<g id="proc~~is_rational~~CalledByGraph_edge25" class="edge">
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
+<path fill="none" stroke="#e700ff" d="M647.22,-371.34C655.44,-368.59 663.67,-365.18 671,-361 690.12,-350.09 687.58,-337.36 707,-327 710.76,-324.99 714.7,-323.18 718.76,-321.54"/>
+<polygon fill="#e700ff" stroke="#e700ff" points="720.19,-324.74 728.38,-318.01 717.79,-318.17 720.19,-324.74"/>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~create -->
-<g id="proc~~is_rational~~CalledByGraph_edge12" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~create</title>
-<path fill="none" stroke="#00ff3f" d="M484.92,-341.97C496.52,-338.31 508.46,-333.7 519,-328 556.8,-307.54 593.45,-273.07 614.46,-251.48"/>
-<polygon fill="#00ff3f" stroke="#00ff3f" points="617.08,-253.8 621.46,-244.16 612.02,-248.96 617.08,-253.8"/>
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
+<g id="proc~~is_rational~~CalledByGraph_edge26" class="edge">
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
+<path fill="none" stroke="#ff008b" d="M647.23,-374.05C655.81,-371.01 664.17,-366.81 671,-361 699.48,-336.8 677.84,-308.38 707,-285 708.77,-283.58 710.63,-282.25 712.54,-281"/>
+<polygon fill="#ff008b" stroke="#ff008b" points="714.3,-284.03 721.32,-276.09 710.88,-277.92 714.3,-284.03"/>
 </g>
-<!-- program~nearest_point_3d -->
-<g id="proc~~is_rational~~CalledByGraph_node15" class="node">
-<title>program~nearest_point_3d</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node15"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="275.5,-222 172.5,-222 172.5,-198 275.5,-198 275.5,-222"/>
-<text text-anchor="middle" x="224" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
+<!-- program~example_nurbs_curve -->
+<g id="proc~~is_rational~~CalledByGraph_node17" class="node">
+<title>program~example_nurbs_curve</title>
+<g id="a_proc~~is_rational~~CalledByGraph_node17"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="661.5,-352 532.5,-352 532.5,-328 661.5,-328 661.5,-352"/>
+<text text-anchor="middle" x="597" y="-337.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~create -->
-<g id="proc~~is_rational~~CalledByGraph_edge13" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~create</title>
-<path fill="none" stroke="#00ff3f" d="M236.3,-222.04C255.82,-241.83 298.07,-280.5 343,-295 417.44,-319.02 443.28,-314.61 519,-295 552.37,-286.36 586.37,-265.56 608.35,-250.21"/>
-<polygon fill="#00ff3f" stroke="#00ff3f" points="610.62,-252.89 616.71,-244.23 606.54,-247.2 610.62,-252.89"/>
-</g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
-<g id="proc~~is_rational~~CalledByGraph_edge24" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
-<path fill="none" stroke="#cbff00" d="M238.47,-197.91C259.35,-179.82 301.47,-145.79 343,-127 347.66,-124.89 352.56,-122.98 357.56,-121.25"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="358.81,-124.52 367.26,-118.13 356.67,-117.86 358.81,-124.52"/>
+<!-- program~example_nurbs_curve&#45;&gt;proc~create -->
+<g id="proc~~is_rational~~CalledByGraph_edge15" class="edge">
+<title>program~example_nurbs_curve&#45;&gt;proc~create</title>
+<path fill="none" stroke="#5cff00" d="M647.93,-327.99C656.25,-324.44 664.34,-319.87 671,-314 697.56,-290.62 679.1,-264.76 707,-243 713.89,-237.63 721.89,-233.58 730.25,-230.54"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="731.33,-233.87 739.81,-227.52 729.22,-227.2 731.33,-233.87"/>
 </g>
-<!-- program~shape_c_3d -->
-<g id="proc~~is_rational~~CalledByGraph_node16" class="node">
-<title>program~shape_c_3d</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node16"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="469,-286 393,-286 393,-262 469,-262 469,-286"/>
-<text text-anchor="middle" x="431" y="-271.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<!-- program~nearest_point_1d -->
+<g id="proc~~is_rational~~CalledByGraph_node18" class="node">
+<title>program~nearest_point_1d</title>
+<g id="a_proc~~is_rational~~CalledByGraph_node18"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="261.5,-210 158.5,-210 158.5,-186 261.5,-186 261.5,-210"/>
+<text text-anchor="middle" x="210" y="-195.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~create -->
-<g id="proc~~is_rational~~CalledByGraph_edge14" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~create</title>
-<path fill="none" stroke="#00ff3f" d="M469.24,-266.2C496.02,-260.59 532.87,-252.87 564.79,-246.18"/>
-<polygon fill="#00ff3f" stroke="#00ff3f" points="565.89,-249.53 574.96,-244.05 564.46,-242.68 565.89,-249.53"/>
+<!-- program~nearest_point_1d&#45;&gt;proc~create -->
+<g id="proc~~is_rational~~CalledByGraph_edge16" class="edge">
+<title>program~nearest_point_1d&#45;&gt;proc~create</title>
+<path fill="none" stroke="#5cff00" d="M242.06,-210.02C316.78,-237.26 512.14,-298.5 671,-261 688.41,-256.89 690.16,-249.02 707,-243 714.3,-240.39 722.05,-238.03 729.84,-235.91"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="730.88,-239.26 739.68,-233.36 729.12,-232.48 730.88,-239.26"/>
 </g>
-<!-- program~shape_half_ring_3d -->
-<g id="proc~~is_rational~~CalledByGraph_node17" class="node">
-<title>program~shape_half_ring_3d</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node17"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="488.5,-244 373.5,-244 373.5,-220 488.5,-220 488.5,-244"/>
-<text text-anchor="middle" x="431" y="-229.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2 -->
+<g id="proc~~is_rational~~CalledByGraph_edge29" class="edge">
+<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2</title>
+<path fill="none" stroke="#aaff00" d="M261.7,-192.72C276.69,-191.16 293.6,-189.4 310.38,-187.65"/>
+<polygon fill="#aaff00" stroke="#aaff00" points="311.2,-191.08 320.79,-186.56 310.48,-184.12 311.2,-191.08"/>
+</g>
+<!-- program~shape_c_1d -->
+<g id="proc~~is_rational~~CalledByGraph_node19" class="node">
+<title>program~shape_c_1d</title>
+<g id="a_proc~~is_rational~~CalledByGraph_node19"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="635,-234 559,-234 559,-210 635,-210 635,-234"/>
+<text text-anchor="middle" x="597" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~create -->
-<g id="proc~~is_rational~~CalledByGraph_edge15" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~create</title>
-<path fill="none" stroke="#00ff3f" d="M488.65,-232C510.14,-232 534.94,-232 557.84,-232"/>
-<polygon fill="#00ff3f" stroke="#00ff3f" points="557.86,-235.5 567.86,-232 557.86,-228.5 557.86,-235.5"/>
+<!-- program~shape_c_1d&#45;&gt;proc~create -->
+<g id="proc~~is_rational~~CalledByGraph_edge17" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~create</title>
+<path fill="none" stroke="#5cff00" d="M635.43,-222C661.82,-222 697.97,-222 729.61,-222"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="729.71,-225.5 739.71,-222 729.71,-218.5 729.71,-225.5"/>
 </g>
-<!-- program~shape_hexahedron -->
-<g id="proc~~is_rational~~CalledByGraph_node18" class="node">
-<title>program~shape_hexahedron</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node18"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="487.5,-202 374.5,-202 374.5,-178 487.5,-178 487.5,-202"/>
-<text text-anchor="middle" x="431" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
+<!-- program~shape_circle -->
+<g id="proc~~is_rational~~CalledByGraph_node20" class="node">
+<title>program~shape_circle</title>
+<g id="a_proc~~is_rational~~CalledByGraph_node20"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="636.5,-192 557.5,-192 557.5,-168 636.5,-168 636.5,-192"/>
+<text text-anchor="middle" x="597" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~create -->
-<g id="proc~~is_rational~~CalledByGraph_edge16" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~create</title>
-<path fill="none" stroke="#00ff3f" d="M487.58,-201.64C511.63,-206.68 539.98,-212.62 565.2,-217.9"/>
-<polygon fill="#00ff3f" stroke="#00ff3f" points="564.56,-221.34 575.06,-219.97 565.99,-214.49 564.56,-221.34"/>
+<!-- program~shape_circle&#45;&gt;proc~create -->
+<g id="proc~~is_rational~~CalledByGraph_edge18" class="edge">
+<title>program~shape_circle&#45;&gt;proc~create</title>
+<path fill="none" stroke="#5cff00" d="M636.85,-188.1C663.68,-193.69 700.07,-201.28 731.63,-207.85"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="731.19,-211.34 741.69,-209.95 732.62,-204.48 731.19,-211.34"/>
 </g>
-<!-- program~shape_ring_3d -->
-<g id="proc~~is_rational~~CalledByGraph_node19" class="node">
-<title>program~shape_ring_3d</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node19"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="476,-160 386,-160 386,-136 476,-136 476,-160"/>
-<text text-anchor="middle" x="431" y="-145.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+<!-- program~shape_half_circle -->
+<g id="proc~~is_rational~~CalledByGraph_node21" class="node">
+<title>program~shape_half_circle</title>
+<g id="a_proc~~is_rational~~CalledByGraph_node21"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="649,-150 545,-150 545,-126 649,-126 649,-150"/>
+<text text-anchor="middle" x="597" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~create -->
-<g id="proc~~is_rational~~CalledByGraph_edge17" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~create</title>
-<path fill="none" stroke="#00ff3f" d="M476.08,-156.21C490.05,-159.45 505.39,-163.69 519,-169 550.19,-181.16 583.39,-200.42 605.78,-214.44"/>
-<polygon fill="#00ff3f" stroke="#00ff3f" points="604.06,-217.5 614.38,-219.91 607.82,-211.59 604.06,-217.5"/>
+<!-- program~shape_half_circle&#45;&gt;proc~create -->
+<g id="proc~~is_rational~~CalledByGraph_edge19" class="edge">
+<title>program~shape_half_circle&#45;&gt;proc~create</title>
+<path fill="none" stroke="#5cff00" d="M649.3,-149.07C656.85,-151.73 664.32,-155 671,-159 690.68,-170.79 687.28,-184.27 707,-196 714.21,-200.29 722.16,-203.9 730.28,-206.93"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="729.27,-210.28 739.86,-210.22 731.54,-203.66 729.27,-210.28"/>
 </g>
 <!-- proc~ansatz -->
-<g id="proc~~is_rational~~CalledByGraph_node20" class="node">
+<g id="proc~~is_rational~~CalledByGraph_node22" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node20"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="497,-45 365,-45 365,-21 497,-21 497,-45"/>
-<text text-anchor="middle" x="431" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~is_rational~~CalledByGraph_node22"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="465,-24 343,-24 343,0 465,0 465,-24"/>
+<text text-anchor="middle" x="404" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;none~derivative -->
-<g id="proc~~is_rational~~CalledByGraph_edge22" class="edge">
+<g id="proc~~is_rational~~CalledByGraph_edge27" class="edge">
 <title>proc~ansatz&#45;&gt;none~derivative</title>
-<path fill="none" stroke="#ff0000" d="M497.1,-33C513.19,-33 530.68,-33 547.56,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="547.99,-36.5 557.99,-33 547.99,-29.5 547.99,-36.5"/>
-</g>
-<!-- proc~cmp_volume -->
-<g id="proc~~is_rational~~CalledByGraph_node21" class="node">
-<title>proc~cmp_volume</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node21"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-45 141,-45 141,-21 307,-21 307,-45"/>
-<text text-anchor="middle" x="224" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<path fill="none" stroke="#ff0000" d="M465.17,-12C481.44,-12 499.31,-12 516.46,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="516.46,-15.5 526.46,-12 516.46,-8.5 516.46,-15.5"/>
+</g>
+<!-- proc~cmp_length -->
+<g id="proc~~is_rational~~CalledByGraph_node23" class="node">
+<title>proc~cmp_length</title>
+<g id="a_proc~~is_rational~~CalledByGraph_node23"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
+<polygon fill="#d9534f" stroke="#d9534f" points="285,-24 135,-24 135,0 285,0 285,-24"/>
+<text text-anchor="middle" x="210" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~is_rational~~CalledByGraph_edge25" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.2,-33C322.92,-33 339.3,-33 354.78,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="354.81,-36.5 364.81,-33 354.81,-29.5 354.81,-36.5"/>
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
+<g id="proc~~is_rational~~CalledByGraph_edge30" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M285.23,-12C300.9,-12 317.38,-12 332.89,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="332.93,-15.5 342.93,-12 332.93,-8.5 332.93,-15.5"/>
 </g>
-<!-- program~compute_volume -->
-<g id="proc~~is_rational~~CalledByGraph_node22" class="node">
-<title>program~compute_volume</title>
-<g id="a_proc~~is_rational~~CalledByGraph_node22"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-45 0,-45 0,-21 105,-21 105,-45"/>
-<text text-anchor="middle" x="52.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<!-- program~compute_length -->
+<g id="proc~~is_rational~~CalledByGraph_node24" class="node">
+<title>program~compute_length</title>
+<g id="a_proc~~is_rational~~CalledByGraph_node24"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-24 0,-24 0,0 99,0 99,-24"/>
+<text text-anchor="middle" x="49.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
-<g id="proc~~is_rational~~CalledByGraph_edge26" class="edge">
-<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#ff0000" d="M105.28,-33C113.39,-33 121.99,-33 130.69,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="130.93,-36.5 140.93,-33 130.93,-29.5 130.93,-36.5"/>
+<!-- program~compute_length&#45;&gt;proc~cmp_length -->
+<g id="proc~~is_rational~~CalledByGraph_edge31" class="edge">
+<title>program~compute_length&#45;&gt;proc~cmp_length</title>
+<path fill="none" stroke="#ff0000" d="M99.35,-12C107.46,-12 116.06,-12 124.75,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="124.96,-15.5 134.96,-12 124.96,-8.5 124.96,-15.5"/>
 </g>
 </g>
 </svg>
@@ -667,7 +715,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/is_rational~2.html b/proc/is_rational~2.html
index 069b6d0cd..4bd1b423a 100644
--- a/proc/is_rational~2.html
+++ b/proc/is_rational~2.html
@@ -83,15 +83,15 @@ <h1>is_rational
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">is_rational</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function is_rational(this) result(r)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~110"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~103"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -193,484 +193,361 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~is_rational~2~~CalledByGraph Pages: 1 -->
-<svg id="procis_rational2CalledByGraph" width="641pt" height="352pt"
- viewBox="0.00 0.00 641.00 351.74" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~is_rational~2~~CalledByGraph" class="graph" transform="scale(1.73 1.73) rotate(0) translate(4 604)">
+<svg id="procis_rational2CalledByGraph" width="641pt" height="234pt"
+ viewBox="0.00 0.00 641.00 233.91" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~is_rational~2~~CalledByGraph" class="graph" transform="scale(1.78 1.78) rotate(0) translate(4 412)">
 <title>proc~~is_rational~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-604 1104,-604 1104,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-412 1136,-412 1136,4 -4,4"/>
 <!-- proc~is_rational~2 -->
 <g id="proc~~is_rational~2~~CalledByGraph_node1" class="node">
 <title>proc~is_rational~2</title>
-<polygon fill="none" stroke="black" points="1100,-334 948,-334 948,-310 1100,-310 1100,-334"/>
-<text text-anchor="middle" x="1024" y="-319.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%is_rational</text>
+<polygon fill="none" stroke="black" points="1132,-170 980,-170 980,-146 1132,-146 1132,-170"/>
+<text text-anchor="middle" x="1056" y="-155.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%is_rational</text>
 </g>
 <!-- proc~basis_scalar~2 -->
 <g id="proc~~is_rational~2~~CalledByGraph_node2" class="node">
 <title>proc~basis_scalar~2</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node2"><a xlink:href="../proc/basis_scalar~2.html" xlink:title="nurbs_surface%basis_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="895,-544 733,-544 733,-520 895,-520 895,-544"/>
-<text text-anchor="middle" x="814" y="-529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%basis_scalar</text>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node2"><a xlink:href="../proc/basis_scalar~2.html" xlink:title="nurbs_volume%basis_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="927,-310 765,-310 765,-286 927,-286 927,-310"/>
+<text text-anchor="middle" x="846" y="-295.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%basis_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_scalar~2&#45;&gt;proc~is_rational~2 -->
 <g id="proc~~is_rational~2~~CalledByGraph_edge1" class="edge">
 <title>proc~basis_scalar~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#ff0000" d="M895.17,-520.4C901.14,-517.83 906.84,-514.74 912,-511 971.02,-468.29 1003.84,-383.76 1016.64,-343.84"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1020.06,-344.64 1019.66,-334.06 1013.37,-342.58 1020.06,-344.64"/>
+<path fill="none" stroke="#ff0000" d="M924.08,-285.92C931.03,-283.47 937.78,-280.53 944,-277 987.26,-252.42 1023.52,-205.35 1041.95,-178.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1044.86,-180.3 1047.5,-170.04 1039.04,-176.42 1044.86,-180.3"/>
 </g>
 <!-- proc~basis_vector~2 -->
 <g id="proc~~is_rational~2~~CalledByGraph_node3" class="node">
 <title>proc~basis_vector~2</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node3"><a xlink:href="../proc/basis_vector~2.html" xlink:title="nurbs_surface%basis_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="895.5,-502 732.5,-502 732.5,-478 895.5,-478 895.5,-502"/>
-<text text-anchor="middle" x="814" y="-487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%basis_vector</text>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node3"><a xlink:href="../proc/basis_vector~2.html" xlink:title="nurbs_volume%basis_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="927.5,-268 764.5,-268 764.5,-244 927.5,-244 927.5,-268"/>
+<text text-anchor="middle" x="846" y="-253.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%basis_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_vector~2&#45;&gt;proc~is_rational~2 -->
 <g id="proc~~is_rational~2~~CalledByGraph_edge2" class="edge">
 <title>proc~basis_vector~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#ff0000" d="M894.22,-477.92C900.47,-475.47 906.48,-472.53 912,-469 961.33,-437.48 996.87,-375.87 1013.12,-343.32"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1016.32,-344.74 1017.53,-334.22 1010.02,-341.69 1016.32,-344.74"/>
+<path fill="none" stroke="#ff0000" d="M903.94,-243.93C917.36,-240.22 931.42,-235.6 944,-230 976.28,-215.64 1009.84,-192.54 1031.49,-176.39"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1033.87,-178.98 1039.72,-170.16 1029.64,-173.4 1033.87,-178.98"/>
 </g>
 <!-- proc~cmp_xg~2 -->
 <g id="proc~~is_rational~2~~CalledByGraph_node4" class="node">
 <title>proc~cmp_xg~2</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node4"><a xlink:href="../proc/cmp_xg~2.html" xlink:title="nurbs_surface%cmp_Xg">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="884,-290 744,-290 744,-266 884,-266 884,-290"/>
-<text text-anchor="middle" x="814" y="-275.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_Xg</text>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node4"><a xlink:href="../proc/cmp_xg~2.html" xlink:title="nurbs_volume%cmp_Xg">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="703.5,-170 563.5,-170 563.5,-146 703.5,-146 703.5,-170"/>
+<text text-anchor="middle" x="633.5" y="-155.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_xg~2&#45;&gt;proc~is_rational~2 -->
 <g id="proc~~is_rational~2~~CalledByGraph_edge3" class="edge">
 <title>proc~cmp_xg~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#ff0000" d="M871.84,-290.02C897.98,-295.55 929.16,-302.15 956.39,-307.91"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="955.72,-311.35 966.23,-309.99 957.17,-304.5 955.72,-311.35"/>
+<path fill="none" stroke="#ff0000" d="M703.52,-158.71C718.2,-158.83 733.62,-158.94 748,-159 835.11,-159.38 856.89,-159.39 944,-159 952.31,-158.96 960.97,-158.91 969.63,-158.85"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="969.79,-162.35 979.77,-158.77 969.74,-155.35 969.79,-162.35"/>
 </g>
 <!-- proc~create~2 -->
 <g id="proc~~is_rational~2~~CalledByGraph_node5" class="node">
 <title>proc~create~2</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node5"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
-<polygon fill="#d9534f" stroke="#d9534f" points="879.5,-334 748.5,-334 748.5,-310 879.5,-310 879.5,-334"/>
-<text text-anchor="middle" x="814" y="-319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node5"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_volume%create">
+<polygon fill="#d9534f" stroke="#d9534f" points="699,-244 568,-244 568,-220 699,-220 699,-244"/>
+<text text-anchor="middle" x="633.5" y="-229.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
 </a>
 </g>
 </g>
 <!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
 <g id="proc~~is_rational~2~~CalledByGraph_edge4" class="edge">
 <title>proc~create~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#ff0000" d="M879.67,-322C898.05,-322 918.36,-322 937.76,-322"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="937.81,-325.5 947.81,-322 937.81,-318.5 937.81,-325.5"/>
+<path fill="none" stroke="#ff0000" d="M699.28,-220.6C773.96,-207.46 896.65,-185.87 976.63,-171.79"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="977.41,-175.21 986.65,-170.03 976.2,-168.31 977.41,-175.21"/>
 </g>
 <!-- proc~derivative2_scalar~2 -->
 <g id="proc~~is_rational~2~~CalledByGraph_node6" class="node">
 <title>proc~derivative2_scalar~2</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node6"><a xlink:href="../proc/derivative2_scalar~2.html" xlink:title="nurbs_surface%derivative2_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="911.5,-243 716.5,-243 716.5,-219 911.5,-219 911.5,-243"/>
-<text text-anchor="middle" x="814" y="-228.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_scalar</text>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node6"><a xlink:href="../proc/derivative2_scalar~2.html" xlink:title="nurbs_volume%derivative2_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="943.5,-150 748.5,-150 748.5,-126 943.5,-126 943.5,-150"/>
+<text text-anchor="middle" x="846" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_scalar~2&#45;&gt;proc~is_rational~2 -->
 <g id="proc~~is_rational~2~~CalledByGraph_edge5" class="edge">
 <title>proc~derivative2_scalar~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#ff0000" d="M870.24,-243.07C884.12,-246.84 898.81,-251.49 912,-257 942.79,-269.87 975.45,-289.85 997.31,-304.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="995.44,-307.23 1005.7,-309.88 999.33,-301.41 995.44,-307.23"/>
+<path fill="none" stroke="#ff0000" d="M943.69,-147.3C952.39,-148.13 961.15,-148.98 969.73,-149.8"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="969.43,-153.29 979.71,-150.76 970.1,-146.32 969.43,-153.29"/>
 </g>
 <!-- proc~derivative2_vector~2 -->
 <g id="proc~~is_rational~2~~CalledByGraph_node7" class="node">
 <title>proc~derivative2_vector~2</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node7"><a xlink:href="../proc/derivative2_vector~2.html" xlink:title="nurbs_surface%derivative2_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="912,-191 716,-191 716,-167 912,-167 912,-191"/>
-<text text-anchor="middle" x="814" y="-176.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_vector</text>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node7"><a xlink:href="../proc/derivative2_vector~2.html" xlink:title="nurbs_volume%derivative2_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="944,-108 748,-108 748,-84 944,-84 944,-108"/>
+<text text-anchor="middle" x="846" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_vector~2&#45;&gt;proc~is_rational~2 -->
 <g id="proc~~is_rational~2~~CalledByGraph_edge6" class="edge">
 <title>proc~derivative2_vector~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#ff0000" d="M868.35,-191.03C883.13,-195.67 898.73,-201.87 912,-210 952.09,-234.56 988.35,-276.58 1007.87,-301.57"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1005.2,-303.84 1014.06,-309.65 1010.76,-299.58 1005.2,-303.84"/>
+<path fill="none" stroke="#ff0000" d="M908.9,-108.04C920.63,-110.7 932.75,-113.72 944,-117 968.35,-124.09 995.03,-133.88 1016.12,-142.11"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1015.11,-145.48 1025.7,-145.89 1017.68,-138.96 1015.11,-145.48"/>
 </g>
 <!-- proc~derivative_scalar~2 -->
 <g id="proc~~is_rational~2~~CalledByGraph_node8" class="node">
 <title>proc~derivative_scalar~2</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node8"><a xlink:href="../proc/derivative_scalar~2.html" xlink:title="nurbs_surface%derivative_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="908,-129 720,-129 720,-105 908,-105 908,-129"/>
-<text text-anchor="middle" x="814" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_scalar</text>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node8"><a xlink:href="../proc/derivative_scalar~2.html" xlink:title="nurbs_volume%derivative_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="940,-66 752,-66 752,-42 940,-42 940,-66"/>
+<text text-anchor="middle" x="846" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_scalar~2&#45;&gt;proc~is_rational~2 -->
 <g id="proc~~is_rational~2~~CalledByGraph_edge7" class="edge">
 <title>proc~derivative_scalar~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#ff0000" d="M858.01,-129.16C876,-135.7 896.32,-145.12 912,-158 961.32,-198.53 997.49,-266.54 1013.64,-300.84"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1010.47,-302.34 1017.83,-309.96 1016.83,-299.41 1010.47,-302.34"/>
+<path fill="none" stroke="#ff0000" d="M919.37,-66.04C927.85,-68.51 936.24,-71.46 944,-75 979.18,-91.03 1013.92,-119.64 1034.92,-138.71"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1032.81,-141.53 1042.53,-145.76 1037.57,-136.39 1032.81,-141.53"/>
 </g>
 <!-- proc~derivative_vector~2 -->
 <g id="proc~~is_rational~2~~CalledByGraph_node9" class="node">
 <title>proc~derivative_vector~2</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node9"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_surface%derivative_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="909,-47 719,-47 719,-23 909,-23 909,-47"/>
-<text text-anchor="middle" x="814" y="-32.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_vector</text>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node9"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_volume%derivative_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="941,-24 751,-24 751,0 941,0 941,-24"/>
+<text text-anchor="middle" x="846" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_vector~2&#45;&gt;proc~is_rational~2 -->
 <g id="proc~~is_rational~2~~CalledByGraph_edge8" class="edge">
 <title>proc~derivative_vector~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#ff0000" d="M842.57,-47.15C863.75,-57.61 892.57,-74.41 912,-96 968.89,-159.19 1003.41,-256.83 1016.71,-300.09"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1013.42,-301.28 1019.64,-309.86 1020.12,-299.28 1013.42,-301.28"/>
-</g>
-<!-- proc~elevate_degree~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_node10" class="node">
-<title>proc~elevate_degree~2</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node10"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="904,-460 724,-460 724,-436 904,-436 904,-460"/>
-<text text-anchor="middle" x="814" y="-445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
-</a>
-</g>
-</g>
-<!-- proc~elevate_degree~2&#45;&gt;proc~is_rational~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge9" class="edge">
-<title>proc~elevate_degree~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#ff0000" d="M890.59,-435.93C898.03,-433.48 905.29,-430.54 912,-427 951.91,-405.95 987.79,-366.51 1007.38,-342.42"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1010.35,-344.3 1013.83,-334.3 1004.87,-339.95 1010.35,-344.3"/>
-</g>
-<!-- proc~insert_knots~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_node11" class="node">
-<title>proc~insert_knots~2</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node11"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="894.5,-418 733.5,-418 733.5,-394 894.5,-394 894.5,-418"/>
-<text text-anchor="middle" x="814" y="-403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
-</a>
-</g>
-</g>
-<!-- proc~insert_knots~2&#45;&gt;proc~is_rational~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge10" class="edge">
-<title>proc~insert_knots~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#ff0000" d="M883.34,-393.94C893.1,-391.43 902.91,-388.47 912,-385 942.93,-373.19 975.57,-353.71 997.38,-339.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="999.33,-342.43 1005.75,-334 995.48,-336.59 999.33,-342.43"/>
-</g>
-<!-- proc~remove_knots~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_node12" class="node">
-<title>proc~remove_knots~2</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node12"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="900,-376 728,-376 728,-352 900,-352 900,-376"/>
-<text text-anchor="middle" x="814" y="-361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
-</a>
-</g>
-</g>
-<!-- proc~remove_knots~2&#45;&gt;proc~is_rational~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge11" class="edge">
-<title>proc~remove_knots~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#ff0000" d="M874.6,-351.96C899.19,-347 927.85,-341.21 953.4,-336.05"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="954.28,-339.45 963.39,-334.04 952.89,-332.59 954.28,-339.45"/>
+<path fill="none" stroke="#ff0000" d="M924.43,-24.01C931.27,-26.47 937.9,-29.44 944,-33 988.35,-58.92 1024.43,-108.75 1042.48,-137.04"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1039.64,-139.1 1047.9,-145.74 1045.58,-135.4 1039.64,-139.1"/>
 </g>
 <!-- none~derivative2~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_node13" class="node">
+<g id="proc~~is_rational~2~~CalledByGraph_node10" class="node">
 <title>none~derivative2~2</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node13"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~2" xlink:title="nurbs_surface%derivative2">
-<polygon fill="#a7506f" stroke="#a7506f" points="680,-66 523,-66 523,-42 680,-42 680,-66"/>
-<text text-anchor="middle" x="601.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2</text>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node10"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2~2" xlink:title="nurbs_volume%derivative2">
+<polygon fill="#a7506f" stroke="#a7506f" points="712,-118 555,-118 555,-94 712,-94 712,-118"/>
+<text text-anchor="middle" x="633.5" y="-103.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2~2&#45;&gt;proc~derivative2_scalar~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge25" class="edge">
+<g id="proc~~is_rational~2~~CalledByGraph_edge18" class="edge">
 <title>none~derivative2~2&#45;&gt;proc~derivative2_scalar~2</title>
-<path fill="none" stroke="#00ff2e" d="M659.98,-66.17C667.41,-69.68 674.37,-74.19 680,-80 718.73,-120 676.98,-160.28 716,-200 721.75,-205.85 728.6,-210.6 735.97,-214.46"/>
-<polygon fill="#00ff2e" stroke="#00ff2e" points="734.98,-217.86 745.53,-218.87 737.92,-211.5 734.98,-217.86"/>
+<path fill="none" stroke="#00ffff" d="M712.28,-117.82C726.46,-119.98 741.36,-122.24 755.83,-124.45"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="755.36,-127.91 765.78,-125.96 756.42,-120.99 755.36,-127.91"/>
 </g>
 <!-- none~derivative2~2&#45;&gt;proc~derivative2_vector~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge26" class="edge">
+<g id="proc~~is_rational~2~~CalledByGraph_edge19" class="edge">
 <title>none~derivative2~2&#45;&gt;proc~derivative2_vector~2</title>
-<path fill="none" stroke="#00ffb9" d="M655.07,-66.1C663.95,-69.64 672.66,-74.19 680,-80 703.79,-98.83 692.94,-118.28 716,-138 728.66,-148.83 744.59,-157.14 759.86,-163.36"/>
-<polygon fill="#00ffb9" stroke="#00ffb9" points="758.66,-166.64 769.25,-166.96 761.17,-160.11 758.66,-166.64"/>
+<path fill="none" stroke="#003fff" d="M712.28,-102.3C720.62,-101.91 729.2,-101.5 737.8,-101.09"/>
+<polygon fill="#003fff" stroke="#003fff" points="738.06,-104.58 747.88,-100.61 737.73,-97.59 738.06,-104.58"/>
 </g>
 <!-- none~derivative~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_node14" class="node">
+<g id="proc~~is_rational~2~~CalledByGraph_node11" class="node">
 <title>none~derivative~2</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node14"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~2" xlink:title="nurbs_surface%derivative">
-<polygon fill="#a7506f" stroke="#a7506f" points="677,-24 526,-24 526,0 677,0 677,-24"/>
-<text text-anchor="middle" x="601.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative</text>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node11"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative~2" xlink:title="nurbs_volume%derivative">
+<polygon fill="#a7506f" stroke="#a7506f" points="709,-45 558,-45 558,-21 709,-21 709,-45"/>
+<text text-anchor="middle" x="633.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative</text>
 </a>
 </g>
 </g>
 <!-- none~derivative~2&#45;&gt;proc~derivative_scalar~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge27" class="edge">
+<g id="proc~~is_rational~2~~CalledByGraph_edge20" class="edge">
 <title>none~derivative~2&#45;&gt;proc~derivative_scalar~2</title>
-<path fill="none" stroke="#00b9ff" d="M655.36,-24C663.75,-26.57 672.22,-29.56 680,-33 697.36,-40.68 699.96,-45.84 716,-56 739.21,-70.71 765.61,-87.31 785,-99.47"/>
-<polygon fill="#00b9ff" stroke="#00b9ff" points="783.32,-102.54 793.65,-104.89 787.04,-96.61 783.32,-102.54"/>
+<path fill="none" stroke="#7f00ff" d="M709.01,-40.43C719.61,-41.49 730.65,-42.59 741.68,-43.69"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="741.48,-47.19 751.78,-44.7 742.17,-40.22 741.48,-47.19"/>
 </g>
 <!-- none~derivative~2&#45;&gt;proc~derivative_vector~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge28" class="edge">
+<g id="proc~~is_rational~2~~CalledByGraph_edge21" class="edge">
 <title>none~derivative~2&#45;&gt;proc~derivative_vector~2</title>
-<path fill="none" stroke="#002eff" d="M677.01,-20.14C687.23,-21.26 697.87,-22.42 708.5,-23.58"/>
-<polygon fill="#002eff" stroke="#002eff" points="708.35,-27.09 718.68,-24.69 709.11,-20.13 708.35,-27.09"/>
+<path fill="none" stroke="#ff00bf" d="M709.01,-25.57C719.23,-24.55 729.87,-23.49 740.5,-22.43"/>
+<polygon fill="#ff00bf" stroke="#ff00bf" points="741.07,-25.89 750.68,-21.41 740.38,-18.92 741.07,-25.89"/>
 </g>
 <!-- proc~nearest_point2~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_node15" class="node">
+<g id="proc~~is_rational~2~~CalledByGraph_node12" class="node">
 <title>proc~nearest_point2~2</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node15"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_surface%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="487,-229 311,-229 311,-205 487,-205 487,-229"/>
-<text text-anchor="middle" x="399" y="-214.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node12"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_volume%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="519,-118 343,-118 343,-94 519,-94 519,-118"/>
+<text text-anchor="middle" x="431" y="-103.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~2&#45;&gt;proc~cmp_xg~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge12" class="edge">
+<g id="proc~~is_rational~2~~CalledByGraph_edge9" class="edge">
 <title>proc~nearest_point2~2&#45;&gt;proc~cmp_xg~2</title>
-<path fill="none" stroke="#e7ff00" d="M409.18,-204.94C427.69,-181.76 472.06,-131.65 523,-113 588.52,-89.01 624.82,-70.29 680,-113 730.47,-152.06 671.07,-206.68 716,-252 721.32,-257.36 727.61,-261.65 734.4,-265.08"/>
-<polygon fill="#e7ff00" stroke="#e7ff00" points="733.35,-268.45 743.92,-269.25 736.16,-262.03 733.35,-268.45"/>
+<path fill="none" stroke="#7fff00" d="M483.13,-118.07C494.93,-120.93 507.41,-124.02 519,-127 538.96,-132.13 560.82,-138.04 579.98,-143.31"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="579.16,-146.71 589.73,-146 581.02,-139.96 579.16,-146.71"/>
 </g>
 <!-- proc~nearest_point2~2&#45;&gt;proc~create~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge13" class="edge">
+<g id="proc~~is_rational~2~~CalledByGraph_edge10" class="edge">
 <title>proc~nearest_point2~2&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#5cff00" d="M409.13,-229.29C427.53,-252.9 471.73,-303.96 523,-323 594.72,-349.64 683.48,-344.3 743.77,-335.56"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="744.58,-338.98 753.94,-334.02 743.53,-332.06 744.58,-338.98"/>
+<path fill="none" stroke="#00ff3f" d="M502.34,-118.12C508.23,-120.56 513.87,-123.49 519,-127 542.18,-142.9 535.07,-159.18 555,-179 568.78,-192.71 586.54,-205.14 601.58,-214.52"/>
+<polygon fill="#00ff3f" stroke="#00ff3f" points="600.17,-217.76 610.54,-219.95 603.8,-211.77 600.17,-217.76"/>
 </g>
 <!-- proc~nearest_point2~2&#45;&gt;none~derivative2~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge32" class="edge">
+<g id="proc~~is_rational~2~~CalledByGraph_edge22" class="edge">
 <title>proc~nearest_point2~2&#45;&gt;none~derivative2~2</title>
-<path fill="none" stroke="#ff0000" d="M407.67,-204.84C425,-178.34 469.84,-114.94 523,-80 528.82,-76.18 535.25,-72.86 541.85,-70.01"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="543.58,-73.08 551.58,-66.14 541,-66.58 543.58,-73.08"/>
-</g>
-<!-- program~example3_surface -->
-<g id="proc~~is_rational~2~~CalledByGraph_node16" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node16"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="656.5,-600 546.5,-600 546.5,-576 656.5,-576 656.5,-600"/>
-<text text-anchor="middle" x="601.5" y="-585.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
-</a>
+<path fill="none" stroke="#ff0000" d="M519.07,-106C527.65,-106 536.37,-106 544.95,-106"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="544.96,-109.5 554.96,-106 544.96,-102.5 544.96,-109.5"/>
 </g>
-</g>
-<!-- program~example3_surface&#45;&gt;proc~create~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge14" class="edge">
-<title>program~example3_surface&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#5cff00" d="M656.64,-581.91C665.47,-578.69 673.75,-573.94 680,-567 747.45,-492.05 646.65,-416.19 716,-343 722.35,-336.29 730.3,-331.48 738.89,-328.05"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="740.06,-331.35 748.43,-324.85 737.83,-324.71 740.06,-331.35"/>
-</g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge29" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
-<path fill="none" stroke="#5c00ff" d="M656.79,-580.45C665.29,-577.35 673.42,-573.03 680,-567 714.21,-535.65 680.99,-499.46 716,-469 717.51,-467.69 719.09,-466.45 720.71,-465.28"/>
-<polygon fill="#5c00ff" stroke="#5c00ff" points="722.57,-468.24 729.26,-460.03 718.91,-462.28 722.57,-468.24"/>
-</g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge30" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
-<path fill="none" stroke="#e700ff" d="M656.52,-581.29C665.25,-578.11 673.54,-573.55 680,-567 725.13,-521.28 669.71,-471.55 716,-427 718.62,-424.47 721.48,-422.22 724.5,-420.22"/>
-<polygon fill="#e700ff" stroke="#e700ff" points="726.44,-423.14 733.44,-415.19 723.01,-417.04 726.44,-423.14"/>
-</g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge31" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
-<path fill="none" stroke="#ff008b" d="M656.83,-581.58C665.53,-578.38 673.72,-573.73 680,-567 736.25,-506.71 658.22,-443.83 716,-385 717.09,-383.89 718.23,-382.82 719.41,-381.81"/>
-<polygon fill="#ff008b" stroke="#ff008b" points="721.64,-384.52 727.71,-375.84 717.55,-378.84 721.64,-384.52"/>
-</g>
-<!-- program~example_nurbs_surface -->
-<g id="proc~~is_rational~2~~CalledByGraph_node17" class="node">
-<title>program~example_nurbs_surface</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node17"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="671,-558 532,-558 532,-534 671,-534 671,-558"/>
-<text text-anchor="middle" x="601.5" y="-543.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<!-- program~example3_volume -->
+<g id="proc~~is_rational~2~~CalledByGraph_node13" class="node">
+<title>program~example3_volume</title>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node13"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="486,-408 376,-408 376,-384 486,-384 486,-408"/>
+<text text-anchor="middle" x="431" y="-393.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~create~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge15" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#5cff00" d="M668.97,-533.83C673.03,-531.38 676.77,-528.47 680,-525 736.25,-464.71 658.22,-401.83 716,-343 722.43,-336.46 730.38,-331.72 738.94,-328.34"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="740.05,-331.65 748.43,-325.16 737.83,-325.02 740.05,-331.65"/>
+<!-- program~example3_volume&#45;&gt;proc~create~2 -->
+<g id="proc~~is_rational~2~~CalledByGraph_edge11" class="edge">
+<title>program~example3_volume&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#00ff3f" d="M486.24,-388.76C497.64,-385.67 509.18,-381.27 519,-375 567.66,-343.92 604.54,-284.67 621.76,-253.07"/>
+<polygon fill="#00ff3f" stroke="#00ff3f" points="624.87,-254.69 626.47,-244.22 618.69,-251.4 624.87,-254.69"/>
 </g>
-<!-- program~example_ppm1 -->
-<g id="proc~~is_rational~2~~CalledByGraph_node18" class="node">
-<title>program~example_ppm1</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node18"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="648.5,-516 554.5,-516 554.5,-492 648.5,-492 648.5,-516"/>
-<text text-anchor="middle" x="601.5" y="-501.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+<!-- program~example_nurbs_volume -->
+<g id="proc~~is_rational~2~~CalledByGraph_node14" class="node">
+<title>program~example_nurbs_volume</title>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node14"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="500.5,-366 361.5,-366 361.5,-342 500.5,-342 500.5,-366"/>
+<text text-anchor="middle" x="431" y="-351.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~create~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge16" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#5cff00" d="M648.9,-499.7C660.34,-496.58 671.68,-491.43 680,-483 725.13,-437.28 669.71,-387.55 716,-343 722.45,-336.79 730.28,-332.24 738.66,-328.93"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="739.94,-332.19 748.31,-325.69 737.71,-325.55 739.94,-332.19"/>
+<!-- program~example_nurbs_volume&#45;&gt;proc~create~2 -->
+<g id="proc~~is_rational~2~~CalledByGraph_edge12" class="edge">
+<title>program~example_nurbs_volume&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#00ff3f" d="M484.92,-341.97C496.52,-338.31 508.46,-333.7 519,-328 556.8,-307.54 593.45,-273.07 614.46,-251.48"/>
+<polygon fill="#00ff3f" stroke="#00ff3f" points="617.08,-253.8 621.46,-244.16 612.02,-248.96 617.08,-253.8"/>
 </g>
-<!-- program~example_ppm2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_node19" class="node">
-<title>program~example_ppm2</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node19"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="648.5,-474 554.5,-474 554.5,-450 648.5,-450 648.5,-474"/>
-<text text-anchor="middle" x="601.5" y="-459.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+<!-- program~nearest_point_3d -->
+<g id="proc~~is_rational~2~~CalledByGraph_node15" class="node">
+<title>program~nearest_point_3d</title>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node15"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="275.5,-222 172.5,-222 172.5,-198 275.5,-198 275.5,-222"/>
+<text text-anchor="middle" x="224" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~create~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge17" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#5cff00" d="M648.75,-457.01C660.05,-453.89 671.37,-448.91 680,-441 714.21,-409.65 680.99,-373.46 716,-343 722.66,-337.21 730.54,-332.89 738.88,-329.69"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="740.05,-332.99 748.45,-326.54 737.86,-326.34 740.05,-332.99"/>
-</g>
-<!-- program~example_ppm3 -->
-<g id="proc~~is_rational~2~~CalledByGraph_node20" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node20"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="648.5,-432 554.5,-432 554.5,-408 648.5,-408 648.5,-432"/>
-<text text-anchor="middle" x="601.5" y="-417.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
-</a>
-</g>
+<!-- program~nearest_point_3d&#45;&gt;proc~create~2 -->
+<g id="proc~~is_rational~2~~CalledByGraph_edge13" class="edge">
+<title>program~nearest_point_3d&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#00ff3f" d="M236.3,-222.04C255.82,-241.83 298.07,-280.5 343,-295 417.44,-319.02 443.28,-314.61 519,-295 552.37,-286.36 586.37,-265.56 608.35,-250.21"/>
+<polygon fill="#00ff3f" stroke="#00ff3f" points="610.62,-252.89 616.71,-244.23 606.54,-247.2 610.62,-252.89"/>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~create~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge18" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#5cff00" d="M648.71,-409.78C659.63,-405.99 670.78,-400.86 680,-394 702.26,-377.43 692.86,-358.31 716,-343 722.97,-338.39 730.78,-334.77 738.87,-331.93"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="739.94,-335.26 748.45,-328.95 737.86,-328.58 739.94,-335.26"/>
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
+<g id="proc~~is_rational~2~~CalledByGraph_edge24" class="edge">
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
+<path fill="none" stroke="#cbff00" d="M238.47,-197.91C259.35,-179.82 301.47,-145.79 343,-127 347.66,-124.89 352.56,-122.98 357.56,-121.25"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="358.81,-124.52 367.26,-118.13 356.67,-117.86 358.81,-124.52"/>
 </g>
-<!-- program~nearest_point_2d -->
-<g id="proc~~is_rational~2~~CalledByGraph_node21" class="node">
-<title>program~nearest_point_2d</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node21"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="251.5,-249 148.5,-249 148.5,-225 251.5,-225 251.5,-249"/>
-<text text-anchor="middle" x="200" y="-234.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<!-- program~shape_c_3d -->
+<g id="proc~~is_rational~2~~CalledByGraph_node16" class="node">
+<title>program~shape_c_3d</title>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node16"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="469,-286 393,-286 393,-262 469,-262 469,-286"/>
+<text text-anchor="middle" x="431" y="-271.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~create~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge19" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#5cff00" d="M226.96,-249.06C280.75,-273.3 408.86,-327.21 523,-346 591.85,-357.34 610.5,-352.22 680,-346 702.6,-343.98 727.1,-340.06 748.84,-335.97"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="749.79,-339.35 758.94,-334.01 748.46,-332.47 749.79,-339.35"/>
-</g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge34" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
-<path fill="none" stroke="#ffda00" d="M251.73,-231.85C266.79,-230.32 283.81,-228.59 300.78,-226.87"/>
-<polygon fill="#ffda00" stroke="#ffda00" points="301.16,-230.35 310.76,-225.86 300.45,-223.39 301.16,-230.35"/>
+<!-- program~shape_c_3d&#45;&gt;proc~create~2 -->
+<g id="proc~~is_rational~2~~CalledByGraph_edge14" class="edge">
+<title>program~shape_c_3d&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#00ff3f" d="M469.24,-266.2C496.02,-260.59 532.87,-252.87 564.79,-246.18"/>
+<polygon fill="#00ff3f" stroke="#00ff3f" points="565.89,-249.53 574.96,-244.05 564.46,-242.68 565.89,-249.53"/>
 </g>
-<!-- program~nearest_point_2d_bench -->
-<g id="proc~~is_rational~2~~CalledByGraph_node22" class="node">
-<title>program~nearest_point_2d_bench</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node22"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="672.5,-314 530.5,-314 530.5,-290 672.5,-290 672.5,-314"/>
-<text text-anchor="middle" x="601.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+<!-- program~shape_half_ring_3d -->
+<g id="proc~~is_rational~2~~CalledByGraph_node17" class="node">
+<title>program~shape_half_ring_3d</title>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node17"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="488.5,-244 373.5,-244 373.5,-220 488.5,-220 488.5,-244"/>
+<text text-anchor="middle" x="431" y="-229.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~create~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge20" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#5cff00" d="M672.59,-308.66C693.66,-310.66 716.84,-312.86 738.2,-314.89"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="737.9,-318.38 748.19,-315.84 738.56,-311.41 737.9,-318.38"/>
-</g>
-<!-- program~shape_c_2d -->
-<g id="proc~~is_rational~2~~CalledByGraph_node23" class="node">
-<title>program~shape_c_2d</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node23"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="639.5,-272 563.5,-272 563.5,-248 639.5,-248 639.5,-272"/>
-<text text-anchor="middle" x="601.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
-</a>
-</g>
+<!-- program~shape_half_ring_3d&#45;&gt;proc~create~2 -->
+<g id="proc~~is_rational~2~~CalledByGraph_edge15" class="edge">
+<title>program~shape_half_ring_3d&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#00ff3f" d="M488.65,-232C510.14,-232 534.94,-232 557.84,-232"/>
+<polygon fill="#00ff3f" stroke="#00ff3f" points="557.86,-235.5 567.86,-232 557.86,-228.5 557.86,-235.5"/>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~create~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge21" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#5cff00" d="M639.64,-268.46C652.59,-271.83 667.1,-276.09 680,-281 696.72,-287.37 699.19,-292.9 716,-299 724.54,-302.1 733.66,-304.9 742.76,-307.38"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="742.04,-310.81 752.6,-309.96 743.81,-304.04 742.04,-310.81"/>
-</g>
-<!-- program~shape_half_ring_2d -->
-<g id="proc~~is_rational~2~~CalledByGraph_node24" class="node">
-<title>program~shape_half_ring_2d</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node24"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="659,-230 544,-230 544,-206 659,-206 659,-230"/>
-<text text-anchor="middle" x="601.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+<!-- program~shape_hexahedron -->
+<g id="proc~~is_rational~2~~CalledByGraph_node18" class="node">
+<title>program~shape_hexahedron</title>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node18"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="487.5,-202 374.5,-202 374.5,-178 487.5,-178 487.5,-202"/>
+<text text-anchor="middle" x="431" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~create~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge22" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#5cff00" d="M659.1,-227.8C666.56,-230.64 673.77,-234.29 680,-239 704.8,-257.76 690.9,-280.64 716,-299 722.83,-303.99 730.58,-307.92 738.66,-311"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="737.67,-314.36 748.26,-314.25 739.91,-307.73 737.67,-314.36"/>
-</g>
-<!-- program~shape_ring_2d -->
-<g id="proc~~is_rational~2~~CalledByGraph_node25" class="node">
-<title>program~shape_ring_2d</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node25"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="646.5,-188 556.5,-188 556.5,-164 646.5,-164 646.5,-188"/>
-<text text-anchor="middle" x="601.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
-</a>
-</g>
+<!-- program~shape_hexahedron&#45;&gt;proc~create~2 -->
+<g id="proc~~is_rational~2~~CalledByGraph_edge16" class="edge">
+<title>program~shape_hexahedron&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#00ff3f" d="M487.58,-201.64C511.63,-206.68 539.98,-212.62 565.2,-217.9"/>
+<polygon fill="#00ff3f" stroke="#00ff3f" points="564.56,-221.34 575.06,-219.97 565.99,-214.49 564.56,-221.34"/>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~create~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge23" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#5cff00" d="M646.8,-180.38C658.77,-183.45 670.91,-188.56 680,-197 715.24,-229.7 680.25,-266.86 716,-299 722.59,-304.93 730.43,-309.4 738.75,-312.77"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="737.72,-316.12 748.31,-316.12 740.03,-309.51 737.72,-316.12"/>
-</g>
-<!-- program~shape_tetragon -->
-<g id="proc~~is_rational~2~~CalledByGraph_node26" class="node">
-<title>program~shape_tetragon</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node26"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="649.5,-146 553.5,-146 553.5,-122 649.5,-122 649.5,-146"/>
-<text text-anchor="middle" x="601.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<!-- program~shape_ring_3d -->
+<g id="proc~~is_rational~2~~CalledByGraph_node19" class="node">
+<title>program~shape_ring_3d</title>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node19"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="476,-160 386,-160 386,-136 476,-136 476,-160"/>
+<text text-anchor="middle" x="431" y="-145.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~create~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge24" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~create~2</title>
-<path fill="none" stroke="#5cff00" d="M649.74,-138.49C660.9,-141.63 671.9,-146.74 680,-155 726.19,-202.1 669.07,-252.64 716,-299 722.51,-305.43 730.47,-310.19 739,-313.69"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="737.85,-316.99 748.44,-317.01 740.17,-310.39 737.85,-316.99"/>
+<!-- program~shape_ring_3d&#45;&gt;proc~create~2 -->
+<g id="proc~~is_rational~2~~CalledByGraph_edge17" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#00ff3f" d="M476.08,-156.21C490.05,-159.45 505.39,-163.69 519,-169 550.19,-181.16 583.39,-200.42 605.78,-214.44"/>
+<polygon fill="#00ff3f" stroke="#00ff3f" points="604.06,-217.5 614.38,-219.91 607.82,-211.59 604.06,-217.5"/>
 </g>
 <!-- proc~ansatz~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_node27" class="node">
+<g id="proc~~is_rational~2~~CalledByGraph_node20" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node27"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="465,-24 333,-24 333,0 465,0 465,-24"/>
-<text text-anchor="middle" x="399" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node20"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="497,-45 365,-45 365,-21 497,-21 497,-45"/>
+<text text-anchor="middle" x="431" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~derivative~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge33" class="edge">
+<g id="proc~~is_rational~2~~CalledByGraph_edge23" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~derivative~2</title>
-<path fill="none" stroke="#ff6d00" d="M465.1,-12C481.19,-12 498.68,-12 515.56,-12"/>
-<polygon fill="#ff6d00" stroke="#ff6d00" points="515.99,-15.5 525.99,-12 515.99,-8.5 515.99,-15.5"/>
-</g>
-<!-- proc~cmp_area -->
-<g id="proc~~is_rational~2~~CalledByGraph_node28" class="node">
-<title>proc~cmp_area</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node28"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="275,-24 125,-24 125,0 275,0 275,-24"/>
-<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<path fill="none" stroke="#ff9900" d="M497.1,-33C513.19,-33 530.68,-33 547.56,-33"/>
+<polygon fill="#ff9900" stroke="#ff9900" points="547.99,-36.5 557.99,-33 547.99,-29.5 547.99,-36.5"/>
+</g>
+<!-- proc~cmp_volume -->
+<g id="proc~~is_rational~2~~CalledByGraph_node21" class="node">
+<title>proc~cmp_volume</title>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node21"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-45 141,-45 141,-21 307,-21 307,-45"/>
+<text text-anchor="middle" x="224" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge35" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ff0000" d="M275.2,-12C290.76,-12 307.2,-12 322.8,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="322.92,-15.5 332.92,-12 322.92,-8.5 322.92,-15.5"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~is_rational~2~~CalledByGraph_edge25" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ff0000" d="M307.2,-33C322.92,-33 339.3,-33 354.78,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="354.81,-36.5 364.81,-33 354.81,-29.5 354.81,-36.5"/>
 </g>
-<!-- program~compute_area -->
-<g id="proc~~is_rational~2~~CalledByGraph_node29" class="node">
-<title>program~compute_area</title>
-<g id="a_proc~~is_rational~2~~CalledByGraph_node29"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-24 0,-24 0,0 89,0 89,-24"/>
-<text text-anchor="middle" x="44.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<!-- program~compute_volume -->
+<g id="proc~~is_rational~2~~CalledByGraph_node22" class="node">
+<title>program~compute_volume</title>
+<g id="a_proc~~is_rational~2~~CalledByGraph_node22"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-45 0,-45 0,-21 105,-21 105,-45"/>
+<text text-anchor="middle" x="52.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;proc~cmp_area -->
-<g id="proc~~is_rational~2~~CalledByGraph_edge36" class="edge">
-<title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M89.08,-12C97.19,-12 105.92,-12 114.78,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="114.81,-15.5 124.81,-12 114.81,-8.5 114.81,-15.5"/>
+<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
+<g id="proc~~is_rational~2~~CalledByGraph_edge26" class="edge">
+<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
+<path fill="none" stroke="#ff0000" d="M105.28,-33C113.39,-33 121.99,-33 130.69,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="130.93,-36.5 140.93,-33 130.93,-29.5 130.93,-36.5"/>
 </g>
 </g>
 </svg>
@@ -790,7 +667,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/is_rational~3.html b/proc/is_rational~3.html
index 1fe25eaff..c9494f3d1 100644
--- a/proc/is_rational~3.html
+++ b/proc/is_rational~3.html
@@ -83,15 +83,15 @@ <h1>is_rational
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">is_rational</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure function is_rational(this) result(r)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~172"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~171"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -193,409 +193,484 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~is_rational~3~~CalledByGraph Pages: 1 -->
-<svg id="procis_rational3CalledByGraph" width="641pt" height="268pt"
- viewBox="0.00 0.00 641.00 268.27" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~is_rational~3~~CalledByGraph" class="graph" transform="scale(1.68 1.68) rotate(0) translate(4 448)">
+<svg id="procis_rational3CalledByGraph" width="641pt" height="352pt"
+ viewBox="0.00 0.00 641.00 351.74" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~is_rational~3~~CalledByGraph" class="graph" transform="scale(1.73 1.73) rotate(0) translate(4 604)">
 <title>proc~~is_rational~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-448 1076,-448 1076,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-604 1104,-604 1104,4 -4,4"/>
 <!-- proc~is_rational~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node1" class="node">
 <title>proc~is_rational~3</title>
-<polygon fill="none" stroke="black" points="1072,-234 930,-234 930,-210 1072,-210 1072,-234"/>
-<text text-anchor="middle" x="1001" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%is_rational</text>
+<polygon fill="none" stroke="black" points="1100,-334 948,-334 948,-310 1100,-310 1100,-334"/>
+<text text-anchor="middle" x="1024" y="-319.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%is_rational</text>
 </g>
 <!-- proc~basis_scalar~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node2" class="node">
 <title>proc~basis_scalar~3</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node2"><a xlink:href="../proc/basis_scalar~3.html" xlink:title="nurbs_curve%basis_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="876.5,-444 724.5,-444 724.5,-420 876.5,-420 876.5,-444"/>
-<text text-anchor="middle" x="800.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%basis_scalar</text>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node2"><a xlink:href="../proc/basis_scalar~3.html" xlink:title="nurbs_surface%basis_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="895,-544 733,-544 733,-520 895,-520 895,-544"/>
+<text text-anchor="middle" x="814" y="-529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%basis_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_scalar~3&#45;&gt;proc~is_rational~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge1" class="edge">
 <title>proc~basis_scalar~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M876.66,-420.8C882.84,-418.16 888.72,-414.94 894,-411 951.71,-367.9 982.39,-283.56 994.19,-243.77"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="997.59,-244.59 996.96,-234.02 990.86,-242.68 997.59,-244.59"/>
+<path fill="none" stroke="#ff0000" d="M895.17,-520.4C901.14,-517.83 906.84,-514.74 912,-511 971.02,-468.29 1003.84,-383.76 1016.64,-343.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1020.06,-344.64 1019.66,-334.06 1013.37,-342.58 1020.06,-344.64"/>
 </g>
 <!-- proc~basis_vector~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node3" class="node">
 <title>proc~basis_vector~3</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node3"><a xlink:href="../proc/basis_vector~3.html" xlink:title="nurbs_curve%basis_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="877.5,-402 723.5,-402 723.5,-378 877.5,-378 877.5,-402"/>
-<text text-anchor="middle" x="800.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%basis_vector</text>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node3"><a xlink:href="../proc/basis_vector~3.html" xlink:title="nurbs_surface%basis_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="895.5,-502 732.5,-502 732.5,-478 895.5,-478 895.5,-502"/>
+<text text-anchor="middle" x="814" y="-487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%basis_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~basis_vector~3&#45;&gt;proc~is_rational~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge2" class="edge">
 <title>proc~basis_vector~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M876.67,-377.95C882.77,-375.5 888.64,-372.54 894,-369 941.82,-337.35 975.28,-276.25 990.59,-243.68"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="993.95,-244.73 994.92,-234.18 987.58,-241.83 993.95,-244.73"/>
+<path fill="none" stroke="#ff0000" d="M894.22,-477.92C900.47,-475.47 906.48,-472.53 912,-469 961.33,-437.48 996.87,-375.87 1013.12,-343.32"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1016.32,-344.74 1017.53,-334.22 1010.02,-341.69 1016.32,-344.74"/>
 </g>
 <!-- proc~cmp_xg~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node4" class="node">
 <title>proc~cmp_xg~3</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node4"><a xlink:href="../proc/cmp_xg~3.html" xlink:title="nurbs_curve%cmp_Xg">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="662,-108 532,-108 532,-84 662,-84 662,-108"/>
-<text text-anchor="middle" x="597" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_Xg</text>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node4"><a xlink:href="../proc/cmp_xg~3.html" xlink:title="nurbs_surface%cmp_Xg">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="884,-290 744,-290 744,-266 884,-266 884,-290"/>
+<text text-anchor="middle" x="814" y="-275.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_xg~3&#45;&gt;proc~is_rational~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge3" class="edge">
 <title>proc~cmp_xg~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M653.87,-108.05C659.91,-110.51 665.75,-113.46 671,-117 692.52,-131.52 684.9,-149.37 707,-163 708.2,-163.74 843.29,-190.76 929.6,-207.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="929.12,-211.45 939.61,-209.97 930.49,-204.59 929.12,-211.45"/>
+<path fill="none" stroke="#ff0000" d="M871.84,-290.02C897.98,-295.55 929.16,-302.15 956.39,-307.91"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="955.72,-311.35 966.23,-309.99 957.17,-304.5 955.72,-311.35"/>
 </g>
 <!-- proc~create~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node5" class="node">
 <title>proc~create~3</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node5"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_curve%create">
-<polygon fill="#d9534f" stroke="#d9534f" points="861,-234 740,-234 740,-210 861,-210 861,-234"/>
-<text text-anchor="middle" x="800.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%create</text>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node5"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
+<polygon fill="#d9534f" stroke="#d9534f" points="879.5,-334 748.5,-334 748.5,-310 879.5,-310 879.5,-334"/>
+<text text-anchor="middle" x="814" y="-319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
 <!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge4" class="edge">
 <title>proc~create~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M861.06,-222C879.44,-222 899.99,-222 919.54,-222"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="919.65,-225.5 929.65,-222 919.65,-218.5 919.65,-225.5"/>
+<path fill="none" stroke="#ff0000" d="M879.67,-322C898.05,-322 918.36,-322 937.76,-322"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="937.81,-325.5 947.81,-322 937.81,-318.5 937.81,-325.5"/>
 </g>
 <!-- proc~derivative2_scalar~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node6" class="node">
 <title>proc~derivative2_scalar~3</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node6"><a xlink:href="../proc/derivative2_scalar~3.html" xlink:title="nurbs_curve%derivative2_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="893,-154 708,-154 708,-130 893,-130 893,-154"/>
-<text text-anchor="middle" x="800.5" y="-139.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_scalar</text>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node6"><a xlink:href="../proc/derivative2_scalar~3.html" xlink:title="nurbs_surface%derivative2_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="911.5,-243 716.5,-243 716.5,-219 911.5,-219 911.5,-243"/>
+<text text-anchor="middle" x="814" y="-228.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_scalar~3&#45;&gt;proc~is_rational~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge5" class="edge">
 <title>proc~derivative2_scalar~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M851.54,-154.13C865.47,-158.02 880.48,-162.72 894,-168 920.69,-178.43 949.59,-193.42 970.46,-204.96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="969.01,-208.16 979.45,-209.99 972.43,-202.05 969.01,-208.16"/>
+<path fill="none" stroke="#ff0000" d="M870.24,-243.07C884.12,-246.84 898.81,-251.49 912,-257 942.79,-269.87 975.45,-289.85 997.31,-304.27"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="995.44,-307.23 1005.7,-309.88 999.33,-301.41 995.44,-307.23"/>
 </g>
 <!-- proc~derivative2_vector~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node7" class="node">
 <title>proc~derivative2_vector~3</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node7"><a xlink:href="../proc/derivative2_vector~3.html" xlink:title="nurbs_curve%derivative2_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="894,-112 707,-112 707,-88 894,-88 894,-112"/>
-<text text-anchor="middle" x="800.5" y="-97.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_vector</text>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node7"><a xlink:href="../proc/derivative2_vector~3.html" xlink:title="nurbs_surface%derivative2_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="912,-191 716,-191 716,-167 912,-167 912,-191"/>
+<text text-anchor="middle" x="814" y="-176.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_vector~3&#45;&gt;proc~is_rational~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge6" class="edge">
 <title>proc~derivative2_vector~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M873.12,-112.14C880.38,-114.58 887.47,-117.5 894,-121 931.74,-141.24 965.72,-178.58 984.54,-201.75"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="982.02,-204.22 990.98,-209.87 987.51,-199.87 982.02,-204.22"/>
+<path fill="none" stroke="#ff0000" d="M868.35,-191.03C883.13,-195.67 898.73,-201.87 912,-210 952.09,-234.56 988.35,-276.58 1007.87,-301.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1005.2,-303.84 1014.06,-309.65 1010.76,-299.58 1005.2,-303.84"/>
 </g>
 <!-- proc~derivative_scalar~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node8" class="node">
 <title>proc~derivative_scalar~3</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node8"><a xlink:href="../proc/derivative_scalar~3.html" xlink:title="nurbs_curve%derivative_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="889.5,-69 711.5,-69 711.5,-45 889.5,-45 889.5,-69"/>
-<text text-anchor="middle" x="800.5" y="-54.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_scalar</text>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node8"><a xlink:href="../proc/derivative_scalar~3.html" xlink:title="nurbs_surface%derivative_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="908,-129 720,-129 720,-105 908,-105 908,-129"/>
+<text text-anchor="middle" x="814" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_scalar</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_scalar~3&#45;&gt;proc~is_rational~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge7" class="edge">
 <title>proc~derivative_scalar~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M874.27,-69.04C881.23,-71.73 887.94,-75 894,-79 940.78,-109.87 974.48,-168.77 990.16,-200.5"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="987.12,-202.27 994.6,-209.77 993.43,-199.24 987.12,-202.27"/>
+<path fill="none" stroke="#ff0000" d="M858.01,-129.16C876,-135.7 896.32,-145.12 912,-158 961.32,-198.53 997.49,-266.54 1013.64,-300.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1010.47,-302.34 1017.83,-309.96 1016.83,-299.41 1010.47,-302.34"/>
 </g>
 <!-- proc~derivative_vector~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node9" class="node">
 <title>proc~derivative_vector~3</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node9"><a xlink:href="../proc/derivative_vector~3.html" xlink:title="nurbs_curve%derivative_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="890.5,-25 710.5,-25 710.5,-1 890.5,-1 890.5,-25"/>
-<text text-anchor="middle" x="800.5" y="-10.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_vector</text>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node9"><a xlink:href="../proc/derivative_vector~3.html" xlink:title="nurbs_surface%derivative_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="909,-47 719,-47 719,-23 909,-23 909,-47"/>
+<text text-anchor="middle" x="814" y="-32.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative_vector~3&#45;&gt;proc~is_rational~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge8" class="edge">
 <title>proc~derivative_vector~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M874.8,-25.15C881.65,-28.04 888.2,-31.6 894,-36 950.45,-78.76 981.59,-160.9 993.82,-200.12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="990.49,-201.19 996.72,-209.76 997.19,-199.17 990.49,-201.19"/>
+<path fill="none" stroke="#ff0000" d="M842.57,-47.15C863.75,-57.61 892.57,-74.41 912,-96 968.89,-159.19 1003.41,-256.83 1016.71,-300.09"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1013.42,-301.28 1019.64,-309.86 1020.12,-299.28 1013.42,-301.28"/>
 </g>
 <!-- proc~elevate_degree~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node10" class="node">
 <title>proc~elevate_degree~3</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node10"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="885.5,-360 715.5,-360 715.5,-336 885.5,-336 885.5,-360"/>
-<text text-anchor="middle" x="800.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node10"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="904,-460 724,-460 724,-436 904,-436 904,-460"/>
+<text text-anchor="middle" x="814" y="-445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;proc~is_rational~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge9" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M873.19,-335.98C880.43,-333.53 887.5,-330.57 894,-327 932.63,-305.8 966.72,-266.41 985.26,-242.37"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="988.14,-244.36 991.36,-234.27 982.55,-240.15 988.14,-244.36"/>
+<path fill="none" stroke="#ff0000" d="M890.59,-435.93C898.03,-433.48 905.29,-430.54 912,-427 951.91,-405.95 987.79,-366.51 1007.38,-342.42"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1010.35,-344.3 1013.83,-334.3 1004.87,-339.95 1010.35,-344.3"/>
 </g>
 <!-- proc~insert_knots~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node11" class="node">
 <title>proc~insert_knots~3</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node11"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_curve%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="876,-318 725,-318 725,-294 876,-294 876,-318"/>
-<text text-anchor="middle" x="800.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node11"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="894.5,-418 733.5,-418 733.5,-394 894.5,-394 894.5,-418"/>
+<text text-anchor="middle" x="814" y="-403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;proc~is_rational~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge10" class="edge">
 <title>proc~insert_knots~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M866.48,-293.97C875.86,-291.45 885.28,-288.48 894,-285 923.4,-273.27 954.2,-254.07 974.98,-239.94"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="977,-242.8 983.24,-234.24 973.02,-237.04 977,-242.8"/>
+<path fill="none" stroke="#ff0000" d="M883.34,-393.94C893.1,-391.43 902.91,-388.47 912,-385 942.93,-373.19 975.57,-353.71 997.38,-339.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="999.33,-342.43 1005.75,-334 995.48,-336.59 999.33,-342.43"/>
 </g>
 <!-- proc~remove_knots~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node12" class="node">
 <title>proc~remove_knots~3</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node12"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_curve%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="881.5,-276 719.5,-276 719.5,-252 881.5,-252 881.5,-276"/>
-<text text-anchor="middle" x="800.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node12"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="900,-376 728,-376 728,-352 900,-352 900,-376"/>
+<text text-anchor="middle" x="814" y="-361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;proc~is_rational~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge11" class="edge">
 <title>proc~remove_knots~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M858.38,-251.96C881.74,-247.02 908.96,-241.26 933.25,-236.12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="934.05,-239.53 943.11,-234.04 932.6,-232.68 934.05,-239.53"/>
+<path fill="none" stroke="#ff0000" d="M874.6,-351.96C899.19,-347 927.85,-341.21 953.4,-336.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="954.28,-339.45 963.39,-334.04 952.89,-332.59 954.28,-339.45"/>
 </g>
 <!-- none~derivative2~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node13" class="node">
 <title>none~derivative2~3</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node13"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative2~3" xlink:title="nurbs_curve%derivative2">
-<polygon fill="#a7506f" stroke="#a7506f" points="671,-66 523,-66 523,-42 671,-42 671,-66"/>
-<text text-anchor="middle" x="597" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2</text>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node13"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~3" xlink:title="nurbs_surface%derivative2">
+<polygon fill="#a7506f" stroke="#a7506f" points="680,-66 523,-66 523,-42 680,-42 680,-66"/>
+<text text-anchor="middle" x="601.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2~3&#45;&gt;proc~derivative2_scalar~3 -->
-<g id="proc~~is_rational~3~~CalledByGraph_edge20" class="edge">
+<g id="proc~~is_rational~3~~CalledByGraph_edge25" class="edge">
 <title>none~derivative2~3&#45;&gt;proc~derivative2_scalar~3</title>
-<path fill="none" stroke="#00ff2e" d="M653.87,-66.05C659.91,-68.51 665.75,-71.46 671,-75 692.52,-89.52 685.07,-107.1 707,-121 709.78,-122.76 712.69,-124.38 715.7,-125.86"/>
-<polygon fill="#00ff2e" stroke="#00ff2e" points="714.39,-129.11 724.95,-129.91 717.19,-122.69 714.39,-129.11"/>
+<path fill="none" stroke="#00ff2e" d="M659.98,-66.17C667.41,-69.68 674.37,-74.19 680,-80 718.73,-120 676.98,-160.28 716,-200 721.75,-205.85 728.6,-210.6 735.97,-214.46"/>
+<polygon fill="#00ff2e" stroke="#00ff2e" points="734.98,-217.86 745.53,-218.87 737.92,-211.5 734.98,-217.86"/>
 </g>
 <!-- none~derivative2~3&#45;&gt;proc~derivative2_vector~3 -->
-<g id="proc~~is_rational~3~~CalledByGraph_edge21" class="edge">
+<g id="proc~~is_rational~3~~CalledByGraph_edge26" class="edge">
 <title>none~derivative2~3&#45;&gt;proc~derivative2_vector~3</title>
-<path fill="none" stroke="#00ffb9" d="M650.68,-66.03C677.06,-72.05 709.18,-79.38 736.82,-85.69"/>
-<polygon fill="#00ffb9" stroke="#00ffb9" points="736.25,-89.15 746.78,-87.96 737.81,-82.33 736.25,-89.15"/>
+<path fill="none" stroke="#00ffb9" d="M655.07,-66.1C663.95,-69.64 672.66,-74.19 680,-80 703.79,-98.83 692.94,-118.28 716,-138 728.66,-148.83 744.59,-157.14 759.86,-163.36"/>
+<polygon fill="#00ffb9" stroke="#00ffb9" points="758.66,-166.64 769.25,-166.96 761.17,-160.11 758.66,-166.64"/>
 </g>
 <!-- none~derivative~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node14" class="node">
 <title>none~derivative~3</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node14"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative~3" xlink:title="nurbs_curve%derivative">
-<polygon fill="#a7506f" stroke="#a7506f" points="667.5,-24 526.5,-24 526.5,0 667.5,0 667.5,-24"/>
-<text text-anchor="middle" x="597" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative</text>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node14"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~3" xlink:title="nurbs_surface%derivative">
+<polygon fill="#a7506f" stroke="#a7506f" points="677,-24 526,-24 526,0 677,0 677,-24"/>
+<text text-anchor="middle" x="601.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative</text>
 </a>
 </g>
 </g>
 <!-- none~derivative~3&#45;&gt;proc~derivative_scalar~3 -->
-<g id="proc~~is_rational~3~~CalledByGraph_edge22" class="edge">
+<g id="proc~~is_rational~3~~CalledByGraph_edge27" class="edge">
 <title>none~derivative~3&#45;&gt;proc~derivative_scalar~3</title>
-<path fill="none" stroke="#00b9ff" d="M651.73,-24C677.47,-29.75 708.49,-36.68 735.45,-42.7"/>
-<polygon fill="#00b9ff" stroke="#00b9ff" points="735.04,-46.19 745.57,-44.96 736.57,-39.36 735.04,-46.19"/>
+<path fill="none" stroke="#00b9ff" d="M655.36,-24C663.75,-26.57 672.22,-29.56 680,-33 697.36,-40.68 699.96,-45.84 716,-56 739.21,-70.71 765.61,-87.31 785,-99.47"/>
+<polygon fill="#00b9ff" stroke="#00b9ff" points="783.32,-102.54 793.65,-104.89 787.04,-96.61 783.32,-102.54"/>
 </g>
 <!-- none~derivative~3&#45;&gt;proc~derivative_vector~3 -->
-<g id="proc~~is_rational~3~~CalledByGraph_edge23" class="edge">
+<g id="proc~~is_rational~3~~CalledByGraph_edge28" class="edge">
 <title>none~derivative~3&#45;&gt;proc~derivative_vector~3</title>
-<path fill="none" stroke="#002eff" d="M667.63,-12.35C678.17,-12.4 689.21,-12.45 700.23,-12.51"/>
-<polygon fill="#002eff" stroke="#002eff" points="700.31,-16.01 710.32,-12.56 700.34,-9.01 700.31,-16.01"/>
+<path fill="none" stroke="#002eff" d="M677.01,-20.14C687.23,-21.26 697.87,-22.42 708.5,-23.58"/>
+<polygon fill="#002eff" stroke="#002eff" points="708.35,-27.09 718.68,-24.69 709.11,-20.13 708.35,-27.09"/>
 </g>
 <!-- proc~nearest_point2~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node15" class="node">
 <title>proc~nearest_point2~3</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node15"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_curve%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="487,-190 321,-190 321,-166 487,-166 487,-190"/>
-<text text-anchor="middle" x="404" y="-175.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node15"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_surface%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="487,-229 311,-229 311,-205 487,-205 487,-229"/>
+<text text-anchor="middle" x="399" y="-214.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;proc~cmp_xg~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge12" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;proc~cmp_xg~3</title>
-<path fill="none" stroke="#e7ff00" d="M425.31,-165.93C448.37,-152.6 487.43,-131.15 523,-117 528.13,-114.96 533.54,-113.02 538.99,-111.21"/>
-<polygon fill="#e7ff00" stroke="#e7ff00" points="540.34,-114.46 548.81,-108.1 538.22,-107.79 540.34,-114.46"/>
+<path fill="none" stroke="#e7ff00" d="M409.18,-204.94C427.69,-181.76 472.06,-131.65 523,-113 588.52,-89.01 624.82,-70.29 680,-113 730.47,-152.06 671.07,-206.68 716,-252 721.32,-257.36 727.61,-261.65 734.4,-265.08"/>
+<polygon fill="#e7ff00" stroke="#e7ff00" points="733.35,-268.45 743.92,-269.25 736.16,-262.03 733.35,-268.45"/>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;proc~create~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge13" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#5cff00" d="M420.69,-190.07C442.31,-205.87 483.13,-232.75 523,-243 586.7,-259.38 605.44,-248.32 671,-243 690.19,-241.44 710.84,-238.6 729.85,-235.49"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="730.65,-238.91 739.93,-233.8 729.48,-232 730.65,-238.91"/>
+<path fill="none" stroke="#5cff00" d="M409.13,-229.29C427.53,-252.9 471.73,-303.96 523,-323 594.72,-349.64 683.48,-344.3 743.77,-335.56"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="744.58,-338.98 753.94,-334.02 743.53,-332.06 744.58,-338.98"/>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;none~derivative2~3 -->
-<g id="proc~~is_rational~3~~CalledByGraph_edge27" class="edge">
+<g id="proc~~is_rational~3~~CalledByGraph_edge32" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;none~derivative2~3</title>
-<path fill="none" stroke="#ff0000" d="M415.44,-165.92C434.61,-144.48 477.63,-99.72 523,-75 526.48,-73.1 530.16,-71.36 533.92,-69.76"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="535.37,-72.96 543.44,-66.09 532.85,-66.43 535.37,-72.96"/>
+<path fill="none" stroke="#ff0000" d="M407.67,-204.84C425,-178.34 469.84,-114.94 523,-80 528.82,-76.18 535.25,-72.86 541.85,-70.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="543.58,-73.08 551.58,-66.14 541,-66.58 543.58,-73.08"/>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~is_rational~3~~CalledByGraph_node16" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node16"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="647,-394 547,-394 547,-370 647,-370 647,-394"/>
-<text text-anchor="middle" x="597" y="-379.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node16"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="656.5,-600 546.5,-600 546.5,-576 656.5,-576 656.5,-600"/>
+<text text-anchor="middle" x="601.5" y="-585.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~create~3 -->
+<!-- program~example3_surface&#45;&gt;proc~create~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge14" class="edge">
-<title>program~example1_curve&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#5cff00" d="M647.19,-375.11C655.98,-371.98 664.42,-367.48 671,-361 710.08,-322.54 666.84,-280.33 707,-243 713.57,-236.89 721.54,-232.43 730.01,-229.19"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="731.3,-232.45 739.73,-226.04 729.14,-225.79 731.3,-232.45"/>
+<title>program~example3_surface&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#5cff00" d="M656.64,-581.91C665.47,-578.69 673.75,-573.94 680,-567 747.45,-492.05 646.65,-416.19 716,-343 722.35,-336.29 730.3,-331.48 738.89,-328.05"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="740.06,-331.35 748.43,-324.85 737.83,-324.71 740.06,-331.35"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
-<g id="proc~~is_rational~3~~CalledByGraph_edge24" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
-<path fill="none" stroke="#5c00ff" d="M647.03,-373.73C668.43,-370.12 694.1,-365.78 718.22,-361.71"/>
-<polygon fill="#5c00ff" stroke="#5c00ff" points="718.81,-365.16 728.09,-360.05 717.65,-358.26 718.81,-365.16"/>
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="proc~~is_rational~3~~CalledByGraph_edge29" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#5c00ff" d="M656.79,-580.45C665.29,-577.35 673.42,-573.03 680,-567 714.21,-535.65 680.99,-499.46 716,-469 717.51,-467.69 719.09,-466.45 720.71,-465.28"/>
+<polygon fill="#5c00ff" stroke="#5c00ff" points="722.57,-468.24 729.26,-460.03 718.91,-462.28 722.57,-468.24"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
-<g id="proc~~is_rational~3~~CalledByGraph_edge25" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
-<path fill="none" stroke="#e700ff" d="M647.22,-371.34C655.44,-368.59 663.67,-365.18 671,-361 690.12,-350.09 687.58,-337.36 707,-327 710.76,-324.99 714.7,-323.18 718.76,-321.54"/>
-<polygon fill="#e700ff" stroke="#e700ff" points="720.19,-324.74 728.38,-318.01 717.79,-318.17 720.19,-324.74"/>
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
+<g id="proc~~is_rational~3~~CalledByGraph_edge30" class="edge">
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#e700ff" d="M656.52,-581.29C665.25,-578.11 673.54,-573.55 680,-567 725.13,-521.28 669.71,-471.55 716,-427 718.62,-424.47 721.48,-422.22 724.5,-420.22"/>
+<polygon fill="#e700ff" stroke="#e700ff" points="726.44,-423.14 733.44,-415.19 723.01,-417.04 726.44,-423.14"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
-<g id="proc~~is_rational~3~~CalledByGraph_edge26" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
-<path fill="none" stroke="#ff008b" d="M647.23,-374.05C655.81,-371.01 664.17,-366.81 671,-361 699.48,-336.8 677.84,-308.38 707,-285 708.77,-283.58 710.63,-282.25 712.54,-281"/>
-<polygon fill="#ff008b" stroke="#ff008b" points="714.3,-284.03 721.32,-276.09 710.88,-277.92 714.3,-284.03"/>
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
+<g id="proc~~is_rational~3~~CalledByGraph_edge31" class="edge">
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#ff008b" d="M656.83,-581.58C665.53,-578.38 673.72,-573.73 680,-567 736.25,-506.71 658.22,-443.83 716,-385 717.09,-383.89 718.23,-382.82 719.41,-381.81"/>
+<polygon fill="#ff008b" stroke="#ff008b" points="721.64,-384.52 727.71,-375.84 717.55,-378.84 721.64,-384.52"/>
 </g>
-<!-- program~example_nurbs_curve -->
+<!-- program~example_nurbs_surface -->
 <g id="proc~~is_rational~3~~CalledByGraph_node17" class="node">
-<title>program~example_nurbs_curve</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node17"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="661.5,-352 532.5,-352 532.5,-328 661.5,-328 661.5,-352"/>
-<text text-anchor="middle" x="597" y="-337.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<title>program~example_nurbs_surface</title>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node17"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="671,-558 532,-558 532,-534 671,-534 671,-558"/>
+<text text-anchor="middle" x="601.5" y="-543.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~create~3 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~create~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge15" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#5cff00" d="M647.93,-327.99C656.25,-324.44 664.34,-319.87 671,-314 697.56,-290.62 679.1,-264.76 707,-243 713.89,-237.63 721.89,-233.58 730.25,-230.54"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="731.33,-233.87 739.81,-227.52 729.22,-227.2 731.33,-233.87"/>
+<title>program~example_nurbs_surface&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#5cff00" d="M668.97,-533.83C673.03,-531.38 676.77,-528.47 680,-525 736.25,-464.71 658.22,-401.83 716,-343 722.43,-336.46 730.38,-331.72 738.94,-328.34"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="740.05,-331.65 748.43,-325.16 737.83,-325.02 740.05,-331.65"/>
 </g>
-<!-- program~nearest_point_1d -->
+<!-- program~example_ppm1 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node18" class="node">
-<title>program~nearest_point_1d</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node18"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="261.5,-210 158.5,-210 158.5,-186 261.5,-186 261.5,-210"/>
-<text text-anchor="middle" x="210" y="-195.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<title>program~example_ppm1</title>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node18"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="648.5,-516 554.5,-516 554.5,-492 648.5,-492 648.5,-516"/>
+<text text-anchor="middle" x="601.5" y="-501.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~create~3 -->
+<!-- program~example_ppm1&#45;&gt;proc~create~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge16" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#5cff00" d="M242.06,-210.02C316.78,-237.26 512.14,-298.5 671,-261 688.41,-256.89 690.16,-249.02 707,-243 714.3,-240.39 722.05,-238.03 729.84,-235.91"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="730.88,-239.26 739.68,-233.36 729.12,-232.48 730.88,-239.26"/>
-</g>
-<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2~3 -->
-<g id="proc~~is_rational~3~~CalledByGraph_edge29" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2~3</title>
-<path fill="none" stroke="#aaff00" d="M261.7,-192.72C276.69,-191.16 293.6,-189.4 310.38,-187.65"/>
-<polygon fill="#aaff00" stroke="#aaff00" points="311.2,-191.08 320.79,-186.56 310.48,-184.12 311.2,-191.08"/>
+<title>program~example_ppm1&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#5cff00" d="M648.9,-499.7C660.34,-496.58 671.68,-491.43 680,-483 725.13,-437.28 669.71,-387.55 716,-343 722.45,-336.79 730.28,-332.24 738.66,-328.93"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="739.94,-332.19 748.31,-325.69 737.71,-325.55 739.94,-332.19"/>
 </g>
-<!-- program~shape_c_1d -->
+<!-- program~example_ppm2 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node19" class="node">
-<title>program~shape_c_1d</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node19"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="635,-234 559,-234 559,-210 635,-210 635,-234"/>
-<text text-anchor="middle" x="597" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<title>program~example_ppm2</title>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node19"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="648.5,-474 554.5,-474 554.5,-450 648.5,-450 648.5,-474"/>
+<text text-anchor="middle" x="601.5" y="-459.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~create~3 -->
+<!-- program~example_ppm2&#45;&gt;proc~create~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge17" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#5cff00" d="M635.43,-222C661.82,-222 697.97,-222 729.61,-222"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="729.71,-225.5 739.71,-222 729.71,-218.5 729.71,-225.5"/>
+<title>program~example_ppm2&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#5cff00" d="M648.75,-457.01C660.05,-453.89 671.37,-448.91 680,-441 714.21,-409.65 680.99,-373.46 716,-343 722.66,-337.21 730.54,-332.89 738.88,-329.69"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="740.05,-332.99 748.45,-326.54 737.86,-326.34 740.05,-332.99"/>
 </g>
-<!-- program~shape_circle -->
+<!-- program~example_ppm3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_node20" class="node">
-<title>program~shape_circle</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node20"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="636.5,-192 557.5,-192 557.5,-168 636.5,-168 636.5,-192"/>
-<text text-anchor="middle" x="597" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<title>program~example_ppm3</title>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node20"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="648.5,-432 554.5,-432 554.5,-408 648.5,-408 648.5,-432"/>
+<text text-anchor="middle" x="601.5" y="-417.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~create~3 -->
+<!-- program~example_ppm3&#45;&gt;proc~create~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge18" class="edge">
-<title>program~shape_circle&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#5cff00" d="M636.85,-188.1C663.68,-193.69 700.07,-201.28 731.63,-207.85"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="731.19,-211.34 741.69,-209.95 732.62,-204.48 731.19,-211.34"/>
+<title>program~example_ppm3&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#5cff00" d="M648.71,-409.78C659.63,-405.99 670.78,-400.86 680,-394 702.26,-377.43 692.86,-358.31 716,-343 722.97,-338.39 730.78,-334.77 738.87,-331.93"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="739.94,-335.26 748.45,-328.95 737.86,-328.58 739.94,-335.26"/>
 </g>
-<!-- program~shape_half_circle -->
+<!-- program~nearest_point_2d -->
 <g id="proc~~is_rational~3~~CalledByGraph_node21" class="node">
-<title>program~shape_half_circle</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node21"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="649,-150 545,-150 545,-126 649,-126 649,-150"/>
-<text text-anchor="middle" x="597" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<title>program~nearest_point_2d</title>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node21"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="251.5,-249 148.5,-249 148.5,-225 251.5,-225 251.5,-249"/>
+<text text-anchor="middle" x="200" y="-234.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~create~3 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~create~3 -->
 <g id="proc~~is_rational~3~~CalledByGraph_edge19" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#5cff00" d="M649.3,-149.07C656.85,-151.73 664.32,-155 671,-159 690.68,-170.79 687.28,-184.27 707,-196 714.21,-200.29 722.16,-203.9 730.28,-206.93"/>
-<polygon fill="#5cff00" stroke="#5cff00" points="729.27,-210.28 739.86,-210.22 731.54,-203.66 729.27,-210.28"/>
+<title>program~nearest_point_2d&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#5cff00" d="M226.96,-249.06C280.75,-273.3 408.86,-327.21 523,-346 591.85,-357.34 610.5,-352.22 680,-346 702.6,-343.98 727.1,-340.06 748.84,-335.97"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="749.79,-339.35 758.94,-334.01 748.46,-332.47 749.79,-339.35"/>
 </g>
-<!-- proc~ansatz~3 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
+<g id="proc~~is_rational~3~~CalledByGraph_edge34" class="edge">
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
+<path fill="none" stroke="#ffda00" d="M251.73,-231.85C266.79,-230.32 283.81,-228.59 300.78,-226.87"/>
+<polygon fill="#ffda00" stroke="#ffda00" points="301.16,-230.35 310.76,-225.86 300.45,-223.39 301.16,-230.35"/>
+</g>
+<!-- program~nearest_point_2d_bench -->
 <g id="proc~~is_rational~3~~CalledByGraph_node22" class="node">
-<title>proc~ansatz~3</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node22"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="465,-24 343,-24 343,0 465,0 465,-24"/>
-<text text-anchor="middle" x="404" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<title>program~nearest_point_2d_bench</title>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node22"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="672.5,-314 530.5,-314 530.5,-290 672.5,-290 672.5,-314"/>
+<text text-anchor="middle" x="601.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;none~derivative~3 -->
-<g id="proc~~is_rational~3~~CalledByGraph_edge28" class="edge">
-<title>proc~ansatz~3&#45;&gt;none~derivative~3</title>
-<path fill="none" stroke="#ffaa00" d="M465.17,-12C481.44,-12 499.31,-12 516.46,-12"/>
-<polygon fill="#ffaa00" stroke="#ffaa00" points="516.46,-15.5 526.46,-12 516.46,-8.5 516.46,-15.5"/>
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~create~3 -->
+<g id="proc~~is_rational~3~~CalledByGraph_edge20" class="edge">
+<title>program~nearest_point_2d_bench&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#5cff00" d="M672.59,-308.66C693.66,-310.66 716.84,-312.86 738.2,-314.89"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="737.9,-318.38 748.19,-315.84 738.56,-311.41 737.9,-318.38"/>
 </g>
-<!-- proc~cmp_length -->
+<!-- program~shape_c_2d -->
 <g id="proc~~is_rational~3~~CalledByGraph_node23" class="node">
-<title>proc~cmp_length</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node23"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="285,-24 135,-24 135,0 285,0 285,-24"/>
-<text text-anchor="middle" x="210" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<title>program~shape_c_2d</title>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node23"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="639.5,-272 563.5,-272 563.5,-248 639.5,-248 639.5,-272"/>
+<text text-anchor="middle" x="601.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="proc~~is_rational~3~~CalledByGraph_edge30" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#ff0000" d="M285.23,-12C300.9,-12 317.38,-12 332.89,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="332.93,-15.5 342.93,-12 332.93,-8.5 332.93,-15.5"/>
+<!-- program~shape_c_2d&#45;&gt;proc~create~3 -->
+<g id="proc~~is_rational~3~~CalledByGraph_edge21" class="edge">
+<title>program~shape_c_2d&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#5cff00" d="M639.64,-268.46C652.59,-271.83 667.1,-276.09 680,-281 696.72,-287.37 699.19,-292.9 716,-299 724.54,-302.1 733.66,-304.9 742.76,-307.38"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="742.04,-310.81 752.6,-309.96 743.81,-304.04 742.04,-310.81"/>
 </g>
-<!-- program~compute_length -->
+<!-- program~shape_half_ring_2d -->
 <g id="proc~~is_rational~3~~CalledByGraph_node24" class="node">
-<title>program~compute_length</title>
-<g id="a_proc~~is_rational~3~~CalledByGraph_node24"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-24 0,-24 0,0 99,0 99,-24"/>
-<text text-anchor="middle" x="49.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<title>program~shape_half_ring_2d</title>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node24"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="659,-230 544,-230 544,-206 659,-206 659,-230"/>
+<text text-anchor="middle" x="601.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;proc~cmp_length -->
-<g id="proc~~is_rational~3~~CalledByGraph_edge31" class="edge">
-<title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#ff0000" d="M99.35,-12C107.46,-12 116.06,-12 124.75,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="124.96,-15.5 134.96,-12 124.96,-8.5 124.96,-15.5"/>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~create~3 -->
+<g id="proc~~is_rational~3~~CalledByGraph_edge22" class="edge">
+<title>program~shape_half_ring_2d&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#5cff00" d="M659.1,-227.8C666.56,-230.64 673.77,-234.29 680,-239 704.8,-257.76 690.9,-280.64 716,-299 722.83,-303.99 730.58,-307.92 738.66,-311"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="737.67,-314.36 748.26,-314.25 739.91,-307.73 737.67,-314.36"/>
+</g>
+<!-- program~shape_ring_2d -->
+<g id="proc~~is_rational~3~~CalledByGraph_node25" class="node">
+<title>program~shape_ring_2d</title>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node25"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="646.5,-188 556.5,-188 556.5,-164 646.5,-164 646.5,-188"/>
+<text text-anchor="middle" x="601.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_ring_2d&#45;&gt;proc~create~3 -->
+<g id="proc~~is_rational~3~~CalledByGraph_edge23" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#5cff00" d="M646.8,-180.38C658.77,-183.45 670.91,-188.56 680,-197 715.24,-229.7 680.25,-266.86 716,-299 722.59,-304.93 730.43,-309.4 738.75,-312.77"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="737.72,-316.12 748.31,-316.12 740.03,-309.51 737.72,-316.12"/>
+</g>
+<!-- program~shape_tetragon -->
+<g id="proc~~is_rational~3~~CalledByGraph_node26" class="node">
+<title>program~shape_tetragon</title>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node26"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="649.5,-146 553.5,-146 553.5,-122 649.5,-122 649.5,-146"/>
+<text text-anchor="middle" x="601.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+</a>
+</g>
+</g>
+<!-- program~shape_tetragon&#45;&gt;proc~create~3 -->
+<g id="proc~~is_rational~3~~CalledByGraph_edge24" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~create~3</title>
+<path fill="none" stroke="#5cff00" d="M649.74,-138.49C660.9,-141.63 671.9,-146.74 680,-155 726.19,-202.1 669.07,-252.64 716,-299 722.51,-305.43 730.47,-310.19 739,-313.69"/>
+<polygon fill="#5cff00" stroke="#5cff00" points="737.85,-316.99 748.44,-317.01 740.17,-310.39 737.85,-316.99"/>
+</g>
+<!-- proc~ansatz~3 -->
+<g id="proc~~is_rational~3~~CalledByGraph_node27" class="node">
+<title>proc~ansatz~3</title>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node27"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="465,-24 333,-24 333,0 465,0 465,-24"/>
+<text text-anchor="middle" x="399" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+</a>
+</g>
+</g>
+<!-- proc~ansatz~3&#45;&gt;none~derivative~3 -->
+<g id="proc~~is_rational~3~~CalledByGraph_edge33" class="edge">
+<title>proc~ansatz~3&#45;&gt;none~derivative~3</title>
+<path fill="none" stroke="#ff6d00" d="M465.1,-12C481.19,-12 498.68,-12 515.56,-12"/>
+<polygon fill="#ff6d00" stroke="#ff6d00" points="515.99,-15.5 525.99,-12 515.99,-8.5 515.99,-15.5"/>
+</g>
+<!-- proc~cmp_area -->
+<g id="proc~~is_rational~3~~CalledByGraph_node28" class="node">
+<title>proc~cmp_area</title>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node28"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
+<polygon fill="#d9534f" stroke="#d9534f" points="275,-24 125,-24 125,0 275,0 275,-24"/>
+<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+</a>
+</g>
+</g>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~is_rational~3~~CalledByGraph_edge35" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#ff0000" d="M275.2,-12C290.76,-12 307.2,-12 322.8,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="322.92,-15.5 332.92,-12 322.92,-8.5 322.92,-15.5"/>
+</g>
+<!-- program~compute_area -->
+<g id="proc~~is_rational~3~~CalledByGraph_node29" class="node">
+<title>program~compute_area</title>
+<g id="a_proc~~is_rational~3~~CalledByGraph_node29"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-24 0,-24 0,0 89,0 89,-24"/>
+<text text-anchor="middle" x="44.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+</a>
+</g>
+</g>
+<!-- program~compute_area&#45;&gt;proc~cmp_area -->
+<g id="proc~~is_rational~3~~CalledByGraph_edge36" class="edge">
+<title>program~compute_area&#45;&gt;proc~cmp_area</title>
+<path fill="none" stroke="#ff0000" d="M89.08,-12C97.19,-12 105.92,-12 114.78,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="114.81,-15.5 124.81,-12 114.81,-8.5 114.81,-15.5"/>
 </g>
 </g>
 </svg>
@@ -715,7 +790,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/isinf.html b/proc/isinf.html
index 1c2e22b6b..d296654eb 100644
--- a/proc/isinf.html
+++ b/proc/isinf.html
@@ -210,7 +210,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/isnan.html b/proc/isnan.html
index 615ab2d00..cbc3962b1 100644
--- a/proc/isnan.html
+++ b/proc/isnan.html
@@ -210,7 +210,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/kron.html b/proc/kron.html
index 5e02ab83b..73d23429b 100644
--- a/proc/kron.html
+++ b/proc/kron.html
@@ -781,9 +781,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~ansatz -->
 <g id="proc~~kron~~CalledByGraph_node39" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~kron~~CalledByGraph_node39"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-129 343,-129 343,-105 475,-105 475,-129"/>
-<text text-anchor="middle" x="409" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~kron~~CalledByGraph_node39"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="470,-129 348,-129 348,-105 470,-105 470,-129"/>
+<text text-anchor="middle" x="409" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
@@ -796,9 +796,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~ansatz~2 -->
 <g id="proc~~kron~~CalledByGraph_node40" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~kron~~CalledByGraph_node40"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
+<g id="a_proc~~kron~~CalledByGraph_node40"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="475,-87 343,-87 343,-63 475,-63 475,-87"/>
-<text text-anchor="middle" x="409" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<text text-anchor="middle" x="409" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
@@ -811,9 +811,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~ansatz~3 -->
 <g id="proc~~kron~~CalledByGraph_node41" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~kron~~CalledByGraph_node41"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="470,-45 348,-45 348,-21 470,-21 470,-45"/>
-<text text-anchor="middle" x="409" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~kron~~CalledByGraph_node41"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-45 343,-45 343,-21 475,-21 475,-45"/>
+<text text-anchor="middle" x="409" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
@@ -827,91 +827,91 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~kron~~CalledByGraph_node42" class="node">
 <title>proc~cmp_area</title>
 <g id="a_proc~~kron~~CalledByGraph_node42"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-87 149,-87 149,-63 299,-63 299,-87"/>
-<text text-anchor="middle" x="224" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-45 149,-45 149,-21 299,-21 299,-45"/>
+<text text-anchor="middle" x="224" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~kron~~CalledByGraph_edge43" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#00ff00" d="M299.17,-75C310.24,-75 321.67,-75 332.77,-75"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="332.85,-78.5 342.85,-75 332.85,-71.5 332.85,-78.5"/>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~kron~~CalledByGraph_edge44" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#0000ff" d="M299.17,-33C310.24,-33 321.67,-33 332.77,-33"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="332.85,-36.5 342.85,-33 332.85,-29.5 332.85,-36.5"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="proc~~kron~~CalledByGraph_node43" class="node">
 <title>proc~cmp_length</title>
 <g id="a_proc~~kron~~CalledByGraph_node43"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-45 149,-45 149,-21 299,-21 299,-45"/>
-<text text-anchor="middle" x="224" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-129 149,-129 149,-105 299,-105 299,-129"/>
+<text text-anchor="middle" x="224" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="proc~~kron~~CalledByGraph_edge44" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#0000ff" d="M299.17,-33C311.79,-33 324.86,-33 337.38,-33"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="337.75,-36.5 347.75,-33 337.75,-29.5 337.75,-36.5"/>
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
+<g id="proc~~kron~~CalledByGraph_edge42" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M299.17,-117C311.79,-117 324.86,-117 337.38,-117"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="337.75,-120.5 347.75,-117 337.75,-113.5 337.75,-120.5"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="proc~~kron~~CalledByGraph_node44" class="node">
 <title>proc~cmp_volume</title>
 <g id="a_proc~~kron~~CalledByGraph_node44"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-129 141,-129 141,-105 307,-105 307,-129"/>
-<text text-anchor="middle" x="224" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-87 141,-87 141,-63 307,-63 307,-87"/>
+<text text-anchor="middle" x="224" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~kron~~CalledByGraph_edge42" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.13,-117C315.64,-117 324.26,-117 332.7,-117"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="332.87,-120.5 342.87,-117 332.87,-113.5 332.87,-120.5"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~kron~~CalledByGraph_edge43" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#00ff00" d="M307.13,-75C315.64,-75 324.26,-75 332.7,-75"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="332.87,-78.5 342.87,-75 332.87,-71.5 332.87,-78.5"/>
 </g>
 <!-- program~compute_area -->
 <g id="proc~~kron~~CalledByGraph_node45" class="node">
 <title>program~compute_area</title>
 <g id="a_proc~~kron~~CalledByGraph_node45"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-87 8,-87 8,-63 97,-63 97,-87"/>
-<text text-anchor="middle" x="52.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-45 8,-45 8,-21 97,-21 97,-45"/>
+<text text-anchor="middle" x="52.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
 <!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="proc~~kron~~CalledByGraph_edge45" class="edge">
 <title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M97.15,-75C109.86,-75 124.19,-75 138.52,-75"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="138.92,-78.5 148.92,-75 138.92,-71.5 138.92,-78.5"/>
+<path fill="none" stroke="#ff0000" d="M97.15,-33C109.86,-33 124.19,-33 138.52,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="138.92,-36.5 148.92,-33 138.92,-29.5 138.92,-36.5"/>
 </g>
 <!-- program~compute_length -->
 <g id="proc~~kron~~CalledByGraph_node46" class="node">
 <title>program~compute_length</title>
 <g id="a_proc~~kron~~CalledByGraph_node46"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-45 3,-45 3,-21 102,-21 102,-45"/>
-<text text-anchor="middle" x="52.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-129 3,-129 3,-105 102,-105 102,-129"/>
+<text text-anchor="middle" x="52.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="proc~~kron~~CalledByGraph_edge46" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#00ff00" d="M102.07,-33C113.57,-33 126.17,-33 138.75,-33"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="138.82,-36.5 148.82,-33 138.82,-29.5 138.82,-36.5"/>
+<path fill="none" stroke="#00ff00" d="M102.07,-117C113.57,-117 126.17,-117 138.75,-117"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="138.82,-120.5 148.82,-117 138.82,-113.5 138.82,-120.5"/>
 </g>
 <!-- program~compute_volume -->
 <g id="proc~~kron~~CalledByGraph_node47" class="node">
 <title>program~compute_volume</title>
 <g id="a_proc~~kron~~CalledByGraph_node47"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-129 0,-129 0,-105 105,-105 105,-129"/>
-<text text-anchor="middle" x="52.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-87 0,-87 0,-63 105,-63 105,-87"/>
+<text text-anchor="middle" x="52.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
 <!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="proc~~kron~~CalledByGraph_edge47" class="edge">
 <title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#0000ff" d="M105.28,-117C113.39,-117 121.99,-117 130.69,-117"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="130.93,-120.5 140.93,-117 130.93,-113.5 130.93,-120.5"/>
+<path fill="none" stroke="#0000ff" d="M105.28,-75C113.39,-75 121.99,-75 130.69,-75"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="130.93,-78.5 140.93,-75 130.93,-71.5 130.93,-78.5"/>
 </g>
 </g>
 </svg>
@@ -1031,7 +1031,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/modify_wc.html b/proc/modify_wc.html
index 6382b74a5..d627dcf49 100644
--- a/proc/modify_wc.html
+++ b/proc/modify_wc.html
@@ -83,15 +83,15 @@ <h1>modify_Wc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">modify_Wc</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine modify_Wc(this, W, num)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
         <tr>
             <td>
               <span class="anchor" id="variable-this~28"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -216,379 +216,373 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~modify_wc~~CallsGraph Pages: 1 -->
-<svg id="procmodify_wcCallsGraph" width="641pt" height="227pt"
- viewBox="0.00 0.00 641.00 226.53" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~modify_wc~~CallsGraph" class="graph" transform="scale(2 2) rotate(0) translate(4 448)">
+<svg id="procmodify_wcCallsGraph" width="641pt" height="257pt"
+ viewBox="0.00 0.00 641.00 257.23" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~modify_wc~~CallsGraph" class="graph" transform="scale(1.92 1.92) rotate(0) translate(4 490)">
 <title>proc~~modify_wc~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-448 1275,-448 1275,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-490 1227,-490 1227,4 -4,4"/>
 <!-- proc~modify_wc -->
 <g id="proc~~modify_wc~~CallsGraph_node1" class="node">
 <title>proc~modify_wc</title>
-<polygon fill="none" stroke="black" points="156,-276 0,-276 0,-252 156,-252 156,-276"/>
-<text text-anchor="middle" x="78" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%modify_Wc</text>
+<polygon fill="none" stroke="black" points="146,-318 0,-318 0,-294 146,-294 146,-318"/>
+<text text-anchor="middle" x="73" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%modify_Wc</text>
 </g>
 <!-- none~get_knot -->
 <g id="proc~~modify_wc~~CallsGraph_node2" class="node">
 <title>none~get_knot</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot" xlink:title="nurbs_volume%get_knot">
-<polygon fill="#a7506f" stroke="#a7506f" points="335,-402 192,-402 192,-378 335,-378 335,-402"/>
-<text text-anchor="middle" x="263.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot</text>
+<g id="a_proc~~modify_wc~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_knot" xlink:title="nurbs_curve%get_knot">
+<polygon fill="#a7506f" stroke="#a7506f" points="315,-444 182,-444 182,-420 315,-420 315,-444"/>
+<text text-anchor="middle" x="248.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~get_knot -->
 <g id="proc~~modify_wc~~CallsGraph_edge1" class="edge">
 <title>proc~modify_wc&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0000" d="M96.59,-276.08C129.07,-298.38 198.55,-346.09 236.48,-372.13"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="234.73,-375.18 244.96,-377.96 238.7,-369.41 234.73,-375.18"/>
+<path fill="none" stroke="#ff0000" d="M90.64,-318.08C121.21,-340.28 186.48,-387.69 222.44,-413.8"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="220.77,-416.91 230.91,-419.96 224.88,-411.25 220.77,-416.91"/>
 </g>
 <!-- none~get_wc -->
 <g id="proc~~modify_wc~~CallsGraph_node3" class="node">
 <title>none~get_wc</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node3"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_wc" xlink:title="nurbs_volume%get_Wc">
-<polygon fill="#a7506f" stroke="#a7506f" points="331.5,-318 195.5,-318 195.5,-294 331.5,-294 331.5,-318"/>
-<text text-anchor="middle" x="263.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wc</text>
+<g id="a_proc~~modify_wc~~CallsGraph_node3"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_wc" xlink:title="nurbs_curve%get_Wc">
+<polygon fill="#a7506f" stroke="#a7506f" points="312,-360 185,-360 185,-336 312,-336 312,-360"/>
+<text text-anchor="middle" x="248.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~get_wc -->
 <g id="proc~~modify_wc~~CallsGraph_edge2" class="edge">
 <title>proc~modify_wc&#45;&gt;none~get_wc</title>
-<path fill="none" stroke="#ff0000" d="M131.58,-276.04C152.89,-280.91 177.67,-286.58 199.9,-291.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="199.38,-295.14 209.91,-293.96 200.94,-288.32 199.38,-295.14"/>
+<path fill="none" stroke="#ff0000" d="M123.72,-318.04C143.77,-322.89 167.08,-328.53 188.02,-333.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="187.23,-337.01 197.77,-335.96 188.88,-330.21 187.23,-337.01"/>
 </g>
 <!-- none~get_xc -->
 <g id="proc~~modify_wc~~CallsGraph_node4" class="node">
 <title>none~get_xc</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_xc" xlink:title="nurbs_volume%get_Xc">
-<polygon fill="#a7506f" stroke="#a7506f" points="330,-255 197,-255 197,-231 330,-231 330,-255"/>
-<text text-anchor="middle" x="263.5" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc</text>
+<g id="a_proc~~modify_wc~~CallsGraph_node4"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_xc" xlink:title="nurbs_curve%get_Xc">
+<polygon fill="#a7506f" stroke="#a7506f" points="310.5,-297 186.5,-297 186.5,-273 310.5,-273 310.5,-297"/>
+<text text-anchor="middle" x="248.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~get_xc -->
 <g id="proc~~modify_wc~~CallsGraph_edge3" class="edge">
 <title>proc~modify_wc&#45;&gt;none~get_xc</title>
-<path fill="none" stroke="#ff0000" d="M156.02,-255.19C166.17,-254.02 176.57,-252.83 186.7,-251.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="187.19,-255.14 196.73,-250.53 186.39,-248.19 187.19,-255.14"/>
+<path fill="none" stroke="#ff0000" d="M146.07,-297.28C156.02,-296.07 166.24,-294.84 176.18,-293.63"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="176.9,-297.07 186.41,-292.39 176.06,-290.12 176.9,-297.07"/>
 </g>
 <!-- none~set -->
 <g id="proc~~modify_wc~~CallsGraph_node5" class="node">
 <title>none~set</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node5"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="320,-108 207,-108 207,-84 320,-84 320,-108"/>
-<text text-anchor="middle" x="263.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<g id="a_proc~~modify_wc~~CallsGraph_node5"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="300,-129 197,-129 197,-105 300,-105 300,-129"/>
+<text text-anchor="middle" x="248.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~set -->
 <g id="proc~~modify_wc~~CallsGraph_edge4" class="edge">
 <title>proc~modify_wc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M92.2,-251.92C123.65,-223.12 203.26,-150.24 241.44,-115.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="243.92,-117.76 248.93,-108.43 239.19,-112.6 243.92,-117.76"/>
+<path fill="none" stroke="#ff0000" d="M85.12,-293.89C114.3,-262.1 193.33,-176.01 229.27,-136.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="232.07,-138.99 236.25,-129.25 226.91,-134.25 232.07,-138.99"/>
 </g>
 <!-- proc~get_knot_all -->
 <g id="proc~~modify_wc~~CallsGraph_node6" class="node">
 <title>proc~get_knot_all</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node6"><a xlink:href="../proc/get_knot_all.html" xlink:title="nurbs_volume%get_knot_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="532,-444 371,-444 371,-420 532,-420 532,-444"/>
-<text text-anchor="middle" x="451.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot_all</text>
+<g id="a_proc~~modify_wc~~CallsGraph_node6"><a xlink:href="../proc/get_knot_all.html" xlink:title="nurbs_curve%get_knot_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="502,-486 351,-486 351,-462 502,-462 502,-486"/>
+<text text-anchor="middle" x="426.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot&#45;&gt;proc~get_knot_all -->
 <g id="proc~~modify_wc~~CallsGraph_edge5" class="edge">
 <title>none~get_knot&#45;&gt;proc~get_knot_all</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M317.8,-402.04C339.49,-406.93 364.74,-412.63 387.35,-417.74"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="386.67,-421.17 397.19,-419.96 388.21,-414.35 386.67,-421.17"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M299.93,-444.04C320.28,-448.89 343.92,-454.53 365.17,-459.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="364.52,-463.05 375.06,-461.96 366.14,-456.24 364.52,-463.05"/>
 </g>
 <!-- proc~get_knoti -->
 <g id="proc~~modify_wc~~CallsGraph_node7" class="node">
 <title>proc~get_knoti</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node7"><a xlink:href="../proc/get_knoti.html" xlink:title="nurbs_volume%get_knoti">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="524.5,-402 378.5,-402 378.5,-378 524.5,-378 524.5,-402"/>
-<text text-anchor="middle" x="451.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knoti</text>
+<g id="a_proc~~modify_wc~~CallsGraph_node7"><a xlink:href="../proc/get_knoti.html" xlink:title="nurbs_curve%get_knoti">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="494.5,-444 358.5,-444 358.5,-420 494.5,-420 494.5,-444"/>
+<text text-anchor="middle" x="426.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knoti</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot&#45;&gt;proc~get_knoti -->
 <g id="proc~~modify_wc~~CallsGraph_edge6" class="edge">
 <title>none~get_knot&#45;&gt;proc~get_knoti</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M335.08,-390C345.94,-390 357.23,-390 368.32,-390"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="368.42,-393.5 378.42,-390 368.42,-386.5 368.42,-393.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M315.04,-432C325.89,-432 337.22,-432 348.33,-432"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="348.44,-435.5 358.44,-432 348.44,-428.5 348.44,-435.5"/>
 </g>
 <!-- proc~get_wc_all -->
 <g id="proc~~modify_wc~~CallsGraph_node8" class="node">
 <title>proc~get_wc_all</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node8"><a xlink:href="../proc/get_wc_all.html" xlink:title="nurbs_volume%get_Wc_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="528.5,-360 374.5,-360 374.5,-336 528.5,-336 528.5,-360"/>
-<text text-anchor="middle" x="451.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wc_all</text>
+<g id="a_proc~~modify_wc~~CallsGraph_node8"><a xlink:href="../proc/get_wc_all.html" xlink:title="nurbs_curve%get_Wc_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="499,-402 354,-402 354,-378 499,-378 499,-402"/>
+<text text-anchor="middle" x="426.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wc_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc&#45;&gt;proc~get_wc_all -->
 <g id="proc~~modify_wc~~CallsGraph_edge7" class="edge">
 <title>none~get_wc&#45;&gt;proc~get_wc_all</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M317.8,-318.04C339.49,-322.93 364.74,-328.63 387.35,-333.74"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="386.67,-337.17 397.19,-335.96 388.21,-330.35 386.67,-337.17"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M299.93,-360.04C320.28,-364.89 343.92,-370.53 365.17,-375.6"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="364.52,-379.05 375.06,-377.96 366.14,-372.24 364.52,-379.05"/>
 </g>
 <!-- proc~get_wci -->
 <g id="proc~~modify_wc~~CallsGraph_node9" class="node">
 <title>proc~get_wci</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node9"><a xlink:href="../proc/get_wci.html" xlink:title="nurbs_volume%get_Wci">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="521,-318 382,-318 382,-294 521,-294 521,-318"/>
-<text text-anchor="middle" x="451.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wci</text>
+<g id="a_proc~~modify_wc~~CallsGraph_node9"><a xlink:href="../proc/get_wci.html" xlink:title="nurbs_curve%get_Wci">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="491.5,-360 361.5,-360 361.5,-336 491.5,-336 491.5,-360"/>
+<text text-anchor="middle" x="426.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wci</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc&#45;&gt;proc~get_wci -->
 <g id="proc~~modify_wc~~CallsGraph_edge8" class="edge">
 <title>none~get_wc&#45;&gt;proc~get_wci</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M331.65,-306C344.67,-306 358.42,-306 371.77,-306"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="371.88,-309.5 381.88,-306 371.88,-302.5 371.88,-309.5"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M312.05,-348C324.68,-348 338.07,-348 351.06,-348"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="351.37,-351.5 361.37,-348 351.37,-344.5 351.37,-351.5"/>
 </g>
 <!-- proc~get_xc_all -->
 <g id="proc~~modify_wc~~CallsGraph_node10" class="node">
 <title>proc~get_xc_all</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node10"><a xlink:href="../proc/get_xc_all.html" xlink:title="nurbs_volume%get_Xc_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="527,-276 376,-276 376,-252 527,-252 527,-276"/>
-<text text-anchor="middle" x="451.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc_all</text>
+<g id="a_proc~~modify_wc~~CallsGraph_node10"><a xlink:href="../proc/get_xc_all.html" xlink:title="nurbs_curve%get_Xc_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="497.5,-318 355.5,-318 355.5,-294 497.5,-294 497.5,-318"/>
+<text text-anchor="middle" x="426.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc&#45;&gt;proc~get_xc_all -->
 <g id="proc~~modify_wc~~CallsGraph_edge9" class="edge">
 <title>none~get_xc&#45;&gt;proc~get_xc_all</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M330.08,-250.4C341.68,-251.71 353.91,-253.09 365.95,-254.45"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="365.67,-257.94 376,-255.59 366.45,-250.99 365.67,-257.94"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M310.56,-292.29C321.77,-293.62 333.63,-295.04 345.3,-296.43"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="345.15,-299.94 355.49,-297.65 345.98,-292.99 345.15,-299.94"/>
 </g>
 <!-- proc~get_xci -->
 <g id="proc~~modify_wc~~CallsGraph_node11" class="node">
 <title>proc~get_xci</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node11"><a xlink:href="../proc/get_xci.html" xlink:title="nurbs_volume%get_Xci">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="519.5,-234 383.5,-234 383.5,-210 519.5,-210 519.5,-234"/>
-<text text-anchor="middle" x="451.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xci</text>
+<g id="a_proc~~modify_wc~~CallsGraph_node11"><a xlink:href="../proc/get_xci.html" xlink:title="nurbs_curve%get_Xci">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="490,-276 363,-276 363,-252 490,-252 490,-276"/>
+<text text-anchor="middle" x="426.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xci</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc&#45;&gt;proc~get_xci -->
 <g id="proc~~modify_wc~~CallsGraph_edge10" class="edge">
 <title>none~get_xc&#45;&gt;proc~get_xci</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M330.08,-235.6C343.96,-234.03 358.75,-232.36 373.03,-230.75"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="373.77,-234.19 383.32,-229.59 372.99,-227.23 373.77,-234.19"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M310.56,-277.71C324.14,-276.09 338.67,-274.36 352.67,-272.69"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="353.24,-276.15 362.75,-271.49 352.41,-269.2 353.24,-276.15"/>
 </g>
 <!-- proc~get_xcid -->
 <g id="proc~~modify_wc~~CallsGraph_node12" class="node">
 <title>proc~get_xcid</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node12"><a xlink:href="../proc/get_xcid.html" xlink:title="nurbs_volume%get_Xcid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="523,-192 380,-192 380,-168 523,-168 523,-192"/>
-<text text-anchor="middle" x="451.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xcid</text>
+<g id="a_proc~~modify_wc~~CallsGraph_node12"><a xlink:href="../proc/get_xcid.html" xlink:title="nurbs_curve%get_Xcid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="493,-234 360,-234 360,-210 493,-210 493,-234"/>
+<text text-anchor="middle" x="426.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xcid</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc&#45;&gt;proc~get_xcid -->
 <g id="proc~~modify_wc~~CallsGraph_edge11" class="edge">
 <title>none~get_xc&#45;&gt;proc~get_xcid</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M292.65,-230.85C313.93,-221.93 343.99,-209.86 371,-201 377.47,-198.88 384.29,-196.82 391.1,-194.87"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="392.35,-198.16 401.04,-192.1 390.47,-191.41 392.35,-198.16"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M276.31,-272.89C296.58,-263.99 325.23,-251.93 351,-243 357,-240.92 363.32,-238.89 369.64,-236.97"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="370.94,-240.24 379.53,-234.04 368.95,-233.53 370.94,-240.24"/>
 </g>
 <!-- proc~set1 -->
 <g id="proc~~modify_wc~~CallsGraph_node13" class="node">
 <title>proc~set1</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node13"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-108 391.5,-108 391.5,-84 511.5,-84 511.5,-108"/>
-<text text-anchor="middle" x="451.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
+<g id="a_proc~~modify_wc~~CallsGraph_node13"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-192 371.5,-192 371.5,-168 481.5,-168 481.5,-192"/>
+<text text-anchor="middle" x="426.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set1 -->
 <g id="proc~~modify_wc~~CallsGraph_edge12" class="edge">
 <title>none~set&#45;&gt;proc~set1</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M320.05,-96C339.28,-96 361.08,-96 381.27,-96"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="381.35,-99.5 391.35,-96 381.35,-92.5 381.35,-99.5"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M276.31,-129.11C296.58,-138.01 325.23,-150.07 351,-159 357,-161.08 363.32,-163.11 369.64,-165.03"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="368.95,-168.47 379.53,-167.96 370.94,-161.76 368.95,-168.47"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set1a -->
 <g id="proc~~modify_wc~~CallsGraph_node14" class="node">
+<title>proc~set1a</title>
+<g id="a_proc~~modify_wc~~CallsGraph_node14"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="485,-150 368,-150 368,-126 485,-126 485,-150"/>
+<text text-anchor="middle" x="426.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+</a>
+</g>
+</g>
+<!-- none~set&#45;&gt;proc~set1a -->
+<g id="proc~~modify_wc~~CallsGraph_edge13" class="edge">
+<title>none~set&#45;&gt;proc~set1a</title>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M300.41,-123.07C318.31,-125.21 338.71,-127.64 357.78,-129.92"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="357.56,-133.42 367.9,-131.13 358.39,-126.47 357.56,-133.42"/>
+</g>
+<!-- proc~set2 -->
+<g id="proc~~modify_wc~~CallsGraph_node15" class="node">
 <title>proc~set2</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node14"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-66 391.5,-66 391.5,-42 511.5,-42 511.5,-66"/>
-<text text-anchor="middle" x="451.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
+<g id="a_proc~~modify_wc~~CallsGraph_node15"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-66 371.5,-66 371.5,-42 481.5,-42 481.5,-66"/>
+<text text-anchor="middle" x="426.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set2 -->
-<g id="proc~~modify_wc~~CallsGraph_edge13" class="edge">
+<g id="proc~~modify_wc~~CallsGraph_edge14" class="edge">
 <title>none~set&#45;&gt;proc~set2</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M317.8,-83.96C339.49,-79.07 364.74,-73.37 387.35,-68.26"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="388.21,-71.65 397.19,-66.04 386.67,-64.83 388.21,-71.65"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M276.31,-104.89C296.58,-95.99 325.23,-83.93 351,-75 357,-72.92 363.32,-70.89 369.64,-68.97"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="370.94,-72.24 379.53,-66.04 368.95,-65.53 370.94,-72.24"/>
 </g>
 <!-- proc~set3 -->
-<g id="proc~~modify_wc~~CallsGraph_node15" class="node">
+<g id="proc~~modify_wc~~CallsGraph_node16" class="node">
 <title>proc~set3</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node15"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-150 391.5,-150 391.5,-126 511.5,-126 511.5,-150"/>
-<text text-anchor="middle" x="451.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
+<g id="a_proc~~modify_wc~~CallsGraph_node16"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-108 371.5,-108 371.5,-84 481.5,-84 481.5,-108"/>
+<text text-anchor="middle" x="426.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set3 -->
-<g id="proc~~modify_wc~~CallsGraph_edge14" class="edge">
+<g id="proc~~modify_wc~~CallsGraph_edge15" class="edge">
 <title>none~set&#45;&gt;proc~set3</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M317.8,-108.04C339.49,-112.93 364.74,-118.63 387.35,-123.74"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="386.67,-127.17 397.19,-125.96 388.21,-120.35 386.67,-127.17"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M300.41,-110.93C319.43,-108.66 341.28,-106.05 361.34,-103.66"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="361.82,-107.12 371.33,-102.46 360.99,-100.17 361.82,-107.12"/>
 </g>
 <!-- proc~set4 -->
-<g id="proc~~modify_wc~~CallsGraph_node16" class="node">
+<g id="proc~~modify_wc~~CallsGraph_node17" class="node">
 <title>proc~set4</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node16"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-24 391.5,-24 391.5,0 511.5,0 511.5,-24"/>
-<text text-anchor="middle" x="451.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
+<g id="a_proc~~modify_wc~~CallsGraph_node17"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-24 371.5,-24 371.5,0 481.5,0 481.5,-24"/>
+<text text-anchor="middle" x="426.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set4 -->
-<g id="proc~~modify_wc~~CallsGraph_edge15" class="edge">
+<g id="proc~~modify_wc~~CallsGraph_edge16" class="edge">
 <title>none~set&#45;&gt;proc~set4</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M281.44,-83.97C301.82,-69.98 337.51,-47.01 371,-33 376.1,-30.87 381.48,-28.9 386.94,-27.09"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="388.29,-30.33 396.8,-24.02 386.21,-23.65 388.29,-30.33"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M260.8,-104.85C278.39,-86.63 314.13,-52.34 351,-33 354.75,-31.03 358.7,-29.23 362.76,-27.59"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="364.18,-30.79 372.34,-24.02 361.75,-24.23 364.18,-30.79"/>
 </g>
 <!-- proc~cmp_degree -->
-<g id="proc~~modify_wc~~CallsGraph_node17" class="node">
+<g id="proc~~modify_wc~~CallsGraph_node18" class="node">
 <title>proc~cmp_degree</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node17"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="731,-150 568,-150 568,-126 731,-126 731,-150"/>
-<text text-anchor="middle" x="649.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
+<g id="a_proc~~modify_wc~~CallsGraph_node18"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="692,-150 538,-150 538,-126 692,-126 692,-150"/>
+<text text-anchor="middle" x="615" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~set1&#45;&gt;proc~cmp_degree -->
-<g id="proc~~modify_wc~~CallsGraph_edge16" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#002eff" d="M508.67,-108.04C531.63,-112.96 558.37,-118.69 582.27,-123.81"/>
-<polygon fill="#002eff" stroke="#002eff" points="581.81,-127.29 592.33,-125.96 583.28,-120.45 581.81,-127.29"/>
-</g>
-<!-- proc~cmp_nc -->
-<g id="proc~~modify_wc~~CallsGraph_node18" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node18"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="719,-108 580,-108 580,-84 719,-84 719,-108"/>
-<text text-anchor="middle" x="649.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
-</a>
-</g>
-</g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
 <g id="proc~~modify_wc~~CallsGraph_edge17" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#002eff" d="M511.57,-96C529.91,-96 550.41,-96 569.85,-96"/>
-<polygon fill="#002eff" stroke="#002eff" points="569.91,-99.5 579.91,-96 569.91,-92.5 569.91,-99.5"/>
+<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#007fff" d="M480.94,-167.96C502.7,-163.07 528.01,-157.37 550.68,-152.26"/>
+<polygon fill="#007fff" stroke="#007fff" points="551.56,-155.65 560.55,-150.04 550.02,-148.82 551.56,-155.65"/>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
 <g id="proc~~modify_wc~~CallsGraph_edge18" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#5c00ff" d="M508.67,-66.04C531.63,-70.96 558.37,-76.69 582.27,-81.81"/>
-<polygon fill="#5c00ff" stroke="#5c00ff" points="581.81,-85.29 592.33,-83.96 583.28,-78.45 581.81,-85.29"/>
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#0000ff" d="M485.23,-138C498.58,-138 513.06,-138 527.34,-138"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="527.68,-141.5 537.68,-138 527.68,-134.5 527.68,-141.5"/>
 </g>
 <!-- proc~compute_knot_vector -->
 <g id="proc~~modify_wc~~CallsGraph_node19" class="node">
 <title>proc~compute_knot_vector</title>
 <g id="a_proc~~modify_wc~~CallsGraph_node19"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="713,-66 586,-66 586,-42 713,-42 713,-66"/>
-<text text-anchor="middle" x="649.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="678.5,-66 551.5,-66 551.5,-42 678.5,-42 678.5,-66"/>
+<text text-anchor="middle" x="615" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~modify_wc~~CallsGraph_edge19" class="edge">
 <title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#5c00ff" d="M511.57,-54C531.72,-54 554.49,-54 575.59,-54"/>
-<polygon fill="#5c00ff" stroke="#5c00ff" points="575.8,-57.5 585.8,-54 575.8,-50.5 575.8,-57.5"/>
+<path fill="none" stroke="#7f00ff" d="M481.69,-54C500.29,-54 521.41,-54 541.23,-54"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="541.45,-57.5 551.45,-54 541.45,-50.5 541.45,-57.5"/>
 </g>
 <!-- proc~set3&#45;&gt;proc~cmp_degree -->
 <g id="proc~~modify_wc~~CallsGraph_edge20" class="edge">
 <title>proc~set3&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#e700ff" d="M511.57,-138C526.09,-138 541.97,-138 557.6,-138"/>
-<polygon fill="#e700ff" stroke="#e700ff" points="557.82,-141.5 567.82,-138 557.82,-134.5 557.82,-141.5"/>
+<path fill="none" stroke="#ff00ff" d="M480.94,-108.04C502.7,-112.93 528.01,-118.63 550.68,-123.74"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="550.02,-127.18 560.55,-125.96 551.56,-120.35 550.02,-127.18"/>
 </g>
 <!-- proc~get_multiplicity -->
-<g id="proc~~modify_wc~~CallsGraph_node21" class="node">
+<g id="proc~~modify_wc~~CallsGraph_node20" class="node">
 <title>proc~get_multiplicity</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node21"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="945,-149 767,-149 767,-125 945,-125 945,-149"/>
-<text text-anchor="middle" x="856" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
+<g id="a_proc~~modify_wc~~CallsGraph_node20"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="897,-150 728,-150 728,-126 897,-126 897,-150"/>
+<text text-anchor="middle" x="812.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="proc~~modify_wc~~CallsGraph_edge21" class="edge">
 <title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M731.03,-137.61C739.47,-137.56 748.11,-137.52 756.71,-137.48"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="756.8,-140.98 766.78,-137.43 756.76,-133.98 756.8,-140.98"/>
+<path fill="none" stroke="#ff0000" d="M692.15,-138C700.54,-138 709.17,-138 717.75,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="717.79,-141.5 727.79,-138 717.79,-134.5 717.79,-141.5"/>
 </g>
-<!-- interface~compute_multiplicity -->
-<g id="proc~~modify_wc~~CallsGraph_node20" class="node">
-<title>interface~compute_multiplicity</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node20"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1105,-129 981,-129 981,-105 1105,-105 1105,-129"/>
-<text text-anchor="middle" x="1043" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<!-- proc~repelem -->
+<g id="proc~~modify_wc~~CallsGraph_node21" class="node">
+<title>proc~repelem</title>
+<g id="a_proc~~modify_wc~~CallsGraph_node21"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="841,-66 784,-66 784,-42 841,-42 841,-66"/>
+<text text-anchor="middle" x="812.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
 <g id="proc~~modify_wc~~CallsGraph_edge22" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00ff00" d="M719.14,-99.68C789.69,-103.47 899.03,-109.33 970.57,-113.17"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="970.67,-116.68 980.85,-113.72 971.05,-109.69 970.67,-116.68"/>
+<title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
+<path fill="none" stroke="#00ffff" d="M678.66,-54C709.92,-54 746.69,-54 773.61,-54"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="773.78,-57.5 783.78,-54 773.78,-50.5 773.78,-57.5"/>
 </g>
-<!-- proc~repelem -->
+<!-- interface~compute_multiplicity -->
 <g id="proc~~modify_wc~~CallsGraph_node22" class="node">
-<title>proc~repelem</title>
-<g id="a_proc~~modify_wc~~CallsGraph_node22"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="884.5,-66 827.5,-66 827.5,-42 884.5,-42 884.5,-66"/>
-<text text-anchor="middle" x="856" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<title>interface~compute_multiplicity</title>
+<g id="a_proc~~modify_wc~~CallsGraph_node22"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
+<polygon fill="#a7506f" stroke="#a7506f" points="1057,-150 933,-150 933,-126 1057,-126 1057,-150"/>
+<text text-anchor="middle" x="995" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
+<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~modify_wc~~CallsGraph_edge23" class="edge">
-<title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#0000ff" d="M713.25,-54C747.23,-54 788.1,-54 817.2,-54"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="817.36,-57.5 827.36,-54 817.35,-50.5 817.36,-57.5"/>
+<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
+<path fill="none" stroke="#ff0000" d="M897.15,-138C905.73,-138 914.4,-138 922.84,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="922.99,-141.5 932.99,-138 922.99,-134.5 922.99,-141.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~modify_wc~~CallsGraph_node23" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~modify_wc~~CallsGraph_node23"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1271,-150 1141,-150 1141,-126 1271,-126 1271,-150"/>
-<text text-anchor="middle" x="1206" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1223,-171 1093,-171 1093,-147 1223,-147 1223,-171"/>
+<text text-anchor="middle" x="1158" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~modify_wc~~CallsGraph_edge24" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1105.33,-125C1113.69,-126.09 1122.35,-127.22 1130.92,-128.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1130.53,-131.82 1140.9,-129.64 1131.44,-124.88 1130.53,-131.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1057.33,-146C1065.69,-147.09 1074.35,-148.22 1082.92,-149.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1082.53,-152.82 1092.9,-150.64 1083.44,-145.88 1082.53,-152.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~modify_wc~~CallsGraph_node24" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~modify_wc~~CallsGraph_node24"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1271,-108 1141,-108 1141,-84 1271,-84 1271,-108"/>
-<text text-anchor="middle" x="1206" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1223,-129 1093,-129 1093,-105 1223,-105 1223,-129"/>
+<text text-anchor="middle" x="1158" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~modify_wc~~CallsGraph_edge25" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1105.33,-109C1113.69,-107.91 1122.35,-106.78 1130.92,-105.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1131.44,-109.12 1140.9,-104.36 1130.53,-102.18 1131.44,-109.12"/>
-</g>
-<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~modify_wc~~CallsGraph_edge26" class="edge">
-<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00ff00" d="M945.17,-127.47C953.77,-126.54 962.42,-125.6 970.82,-124.7"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="971.36,-128.16 980.93,-123.6 970.61,-121.2 971.36,-128.16"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1057.33,-130C1065.69,-128.91 1074.35,-127.78 1082.92,-126.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1083.44,-130.12 1092.9,-125.36 1082.53,-123.18 1083.44,-130.12"/>
 </g>
 </g>
 </svg>
@@ -708,7 +702,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/modify_wc~2.html b/proc/modify_wc~2.html
index 77919cb8f..ea3e3e0f8 100644
--- a/proc/modify_wc~2.html
+++ b/proc/modify_wc~2.html
@@ -83,15 +83,15 @@ <h1>modify_Wc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">modify_Wc</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine modify_Wc(this, W, num)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~96"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~89"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -225,14 +225,14 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~modify_wc~2~~CallsGraph_node1" class="node">
 <title>proc~modify_wc~2</title>
 <polygon fill="none" stroke="black" points="156,-276 0,-276 0,-252 156,-252 156,-276"/>
-<text text-anchor="middle" x="78" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%modify_Wc</text>
+<text text-anchor="middle" x="78" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%modify_Wc</text>
 </g>
 <!-- none~get_knot~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node2" class="node">
 <title>none~get_knot~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~2" xlink:title="nurbs_surface%get_knot">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot~2" xlink:title="nurbs_volume%get_knot">
 <polygon fill="#a7506f" stroke="#a7506f" points="335,-402 192,-402 192,-378 335,-378 335,-402"/>
-<text text-anchor="middle" x="263.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
+<text text-anchor="middle" x="263.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot</text>
 </a>
 </g>
 </g>
@@ -245,9 +245,9 @@ <h3 class="card-title">Calls</h3>
 <!-- none~get_wc~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node3" class="node">
 <title>none~get_wc~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node3"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_wc~2" xlink:title="nurbs_surface%get_Wc">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node3"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_wc~2" xlink:title="nurbs_volume%get_Wc">
 <polygon fill="#a7506f" stroke="#a7506f" points="331.5,-318 195.5,-318 195.5,-294 331.5,-294 331.5,-318"/>
-<text text-anchor="middle" x="263.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc</text>
+<text text-anchor="middle" x="263.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wc</text>
 </a>
 </g>
 </g>
@@ -260,9 +260,9 @@ <h3 class="card-title">Calls</h3>
 <!-- none~get_xc~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node4" class="node">
 <title>none~get_xc~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xc~2" xlink:title="nurbs_surface%get_Xc">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_xc~2" xlink:title="nurbs_volume%get_Xc">
 <polygon fill="#a7506f" stroke="#a7506f" points="330,-255 197,-255 197,-231 330,-231 330,-255"/>
-<text text-anchor="middle" x="263.5" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc</text>
+<text text-anchor="middle" x="263.5" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc</text>
 </a>
 </g>
 </g>
@@ -275,9 +275,9 @@ <h3 class="card-title">Calls</h3>
 <!-- none~set~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node5" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node5"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node5"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="320,-108 207,-108 207,-84 320,-84 320,-108"/>
-<text text-anchor="middle" x="263.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<text text-anchor="middle" x="263.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
@@ -290,9 +290,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_knot_all~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node6" class="node">
 <title>proc~get_knot_all~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node6"><a xlink:href="../proc/get_knot_all~2.html" xlink:title="nurbs_surface%get_knot_all">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node6"><a xlink:href="../proc/get_knot_all~2.html" xlink:title="nurbs_volume%get_knot_all">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="532,-444 371,-444 371,-420 532,-420 532,-444"/>
-<text text-anchor="middle" x="451.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot_all</text>
+<text text-anchor="middle" x="451.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot_all</text>
 </a>
 </g>
 </g>
@@ -305,9 +305,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_knoti~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node7" class="node">
 <title>proc~get_knoti~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node7"><a xlink:href="../proc/get_knoti~2.html" xlink:title="nurbs_surface%get_knoti">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node7"><a xlink:href="../proc/get_knoti~2.html" xlink:title="nurbs_volume%get_knoti">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="524.5,-402 378.5,-402 378.5,-378 524.5,-378 524.5,-402"/>
-<text text-anchor="middle" x="451.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knoti</text>
+<text text-anchor="middle" x="451.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knoti</text>
 </a>
 </g>
 </g>
@@ -320,9 +320,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_wc_all~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node8" class="node">
 <title>proc~get_wc_all~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node8"><a xlink:href="../proc/get_wc_all~2.html" xlink:title="nurbs_surface%get_Wc_all">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node8"><a xlink:href="../proc/get_wc_all~2.html" xlink:title="nurbs_volume%get_Wc_all">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="528.5,-360 374.5,-360 374.5,-336 528.5,-336 528.5,-360"/>
-<text text-anchor="middle" x="451.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc_all</text>
+<text text-anchor="middle" x="451.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wc_all</text>
 </a>
 </g>
 </g>
@@ -335,9 +335,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_wci~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node9" class="node">
 <title>proc~get_wci~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node9"><a xlink:href="../proc/get_wci~2.html" xlink:title="nurbs_surface%get_Wci">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node9"><a xlink:href="../proc/get_wci~2.html" xlink:title="nurbs_volume%get_Wci">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="521,-318 382,-318 382,-294 521,-294 521,-318"/>
-<text text-anchor="middle" x="451.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wci</text>
+<text text-anchor="middle" x="451.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wci</text>
 </a>
 </g>
 </g>
@@ -350,9 +350,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_xc_all~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node10" class="node">
 <title>proc~get_xc_all~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node10"><a xlink:href="../proc/get_xc_all~2.html" xlink:title="nurbs_surface%get_Xc_all">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node10"><a xlink:href="../proc/get_xc_all~2.html" xlink:title="nurbs_volume%get_Xc_all">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="527,-276 376,-276 376,-252 527,-252 527,-276"/>
-<text text-anchor="middle" x="451.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc_all</text>
+<text text-anchor="middle" x="451.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc_all</text>
 </a>
 </g>
 </g>
@@ -365,9 +365,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_xcid~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node11" class="node">
 <title>proc~get_xcid~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node11"><a xlink:href="../proc/get_xcid~2.html" xlink:title="nurbs_surface%get_Xcid">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node11"><a xlink:href="../proc/get_xcid~2.html" xlink:title="nurbs_volume%get_Xcid">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="523,-234 380,-234 380,-210 523,-210 523,-234"/>
-<text text-anchor="middle" x="451.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xcid</text>
+<text text-anchor="middle" x="451.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xcid</text>
 </a>
 </g>
 </g>
@@ -380,9 +380,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_xci~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node12" class="node">
 <title>proc~get_xci~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node12"><a xlink:href="../proc/get_xci~2.html" xlink:title="nurbs_surface%get_Xci">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node12"><a xlink:href="../proc/get_xci~2.html" xlink:title="nurbs_volume%get_Xci">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="519.5,-192 383.5,-192 383.5,-168 519.5,-168 519.5,-192"/>
-<text text-anchor="middle" x="451.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xci</text>
+<text text-anchor="middle" x="451.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xci</text>
 </a>
 </g>
 </g>
@@ -395,9 +395,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~set1~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node13" class="node">
 <title>proc~set1~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node13"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node13"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="511.5,-108 391.5,-108 391.5,-84 511.5,-84 511.5,-108"/>
-<text text-anchor="middle" x="451.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
+<text text-anchor="middle" x="451.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
@@ -410,9 +410,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~set2~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node14" class="node">
 <title>proc~set2~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node14"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node14"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="511.5,-66 391.5,-66 391.5,-42 511.5,-42 511.5,-66"/>
-<text text-anchor="middle" x="451.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
+<text text-anchor="middle" x="451.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
@@ -425,9 +425,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~set3~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node15" class="node">
 <title>proc~set3~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node15"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node15"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="511.5,-150 391.5,-150 391.5,-126 511.5,-126 511.5,-150"/>
-<text text-anchor="middle" x="451.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
+<text text-anchor="middle" x="451.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
@@ -440,9 +440,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~set4~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node16" class="node">
 <title>proc~set4~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node16"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node16"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="511.5,-24 391.5,-24 391.5,0 511.5,0 511.5,-24"/>
-<text text-anchor="middle" x="451.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
+<text text-anchor="middle" x="451.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
@@ -455,9 +455,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~cmp_degree~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node17" class="node">
 <title>proc~cmp_degree~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node17"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node17"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="731,-150 568,-150 568,-126 731,-126 731,-150"/>
-<text text-anchor="middle" x="649.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
+<text text-anchor="middle" x="649.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
@@ -470,9 +470,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~cmp_nc~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node18" class="node">
 <title>proc~cmp_nc~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node18"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node18"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="719,-108 580,-108 580,-84 719,-84 719,-108"/>
-<text text-anchor="middle" x="649.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+<text text-anchor="middle" x="649.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
@@ -512,9 +512,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_multiplicity~2 -->
 <g id="proc~~modify_wc~2~~CallsGraph_node21" class="node">
 <title>proc~get_multiplicity~2</title>
-<g id="a_proc~~modify_wc~2~~CallsGraph_node21"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<g id="a_proc~~modify_wc~2~~CallsGraph_node21"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="945,-149 767,-149 767,-125 945,-125 945,-149"/>
-<text text-anchor="middle" x="856" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
+<text text-anchor="middle" x="856" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
@@ -708,7 +708,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/modify_wc~3.html b/proc/modify_wc~3.html
index caa4bc791..12c12d3e9 100644
--- a/proc/modify_wc~3.html
+++ b/proc/modify_wc~3.html
@@ -83,15 +83,15 @@ <h1>modify_Wc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">modify_Wc</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine modify_Wc(this, W, num)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~159"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~157"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -216,373 +216,379 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~modify_wc~3~~CallsGraph Pages: 1 -->
-<svg id="procmodify_wc3CallsGraph" width="641pt" height="257pt"
- viewBox="0.00 0.00 641.00 257.23" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~modify_wc~3~~CallsGraph" class="graph" transform="scale(1.92 1.92) rotate(0) translate(4 490)">
+<svg id="procmodify_wc3CallsGraph" width="641pt" height="227pt"
+ viewBox="0.00 0.00 641.00 226.53" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~modify_wc~3~~CallsGraph" class="graph" transform="scale(2 2) rotate(0) translate(4 448)">
 <title>proc~~modify_wc~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-490 1227,-490 1227,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-448 1275,-448 1275,4 -4,4"/>
 <!-- proc~modify_wc~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_node1" class="node">
 <title>proc~modify_wc~3</title>
-<polygon fill="none" stroke="black" points="146,-318 0,-318 0,-294 146,-294 146,-318"/>
-<text text-anchor="middle" x="73" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%modify_Wc</text>
+<polygon fill="none" stroke="black" points="156,-276 0,-276 0,-252 156,-252 156,-276"/>
+<text text-anchor="middle" x="78" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%modify_Wc</text>
 </g>
 <!-- none~get_knot~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_node2" class="node">
 <title>none~get_knot~3</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_knot~3" xlink:title="nurbs_curve%get_knot">
-<polygon fill="#a7506f" stroke="#a7506f" points="315,-444 182,-444 182,-420 315,-420 315,-444"/>
-<text text-anchor="middle" x="248.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot</text>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~3" xlink:title="nurbs_surface%get_knot">
+<polygon fill="#a7506f" stroke="#a7506f" points="335,-402 192,-402 192,-378 335,-378 335,-402"/>
+<text text-anchor="middle" x="263.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~get_knot~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge1" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~get_knot~3</title>
-<path fill="none" stroke="#ff0000" d="M90.64,-318.08C121.21,-340.28 186.48,-387.69 222.44,-413.8"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="220.77,-416.91 230.91,-419.96 224.88,-411.25 220.77,-416.91"/>
+<path fill="none" stroke="#ff0000" d="M96.59,-276.08C129.07,-298.38 198.55,-346.09 236.48,-372.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="234.73,-375.18 244.96,-377.96 238.7,-369.41 234.73,-375.18"/>
 </g>
 <!-- none~get_wc~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_node3" class="node">
 <title>none~get_wc~3</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node3"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_wc~3" xlink:title="nurbs_curve%get_Wc">
-<polygon fill="#a7506f" stroke="#a7506f" points="312,-360 185,-360 185,-336 312,-336 312,-360"/>
-<text text-anchor="middle" x="248.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wc</text>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node3"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_wc~3" xlink:title="nurbs_surface%get_Wc">
+<polygon fill="#a7506f" stroke="#a7506f" points="331.5,-318 195.5,-318 195.5,-294 331.5,-294 331.5,-318"/>
+<text text-anchor="middle" x="263.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~get_wc~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge2" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~get_wc~3</title>
-<path fill="none" stroke="#ff0000" d="M123.72,-318.04C143.77,-322.89 167.08,-328.53 188.02,-333.6"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="187.23,-337.01 197.77,-335.96 188.88,-330.21 187.23,-337.01"/>
+<path fill="none" stroke="#ff0000" d="M131.58,-276.04C152.89,-280.91 177.67,-286.58 199.9,-291.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="199.38,-295.14 209.91,-293.96 200.94,-288.32 199.38,-295.14"/>
 </g>
 <!-- none~get_xc~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_node4" class="node">
 <title>none~get_xc~3</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node4"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_xc~3" xlink:title="nurbs_curve%get_Xc">
-<polygon fill="#a7506f" stroke="#a7506f" points="310.5,-297 186.5,-297 186.5,-273 310.5,-273 310.5,-297"/>
-<text text-anchor="middle" x="248.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc</text>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xc~3" xlink:title="nurbs_surface%get_Xc">
+<polygon fill="#a7506f" stroke="#a7506f" points="330,-255 197,-255 197,-231 330,-231 330,-255"/>
+<text text-anchor="middle" x="263.5" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~get_xc~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge3" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~get_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M146.07,-297.28C156.02,-296.07 166.24,-294.84 176.18,-293.63"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="176.9,-297.07 186.41,-292.39 176.06,-290.12 176.9,-297.07"/>
+<path fill="none" stroke="#ff0000" d="M156.02,-255.19C166.17,-254.02 176.57,-252.83 186.7,-251.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="187.19,-255.14 196.73,-250.53 186.39,-248.19 187.19,-255.14"/>
 </g>
 <!-- none~set~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_node5" class="node">
 <title>none~set~3</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node5"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="300,-129 197,-129 197,-105 300,-105 300,-129"/>
-<text text-anchor="middle" x="248.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node5"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="320,-108 207,-108 207,-84 320,-84 320,-108"/>
+<text text-anchor="middle" x="263.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge4" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M85.12,-293.89C114.3,-262.1 193.33,-176.01 229.27,-136.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="232.07,-138.99 236.25,-129.25 226.91,-134.25 232.07,-138.99"/>
+<path fill="none" stroke="#ff0000" d="M92.2,-251.92C123.65,-223.12 203.26,-150.24 241.44,-115.28"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="243.92,-117.76 248.93,-108.43 239.19,-112.6 243.92,-117.76"/>
 </g>
 <!-- proc~get_knot_all~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_node6" class="node">
 <title>proc~get_knot_all~3</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node6"><a xlink:href="../proc/get_knot_all~3.html" xlink:title="nurbs_curve%get_knot_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="502,-486 351,-486 351,-462 502,-462 502,-486"/>
-<text text-anchor="middle" x="426.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot_all</text>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node6"><a xlink:href="../proc/get_knot_all~3.html" xlink:title="nurbs_surface%get_knot_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="532,-444 371,-444 371,-420 532,-420 532,-444"/>
+<text text-anchor="middle" x="451.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot~3&#45;&gt;proc~get_knot_all~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge5" class="edge">
 <title>none~get_knot~3&#45;&gt;proc~get_knot_all~3</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M299.93,-444.04C320.28,-448.89 343.92,-454.53 365.17,-459.6"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="364.52,-463.05 375.06,-461.96 366.14,-456.24 364.52,-463.05"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M317.8,-402.04C339.49,-406.93 364.74,-412.63 387.35,-417.74"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="386.67,-421.17 397.19,-419.96 388.21,-414.35 386.67,-421.17"/>
 </g>
 <!-- proc~get_knoti~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_node7" class="node">
 <title>proc~get_knoti~3</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node7"><a xlink:href="../proc/get_knoti~3.html" xlink:title="nurbs_curve%get_knoti">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="494.5,-444 358.5,-444 358.5,-420 494.5,-420 494.5,-444"/>
-<text text-anchor="middle" x="426.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knoti</text>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node7"><a xlink:href="../proc/get_knoti~3.html" xlink:title="nurbs_surface%get_knoti">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="524.5,-402 378.5,-402 378.5,-378 524.5,-378 524.5,-402"/>
+<text text-anchor="middle" x="451.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knoti</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot~3&#45;&gt;proc~get_knoti~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge6" class="edge">
 <title>none~get_knot~3&#45;&gt;proc~get_knoti~3</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M315.04,-432C325.89,-432 337.22,-432 348.33,-432"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="348.44,-435.5 358.44,-432 348.44,-428.5 348.44,-435.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M335.08,-390C345.94,-390 357.23,-390 368.32,-390"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="368.42,-393.5 378.42,-390 368.42,-386.5 368.42,-393.5"/>
 </g>
 <!-- proc~get_wc_all~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_node8" class="node">
 <title>proc~get_wc_all~3</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node8"><a xlink:href="../proc/get_wc_all~3.html" xlink:title="nurbs_curve%get_Wc_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="499,-402 354,-402 354,-378 499,-378 499,-402"/>
-<text text-anchor="middle" x="426.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wc_all</text>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node8"><a xlink:href="../proc/get_wc_all~3.html" xlink:title="nurbs_surface%get_Wc_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="528.5,-360 374.5,-360 374.5,-336 528.5,-336 528.5,-360"/>
+<text text-anchor="middle" x="451.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc~3&#45;&gt;proc~get_wc_all~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge7" class="edge">
 <title>none~get_wc~3&#45;&gt;proc~get_wc_all~3</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M299.93,-360.04C320.28,-364.89 343.92,-370.53 365.17,-375.6"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="364.52,-379.05 375.06,-377.96 366.14,-372.24 364.52,-379.05"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M317.8,-318.04C339.49,-322.93 364.74,-328.63 387.35,-333.74"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="386.67,-337.17 397.19,-335.96 388.21,-330.35 386.67,-337.17"/>
 </g>
 <!-- proc~get_wci~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_node9" class="node">
 <title>proc~get_wci~3</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node9"><a xlink:href="../proc/get_wci~3.html" xlink:title="nurbs_curve%get_Wci">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="491.5,-360 361.5,-360 361.5,-336 491.5,-336 491.5,-360"/>
-<text text-anchor="middle" x="426.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wci</text>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node9"><a xlink:href="../proc/get_wci~3.html" xlink:title="nurbs_surface%get_Wci">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="521,-318 382,-318 382,-294 521,-294 521,-318"/>
+<text text-anchor="middle" x="451.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wci</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc~3&#45;&gt;proc~get_wci~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge8" class="edge">
 <title>none~get_wc~3&#45;&gt;proc~get_wci~3</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M312.05,-348C324.68,-348 338.07,-348 351.06,-348"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="351.37,-351.5 361.37,-348 351.37,-344.5 351.37,-351.5"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M331.65,-306C344.67,-306 358.42,-306 371.77,-306"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="371.88,-309.5 381.88,-306 371.88,-302.5 371.88,-309.5"/>
 </g>
 <!-- proc~get_xc_all~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_node10" class="node">
 <title>proc~get_xc_all~3</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node10"><a xlink:href="../proc/get_xc_all~3.html" xlink:title="nurbs_curve%get_Xc_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="497.5,-318 355.5,-318 355.5,-294 497.5,-294 497.5,-318"/>
-<text text-anchor="middle" x="426.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc_all</text>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node10"><a xlink:href="../proc/get_xc_all~3.html" xlink:title="nurbs_surface%get_Xc_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="527,-276 376,-276 376,-252 527,-252 527,-276"/>
+<text text-anchor="middle" x="451.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~3&#45;&gt;proc~get_xc_all~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge9" class="edge">
 <title>none~get_xc~3&#45;&gt;proc~get_xc_all~3</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M310.56,-292.29C321.77,-293.62 333.63,-295.04 345.3,-296.43"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="345.15,-299.94 355.49,-297.65 345.98,-292.99 345.15,-299.94"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M330.08,-250.4C341.68,-251.71 353.91,-253.09 365.95,-254.45"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="365.67,-257.94 376,-255.59 366.45,-250.99 365.67,-257.94"/>
 </g>
 <!-- proc~get_xcid~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_node11" class="node">
 <title>proc~get_xcid~3</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node11"><a xlink:href="../proc/get_xcid~3.html" xlink:title="nurbs_curve%get_Xcid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="493,-276 360,-276 360,-252 493,-252 493,-276"/>
-<text text-anchor="middle" x="426.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xcid</text>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node11"><a xlink:href="../proc/get_xcid~3.html" xlink:title="nurbs_surface%get_Xcid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="523,-234 380,-234 380,-210 523,-210 523,-234"/>
+<text text-anchor="middle" x="451.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xcid</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~3&#45;&gt;proc~get_xcid~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge10" class="edge">
 <title>none~get_xc~3&#45;&gt;proc~get_xcid~3</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M310.56,-277.71C323.22,-276.2 336.7,-274.6 349.81,-273.03"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="350.23,-276.51 359.75,-271.85 349.4,-269.56 350.23,-276.51"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M330.08,-235.6C342.91,-234.15 356.51,-232.61 369.77,-231.11"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="370.29,-234.58 379.83,-229.98 369.5,-227.62 370.29,-234.58"/>
 </g>
 <!-- proc~get_xci~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_node12" class="node">
 <title>proc~get_xci~3</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node12"><a xlink:href="../proc/get_xci~3.html" xlink:title="nurbs_curve%get_Xci">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="490,-234 363,-234 363,-210 490,-210 490,-234"/>
-<text text-anchor="middle" x="426.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xci</text>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node12"><a xlink:href="../proc/get_xci~3.html" xlink:title="nurbs_surface%get_Xci">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="519.5,-192 383.5,-192 383.5,-168 519.5,-168 519.5,-192"/>
+<text text-anchor="middle" x="451.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xci</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~3&#45;&gt;proc~get_xci~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge11" class="edge">
 <title>none~get_xc~3&#45;&gt;proc~get_xci~3</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M276.31,-272.89C296.58,-263.99 325.23,-251.93 351,-243 357,-240.92 363.32,-238.89 369.64,-236.97"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="370.94,-240.24 379.53,-234.04 368.95,-233.53 370.94,-240.24"/>
-</g>
-<!-- proc~set1a -->
-<g id="proc~~modify_wc~3~~CallsGraph_node13" class="node">
-<title>proc~set1a</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node13"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="485,-192 368,-192 368,-168 485,-168 485,-192"/>
-<text text-anchor="middle" x="426.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
-</a>
-</g>
-</g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
-<g id="proc~~modify_wc~3~~CallsGraph_edge12" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M276.31,-129.11C296.58,-138.01 325.23,-150.07 351,-159 357,-161.08 363.32,-163.11 369.64,-165.03"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="368.95,-168.47 379.53,-167.96 370.94,-161.76 368.95,-168.47"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M292.65,-230.85C313.93,-221.93 343.99,-209.86 371,-201 377.47,-198.88 384.29,-196.82 391.1,-194.87"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="392.35,-198.16 401.04,-192.1 390.47,-191.41 392.35,-198.16"/>
 </g>
 <!-- proc~set1~3 -->
-<g id="proc~~modify_wc~3~~CallsGraph_node14" class="node">
+<g id="proc~~modify_wc~3~~CallsGraph_node13" class="node">
 <title>proc~set1~3</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node14"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-150 371.5,-150 371.5,-126 481.5,-126 481.5,-150"/>
-<text text-anchor="middle" x="426.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node13"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-108 391.5,-108 391.5,-84 511.5,-84 511.5,-108"/>
+<text text-anchor="middle" x="451.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set1~3 -->
-<g id="proc~~modify_wc~3~~CallsGraph_edge13" class="edge">
+<g id="proc~~modify_wc~3~~CallsGraph_edge12" class="edge">
 <title>none~set~3&#45;&gt;proc~set1~3</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M300.41,-123.07C319.43,-125.34 341.28,-127.95 361.34,-130.34"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="360.99,-133.83 371.33,-131.54 361.82,-126.88 360.99,-133.83"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M320.05,-96C339.28,-96 361.08,-96 381.27,-96"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="381.35,-99.5 391.35,-96 381.35,-92.5 381.35,-99.5"/>
 </g>
 <!-- proc~set2~3 -->
-<g id="proc~~modify_wc~3~~CallsGraph_node15" class="node">
+<g id="proc~~modify_wc~3~~CallsGraph_node14" class="node">
 <title>proc~set2~3</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node15"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-66 371.5,-66 371.5,-42 481.5,-42 481.5,-66"/>
-<text text-anchor="middle" x="426.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node14"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-66 391.5,-66 391.5,-42 511.5,-42 511.5,-66"/>
+<text text-anchor="middle" x="451.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set2~3 -->
-<g id="proc~~modify_wc~3~~CallsGraph_edge14" class="edge">
+<g id="proc~~modify_wc~3~~CallsGraph_edge13" class="edge">
 <title>none~set~3&#45;&gt;proc~set2~3</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M276.31,-104.89C296.58,-95.99 325.23,-83.93 351,-75 357,-72.92 363.32,-70.89 369.64,-68.97"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="370.94,-72.24 379.53,-66.04 368.95,-65.53 370.94,-72.24"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M317.8,-83.96C339.49,-79.07 364.74,-73.37 387.35,-68.26"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="388.21,-71.65 397.19,-66.04 386.67,-64.83 388.21,-71.65"/>
 </g>
 <!-- proc~set3~3 -->
-<g id="proc~~modify_wc~3~~CallsGraph_node16" class="node">
+<g id="proc~~modify_wc~3~~CallsGraph_node15" class="node">
 <title>proc~set3~3</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node16"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-108 371.5,-108 371.5,-84 481.5,-84 481.5,-108"/>
-<text text-anchor="middle" x="426.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node15"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-150 391.5,-150 391.5,-126 511.5,-126 511.5,-150"/>
+<text text-anchor="middle" x="451.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set3~3 -->
-<g id="proc~~modify_wc~3~~CallsGraph_edge15" class="edge">
+<g id="proc~~modify_wc~3~~CallsGraph_edge14" class="edge">
 <title>none~set~3&#45;&gt;proc~set3~3</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M300.41,-110.93C319.43,-108.66 341.28,-106.05 361.34,-103.66"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="361.82,-107.12 371.33,-102.46 360.99,-100.17 361.82,-107.12"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M317.8,-108.04C339.49,-112.93 364.74,-118.63 387.35,-123.74"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="386.67,-127.17 397.19,-125.96 388.21,-120.35 386.67,-127.17"/>
 </g>
 <!-- proc~set4~3 -->
-<g id="proc~~modify_wc~3~~CallsGraph_node17" class="node">
+<g id="proc~~modify_wc~3~~CallsGraph_node16" class="node">
 <title>proc~set4~3</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node17"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-24 371.5,-24 371.5,0 481.5,0 481.5,-24"/>
-<text text-anchor="middle" x="426.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node16"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-24 391.5,-24 391.5,0 511.5,0 511.5,-24"/>
+<text text-anchor="middle" x="451.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set4~3 -->
-<g id="proc~~modify_wc~3~~CallsGraph_edge16" class="edge">
+<g id="proc~~modify_wc~3~~CallsGraph_edge15" class="edge">
 <title>none~set~3&#45;&gt;proc~set4~3</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M260.8,-104.85C278.39,-86.63 314.13,-52.34 351,-33 354.75,-31.03 358.7,-29.23 362.76,-27.59"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="364.18,-30.79 372.34,-24.02 361.75,-24.23 364.18,-30.79"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M281.44,-83.97C301.82,-69.98 337.51,-47.01 371,-33 376.1,-30.87 381.48,-28.9 386.94,-27.09"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="388.29,-30.33 396.8,-24.02 386.21,-23.65 388.29,-30.33"/>
 </g>
 <!-- proc~cmp_degree~3 -->
-<g id="proc~~modify_wc~3~~CallsGraph_node18" class="node">
+<g id="proc~~modify_wc~3~~CallsGraph_node17" class="node">
 <title>proc~cmp_degree~3</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node18"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="692,-150 538,-150 538,-126 692,-126 692,-150"/>
-<text text-anchor="middle" x="615" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node17"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="731,-150 568,-150 568,-126 731,-126 731,-150"/>
+<text text-anchor="middle" x="649.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<g id="proc~~modify_wc~3~~CallsGraph_edge16" class="edge">
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
+<path fill="none" stroke="#002eff" d="M508.67,-108.04C531.63,-112.96 558.37,-118.69 582.27,-123.81"/>
+<polygon fill="#002eff" stroke="#002eff" points="581.81,-127.29 592.33,-125.96 583.28,-120.45 581.81,-127.29"/>
+</g>
+<!-- proc~cmp_nc~3 -->
+<g id="proc~~modify_wc~3~~CallsGraph_node18" class="node">
+<title>proc~cmp_nc~3</title>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node18"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="719,-108 580,-108 580,-84 719,-84 719,-108"/>
+<text text-anchor="middle" x="649.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+</a>
+</g>
+</g>
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge17" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#007fff" d="M480.94,-167.96C502.7,-163.07 528.01,-157.37 550.68,-152.26"/>
-<polygon fill="#007fff" stroke="#007fff" points="551.56,-155.65 560.55,-150.04 550.02,-148.82 551.56,-155.65"/>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#002eff" d="M511.57,-96C529.91,-96 550.41,-96 569.85,-96"/>
+<polygon fill="#002eff" stroke="#002eff" points="569.91,-99.5 579.91,-96 569.91,-92.5 569.91,-99.5"/>
 </g>
-<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge18" class="edge">
-<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#0000ff" d="M481.69,-138C496.07,-138 511.97,-138 527.6,-138"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="527.82,-141.5 537.82,-138 527.82,-134.5 527.82,-141.5"/>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#5c00ff" d="M508.67,-66.04C531.63,-70.96 558.37,-76.69 582.27,-81.81"/>
+<polygon fill="#5c00ff" stroke="#5c00ff" points="581.81,-85.29 592.33,-83.96 583.28,-78.45 581.81,-85.29"/>
 </g>
 <!-- proc~compute_knot_vector -->
 <g id="proc~~modify_wc~3~~CallsGraph_node19" class="node">
 <title>proc~compute_knot_vector</title>
 <g id="a_proc~~modify_wc~3~~CallsGraph_node19"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="678.5,-66 551.5,-66 551.5,-42 678.5,-42 678.5,-66"/>
-<text text-anchor="middle" x="615" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="713,-66 586,-66 586,-42 713,-42 713,-66"/>
+<text text-anchor="middle" x="649.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge19" class="edge">
 <title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#7f00ff" d="M481.69,-54C500.29,-54 521.41,-54 541.23,-54"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="541.45,-57.5 551.45,-54 541.45,-50.5 541.45,-57.5"/>
+<path fill="none" stroke="#5c00ff" d="M511.57,-54C531.72,-54 554.49,-54 575.59,-54"/>
+<polygon fill="#5c00ff" stroke="#5c00ff" points="575.8,-57.5 585.8,-54 575.8,-50.5 575.8,-57.5"/>
 </g>
 <!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge20" class="edge">
 <title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ff00ff" d="M480.94,-108.04C502.7,-112.93 528.01,-118.63 550.68,-123.74"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="550.02,-127.18 560.55,-125.96 551.56,-120.35 550.02,-127.18"/>
+<path fill="none" stroke="#e700ff" d="M511.57,-138C526.09,-138 541.97,-138 557.6,-138"/>
+<polygon fill="#e700ff" stroke="#e700ff" points="557.82,-141.5 567.82,-138 557.82,-134.5 557.82,-141.5"/>
 </g>
 <!-- proc~get_multiplicity~3 -->
-<g id="proc~~modify_wc~3~~CallsGraph_node20" class="node">
+<g id="proc~~modify_wc~3~~CallsGraph_node21" class="node">
 <title>proc~get_multiplicity~3</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node20"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="897,-150 728,-150 728,-126 897,-126 897,-150"/>
-<text text-anchor="middle" x="812.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node21"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="945,-149 767,-149 767,-125 945,-125 945,-149"/>
+<text text-anchor="middle" x="856" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge21" class="edge">
 <title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#ff0000" d="M692.15,-138C700.54,-138 709.17,-138 717.75,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="717.79,-141.5 727.79,-138 717.79,-134.5 717.79,-141.5"/>
+<path fill="none" stroke="#ff0000" d="M731.03,-137.61C739.47,-137.56 748.11,-137.52 756.71,-137.48"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="756.8,-140.98 766.78,-137.43 756.76,-133.98 756.8,-140.98"/>
 </g>
-<!-- proc~repelem -->
-<g id="proc~~modify_wc~3~~CallsGraph_node21" class="node">
-<title>proc~repelem</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node21"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="841,-66 784,-66 784,-42 841,-42 841,-66"/>
-<text text-anchor="middle" x="812.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<!-- interface~compute_multiplicity -->
+<g id="proc~~modify_wc~3~~CallsGraph_node20" class="node">
+<title>interface~compute_multiplicity</title>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node20"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
+<polygon fill="#a7506f" stroke="#a7506f" points="1105,-129 981,-129 981,-105 1105,-105 1105,-129"/>
+<text text-anchor="middle" x="1043" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge22" class="edge">
-<title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#00ffff" d="M678.66,-54C709.92,-54 746.69,-54 773.61,-54"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="773.78,-57.5 783.78,-54 773.78,-50.5 773.78,-57.5"/>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
+<path fill="none" stroke="#00ff00" d="M719.14,-99.68C789.69,-103.47 899.03,-109.33 970.57,-113.17"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="970.67,-116.68 980.85,-113.72 971.05,-109.69 970.67,-116.68"/>
 </g>
-<!-- interface~compute_multiplicity -->
+<!-- proc~repelem -->
 <g id="proc~~modify_wc~3~~CallsGraph_node22" class="node">
-<title>interface~compute_multiplicity</title>
-<g id="a_proc~~modify_wc~3~~CallsGraph_node22"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1057,-150 933,-150 933,-126 1057,-126 1057,-150"/>
-<text text-anchor="middle" x="995" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<title>proc~repelem</title>
+<g id="a_proc~~modify_wc~3~~CallsGraph_node22"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="884.5,-66 827.5,-66 827.5,-42 884.5,-42 884.5,-66"/>
+<text text-anchor="middle" x="856" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
-<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge23" class="edge">
-<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M897.15,-138C905.73,-138 914.4,-138 922.84,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="922.99,-141.5 932.99,-138 922.99,-134.5 922.99,-141.5"/>
+<title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
+<path fill="none" stroke="#0000ff" d="M713.25,-54C747.23,-54 788.1,-54 817.2,-54"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="817.36,-57.5 827.36,-54 817.35,-50.5 817.36,-57.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~modify_wc~3~~CallsGraph_node23" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~modify_wc~3~~CallsGraph_node23"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1223,-171 1093,-171 1093,-147 1223,-147 1223,-171"/>
-<text text-anchor="middle" x="1158" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1271,-150 1141,-150 1141,-126 1271,-126 1271,-150"/>
+<text text-anchor="middle" x="1206" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge24" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1057.33,-146C1065.69,-147.09 1074.35,-148.22 1082.92,-149.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1082.53,-152.82 1092.9,-150.64 1083.44,-145.88 1082.53,-152.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1105.33,-125C1113.69,-126.09 1122.35,-127.22 1130.92,-128.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1130.53,-131.82 1140.9,-129.64 1131.44,-124.88 1130.53,-131.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~modify_wc~3~~CallsGraph_node24" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~modify_wc~3~~CallsGraph_node24"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1223,-129 1093,-129 1093,-105 1223,-105 1223,-129"/>
-<text text-anchor="middle" x="1158" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1271,-108 1141,-108 1141,-84 1271,-84 1271,-108"/>
+<text text-anchor="middle" x="1206" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~modify_wc~3~~CallsGraph_edge25" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1057.33,-130C1065.69,-128.91 1074.35,-127.78 1082.92,-126.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1083.44,-130.12 1092.9,-125.36 1082.53,-123.18 1083.44,-130.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1105.33,-109C1113.69,-107.91 1122.35,-106.78 1130.92,-105.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1131.44,-109.12 1140.9,-104.36 1130.53,-102.18 1131.44,-109.12"/>
+</g>
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<g id="proc~~modify_wc~3~~CallsGraph_edge26" class="edge">
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
+<path fill="none" stroke="#00ff00" d="M945.17,-127.47C953.77,-126.54 962.42,-125.6 970.82,-124.7"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="971.36,-128.16 980.93,-123.6 970.61,-121.2 971.36,-128.16"/>
 </g>
 </g>
 </svg>
@@ -702,7 +708,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/modify_xc.html b/proc/modify_xc.html
index 917dbd7fa..b7c34d0e1 100644
--- a/proc/modify_xc.html
+++ b/proc/modify_xc.html
@@ -83,15 +83,15 @@ <h1>modify_Xc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">modify_Xc</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine modify_Xc(this, X, num, dir)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
         <tr>
             <td>
               <span class="anchor" id="variable-this~27"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-x"></span>
+              <span class="anchor" id="variable-x~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -203,7 +203,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~8"></span>
+              <span class="anchor" id="variable-dir~3"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -231,379 +231,373 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~modify_xc~~CallsGraph Pages: 1 -->
-<svg id="procmodify_xcCallsGraph" width="641pt" height="227pt"
- viewBox="0.00 0.00 641.00 227.06" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~modify_xc~~CallsGraph" class="graph" transform="scale(1.99 1.99) rotate(0) translate(4 448)">
+<svg id="procmodify_xcCallsGraph" width="641pt" height="258pt"
+ viewBox="0.00 0.00 641.00 257.86" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~modify_xc~~CallsGraph" class="graph" transform="scale(1.92 1.92) rotate(0) translate(4 490)">
 <title>proc~~modify_xc~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-448 1272,-448 1272,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-490 1224,-490 1224,4 -4,4"/>
 <!-- proc~modify_xc -->
 <g id="proc~~modify_xc~~CallsGraph_node1" class="node">
 <title>proc~modify_xc</title>
-<polygon fill="none" stroke="black" points="153,-276 0,-276 0,-252 153,-252 153,-276"/>
-<text text-anchor="middle" x="76.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%modify_Xc</text>
+<polygon fill="none" stroke="black" points="143,-318 0,-318 0,-294 143,-294 143,-318"/>
+<text text-anchor="middle" x="71.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%modify_Xc</text>
 </g>
 <!-- none~get_knot -->
 <g id="proc~~modify_xc~~CallsGraph_node2" class="node">
 <title>none~get_knot</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot" xlink:title="nurbs_volume%get_knot">
-<polygon fill="#a7506f" stroke="#a7506f" points="332,-402 189,-402 189,-378 332,-378 332,-402"/>
-<text text-anchor="middle" x="260.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot</text>
+<g id="a_proc~~modify_xc~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_knot" xlink:title="nurbs_curve%get_knot">
+<polygon fill="#a7506f" stroke="#a7506f" points="312,-444 179,-444 179,-420 312,-420 312,-444"/>
+<text text-anchor="middle" x="245.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~get_knot -->
 <g id="proc~~modify_xc~~CallsGraph_edge1" class="edge">
 <title>proc~modify_xc&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0000" d="M94.95,-276.08C127.16,-298.38 196.07,-346.09 233.69,-372.13"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="231.89,-375.14 242.1,-377.96 235.87,-369.39 231.89,-375.14"/>
+<path fill="none" stroke="#ff0000" d="M88.99,-318.08C119.3,-340.28 184.01,-387.69 219.66,-413.8"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="217.92,-416.87 228.06,-419.96 222.06,-411.22 217.92,-416.87"/>
 </g>
 <!-- none~get_wc -->
 <g id="proc~~modify_xc~~CallsGraph_node3" class="node">
 <title>none~get_wc</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node3"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_wc" xlink:title="nurbs_volume%get_Wc">
-<polygon fill="#a7506f" stroke="#a7506f" points="328.5,-318 192.5,-318 192.5,-294 328.5,-294 328.5,-318"/>
-<text text-anchor="middle" x="260.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wc</text>
+<g id="a_proc~~modify_xc~~CallsGraph_node3"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_wc" xlink:title="nurbs_curve%get_Wc">
+<polygon fill="#a7506f" stroke="#a7506f" points="309,-360 182,-360 182,-336 309,-336 309,-360"/>
+<text text-anchor="middle" x="245.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~get_wc -->
 <g id="proc~~modify_xc~~CallsGraph_edge2" class="edge">
 <title>proc~modify_xc&#45;&gt;none~get_wc</title>
-<path fill="none" stroke="#ff0000" d="M129.65,-276.04C150.79,-280.91 175.36,-286.58 197.41,-291.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="196.81,-295.12 207.34,-293.96 198.38,-288.3 196.81,-295.12"/>
+<path fill="none" stroke="#ff0000" d="M121.79,-318.04C141.58,-322.87 164.57,-328.48 185.26,-333.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="184.66,-336.99 195.2,-335.96 186.32,-330.19 184.66,-336.99"/>
 </g>
 <!-- none~get_xc -->
 <g id="proc~~modify_xc~~CallsGraph_node4" class="node">
 <title>none~get_xc</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_xc" xlink:title="nurbs_volume%get_Xc">
-<polygon fill="#a7506f" stroke="#a7506f" points="327,-255 194,-255 194,-231 327,-231 327,-255"/>
-<text text-anchor="middle" x="260.5" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc</text>
+<g id="a_proc~~modify_xc~~CallsGraph_node4"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_xc" xlink:title="nurbs_curve%get_Xc">
+<polygon fill="#a7506f" stroke="#a7506f" points="307.5,-297 183.5,-297 183.5,-273 307.5,-273 307.5,-297"/>
+<text text-anchor="middle" x="245.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~get_xc -->
 <g id="proc~~modify_xc~~CallsGraph_edge3" class="edge">
 <title>proc~modify_xc&#45;&gt;none~get_xc</title>
-<path fill="none" stroke="#ff0000" d="M153.1,-255.28C163.28,-254.1 173.73,-252.9 183.91,-251.72"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="184.45,-255.18 193.99,-250.56 183.65,-248.23 184.45,-255.18"/>
+<path fill="none" stroke="#ff0000" d="M143.45,-297.34C153.27,-296.14 163.36,-294.91 173.19,-293.71"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="173.81,-297.16 183.32,-292.47 172.97,-290.21 173.81,-297.16"/>
 </g>
 <!-- none~set -->
 <g id="proc~~modify_xc~~CallsGraph_node5" class="node">
 <title>none~set</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node5"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="317,-108 204,-108 204,-84 317,-84 317,-108"/>
-<text text-anchor="middle" x="260.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<g id="a_proc~~modify_xc~~CallsGraph_node5"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="297,-129 194,-129 194,-105 297,-105 297,-129"/>
+<text text-anchor="middle" x="245.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~set -->
 <g id="proc~~modify_xc~~CallsGraph_edge4" class="edge">
 <title>proc~modify_xc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M90.59,-251.92C121.79,-223.12 200.74,-150.24 238.61,-115.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="241.06,-117.78 246.04,-108.43 236.32,-112.64 241.06,-117.78"/>
+<path fill="none" stroke="#ff0000" d="M83.52,-293.89C112.46,-262.1 190.8,-176.01 226.43,-136.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="229.21,-139.01 233.35,-129.25 224.03,-134.29 229.21,-139.01"/>
 </g>
 <!-- proc~get_knot_all -->
 <g id="proc~~modify_xc~~CallsGraph_node6" class="node">
 <title>proc~get_knot_all</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node6"><a xlink:href="../proc/get_knot_all.html" xlink:title="nurbs_volume%get_knot_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="529,-444 368,-444 368,-420 529,-420 529,-444"/>
-<text text-anchor="middle" x="448.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot_all</text>
+<g id="a_proc~~modify_xc~~CallsGraph_node6"><a xlink:href="../proc/get_knot_all.html" xlink:title="nurbs_curve%get_knot_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="499,-486 348,-486 348,-462 499,-462 499,-486"/>
+<text text-anchor="middle" x="423.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot&#45;&gt;proc~get_knot_all -->
 <g id="proc~~modify_xc~~CallsGraph_edge5" class="edge">
 <title>none~get_knot&#45;&gt;proc~get_knot_all</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M314.8,-402.04C336.49,-406.93 361.74,-412.63 384.35,-417.74"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="383.67,-421.17 394.19,-419.96 385.21,-414.35 383.67,-421.17"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M296.93,-444.04C317.28,-448.89 340.92,-454.53 362.17,-459.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="361.52,-463.05 372.06,-461.96 363.14,-456.24 361.52,-463.05"/>
 </g>
 <!-- proc~get_knoti -->
 <g id="proc~~modify_xc~~CallsGraph_node7" class="node">
 <title>proc~get_knoti</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node7"><a xlink:href="../proc/get_knoti.html" xlink:title="nurbs_volume%get_knoti">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="521.5,-402 375.5,-402 375.5,-378 521.5,-378 521.5,-402"/>
-<text text-anchor="middle" x="448.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knoti</text>
+<g id="a_proc~~modify_xc~~CallsGraph_node7"><a xlink:href="../proc/get_knoti.html" xlink:title="nurbs_curve%get_knoti">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="491.5,-444 355.5,-444 355.5,-420 491.5,-420 491.5,-444"/>
+<text text-anchor="middle" x="423.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knoti</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot&#45;&gt;proc~get_knoti -->
 <g id="proc~~modify_xc~~CallsGraph_edge6" class="edge">
 <title>none~get_knot&#45;&gt;proc~get_knoti</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M332.08,-390C342.94,-390 354.23,-390 365.32,-390"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="365.42,-393.5 375.42,-390 365.42,-386.5 365.42,-393.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M312.04,-432C322.89,-432 334.22,-432 345.33,-432"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="345.44,-435.5 355.44,-432 345.44,-428.5 345.44,-435.5"/>
 </g>
 <!-- proc~get_wc_all -->
 <g id="proc~~modify_xc~~CallsGraph_node8" class="node">
 <title>proc~get_wc_all</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node8"><a xlink:href="../proc/get_wc_all.html" xlink:title="nurbs_volume%get_Wc_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="525.5,-360 371.5,-360 371.5,-336 525.5,-336 525.5,-360"/>
-<text text-anchor="middle" x="448.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wc_all</text>
+<g id="a_proc~~modify_xc~~CallsGraph_node8"><a xlink:href="../proc/get_wc_all.html" xlink:title="nurbs_curve%get_Wc_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="496,-402 351,-402 351,-378 496,-378 496,-402"/>
+<text text-anchor="middle" x="423.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wc_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc&#45;&gt;proc~get_wc_all -->
 <g id="proc~~modify_xc~~CallsGraph_edge7" class="edge">
 <title>none~get_wc&#45;&gt;proc~get_wc_all</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M314.8,-318.04C336.49,-322.93 361.74,-328.63 384.35,-333.74"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="383.67,-337.17 394.19,-335.96 385.21,-330.35 383.67,-337.17"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M296.93,-360.04C317.28,-364.89 340.92,-370.53 362.17,-375.6"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="361.52,-379.05 372.06,-377.96 363.14,-372.24 361.52,-379.05"/>
 </g>
 <!-- proc~get_wci -->
 <g id="proc~~modify_xc~~CallsGraph_node9" class="node">
 <title>proc~get_wci</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node9"><a xlink:href="../proc/get_wci.html" xlink:title="nurbs_volume%get_Wci">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="518,-318 379,-318 379,-294 518,-294 518,-318"/>
-<text text-anchor="middle" x="448.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wci</text>
+<g id="a_proc~~modify_xc~~CallsGraph_node9"><a xlink:href="../proc/get_wci.html" xlink:title="nurbs_curve%get_Wci">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="488.5,-360 358.5,-360 358.5,-336 488.5,-336 488.5,-360"/>
+<text text-anchor="middle" x="423.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wci</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc&#45;&gt;proc~get_wci -->
 <g id="proc~~modify_xc~~CallsGraph_edge8" class="edge">
 <title>none~get_wc&#45;&gt;proc~get_wci</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M328.65,-306C341.67,-306 355.42,-306 368.77,-306"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="368.88,-309.5 378.88,-306 368.88,-302.5 368.88,-309.5"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M309.05,-348C321.68,-348 335.07,-348 348.06,-348"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="348.37,-351.5 358.37,-348 348.37,-344.5 348.37,-351.5"/>
 </g>
 <!-- proc~get_xc_all -->
 <g id="proc~~modify_xc~~CallsGraph_node10" class="node">
 <title>proc~get_xc_all</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node10"><a xlink:href="../proc/get_xc_all.html" xlink:title="nurbs_volume%get_Xc_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="524,-276 373,-276 373,-252 524,-252 524,-276"/>
-<text text-anchor="middle" x="448.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc_all</text>
+<g id="a_proc~~modify_xc~~CallsGraph_node10"><a xlink:href="../proc/get_xc_all.html" xlink:title="nurbs_curve%get_Xc_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="494.5,-318 352.5,-318 352.5,-294 494.5,-294 494.5,-318"/>
+<text text-anchor="middle" x="423.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc&#45;&gt;proc~get_xc_all -->
 <g id="proc~~modify_xc~~CallsGraph_edge9" class="edge">
 <title>none~get_xc&#45;&gt;proc~get_xc_all</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M327.08,-250.4C338.68,-251.71 350.91,-253.09 362.95,-254.45"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="362.67,-257.94 373,-255.59 363.45,-250.99 362.67,-257.94"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M307.56,-292.29C318.77,-293.62 330.63,-295.04 342.3,-296.43"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="342.15,-299.94 352.49,-297.65 342.98,-292.99 342.15,-299.94"/>
 </g>
 <!-- proc~get_xci -->
 <g id="proc~~modify_xc~~CallsGraph_node11" class="node">
 <title>proc~get_xci</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node11"><a xlink:href="../proc/get_xci.html" xlink:title="nurbs_volume%get_Xci">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="516.5,-234 380.5,-234 380.5,-210 516.5,-210 516.5,-234"/>
-<text text-anchor="middle" x="448.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xci</text>
+<g id="a_proc~~modify_xc~~CallsGraph_node11"><a xlink:href="../proc/get_xci.html" xlink:title="nurbs_curve%get_Xci">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="487,-276 360,-276 360,-252 487,-252 487,-276"/>
+<text text-anchor="middle" x="423.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xci</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc&#45;&gt;proc~get_xci -->
 <g id="proc~~modify_xc~~CallsGraph_edge10" class="edge">
 <title>none~get_xc&#45;&gt;proc~get_xci</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M327.08,-235.6C340.96,-234.03 355.75,-232.36 370.03,-230.75"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="370.77,-234.19 380.32,-229.59 369.99,-227.23 370.77,-234.19"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M307.56,-277.71C321.14,-276.09 335.67,-274.36 349.67,-272.69"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="350.24,-276.15 359.75,-271.49 349.41,-269.2 350.24,-276.15"/>
 </g>
 <!-- proc~get_xcid -->
 <g id="proc~~modify_xc~~CallsGraph_node12" class="node">
 <title>proc~get_xcid</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node12"><a xlink:href="../proc/get_xcid.html" xlink:title="nurbs_volume%get_Xcid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="520,-192 377,-192 377,-168 520,-168 520,-192"/>
-<text text-anchor="middle" x="448.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xcid</text>
+<g id="a_proc~~modify_xc~~CallsGraph_node12"><a xlink:href="../proc/get_xcid.html" xlink:title="nurbs_curve%get_Xcid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="490,-234 357,-234 357,-210 490,-210 490,-234"/>
+<text text-anchor="middle" x="423.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xcid</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc&#45;&gt;proc~get_xcid -->
 <g id="proc~~modify_xc~~CallsGraph_edge11" class="edge">
 <title>none~get_xc&#45;&gt;proc~get_xcid</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M289.65,-230.85C310.93,-221.93 340.99,-209.86 368,-201 374.47,-198.88 381.29,-196.82 388.1,-194.87"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="389.35,-198.16 398.04,-192.1 387.47,-191.41 389.35,-198.16"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M273.31,-272.89C293.58,-263.99 322.23,-251.93 348,-243 354,-240.92 360.32,-238.89 366.64,-236.97"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="367.94,-240.24 376.53,-234.04 365.95,-233.53 367.94,-240.24"/>
 </g>
 <!-- proc~set1 -->
 <g id="proc~~modify_xc~~CallsGraph_node13" class="node">
 <title>proc~set1</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node13"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="508.5,-108 388.5,-108 388.5,-84 508.5,-84 508.5,-108"/>
-<text text-anchor="middle" x="448.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
+<g id="a_proc~~modify_xc~~CallsGraph_node13"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="478.5,-192 368.5,-192 368.5,-168 478.5,-168 478.5,-192"/>
+<text text-anchor="middle" x="423.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set1 -->
 <g id="proc~~modify_xc~~CallsGraph_edge12" class="edge">
 <title>none~set&#45;&gt;proc~set1</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M317.05,-96C336.28,-96 358.08,-96 378.27,-96"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="378.35,-99.5 388.35,-96 378.35,-92.5 378.35,-99.5"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M273.31,-129.11C293.58,-138.01 322.23,-150.07 348,-159 354,-161.08 360.32,-163.11 366.64,-165.03"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="365.95,-168.47 376.53,-167.96 367.94,-161.76 365.95,-168.47"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set1a -->
 <g id="proc~~modify_xc~~CallsGraph_node14" class="node">
+<title>proc~set1a</title>
+<g id="a_proc~~modify_xc~~CallsGraph_node14"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="482,-150 365,-150 365,-126 482,-126 482,-150"/>
+<text text-anchor="middle" x="423.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+</a>
+</g>
+</g>
+<!-- none~set&#45;&gt;proc~set1a -->
+<g id="proc~~modify_xc~~CallsGraph_edge13" class="edge">
+<title>none~set&#45;&gt;proc~set1a</title>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M297.41,-123.07C315.31,-125.21 335.71,-127.64 354.78,-129.92"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="354.56,-133.42 364.9,-131.13 355.39,-126.47 354.56,-133.42"/>
+</g>
+<!-- proc~set2 -->
+<g id="proc~~modify_xc~~CallsGraph_node15" class="node">
 <title>proc~set2</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node14"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="508.5,-66 388.5,-66 388.5,-42 508.5,-42 508.5,-66"/>
-<text text-anchor="middle" x="448.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
+<g id="a_proc~~modify_xc~~CallsGraph_node15"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="478.5,-66 368.5,-66 368.5,-42 478.5,-42 478.5,-66"/>
+<text text-anchor="middle" x="423.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set2 -->
-<g id="proc~~modify_xc~~CallsGraph_edge13" class="edge">
+<g id="proc~~modify_xc~~CallsGraph_edge14" class="edge">
 <title>none~set&#45;&gt;proc~set2</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M314.8,-83.96C336.49,-79.07 361.74,-73.37 384.35,-68.26"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="385.21,-71.65 394.19,-66.04 383.67,-64.83 385.21,-71.65"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M273.31,-104.89C293.58,-95.99 322.23,-83.93 348,-75 354,-72.92 360.32,-70.89 366.64,-68.97"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="367.94,-72.24 376.53,-66.04 365.95,-65.53 367.94,-72.24"/>
 </g>
 <!-- proc~set3 -->
-<g id="proc~~modify_xc~~CallsGraph_node15" class="node">
+<g id="proc~~modify_xc~~CallsGraph_node16" class="node">
 <title>proc~set3</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node15"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="508.5,-150 388.5,-150 388.5,-126 508.5,-126 508.5,-150"/>
-<text text-anchor="middle" x="448.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
+<g id="a_proc~~modify_xc~~CallsGraph_node16"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="478.5,-108 368.5,-108 368.5,-84 478.5,-84 478.5,-108"/>
+<text text-anchor="middle" x="423.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set3 -->
-<g id="proc~~modify_xc~~CallsGraph_edge14" class="edge">
+<g id="proc~~modify_xc~~CallsGraph_edge15" class="edge">
 <title>none~set&#45;&gt;proc~set3</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M314.8,-108.04C336.49,-112.93 361.74,-118.63 384.35,-123.74"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="383.67,-127.17 394.19,-125.96 385.21,-120.35 383.67,-127.17"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M297.41,-110.93C316.43,-108.66 338.28,-106.05 358.34,-103.66"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="358.82,-107.12 368.33,-102.46 357.99,-100.17 358.82,-107.12"/>
 </g>
 <!-- proc~set4 -->
-<g id="proc~~modify_xc~~CallsGraph_node16" class="node">
+<g id="proc~~modify_xc~~CallsGraph_node17" class="node">
 <title>proc~set4</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node16"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="508.5,-24 388.5,-24 388.5,0 508.5,0 508.5,-24"/>
-<text text-anchor="middle" x="448.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
+<g id="a_proc~~modify_xc~~CallsGraph_node17"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="478.5,-24 368.5,-24 368.5,0 478.5,0 478.5,-24"/>
+<text text-anchor="middle" x="423.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set4 -->
-<g id="proc~~modify_xc~~CallsGraph_edge15" class="edge">
+<g id="proc~~modify_xc~~CallsGraph_edge16" class="edge">
 <title>none~set&#45;&gt;proc~set4</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M278.44,-83.97C298.82,-69.98 334.51,-47.01 368,-33 373.1,-30.87 378.48,-28.9 383.94,-27.09"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="385.29,-30.33 393.8,-24.02 383.21,-23.65 385.29,-30.33"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M257.8,-104.85C275.39,-86.63 311.13,-52.34 348,-33 351.75,-31.03 355.7,-29.23 359.76,-27.59"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="361.18,-30.79 369.34,-24.02 358.75,-24.23 361.18,-30.79"/>
 </g>
 <!-- proc~cmp_degree -->
-<g id="proc~~modify_xc~~CallsGraph_node17" class="node">
+<g id="proc~~modify_xc~~CallsGraph_node18" class="node">
 <title>proc~cmp_degree</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node17"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="728,-150 565,-150 565,-126 728,-126 728,-150"/>
-<text text-anchor="middle" x="646.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
+<g id="a_proc~~modify_xc~~CallsGraph_node18"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="689,-150 535,-150 535,-126 689,-126 689,-150"/>
+<text text-anchor="middle" x="612" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~set1&#45;&gt;proc~cmp_degree -->
-<g id="proc~~modify_xc~~CallsGraph_edge16" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#002eff" d="M505.67,-108.04C528.63,-112.96 555.37,-118.69 579.27,-123.81"/>
-<polygon fill="#002eff" stroke="#002eff" points="578.81,-127.29 589.33,-125.96 580.28,-120.45 578.81,-127.29"/>
-</g>
-<!-- proc~cmp_nc -->
-<g id="proc~~modify_xc~~CallsGraph_node18" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node18"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="716,-108 577,-108 577,-84 716,-84 716,-108"/>
-<text text-anchor="middle" x="646.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
-</a>
-</g>
-</g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
 <g id="proc~~modify_xc~~CallsGraph_edge17" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#002eff" d="M508.57,-96C526.91,-96 547.41,-96 566.85,-96"/>
-<polygon fill="#002eff" stroke="#002eff" points="566.91,-99.5 576.91,-96 566.91,-92.5 566.91,-99.5"/>
+<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#007fff" d="M477.94,-167.96C499.7,-163.07 525.01,-157.37 547.68,-152.26"/>
+<polygon fill="#007fff" stroke="#007fff" points="548.56,-155.65 557.55,-150.04 547.02,-148.82 548.56,-155.65"/>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
 <g id="proc~~modify_xc~~CallsGraph_edge18" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#5c00ff" d="M505.67,-66.04C528.63,-70.96 555.37,-76.69 579.27,-81.81"/>
-<polygon fill="#5c00ff" stroke="#5c00ff" points="578.81,-85.29 589.33,-83.96 580.28,-78.45 578.81,-85.29"/>
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#0000ff" d="M482.23,-138C495.58,-138 510.06,-138 524.34,-138"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="524.68,-141.5 534.68,-138 524.68,-134.5 524.68,-141.5"/>
 </g>
 <!-- proc~compute_knot_vector -->
 <g id="proc~~modify_xc~~CallsGraph_node19" class="node">
 <title>proc~compute_knot_vector</title>
 <g id="a_proc~~modify_xc~~CallsGraph_node19"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="710,-66 583,-66 583,-42 710,-42 710,-66"/>
-<text text-anchor="middle" x="646.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="675.5,-66 548.5,-66 548.5,-42 675.5,-42 675.5,-66"/>
+<text text-anchor="middle" x="612" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~modify_xc~~CallsGraph_edge19" class="edge">
 <title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#5c00ff" d="M508.57,-54C528.72,-54 551.49,-54 572.59,-54"/>
-<polygon fill="#5c00ff" stroke="#5c00ff" points="572.8,-57.5 582.8,-54 572.8,-50.5 572.8,-57.5"/>
+<path fill="none" stroke="#7f00ff" d="M478.69,-54C497.29,-54 518.41,-54 538.23,-54"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="538.45,-57.5 548.45,-54 538.45,-50.5 538.45,-57.5"/>
 </g>
 <!-- proc~set3&#45;&gt;proc~cmp_degree -->
 <g id="proc~~modify_xc~~CallsGraph_edge20" class="edge">
 <title>proc~set3&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#e700ff" d="M508.57,-138C523.09,-138 538.97,-138 554.6,-138"/>
-<polygon fill="#e700ff" stroke="#e700ff" points="554.82,-141.5 564.82,-138 554.82,-134.5 554.82,-141.5"/>
+<path fill="none" stroke="#ff00ff" d="M477.94,-108.04C499.7,-112.93 525.01,-118.63 547.68,-123.74"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="547.02,-127.18 557.55,-125.96 548.56,-120.35 547.02,-127.18"/>
 </g>
 <!-- proc~get_multiplicity -->
-<g id="proc~~modify_xc~~CallsGraph_node21" class="node">
+<g id="proc~~modify_xc~~CallsGraph_node20" class="node">
 <title>proc~get_multiplicity</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node21"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="942,-149 764,-149 764,-125 942,-125 942,-149"/>
-<text text-anchor="middle" x="853" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
+<g id="a_proc~~modify_xc~~CallsGraph_node20"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="894,-150 725,-150 725,-126 894,-126 894,-150"/>
+<text text-anchor="middle" x="809.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="proc~~modify_xc~~CallsGraph_edge21" class="edge">
 <title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M728.03,-137.61C736.47,-137.56 745.11,-137.52 753.71,-137.48"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="753.8,-140.98 763.78,-137.43 753.76,-133.98 753.8,-140.98"/>
+<path fill="none" stroke="#ff0000" d="M689.15,-138C697.54,-138 706.17,-138 714.75,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="714.79,-141.5 724.79,-138 714.79,-134.5 714.79,-141.5"/>
 </g>
-<!-- interface~compute_multiplicity -->
-<g id="proc~~modify_xc~~CallsGraph_node20" class="node">
-<title>interface~compute_multiplicity</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node20"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1102,-129 978,-129 978,-105 1102,-105 1102,-129"/>
-<text text-anchor="middle" x="1040" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<!-- proc~repelem -->
+<g id="proc~~modify_xc~~CallsGraph_node21" class="node">
+<title>proc~repelem</title>
+<g id="a_proc~~modify_xc~~CallsGraph_node21"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="838,-66 781,-66 781,-42 838,-42 838,-66"/>
+<text text-anchor="middle" x="809.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
 <g id="proc~~modify_xc~~CallsGraph_edge22" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00ff00" d="M716.14,-99.68C786.69,-103.47 896.03,-109.33 967.57,-113.17"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="967.67,-116.68 977.85,-113.72 968.05,-109.69 967.67,-116.68"/>
+<title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
+<path fill="none" stroke="#00ffff" d="M675.66,-54C706.92,-54 743.69,-54 770.61,-54"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="770.78,-57.5 780.78,-54 770.78,-50.5 770.78,-57.5"/>
 </g>
-<!-- proc~repelem -->
+<!-- interface~compute_multiplicity -->
 <g id="proc~~modify_xc~~CallsGraph_node22" class="node">
-<title>proc~repelem</title>
-<g id="a_proc~~modify_xc~~CallsGraph_node22"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="881.5,-66 824.5,-66 824.5,-42 881.5,-42 881.5,-66"/>
-<text text-anchor="middle" x="853" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<title>interface~compute_multiplicity</title>
+<g id="a_proc~~modify_xc~~CallsGraph_node22"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
+<polygon fill="#a7506f" stroke="#a7506f" points="1054,-150 930,-150 930,-126 1054,-126 1054,-150"/>
+<text text-anchor="middle" x="992" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
+<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~modify_xc~~CallsGraph_edge23" class="edge">
-<title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#0000ff" d="M710.25,-54C744.23,-54 785.1,-54 814.2,-54"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="814.36,-57.5 824.36,-54 814.35,-50.5 814.36,-57.5"/>
+<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
+<path fill="none" stroke="#ff0000" d="M894.15,-138C902.73,-138 911.4,-138 919.84,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="919.99,-141.5 929.99,-138 919.99,-134.5 919.99,-141.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~modify_xc~~CallsGraph_node23" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~modify_xc~~CallsGraph_node23"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1268,-150 1138,-150 1138,-126 1268,-126 1268,-150"/>
-<text text-anchor="middle" x="1203" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1220,-171 1090,-171 1090,-147 1220,-147 1220,-171"/>
+<text text-anchor="middle" x="1155" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~modify_xc~~CallsGraph_edge24" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1102.33,-125C1110.69,-126.09 1119.35,-127.22 1127.92,-128.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1127.53,-131.82 1137.9,-129.64 1128.44,-124.88 1127.53,-131.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1054.33,-146C1062.69,-147.09 1071.35,-148.22 1079.92,-149.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1079.53,-152.82 1089.9,-150.64 1080.44,-145.88 1079.53,-152.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~modify_xc~~CallsGraph_node24" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~modify_xc~~CallsGraph_node24"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1268,-108 1138,-108 1138,-84 1268,-84 1268,-108"/>
-<text text-anchor="middle" x="1203" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1220,-129 1090,-129 1090,-105 1220,-105 1220,-129"/>
+<text text-anchor="middle" x="1155" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~modify_xc~~CallsGraph_edge25" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1102.33,-109C1110.69,-107.91 1119.35,-106.78 1127.92,-105.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1128.44,-109.12 1137.9,-104.36 1127.53,-102.18 1128.44,-109.12"/>
-</g>
-<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~modify_xc~~CallsGraph_edge26" class="edge">
-<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00ff00" d="M942.17,-127.47C950.77,-126.54 959.42,-125.6 967.82,-124.7"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="968.36,-128.16 977.93,-123.6 967.61,-121.2 968.36,-128.16"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1054.33,-130C1062.69,-128.91 1071.35,-127.78 1079.92,-126.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1080.44,-130.12 1089.9,-125.36 1079.53,-123.18 1080.44,-130.12"/>
 </g>
 </g>
 </svg>
@@ -723,7 +717,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/modify_xc~2.html b/proc/modify_xc~2.html
index eb4b7cda9..b020dded4 100644
--- a/proc/modify_xc~2.html
+++ b/proc/modify_xc~2.html
@@ -83,15 +83,15 @@ <h1>modify_Xc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">modify_Xc</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine modify_Xc(this, X, num, dir)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~95"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~88"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-x~4"></span>
+              <span class="anchor" id="variable-x~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -203,7 +203,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~23"></span>
+              <span class="anchor" id="variable-dir~11"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -240,14 +240,14 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~modify_xc~2~~CallsGraph_node1" class="node">
 <title>proc~modify_xc~2</title>
 <polygon fill="none" stroke="black" points="153,-276 0,-276 0,-252 153,-252 153,-276"/>
-<text text-anchor="middle" x="76.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%modify_Xc</text>
+<text text-anchor="middle" x="76.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%modify_Xc</text>
 </g>
 <!-- none~get_knot~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node2" class="node">
 <title>none~get_knot~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~2" xlink:title="nurbs_surface%get_knot">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot~2" xlink:title="nurbs_volume%get_knot">
 <polygon fill="#a7506f" stroke="#a7506f" points="332,-402 189,-402 189,-378 332,-378 332,-402"/>
-<text text-anchor="middle" x="260.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
+<text text-anchor="middle" x="260.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot</text>
 </a>
 </g>
 </g>
@@ -260,9 +260,9 @@ <h3 class="card-title">Calls</h3>
 <!-- none~get_wc~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node3" class="node">
 <title>none~get_wc~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node3"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_wc~2" xlink:title="nurbs_surface%get_Wc">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node3"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_wc~2" xlink:title="nurbs_volume%get_Wc">
 <polygon fill="#a7506f" stroke="#a7506f" points="328.5,-318 192.5,-318 192.5,-294 328.5,-294 328.5,-318"/>
-<text text-anchor="middle" x="260.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc</text>
+<text text-anchor="middle" x="260.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wc</text>
 </a>
 </g>
 </g>
@@ -275,9 +275,9 @@ <h3 class="card-title">Calls</h3>
 <!-- none~get_xc~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node4" class="node">
 <title>none~get_xc~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xc~2" xlink:title="nurbs_surface%get_Xc">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_xc~2" xlink:title="nurbs_volume%get_Xc">
 <polygon fill="#a7506f" stroke="#a7506f" points="327,-255 194,-255 194,-231 327,-231 327,-255"/>
-<text text-anchor="middle" x="260.5" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc</text>
+<text text-anchor="middle" x="260.5" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc</text>
 </a>
 </g>
 </g>
@@ -290,9 +290,9 @@ <h3 class="card-title">Calls</h3>
 <!-- none~set~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node5" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node5"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node5"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="317,-108 204,-108 204,-84 317,-84 317,-108"/>
-<text text-anchor="middle" x="260.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<text text-anchor="middle" x="260.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
@@ -305,9 +305,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_knot_all~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node6" class="node">
 <title>proc~get_knot_all~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node6"><a xlink:href="../proc/get_knot_all~2.html" xlink:title="nurbs_surface%get_knot_all">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node6"><a xlink:href="../proc/get_knot_all~2.html" xlink:title="nurbs_volume%get_knot_all">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="529,-444 368,-444 368,-420 529,-420 529,-444"/>
-<text text-anchor="middle" x="448.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot_all</text>
+<text text-anchor="middle" x="448.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot_all</text>
 </a>
 </g>
 </g>
@@ -320,9 +320,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_knoti~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node7" class="node">
 <title>proc~get_knoti~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node7"><a xlink:href="../proc/get_knoti~2.html" xlink:title="nurbs_surface%get_knoti">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node7"><a xlink:href="../proc/get_knoti~2.html" xlink:title="nurbs_volume%get_knoti">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="521.5,-402 375.5,-402 375.5,-378 521.5,-378 521.5,-402"/>
-<text text-anchor="middle" x="448.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knoti</text>
+<text text-anchor="middle" x="448.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knoti</text>
 </a>
 </g>
 </g>
@@ -335,9 +335,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_wc_all~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node8" class="node">
 <title>proc~get_wc_all~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node8"><a xlink:href="../proc/get_wc_all~2.html" xlink:title="nurbs_surface%get_Wc_all">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node8"><a xlink:href="../proc/get_wc_all~2.html" xlink:title="nurbs_volume%get_Wc_all">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="525.5,-360 371.5,-360 371.5,-336 525.5,-336 525.5,-360"/>
-<text text-anchor="middle" x="448.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc_all</text>
+<text text-anchor="middle" x="448.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wc_all</text>
 </a>
 </g>
 </g>
@@ -350,9 +350,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_wci~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node9" class="node">
 <title>proc~get_wci~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node9"><a xlink:href="../proc/get_wci~2.html" xlink:title="nurbs_surface%get_Wci">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node9"><a xlink:href="../proc/get_wci~2.html" xlink:title="nurbs_volume%get_Wci">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="518,-318 379,-318 379,-294 518,-294 518,-318"/>
-<text text-anchor="middle" x="448.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wci</text>
+<text text-anchor="middle" x="448.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Wci</text>
 </a>
 </g>
 </g>
@@ -365,9 +365,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_xc_all~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node10" class="node">
 <title>proc~get_xc_all~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node10"><a xlink:href="../proc/get_xc_all~2.html" xlink:title="nurbs_surface%get_Xc_all">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node10"><a xlink:href="../proc/get_xc_all~2.html" xlink:title="nurbs_volume%get_Xc_all">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="524,-276 373,-276 373,-252 524,-252 524,-276"/>
-<text text-anchor="middle" x="448.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc_all</text>
+<text text-anchor="middle" x="448.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xc_all</text>
 </a>
 </g>
 </g>
@@ -380,9 +380,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_xcid~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node11" class="node">
 <title>proc~get_xcid~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node11"><a xlink:href="../proc/get_xcid~2.html" xlink:title="nurbs_surface%get_Xcid">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node11"><a xlink:href="../proc/get_xcid~2.html" xlink:title="nurbs_volume%get_Xcid">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="520,-234 377,-234 377,-210 520,-210 520,-234"/>
-<text text-anchor="middle" x="448.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xcid</text>
+<text text-anchor="middle" x="448.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xcid</text>
 </a>
 </g>
 </g>
@@ -395,9 +395,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_xci~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node12" class="node">
 <title>proc~get_xci~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node12"><a xlink:href="../proc/get_xci~2.html" xlink:title="nurbs_surface%get_Xci">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node12"><a xlink:href="../proc/get_xci~2.html" xlink:title="nurbs_volume%get_Xci">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="516.5,-192 380.5,-192 380.5,-168 516.5,-168 516.5,-192"/>
-<text text-anchor="middle" x="448.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xci</text>
+<text text-anchor="middle" x="448.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_Xci</text>
 </a>
 </g>
 </g>
@@ -410,9 +410,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~set1~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node13" class="node">
 <title>proc~set1~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node13"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node13"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="508.5,-108 388.5,-108 388.5,-84 508.5,-84 508.5,-108"/>
-<text text-anchor="middle" x="448.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
+<text text-anchor="middle" x="448.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
@@ -425,9 +425,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~set2~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node14" class="node">
 <title>proc~set2~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node14"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node14"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="508.5,-66 388.5,-66 388.5,-42 508.5,-42 508.5,-66"/>
-<text text-anchor="middle" x="448.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
+<text text-anchor="middle" x="448.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
@@ -440,9 +440,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~set3~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node15" class="node">
 <title>proc~set3~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node15"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node15"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="508.5,-150 388.5,-150 388.5,-126 508.5,-126 508.5,-150"/>
-<text text-anchor="middle" x="448.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
+<text text-anchor="middle" x="448.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
@@ -455,9 +455,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~set4~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node16" class="node">
 <title>proc~set4~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node16"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node16"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="508.5,-24 388.5,-24 388.5,0 508.5,0 508.5,-24"/>
-<text text-anchor="middle" x="448.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
+<text text-anchor="middle" x="448.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
@@ -470,9 +470,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~cmp_degree~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node17" class="node">
 <title>proc~cmp_degree~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node17"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node17"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="728,-150 565,-150 565,-126 728,-126 728,-150"/>
-<text text-anchor="middle" x="646.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
+<text text-anchor="middle" x="646.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
@@ -485,9 +485,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~cmp_nc~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node18" class="node">
 <title>proc~cmp_nc~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node18"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node18"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="716,-108 577,-108 577,-84 716,-84 716,-108"/>
-<text text-anchor="middle" x="646.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+<text text-anchor="middle" x="646.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
@@ -527,9 +527,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_multiplicity~2 -->
 <g id="proc~~modify_xc~2~~CallsGraph_node21" class="node">
 <title>proc~get_multiplicity~2</title>
-<g id="a_proc~~modify_xc~2~~CallsGraph_node21"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<g id="a_proc~~modify_xc~2~~CallsGraph_node21"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="942,-149 764,-149 764,-125 942,-125 942,-149"/>
-<text text-anchor="middle" x="853" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
+<text text-anchor="middle" x="853" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
@@ -679,126 +679,6 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
 </g>
 </svg>
 
-<p>Solid arrows point from a procedure to one which it calls. Dashed 
-arrows point from an interface to procedures which implement that interface.
-This could include the module procedures in a generic interface or the
-implementation in a submodule of an interface in a parent module.
-</p>
- Where possible, edges connecting nodes are
-given different colours to make them easier to distinguish in
-large graphs.</div>
-            </div>
-          </div>
-        </div>
-      </div>
-    </div>
-    <div class="card">
-      <div class="card-header">
-  <h3 class="card-title">Called by</h3>
-      </div>
-      <div class="card-body">
-  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.43.0 (0)
- -->
-<!-- Title: proc~~modify_xc~2~~CalledByGraph Pages: 1 -->
-<svg id="procmodify_xc2CalledByGraph" width="291pt" height="32pt"
- viewBox="0.00 0.00 291.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~modify_xc~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
-<title>proc~~modify_xc~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 287,-28 287,4 -4,4"/>
-<!-- proc~modify_xc~2 -->
-<g id="proc~~modify_xc~2~~CalledByGraph_node1" class="node">
-<title>proc~modify_xc~2</title>
-<polygon fill="none" stroke="black" points="283,-24 130,-24 130,0 283,0 283,-24"/>
-<text text-anchor="middle" x="206.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%modify_Xc</text>
-</g>
-<!-- program~example_ppm3 -->
-<g id="proc~~modify_xc~2~~CalledByGraph_node2" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~modify_xc~2~~CalledByGraph_node2"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
-<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
-<g id="proc~~modify_xc~2~~CalledByGraph_edge1" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M94.4,-12C102.43,-12 110.99,-12 119.67,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="119.89,-15.5 129.89,-12 119.89,-8.5 119.89,-15.5"/>
-</g>
-</g>
-</svg>
-</div>          <div>
-            <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
-          </div>
-          <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
-            <div class="modal-dialog modal-lg" role="document">
-              <div class="modal-content">
-                <div class="modal-header">
-                  <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
-                  <button type="button" class="btn-close" data-bs-dismiss="modal" aria-label="Close"></button>
-                </div>
-                <div class="modal-body">
-<p>Nodes of different colours represent the following: </p>
-<?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.43.0 (0)
- -->
-<!-- Title: Graph Key Pages: 1 -->
-<svg width="641pt" height="28pt"
- viewBox="0.00 0.00 641.00 27.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="graph0" class="graph" transform="scale(1.16 1.16) rotate(0) translate(4 28)">
-<title>Graph Key</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 741.5,-28 741.5,4 -4,4"/>
-<!-- Subroutine -->
-<g id="node1" class="node">
-<title>Subroutine</title>
-<polygon fill="#d9534f" stroke="#d9534f" points="70,-24 0,-24 0,0 70,0 70,-24"/>
-<text text-anchor="middle" x="35" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
-</g>
-<!-- Function -->
-<g id="node2" class="node">
-<title>Function</title>
-<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-24 88,-24 88,0 146,0 146,-24"/>
-<text text-anchor="middle" x="117" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
-</g>
-<!-- Interface -->
-<g id="node3" class="node">
-<title>Interface</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="225.5,-24 164.5,-24 164.5,0 225.5,0 225.5,-24"/>
-<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
-</g>
-<!-- Type Bound Procedure -->
-<g id="node4" class="node">
-<title>Type Bound Procedure</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="374,-24 244,-24 244,0 374,0 374,-24"/>
-<text text-anchor="middle" x="309" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Type Bound Procedure</text>
-</g>
-<!-- Unknown Procedure Type -->
-<g id="node5" class="node">
-<title>Unknown Procedure Type</title>
-<polygon fill="#777777" stroke="#777777" points="537.5,-24 392.5,-24 392.5,0 537.5,0 537.5,-24"/>
-<text text-anchor="middle" x="465" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
-</g>
-<!-- Program -->
-<g id="node6" class="node">
-<title>Program</title>
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-24 556,-24 556,0 614,0 614,-24"/>
-<text text-anchor="middle" x="585" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
-</g>
-<!-- This Page&#39;s Entity -->
-<g id="node7" class="node">
-<title>This Page&#39;s Entity</title>
-<polygon fill="none" stroke="black" points="737.5,-24 632.5,-24 632.5,0 737.5,0 737.5,-24"/>
-<text text-anchor="middle" x="685" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
-</g>
-</g>
-</svg>
-
 <p>Solid arrows point from a procedure to one which it calls. Dashed 
 arrows point from an interface to procedures which implement that interface.
 This could include the module procedures in a generic interface or the
@@ -843,7 +723,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/modify_xc~3.html b/proc/modify_xc~3.html
index b87a7d86d..413c95122 100644
--- a/proc/modify_xc~3.html
+++ b/proc/modify_xc~3.html
@@ -83,15 +83,15 @@ <h1>modify_Xc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">modify_Xc</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine modify_Xc(this, X, num, dir)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~158"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~156"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -203,7 +203,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~33"></span>
+              <span class="anchor" id="variable-dir~26"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -231,373 +231,379 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~modify_xc~3~~CallsGraph Pages: 1 -->
-<svg id="procmodify_xc3CallsGraph" width="641pt" height="258pt"
- viewBox="0.00 0.00 641.00 257.86" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~modify_xc~3~~CallsGraph" class="graph" transform="scale(1.92 1.92) rotate(0) translate(4 490)">
+<svg id="procmodify_xc3CallsGraph" width="641pt" height="227pt"
+ viewBox="0.00 0.00 641.00 227.06" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~modify_xc~3~~CallsGraph" class="graph" transform="scale(1.99 1.99) rotate(0) translate(4 448)">
 <title>proc~~modify_xc~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-490 1224,-490 1224,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-448 1272,-448 1272,4 -4,4"/>
 <!-- proc~modify_xc~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_node1" class="node">
 <title>proc~modify_xc~3</title>
-<polygon fill="none" stroke="black" points="143,-318 0,-318 0,-294 143,-294 143,-318"/>
-<text text-anchor="middle" x="71.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%modify_Xc</text>
+<polygon fill="none" stroke="black" points="153,-276 0,-276 0,-252 153,-252 153,-276"/>
+<text text-anchor="middle" x="76.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%modify_Xc</text>
 </g>
 <!-- none~get_knot~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_node2" class="node">
 <title>none~get_knot~3</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_knot~3" xlink:title="nurbs_curve%get_knot">
-<polygon fill="#a7506f" stroke="#a7506f" points="312,-444 179,-444 179,-420 312,-420 312,-444"/>
-<text text-anchor="middle" x="245.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot</text>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~3" xlink:title="nurbs_surface%get_knot">
+<polygon fill="#a7506f" stroke="#a7506f" points="332,-402 189,-402 189,-378 332,-378 332,-402"/>
+<text text-anchor="middle" x="260.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~get_knot~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge1" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~get_knot~3</title>
-<path fill="none" stroke="#ff0000" d="M88.99,-318.08C119.3,-340.28 184.01,-387.69 219.66,-413.8"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="217.92,-416.87 228.06,-419.96 222.06,-411.22 217.92,-416.87"/>
+<path fill="none" stroke="#ff0000" d="M94.95,-276.08C127.16,-298.38 196.07,-346.09 233.69,-372.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="231.89,-375.14 242.1,-377.96 235.87,-369.39 231.89,-375.14"/>
 </g>
 <!-- none~get_wc~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_node3" class="node">
 <title>none~get_wc~3</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node3"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_wc~3" xlink:title="nurbs_curve%get_Wc">
-<polygon fill="#a7506f" stroke="#a7506f" points="309,-360 182,-360 182,-336 309,-336 309,-360"/>
-<text text-anchor="middle" x="245.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wc</text>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node3"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_wc~3" xlink:title="nurbs_surface%get_Wc">
+<polygon fill="#a7506f" stroke="#a7506f" points="328.5,-318 192.5,-318 192.5,-294 328.5,-294 328.5,-318"/>
+<text text-anchor="middle" x="260.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~get_wc~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge2" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~get_wc~3</title>
-<path fill="none" stroke="#ff0000" d="M121.79,-318.04C141.58,-322.87 164.57,-328.48 185.26,-333.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="184.66,-336.99 195.2,-335.96 186.32,-330.19 184.66,-336.99"/>
+<path fill="none" stroke="#ff0000" d="M129.65,-276.04C150.79,-280.91 175.36,-286.58 197.41,-291.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="196.81,-295.12 207.34,-293.96 198.38,-288.3 196.81,-295.12"/>
 </g>
 <!-- none~get_xc~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_node4" class="node">
 <title>none~get_xc~3</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node4"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_xc~3" xlink:title="nurbs_curve%get_Xc">
-<polygon fill="#a7506f" stroke="#a7506f" points="307.5,-297 183.5,-297 183.5,-273 307.5,-273 307.5,-297"/>
-<text text-anchor="middle" x="245.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc</text>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xc~3" xlink:title="nurbs_surface%get_Xc">
+<polygon fill="#a7506f" stroke="#a7506f" points="327,-255 194,-255 194,-231 327,-231 327,-255"/>
+<text text-anchor="middle" x="260.5" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~get_xc~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge3" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~get_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M143.45,-297.34C153.27,-296.14 163.36,-294.91 173.19,-293.71"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="173.81,-297.16 183.32,-292.47 172.97,-290.21 173.81,-297.16"/>
+<path fill="none" stroke="#ff0000" d="M153.1,-255.28C163.28,-254.1 173.73,-252.9 183.91,-251.72"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="184.45,-255.18 193.99,-250.56 183.65,-248.23 184.45,-255.18"/>
 </g>
 <!-- none~set~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_node5" class="node">
 <title>none~set~3</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node5"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="297,-129 194,-129 194,-105 297,-105 297,-129"/>
-<text text-anchor="middle" x="245.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node5"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="317,-108 204,-108 204,-84 317,-84 317,-108"/>
+<text text-anchor="middle" x="260.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge4" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M83.52,-293.89C112.46,-262.1 190.8,-176.01 226.43,-136.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="229.21,-139.01 233.35,-129.25 224.03,-134.29 229.21,-139.01"/>
+<path fill="none" stroke="#ff0000" d="M90.59,-251.92C121.79,-223.12 200.74,-150.24 238.61,-115.28"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="241.06,-117.78 246.04,-108.43 236.32,-112.64 241.06,-117.78"/>
 </g>
 <!-- proc~get_knot_all~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_node6" class="node">
 <title>proc~get_knot_all~3</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node6"><a xlink:href="../proc/get_knot_all~3.html" xlink:title="nurbs_curve%get_knot_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="499,-486 348,-486 348,-462 499,-462 499,-486"/>
-<text text-anchor="middle" x="423.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot_all</text>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node6"><a xlink:href="../proc/get_knot_all~3.html" xlink:title="nurbs_surface%get_knot_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="529,-444 368,-444 368,-420 529,-420 529,-444"/>
+<text text-anchor="middle" x="448.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot~3&#45;&gt;proc~get_knot_all~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge5" class="edge">
 <title>none~get_knot~3&#45;&gt;proc~get_knot_all~3</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M296.93,-444.04C317.28,-448.89 340.92,-454.53 362.17,-459.6"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="361.52,-463.05 372.06,-461.96 363.14,-456.24 361.52,-463.05"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M314.8,-402.04C336.49,-406.93 361.74,-412.63 384.35,-417.74"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="383.67,-421.17 394.19,-419.96 385.21,-414.35 383.67,-421.17"/>
 </g>
 <!-- proc~get_knoti~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_node7" class="node">
 <title>proc~get_knoti~3</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node7"><a xlink:href="../proc/get_knoti~3.html" xlink:title="nurbs_curve%get_knoti">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="491.5,-444 355.5,-444 355.5,-420 491.5,-420 491.5,-444"/>
-<text text-anchor="middle" x="423.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knoti</text>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node7"><a xlink:href="../proc/get_knoti~3.html" xlink:title="nurbs_surface%get_knoti">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="521.5,-402 375.5,-402 375.5,-378 521.5,-378 521.5,-402"/>
+<text text-anchor="middle" x="448.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knoti</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot~3&#45;&gt;proc~get_knoti~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge6" class="edge">
 <title>none~get_knot~3&#45;&gt;proc~get_knoti~3</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M312.04,-432C322.89,-432 334.22,-432 345.33,-432"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="345.44,-435.5 355.44,-432 345.44,-428.5 345.44,-435.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M332.08,-390C342.94,-390 354.23,-390 365.32,-390"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="365.42,-393.5 375.42,-390 365.42,-386.5 365.42,-393.5"/>
 </g>
 <!-- proc~get_wc_all~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_node8" class="node">
 <title>proc~get_wc_all~3</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node8"><a xlink:href="../proc/get_wc_all~3.html" xlink:title="nurbs_curve%get_Wc_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="496,-402 351,-402 351,-378 496,-378 496,-402"/>
-<text text-anchor="middle" x="423.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wc_all</text>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node8"><a xlink:href="../proc/get_wc_all~3.html" xlink:title="nurbs_surface%get_Wc_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="525.5,-360 371.5,-360 371.5,-336 525.5,-336 525.5,-360"/>
+<text text-anchor="middle" x="448.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc~3&#45;&gt;proc~get_wc_all~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge7" class="edge">
 <title>none~get_wc~3&#45;&gt;proc~get_wc_all~3</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M296.93,-360.04C317.28,-364.89 340.92,-370.53 362.17,-375.6"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="361.52,-379.05 372.06,-377.96 363.14,-372.24 361.52,-379.05"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M314.8,-318.04C336.49,-322.93 361.74,-328.63 384.35,-333.74"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="383.67,-337.17 394.19,-335.96 385.21,-330.35 383.67,-337.17"/>
 </g>
 <!-- proc~get_wci~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_node9" class="node">
 <title>proc~get_wci~3</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node9"><a xlink:href="../proc/get_wci~3.html" xlink:title="nurbs_curve%get_Wci">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="488.5,-360 358.5,-360 358.5,-336 488.5,-336 488.5,-360"/>
-<text text-anchor="middle" x="423.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Wci</text>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node9"><a xlink:href="../proc/get_wci~3.html" xlink:title="nurbs_surface%get_Wci">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="518,-318 379,-318 379,-294 518,-294 518,-318"/>
+<text text-anchor="middle" x="448.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wci</text>
 </a>
 </g>
 </g>
 <!-- none~get_wc~3&#45;&gt;proc~get_wci~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge8" class="edge">
 <title>none~get_wc~3&#45;&gt;proc~get_wci~3</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M309.05,-348C321.68,-348 335.07,-348 348.06,-348"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="348.37,-351.5 358.37,-348 348.37,-344.5 348.37,-351.5"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M328.65,-306C341.67,-306 355.42,-306 368.77,-306"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="368.88,-309.5 378.88,-306 368.88,-302.5 368.88,-309.5"/>
 </g>
 <!-- proc~get_xc_all~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_node10" class="node">
 <title>proc~get_xc_all~3</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node10"><a xlink:href="../proc/get_xc_all~3.html" xlink:title="nurbs_curve%get_Xc_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="494.5,-318 352.5,-318 352.5,-294 494.5,-294 494.5,-318"/>
-<text text-anchor="middle" x="423.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xc_all</text>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node10"><a xlink:href="../proc/get_xc_all~3.html" xlink:title="nurbs_surface%get_Xc_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="524,-276 373,-276 373,-252 524,-252 524,-276"/>
+<text text-anchor="middle" x="448.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~3&#45;&gt;proc~get_xc_all~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge9" class="edge">
 <title>none~get_xc~3&#45;&gt;proc~get_xc_all~3</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M307.56,-292.29C318.77,-293.62 330.63,-295.04 342.3,-296.43"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="342.15,-299.94 352.49,-297.65 342.98,-292.99 342.15,-299.94"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M327.08,-250.4C338.68,-251.71 350.91,-253.09 362.95,-254.45"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="362.67,-257.94 373,-255.59 363.45,-250.99 362.67,-257.94"/>
 </g>
 <!-- proc~get_xcid~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_node11" class="node">
 <title>proc~get_xcid~3</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node11"><a xlink:href="../proc/get_xcid~3.html" xlink:title="nurbs_curve%get_Xcid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="490,-276 357,-276 357,-252 490,-252 490,-276"/>
-<text text-anchor="middle" x="423.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xcid</text>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node11"><a xlink:href="../proc/get_xcid~3.html" xlink:title="nurbs_surface%get_Xcid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="520,-234 377,-234 377,-210 520,-210 520,-234"/>
+<text text-anchor="middle" x="448.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xcid</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~3&#45;&gt;proc~get_xcid~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge10" class="edge">
 <title>none~get_xc~3&#45;&gt;proc~get_xcid~3</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M307.56,-277.71C320.22,-276.2 333.7,-274.6 346.81,-273.03"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="347.23,-276.51 356.75,-271.85 346.4,-269.56 347.23,-276.51"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M327.08,-235.6C339.91,-234.15 353.51,-232.61 366.77,-231.11"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="367.29,-234.58 376.83,-229.98 366.5,-227.62 367.29,-234.58"/>
 </g>
 <!-- proc~get_xci~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_node12" class="node">
 <title>proc~get_xci~3</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node12"><a xlink:href="../proc/get_xci~3.html" xlink:title="nurbs_curve%get_Xci">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="487,-234 360,-234 360,-210 487,-210 487,-234"/>
-<text text-anchor="middle" x="423.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_Xci</text>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node12"><a xlink:href="../proc/get_xci~3.html" xlink:title="nurbs_surface%get_Xci">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="516.5,-192 380.5,-192 380.5,-168 516.5,-168 516.5,-192"/>
+<text text-anchor="middle" x="448.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xci</text>
 </a>
 </g>
 </g>
 <!-- none~get_xc~3&#45;&gt;proc~get_xci~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge11" class="edge">
 <title>none~get_xc~3&#45;&gt;proc~get_xci~3</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M273.31,-272.89C293.58,-263.99 322.23,-251.93 348,-243 354,-240.92 360.32,-238.89 366.64,-236.97"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="367.94,-240.24 376.53,-234.04 365.95,-233.53 367.94,-240.24"/>
-</g>
-<!-- proc~set1a -->
-<g id="proc~~modify_xc~3~~CallsGraph_node13" class="node">
-<title>proc~set1a</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node13"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="482,-192 365,-192 365,-168 482,-168 482,-192"/>
-<text text-anchor="middle" x="423.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
-</a>
-</g>
-</g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
-<g id="proc~~modify_xc~3~~CallsGraph_edge12" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M273.31,-129.11C293.58,-138.01 322.23,-150.07 348,-159 354,-161.08 360.32,-163.11 366.64,-165.03"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="365.95,-168.47 376.53,-167.96 367.94,-161.76 365.95,-168.47"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M289.65,-230.85C310.93,-221.93 340.99,-209.86 368,-201 374.47,-198.88 381.29,-196.82 388.1,-194.87"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="389.35,-198.16 398.04,-192.1 387.47,-191.41 389.35,-198.16"/>
 </g>
 <!-- proc~set1~3 -->
-<g id="proc~~modify_xc~3~~CallsGraph_node14" class="node">
+<g id="proc~~modify_xc~3~~CallsGraph_node13" class="node">
 <title>proc~set1~3</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node14"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="478.5,-150 368.5,-150 368.5,-126 478.5,-126 478.5,-150"/>
-<text text-anchor="middle" x="423.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node13"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="508.5,-108 388.5,-108 388.5,-84 508.5,-84 508.5,-108"/>
+<text text-anchor="middle" x="448.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set1~3 -->
-<g id="proc~~modify_xc~3~~CallsGraph_edge13" class="edge">
+<g id="proc~~modify_xc~3~~CallsGraph_edge12" class="edge">
 <title>none~set~3&#45;&gt;proc~set1~3</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M297.41,-123.07C316.43,-125.34 338.28,-127.95 358.34,-130.34"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="357.99,-133.83 368.33,-131.54 358.82,-126.88 357.99,-133.83"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M317.05,-96C336.28,-96 358.08,-96 378.27,-96"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="378.35,-99.5 388.35,-96 378.35,-92.5 378.35,-99.5"/>
 </g>
 <!-- proc~set2~3 -->
-<g id="proc~~modify_xc~3~~CallsGraph_node15" class="node">
+<g id="proc~~modify_xc~3~~CallsGraph_node14" class="node">
 <title>proc~set2~3</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node15"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="478.5,-66 368.5,-66 368.5,-42 478.5,-42 478.5,-66"/>
-<text text-anchor="middle" x="423.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node14"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="508.5,-66 388.5,-66 388.5,-42 508.5,-42 508.5,-66"/>
+<text text-anchor="middle" x="448.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set2~3 -->
-<g id="proc~~modify_xc~3~~CallsGraph_edge14" class="edge">
+<g id="proc~~modify_xc~3~~CallsGraph_edge13" class="edge">
 <title>none~set~3&#45;&gt;proc~set2~3</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M273.31,-104.89C293.58,-95.99 322.23,-83.93 348,-75 354,-72.92 360.32,-70.89 366.64,-68.97"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="367.94,-72.24 376.53,-66.04 365.95,-65.53 367.94,-72.24"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M314.8,-83.96C336.49,-79.07 361.74,-73.37 384.35,-68.26"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="385.21,-71.65 394.19,-66.04 383.67,-64.83 385.21,-71.65"/>
 </g>
 <!-- proc~set3~3 -->
-<g id="proc~~modify_xc~3~~CallsGraph_node16" class="node">
+<g id="proc~~modify_xc~3~~CallsGraph_node15" class="node">
 <title>proc~set3~3</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node16"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="478.5,-108 368.5,-108 368.5,-84 478.5,-84 478.5,-108"/>
-<text text-anchor="middle" x="423.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node15"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="508.5,-150 388.5,-150 388.5,-126 508.5,-126 508.5,-150"/>
+<text text-anchor="middle" x="448.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set3~3 -->
-<g id="proc~~modify_xc~3~~CallsGraph_edge15" class="edge">
+<g id="proc~~modify_xc~3~~CallsGraph_edge14" class="edge">
 <title>none~set~3&#45;&gt;proc~set3~3</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M297.41,-110.93C316.43,-108.66 338.28,-106.05 358.34,-103.66"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="358.82,-107.12 368.33,-102.46 357.99,-100.17 358.82,-107.12"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M314.8,-108.04C336.49,-112.93 361.74,-118.63 384.35,-123.74"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="383.67,-127.17 394.19,-125.96 385.21,-120.35 383.67,-127.17"/>
 </g>
 <!-- proc~set4~3 -->
-<g id="proc~~modify_xc~3~~CallsGraph_node17" class="node">
+<g id="proc~~modify_xc~3~~CallsGraph_node16" class="node">
 <title>proc~set4~3</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node17"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="478.5,-24 368.5,-24 368.5,0 478.5,0 478.5,-24"/>
-<text text-anchor="middle" x="423.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node16"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="508.5,-24 388.5,-24 388.5,0 508.5,0 508.5,-24"/>
+<text text-anchor="middle" x="448.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set4~3 -->
-<g id="proc~~modify_xc~3~~CallsGraph_edge16" class="edge">
+<g id="proc~~modify_xc~3~~CallsGraph_edge15" class="edge">
 <title>none~set~3&#45;&gt;proc~set4~3</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M257.8,-104.85C275.39,-86.63 311.13,-52.34 348,-33 351.75,-31.03 355.7,-29.23 359.76,-27.59"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="361.18,-30.79 369.34,-24.02 358.75,-24.23 361.18,-30.79"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M278.44,-83.97C298.82,-69.98 334.51,-47.01 368,-33 373.1,-30.87 378.48,-28.9 383.94,-27.09"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="385.29,-30.33 393.8,-24.02 383.21,-23.65 385.29,-30.33"/>
 </g>
 <!-- proc~cmp_degree~3 -->
-<g id="proc~~modify_xc~3~~CallsGraph_node18" class="node">
+<g id="proc~~modify_xc~3~~CallsGraph_node17" class="node">
 <title>proc~cmp_degree~3</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node18"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="689,-150 535,-150 535,-126 689,-126 689,-150"/>
-<text text-anchor="middle" x="612" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node17"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="728,-150 565,-150 565,-126 728,-126 728,-150"/>
+<text text-anchor="middle" x="646.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<g id="proc~~modify_xc~3~~CallsGraph_edge16" class="edge">
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
+<path fill="none" stroke="#002eff" d="M505.67,-108.04C528.63,-112.96 555.37,-118.69 579.27,-123.81"/>
+<polygon fill="#002eff" stroke="#002eff" points="578.81,-127.29 589.33,-125.96 580.28,-120.45 578.81,-127.29"/>
+</g>
+<!-- proc~cmp_nc~3 -->
+<g id="proc~~modify_xc~3~~CallsGraph_node18" class="node">
+<title>proc~cmp_nc~3</title>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node18"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="716,-108 577,-108 577,-84 716,-84 716,-108"/>
+<text text-anchor="middle" x="646.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+</a>
+</g>
+</g>
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge17" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#007fff" d="M477.94,-167.96C499.7,-163.07 525.01,-157.37 547.68,-152.26"/>
-<polygon fill="#007fff" stroke="#007fff" points="548.56,-155.65 557.55,-150.04 547.02,-148.82 548.56,-155.65"/>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#002eff" d="M508.57,-96C526.91,-96 547.41,-96 566.85,-96"/>
+<polygon fill="#002eff" stroke="#002eff" points="566.91,-99.5 576.91,-96 566.91,-92.5 566.91,-99.5"/>
 </g>
-<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge18" class="edge">
-<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#0000ff" d="M478.69,-138C493.07,-138 508.97,-138 524.6,-138"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="524.82,-141.5 534.82,-138 524.82,-134.5 524.82,-141.5"/>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#5c00ff" d="M505.67,-66.04C528.63,-70.96 555.37,-76.69 579.27,-81.81"/>
+<polygon fill="#5c00ff" stroke="#5c00ff" points="578.81,-85.29 589.33,-83.96 580.28,-78.45 578.81,-85.29"/>
 </g>
 <!-- proc~compute_knot_vector -->
 <g id="proc~~modify_xc~3~~CallsGraph_node19" class="node">
 <title>proc~compute_knot_vector</title>
 <g id="a_proc~~modify_xc~3~~CallsGraph_node19"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="675.5,-66 548.5,-66 548.5,-42 675.5,-42 675.5,-66"/>
-<text text-anchor="middle" x="612" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="710,-66 583,-66 583,-42 710,-42 710,-66"/>
+<text text-anchor="middle" x="646.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge19" class="edge">
 <title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#7f00ff" d="M478.69,-54C497.29,-54 518.41,-54 538.23,-54"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="538.45,-57.5 548.45,-54 538.45,-50.5 538.45,-57.5"/>
+<path fill="none" stroke="#5c00ff" d="M508.57,-54C528.72,-54 551.49,-54 572.59,-54"/>
+<polygon fill="#5c00ff" stroke="#5c00ff" points="572.8,-57.5 582.8,-54 572.8,-50.5 572.8,-57.5"/>
 </g>
 <!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge20" class="edge">
 <title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ff00ff" d="M477.94,-108.04C499.7,-112.93 525.01,-118.63 547.68,-123.74"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="547.02,-127.18 557.55,-125.96 548.56,-120.35 547.02,-127.18"/>
+<path fill="none" stroke="#e700ff" d="M508.57,-138C523.09,-138 538.97,-138 554.6,-138"/>
+<polygon fill="#e700ff" stroke="#e700ff" points="554.82,-141.5 564.82,-138 554.82,-134.5 554.82,-141.5"/>
 </g>
 <!-- proc~get_multiplicity~3 -->
-<g id="proc~~modify_xc~3~~CallsGraph_node20" class="node">
+<g id="proc~~modify_xc~3~~CallsGraph_node21" class="node">
 <title>proc~get_multiplicity~3</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node20"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="894,-150 725,-150 725,-126 894,-126 894,-150"/>
-<text text-anchor="middle" x="809.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node21"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="942,-149 764,-149 764,-125 942,-125 942,-149"/>
+<text text-anchor="middle" x="853" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge21" class="edge">
 <title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#ff0000" d="M689.15,-138C697.54,-138 706.17,-138 714.75,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="714.79,-141.5 724.79,-138 714.79,-134.5 714.79,-141.5"/>
+<path fill="none" stroke="#ff0000" d="M728.03,-137.61C736.47,-137.56 745.11,-137.52 753.71,-137.48"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="753.8,-140.98 763.78,-137.43 753.76,-133.98 753.8,-140.98"/>
 </g>
-<!-- proc~repelem -->
-<g id="proc~~modify_xc~3~~CallsGraph_node21" class="node">
-<title>proc~repelem</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node21"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="838,-66 781,-66 781,-42 838,-42 838,-66"/>
-<text text-anchor="middle" x="809.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<!-- interface~compute_multiplicity -->
+<g id="proc~~modify_xc~3~~CallsGraph_node20" class="node">
+<title>interface~compute_multiplicity</title>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node20"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
+<polygon fill="#a7506f" stroke="#a7506f" points="1102,-129 978,-129 978,-105 1102,-105 1102,-129"/>
+<text text-anchor="middle" x="1040" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge22" class="edge">
-<title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#00ffff" d="M675.66,-54C706.92,-54 743.69,-54 770.61,-54"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="770.78,-57.5 780.78,-54 770.78,-50.5 770.78,-57.5"/>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
+<path fill="none" stroke="#00ff00" d="M716.14,-99.68C786.69,-103.47 896.03,-109.33 967.57,-113.17"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="967.67,-116.68 977.85,-113.72 968.05,-109.69 967.67,-116.68"/>
 </g>
-<!-- interface~compute_multiplicity -->
+<!-- proc~repelem -->
 <g id="proc~~modify_xc~3~~CallsGraph_node22" class="node">
-<title>interface~compute_multiplicity</title>
-<g id="a_proc~~modify_xc~3~~CallsGraph_node22"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1054,-150 930,-150 930,-126 1054,-126 1054,-150"/>
-<text text-anchor="middle" x="992" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<title>proc~repelem</title>
+<g id="a_proc~~modify_xc~3~~CallsGraph_node22"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="881.5,-66 824.5,-66 824.5,-42 881.5,-42 881.5,-66"/>
+<text text-anchor="middle" x="853" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
-<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge23" class="edge">
-<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M894.15,-138C902.73,-138 911.4,-138 919.84,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="919.99,-141.5 929.99,-138 919.99,-134.5 919.99,-141.5"/>
+<title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
+<path fill="none" stroke="#0000ff" d="M710.25,-54C744.23,-54 785.1,-54 814.2,-54"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="814.36,-57.5 824.36,-54 814.35,-50.5 814.36,-57.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~modify_xc~3~~CallsGraph_node23" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~modify_xc~3~~CallsGraph_node23"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1220,-171 1090,-171 1090,-147 1220,-147 1220,-171"/>
-<text text-anchor="middle" x="1155" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1268,-150 1138,-150 1138,-126 1268,-126 1268,-150"/>
+<text text-anchor="middle" x="1203" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge24" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1054.33,-146C1062.69,-147.09 1071.35,-148.22 1079.92,-149.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1079.53,-152.82 1089.9,-150.64 1080.44,-145.88 1079.53,-152.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1102.33,-125C1110.69,-126.09 1119.35,-127.22 1127.92,-128.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1127.53,-131.82 1137.9,-129.64 1128.44,-124.88 1127.53,-131.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~modify_xc~3~~CallsGraph_node24" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~modify_xc~3~~CallsGraph_node24"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1220,-129 1090,-129 1090,-105 1220,-105 1220,-129"/>
-<text text-anchor="middle" x="1155" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1268,-108 1138,-108 1138,-84 1268,-84 1268,-108"/>
+<text text-anchor="middle" x="1203" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~modify_xc~3~~CallsGraph_edge25" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1054.33,-130C1062.69,-128.91 1071.35,-127.78 1079.92,-126.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1080.44,-130.12 1089.9,-125.36 1079.53,-123.18 1080.44,-130.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1102.33,-109C1110.69,-107.91 1119.35,-106.78 1127.92,-105.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1128.44,-109.12 1137.9,-104.36 1127.53,-102.18 1128.44,-109.12"/>
+</g>
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<g id="proc~~modify_xc~3~~CallsGraph_edge26" class="edge">
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
+<path fill="none" stroke="#00ff00" d="M942.17,-127.47C950.77,-126.54 959.42,-125.6 967.82,-124.7"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="968.36,-128.16 977.93,-123.6 967.61,-121.2 968.36,-128.16"/>
 </g>
 </g>
 </svg>
@@ -673,6 +679,126 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
 </g>
 </svg>
 
+<p>Solid arrows point from a procedure to one which it calls. Dashed 
+arrows point from an interface to procedures which implement that interface.
+This could include the module procedures in a generic interface or the
+implementation in a submodule of an interface in a parent module.
+</p>
+ Where possible, edges connecting nodes are
+given different colours to make them easier to distinguish in
+large graphs.</div>
+            </div>
+          </div>
+        </div>
+      </div>
+    </div>
+    <div class="card">
+      <div class="card-header">
+  <h3 class="card-title">Called by</h3>
+      </div>
+      <div class="card-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.43.0 (0)
+ -->
+<!-- Title: proc~~modify_xc~3~~CalledByGraph Pages: 1 -->
+<svg id="procmodify_xc3CalledByGraph" width="291pt" height="32pt"
+ viewBox="0.00 0.00 291.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~modify_xc~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>proc~~modify_xc~3~~CalledByGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 287,-28 287,4 -4,4"/>
+<!-- proc~modify_xc~3 -->
+<g id="proc~~modify_xc~3~~CalledByGraph_node1" class="node">
+<title>proc~modify_xc~3</title>
+<polygon fill="none" stroke="black" points="283,-24 130,-24 130,0 283,0 283,-24"/>
+<text text-anchor="middle" x="206.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%modify_Xc</text>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~modify_xc~3~~CalledByGraph_node2" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~modify_xc~3~~CalledByGraph_node2"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="94,-24 0,-24 0,0 94,0 94,-24"/>
+<text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
+<g id="proc~~modify_xc~3~~CalledByGraph_edge1" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M94.4,-12C102.43,-12 110.99,-12 119.67,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="119.89,-15.5 129.89,-12 119.89,-8.5 119.89,-15.5"/>
+</g>
+</g>
+</svg>
+</div>          <div>
+            <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
+          </div>
+          <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
+            <div class="modal-dialog modal-lg" role="document">
+              <div class="modal-content">
+                <div class="modal-header">
+                  <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
+                  <button type="button" class="btn-close" data-bs-dismiss="modal" aria-label="Close"></button>
+                </div>
+                <div class="modal-body">
+<p>Nodes of different colours represent the following: </p>
+<?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.43.0 (0)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="641pt" height="28pt"
+ viewBox="0.00 0.00 641.00 27.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1.16 1.16) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 741.5,-28 741.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="70,-24 0,-24 0,0 70,0 70,-24"/>
+<text text-anchor="middle" x="35" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-24 88,-24 88,0 146,0 146,-24"/>
+<text text-anchor="middle" x="117" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="225.5,-24 164.5,-24 164.5,0 225.5,0 225.5,-24"/>
+<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Type Bound Procedure -->
+<g id="node4" class="node">
+<title>Type Bound Procedure</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="374,-24 244,-24 244,0 374,0 374,-24"/>
+<text text-anchor="middle" x="309" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Type Bound Procedure</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node5" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="537.5,-24 392.5,-24 392.5,0 537.5,0 537.5,-24"/>
+<text text-anchor="middle" x="465" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node6" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-24 556,-24 556,0 614,0 614,-24"/>
+<text text-anchor="middle" x="585" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node7" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="737.5,-24 632.5,-24 632.5,0 737.5,0 737.5,-24"/>
+<text text-anchor="middle" x="685" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
 <p>Solid arrows point from a procedure to one which it calls. Dashed 
 arrows point from an interface to procedures which implement that interface.
 This could include the module procedures in a generic interface or the
@@ -717,7 +843,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/ndgrid2.html b/proc/ndgrid2.html
index 192705ba1..353df64eb 100644
--- a/proc/ndgrid2.html
+++ b/proc/ndgrid2.html
@@ -240,18 +240,18 @@ <h3 class="card-title">Called by</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1034.4,-783C1042.39,-783 1051.31,-783 1059.82,-783"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1059.92,-786.5 1069.92,-783 1059.92,-779.5 1059.92,-786.5"/>
 </g>
-<!-- proc~ansatz -->
+<!-- proc~ansatz~2 -->
 <g id="proc~~ndgrid2~~CalledByGraph_node3" class="node">
-<title>proc~ansatz</title>
-<g id="a_proc~~ndgrid2~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
+<title>proc~ansatz~2</title>
+<g id="a_proc~~ndgrid2~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="497,-856 365,-856 365,-832 497,-832 497,-856"/>
 <text text-anchor="middle" x="431" y="-841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;interface~ndgrid -->
+<!-- proc~ansatz~2&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge2" class="edge">
-<title>proc~ansatz&#45;&gt;interface~ndgrid</title>
+<title>proc~ansatz~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M496.65,-831.96C515.42,-828.73 535.99,-825.46 555,-823 708.75,-803.09 893.28,-790.12 969.91,-785.21"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="970.23,-788.7 979.99,-784.57 969.79,-781.71 970.23,-788.7"/>
 </g>
@@ -264,180 +264,180 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;interface~gauss_leg -->
-<g id="proc~~ndgrid2~~CalledByGraph_edge42" class="edge">
-<title>proc~ansatz&#45;&gt;interface~gauss_leg</title>
+<!-- proc~ansatz~2&#45;&gt;interface~gauss_leg -->
+<g id="proc~~ndgrid2~~CalledByGraph_edge43" class="edge">
+<title>proc~ansatz~2&#45;&gt;interface~gauss_leg</title>
 <path fill="none" stroke="#ff0000" d="M471.13,-856.1C505.57,-866.75 555.57,-882.21 590.76,-893.09"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="590.13,-896.56 600.72,-896.17 592.2,-889.87 590.13,-896.56"/>
 </g>
-<!-- none~derivative -->
-<g id="proc~~ndgrid2~~CalledByGraph_node16" class="node">
-<title>none~derivative</title>
-<g id="a_proc~~ndgrid2~~CalledByGraph_node16"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative" xlink:title="nurbs_volume%derivative">
+<!-- none~derivative~2 -->
+<g id="proc~~ndgrid2~~CalledByGraph_node18" class="node">
+<title>none~derivative~2</title>
+<g id="a_proc~~ndgrid2~~CalledByGraph_node18"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative~2" xlink:title="nurbs_volume%derivative">
 <polygon fill="#a7506f" stroke="#a7506f" points="709,-856 558,-856 558,-832 709,-832 709,-856"/>
 <text text-anchor="middle" x="633.5" y="-841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;none~derivative -->
-<g id="proc~~ndgrid2~~CalledByGraph_edge45" class="edge">
-<title>proc~ansatz&#45;&gt;none~derivative</title>
-<path fill="none" stroke="#ff3800" d="M497.1,-844C513.19,-844 530.68,-844 547.56,-844"/>
-<polygon fill="#ff3800" stroke="#ff3800" points="547.99,-847.5 557.99,-844 547.99,-840.5 547.99,-847.5"/>
+<!-- proc~ansatz~2&#45;&gt;none~derivative~2 -->
+<g id="proc~~ndgrid2~~CalledByGraph_edge47" class="edge">
+<title>proc~ansatz~2&#45;&gt;none~derivative~2</title>
+<path fill="none" stroke="#ffaa00" d="M497.1,-844C513.19,-844 530.68,-844 547.56,-844"/>
+<polygon fill="#ffaa00" stroke="#ffaa00" points="547.99,-847.5 557.99,-844 547.99,-840.5 547.99,-847.5"/>
 </g>
-<!-- proc~ansatz~2 -->
+<!-- proc~ansatz~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_node4" class="node">
-<title>proc~ansatz~2</title>
-<g id="a_proc~~ndgrid2~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
+<title>proc~ansatz~3</title>
+<g id="a_proc~~ndgrid2~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="497,-979 365,-979 365,-955 497,-955 497,-979"/>
 <text text-anchor="middle" x="431" y="-964.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;interface~ndgrid -->
+<!-- proc~ansatz~3&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge3" class="edge">
-<title>proc~ansatz~2&#45;&gt;interface~ndgrid</title>
+<title>proc~ansatz~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M497.11,-973.23C618.71,-983.49 874.35,-998.17 944,-948 990.36,-914.61 1002.07,-842.17 1005.02,-805.39"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1008.53,-805.41 1005.68,-795.21 1001.54,-804.96 1008.53,-805.41"/>
 </g>
-<!-- proc~ansatz~2&#45;&gt;interface~gauss_leg -->
-<g id="proc~~ndgrid2~~CalledByGraph_edge43" class="edge">
-<title>proc~ansatz~2&#45;&gt;interface~gauss_leg</title>
+<!-- proc~ansatz~3&#45;&gt;interface~gauss_leg -->
+<g id="proc~~ndgrid2~~CalledByGraph_edge44" class="edge">
+<title>proc~ansatz~3&#45;&gt;interface~gauss_leg</title>
 <path fill="none" stroke="#ff0000" d="M471.61,-954.95C506.1,-944.46 555.92,-929.3 590.96,-918.64"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="592.33,-921.88 600.88,-915.62 590.29,-915.18 592.33,-921.88"/>
 </g>
-<!-- none~derivative~2 -->
+<!-- none~derivative~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_node19" class="node">
-<title>none~derivative~2</title>
-<g id="a_proc~~ndgrid2~~CalledByGraph_node19"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~2" xlink:title="nurbs_surface%derivative">
+<title>none~derivative~3</title>
+<g id="a_proc~~ndgrid2~~CalledByGraph_node19"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~3" xlink:title="nurbs_surface%derivative">
 <polygon fill="#a7506f" stroke="#a7506f" points="709,-1019 558,-1019 558,-995 709,-995 709,-1019"/>
 <text text-anchor="middle" x="633.5" y="-1004.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;none~derivative~2 -->
+<!-- proc~ansatz~3&#45;&gt;none~derivative~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge48" class="edge">
-<title>proc~ansatz~2&#45;&gt;none~derivative~2</title>
+<title>proc~ansatz~3&#45;&gt;none~derivative~3</title>
 <path fill="none" stroke="#ffe200" d="M492.16,-979C514.16,-983.39 539.25,-988.4 562.07,-992.95"/>
 <polygon fill="#ffe200" stroke="#ffe200" points="561.55,-996.41 572.04,-994.94 562.92,-989.55 561.55,-996.41"/>
 </g>
-<!-- proc~basis_vector -->
+<!-- proc~basis_vector~2 -->
 <g id="proc~~ndgrid2~~CalledByGraph_node5" class="node">
-<title>proc~basis_vector</title>
-<g id="a_proc~~ndgrid2~~CalledByGraph_node5"><a xlink:href="../proc/basis_vector.html" xlink:title="nurbs_volume%basis_vector">
+<title>proc~basis_vector~2</title>
+<g id="a_proc~~ndgrid2~~CalledByGraph_node5"><a xlink:href="../proc/basis_vector~2.html" xlink:title="nurbs_volume%basis_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="927.5,-775 764.5,-775 764.5,-751 927.5,-751 927.5,-775"/>
 <text text-anchor="middle" x="846" y="-760.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%basis_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~basis_vector&#45;&gt;interface~ndgrid -->
+<!-- proc~basis_vector~2&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge4" class="edge">
-<title>proc~basis_vector&#45;&gt;interface~ndgrid</title>
+<title>proc~basis_vector~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M927.9,-773.18C942.64,-775.03 957.32,-776.88 969.91,-778.46"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="969.58,-781.95 979.94,-779.72 970.46,-775 969.58,-781.95"/>
 </g>
-<!-- proc~basis_vector~2 -->
+<!-- proc~basis_vector~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_node6" class="node">
-<title>proc~basis_vector~2</title>
-<g id="a_proc~~ndgrid2~~CalledByGraph_node6"><a xlink:href="../proc/basis_vector~2.html" xlink:title="nurbs_surface%basis_vector">
+<title>proc~basis_vector~3</title>
+<g id="a_proc~~ndgrid2~~CalledByGraph_node6"><a xlink:href="../proc/basis_vector~3.html" xlink:title="nurbs_surface%basis_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="927.5,-733 764.5,-733 764.5,-709 927.5,-709 927.5,-733"/>
 <text text-anchor="middle" x="846" y="-718.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%basis_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~basis_vector~2&#45;&gt;interface~ndgrid -->
+<!-- proc~basis_vector~3&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge5" class="edge">
-<title>proc~basis_vector~2&#45;&gt;interface~ndgrid</title>
+<title>proc~basis_vector~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M917.63,-733.05C926.67,-735.53 935.66,-738.49 944,-742 957.7,-747.77 971.63,-756.65 982.8,-764.67"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="981,-767.7 991.11,-770.85 985.17,-762.08 981,-767.7"/>
 </g>
-<!-- proc~create -->
+<!-- proc~create~2 -->
 <g id="proc~~ndgrid2~~CalledByGraph_node7" class="node">
-<title>proc~create</title>
-<g id="a_proc~~ndgrid2~~CalledByGraph_node7"><a xlink:href="../proc/create.html" xlink:title="nurbs_volume%create">
+<title>proc~create~2</title>
+<g id="a_proc~~ndgrid2~~CalledByGraph_node7"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_volume%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="699,-651 568,-651 568,-627 699,-627 699,-651"/>
 <text text-anchor="middle" x="633.5" y="-636.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;interface~ndgrid -->
+<!-- proc~create~2&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge6" class="edge">
-<title>proc~create&#45;&gt;interface~ndgrid</title>
+<title>proc~create~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M689.42,-626.96C755.63,-615.67 867.52,-607.25 944,-658 979.44,-681.51 995.43,-731.57 1001.98,-760.7"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="998.6,-761.65 1004.05,-770.74 1005.46,-760.24 998.6,-761.65"/>
 </g>
-<!-- proc~create~2 -->
+<!-- proc~create~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_node8" class="node">
-<title>proc~create~2</title>
-<g id="a_proc~~ndgrid2~~CalledByGraph_node8"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
+<title>proc~create~3</title>
+<g id="a_proc~~ndgrid2~~CalledByGraph_node8"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="699,-276 568,-276 568,-252 699,-252 699,-276"/>
 <text text-anchor="middle" x="633.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~ndgrid -->
+<!-- proc~create~3&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge7" class="edge">
-<title>proc~create~2&#45;&gt;interface~ndgrid</title>
+<title>proc~create~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M658.81,-276.19C717.85,-307.15 869.46,-394.83 944,-514 994.57,-594.86 1003.99,-712.55 1005.67,-760.96"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1002.17,-761.05 1005.94,-770.96 1009.17,-760.87 1002.17,-761.05"/>
 </g>
-<!-- proc~derivative2_vector -->
+<!-- proc~derivative2_vector~2 -->
 <g id="proc~~ndgrid2~~CalledByGraph_node9" class="node">
-<title>proc~derivative2_vector</title>
-<g id="a_proc~~ndgrid2~~CalledByGraph_node9"><a xlink:href="../proc/derivative2_vector.html" xlink:title="nurbs_volume%derivative2_vector">
+<title>proc~derivative2_vector~2</title>
+<g id="a_proc~~ndgrid2~~CalledByGraph_node9"><a xlink:href="../proc/derivative2_vector~2.html" xlink:title="nurbs_volume%derivative2_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="944,-691 748,-691 748,-667 944,-667 944,-691"/>
 <text text-anchor="middle" x="846" y="-676.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative2_vector&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative2_vector~2&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge8" class="edge">
-<title>proc~derivative2_vector&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative2_vector~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M926.24,-691.05C932.48,-693.51 938.49,-696.46 944,-700 967.69,-715.22 985.59,-742.87 995.92,-762.05"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="992.82,-763.66 1000.51,-770.94 999.04,-760.45 992.82,-763.66"/>
 </g>
-<!-- proc~derivative2_vector~2 -->
+<!-- proc~derivative2_vector~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_node10" class="node">
-<title>proc~derivative2_vector~2</title>
-<g id="a_proc~~ndgrid2~~CalledByGraph_node10"><a xlink:href="../proc/derivative2_vector~2.html" xlink:title="nurbs_surface%derivative2_vector">
+<title>proc~derivative2_vector~3</title>
+<g id="a_proc~~ndgrid2~~CalledByGraph_node10"><a xlink:href="../proc/derivative2_vector~3.html" xlink:title="nurbs_surface%derivative2_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="944,-547 748,-547 748,-523 944,-523 944,-547"/>
 <text text-anchor="middle" x="846" y="-532.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative2_vector~2&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative2_vector~3&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge9" class="edge">
-<title>proc~derivative2_vector~2&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative2_vector~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M864.29,-547.17C885.61,-562.95 921.74,-592.35 944,-625 973.83,-668.75 992.33,-728.92 1000.71,-760.91"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="997.32,-761.78 1003.16,-770.62 1004.1,-760.06 997.32,-761.78"/>
 </g>
-<!-- proc~derivative_vector -->
+<!-- proc~derivative_vector~2 -->
 <g id="proc~~ndgrid2~~CalledByGraph_node11" class="node">
-<title>proc~derivative_vector</title>
-<g id="a_proc~~ndgrid2~~CalledByGraph_node11"><a xlink:href="../proc/derivative_vector.html" xlink:title="nurbs_volume%derivative_vector">
+<title>proc~derivative_vector~2</title>
+<g id="a_proc~~ndgrid2~~CalledByGraph_node11"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_volume%derivative_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="941,-855 751,-855 751,-831 941,-831 941,-855"/>
 <text text-anchor="middle" x="846" y="-840.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_vector&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative_vector~2&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge10" class="edge">
-<title>proc~derivative_vector&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative_vector~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M901.12,-830.95C915.29,-827.13 930.41,-822.46 944,-817 955.54,-812.37 967.66,-806.07 978.09,-800.16"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="979.88,-803.17 986.76,-795.12 976.36,-797.12 979.88,-803.17"/>
 </g>
-<!-- proc~derivative_vector~2 -->
+<!-- proc~derivative_vector~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_node12" class="node">
-<title>proc~derivative_vector~2</title>
-<g id="a_proc~~ndgrid2~~CalledByGraph_node12"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_surface%derivative_vector">
+<title>proc~derivative_vector~3</title>
+<g id="a_proc~~ndgrid2~~CalledByGraph_node12"><a xlink:href="../proc/derivative_vector~3.html" xlink:title="nurbs_surface%derivative_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="941,-1019 751,-1019 751,-995 941,-995 941,-1019"/>
 <text text-anchor="middle" x="846" y="-1004.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_vector~2&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative_vector~3&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge11" class="edge">
-<title>proc~derivative_vector~2&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative_vector~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M923.09,-994.87C930.78,-991.33 937.96,-986.79 944,-981 993.77,-933.26 1003.77,-846.19 1005.65,-805.31"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1009.15,-805.41 1005.99,-795.3 1002.16,-805.18 1009.15,-805.41"/>
 </g>
@@ -483,45 +483,45 @@ <h3 class="card-title">Called by</h3>
 <path fill="none" stroke="#ff007f" stroke-dasharray="5,2" d="M666.01,-909.14C695.37,-912.07 740.1,-916.53 777.5,-920.27"/>
 <polygon fill="#ff007f" stroke="#ff007f" points="777.54,-923.79 787.84,-921.3 778.23,-916.82 777.54,-923.79"/>
 </g>
-<!-- none~derivative&#45;&gt;proc~derivative_vector -->
-<g id="proc~~ndgrid2~~CalledByGraph_edge38" class="edge">
-<title>none~derivative&#45;&gt;proc~derivative_vector</title>
-<path fill="none" stroke="#0000ff" d="M709.01,-843.65C719.23,-843.6 729.87,-843.55 740.5,-843.5"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="740.69,-847 750.68,-843.45 740.66,-840 740.69,-847"/>
-</g>
-<!-- none~derivative2 -->
-<g id="proc~~ndgrid2~~CalledByGraph_node17" class="node">
-<title>none~derivative2</title>
-<g id="a_proc~~ndgrid2~~CalledByGraph_node17"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2" xlink:title="nurbs_volume%derivative2">
+<!-- none~derivative2~2 -->
+<g id="proc~~ndgrid2~~CalledByGraph_node16" class="node">
+<title>none~derivative2~2</title>
+<g id="a_proc~~ndgrid2~~CalledByGraph_node16"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2~2" xlink:title="nurbs_volume%derivative2">
 <polygon fill="#a7506f" stroke="#a7506f" points="712,-734 555,-734 555,-710 712,-710 712,-734"/>
 <text text-anchor="middle" x="633.5" y="-719.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2</text>
 </a>
 </g>
 </g>
-<!-- none~derivative2&#45;&gt;proc~derivative2_vector -->
+<!-- none~derivative2~2&#45;&gt;proc~derivative2_vector~2 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge36" class="edge">
-<title>none~derivative2&#45;&gt;proc~derivative2_vector</title>
+<title>none~derivative2~2&#45;&gt;proc~derivative2_vector~2</title>
 <path fill="none" stroke="#00ffff" d="M693.42,-709.96C719.08,-704.72 749.35,-698.54 776.05,-693.08"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="777,-696.46 786.1,-691.03 775.6,-689.6 777,-696.46"/>
 </g>
-<!-- none~derivative2~2 -->
-<g id="proc~~ndgrid2~~CalledByGraph_node18" class="node">
-<title>none~derivative2~2</title>
-<g id="a_proc~~ndgrid2~~CalledByGraph_node18"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~2" xlink:title="nurbs_surface%derivative2">
+<!-- none~derivative2~3 -->
+<g id="proc~~ndgrid2~~CalledByGraph_node17" class="node">
+<title>none~derivative2~3</title>
+<g id="a_proc~~ndgrid2~~CalledByGraph_node17"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~3" xlink:title="nurbs_surface%derivative2">
 <polygon fill="#a7506f" stroke="#a7506f" points="712,-514 555,-514 555,-490 712,-490 712,-514"/>
 <text text-anchor="middle" x="633.5" y="-499.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2</text>
 </a>
 </g>
 </g>
-<!-- none~derivative2~2&#45;&gt;proc~derivative2_vector~2 -->
+<!-- none~derivative2~3&#45;&gt;proc~derivative2_vector~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge37" class="edge">
-<title>none~derivative2~2&#45;&gt;proc~derivative2_vector~2</title>
+<title>none~derivative2~3&#45;&gt;proc~derivative2_vector~3</title>
 <path fill="none" stroke="#007fff" d="M711.09,-514.01C726.33,-516.4 742.43,-518.92 757.99,-521.36"/>
 <polygon fill="#007fff" stroke="#007fff" points="757.69,-524.86 768.11,-522.95 758.78,-517.94 757.69,-524.86"/>
 </g>
 <!-- none~derivative~2&#45;&gt;proc~derivative_vector~2 -->
-<g id="proc~~ndgrid2~~CalledByGraph_edge39" class="edge">
+<g id="proc~~ndgrid2~~CalledByGraph_edge38" class="edge">
 <title>none~derivative~2&#45;&gt;proc~derivative_vector~2</title>
+<path fill="none" stroke="#0000ff" d="M709.01,-843.65C719.23,-843.6 729.87,-843.55 740.5,-843.5"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="740.69,-847 750.68,-843.45 740.66,-840 740.69,-847"/>
+</g>
+<!-- none~derivative~3&#45;&gt;proc~derivative_vector~3 -->
+<g id="proc~~ndgrid2~~CalledByGraph_edge39" class="edge">
+<title>none~derivative~3&#45;&gt;proc~derivative_vector~3</title>
 <path fill="none" stroke="#7f00ff" d="M709.01,-1007C719.23,-1007 729.87,-1007 740.5,-1007"/>
 <polygon fill="#7f00ff" stroke="#7f00ff" points="740.68,-1010.5 750.68,-1007 740.68,-1003.5 740.68,-1010.5"/>
 </g>
@@ -534,9 +534,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge15" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
 <path fill="none" stroke="#ff7f00" d="M299.01,-967C317.12,-967 336.51,-967 354.68,-967"/>
 <polygon fill="#ff7f00" stroke="#ff7f00" points="354.93,-970.5 364.93,-967 354.93,-963.5 354.93,-970.5"/>
 </g>
@@ -549,53 +549,53 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge14" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
 <path fill="none" stroke="#ff0000" d="M307.2,-844C322.92,-844 339.3,-844 354.78,-844"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="354.81,-847.5 364.81,-844 354.81,-840.5 354.81,-847.5"/>
 </g>
-<!-- proc~nearest_point2 -->
+<!-- proc~nearest_point2~2 -->
 <g id="proc~~ndgrid2~~CalledByGraph_node22" class="node">
-<title>proc~nearest_point2</title>
-<g id="a_proc~~ndgrid2~~CalledByGraph_node22"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_volume%nearest_point2">
+<title>proc~nearest_point2~2</title>
+<g id="a_proc~~ndgrid2~~CalledByGraph_node22"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_volume%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="519,-814 343,-814 343,-790 519,-790 519,-814"/>
 <text text-anchor="middle" x="431" y="-799.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2&#45;&gt;proc~create -->
+<!-- proc~nearest_point2~2&#45;&gt;proc~create~2 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge16" class="edge">
-<title>proc~nearest_point2&#45;&gt;proc~create</title>
+<title>proc~nearest_point2~2&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M495.59,-789.87C504.06,-786.36 512.17,-781.84 519,-776 547.12,-751.99 531.99,-729.94 555,-701 568.84,-683.59 588.43,-667.97 604.45,-656.77"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="606.62,-659.53 612.93,-651.01 602.69,-653.74 606.62,-659.53"/>
 </g>
-<!-- proc~nearest_point2&#45;&gt;none~derivative2 -->
-<g id="proc~~ndgrid2~~CalledByGraph_edge46" class="edge">
-<title>proc~nearest_point2&#45;&gt;none~derivative2</title>
-<path fill="none" stroke="#ff7100" d="M477.15,-789.94C490.75,-785.92 505.61,-781.15 519,-776 547.33,-765.1 578.39,-750.1 600.85,-738.67"/>
-<polygon fill="#ff7100" stroke="#ff7100" points="602.61,-741.7 609.91,-734.02 599.42,-735.47 602.61,-741.7"/>
+<!-- proc~nearest_point2~2&#45;&gt;none~derivative2~2 -->
+<g id="proc~~ndgrid2~~CalledByGraph_edge45" class="edge">
+<title>proc~nearest_point2~2&#45;&gt;none~derivative2~2</title>
+<path fill="none" stroke="#ff3800" d="M477.15,-789.94C490.75,-785.92 505.61,-781.15 519,-776 547.33,-765.1 578.39,-750.1 600.85,-738.67"/>
+<polygon fill="#ff3800" stroke="#ff3800" points="602.61,-741.7 609.91,-734.02 599.42,-735.47 602.61,-741.7"/>
 </g>
-<!-- proc~nearest_point2~2 -->
+<!-- proc~nearest_point2~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_node23" class="node">
-<title>proc~nearest_point2~2</title>
-<g id="a_proc~~ndgrid2~~CalledByGraph_node23"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_surface%nearest_point2">
+<title>proc~nearest_point2~3</title>
+<g id="a_proc~~ndgrid2~~CalledByGraph_node23"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_surface%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="519,-482 343,-482 343,-458 519,-458 519,-482"/>
 <text text-anchor="middle" x="431" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2~2&#45;&gt;proc~create~2 -->
+<!-- proc~nearest_point2~3&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge24" class="edge">
-<title>proc~nearest_point2~2&#45;&gt;proc~create~2</title>
+<title>proc~nearest_point2~3&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M493.2,-457.85C502.39,-454.33 511.34,-449.81 519,-444 574.68,-401.74 610.05,-323.62 624.72,-285.73"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="628.07,-286.77 628.31,-276.18 621.52,-284.31 628.07,-286.77"/>
 </g>
-<!-- proc~nearest_point2~2&#45;&gt;none~derivative2~2 -->
-<g id="proc~~ndgrid2~~CalledByGraph_edge47" class="edge">
-<title>proc~nearest_point2~2&#45;&gt;none~derivative2~2</title>
-<path fill="none" stroke="#ffaa00" d="M507.23,-482.01C520.25,-484.08 533.86,-486.26 547.13,-488.37"/>
-<polygon fill="#ffaa00" stroke="#ffaa00" points="546.76,-491.86 557.18,-489.98 547.86,-484.95 546.76,-491.86"/>
+<!-- proc~nearest_point2~3&#45;&gt;none~derivative2~3 -->
+<g id="proc~~ndgrid2~~CalledByGraph_edge46" class="edge">
+<title>proc~nearest_point2~3&#45;&gt;none~derivative2~3</title>
+<path fill="none" stroke="#ff7100" d="M507.23,-482.01C520.25,-484.08 533.86,-486.26 547.13,-488.37"/>
+<polygon fill="#ff7100" stroke="#ff7100" points="546.76,-491.86 557.18,-489.98 547.86,-484.95 546.76,-491.86"/>
 </g>
 <!-- program~example3_surface -->
 <g id="proc~~ndgrid2~~CalledByGraph_node24" class="node">
@@ -606,9 +606,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~create~2 -->
+<!-- program~example3_surface&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge25" class="edge">
-<title>program~example3_surface&#45;&gt;proc~create~2</title>
+<title>program~example3_surface&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M486.03,-381.48C497.32,-378.47 508.86,-374.43 519,-369 559.43,-347.35 596.45,-307.83 616.6,-283.93"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="619.33,-286.13 623.01,-276.19 613.94,-281.67 619.33,-286.13"/>
 </g>
@@ -621,9 +621,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~create -->
+<!-- program~example3_volume&#45;&gt;proc~create~2 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge17" class="edge">
-<title>program~example3_volume&#45;&gt;proc~create</title>
+<title>program~example3_volume&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M486.05,-711.29C497.12,-708.45 508.56,-705.03 519,-701 549.93,-689.06 582.94,-670.27 605.34,-656.5"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="607.33,-659.39 613.96,-651.13 603.62,-653.45 607.33,-659.39"/>
 </g>
@@ -636,9 +636,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~create~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge26" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~create~2</title>
+<title>program~example_nurbs_surface&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M491.63,-335.88C500.92,-333.34 510.31,-330.39 519,-327 550.19,-314.84 583.39,-295.58 605.78,-281.56"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="607.82,-284.41 614.38,-276.09 604.06,-278.5 607.82,-284.41"/>
 </g>
@@ -651,9 +651,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~create -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~create~2 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge18" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~create</title>
+<title>program~example_nurbs_volume&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M490.8,-667.98C513.65,-663.3 539.99,-657.92 563.71,-653.07"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="564.6,-656.46 573.7,-651.02 563.2,-649.6 564.6,-656.46"/>
 </g>
@@ -666,9 +666,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~create~2 -->
+<!-- program~example_ppm1&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge27" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~create~2</title>
+<title>program~example_ppm1&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M478.25,-296.31C504.01,-290.92 536.55,-284.1 565.09,-278.12"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="565.94,-281.52 575.01,-276.04 564.5,-274.67 565.94,-281.52"/>
 </g>
@@ -681,9 +681,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~create~2 -->
+<!-- program~example_ppm2&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge28" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~create~2</title>
+<title>program~example_ppm2&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M478.25,-264C501.84,-264 531.11,-264 557.79,-264"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="557.87,-267.5 567.87,-264 557.87,-260.5 557.87,-267.5"/>
 </g>
@@ -696,9 +696,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~create~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge29" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~create~2</title>
+<title>program~example_ppm3&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M478.25,-231.69C504.01,-237.08 536.55,-243.9 565.09,-249.88"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="564.5,-253.33 575.01,-251.96 565.94,-246.48 564.5,-253.33"/>
 </g>
@@ -711,15 +711,15 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~create~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge30" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~create~2</title>
+<title>program~nearest_point_2d&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M275.52,-447.91C348.37,-444.12 478.62,-434.26 519,-411 570.4,-381.39 606.54,-318.42 622.81,-285.33"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="626.07,-286.63 627.21,-276.09 619.75,-283.61 626.07,-286.63"/>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge52" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
 <path fill="none" stroke="#38ff00" d="M275.67,-454.94C293.02,-456.64 313.05,-458.59 332.82,-460.52"/>
 <polygon fill="#38ff00" stroke="#38ff00" points="332.51,-464 342.8,-461.49 333.19,-457.04 332.51,-464"/>
 </g>
@@ -732,9 +732,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~create~2 -->
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge31" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~create~2</title>
+<title>program~nearest_point_2d_bench&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M491.63,-192.12C500.92,-194.66 510.31,-197.61 519,-201 550.19,-213.16 583.39,-232.42 605.78,-246.44"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="604.06,-249.5 614.38,-251.91 607.82,-243.59 604.06,-249.5"/>
 </g>
@@ -747,15 +747,15 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~create -->
+<!-- program~nearest_point_3d&#45;&gt;proc~create~2 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge19" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~create</title>
+<title>program~nearest_point_3d&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M275.67,-779.62C348.39,-775.49 478.1,-765.19 519,-743 540.61,-731.28 537.32,-718.09 555,-701 571.41,-685.14 591.59,-669.09 607.24,-657.3"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="609.49,-659.99 615.42,-651.21 605.31,-654.37 609.49,-659.99"/>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge51" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
 <path fill="none" stroke="#71ff00" d="M275.67,-786.94C293.02,-788.64 313.05,-790.59 332.82,-792.52"/>
 <polygon fill="#71ff00" stroke="#71ff00" points="332.51,-796 342.8,-793.49 333.19,-789.04 332.51,-796"/>
 </g>
@@ -768,9 +768,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~create~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge32" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~create~2</title>
+<title>program~shape_c_2d&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M469.05,-142.66C485.09,-145.74 503.66,-150.78 519,-159 559.43,-180.65 596.45,-220.17 616.6,-244.07"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="613.94,-246.33 623.01,-251.81 619.33,-241.87 613.94,-246.33"/>
 </g>
@@ -783,9 +783,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~create -->
+<!-- program~shape_c_3d&#45;&gt;proc~create~2 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge20" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~create</title>
+<title>program~shape_c_3d&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M469.24,-638.19C494.07,-638.31 527.56,-638.48 557.75,-638.63"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="557.83,-642.13 567.85,-638.68 557.87,-635.13 557.83,-642.13"/>
 </g>
@@ -798,9 +798,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~create~2 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge33" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~create~2</title>
+<title>program~shape_half_ring_2d&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M488.59,-103.78C499.23,-106.83 509.87,-111.08 519,-117 568.53,-149.1 605.26,-210.46 622.17,-242.82"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="619.12,-244.54 626.78,-251.87 625.36,-241.37 619.12,-244.54"/>
 </g>
@@ -813,9 +813,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~create -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~create~2 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge21" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~create</title>
+<title>program~shape_half_ring_3d&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M488.12,-608.04C512.46,-613.26 541.14,-619.41 566.49,-624.84"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="565.88,-628.29 576.4,-626.97 567.35,-621.45 565.88,-628.29"/>
 </g>
@@ -828,9 +828,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~create -->
+<!-- program~shape_hexahedron&#45;&gt;proc~create~2 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge22" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~create</title>
+<title>program~shape_hexahedron&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M487.94,-565.08C498.42,-567.83 509.17,-571.13 519,-575 550.45,-587.38 583.85,-607.11 606.21,-621.4"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="604.5,-624.45 614.79,-626.96 608.3,-618.58 604.5,-624.45"/>
 </g>
@@ -843,9 +843,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~create~2 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge34" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~create~2</title>
+<title>program~shape_ring_2d&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M476.04,-57.73C490.78,-60.69 506.6,-65.9 519,-75 577.9,-118.26 612.08,-202.13 625.65,-241.96"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="622.34,-243.12 628.79,-251.53 628.99,-240.94 622.34,-243.12"/>
 </g>
@@ -858,9 +858,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~create -->
+<!-- program~shape_ring_3d&#45;&gt;proc~create~2 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge23" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~create</title>
+<title>program~shape_ring_3d&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M476.08,-518.07C490.35,-521.21 505.87,-525.93 519,-533 559.56,-554.84 596.53,-594.75 616.64,-618.87"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="614,-621.16 623.03,-626.69 619.42,-616.73 614,-621.16"/>
 </g>
@@ -873,24 +873,24 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~create~2 -->
+<!-- program~shape_tetragon&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge35" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~create~2</title>
+<title>program~shape_tetragon&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M479.18,-15.71C493.16,-18.72 507.72,-23.96 519,-33 587.93,-88.22 618.08,-195.88 628.24,-242.08"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="624.83,-242.88 630.31,-251.95 631.68,-241.44 624.83,-242.88"/>
 </g>
-<!-- proc~ansatz~3 -->
+<!-- proc~ansatz -->
 <g id="proc~~ndgrid2~~CalledByGraph_node42" class="node">
-<title>proc~ansatz~3</title>
-<g id="a_proc~~ndgrid2~~CalledByGraph_node42"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
+<title>proc~ansatz</title>
+<g id="a_proc~~ndgrid2~~CalledByGraph_node42"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="492,-918 370,-918 370,-894 492,-894 492,-918"/>
 <text text-anchor="middle" x="431" y="-903.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;interface~gauss_leg -->
-<g id="proc~~ndgrid2~~CalledByGraph_edge44" class="edge">
-<title>proc~ansatz~3&#45;&gt;interface~gauss_leg</title>
+<!-- proc~ansatz&#45;&gt;interface~gauss_leg -->
+<g id="proc~~ndgrid2~~CalledByGraph_edge42" class="edge">
+<title>proc~ansatz&#45;&gt;interface~gauss_leg</title>
 <path fill="none" stroke="#ff0000" d="M492.16,-906C524,-906 562.31,-906 590.86,-906"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="590.9,-909.5 600.9,-906 590.9,-902.5 590.9,-909.5"/>
 </g>
@@ -933,9 +933,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="proc~~ndgrid2~~CalledByGraph_edge53" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
 <path fill="none" stroke="#ff0000" d="M299.01,-906C318.84,-906 340.21,-906 359.82,-906"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="359.9,-909.5 369.9,-906 359.9,-902.5 359.9,-909.5"/>
 </g>
@@ -1072,7 +1072,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/ndgrid3.html b/proc/ndgrid3.html
index dc3fa24ac..aa080de14 100644
--- a/proc/ndgrid3.html
+++ b/proc/ndgrid3.html
@@ -255,18 +255,18 @@ <h3 class="card-title">Called by</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1034.4,-783C1042.39,-783 1051.31,-783 1059.82,-783"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1059.92,-786.5 1069.92,-783 1059.92,-779.5 1059.92,-786.5"/>
 </g>
-<!-- proc~ansatz -->
+<!-- proc~ansatz~2 -->
 <g id="proc~~ndgrid3~~CalledByGraph_node3" class="node">
-<title>proc~ansatz</title>
-<g id="a_proc~~ndgrid3~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
+<title>proc~ansatz~2</title>
+<g id="a_proc~~ndgrid3~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="497,-856 365,-856 365,-832 497,-832 497,-856"/>
 <text text-anchor="middle" x="431" y="-841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;interface~ndgrid -->
+<!-- proc~ansatz~2&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge2" class="edge">
-<title>proc~ansatz&#45;&gt;interface~ndgrid</title>
+<title>proc~ansatz~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M496.65,-831.96C515.42,-828.73 535.99,-825.46 555,-823 708.75,-803.09 893.28,-790.12 969.91,-785.21"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="970.23,-788.7 979.99,-784.57 969.79,-781.71 970.23,-788.7"/>
 </g>
@@ -279,180 +279,180 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;interface~gauss_leg -->
-<g id="proc~~ndgrid3~~CalledByGraph_edge42" class="edge">
-<title>proc~ansatz&#45;&gt;interface~gauss_leg</title>
+<!-- proc~ansatz~2&#45;&gt;interface~gauss_leg -->
+<g id="proc~~ndgrid3~~CalledByGraph_edge43" class="edge">
+<title>proc~ansatz~2&#45;&gt;interface~gauss_leg</title>
 <path fill="none" stroke="#ff0000" d="M471.13,-856.1C505.57,-866.75 555.57,-882.21 590.76,-893.09"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="590.13,-896.56 600.72,-896.17 592.2,-889.87 590.13,-896.56"/>
 </g>
-<!-- none~derivative -->
-<g id="proc~~ndgrid3~~CalledByGraph_node16" class="node">
-<title>none~derivative</title>
-<g id="a_proc~~ndgrid3~~CalledByGraph_node16"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative" xlink:title="nurbs_volume%derivative">
+<!-- none~derivative~2 -->
+<g id="proc~~ndgrid3~~CalledByGraph_node18" class="node">
+<title>none~derivative~2</title>
+<g id="a_proc~~ndgrid3~~CalledByGraph_node18"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative~2" xlink:title="nurbs_volume%derivative">
 <polygon fill="#a7506f" stroke="#a7506f" points="709,-856 558,-856 558,-832 709,-832 709,-856"/>
 <text text-anchor="middle" x="633.5" y="-841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;none~derivative -->
-<g id="proc~~ndgrid3~~CalledByGraph_edge45" class="edge">
-<title>proc~ansatz&#45;&gt;none~derivative</title>
-<path fill="none" stroke="#ff3800" d="M497.1,-844C513.19,-844 530.68,-844 547.56,-844"/>
-<polygon fill="#ff3800" stroke="#ff3800" points="547.99,-847.5 557.99,-844 547.99,-840.5 547.99,-847.5"/>
+<!-- proc~ansatz~2&#45;&gt;none~derivative~2 -->
+<g id="proc~~ndgrid3~~CalledByGraph_edge47" class="edge">
+<title>proc~ansatz~2&#45;&gt;none~derivative~2</title>
+<path fill="none" stroke="#ffaa00" d="M497.1,-844C513.19,-844 530.68,-844 547.56,-844"/>
+<polygon fill="#ffaa00" stroke="#ffaa00" points="547.99,-847.5 557.99,-844 547.99,-840.5 547.99,-847.5"/>
 </g>
-<!-- proc~ansatz~2 -->
+<!-- proc~ansatz~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_node4" class="node">
-<title>proc~ansatz~2</title>
-<g id="a_proc~~ndgrid3~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
+<title>proc~ansatz~3</title>
+<g id="a_proc~~ndgrid3~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="497,-979 365,-979 365,-955 497,-955 497,-979"/>
 <text text-anchor="middle" x="431" y="-964.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;interface~ndgrid -->
+<!-- proc~ansatz~3&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge3" class="edge">
-<title>proc~ansatz~2&#45;&gt;interface~ndgrid</title>
+<title>proc~ansatz~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M497.11,-973.23C618.71,-983.49 874.35,-998.17 944,-948 990.36,-914.61 1002.07,-842.17 1005.02,-805.39"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1008.53,-805.41 1005.68,-795.21 1001.54,-804.96 1008.53,-805.41"/>
 </g>
-<!-- proc~ansatz~2&#45;&gt;interface~gauss_leg -->
-<g id="proc~~ndgrid3~~CalledByGraph_edge43" class="edge">
-<title>proc~ansatz~2&#45;&gt;interface~gauss_leg</title>
+<!-- proc~ansatz~3&#45;&gt;interface~gauss_leg -->
+<g id="proc~~ndgrid3~~CalledByGraph_edge44" class="edge">
+<title>proc~ansatz~3&#45;&gt;interface~gauss_leg</title>
 <path fill="none" stroke="#ff0000" d="M471.61,-954.95C506.1,-944.46 555.92,-929.3 590.96,-918.64"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="592.33,-921.88 600.88,-915.62 590.29,-915.18 592.33,-921.88"/>
 </g>
-<!-- none~derivative~2 -->
+<!-- none~derivative~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_node19" class="node">
-<title>none~derivative~2</title>
-<g id="a_proc~~ndgrid3~~CalledByGraph_node19"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~2" xlink:title="nurbs_surface%derivative">
+<title>none~derivative~3</title>
+<g id="a_proc~~ndgrid3~~CalledByGraph_node19"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~3" xlink:title="nurbs_surface%derivative">
 <polygon fill="#a7506f" stroke="#a7506f" points="709,-1019 558,-1019 558,-995 709,-995 709,-1019"/>
 <text text-anchor="middle" x="633.5" y="-1004.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;none~derivative~2 -->
+<!-- proc~ansatz~3&#45;&gt;none~derivative~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge48" class="edge">
-<title>proc~ansatz~2&#45;&gt;none~derivative~2</title>
+<title>proc~ansatz~3&#45;&gt;none~derivative~3</title>
 <path fill="none" stroke="#ffe200" d="M492.16,-979C514.16,-983.39 539.25,-988.4 562.07,-992.95"/>
 <polygon fill="#ffe200" stroke="#ffe200" points="561.55,-996.41 572.04,-994.94 562.92,-989.55 561.55,-996.41"/>
 </g>
-<!-- proc~basis_vector -->
+<!-- proc~basis_vector~2 -->
 <g id="proc~~ndgrid3~~CalledByGraph_node5" class="node">
-<title>proc~basis_vector</title>
-<g id="a_proc~~ndgrid3~~CalledByGraph_node5"><a xlink:href="../proc/basis_vector.html" xlink:title="nurbs_volume%basis_vector">
+<title>proc~basis_vector~2</title>
+<g id="a_proc~~ndgrid3~~CalledByGraph_node5"><a xlink:href="../proc/basis_vector~2.html" xlink:title="nurbs_volume%basis_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="927.5,-775 764.5,-775 764.5,-751 927.5,-751 927.5,-775"/>
 <text text-anchor="middle" x="846" y="-760.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%basis_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~basis_vector&#45;&gt;interface~ndgrid -->
+<!-- proc~basis_vector~2&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge4" class="edge">
-<title>proc~basis_vector&#45;&gt;interface~ndgrid</title>
+<title>proc~basis_vector~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M927.9,-773.18C942.64,-775.03 957.32,-776.88 969.91,-778.46"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="969.58,-781.95 979.94,-779.72 970.46,-775 969.58,-781.95"/>
 </g>
-<!-- proc~basis_vector~2 -->
+<!-- proc~basis_vector~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_node6" class="node">
-<title>proc~basis_vector~2</title>
-<g id="a_proc~~ndgrid3~~CalledByGraph_node6"><a xlink:href="../proc/basis_vector~2.html" xlink:title="nurbs_surface%basis_vector">
+<title>proc~basis_vector~3</title>
+<g id="a_proc~~ndgrid3~~CalledByGraph_node6"><a xlink:href="../proc/basis_vector~3.html" xlink:title="nurbs_surface%basis_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="927.5,-733 764.5,-733 764.5,-709 927.5,-709 927.5,-733"/>
 <text text-anchor="middle" x="846" y="-718.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%basis_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~basis_vector~2&#45;&gt;interface~ndgrid -->
+<!-- proc~basis_vector~3&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge5" class="edge">
-<title>proc~basis_vector~2&#45;&gt;interface~ndgrid</title>
+<title>proc~basis_vector~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M917.63,-733.05C926.67,-735.53 935.66,-738.49 944,-742 957.7,-747.77 971.63,-756.65 982.8,-764.67"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="981,-767.7 991.11,-770.85 985.17,-762.08 981,-767.7"/>
 </g>
-<!-- proc~create -->
+<!-- proc~create~2 -->
 <g id="proc~~ndgrid3~~CalledByGraph_node7" class="node">
-<title>proc~create</title>
-<g id="a_proc~~ndgrid3~~CalledByGraph_node7"><a xlink:href="../proc/create.html" xlink:title="nurbs_volume%create">
+<title>proc~create~2</title>
+<g id="a_proc~~ndgrid3~~CalledByGraph_node7"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_volume%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="699,-651 568,-651 568,-627 699,-627 699,-651"/>
 <text text-anchor="middle" x="633.5" y="-636.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;interface~ndgrid -->
+<!-- proc~create~2&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge6" class="edge">
-<title>proc~create&#45;&gt;interface~ndgrid</title>
+<title>proc~create~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M689.42,-626.96C755.63,-615.67 867.52,-607.25 944,-658 979.44,-681.51 995.43,-731.57 1001.98,-760.7"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="998.6,-761.65 1004.05,-770.74 1005.46,-760.24 998.6,-761.65"/>
 </g>
-<!-- proc~create~2 -->
+<!-- proc~create~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_node8" class="node">
-<title>proc~create~2</title>
-<g id="a_proc~~ndgrid3~~CalledByGraph_node8"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
+<title>proc~create~3</title>
+<g id="a_proc~~ndgrid3~~CalledByGraph_node8"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="699,-276 568,-276 568,-252 699,-252 699,-276"/>
 <text text-anchor="middle" x="633.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~ndgrid -->
+<!-- proc~create~3&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge7" class="edge">
-<title>proc~create~2&#45;&gt;interface~ndgrid</title>
+<title>proc~create~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M658.81,-276.19C717.85,-307.15 869.46,-394.83 944,-514 994.57,-594.86 1003.99,-712.55 1005.67,-760.96"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1002.17,-761.05 1005.94,-770.96 1009.17,-760.87 1002.17,-761.05"/>
 </g>
-<!-- proc~derivative2_vector -->
+<!-- proc~derivative2_vector~2 -->
 <g id="proc~~ndgrid3~~CalledByGraph_node9" class="node">
-<title>proc~derivative2_vector</title>
-<g id="a_proc~~ndgrid3~~CalledByGraph_node9"><a xlink:href="../proc/derivative2_vector.html" xlink:title="nurbs_volume%derivative2_vector">
+<title>proc~derivative2_vector~2</title>
+<g id="a_proc~~ndgrid3~~CalledByGraph_node9"><a xlink:href="../proc/derivative2_vector~2.html" xlink:title="nurbs_volume%derivative2_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="944,-691 748,-691 748,-667 944,-667 944,-691"/>
 <text text-anchor="middle" x="846" y="-676.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative2_vector&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative2_vector~2&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge8" class="edge">
-<title>proc~derivative2_vector&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative2_vector~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M926.24,-691.05C932.48,-693.51 938.49,-696.46 944,-700 967.69,-715.22 985.59,-742.87 995.92,-762.05"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="992.82,-763.66 1000.51,-770.94 999.04,-760.45 992.82,-763.66"/>
 </g>
-<!-- proc~derivative2_vector~2 -->
+<!-- proc~derivative2_vector~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_node10" class="node">
-<title>proc~derivative2_vector~2</title>
-<g id="a_proc~~ndgrid3~~CalledByGraph_node10"><a xlink:href="../proc/derivative2_vector~2.html" xlink:title="nurbs_surface%derivative2_vector">
+<title>proc~derivative2_vector~3</title>
+<g id="a_proc~~ndgrid3~~CalledByGraph_node10"><a xlink:href="../proc/derivative2_vector~3.html" xlink:title="nurbs_surface%derivative2_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="944,-547 748,-547 748,-523 944,-523 944,-547"/>
 <text text-anchor="middle" x="846" y="-532.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative2_vector~2&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative2_vector~3&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge9" class="edge">
-<title>proc~derivative2_vector~2&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative2_vector~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M864.29,-547.17C885.61,-562.95 921.74,-592.35 944,-625 973.83,-668.75 992.33,-728.92 1000.71,-760.91"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="997.32,-761.78 1003.16,-770.62 1004.1,-760.06 997.32,-761.78"/>
 </g>
-<!-- proc~derivative_vector -->
+<!-- proc~derivative_vector~2 -->
 <g id="proc~~ndgrid3~~CalledByGraph_node11" class="node">
-<title>proc~derivative_vector</title>
-<g id="a_proc~~ndgrid3~~CalledByGraph_node11"><a xlink:href="../proc/derivative_vector.html" xlink:title="nurbs_volume%derivative_vector">
+<title>proc~derivative_vector~2</title>
+<g id="a_proc~~ndgrid3~~CalledByGraph_node11"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_volume%derivative_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="941,-855 751,-855 751,-831 941,-831 941,-855"/>
 <text text-anchor="middle" x="846" y="-840.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_vector&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative_vector~2&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge10" class="edge">
-<title>proc~derivative_vector&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative_vector~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M901.12,-830.95C915.29,-827.13 930.41,-822.46 944,-817 955.54,-812.37 967.66,-806.07 978.09,-800.16"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="979.88,-803.17 986.76,-795.12 976.36,-797.12 979.88,-803.17"/>
 </g>
-<!-- proc~derivative_vector~2 -->
+<!-- proc~derivative_vector~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_node12" class="node">
-<title>proc~derivative_vector~2</title>
-<g id="a_proc~~ndgrid3~~CalledByGraph_node12"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_surface%derivative_vector">
+<title>proc~derivative_vector~3</title>
+<g id="a_proc~~ndgrid3~~CalledByGraph_node12"><a xlink:href="../proc/derivative_vector~3.html" xlink:title="nurbs_surface%derivative_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="941,-1019 751,-1019 751,-995 941,-995 941,-1019"/>
 <text text-anchor="middle" x="846" y="-1004.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_vector</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_vector~2&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative_vector~3&#45;&gt;interface~ndgrid -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge11" class="edge">
-<title>proc~derivative_vector~2&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative_vector~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M923.09,-994.87C930.78,-991.33 937.96,-986.79 944,-981 993.77,-933.26 1003.77,-846.19 1005.65,-805.31"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1009.15,-805.41 1005.99,-795.3 1002.16,-805.18 1009.15,-805.41"/>
 </g>
@@ -498,45 +498,45 @@ <h3 class="card-title">Called by</h3>
 <path fill="none" stroke="#ff007f" stroke-dasharray="5,2" d="M666.01,-909.14C695.37,-912.07 740.1,-916.53 777.5,-920.27"/>
 <polygon fill="#ff007f" stroke="#ff007f" points="777.54,-923.79 787.84,-921.3 778.23,-916.82 777.54,-923.79"/>
 </g>
-<!-- none~derivative&#45;&gt;proc~derivative_vector -->
-<g id="proc~~ndgrid3~~CalledByGraph_edge38" class="edge">
-<title>none~derivative&#45;&gt;proc~derivative_vector</title>
-<path fill="none" stroke="#0000ff" d="M709.01,-843.65C719.23,-843.6 729.87,-843.55 740.5,-843.5"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="740.69,-847 750.68,-843.45 740.66,-840 740.69,-847"/>
-</g>
-<!-- none~derivative2 -->
-<g id="proc~~ndgrid3~~CalledByGraph_node17" class="node">
-<title>none~derivative2</title>
-<g id="a_proc~~ndgrid3~~CalledByGraph_node17"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2" xlink:title="nurbs_volume%derivative2">
+<!-- none~derivative2~2 -->
+<g id="proc~~ndgrid3~~CalledByGraph_node16" class="node">
+<title>none~derivative2~2</title>
+<g id="a_proc~~ndgrid3~~CalledByGraph_node16"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2~2" xlink:title="nurbs_volume%derivative2">
 <polygon fill="#a7506f" stroke="#a7506f" points="712,-734 555,-734 555,-710 712,-710 712,-734"/>
 <text text-anchor="middle" x="633.5" y="-719.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2</text>
 </a>
 </g>
 </g>
-<!-- none~derivative2&#45;&gt;proc~derivative2_vector -->
+<!-- none~derivative2~2&#45;&gt;proc~derivative2_vector~2 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge36" class="edge">
-<title>none~derivative2&#45;&gt;proc~derivative2_vector</title>
+<title>none~derivative2~2&#45;&gt;proc~derivative2_vector~2</title>
 <path fill="none" stroke="#00ffff" d="M693.42,-709.96C719.08,-704.72 749.35,-698.54 776.05,-693.08"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="777,-696.46 786.1,-691.03 775.6,-689.6 777,-696.46"/>
 </g>
-<!-- none~derivative2~2 -->
-<g id="proc~~ndgrid3~~CalledByGraph_node18" class="node">
-<title>none~derivative2~2</title>
-<g id="a_proc~~ndgrid3~~CalledByGraph_node18"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~2" xlink:title="nurbs_surface%derivative2">
+<!-- none~derivative2~3 -->
+<g id="proc~~ndgrid3~~CalledByGraph_node17" class="node">
+<title>none~derivative2~3</title>
+<g id="a_proc~~ndgrid3~~CalledByGraph_node17"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~3" xlink:title="nurbs_surface%derivative2">
 <polygon fill="#a7506f" stroke="#a7506f" points="712,-514 555,-514 555,-490 712,-490 712,-514"/>
 <text text-anchor="middle" x="633.5" y="-499.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2</text>
 </a>
 </g>
 </g>
-<!-- none~derivative2~2&#45;&gt;proc~derivative2_vector~2 -->
+<!-- none~derivative2~3&#45;&gt;proc~derivative2_vector~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge37" class="edge">
-<title>none~derivative2~2&#45;&gt;proc~derivative2_vector~2</title>
+<title>none~derivative2~3&#45;&gt;proc~derivative2_vector~3</title>
 <path fill="none" stroke="#007fff" d="M711.09,-514.01C726.33,-516.4 742.43,-518.92 757.99,-521.36"/>
 <polygon fill="#007fff" stroke="#007fff" points="757.69,-524.86 768.11,-522.95 758.78,-517.94 757.69,-524.86"/>
 </g>
 <!-- none~derivative~2&#45;&gt;proc~derivative_vector~2 -->
-<g id="proc~~ndgrid3~~CalledByGraph_edge39" class="edge">
+<g id="proc~~ndgrid3~~CalledByGraph_edge38" class="edge">
 <title>none~derivative~2&#45;&gt;proc~derivative_vector~2</title>
+<path fill="none" stroke="#0000ff" d="M709.01,-843.65C719.23,-843.6 729.87,-843.55 740.5,-843.5"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="740.69,-847 750.68,-843.45 740.66,-840 740.69,-847"/>
+</g>
+<!-- none~derivative~3&#45;&gt;proc~derivative_vector~3 -->
+<g id="proc~~ndgrid3~~CalledByGraph_edge39" class="edge">
+<title>none~derivative~3&#45;&gt;proc~derivative_vector~3</title>
 <path fill="none" stroke="#7f00ff" d="M709.01,-1007C719.23,-1007 729.87,-1007 740.5,-1007"/>
 <polygon fill="#7f00ff" stroke="#7f00ff" points="740.68,-1010.5 750.68,-1007 740.68,-1003.5 740.68,-1010.5"/>
 </g>
@@ -549,9 +549,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge15" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
 <path fill="none" stroke="#ff7f00" d="M299.01,-967C317.12,-967 336.51,-967 354.68,-967"/>
 <polygon fill="#ff7f00" stroke="#ff7f00" points="354.93,-970.5 364.93,-967 354.93,-963.5 354.93,-970.5"/>
 </g>
@@ -564,53 +564,53 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge14" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
 <path fill="none" stroke="#ff0000" d="M307.2,-844C322.92,-844 339.3,-844 354.78,-844"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="354.81,-847.5 364.81,-844 354.81,-840.5 354.81,-847.5"/>
 </g>
-<!-- proc~nearest_point2 -->
+<!-- proc~nearest_point2~2 -->
 <g id="proc~~ndgrid3~~CalledByGraph_node22" class="node">
-<title>proc~nearest_point2</title>
-<g id="a_proc~~ndgrid3~~CalledByGraph_node22"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_volume%nearest_point2">
+<title>proc~nearest_point2~2</title>
+<g id="a_proc~~ndgrid3~~CalledByGraph_node22"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_volume%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="519,-814 343,-814 343,-790 519,-790 519,-814"/>
 <text text-anchor="middle" x="431" y="-799.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2&#45;&gt;proc~create -->
+<!-- proc~nearest_point2~2&#45;&gt;proc~create~2 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge16" class="edge">
-<title>proc~nearest_point2&#45;&gt;proc~create</title>
+<title>proc~nearest_point2~2&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M495.59,-789.87C504.06,-786.36 512.17,-781.84 519,-776 547.12,-751.99 531.99,-729.94 555,-701 568.84,-683.59 588.43,-667.97 604.45,-656.77"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="606.62,-659.53 612.93,-651.01 602.69,-653.74 606.62,-659.53"/>
 </g>
-<!-- proc~nearest_point2&#45;&gt;none~derivative2 -->
-<g id="proc~~ndgrid3~~CalledByGraph_edge46" class="edge">
-<title>proc~nearest_point2&#45;&gt;none~derivative2</title>
-<path fill="none" stroke="#ff7100" d="M477.15,-789.94C490.75,-785.92 505.61,-781.15 519,-776 547.33,-765.1 578.39,-750.1 600.85,-738.67"/>
-<polygon fill="#ff7100" stroke="#ff7100" points="602.61,-741.7 609.91,-734.02 599.42,-735.47 602.61,-741.7"/>
+<!-- proc~nearest_point2~2&#45;&gt;none~derivative2~2 -->
+<g id="proc~~ndgrid3~~CalledByGraph_edge45" class="edge">
+<title>proc~nearest_point2~2&#45;&gt;none~derivative2~2</title>
+<path fill="none" stroke="#ff3800" d="M477.15,-789.94C490.75,-785.92 505.61,-781.15 519,-776 547.33,-765.1 578.39,-750.1 600.85,-738.67"/>
+<polygon fill="#ff3800" stroke="#ff3800" points="602.61,-741.7 609.91,-734.02 599.42,-735.47 602.61,-741.7"/>
 </g>
-<!-- proc~nearest_point2~2 -->
+<!-- proc~nearest_point2~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_node23" class="node">
-<title>proc~nearest_point2~2</title>
-<g id="a_proc~~ndgrid3~~CalledByGraph_node23"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_surface%nearest_point2">
+<title>proc~nearest_point2~3</title>
+<g id="a_proc~~ndgrid3~~CalledByGraph_node23"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_surface%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="519,-482 343,-482 343,-458 519,-458 519,-482"/>
 <text text-anchor="middle" x="431" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2~2&#45;&gt;proc~create~2 -->
+<!-- proc~nearest_point2~3&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge24" class="edge">
-<title>proc~nearest_point2~2&#45;&gt;proc~create~2</title>
+<title>proc~nearest_point2~3&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M493.2,-457.85C502.39,-454.33 511.34,-449.81 519,-444 574.68,-401.74 610.05,-323.62 624.72,-285.73"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="628.07,-286.77 628.31,-276.18 621.52,-284.31 628.07,-286.77"/>
 </g>
-<!-- proc~nearest_point2~2&#45;&gt;none~derivative2~2 -->
-<g id="proc~~ndgrid3~~CalledByGraph_edge47" class="edge">
-<title>proc~nearest_point2~2&#45;&gt;none~derivative2~2</title>
-<path fill="none" stroke="#ffaa00" d="M507.23,-482.01C520.25,-484.08 533.86,-486.26 547.13,-488.37"/>
-<polygon fill="#ffaa00" stroke="#ffaa00" points="546.76,-491.86 557.18,-489.98 547.86,-484.95 546.76,-491.86"/>
+<!-- proc~nearest_point2~3&#45;&gt;none~derivative2~3 -->
+<g id="proc~~ndgrid3~~CalledByGraph_edge46" class="edge">
+<title>proc~nearest_point2~3&#45;&gt;none~derivative2~3</title>
+<path fill="none" stroke="#ff7100" d="M507.23,-482.01C520.25,-484.08 533.86,-486.26 547.13,-488.37"/>
+<polygon fill="#ff7100" stroke="#ff7100" points="546.76,-491.86 557.18,-489.98 547.86,-484.95 546.76,-491.86"/>
 </g>
 <!-- program~example3_surface -->
 <g id="proc~~ndgrid3~~CalledByGraph_node24" class="node">
@@ -621,9 +621,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~create~2 -->
+<!-- program~example3_surface&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge25" class="edge">
-<title>program~example3_surface&#45;&gt;proc~create~2</title>
+<title>program~example3_surface&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M486.03,-381.48C497.32,-378.47 508.86,-374.43 519,-369 559.43,-347.35 596.45,-307.83 616.6,-283.93"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="619.33,-286.13 623.01,-276.19 613.94,-281.67 619.33,-286.13"/>
 </g>
@@ -636,9 +636,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~create -->
+<!-- program~example3_volume&#45;&gt;proc~create~2 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge17" class="edge">
-<title>program~example3_volume&#45;&gt;proc~create</title>
+<title>program~example3_volume&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M486.05,-711.29C497.12,-708.45 508.56,-705.03 519,-701 549.93,-689.06 582.94,-670.27 605.34,-656.5"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="607.33,-659.39 613.96,-651.13 603.62,-653.45 607.33,-659.39"/>
 </g>
@@ -651,9 +651,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~create~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge26" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~create~2</title>
+<title>program~example_nurbs_surface&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M491.63,-335.88C500.92,-333.34 510.31,-330.39 519,-327 550.19,-314.84 583.39,-295.58 605.78,-281.56"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="607.82,-284.41 614.38,-276.09 604.06,-278.5 607.82,-284.41"/>
 </g>
@@ -666,9 +666,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~create -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~create~2 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge18" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~create</title>
+<title>program~example_nurbs_volume&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M490.8,-667.98C513.65,-663.3 539.99,-657.92 563.71,-653.07"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="564.6,-656.46 573.7,-651.02 563.2,-649.6 564.6,-656.46"/>
 </g>
@@ -681,9 +681,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~create~2 -->
+<!-- program~example_ppm1&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge27" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~create~2</title>
+<title>program~example_ppm1&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M478.25,-296.31C504.01,-290.92 536.55,-284.1 565.09,-278.12"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="565.94,-281.52 575.01,-276.04 564.5,-274.67 565.94,-281.52"/>
 </g>
@@ -696,9 +696,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~create~2 -->
+<!-- program~example_ppm2&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge28" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~create~2</title>
+<title>program~example_ppm2&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M478.25,-264C501.84,-264 531.11,-264 557.79,-264"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="557.87,-267.5 567.87,-264 557.87,-260.5 557.87,-267.5"/>
 </g>
@@ -711,9 +711,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~create~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge29" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~create~2</title>
+<title>program~example_ppm3&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M478.25,-231.69C504.01,-237.08 536.55,-243.9 565.09,-249.88"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="564.5,-253.33 575.01,-251.96 565.94,-246.48 564.5,-253.33"/>
 </g>
@@ -726,15 +726,15 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~create~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge30" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~create~2</title>
+<title>program~nearest_point_2d&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M275.52,-447.91C348.37,-444.12 478.62,-434.26 519,-411 570.4,-381.39 606.54,-318.42 622.81,-285.33"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="626.07,-286.63 627.21,-276.09 619.75,-283.61 626.07,-286.63"/>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge52" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
 <path fill="none" stroke="#38ff00" d="M275.67,-454.94C293.02,-456.64 313.05,-458.59 332.82,-460.52"/>
 <polygon fill="#38ff00" stroke="#38ff00" points="332.51,-464 342.8,-461.49 333.19,-457.04 332.51,-464"/>
 </g>
@@ -747,9 +747,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~create~2 -->
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge31" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~create~2</title>
+<title>program~nearest_point_2d_bench&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M491.63,-192.12C500.92,-194.66 510.31,-197.61 519,-201 550.19,-213.16 583.39,-232.42 605.78,-246.44"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="604.06,-249.5 614.38,-251.91 607.82,-243.59 604.06,-249.5"/>
 </g>
@@ -762,15 +762,15 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~create -->
+<!-- program~nearest_point_3d&#45;&gt;proc~create~2 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge19" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~create</title>
+<title>program~nearest_point_3d&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M275.67,-779.62C348.39,-775.49 478.1,-765.19 519,-743 540.61,-731.28 537.32,-718.09 555,-701 571.41,-685.14 591.59,-669.09 607.24,-657.3"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="609.49,-659.99 615.42,-651.21 605.31,-654.37 609.49,-659.99"/>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge51" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
 <path fill="none" stroke="#71ff00" d="M275.67,-786.94C293.02,-788.64 313.05,-790.59 332.82,-792.52"/>
 <polygon fill="#71ff00" stroke="#71ff00" points="332.51,-796 342.8,-793.49 333.19,-789.04 332.51,-796"/>
 </g>
@@ -783,9 +783,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~create~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge32" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~create~2</title>
+<title>program~shape_c_2d&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M469.05,-142.66C485.09,-145.74 503.66,-150.78 519,-159 559.43,-180.65 596.45,-220.17 616.6,-244.07"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="613.94,-246.33 623.01,-251.81 619.33,-241.87 613.94,-246.33"/>
 </g>
@@ -798,9 +798,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~create -->
+<!-- program~shape_c_3d&#45;&gt;proc~create~2 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge20" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~create</title>
+<title>program~shape_c_3d&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M469.24,-638.19C494.07,-638.31 527.56,-638.48 557.75,-638.63"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="557.83,-642.13 567.85,-638.68 557.87,-635.13 557.83,-642.13"/>
 </g>
@@ -813,9 +813,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~create~2 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge33" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~create~2</title>
+<title>program~shape_half_ring_2d&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M488.59,-103.78C499.23,-106.83 509.87,-111.08 519,-117 568.53,-149.1 605.26,-210.46 622.17,-242.82"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="619.12,-244.54 626.78,-251.87 625.36,-241.37 619.12,-244.54"/>
 </g>
@@ -828,9 +828,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~create -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~create~2 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge21" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~create</title>
+<title>program~shape_half_ring_3d&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M488.12,-608.04C512.46,-613.26 541.14,-619.41 566.49,-624.84"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="565.88,-628.29 576.4,-626.97 567.35,-621.45 565.88,-628.29"/>
 </g>
@@ -843,9 +843,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~create -->
+<!-- program~shape_hexahedron&#45;&gt;proc~create~2 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge22" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~create</title>
+<title>program~shape_hexahedron&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M487.94,-565.08C498.42,-567.83 509.17,-571.13 519,-575 550.45,-587.38 583.85,-607.11 606.21,-621.4"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="604.5,-624.45 614.79,-626.96 608.3,-618.58 604.5,-624.45"/>
 </g>
@@ -858,9 +858,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~create~2 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge34" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~create~2</title>
+<title>program~shape_ring_2d&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M476.04,-57.73C490.78,-60.69 506.6,-65.9 519,-75 577.9,-118.26 612.08,-202.13 625.65,-241.96"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="622.34,-243.12 628.79,-251.53 628.99,-240.94 622.34,-243.12"/>
 </g>
@@ -873,9 +873,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~create -->
+<!-- program~shape_ring_3d&#45;&gt;proc~create~2 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge23" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~create</title>
+<title>program~shape_ring_3d&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#00ff00" d="M476.08,-518.07C490.35,-521.21 505.87,-525.93 519,-533 559.56,-554.84 596.53,-594.75 616.64,-618.87"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="614,-621.16 623.03,-626.69 619.42,-616.73 614,-621.16"/>
 </g>
@@ -888,24 +888,24 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~create~2 -->
+<!-- program~shape_tetragon&#45;&gt;proc~create~3 -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge35" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~create~2</title>
+<title>program~shape_tetragon&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#00ff7f" d="M479.18,-15.71C493.16,-18.72 507.72,-23.96 519,-33 587.93,-88.22 618.08,-195.88 628.24,-242.08"/>
 <polygon fill="#00ff7f" stroke="#00ff7f" points="624.83,-242.88 630.31,-251.95 631.68,-241.44 624.83,-242.88"/>
 </g>
-<!-- proc~ansatz~3 -->
+<!-- proc~ansatz -->
 <g id="proc~~ndgrid3~~CalledByGraph_node42" class="node">
-<title>proc~ansatz~3</title>
-<g id="a_proc~~ndgrid3~~CalledByGraph_node42"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
+<title>proc~ansatz</title>
+<g id="a_proc~~ndgrid3~~CalledByGraph_node42"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="492,-918 370,-918 370,-894 492,-894 492,-918"/>
 <text text-anchor="middle" x="431" y="-903.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;interface~gauss_leg -->
-<g id="proc~~ndgrid3~~CalledByGraph_edge44" class="edge">
-<title>proc~ansatz~3&#45;&gt;interface~gauss_leg</title>
+<!-- proc~ansatz&#45;&gt;interface~gauss_leg -->
+<g id="proc~~ndgrid3~~CalledByGraph_edge42" class="edge">
+<title>proc~ansatz&#45;&gt;interface~gauss_leg</title>
 <path fill="none" stroke="#ff0000" d="M492.16,-906C524,-906 562.31,-906 590.86,-906"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="590.9,-909.5 600.9,-906 590.9,-902.5 590.9,-909.5"/>
 </g>
@@ -948,9 +948,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="proc~~ndgrid3~~CalledByGraph_edge53" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
 <path fill="none" stroke="#ff0000" d="M299.01,-906C318.84,-906 340.21,-906 359.82,-906"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="359.9,-909.5 369.9,-906 359.9,-902.5 359.9,-909.5"/>
 </g>
@@ -1087,7 +1087,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/nearest_point.html b/proc/nearest_point.html
index 6d1efd7d9..04e774e30 100644
--- a/proc/nearest_point.html
+++ b/proc/nearest_point.html
@@ -83,15 +83,15 @@ <h1>nearest_point
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">nearest_point</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine nearest_point(this, point_Xg, nearest_Xg, nearest_Xt
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~61"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~58"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -207,11 +207,11 @@ <h3>Arguments</h3>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
-              <td>optional,</td>            <td>
-              allocatable
+              <td>optional</td>            <td>
+              
             </td>
             <td>::</td>
-            <td><strong>nearest_Xt</strong>(:)</td>
+            <td><strong>nearest_Xt</strong></td>
             <td>
                 
             </td>
@@ -246,31 +246,31 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~nearest_point~~CallsGraph Pages: 1 -->
-<svg id="procnearest_pointCallsGraph" width="345pt" height="32pt"
- viewBox="0.00 0.00 345.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procnearest_pointCallsGraph" width="336pt" height="32pt"
+ viewBox="0.00 0.00 336.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~nearest_point~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~nearest_point~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 341,-28 341,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 332,-28 332,4 -4,4"/>
 <!-- proc~nearest_point -->
 <g id="proc~~nearest_point~~CallsGraph_node1" class="node">
 <title>proc~nearest_point</title>
-<polygon fill="none" stroke="black" points="169,-24 0,-24 0,0 169,0 169,-24"/>
-<text text-anchor="middle" x="84.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%nearest_point</text>
+<polygon fill="none" stroke="black" points="160,-24 0,-24 0,0 160,0 160,-24"/>
+<text text-anchor="middle" x="80" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%nearest_point</text>
 </g>
-<!-- interface~nearest_point_help_3d -->
+<!-- interface~nearest_point_help_1d -->
 <g id="proc~~nearest_point~~CallsGraph_node2" class="node">
-<title>interface~nearest_point_help_3d</title>
-<g id="a_proc~~nearest_point~~CallsGraph_node2"><a xlink:href="../interface/nearest_point_help_3d.html" xlink:title="nearest_point_help_3d">
-<polygon fill="#a7506f" stroke="#a7506f" points="337,-24 205,-24 205,0 337,0 337,-24"/>
-<text text-anchor="middle" x="271" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_3d</text>
+<title>interface~nearest_point_help_1d</title>
+<g id="a_proc~~nearest_point~~CallsGraph_node2"><a xlink:href="../interface/nearest_point_help_1d.html" xlink:title="nearest_point_help_1d">
+<polygon fill="#a7506f" stroke="#a7506f" points="328,-24 196,-24 196,0 328,0 328,-24"/>
+<text text-anchor="middle" x="262" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_1d</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point&#45;&gt;interface~nearest_point_help_3d -->
+<!-- proc~nearest_point&#45;&gt;interface~nearest_point_help_1d -->
 <g id="proc~~nearest_point~~CallsGraph_edge1" class="edge">
-<title>proc~nearest_point&#45;&gt;interface~nearest_point_help_3d</title>
-<path fill="none" stroke="#ff0000" d="M169.11,-12C177.65,-12 186.29,-12 194.74,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="194.92,-15.5 204.92,-12 194.92,-8.5 194.92,-15.5"/>
+<title>proc~nearest_point&#45;&gt;interface~nearest_point_help_1d</title>
+<path fill="none" stroke="#ff0000" d="M160.21,-12C168.66,-12 177.24,-12 185.64,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="185.78,-15.5 195.78,-12 185.78,-8.5 185.78,-15.5"/>
 </g>
 </g>
 </svg>
@@ -366,52 +366,52 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~nearest_point~~CalledByGraph Pages: 1 -->
-<svg id="procnearest_pointCalledByGraph" width="528pt" height="52pt"
- viewBox="0.00 0.00 528.00 52.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procnearest_pointCalledByGraph" width="509pt" height="52pt"
+ viewBox="0.00 0.00 509.00 52.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~nearest_point~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 48)">
 <title>proc~~nearest_point~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-48 524,-48 524,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-48 505,-48 505,4 -4,4"/>
 <!-- proc~nearest_point -->
 <g id="proc~~nearest_point~~CalledByGraph_node1" class="node">
 <title>proc~nearest_point</title>
-<polygon fill="none" stroke="black" points="520,-44 351,-44 351,-20 520,-20 520,-44"/>
-<text text-anchor="middle" x="435.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%nearest_point</text>
+<polygon fill="none" stroke="black" points="501,-44 341,-44 341,-20 501,-20 501,-44"/>
+<text text-anchor="middle" x="421" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%nearest_point</text>
 </g>
 <!-- proc~nearest_point2 -->
 <g id="proc~~nearest_point~~CalledByGraph_node2" class="node">
 <title>proc~nearest_point2</title>
-<g id="a_proc~~nearest_point~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_volume%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="315,-24 139,-24 139,0 315,0 315,-24"/>
-<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
+<g id="a_proc~~nearest_point~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_curve%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="305,-24 139,-24 139,0 305,0 305,-24"/>
+<text text-anchor="middle" x="222" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2&#45;&gt;proc~nearest_point -->
 <g id="proc~~nearest_point~~CalledByGraph_edge1" class="edge">
 <title>proc~nearest_point2&#45;&gt;proc~nearest_point</title>
-<path fill="none" stroke="#ff0000" d="M315.28,-20.45C323.65,-21.26 332.17,-22.09 340.6,-22.91"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="340.54,-26.42 350.83,-23.9 341.21,-19.45 340.54,-26.42"/>
+<path fill="none" stroke="#ff0000" d="M305.12,-20.34C313.62,-21.2 322.28,-22.08 330.86,-22.95"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="330.55,-26.44 340.86,-23.97 331.26,-19.47 330.55,-26.44"/>
 </g>
-<!-- program~nearest_point_3d -->
+<!-- program~nearest_point_1d -->
 <g id="proc~~nearest_point~~CalledByGraph_node3" class="node">
-<title>program~nearest_point_3d</title>
-<g id="a_proc~~nearest_point~~CalledByGraph_node3"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<title>program~nearest_point_1d</title>
+<g id="a_proc~~nearest_point~~CalledByGraph_node3"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-44 0,-44 0,-20 103,-20 103,-44"/>
-<text text-anchor="middle" x="51.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
+<text text-anchor="middle" x="51.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point -->
+<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point -->
 <g id="proc~~nearest_point~~CalledByGraph_edge2" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point</title>
-<path fill="none" stroke="#ff0000" d="M103.27,-32.68C115,-32.82 127.44,-32.93 139,-33 217.22,-33.45 236.78,-33.33 315,-33 323.35,-32.97 332.03,-32.92 340.73,-32.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="340.95,-36.36 350.93,-32.79 340.9,-29.36 340.95,-36.36"/>
+<title>program~nearest_point_1d&#45;&gt;proc~nearest_point</title>
+<path fill="none" stroke="#ff0000" d="M103.27,-32.68C115,-32.82 127.44,-32.93 139,-33 212.78,-33.43 231.22,-33.32 305,-33 313.32,-32.96 321.99,-32.91 330.66,-32.85"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="330.84,-36.35 340.82,-32.78 330.79,-29.35 330.84,-36.35"/>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
+<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2 -->
 <g id="proc~~nearest_point~~CalledByGraph_edge3" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
-<path fill="none" stroke="#ff0000" d="M103.15,-26.16C111.29,-25.22 119.94,-24.23 128.75,-23.21"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="129.19,-26.68 138.73,-22.06 128.39,-19.73 129.19,-26.68"/>
+<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2</title>
+<path fill="none" stroke="#ff0000" d="M103.06,-26C111.3,-25.02 120.05,-23.98 128.92,-22.93"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="129.45,-26.39 138.97,-21.74 128.63,-19.44 129.45,-26.39"/>
 </g>
 </g>
 </svg>
@@ -527,7 +527,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/nearest_point2.html b/proc/nearest_point2.html
index 47b593638..b00ff6641 100644
--- a/proc/nearest_point2.html
+++ b/proc/nearest_point2.html
@@ -78,20 +78,20 @@ <h1>nearest_point2
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 1.1% of total for procedures.">73 statements</a>
+                 title=" 0.8% of total for procedures.">53 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">nearest_point2</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private impure subroutine nearest_point2(this, point_Xg, tol, maxit, nearest
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~62"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~59"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -226,7 +226,7 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>nearest_Xt</strong>(3)</td>
+            <td><strong>nearest_Xt</strong></td>
             <td>
                 
             </td>
@@ -261,298 +261,211 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~nearest_point2~~CallsGraph Pages: 1 -->
-<svg id="procnearest_point2CallsGraph" width="641pt" height="185pt"
- viewBox="0.00 0.00 641.00 184.67" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~nearest_point2~~CallsGraph" class="graph" transform="scale(1.4 1.4) rotate(0) translate(4 255)">
+<svg id="procnearest_point2CallsGraph" width="641pt" height="184pt"
+ viewBox="0.00 0.00 641.00 184.07" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~nearest_point2~~CallsGraph" class="graph" transform="scale(1.2 1.2) rotate(0) translate(4 217.4)">
 <title>proc~~nearest_point2~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-255 895,-255 895,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-217.4 767,-217.4 767,4 -4,4"/>
 <!-- proc~nearest_point2 -->
 <g id="proc~~nearest_point2~~CallsGraph_node1" class="node">
 <title>proc~nearest_point2</title>
-<polygon fill="none" stroke="black" points="176,-147 0,-147 0,-123 176,-123 176,-147"/>
-<text text-anchor="middle" x="88" y="-132.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%nearest_point2</text>
+<polygon fill="none" stroke="black" points="166,-108 0,-108 0,-84 166,-84 166,-108"/>
+<text text-anchor="middle" x="83" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%nearest_point2</text>
 </g>
 <!-- none~derivative2 -->
 <g id="proc~~nearest_point2~~CallsGraph_node2" class="node">
 <title>none~derivative2</title>
-<g id="a_proc~~nearest_point2~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2" xlink:title="nurbs_volume%derivative2">
-<polygon fill="#a7506f" stroke="#a7506f" points="375,-168 218,-168 218,-144 375,-144 375,-168"/>
-<text text-anchor="middle" x="296.5" y="-153.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2</text>
+<g id="a_proc~~nearest_point2~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative2" xlink:title="nurbs_curve%derivative2">
+<polygon fill="#a7506f" stroke="#a7506f" points="356,-108 208,-108 208,-84 356,-84 356,-108"/>
+<text text-anchor="middle" x="282" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2&#45;&gt;none~derivative2 -->
 <g id="proc~~nearest_point2~~CallsGraph_edge1" class="edge">
 <title>proc~nearest_point2&#45;&gt;none~derivative2</title>
-<path fill="none" stroke="#ff0000" d="M176.28,-143.88C186.59,-144.92 197.13,-146 207.46,-147.05"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="207.4,-150.56 217.71,-148.09 208.11,-143.6 207.4,-150.56"/>
+<path fill="none" stroke="#ff0000" d="M166.12,-96C176.49,-96 187.11,-96 197.51,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="197.81,-99.5 207.81,-96 197.81,-92.5 197.81,-99.5"/>
 </g>
 <!-- proc~cmp_xg -->
 <g id="proc~~nearest_point2~~CallsGraph_node3" class="node">
 <title>proc~cmp_xg</title>
-<g id="a_proc~~nearest_point2~~CallsGraph_node3"><a xlink:href="../proc/cmp_xg.html" xlink:title="nurbs_volume%cmp_Xg">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="585,-251 445,-251 445,-227 585,-227 585,-251"/>
-<text text-anchor="middle" x="515" y="-236.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_Xg</text>
+<g id="a_proc~~nearest_point2~~CallsGraph_node3"><a xlink:href="../proc/cmp_xg.html" xlink:title="nurbs_curve%cmp_Xg">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="347,-192 217,-192 217,-168 347,-168 347,-192"/>
+<text text-anchor="middle" x="282" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2&#45;&gt;proc~cmp_xg -->
 <g id="proc~~nearest_point2~~CallsGraph_edge2" class="edge">
 <title>proc~nearest_point2&#45;&gt;proc~cmp_xg</title>
-<path fill="none" stroke="#ff0000" d="M106.85,-147.08C130,-162.12 172.17,-187.36 212,-200 285.27,-223.25 372.73,-232.67 434.63,-236.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="434.54,-239.97 444.73,-237.06 434.94,-232.98 434.54,-239.97"/>
+<path fill="none" stroke="#ff0000" d="M103.38,-108.15C126.22,-122.04 165.7,-144.71 202,-159 207.41,-161.13 213.12,-163.12 218.89,-164.95"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="218.02,-168.35 228.6,-167.9 220.05,-161.65 218.02,-168.35"/>
 </g>
 <!-- proc~create -->
 <g id="proc~~nearest_point2~~CallsGraph_node4" class="node">
 <title>proc~create</title>
-<g id="a_proc~~nearest_point2~~CallsGraph_node4"><a xlink:href="../proc/create.html" xlink:title="nurbs_volume%create">
-<polygon fill="#d9534f" stroke="#d9534f" points="580.5,-209 449.5,-209 449.5,-185 580.5,-185 580.5,-209"/>
-<text text-anchor="middle" x="515" y="-194.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
+<g id="a_proc~~nearest_point2~~CallsGraph_node4"><a xlink:href="../proc/create.html" xlink:title="nurbs_curve%create">
+<polygon fill="#d9534f" stroke="#d9534f" points="342.5,-150 221.5,-150 221.5,-126 342.5,-126 342.5,-150"/>
+<text text-anchor="middle" x="282" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%create</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2&#45;&gt;proc~create -->
 <g id="proc~~nearest_point2~~CallsGraph_edge3" class="edge">
 <title>proc~nearest_point2&#45;&gt;proc~create</title>
-<path fill="none" stroke="#ff0000" d="M117.24,-147.03C141.8,-156.9 178.59,-170.31 212,-177 288.5,-192.32 377.86,-196.59 439.42,-197.48"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="439.4,-200.98 449.44,-197.6 439.48,-193.98 439.4,-200.98"/>
+<path fill="none" stroke="#ff0000" d="M140.45,-108.04C163.64,-112.98 190.65,-118.74 214.76,-123.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="214.03,-127.3 224.54,-125.96 215.49,-120.45 214.03,-127.3"/>
 </g>
 <!-- proc~finalize -->
 <g id="proc~~nearest_point2~~CallsGraph_node5" class="node">
 <title>proc~finalize</title>
-<g id="a_proc~~nearest_point2~~CallsGraph_node5"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_volume%finalize">
-<polygon fill="#d9534f" stroke="#d9534f" points="364.5,-126 228.5,-126 228.5,-102 364.5,-102 364.5,-126"/>
-<text text-anchor="middle" x="296.5" y="-111.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%finalize</text>
+<g id="a_proc~~nearest_point2~~CallsGraph_node5"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_curve%finalize">
+<polygon fill="#d9534f" stroke="#d9534f" points="345,-66 219,-66 219,-42 345,-42 345,-66"/>
+<text text-anchor="middle" x="282" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%finalize</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2&#45;&gt;proc~finalize -->
 <g id="proc~~nearest_point2~~CallsGraph_edge4" class="edge">
 <title>proc~nearest_point2&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#ff0000" d="M176.28,-126.12C190.13,-124.72 204.39,-123.27 218,-121.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="218.68,-125.33 228.27,-120.84 217.97,-118.37 218.68,-125.33"/>
-</g>
-<!-- proc~inv -->
-<g id="proc~~nearest_point2~~CallsGraph_node6" class="node">
-<title>proc~inv</title>
-<g id="a_proc~~nearest_point2~~CallsGraph_node6"><a xlink:href="../proc/inv.html" xlink:title="inv">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="323.5,-66 269.5,-66 269.5,-42 323.5,-42 323.5,-66"/>
-<text text-anchor="middle" x="296.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">inv</text>
-</a>
-</g>
-</g>
-<!-- proc~nearest_point2&#45;&gt;proc~inv -->
-<g id="proc~~nearest_point2~~CallsGraph_edge5" class="edge">
-<title>proc~nearest_point2&#45;&gt;proc~inv</title>
-<path fill="none" stroke="#ff0000" d="M119.92,-122.87C157.36,-108.19 220.31,-83.49 259.79,-68.01"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="261.26,-71.19 269.29,-64.28 258.7,-64.67 261.26,-71.19"/>
+<path fill="none" stroke="#ff0000" d="M140.45,-83.96C163.64,-79.02 190.65,-73.26 214.76,-68.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="215.49,-71.55 224.54,-66.04 214.03,-64.7 215.49,-71.55"/>
 </g>
 <!-- proc~nearest_point -->
-<g id="proc~~nearest_point2~~CallsGraph_node7" class="node">
+<g id="proc~~nearest_point2~~CallsGraph_node6" class="node">
 <title>proc~nearest_point</title>
-<g id="a_proc~~nearest_point2~~CallsGraph_node7"><a xlink:href="../proc/nearest_point.html" xlink:title="nurbs_volume%nearest_point">
-<polygon fill="#d9534f" stroke="#d9534f" points="381,-24 212,-24 212,0 381,0 381,-24"/>
-<text text-anchor="middle" x="296.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point</text>
+<g id="a_proc~~nearest_point2~~CallsGraph_node6"><a xlink:href="../proc/nearest_point.html" xlink:title="nurbs_curve%nearest_point">
+<polygon fill="#d9534f" stroke="#d9534f" points="362,-24 202,-24 202,0 362,0 362,-24"/>
+<text text-anchor="middle" x="282" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2&#45;&gt;proc~nearest_point -->
-<g id="proc~~nearest_point2~~CallsGraph_edge6" class="edge">
+<g id="proc~~nearest_point2~~CallsGraph_edge5" class="edge">
 <title>proc~nearest_point2&#45;&gt;proc~nearest_point</title>
-<path fill="none" stroke="#ff0000" d="M99.94,-122.91C120.01,-101.48 164.99,-56.84 212,-33 216.01,-30.97 220.23,-29.12 224.55,-27.45"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="225.88,-30.69 234.14,-24.05 223.55,-24.09 225.88,-30.69"/>
+<path fill="none" stroke="#ff0000" d="M103.38,-83.85C126.22,-69.96 165.7,-47.29 202,-33 207.41,-30.87 213.12,-28.88 218.89,-27.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="220.05,-30.35 228.6,-24.1 218.02,-23.65 220.05,-30.35"/>
 </g>
 <!-- proc~derivative2_scalar -->
-<g id="proc~~nearest_point2~~CallsGraph_node11" class="node">
+<g id="proc~~nearest_point2~~CallsGraph_node9" class="node">
 <title>proc~derivative2_scalar</title>
-<g id="a_proc~~nearest_point2~~CallsGraph_node11"><a xlink:href="../proc/derivative2_scalar.html" xlink:title="nurbs_volume%derivative2_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="612.5,-167 417.5,-167 417.5,-143 612.5,-143 612.5,-167"/>
-<text text-anchor="middle" x="515" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_scalar</text>
+<g id="a_proc~~nearest_point2~~CallsGraph_node9"><a xlink:href="../proc/derivative2_scalar.html" xlink:title="nurbs_curve%derivative2_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="584,-109 399,-109 399,-85 584,-85 584,-109"/>
+<text text-anchor="middle" x="491.5" y="-94.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_scalar</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2&#45;&gt;proc~derivative2_scalar -->
-<g id="proc~~nearest_point2~~CallsGraph_edge7" class="edge">
+<g id="proc~~nearest_point2~~CallsGraph_edge6" class="edge">
 <title>none~derivative2&#45;&gt;proc~derivative2_scalar</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M375.05,-155.64C385.44,-155.59 396.24,-155.54 407.03,-155.49"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="407.36,-158.99 417.35,-155.45 407.33,-151.99 407.36,-158.99"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M356.16,-96.35C366.7,-96.4 377.7,-96.46 388.68,-96.51"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="388.72,-100.01 398.73,-96.56 388.75,-93.01 388.72,-100.01"/>
 </g>
 <!-- proc~derivative2_vector -->
-<g id="proc~~nearest_point2~~CallsGraph_node12" class="node">
+<g id="proc~~nearest_point2~~CallsGraph_node10" class="node">
 <title>proc~derivative2_vector</title>
-<g id="a_proc~~nearest_point2~~CallsGraph_node12"><a xlink:href="../proc/derivative2_vector.html" xlink:title="nurbs_volume%derivative2_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="613,-125 417,-125 417,-101 613,-101 613,-125"/>
-<text text-anchor="middle" x="515" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_vector</text>
+<g id="a_proc~~nearest_point2~~CallsGraph_node10"><a xlink:href="../proc/derivative2_vector.html" xlink:title="nurbs_curve%derivative2_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="585,-67 398,-67 398,-43 585,-43 585,-67"/>
+<text text-anchor="middle" x="491.5" y="-52.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_vector</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2&#45;&gt;proc~derivative2_vector -->
-<g id="proc~~nearest_point2~~CallsGraph_edge8" class="edge">
+<g id="proc~~nearest_point2~~CallsGraph_edge7" class="edge">
 <title>none~derivative2&#45;&gt;proc~derivative2_vector</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M358.1,-143.96C384.61,-138.7 415.89,-132.49 443.45,-127.01"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="444.29,-130.41 453.42,-125.03 442.93,-123.55 444.29,-130.41"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M343.85,-83.98C367.61,-79.28 395,-73.87 419.64,-69"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="420.51,-72.4 429.65,-67.02 419.16,-65.53 420.51,-72.4"/>
 </g>
 <!-- interface~compute_xg -->
-<g id="proc~~nearest_point2~~CallsGraph_node8" class="node">
+<g id="proc~~nearest_point2~~CallsGraph_node7" class="node">
 <title>interface~compute_xg</title>
-<g id="a_proc~~nearest_point2~~CallsGraph_node8"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
-<polygon fill="#a7506f" stroke="#a7506f" points="764.5,-251 685.5,-251 685.5,-227 764.5,-227 764.5,-251"/>
-<text text-anchor="middle" x="725" y="-236.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
+<g id="a_proc~~nearest_point2~~CallsGraph_node7"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
+<polygon fill="#a7506f" stroke="#a7506f" points="531,-189 452,-189 452,-165 531,-165 531,-189"/>
+<text text-anchor="middle" x="491.5" y="-174.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_xg&#45;&gt;interface~compute_xg -->
-<g id="proc~~nearest_point2~~CallsGraph_edge9" class="edge">
+<g id="proc~~nearest_point2~~CallsGraph_edge8" class="edge">
 <title>proc~cmp_xg&#45;&gt;interface~compute_xg</title>
-<path fill="none" stroke="#ffff00" d="M585.26,-239C614.68,-239 648.29,-239 675.06,-239"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="675.34,-242.5 685.34,-239 675.34,-235.5 675.34,-242.5"/>
+<path fill="none" stroke="#cbff00" d="M347.23,-179.07C377.76,-178.63 413.66,-178.11 441.88,-177.7"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="441.96,-181.2 451.91,-177.56 441.86,-174.2 441.96,-181.2"/>
 </g>
 <!-- proc~is_rational -->
-<g id="proc~~nearest_point2~~CallsGraph_node14" class="node">
+<g id="proc~~nearest_point2~~CallsGraph_node11" class="node">
 <title>proc~is_rational</title>
-<g id="a_proc~~nearest_point2~~CallsGraph_node14"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="801,-209 649,-209 649,-185 801,-185 801,-209"/>
-<text text-anchor="middle" x="725" y="-194.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
+<g id="a_proc~~nearest_point2~~CallsGraph_node11"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="763,-129 621,-129 621,-105 763,-105 763,-129"/>
+<text text-anchor="middle" x="692" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_xg&#45;&gt;proc~is_rational -->
-<g id="proc~~nearest_point2~~CallsGraph_edge10" class="edge">
+<g id="proc~~nearest_point2~~CallsGraph_edge9" class="edge">
 <title>proc~cmp_xg&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#ffff00" d="M575.6,-226.96C600.19,-222 628.85,-216.21 654.4,-211.05"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="655.28,-214.45 664.39,-209.04 653.89,-207.59 655.28,-214.45"/>
+<path fill="none" stroke="#cbff00" d="M324.36,-192.08C383.78,-207.33 495.94,-228.13 585,-198 620.83,-185.88 654.09,-156.25 673.47,-136.4"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="676.08,-138.73 680.43,-129.07 671,-133.91 676.08,-138.73"/>
 </g>
 <!-- proc~create&#45;&gt;interface~compute_xg -->
-<g id="proc~~nearest_point2~~CallsGraph_edge11" class="edge">
+<g id="proc~~nearest_point2~~CallsGraph_edge10" class="edge">
 <title>proc~create&#45;&gt;interface~compute_xg</title>
-<path fill="none" stroke="#00ff00" d="M575.6,-209.04C607.18,-215.41 645.47,-223.14 675.24,-229.16"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="674.9,-232.66 685.4,-231.21 676.29,-225.79 674.9,-232.66"/>
-</g>
-<!-- interface~ndgrid -->
-<g id="proc~~nearest_point2~~CallsGraph_node9" class="node">
-<title>interface~ndgrid</title>
-<g id="a_proc~~nearest_point2~~CallsGraph_node9"><a xlink:href="../interface/ndgrid.html" xlink:title="ndgrid">
-<polygon fill="#a7506f" stroke="#a7506f" points="752,-167 698,-167 698,-143 752,-143 752,-167"/>
-<text text-anchor="middle" x="725" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid</text>
-</a>
-</g>
-</g>
-<!-- proc~create&#45;&gt;interface~ndgrid -->
-<g id="proc~~nearest_point2~~CallsGraph_edge12" class="edge">
-<title>proc~create&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#00ff00" d="M575.6,-184.96C611.84,-177.65 656.94,-168.54 687.84,-162.3"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="688.64,-165.71 697.75,-160.3 687.25,-158.85 688.64,-165.71"/>
+<path fill="none" stroke="#00ff66" d="M342.74,-149.23C374.12,-155.13 412.09,-162.26 441.69,-167.83"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="441.3,-171.31 451.78,-169.72 442.6,-164.44 441.3,-171.31"/>
 </g>
 <!-- proc~create&#45;&gt;proc~is_rational -->
-<g id="proc~~nearest_point2~~CallsGraph_edge13" class="edge">
+<g id="proc~~nearest_point2~~CallsGraph_edge11" class="edge">
 <title>proc~create&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#00ff00" d="M580.67,-197C599.05,-197 619.36,-197 638.76,-197"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="638.81,-200.5 648.81,-197 638.81,-193.5 638.81,-200.5"/>
-</g>
-<!-- proc~inv&#45;&gt;proc~inv -->
-<g id="proc~~nearest_point2~~CallsGraph_edge15" class="edge">
-<title>proc~inv&#45;&gt;proc~inv</title>
-<path fill="none" stroke="#0000ff" d="M269.5,-61.84C247.08,-71.91 256.08,-84 296.5,-84 329.97,-84 341.9,-75.71 332.28,-67.14"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="333.87,-64.01 323.5,-61.84 330.25,-70 333.87,-64.01"/>
-</g>
-<!-- proc~det -->
-<g id="proc~~nearest_point2~~CallsGraph_node13" class="node">
-<title>proc~det</title>
-<g id="a_proc~~nearest_point2~~CallsGraph_node13"><a xlink:href="../proc/det.html" xlink:title="det">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="542,-66 488,-66 488,-42 542,-42 542,-66"/>
-<text text-anchor="middle" x="515" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">det</text>
-</a>
-</g>
-</g>
-<!-- proc~inv&#45;&gt;proc~det -->
-<g id="proc~~nearest_point2~~CallsGraph_edge14" class="edge">
-<title>proc~inv&#45;&gt;proc~det</title>
-<path fill="none" stroke="#0000ff" d="M323.61,-54C362.06,-54 434.03,-54 477.62,-54"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="477.79,-57.5 487.79,-54 477.79,-50.5 477.79,-57.5"/>
-</g>
-<!-- interface~nearest_point_help_3d -->
-<g id="proc~~nearest_point2~~CallsGraph_node10" class="node">
-<title>interface~nearest_point_help_3d</title>
-<g id="a_proc~~nearest_point2~~CallsGraph_node10"><a xlink:href="../interface/nearest_point_help_3d.html" xlink:title="nearest_point_help_3d">
-<polygon fill="#a7506f" stroke="#a7506f" points="581,-24 449,-24 449,0 581,0 581,-24"/>
-<text text-anchor="middle" x="515" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_3d</text>
-</a>
+<path fill="none" stroke="#00ff66" d="M342.76,-134.92C413.51,-131.28 531.66,-125.2 610.44,-121.15"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="611,-124.62 620.8,-120.61 610.64,-117.63 611,-124.62"/>
 </g>
-</g>
-<!-- proc~nearest_point&#45;&gt;interface~nearest_point_help_3d -->
-<g id="proc~~nearest_point2~~CallsGraph_edge16" class="edge">
-<title>proc~nearest_point&#45;&gt;interface~nearest_point_help_3d</title>
-<path fill="none" stroke="#ff00ff" d="M381.2,-12C400.18,-12 420.22,-12 438.81,-12"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="438.98,-15.5 448.98,-12 438.98,-8.5 438.98,-15.5"/>
-</g>
-<!-- proc~ndgrid2 -->
-<g id="proc~~nearest_point2~~CallsGraph_node16" class="node">
-<title>proc~ndgrid2</title>
-<g id="a_proc~~nearest_point2~~CallsGraph_node16"><a xlink:href="../proc/ndgrid2.html" xlink:title="ndgrid2">
-<polygon fill="#d9534f" stroke="#d9534f" points="891,-188 837,-188 837,-164 891,-164 891,-188"/>
-<text text-anchor="middle" x="864" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid2</text>
-</a>
-</g>
-</g>
-<!-- interface~ndgrid&#45;&gt;proc~ndgrid2 -->
-<g id="proc~~nearest_point2~~CallsGraph_edge17" class="edge">
-<title>interface~ndgrid&#45;&gt;proc~ndgrid2</title>
-<path fill="none" stroke="#ffda00" stroke-dasharray="5,2" d="M752.09,-159C773.19,-162.23 803.14,-166.82 826.6,-170.42"/>
-<polygon fill="#ffda00" stroke="#ffda00" points="826.12,-173.89 836.54,-171.94 827.19,-166.97 826.12,-173.89"/>
-</g>
-<!-- proc~ndgrid3 -->
-<g id="proc~~nearest_point2~~CallsGraph_node17" class="node">
-<title>proc~ndgrid3</title>
-<g id="a_proc~~nearest_point2~~CallsGraph_node17"><a xlink:href="../proc/ndgrid3.html" xlink:title="ndgrid3">
-<polygon fill="#d9534f" stroke="#d9534f" points="891,-146 837,-146 837,-122 891,-122 891,-146"/>
-<text text-anchor="middle" x="864" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid3</text>
+<!-- interface~nearest_point_help_1d -->
+<g id="proc~~nearest_point2~~CallsGraph_node8" class="node">
+<title>interface~nearest_point_help_1d</title>
+<g id="a_proc~~nearest_point2~~CallsGraph_node8"><a xlink:href="../interface/nearest_point_help_1d.html" xlink:title="nearest_point_help_1d">
+<polygon fill="#a7506f" stroke="#a7506f" points="557.5,-24 425.5,-24 425.5,0 557.5,0 557.5,-24"/>
+<text text-anchor="middle" x="491.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_1d</text>
 </a>
 </g>
 </g>
-<!-- interface~ndgrid&#45;&gt;proc~ndgrid3 -->
-<g id="proc~~nearest_point2~~CallsGraph_edge18" class="edge">
-<title>interface~ndgrid&#45;&gt;proc~ndgrid3</title>
-<path fill="none" stroke="#ffda00" stroke-dasharray="5,2" d="M752.09,-151C773.19,-147.77 803.14,-143.18 826.6,-139.58"/>
-<polygon fill="#ffda00" stroke="#ffda00" points="827.19,-143.03 836.54,-138.06 826.12,-136.11 827.19,-143.03"/>
+<!-- proc~nearest_point&#45;&gt;interface~nearest_point_help_1d -->
+<g id="proc~~nearest_point2~~CallsGraph_edge12" class="edge">
+<title>proc~nearest_point&#45;&gt;interface~nearest_point_help_1d</title>
+<path fill="none" stroke="#cc00ff" d="M362.04,-12C379.46,-12 397.88,-12 415.15,-12"/>
+<polygon fill="#cc00ff" stroke="#cc00ff" points="415.17,-15.5 425.17,-12 415.17,-8.5 415.17,-15.5"/>
 </g>
 <!-- proc~derivative2_scalar&#45;&gt;proc~is_rational -->
-<g id="proc~~nearest_point2~~CallsGraph_edge20" class="edge">
+<g id="proc~~nearest_point2~~CallsGraph_edge14" class="edge">
 <title>proc~derivative2_scalar&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#00ff91" d="M575.6,-167.04C600.19,-172 628.85,-177.79 654.4,-182.95"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="653.89,-186.41 664.39,-184.96 655.28,-179.55 653.89,-186.41"/>
+<path fill="none" stroke="#00ff66" d="M584.2,-106.24C593.03,-107.13 601.95,-108.03 610.66,-108.91"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="610.48,-112.4 620.78,-109.92 611.18,-105.44 610.48,-112.4"/>
 </g>
 <!-- interface~compute_d2tgc -->
-<g id="proc~~nearest_point2~~CallsGraph_node15" class="node">
+<g id="proc~~nearest_point2~~CallsGraph_node12" class="node">
 <title>interface~compute_d2tgc</title>
-<g id="a_proc~~nearest_point2~~CallsGraph_node15"><a xlink:href="../interface/compute_d2tgc.html" xlink:title="compute_d2Tgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="774,-125 676,-125 676,-101 774,-101 774,-125"/>
-<text text-anchor="middle" x="725" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
+<g id="a_proc~~nearest_point2~~CallsGraph_node12"><a xlink:href="../interface/compute_d2tgc.html" xlink:title="compute_d2Tgc">
+<polygon fill="#a7506f" stroke="#a7506f" points="741,-67 643,-67 643,-43 741,-43 741,-67"/>
+<text text-anchor="middle" x="692" y="-52.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_scalar&#45;&gt;interface~compute_d2tgc -->
-<g id="proc~~nearest_point2~~CallsGraph_edge19" class="edge">
+<g id="proc~~nearest_point2~~CallsGraph_edge13" class="edge">
 <title>proc~derivative2_scalar&#45;&gt;interface~compute_d2tgc</title>
-<path fill="none" stroke="#00ff91" d="M575.6,-142.96C603.94,-137.24 637.68,-130.43 665.83,-124.75"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="666.82,-128.12 675.92,-122.71 665.43,-121.26 666.82,-128.12"/>
-</g>
-<!-- proc~derivative2_vector&#45;&gt;interface~ndgrid -->
-<g id="proc~~nearest_point2~~CallsGraph_edge22" class="edge">
-<title>proc~derivative2_vector&#45;&gt;interface~ndgrid</title>
-<path fill="none" stroke="#0091ff" d="M575.6,-125.04C611.84,-132.35 656.94,-141.46 687.84,-147.7"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="687.25,-151.15 697.75,-149.7 688.64,-144.29 687.25,-151.15"/>
+<path fill="none" stroke="#00ff66" d="M549.38,-84.96C575.59,-79.42 606.65,-72.85 633,-67.27"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="633.78,-70.68 642.84,-65.19 632.34,-63.84 633.78,-70.68"/>
 </g>
 <!-- proc~derivative2_vector&#45;&gt;proc~is_rational -->
-<g id="proc~~nearest_point2~~CallsGraph_edge23" class="edge">
+<g id="proc~~nearest_point2~~CallsGraph_edge16" class="edge">
 <title>proc~derivative2_vector&#45;&gt;proc~is_rational</title>
-<path fill="none" stroke="#0091ff" d="M593.99,-125.08C600.64,-127.53 607.08,-130.47 613,-134 634.12,-146.59 628.27,-162.78 649,-176 651.74,-177.74 654.62,-179.35 657.6,-180.82"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="656.2,-184.03 666.76,-184.85 659.02,-177.62 656.2,-184.03"/>
+<path fill="none" stroke="#0066ff" d="M551.56,-67.05C562.74,-69.72 574.29,-72.73 585,-76 608.19,-83.08 633.54,-92.81 653.64,-101.01"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="652.47,-104.32 663.05,-104.9 655.14,-97.85 652.47,-104.32"/>
 </g>
 <!-- proc~derivative2_vector&#45;&gt;interface~compute_d2tgc -->
-<g id="proc~~nearest_point2~~CallsGraph_edge21" class="edge">
+<g id="proc~~nearest_point2~~CallsGraph_edge15" class="edge">
 <title>proc~derivative2_vector&#45;&gt;interface~compute_d2tgc</title>
-<path fill="none" stroke="#0091ff" d="M613.3,-113C631.17,-113 649.3,-113 665.57,-113"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="665.98,-116.5 675.98,-113 665.98,-109.5 665.98,-116.5"/>
+<path fill="none" stroke="#0066ff" d="M585.07,-55C601.33,-55 617.83,-55 632.81,-55"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="632.92,-58.5 642.92,-55 632.92,-51.5 632.92,-58.5"/>
 </g>
 </g>
 </svg>
@@ -652,31 +565,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~nearest_point2~~CalledByGraph Pages: 1 -->
-<svg id="procnearest_point2CalledByGraph" width="323pt" height="32pt"
- viewBox="0.00 0.00 323.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procnearest_point2CalledByGraph" width="313pt" height="32pt"
+ viewBox="0.00 0.00 313.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~nearest_point2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~nearest_point2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 319,-28 319,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 309,-28 309,4 -4,4"/>
 <!-- proc~nearest_point2 -->
 <g id="proc~~nearest_point2~~CalledByGraph_node1" class="node">
 <title>proc~nearest_point2</title>
-<polygon fill="none" stroke="black" points="315,-24 139,-24 139,0 315,0 315,-24"/>
-<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%nearest_point2</text>
+<polygon fill="none" stroke="black" points="305,-24 139,-24 139,0 305,0 305,-24"/>
+<text text-anchor="middle" x="222" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%nearest_point2</text>
 </g>
-<!-- program~nearest_point_3d -->
+<!-- program~nearest_point_1d -->
 <g id="proc~~nearest_point2~~CalledByGraph_node2" class="node">
-<title>program~nearest_point_3d</title>
-<g id="a_proc~~nearest_point2~~CalledByGraph_node2"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<title>program~nearest_point_1d</title>
+<g id="a_proc~~nearest_point2~~CalledByGraph_node2"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-24 0,-24 0,0 103,0 103,-24"/>
-<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
+<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
+<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2 -->
 <g id="proc~~nearest_point2~~CalledByGraph_edge1" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
-<path fill="none" stroke="#ff0000" d="M103.15,-12C111.2,-12 119.76,-12 128.46,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="128.73,-15.5 138.73,-12 128.73,-8.5 128.73,-15.5"/>
+<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2</title>
+<path fill="none" stroke="#ff0000" d="M103.06,-12C111.3,-12 120.05,-12 128.92,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="128.97,-15.5 138.97,-12 128.97,-8.5 128.97,-15.5"/>
 </g>
 </g>
 </svg>
@@ -792,7 +705,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/nearest_point2~2.html b/proc/nearest_point2~2.html
index 45970a7aa..1145fea23 100644
--- a/proc/nearest_point2~2.html
+++ b/proc/nearest_point2~2.html
@@ -78,20 +78,20 @@ <h1>nearest_point2
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.9% of total for procedures.">62 statements</a>
+                 title=" 1.1% of total for procedures.">73 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">nearest_point2</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private impure subroutine nearest_point2(this, point_Xg, tol, maxit, nearest
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~129"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~123"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -218,7 +218,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xt~7"></span>
+              <span class="anchor" id="variable-nearest_xt~5"></span>
               real(kind=rk),
             </td>
 <td>intent(out)</td>
@@ -226,14 +226,14 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>nearest_Xt</strong>(2)</td>
+            <td><strong>nearest_Xt</strong>(3)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xg~7"></span>
+              <span class="anchor" id="variable-nearest_xg~5"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -270,14 +270,14 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~nearest_point2~2~~CallsGraph_node1" class="node">
 <title>proc~nearest_point2~2</title>
 <polygon fill="none" stroke="black" points="176,-147 0,-147 0,-123 176,-123 176,-147"/>
-<text text-anchor="middle" x="88" y="-132.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%nearest_point2</text>
+<text text-anchor="middle" x="88" y="-132.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%nearest_point2</text>
 </g>
 <!-- none~derivative2~2 -->
 <g id="proc~~nearest_point2~2~~CallsGraph_node2" class="node">
 <title>none~derivative2~2</title>
-<g id="a_proc~~nearest_point2~2~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~2" xlink:title="nurbs_surface%derivative2">
+<g id="a_proc~~nearest_point2~2~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2~2" xlink:title="nurbs_volume%derivative2">
 <polygon fill="#a7506f" stroke="#a7506f" points="375,-168 218,-168 218,-144 375,-144 375,-168"/>
-<text text-anchor="middle" x="296.5" y="-153.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2</text>
+<text text-anchor="middle" x="296.5" y="-153.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2</text>
 </a>
 </g>
 </g>
@@ -290,9 +290,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~cmp_xg~2 -->
 <g id="proc~~nearest_point2~2~~CallsGraph_node3" class="node">
 <title>proc~cmp_xg~2</title>
-<g id="a_proc~~nearest_point2~2~~CallsGraph_node3"><a xlink:href="../proc/cmp_xg~2.html" xlink:title="nurbs_surface%cmp_Xg">
+<g id="a_proc~~nearest_point2~2~~CallsGraph_node3"><a xlink:href="../proc/cmp_xg~2.html" xlink:title="nurbs_volume%cmp_Xg">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="585,-251 445,-251 445,-227 585,-227 585,-251"/>
-<text text-anchor="middle" x="515" y="-236.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_Xg</text>
+<text text-anchor="middle" x="515" y="-236.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_Xg</text>
 </a>
 </g>
 </g>
@@ -305,9 +305,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~create~2 -->
 <g id="proc~~nearest_point2~2~~CallsGraph_node4" class="node">
 <title>proc~create~2</title>
-<g id="a_proc~~nearest_point2~2~~CallsGraph_node4"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
+<g id="a_proc~~nearest_point2~2~~CallsGraph_node4"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_volume%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="580.5,-209 449.5,-209 449.5,-185 580.5,-185 580.5,-209"/>
-<text text-anchor="middle" x="515" y="-194.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
+<text text-anchor="middle" x="515" y="-194.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
 </a>
 </g>
 </g>
@@ -320,9 +320,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~finalize~2 -->
 <g id="proc~~nearest_point2~2~~CallsGraph_node5" class="node">
 <title>proc~finalize~2</title>
-<g id="a_proc~~nearest_point2~2~~CallsGraph_node5"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_surface%finalize">
+<g id="a_proc~~nearest_point2~2~~CallsGraph_node5"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_volume%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="364.5,-126 228.5,-126 228.5,-102 364.5,-102 364.5,-126"/>
-<text text-anchor="middle" x="296.5" y="-111.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%finalize</text>
+<text text-anchor="middle" x="296.5" y="-111.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%finalize</text>
 </a>
 </g>
 </g>
@@ -350,9 +350,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~nearest_point~2 -->
 <g id="proc~~nearest_point2~2~~CallsGraph_node7" class="node">
 <title>proc~nearest_point~2</title>
-<g id="a_proc~~nearest_point2~2~~CallsGraph_node7"><a xlink:href="../proc/nearest_point~2.html" xlink:title="nurbs_surface%nearest_point">
+<g id="a_proc~~nearest_point2~2~~CallsGraph_node7"><a xlink:href="../proc/nearest_point~2.html" xlink:title="nurbs_volume%nearest_point">
 <polygon fill="#d9534f" stroke="#d9534f" points="381,-24 212,-24 212,0 381,0 381,-24"/>
-<text text-anchor="middle" x="296.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point</text>
+<text text-anchor="middle" x="296.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point</text>
 </a>
 </g>
 </g>
@@ -365,9 +365,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~derivative2_scalar~2 -->
 <g id="proc~~nearest_point2~2~~CallsGraph_node11" class="node">
 <title>proc~derivative2_scalar~2</title>
-<g id="a_proc~~nearest_point2~2~~CallsGraph_node11"><a xlink:href="../proc/derivative2_scalar~2.html" xlink:title="nurbs_surface%derivative2_scalar">
+<g id="a_proc~~nearest_point2~2~~CallsGraph_node11"><a xlink:href="../proc/derivative2_scalar~2.html" xlink:title="nurbs_volume%derivative2_scalar">
 <polygon fill="#d9534f" stroke="#d9534f" points="612.5,-167 417.5,-167 417.5,-143 612.5,-143 612.5,-167"/>
-<text text-anchor="middle" x="515" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_scalar</text>
+<text text-anchor="middle" x="515" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_scalar</text>
 </a>
 </g>
 </g>
@@ -380,9 +380,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~derivative2_vector~2 -->
 <g id="proc~~nearest_point2~2~~CallsGraph_node12" class="node">
 <title>proc~derivative2_vector~2</title>
-<g id="a_proc~~nearest_point2~2~~CallsGraph_node12"><a xlink:href="../proc/derivative2_vector~2.html" xlink:title="nurbs_surface%derivative2_vector">
+<g id="a_proc~~nearest_point2~2~~CallsGraph_node12"><a xlink:href="../proc/derivative2_vector~2.html" xlink:title="nurbs_volume%derivative2_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="613,-125 417,-125 417,-101 613,-101 613,-125"/>
-<text text-anchor="middle" x="515" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_vector</text>
+<text text-anchor="middle" x="515" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_vector</text>
 </a>
 </g>
 </g>
@@ -410,9 +410,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~is_rational~2 -->
 <g id="proc~~nearest_point2~2~~CallsGraph_node14" class="node">
 <title>proc~is_rational~2</title>
-<g id="a_proc~~nearest_point2~2~~CallsGraph_node14"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<g id="a_proc~~nearest_point2~2~~CallsGraph_node14"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="801,-209 649,-209 649,-185 801,-185 801,-209"/>
-<text text-anchor="middle" x="725" y="-194.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
+<text text-anchor="middle" x="725" y="-194.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
@@ -470,18 +470,18 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#0000ff" d="M323.61,-54C362.06,-54 434.03,-54 477.62,-54"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="477.79,-57.5 487.79,-54 477.79,-50.5 477.79,-57.5"/>
 </g>
-<!-- interface~nearest_point_help_2d -->
+<!-- interface~nearest_point_help_3d -->
 <g id="proc~~nearest_point2~2~~CallsGraph_node10" class="node">
-<title>interface~nearest_point_help_2d</title>
-<g id="a_proc~~nearest_point2~2~~CallsGraph_node10"><a xlink:href="../interface/nearest_point_help_2d.html" xlink:title="nearest_point_help_2d">
+<title>interface~nearest_point_help_3d</title>
+<g id="a_proc~~nearest_point2~2~~CallsGraph_node10"><a xlink:href="../interface/nearest_point_help_3d.html" xlink:title="nearest_point_help_3d">
 <polygon fill="#a7506f" stroke="#a7506f" points="581,-24 449,-24 449,0 581,0 581,-24"/>
-<text text-anchor="middle" x="515" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_2d</text>
+<text text-anchor="middle" x="515" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_3d</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point~2&#45;&gt;interface~nearest_point_help_2d -->
+<!-- proc~nearest_point~2&#45;&gt;interface~nearest_point_help_3d -->
 <g id="proc~~nearest_point2~2~~CallsGraph_edge16" class="edge">
-<title>proc~nearest_point~2&#45;&gt;interface~nearest_point_help_2d</title>
+<title>proc~nearest_point~2&#45;&gt;interface~nearest_point_help_3d</title>
 <path fill="none" stroke="#ff00ff" d="M381.2,-12C400.18,-12 420.22,-12 438.81,-12"/>
 <polygon fill="#ff00ff" stroke="#ff00ff" points="438.98,-15.5 448.98,-12 438.98,-8.5 438.98,-15.5"/>
 </g>
@@ -661,20 +661,20 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~nearest_point2~2~~CalledByGraph_node1" class="node">
 <title>proc~nearest_point2~2</title>
 <polygon fill="none" stroke="black" points="315,-24 139,-24 139,0 315,0 315,-24"/>
-<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%nearest_point2</text>
+<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%nearest_point2</text>
 </g>
-<!-- program~nearest_point_2d -->
+<!-- program~nearest_point_3d -->
 <g id="proc~~nearest_point2~2~~CalledByGraph_node2" class="node">
-<title>program~nearest_point_2d</title>
-<g id="a_proc~~nearest_point2~2~~CalledByGraph_node2"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
+<title>program~nearest_point_3d</title>
+<g id="a_proc~~nearest_point2~2~~CalledByGraph_node2"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-24 0,-24 0,0 103,0 103,-24"/>
-<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
 <g id="proc~~nearest_point2~2~~CalledByGraph_edge1" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
 <path fill="none" stroke="#ff0000" d="M103.15,-12C111.2,-12 119.76,-12 128.46,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="128.73,-15.5 138.73,-12 128.73,-8.5 128.73,-15.5"/>
 </g>
@@ -792,7 +792,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/nearest_point2~3.html b/proc/nearest_point2~3.html
index 2c3e75b10..43973bc6e 100644
--- a/proc/nearest_point2~3.html
+++ b/proc/nearest_point2~3.html
@@ -78,20 +78,20 @@ <h1>nearest_point2
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.8% of total for procedures.">53 statements</a>
+                 title=" 0.9% of total for procedures.">62 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">nearest_point2</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private impure subroutine nearest_point2(this, point_Xg, tol, maxit, nearest
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
         <tr>
             <td>
               <span class="anchor" id="variable-this~190"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -218,7 +218,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xt~10"></span>
+              <span class="anchor" id="variable-nearest_xt~9"></span>
               real(kind=rk),
             </td>
 <td>intent(out)</td>
@@ -226,14 +226,14 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>nearest_Xt</strong></td>
+            <td><strong>nearest_Xt</strong>(2)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xg~10"></span>
+              <span class="anchor" id="variable-nearest_xg~9"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -261,211 +261,298 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~nearest_point2~3~~CallsGraph Pages: 1 -->
-<svg id="procnearest_point23CallsGraph" width="641pt" height="184pt"
- viewBox="0.00 0.00 641.00 184.07" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~nearest_point2~3~~CallsGraph" class="graph" transform="scale(1.2 1.2) rotate(0) translate(4 217.4)">
+<svg id="procnearest_point23CallsGraph" width="641pt" height="185pt"
+ viewBox="0.00 0.00 641.00 184.67" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~nearest_point2~3~~CallsGraph" class="graph" transform="scale(1.4 1.4) rotate(0) translate(4 255)">
 <title>proc~~nearest_point2~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-217.4 767,-217.4 767,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-255 895,-255 895,4 -4,4"/>
 <!-- proc~nearest_point2~3 -->
 <g id="proc~~nearest_point2~3~~CallsGraph_node1" class="node">
 <title>proc~nearest_point2~3</title>
-<polygon fill="none" stroke="black" points="166,-108 0,-108 0,-84 166,-84 166,-108"/>
-<text text-anchor="middle" x="83" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%nearest_point2</text>
+<polygon fill="none" stroke="black" points="176,-147 0,-147 0,-123 176,-123 176,-147"/>
+<text text-anchor="middle" x="88" y="-132.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%nearest_point2</text>
 </g>
 <!-- none~derivative2~3 -->
 <g id="proc~~nearest_point2~3~~CallsGraph_node2" class="node">
 <title>none~derivative2~3</title>
-<g id="a_proc~~nearest_point2~3~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative2~3" xlink:title="nurbs_curve%derivative2">
-<polygon fill="#a7506f" stroke="#a7506f" points="356,-108 208,-108 208,-84 356,-84 356,-108"/>
-<text text-anchor="middle" x="282" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2</text>
+<g id="a_proc~~nearest_point2~3~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~3" xlink:title="nurbs_surface%derivative2">
+<polygon fill="#a7506f" stroke="#a7506f" points="375,-168 218,-168 218,-144 375,-144 375,-168"/>
+<text text-anchor="middle" x="296.5" y="-153.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;none~derivative2~3 -->
 <g id="proc~~nearest_point2~3~~CallsGraph_edge1" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;none~derivative2~3</title>
-<path fill="none" stroke="#ff0000" d="M166.12,-96C176.49,-96 187.11,-96 197.51,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="197.81,-99.5 207.81,-96 197.81,-92.5 197.81,-99.5"/>
+<path fill="none" stroke="#ff0000" d="M176.28,-143.88C186.59,-144.92 197.13,-146 207.46,-147.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="207.4,-150.56 217.71,-148.09 208.11,-143.6 207.4,-150.56"/>
 </g>
 <!-- proc~cmp_xg~3 -->
 <g id="proc~~nearest_point2~3~~CallsGraph_node3" class="node">
 <title>proc~cmp_xg~3</title>
-<g id="a_proc~~nearest_point2~3~~CallsGraph_node3"><a xlink:href="../proc/cmp_xg~3.html" xlink:title="nurbs_curve%cmp_Xg">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="347,-192 217,-192 217,-168 347,-168 347,-192"/>
-<text text-anchor="middle" x="282" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_Xg</text>
+<g id="a_proc~~nearest_point2~3~~CallsGraph_node3"><a xlink:href="../proc/cmp_xg~3.html" xlink:title="nurbs_surface%cmp_Xg">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="585,-251 445,-251 445,-227 585,-227 585,-251"/>
+<text text-anchor="middle" x="515" y="-236.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;proc~cmp_xg~3 -->
 <g id="proc~~nearest_point2~3~~CallsGraph_edge2" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;proc~cmp_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M103.38,-108.15C126.22,-122.04 165.7,-144.71 202,-159 207.41,-161.13 213.12,-163.12 218.89,-164.95"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="218.02,-168.35 228.6,-167.9 220.05,-161.65 218.02,-168.35"/>
+<path fill="none" stroke="#ff0000" d="M106.85,-147.08C130,-162.12 172.17,-187.36 212,-200 285.27,-223.25 372.73,-232.67 434.63,-236.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="434.54,-239.97 444.73,-237.06 434.94,-232.98 434.54,-239.97"/>
 </g>
 <!-- proc~create~3 -->
 <g id="proc~~nearest_point2~3~~CallsGraph_node4" class="node">
 <title>proc~create~3</title>
-<g id="a_proc~~nearest_point2~3~~CallsGraph_node4"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_curve%create">
-<polygon fill="#d9534f" stroke="#d9534f" points="342.5,-150 221.5,-150 221.5,-126 342.5,-126 342.5,-150"/>
-<text text-anchor="middle" x="282" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%create</text>
+<g id="a_proc~~nearest_point2~3~~CallsGraph_node4"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
+<polygon fill="#d9534f" stroke="#d9534f" points="580.5,-209 449.5,-209 449.5,-185 580.5,-185 580.5,-209"/>
+<text text-anchor="middle" x="515" y="-194.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;proc~create~3 -->
 <g id="proc~~nearest_point2~3~~CallsGraph_edge3" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#ff0000" d="M140.45,-108.04C163.64,-112.98 190.65,-118.74 214.76,-123.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="214.03,-127.3 224.54,-125.96 215.49,-120.45 214.03,-127.3"/>
+<path fill="none" stroke="#ff0000" d="M117.24,-147.03C141.8,-156.9 178.59,-170.31 212,-177 288.5,-192.32 377.86,-196.59 439.42,-197.48"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="439.4,-200.98 449.44,-197.6 439.48,-193.98 439.4,-200.98"/>
 </g>
 <!-- proc~finalize~3 -->
 <g id="proc~~nearest_point2~3~~CallsGraph_node5" class="node">
 <title>proc~finalize~3</title>
-<g id="a_proc~~nearest_point2~3~~CallsGraph_node5"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_curve%finalize">
-<polygon fill="#d9534f" stroke="#d9534f" points="345,-66 219,-66 219,-42 345,-42 345,-66"/>
-<text text-anchor="middle" x="282" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%finalize</text>
+<g id="a_proc~~nearest_point2~3~~CallsGraph_node5"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_surface%finalize">
+<polygon fill="#d9534f" stroke="#d9534f" points="364.5,-126 228.5,-126 228.5,-102 364.5,-102 364.5,-126"/>
+<text text-anchor="middle" x="296.5" y="-111.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%finalize</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;proc~finalize~3 -->
 <g id="proc~~nearest_point2~3~~CallsGraph_edge4" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;proc~finalize~3</title>
-<path fill="none" stroke="#ff0000" d="M140.45,-83.96C163.64,-79.02 190.65,-73.26 214.76,-68.12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="215.49,-71.55 224.54,-66.04 214.03,-64.7 215.49,-71.55"/>
+<path fill="none" stroke="#ff0000" d="M176.28,-126.12C190.13,-124.72 204.39,-123.27 218,-121.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="218.68,-125.33 228.27,-120.84 217.97,-118.37 218.68,-125.33"/>
 </g>
-<!-- proc~nearest_point~3 -->
+<!-- proc~inv -->
 <g id="proc~~nearest_point2~3~~CallsGraph_node6" class="node">
+<title>proc~inv</title>
+<g id="a_proc~~nearest_point2~3~~CallsGraph_node6"><a xlink:href="../proc/inv.html" xlink:title="inv">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="323.5,-66 269.5,-66 269.5,-42 323.5,-42 323.5,-66"/>
+<text text-anchor="middle" x="296.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">inv</text>
+</a>
+</g>
+</g>
+<!-- proc~nearest_point2~3&#45;&gt;proc~inv -->
+<g id="proc~~nearest_point2~3~~CallsGraph_edge5" class="edge">
+<title>proc~nearest_point2~3&#45;&gt;proc~inv</title>
+<path fill="none" stroke="#ff0000" d="M119.92,-122.87C157.36,-108.19 220.31,-83.49 259.79,-68.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="261.26,-71.19 269.29,-64.28 258.7,-64.67 261.26,-71.19"/>
+</g>
+<!-- proc~nearest_point~3 -->
+<g id="proc~~nearest_point2~3~~CallsGraph_node7" class="node">
 <title>proc~nearest_point~3</title>
-<g id="a_proc~~nearest_point2~3~~CallsGraph_node6"><a xlink:href="../proc/nearest_point~3.html" xlink:title="nurbs_curve%nearest_point">
-<polygon fill="#d9534f" stroke="#d9534f" points="362,-24 202,-24 202,0 362,0 362,-24"/>
-<text text-anchor="middle" x="282" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point</text>
+<g id="a_proc~~nearest_point2~3~~CallsGraph_node7"><a xlink:href="../proc/nearest_point~3.html" xlink:title="nurbs_surface%nearest_point">
+<polygon fill="#d9534f" stroke="#d9534f" points="381,-24 212,-24 212,0 381,0 381,-24"/>
+<text text-anchor="middle" x="296.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;proc~nearest_point~3 -->
-<g id="proc~~nearest_point2~3~~CallsGraph_edge5" class="edge">
+<g id="proc~~nearest_point2~3~~CallsGraph_edge6" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;proc~nearest_point~3</title>
-<path fill="none" stroke="#ff0000" d="M103.38,-83.85C126.22,-69.96 165.7,-47.29 202,-33 207.41,-30.87 213.12,-28.88 218.89,-27.05"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="220.05,-30.35 228.6,-24.1 218.02,-23.65 220.05,-30.35"/>
+<path fill="none" stroke="#ff0000" d="M99.94,-122.91C120.01,-101.48 164.99,-56.84 212,-33 216.01,-30.97 220.23,-29.12 224.55,-27.45"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="225.88,-30.69 234.14,-24.05 223.55,-24.09 225.88,-30.69"/>
 </g>
 <!-- proc~derivative2_scalar~3 -->
-<g id="proc~~nearest_point2~3~~CallsGraph_node9" class="node">
+<g id="proc~~nearest_point2~3~~CallsGraph_node11" class="node">
 <title>proc~derivative2_scalar~3</title>
-<g id="a_proc~~nearest_point2~3~~CallsGraph_node9"><a xlink:href="../proc/derivative2_scalar~3.html" xlink:title="nurbs_curve%derivative2_scalar">
-<polygon fill="#d9534f" stroke="#d9534f" points="584,-109 399,-109 399,-85 584,-85 584,-109"/>
-<text text-anchor="middle" x="491.5" y="-94.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_scalar</text>
+<g id="a_proc~~nearest_point2~3~~CallsGraph_node11"><a xlink:href="../proc/derivative2_scalar~3.html" xlink:title="nurbs_surface%derivative2_scalar">
+<polygon fill="#d9534f" stroke="#d9534f" points="612.5,-167 417.5,-167 417.5,-143 612.5,-143 612.5,-167"/>
+<text text-anchor="middle" x="515" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_scalar</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2~3&#45;&gt;proc~derivative2_scalar~3 -->
-<g id="proc~~nearest_point2~3~~CallsGraph_edge6" class="edge">
+<g id="proc~~nearest_point2~3~~CallsGraph_edge7" class="edge">
 <title>none~derivative2~3&#45;&gt;proc~derivative2_scalar~3</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M356.16,-96.35C366.7,-96.4 377.7,-96.46 388.68,-96.51"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="388.72,-100.01 398.73,-96.56 388.75,-93.01 388.72,-100.01"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M375.05,-155.64C385.44,-155.59 396.24,-155.54 407.03,-155.49"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="407.36,-158.99 417.35,-155.45 407.33,-151.99 407.36,-158.99"/>
 </g>
 <!-- proc~derivative2_vector~3 -->
-<g id="proc~~nearest_point2~3~~CallsGraph_node10" class="node">
+<g id="proc~~nearest_point2~3~~CallsGraph_node12" class="node">
 <title>proc~derivative2_vector~3</title>
-<g id="a_proc~~nearest_point2~3~~CallsGraph_node10"><a xlink:href="../proc/derivative2_vector~3.html" xlink:title="nurbs_curve%derivative2_vector">
-<polygon fill="#d9534f" stroke="#d9534f" points="585,-67 398,-67 398,-43 585,-43 585,-67"/>
-<text text-anchor="middle" x="491.5" y="-52.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_vector</text>
+<g id="a_proc~~nearest_point2~3~~CallsGraph_node12"><a xlink:href="../proc/derivative2_vector~3.html" xlink:title="nurbs_surface%derivative2_vector">
+<polygon fill="#d9534f" stroke="#d9534f" points="613,-125 417,-125 417,-101 613,-101 613,-125"/>
+<text text-anchor="middle" x="515" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_vector</text>
 </a>
 </g>
 </g>
 <!-- none~derivative2~3&#45;&gt;proc~derivative2_vector~3 -->
-<g id="proc~~nearest_point2~3~~CallsGraph_edge7" class="edge">
+<g id="proc~~nearest_point2~3~~CallsGraph_edge8" class="edge">
 <title>none~derivative2~3&#45;&gt;proc~derivative2_vector~3</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M343.85,-83.98C367.61,-79.28 395,-73.87 419.64,-69"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="420.51,-72.4 429.65,-67.02 419.16,-65.53 420.51,-72.4"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M358.1,-143.96C384.61,-138.7 415.89,-132.49 443.45,-127.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="444.29,-130.41 453.42,-125.03 442.93,-123.55 444.29,-130.41"/>
 </g>
 <!-- interface~compute_xg~3 -->
-<g id="proc~~nearest_point2~3~~CallsGraph_node7" class="node">
+<g id="proc~~nearest_point2~3~~CallsGraph_node8" class="node">
 <title>interface~compute_xg~3</title>
-<g id="a_proc~~nearest_point2~3~~CallsGraph_node7"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
-<polygon fill="#a7506f" stroke="#a7506f" points="531,-189 452,-189 452,-165 531,-165 531,-189"/>
-<text text-anchor="middle" x="491.5" y="-174.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
+<g id="a_proc~~nearest_point2~3~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
+<polygon fill="#a7506f" stroke="#a7506f" points="764.5,-251 685.5,-251 685.5,-227 764.5,-227 764.5,-251"/>
+<text text-anchor="middle" x="725" y="-236.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_xg~3&#45;&gt;interface~compute_xg~3 -->
-<g id="proc~~nearest_point2~3~~CallsGraph_edge8" class="edge">
+<g id="proc~~nearest_point2~3~~CallsGraph_edge9" class="edge">
 <title>proc~cmp_xg~3&#45;&gt;interface~compute_xg~3</title>
-<path fill="none" stroke="#cbff00" d="M347.23,-179.07C377.76,-178.63 413.66,-178.11 441.88,-177.7"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="441.96,-181.2 451.91,-177.56 441.86,-174.2 441.96,-181.2"/>
+<path fill="none" stroke="#ffff00" d="M585.26,-239C614.68,-239 648.29,-239 675.06,-239"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="675.34,-242.5 685.34,-239 675.34,-235.5 675.34,-242.5"/>
 </g>
 <!-- proc~is_rational~3 -->
-<g id="proc~~nearest_point2~3~~CallsGraph_node11" class="node">
+<g id="proc~~nearest_point2~3~~CallsGraph_node14" class="node">
 <title>proc~is_rational~3</title>
-<g id="a_proc~~nearest_point2~3~~CallsGraph_node11"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="763,-129 621,-129 621,-105 763,-105 763,-129"/>
-<text text-anchor="middle" x="692" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
+<g id="a_proc~~nearest_point2~3~~CallsGraph_node14"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="801,-209 649,-209 649,-185 801,-185 801,-209"/>
+<text text-anchor="middle" x="725" y="-194.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_xg~3&#45;&gt;proc~is_rational~3 -->
-<g id="proc~~nearest_point2~3~~CallsGraph_edge9" class="edge">
+<g id="proc~~nearest_point2~3~~CallsGraph_edge10" class="edge">
 <title>proc~cmp_xg~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#cbff00" d="M324.36,-192.08C383.78,-207.33 495.94,-228.13 585,-198 620.83,-185.88 654.09,-156.25 673.47,-136.4"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="676.08,-138.73 680.43,-129.07 671,-133.91 676.08,-138.73"/>
+<path fill="none" stroke="#ffff00" d="M575.6,-226.96C600.19,-222 628.85,-216.21 654.4,-211.05"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="655.28,-214.45 664.39,-209.04 653.89,-207.59 655.28,-214.45"/>
 </g>
 <!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
-<g id="proc~~nearest_point2~3~~CallsGraph_edge10" class="edge">
+<g id="proc~~nearest_point2~3~~CallsGraph_edge11" class="edge">
 <title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
-<path fill="none" stroke="#00ff66" d="M342.74,-149.23C374.12,-155.13 412.09,-162.26 441.69,-167.83"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="441.3,-171.31 451.78,-169.72 442.6,-164.44 441.3,-171.31"/>
+<path fill="none" stroke="#00ff00" d="M575.6,-209.04C607.18,-215.41 645.47,-223.14 675.24,-229.16"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="674.9,-232.66 685.4,-231.21 676.29,-225.79 674.9,-232.66"/>
+</g>
+<!-- interface~ndgrid -->
+<g id="proc~~nearest_point2~3~~CallsGraph_node9" class="node">
+<title>interface~ndgrid</title>
+<g id="a_proc~~nearest_point2~3~~CallsGraph_node9"><a xlink:href="../interface/ndgrid.html" xlink:title="ndgrid">
+<polygon fill="#a7506f" stroke="#a7506f" points="752,-167 698,-167 698,-143 752,-143 752,-167"/>
+<text text-anchor="middle" x="725" y="-152.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid</text>
+</a>
+</g>
+</g>
+<!-- proc~create~3&#45;&gt;interface~ndgrid -->
+<g id="proc~~nearest_point2~3~~CallsGraph_edge12" class="edge">
+<title>proc~create~3&#45;&gt;interface~ndgrid</title>
+<path fill="none" stroke="#00ff00" d="M575.6,-184.96C611.84,-177.65 656.94,-168.54 687.84,-162.3"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="688.64,-165.71 697.75,-160.3 687.25,-158.85 688.64,-165.71"/>
 </g>
 <!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
-<g id="proc~~nearest_point2~3~~CallsGraph_edge11" class="edge">
+<g id="proc~~nearest_point2~3~~CallsGraph_edge13" class="edge">
 <title>proc~create~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#00ff66" d="M342.76,-134.92C413.51,-131.28 531.66,-125.2 610.44,-121.15"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="611,-124.62 620.8,-120.61 610.64,-117.63 611,-124.62"/>
+<path fill="none" stroke="#00ff00" d="M580.67,-197C599.05,-197 619.36,-197 638.76,-197"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="638.81,-200.5 648.81,-197 638.81,-193.5 638.81,-200.5"/>
 </g>
-<!-- interface~nearest_point_help_1d -->
-<g id="proc~~nearest_point2~3~~CallsGraph_node8" class="node">
-<title>interface~nearest_point_help_1d</title>
-<g id="a_proc~~nearest_point2~3~~CallsGraph_node8"><a xlink:href="../interface/nearest_point_help_1d.html" xlink:title="nearest_point_help_1d">
-<polygon fill="#a7506f" stroke="#a7506f" points="557.5,-24 425.5,-24 425.5,0 557.5,0 557.5,-24"/>
-<text text-anchor="middle" x="491.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_1d</text>
+<!-- proc~inv&#45;&gt;proc~inv -->
+<g id="proc~~nearest_point2~3~~CallsGraph_edge15" class="edge">
+<title>proc~inv&#45;&gt;proc~inv</title>
+<path fill="none" stroke="#0000ff" d="M269.5,-61.84C247.08,-71.91 256.08,-84 296.5,-84 329.97,-84 341.9,-75.71 332.28,-67.14"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="333.87,-64.01 323.5,-61.84 330.25,-70 333.87,-64.01"/>
+</g>
+<!-- proc~det -->
+<g id="proc~~nearest_point2~3~~CallsGraph_node13" class="node">
+<title>proc~det</title>
+<g id="a_proc~~nearest_point2~3~~CallsGraph_node13"><a xlink:href="../proc/det.html" xlink:title="det">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="542,-66 488,-66 488,-42 542,-42 542,-66"/>
+<text text-anchor="middle" x="515" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">det</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point~3&#45;&gt;interface~nearest_point_help_1d -->
-<g id="proc~~nearest_point2~3~~CallsGraph_edge12" class="edge">
-<title>proc~nearest_point~3&#45;&gt;interface~nearest_point_help_1d</title>
-<path fill="none" stroke="#cc00ff" d="M362.04,-12C379.46,-12 397.88,-12 415.15,-12"/>
-<polygon fill="#cc00ff" stroke="#cc00ff" points="415.17,-15.5 425.17,-12 415.17,-8.5 415.17,-15.5"/>
+<!-- proc~inv&#45;&gt;proc~det -->
+<g id="proc~~nearest_point2~3~~CallsGraph_edge14" class="edge">
+<title>proc~inv&#45;&gt;proc~det</title>
+<path fill="none" stroke="#0000ff" d="M323.61,-54C362.06,-54 434.03,-54 477.62,-54"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="477.79,-57.5 487.79,-54 477.79,-50.5 477.79,-57.5"/>
+</g>
+<!-- interface~nearest_point_help_2d -->
+<g id="proc~~nearest_point2~3~~CallsGraph_node10" class="node">
+<title>interface~nearest_point_help_2d</title>
+<g id="a_proc~~nearest_point2~3~~CallsGraph_node10"><a xlink:href="../interface/nearest_point_help_2d.html" xlink:title="nearest_point_help_2d">
+<polygon fill="#a7506f" stroke="#a7506f" points="581,-24 449,-24 449,0 581,0 581,-24"/>
+<text text-anchor="middle" x="515" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_2d</text>
+</a>
+</g>
+</g>
+<!-- proc~nearest_point~3&#45;&gt;interface~nearest_point_help_2d -->
+<g id="proc~~nearest_point2~3~~CallsGraph_edge16" class="edge">
+<title>proc~nearest_point~3&#45;&gt;interface~nearest_point_help_2d</title>
+<path fill="none" stroke="#ff00ff" d="M381.2,-12C400.18,-12 420.22,-12 438.81,-12"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="438.98,-15.5 448.98,-12 438.98,-8.5 438.98,-15.5"/>
+</g>
+<!-- proc~ndgrid2 -->
+<g id="proc~~nearest_point2~3~~CallsGraph_node16" class="node">
+<title>proc~ndgrid2</title>
+<g id="a_proc~~nearest_point2~3~~CallsGraph_node16"><a xlink:href="../proc/ndgrid2.html" xlink:title="ndgrid2">
+<polygon fill="#d9534f" stroke="#d9534f" points="891,-188 837,-188 837,-164 891,-164 891,-188"/>
+<text text-anchor="middle" x="864" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid2</text>
+</a>
+</g>
+</g>
+<!-- interface~ndgrid&#45;&gt;proc~ndgrid2 -->
+<g id="proc~~nearest_point2~3~~CallsGraph_edge17" class="edge">
+<title>interface~ndgrid&#45;&gt;proc~ndgrid2</title>
+<path fill="none" stroke="#ffda00" stroke-dasharray="5,2" d="M752.09,-159C773.19,-162.23 803.14,-166.82 826.6,-170.42"/>
+<polygon fill="#ffda00" stroke="#ffda00" points="826.12,-173.89 836.54,-171.94 827.19,-166.97 826.12,-173.89"/>
+</g>
+<!-- proc~ndgrid3 -->
+<g id="proc~~nearest_point2~3~~CallsGraph_node17" class="node">
+<title>proc~ndgrid3</title>
+<g id="a_proc~~nearest_point2~3~~CallsGraph_node17"><a xlink:href="../proc/ndgrid3.html" xlink:title="ndgrid3">
+<polygon fill="#d9534f" stroke="#d9534f" points="891,-146 837,-146 837,-122 891,-122 891,-146"/>
+<text text-anchor="middle" x="864" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ndgrid3</text>
+</a>
+</g>
+</g>
+<!-- interface~ndgrid&#45;&gt;proc~ndgrid3 -->
+<g id="proc~~nearest_point2~3~~CallsGraph_edge18" class="edge">
+<title>interface~ndgrid&#45;&gt;proc~ndgrid3</title>
+<path fill="none" stroke="#ffda00" stroke-dasharray="5,2" d="M752.09,-151C773.19,-147.77 803.14,-143.18 826.6,-139.58"/>
+<polygon fill="#ffda00" stroke="#ffda00" points="827.19,-143.03 836.54,-138.06 826.12,-136.11 827.19,-143.03"/>
 </g>
 <!-- proc~derivative2_scalar~3&#45;&gt;proc~is_rational~3 -->
-<g id="proc~~nearest_point2~3~~CallsGraph_edge14" class="edge">
+<g id="proc~~nearest_point2~3~~CallsGraph_edge20" class="edge">
 <title>proc~derivative2_scalar~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#00ff66" d="M584.2,-106.24C593.03,-107.13 601.95,-108.03 610.66,-108.91"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="610.48,-112.4 620.78,-109.92 611.18,-105.44 610.48,-112.4"/>
+<path fill="none" stroke="#00ff91" d="M575.6,-167.04C600.19,-172 628.85,-177.79 654.4,-182.95"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="653.89,-186.41 664.39,-184.96 655.28,-179.55 653.89,-186.41"/>
 </g>
 <!-- interface~compute_d2tgc~3 -->
-<g id="proc~~nearest_point2~3~~CallsGraph_node12" class="node">
+<g id="proc~~nearest_point2~3~~CallsGraph_node15" class="node">
 <title>interface~compute_d2tgc~3</title>
-<g id="a_proc~~nearest_point2~3~~CallsGraph_node12"><a xlink:href="../interface/compute_d2tgc~3.html" xlink:title="compute_d2Tgc">
-<polygon fill="#a7506f" stroke="#a7506f" points="741,-67 643,-67 643,-43 741,-43 741,-67"/>
-<text text-anchor="middle" x="692" y="-52.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
+<g id="a_proc~~nearest_point2~3~~CallsGraph_node15"><a xlink:href="../interface/compute_d2tgc~3.html" xlink:title="compute_d2Tgc">
+<polygon fill="#a7506f" stroke="#a7506f" points="774,-125 676,-125 676,-101 774,-101 774,-125"/>
+<text text-anchor="middle" x="725" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
 </a>
 </g>
 </g>
 <!-- proc~derivative2_scalar~3&#45;&gt;interface~compute_d2tgc~3 -->
-<g id="proc~~nearest_point2~3~~CallsGraph_edge13" class="edge">
+<g id="proc~~nearest_point2~3~~CallsGraph_edge19" class="edge">
 <title>proc~derivative2_scalar~3&#45;&gt;interface~compute_d2tgc~3</title>
-<path fill="none" stroke="#00ff66" d="M549.38,-84.96C575.59,-79.42 606.65,-72.85 633,-67.27"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="633.78,-70.68 642.84,-65.19 632.34,-63.84 633.78,-70.68"/>
+<path fill="none" stroke="#00ff91" d="M575.6,-142.96C603.94,-137.24 637.68,-130.43 665.83,-124.75"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="666.82,-128.12 675.92,-122.71 665.43,-121.26 666.82,-128.12"/>
+</g>
+<!-- proc~derivative2_vector~3&#45;&gt;interface~ndgrid -->
+<g id="proc~~nearest_point2~3~~CallsGraph_edge22" class="edge">
+<title>proc~derivative2_vector~3&#45;&gt;interface~ndgrid</title>
+<path fill="none" stroke="#0091ff" d="M575.6,-125.04C611.84,-132.35 656.94,-141.46 687.84,-147.7"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="687.25,-151.15 697.75,-149.7 688.64,-144.29 687.25,-151.15"/>
 </g>
 <!-- proc~derivative2_vector~3&#45;&gt;proc~is_rational~3 -->
-<g id="proc~~nearest_point2~3~~CallsGraph_edge16" class="edge">
+<g id="proc~~nearest_point2~3~~CallsGraph_edge23" class="edge">
 <title>proc~derivative2_vector~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#0066ff" d="M551.56,-67.05C562.74,-69.72 574.29,-72.73 585,-76 608.19,-83.08 633.54,-92.81 653.64,-101.01"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="652.47,-104.32 663.05,-104.9 655.14,-97.85 652.47,-104.32"/>
+<path fill="none" stroke="#0091ff" d="M593.99,-125.08C600.64,-127.53 607.08,-130.47 613,-134 634.12,-146.59 628.27,-162.78 649,-176 651.74,-177.74 654.62,-179.35 657.6,-180.82"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="656.2,-184.03 666.76,-184.85 659.02,-177.62 656.2,-184.03"/>
 </g>
 <!-- proc~derivative2_vector~3&#45;&gt;interface~compute_d2tgc~3 -->
-<g id="proc~~nearest_point2~3~~CallsGraph_edge15" class="edge">
+<g id="proc~~nearest_point2~3~~CallsGraph_edge21" class="edge">
 <title>proc~derivative2_vector~3&#45;&gt;interface~compute_d2tgc~3</title>
-<path fill="none" stroke="#0066ff" d="M585.07,-55C601.33,-55 617.83,-55 632.81,-55"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="632.92,-58.5 642.92,-55 632.92,-51.5 632.92,-58.5"/>
+<path fill="none" stroke="#0091ff" d="M613.3,-113C631.17,-113 649.3,-113 665.57,-113"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="665.98,-116.5 675.98,-113 665.98,-109.5 665.98,-116.5"/>
 </g>
 </g>
 </svg>
@@ -565,31 +652,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~nearest_point2~3~~CalledByGraph Pages: 1 -->
-<svg id="procnearest_point23CalledByGraph" width="313pt" height="32pt"
- viewBox="0.00 0.00 313.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procnearest_point23CalledByGraph" width="323pt" height="32pt"
+ viewBox="0.00 0.00 323.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~nearest_point2~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~nearest_point2~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 309,-28 309,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 319,-28 319,4 -4,4"/>
 <!-- proc~nearest_point2~3 -->
 <g id="proc~~nearest_point2~3~~CalledByGraph_node1" class="node">
 <title>proc~nearest_point2~3</title>
-<polygon fill="none" stroke="black" points="305,-24 139,-24 139,0 305,0 305,-24"/>
-<text text-anchor="middle" x="222" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%nearest_point2</text>
+<polygon fill="none" stroke="black" points="315,-24 139,-24 139,0 315,0 315,-24"/>
+<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%nearest_point2</text>
 </g>
-<!-- program~nearest_point_1d -->
+<!-- program~nearest_point_2d -->
 <g id="proc~~nearest_point2~3~~CalledByGraph_node2" class="node">
-<title>program~nearest_point_1d</title>
-<g id="a_proc~~nearest_point2~3~~CalledByGraph_node2"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
+<title>program~nearest_point_2d</title>
+<g id="a_proc~~nearest_point2~3~~CalledByGraph_node2"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-24 0,-24 0,0 103,0 103,-24"/>
-<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2~3 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
 <g id="proc~~nearest_point2~3~~CalledByGraph_edge1" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2~3</title>
-<path fill="none" stroke="#ff0000" d="M103.06,-12C111.3,-12 120.05,-12 128.92,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="128.97,-15.5 138.97,-12 128.97,-8.5 128.97,-15.5"/>
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
+<path fill="none" stroke="#ff0000" d="M103.15,-12C111.2,-12 119.76,-12 128.46,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="128.73,-15.5 138.73,-12 128.73,-8.5 128.73,-15.5"/>
 </g>
 </g>
 </svg>
@@ -705,7 +792,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/nearest_point_help_1d.html b/proc/nearest_point_help_1d.html
index 56151f475..980445989 100644
--- a/proc/nearest_point_help_1d.html
+++ b/proc/nearest_point_help_1d.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~39"></span>
+              <span class="anchor" id="variable-ng~12"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xg~36"></span>
+              <span class="anchor" id="variable-xg~11"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-point_xg~9"></span>
+              <span class="anchor" id="variable-point_xg~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -335,7 +335,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-distances~6"></span>
+          <span class="anchor" id="variable-distances~2"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -371,7 +371,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/nearest_point_help_2d.html b/proc/nearest_point_help_2d.html
index 84ff4432a..b36411481 100644
--- a/proc/nearest_point_help_2d.html
+++ b/proc/nearest_point_help_2d.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~25"></span>
+              <span class="anchor" id="variable-ng~38"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xg~23"></span>
+              <span class="anchor" id="variable-xg~35"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-point_xg~6"></span>
+              <span class="anchor" id="variable-point_xg~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -335,7 +335,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-distances~4"></span>
+          <span class="anchor" id="variable-distances~6"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -371,7 +371,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/nearest_point_help_3d.html b/proc/nearest_point_help_3d.html
index 1b26d5125..1952164e1 100644
--- a/proc/nearest_point_help_3d.html
+++ b/proc/nearest_point_help_3d.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~12"></span>
+              <span class="anchor" id="variable-ng~26"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -302,7 +302,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xg~11"></span>
+              <span class="anchor" id="variable-xg~24"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -317,7 +317,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-point_xg~3"></span>
+              <span class="anchor" id="variable-point_xg~6"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -335,7 +335,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-distances~2"></span>
+          <span class="anchor" id="variable-distances~4"></span>
           real(kind=rk), allocatable, (:)
         </small>
       </h3>
@@ -371,7 +371,7 @@ <h3>Return Value
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/nearest_point~2.html b/proc/nearest_point~2.html
index cc72c04c7..daf2b726b 100644
--- a/proc/nearest_point~2.html
+++ b/proc/nearest_point~2.html
@@ -83,15 +83,15 @@ <h1>nearest_point
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">nearest_point</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine nearest_point(this, point_Xg, nearest_Xg, nearest_Xt
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~128"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~122"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xg~6"></span>
+              <span class="anchor" id="variable-nearest_xg~4"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -203,7 +203,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xt~6"></span>
+              <span class="anchor" id="variable-nearest_xt~4"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -218,7 +218,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-id~5"></span>
+              <span class="anchor" id="variable-id~3"></span>
               integer,
             </td>
 <td>intent(out),</td>
@@ -255,20 +255,20 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~nearest_point~2~~CallsGraph_node1" class="node">
 <title>proc~nearest_point~2</title>
 <polygon fill="none" stroke="black" points="169,-24 0,-24 0,0 169,0 169,-24"/>
-<text text-anchor="middle" x="84.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%nearest_point</text>
+<text text-anchor="middle" x="84.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%nearest_point</text>
 </g>
-<!-- interface~nearest_point_help_2d -->
+<!-- interface~nearest_point_help_3d -->
 <g id="proc~~nearest_point~2~~CallsGraph_node2" class="node">
-<title>interface~nearest_point_help_2d</title>
-<g id="a_proc~~nearest_point~2~~CallsGraph_node2"><a xlink:href="../interface/nearest_point_help_2d.html" xlink:title="nearest_point_help_2d">
+<title>interface~nearest_point_help_3d</title>
+<g id="a_proc~~nearest_point~2~~CallsGraph_node2"><a xlink:href="../interface/nearest_point_help_3d.html" xlink:title="nearest_point_help_3d">
 <polygon fill="#a7506f" stroke="#a7506f" points="337,-24 205,-24 205,0 337,0 337,-24"/>
-<text text-anchor="middle" x="271" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_2d</text>
+<text text-anchor="middle" x="271" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_3d</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point~2&#45;&gt;interface~nearest_point_help_2d -->
+<!-- proc~nearest_point~2&#45;&gt;interface~nearest_point_help_3d -->
 <g id="proc~~nearest_point~2~~CallsGraph_edge1" class="edge">
-<title>proc~nearest_point~2&#45;&gt;interface~nearest_point_help_2d</title>
+<title>proc~nearest_point~2&#45;&gt;interface~nearest_point_help_3d</title>
 <path fill="none" stroke="#ff0000" d="M169.11,-12C177.65,-12 186.29,-12 194.74,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="194.92,-15.5 204.92,-12 194.92,-8.5 194.92,-15.5"/>
 </g>
@@ -366,67 +366,52 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~nearest_point~2~~CalledByGraph Pages: 1 -->
-<svg id="procnearest_point2CalledByGraph" width="528pt" height="94pt"
- viewBox="0.00 0.00 528.00 94.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~nearest_point~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 90)">
+<svg id="procnearest_point2CalledByGraph" width="528pt" height="52pt"
+ viewBox="0.00 0.00 528.00 52.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~nearest_point~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 48)">
 <title>proc~~nearest_point~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-90 524,-90 524,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-48 524,-48 524,4 -4,4"/>
 <!-- proc~nearest_point~2 -->
 <g id="proc~~nearest_point~2~~CalledByGraph_node1" class="node">
 <title>proc~nearest_point~2</title>
-<polygon fill="none" stroke="black" points="520,-66 351,-66 351,-42 520,-42 520,-66"/>
-<text text-anchor="middle" x="435.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%nearest_point</text>
+<polygon fill="none" stroke="black" points="520,-44 351,-44 351,-20 520,-20 520,-44"/>
+<text text-anchor="middle" x="435.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%nearest_point</text>
 </g>
 <!-- proc~nearest_point2~2 -->
 <g id="proc~~nearest_point~2~~CalledByGraph_node2" class="node">
 <title>proc~nearest_point2~2</title>
-<g id="a_proc~~nearest_point~2~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_surface%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="315,-66 139,-66 139,-42 315,-42 315,-66"/>
-<text text-anchor="middle" x="227" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
+<g id="a_proc~~nearest_point~2~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_volume%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="315,-24 139,-24 139,0 315,0 315,-24"/>
+<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~2&#45;&gt;proc~nearest_point~2 -->
 <g id="proc~~nearest_point~2~~CalledByGraph_edge1" class="edge">
 <title>proc~nearest_point2~2&#45;&gt;proc~nearest_point~2</title>
-<path fill="none" stroke="#ff0000" d="M315.28,-54C323.65,-54 332.17,-54 340.6,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="340.83,-57.5 350.83,-54 340.83,-50.5 340.83,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M315.28,-20.45C323.65,-21.26 332.17,-22.09 340.6,-22.91"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="340.54,-26.42 350.83,-23.9 341.21,-19.45 340.54,-26.42"/>
 </g>
-<!-- program~nearest_point_2d -->
+<!-- program~nearest_point_3d -->
 <g id="proc~~nearest_point~2~~CalledByGraph_node3" class="node">
-<title>program~nearest_point_2d</title>
-<g id="a_proc~~nearest_point~2~~CalledByGraph_node3"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-86 0,-86 0,-62 103,-62 103,-86"/>
-<text text-anchor="middle" x="51.5" y="-71.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<title>program~nearest_point_3d</title>
+<g id="a_proc~~nearest_point~2~~CalledByGraph_node3"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-44 0,-44 0,-20 103,-20 103,-44"/>
+<text text-anchor="middle" x="51.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point~2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point~2 -->
 <g id="proc~~nearest_point~2~~CalledByGraph_edge2" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point~2</title>
-<path fill="none" stroke="#ff0000" d="M103.27,-74.68C115,-74.82 127.44,-74.93 139,-75 217.22,-75.45 237.07,-81.8 315,-75 332.28,-73.49 350.81,-70.78 367.99,-67.8"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="368.71,-71.23 377.93,-66.02 367.47,-64.34 368.71,-71.23"/>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point~2</title>
+<path fill="none" stroke="#ff0000" d="M103.27,-32.68C115,-32.82 127.44,-32.93 139,-33 217.22,-33.45 236.78,-33.33 315,-33 323.35,-32.97 332.03,-32.92 340.73,-32.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="340.95,-36.36 350.93,-32.79 340.9,-29.36 340.95,-36.36"/>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
-<g id="proc~~nearest_point~2~~CalledByGraph_edge4" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
-<path fill="none" stroke="#ff0000" d="M103.15,-68.16C111.29,-67.22 119.94,-66.23 128.75,-65.21"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="129.19,-68.68 138.73,-64.06 128.39,-61.73 129.19,-68.68"/>
-</g>
-<!-- program~nearest_point_2d_bench -->
-<g id="proc~~nearest_point~2~~CalledByGraph_node4" class="node">
-<title>program~nearest_point_2d_bench</title>
-<g id="a_proc~~nearest_point~2~~CalledByGraph_node4"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="298,-24 156,-24 156,0 298,0 298,-24"/>
-<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
-</a>
-</g>
-</g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~nearest_point~2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
 <g id="proc~~nearest_point~2~~CalledByGraph_edge3" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~nearest_point~2</title>
-<path fill="none" stroke="#ff0000" d="M287.17,-24.04C311.58,-29 340.04,-34.79 365.4,-39.95"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="364.82,-43.4 375.32,-41.96 366.21,-36.54 364.82,-43.4"/>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
+<path fill="none" stroke="#ff0000" d="M103.15,-26.16C111.29,-25.22 119.94,-24.23 128.75,-23.21"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="129.19,-26.68 138.73,-22.06 128.39,-19.73 129.19,-26.68"/>
 </g>
 </g>
 </svg>
@@ -542,7 +527,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/nearest_point~3.html b/proc/nearest_point~3.html
index 9071ca1c3..758ef7a92 100644
--- a/proc/nearest_point~3.html
+++ b/proc/nearest_point~3.html
@@ -83,15 +83,15 @@ <h1>nearest_point
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">nearest_point</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine nearest_point(this, point_Xg, nearest_Xg, nearest_Xt
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
         <tr>
             <td>
               <span class="anchor" id="variable-this~189"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(in)</td>
               <td></td>            <td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xg~9"></span>
+              <span class="anchor" id="variable-nearest_xg~8"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
@@ -203,22 +203,22 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xt~9"></span>
+              <span class="anchor" id="variable-nearest_xt~8"></span>
               real(kind=rk),
             </td>
 <td>intent(out),</td>
-              <td>optional</td>            <td>
-              
+              <td>optional,</td>            <td>
+              allocatable
             </td>
             <td>::</td>
-            <td><strong>nearest_Xt</strong></td>
+            <td><strong>nearest_Xt</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-id~7"></span>
+              <span class="anchor" id="variable-id~6"></span>
               integer,
             </td>
 <td>intent(out),</td>
@@ -246,31 +246,31 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~nearest_point~3~~CallsGraph Pages: 1 -->
-<svg id="procnearest_point3CallsGraph" width="336pt" height="32pt"
- viewBox="0.00 0.00 336.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procnearest_point3CallsGraph" width="345pt" height="32pt"
+ viewBox="0.00 0.00 345.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~nearest_point~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~nearest_point~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 332,-28 332,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 341,-28 341,4 -4,4"/>
 <!-- proc~nearest_point~3 -->
 <g id="proc~~nearest_point~3~~CallsGraph_node1" class="node">
 <title>proc~nearest_point~3</title>
-<polygon fill="none" stroke="black" points="160,-24 0,-24 0,0 160,0 160,-24"/>
-<text text-anchor="middle" x="80" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%nearest_point</text>
+<polygon fill="none" stroke="black" points="169,-24 0,-24 0,0 169,0 169,-24"/>
+<text text-anchor="middle" x="84.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%nearest_point</text>
 </g>
-<!-- interface~nearest_point_help_1d -->
+<!-- interface~nearest_point_help_2d -->
 <g id="proc~~nearest_point~3~~CallsGraph_node2" class="node">
-<title>interface~nearest_point_help_1d</title>
-<g id="a_proc~~nearest_point~3~~CallsGraph_node2"><a xlink:href="../interface/nearest_point_help_1d.html" xlink:title="nearest_point_help_1d">
-<polygon fill="#a7506f" stroke="#a7506f" points="328,-24 196,-24 196,0 328,0 328,-24"/>
-<text text-anchor="middle" x="262" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_1d</text>
+<title>interface~nearest_point_help_2d</title>
+<g id="a_proc~~nearest_point~3~~CallsGraph_node2"><a xlink:href="../interface/nearest_point_help_2d.html" xlink:title="nearest_point_help_2d">
+<polygon fill="#a7506f" stroke="#a7506f" points="337,-24 205,-24 205,0 337,0 337,-24"/>
+<text text-anchor="middle" x="271" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_2d</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point~3&#45;&gt;interface~nearest_point_help_1d -->
+<!-- proc~nearest_point~3&#45;&gt;interface~nearest_point_help_2d -->
 <g id="proc~~nearest_point~3~~CallsGraph_edge1" class="edge">
-<title>proc~nearest_point~3&#45;&gt;interface~nearest_point_help_1d</title>
-<path fill="none" stroke="#ff0000" d="M160.21,-12C168.66,-12 177.24,-12 185.64,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="185.78,-15.5 195.78,-12 185.78,-8.5 185.78,-15.5"/>
+<title>proc~nearest_point~3&#45;&gt;interface~nearest_point_help_2d</title>
+<path fill="none" stroke="#ff0000" d="M169.11,-12C177.65,-12 186.29,-12 194.74,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="194.92,-15.5 204.92,-12 194.92,-8.5 194.92,-15.5"/>
 </g>
 </g>
 </svg>
@@ -366,52 +366,67 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~nearest_point~3~~CalledByGraph Pages: 1 -->
-<svg id="procnearest_point3CalledByGraph" width="509pt" height="52pt"
- viewBox="0.00 0.00 509.00 52.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~nearest_point~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 48)">
+<svg id="procnearest_point3CalledByGraph" width="528pt" height="94pt"
+ viewBox="0.00 0.00 528.00 94.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~nearest_point~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 90)">
 <title>proc~~nearest_point~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-48 505,-48 505,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-90 524,-90 524,4 -4,4"/>
 <!-- proc~nearest_point~3 -->
 <g id="proc~~nearest_point~3~~CalledByGraph_node1" class="node">
 <title>proc~nearest_point~3</title>
-<polygon fill="none" stroke="black" points="501,-44 341,-44 341,-20 501,-20 501,-44"/>
-<text text-anchor="middle" x="421" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%nearest_point</text>
+<polygon fill="none" stroke="black" points="520,-66 351,-66 351,-42 520,-42 520,-66"/>
+<text text-anchor="middle" x="435.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%nearest_point</text>
 </g>
 <!-- proc~nearest_point2~3 -->
 <g id="proc~~nearest_point~3~~CalledByGraph_node2" class="node">
 <title>proc~nearest_point2~3</title>
-<g id="a_proc~~nearest_point~3~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_curve%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="305,-24 139,-24 139,0 305,0 305,-24"/>
-<text text-anchor="middle" x="222" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
+<g id="a_proc~~nearest_point~3~~CalledByGraph_node2"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_surface%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="315,-66 139,-66 139,-42 315,-42 315,-66"/>
+<text text-anchor="middle" x="227" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
 </a>
 </g>
 </g>
 <!-- proc~nearest_point2~3&#45;&gt;proc~nearest_point~3 -->
 <g id="proc~~nearest_point~3~~CalledByGraph_edge1" class="edge">
 <title>proc~nearest_point2~3&#45;&gt;proc~nearest_point~3</title>
-<path fill="none" stroke="#ff0000" d="M305.12,-20.34C313.62,-21.2 322.28,-22.08 330.86,-22.95"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="330.55,-26.44 340.86,-23.97 331.26,-19.47 330.55,-26.44"/>
+<path fill="none" stroke="#ff0000" d="M315.28,-54C323.65,-54 332.17,-54 340.6,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="340.83,-57.5 350.83,-54 340.83,-50.5 340.83,-57.5"/>
 </g>
-<!-- program~nearest_point_1d -->
+<!-- program~nearest_point_2d -->
 <g id="proc~~nearest_point~3~~CalledByGraph_node3" class="node">
-<title>program~nearest_point_1d</title>
-<g id="a_proc~~nearest_point~3~~CalledByGraph_node3"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-44 0,-44 0,-20 103,-20 103,-44"/>
-<text text-anchor="middle" x="51.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<title>program~nearest_point_2d</title>
+<g id="a_proc~~nearest_point~3~~CalledByGraph_node3"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="103,-86 0,-86 0,-62 103,-62 103,-86"/>
+<text text-anchor="middle" x="51.5" y="-71.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point~3 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point~3 -->
 <g id="proc~~nearest_point~3~~CalledByGraph_edge2" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~nearest_point~3</title>
-<path fill="none" stroke="#ff0000" d="M103.27,-32.68C115,-32.82 127.44,-32.93 139,-33 212.78,-33.43 231.22,-33.32 305,-33 313.32,-32.96 321.99,-32.91 330.66,-32.85"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="330.84,-36.35 340.82,-32.78 330.79,-29.35 330.84,-36.35"/>
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point~3</title>
+<path fill="none" stroke="#ff0000" d="M103.27,-74.68C115,-74.82 127.44,-74.93 139,-75 217.22,-75.45 237.07,-81.8 315,-75 332.28,-73.49 350.81,-70.78 367.99,-67.8"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="368.71,-71.23 377.93,-66.02 367.47,-64.34 368.71,-71.23"/>
+</g>
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
+<g id="proc~~nearest_point~3~~CalledByGraph_edge4" class="edge">
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
+<path fill="none" stroke="#ff0000" d="M103.15,-68.16C111.29,-67.22 119.94,-66.23 128.75,-65.21"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="129.19,-68.68 138.73,-64.06 128.39,-61.73 129.19,-68.68"/>
+</g>
+<!-- program~nearest_point_2d_bench -->
+<g id="proc~~nearest_point~3~~CalledByGraph_node4" class="node">
+<title>program~nearest_point_2d_bench</title>
+<g id="a_proc~~nearest_point~3~~CalledByGraph_node4"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="298,-24 156,-24 156,0 298,0 298,-24"/>
+<text text-anchor="middle" x="227" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+</a>
+</g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2~3 -->
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~nearest_point~3 -->
 <g id="proc~~nearest_point~3~~CalledByGraph_edge3" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2~3</title>
-<path fill="none" stroke="#ff0000" d="M103.06,-26C111.3,-25.02 120.05,-23.98 128.92,-22.93"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="129.45,-26.39 138.97,-21.74 128.63,-19.44 129.45,-26.39"/>
+<title>program~nearest_point_2d_bench&#45;&gt;proc~nearest_point~3</title>
+<path fill="none" stroke="#ff0000" d="M287.17,-24.04C311.58,-29 340.04,-34.79 365.4,-39.95"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="364.82,-43.4 375.32,-41.96 366.21,-36.54 364.82,-43.4"/>
 </g>
 </g>
 </svg>
@@ -527,7 +542,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/put_to_nurbs.html b/proc/put_to_nurbs.html
index 31c0a973b..6917fdc6f 100644
--- a/proc/put_to_nurbs.html
+++ b/proc/put_to_nurbs.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~50"></span>
+              <span class="anchor" id="variable-this~111"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-x~2"></span>
+              <span class="anchor" id="variable-x~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~12"></span>
+              <span class="anchor" id="variable-elemconn~24"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -257,18 +257,18 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M166,-54C197.42,-54 231.69,-54 256.7,-54"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="256.82,-57.5 266.82,-54 256.82,-50.5 256.82,-57.5"/>
 </g>
-<!-- proc~set_elem_xg_vis -->
+<!-- proc~set_elem_xg_vis~2 -->
 <g id="proc~~put_to_nurbs~~CallsGraph_node4" class="node">
-<title>proc~set_elem_xg_vis</title>
-<g id="a_proc~~put_to_nurbs~~CallsGraph_node4"><a xlink:href="../proc/set_elem_xg_vis.html" xlink:title="nurbs_volume%set_elem_Xg_vis">
+<title>proc~set_elem_xg_vis~2</title>
+<g id="a_proc~~put_to_nurbs~~CallsGraph_node4"><a xlink:href="../proc/set_elem_xg_vis~2.html" xlink:title="nurbs_volume%set_elem_Xg_vis">
 <polygon fill="#d9534f" stroke="#d9534f" points="386,-24 202,-24 202,0 386,0 386,-24"/>
 <text text-anchor="middle" x="294" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~put_to_nurbs&#45;&gt;proc~set_elem_xg_vis -->
+<!-- proc~put_to_nurbs&#45;&gt;proc~set_elem_xg_vis~2 -->
 <g id="proc~~put_to_nurbs~~CallsGraph_edge3" class="edge">
-<title>proc~put_to_nurbs&#45;&gt;proc~set_elem_xg_vis</title>
+<title>proc~put_to_nurbs&#45;&gt;proc~set_elem_xg_vis~2</title>
 <path fill="none" stroke="#ff0000" d="M143.89,-41.96C168.6,-37 197.4,-31.21 223.06,-26.05"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="223.99,-29.44 233.1,-24.04 222.61,-22.58 223.99,-29.44"/>
 </g>
@@ -506,7 +506,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/remove_knots.html b/proc/remove_knots.html
index 2f6fe46e4..3fc5187a4 100644
--- a/proc/remove_knots.html
+++ b/proc/remove_knots.html
@@ -78,20 +78,20 @@ <h1>remove_knots
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 2.8% of total for procedures.">190 statements</a>
+                 title=" 0.8% of total for procedures.">55 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">remove_knots</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine remove_knots(this, dir, Xth, r)  
+    <h2>private pure subroutine remove_knots(this, Xth, r)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~51"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~48"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -171,21 +171,6 @@ <h3>Arguments</h3>
                 
             </td>
         </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-dir~15"></span>
-              integer,
-            </td>
-<td>intent(in)</td>
-              <td></td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>dir</strong></td>
-            <td>
-                
-            </td>
-        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-xth~2"></span>
@@ -231,310 +216,274 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~remove_knots~~CallsGraph Pages: 1 -->
-<svg id="procremove_knotsCallsGraph" width="641pt" height="134pt"
- viewBox="0.00 0.00 641.00 133.64" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~remove_knots~~CallsGraph" class="graph" transform="scale(2.02 2.02) rotate(0) translate(4 266)">
+<svg id="procremove_knotsCallsGraph" width="641pt" height="132pt"
+ viewBox="0.00 0.00 641.00 131.66" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~remove_knots~~CallsGraph" class="graph" transform="scale(1.91 1.91) rotate(0) translate(4 247)">
 <title>proc~~remove_knots~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-266 1291,-266 1291,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-247 1218,-247 1218,4 -4,4"/>
 <!-- proc~remove_knots -->
 <g id="proc~~remove_knots~~CallsGraph_node1" class="node">
 <title>proc~remove_knots</title>
-<polygon fill="none" stroke="black" points="172,-129 0,-129 0,-105 172,-105 172,-129"/>
-<text text-anchor="middle" x="86" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%remove_knots</text>
+<polygon fill="none" stroke="black" points="162,-108 0,-108 0,-84 162,-84 162,-108"/>
+<text text-anchor="middle" x="81" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%remove_knots</text>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~remove_knots~~CallsGraph_node2" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~remove_knots~~CallsGraph_node2"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1121,-150 997,-150 997,-126 1121,-126 1121,-150"/>
-<text text-anchor="middle" x="1059" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1048,-222 924,-222 924,-198 1048,-198 1048,-222"/>
+<text text-anchor="middle" x="986" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~remove_knots~~CallsGraph_edge1" class="edge">
 <title>proc~remove_knots&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M100.83,-129.25C122.27,-147.59 165.49,-182.05 208,-201 315.82,-249.06 348.46,-262 466.5,-262 466.5,-262 466.5,-262 666.5,-262 806.83,-262 962.79,-188.7 1027.4,-154.82"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1029.07,-157.89 1036.26,-150.12 1025.79,-151.71 1029.07,-157.89"/>
+<path fill="none" stroke="#ff0000" d="M98.2,-108.11C146.45,-142.96 294.54,-241 433.5,-241 433.5,-241 433.5,-241 607,-241 714.07,-241 837.62,-228.49 913.52,-219.37"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="914.41,-222.79 923.91,-218.1 913.56,-215.84 914.41,-222.79"/>
 </g>
-<!-- none~get_knot -->
+<!-- none~set -->
 <g id="proc~~remove_knots~~CallsGraph_node3" class="node">
-<title>none~get_knot</title>
-<g id="a_proc~~remove_knots~~CallsGraph_node3"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot" xlink:title="nurbs_volume%get_knot">
-<polygon fill="#a7506f" stroke="#a7506f" points="351,-192 208,-192 208,-168 351,-168 351,-192"/>
-<text text-anchor="middle" x="279.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot</text>
+<title>none~set</title>
+<g id="a_proc~~remove_knots~~CallsGraph_node3"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="320.5,-150 217.5,-150 217.5,-126 320.5,-126 320.5,-150"/>
+<text text-anchor="middle" x="269" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
-<!-- proc~remove_knots&#45;&gt;none~get_knot -->
+<!-- proc~remove_knots&#45;&gt;none~set -->
 <g id="proc~~remove_knots~~CallsGraph_edge2" class="edge">
-<title>proc~remove_knots&#45;&gt;none~get_knot</title>
-<path fill="none" stroke="#ff0000" d="M123.92,-129.15C154.89,-139.33 199.25,-153.93 232.51,-164.87"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="231.42,-168.2 242.02,-168 233.61,-161.55 231.42,-168.2"/>
+<title>proc~remove_knots&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M135.3,-108.04C157.84,-113.13 184.22,-119.08 207.49,-124.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="206.73,-127.75 217.25,-126.54 208.27,-120.92 206.73,-127.75"/>
 </g>
-<!-- none~set -->
+<!-- proc~findspan -->
 <g id="proc~~remove_knots~~CallsGraph_node4" class="node">
-<title>none~set</title>
-<g id="a_proc~~remove_knots~~CallsGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="336,-129 223,-129 223,-105 336,-105 336,-129"/>
-<text text-anchor="middle" x="279.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<title>proc~findspan</title>
+<g id="a_proc~~remove_knots~~CallsGraph_node4"><a xlink:href="../proc/findspan.html" xlink:title="findspan">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="298,-108 240,-108 240,-84 298,-84 298,-108"/>
+<text text-anchor="middle" x="269" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">findspan</text>
 </a>
 </g>
 </g>
-<!-- proc~remove_knots&#45;&gt;none~set -->
+<!-- proc~remove_knots&#45;&gt;proc~findspan -->
 <g id="proc~~remove_knots~~CallsGraph_edge3" class="edge">
-<title>proc~remove_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M172.11,-117C185.67,-117 199.51,-117 212.54,-117"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="212.79,-120.5 222.79,-117 212.79,-113.5 212.79,-120.5"/>
+<title>proc~remove_knots&#45;&gt;proc~findspan</title>
+<path fill="none" stroke="#ff0000" d="M162.23,-96C185.73,-96 210.34,-96 229.91,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="229.93,-99.5 239.93,-96 229.93,-92.5 229.93,-99.5"/>
 </g>
-<!-- proc~findspan -->
+<!-- proc~is_rational -->
 <g id="proc~~remove_knots~~CallsGraph_node5" class="node">
-<title>proc~findspan</title>
-<g id="a_proc~~remove_knots~~CallsGraph_node5"><a xlink:href="../proc/findspan.html" xlink:title="findspan">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="308.5,-87 250.5,-87 250.5,-63 308.5,-63 308.5,-87"/>
-<text text-anchor="middle" x="279.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">findspan</text>
+<title>proc~is_rational</title>
+<g id="a_proc~~remove_knots~~CallsGraph_node5"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="340,-66 198,-66 198,-42 340,-42 340,-66"/>
+<text text-anchor="middle" x="269" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~remove_knots&#45;&gt;proc~findspan -->
+<!-- proc~remove_knots&#45;&gt;proc~is_rational -->
 <g id="proc~~remove_knots~~CallsGraph_edge4" class="edge">
-<title>proc~remove_knots&#45;&gt;proc~findspan</title>
-<path fill="none" stroke="#ff0000" d="M141.88,-104.96C173.47,-98.03 212.38,-89.5 240.59,-83.32"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="241.44,-86.71 250.46,-81.15 239.94,-79.87 241.44,-86.71"/>
+<title>proc~remove_knots&#45;&gt;proc~is_rational</title>
+<path fill="none" stroke="#ff0000" d="M135.3,-83.96C156.99,-79.07 182.24,-73.37 204.85,-68.26"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="205.71,-71.65 214.69,-66.04 204.17,-64.83 205.71,-71.65"/>
 </g>
 <!-- proc~remove_knots_a_5_8 -->
 <g id="proc~~remove_knots~~CallsGraph_node6" class="node">
 <title>proc~remove_knots_a_5_8</title>
 <g id="a_proc~~remove_knots~~CallsGraph_node6"><a xlink:href="../proc/remove_knots_a_5_8.html" xlink:title="remove_knots_A_5_8">
-<polygon fill="#d9534f" stroke="#d9534f" points="341.5,-45 217.5,-45 217.5,-21 341.5,-21 341.5,-45"/>
-<text text-anchor="middle" x="279.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">remove_knots_A_5_8</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="331,-24 207,-24 207,0 331,0 331,-24"/>
+<text text-anchor="middle" x="269" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">remove_knots_A_5_8</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots&#45;&gt;proc~remove_knots_a_5_8 -->
 <g id="proc~~remove_knots~~CallsGraph_edge5" class="edge">
 <title>proc~remove_knots&#45;&gt;proc~remove_knots_a_5_8</title>
-<path fill="none" stroke="#ff0000" d="M107.41,-104.83C131.02,-91.13 171.34,-68.85 208,-54 213.03,-51.96 218.33,-50.02 223.68,-48.2"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="224.88,-51.5 233.3,-45.07 222.71,-44.84 224.88,-51.5"/>
+<path fill="none" stroke="#ff0000" d="M101.5,-83.78C124.07,-70.04 162.67,-47.71 198,-33 202.78,-31.01 207.82,-29.12 212.91,-27.35"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="214.32,-30.57 222.71,-24.1 212.11,-23.92 214.32,-30.57"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~remove_knots~~CallsGraph_node7" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~remove_knots~~CallsGraph_node7"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1287,-171 1157,-171 1157,-147 1287,-147 1287,-171"/>
-<text text-anchor="middle" x="1222" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1214,-243 1084,-243 1084,-219 1214,-219 1214,-243"/>
+<text text-anchor="middle" x="1149" y="-228.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~remove_knots~~CallsGraph_edge6" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1121.33,-146C1129.69,-147.09 1138.35,-148.22 1146.92,-149.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1146.53,-152.82 1156.9,-150.64 1147.44,-145.88 1146.53,-152.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1048.33,-218C1056.69,-219.09 1065.35,-220.22 1073.92,-221.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1073.53,-224.82 1083.9,-222.64 1074.44,-217.88 1073.53,-224.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~remove_knots~~CallsGraph_node8" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~remove_knots~~CallsGraph_node8"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1287,-129 1157,-129 1157,-105 1287,-105 1287,-129"/>
-<text text-anchor="middle" x="1222" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1214,-201 1084,-201 1084,-177 1214,-177 1214,-201"/>
+<text text-anchor="middle" x="1149" y="-186.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~remove_knots~~CallsGraph_edge7" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1121.33,-130C1129.69,-128.91 1138.35,-127.78 1146.92,-126.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1147.44,-130.12 1156.9,-125.36 1146.53,-123.18 1147.44,-130.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1048.33,-202C1056.69,-200.91 1065.35,-199.78 1073.92,-198.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1074.44,-202.12 1083.9,-197.36 1073.53,-195.18 1074.44,-202.12"/>
 </g>
-<!-- proc~get_knot_all -->
+<!-- proc~set1 -->
 <g id="proc~~remove_knots~~CallsGraph_node9" class="node">
-<title>proc~get_knot_all</title>
-<g id="a_proc~~remove_knots~~CallsGraph_node9"><a xlink:href="../proc/get_knot_all.html" xlink:title="nurbs_volume%get_knot_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="548,-234 387,-234 387,-210 548,-210 548,-234"/>
-<text text-anchor="middle" x="467.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot_all</text>
+<title>proc~set1</title>
+<g id="a_proc~~remove_knots~~CallsGraph_node9"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="489.5,-213 379.5,-213 379.5,-189 489.5,-189 489.5,-213"/>
+<text text-anchor="middle" x="434.5" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
-<!-- none~get_knot&#45;&gt;proc~get_knot_all -->
+<!-- none~set&#45;&gt;proc~set1 -->
 <g id="proc~~remove_knots~~CallsGraph_edge8" class="edge">
-<title>none~get_knot&#45;&gt;proc~get_knot_all</title>
-<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M333.8,-192.04C355.49,-196.93 380.74,-202.63 403.35,-207.74"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="402.67,-211.17 413.19,-209.96 404.21,-204.35 402.67,-211.17"/>
+<title>none~set&#45;&gt;proc~set1</title>
+<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M300.07,-150.17C321.24,-158.67 350.29,-170.21 376,-180 380.72,-181.8 385.67,-183.65 390.6,-185.48"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="389.4,-188.77 400,-188.94 391.82,-182.2 389.4,-188.77"/>
 </g>
-<!-- proc~get_knoti -->
+<!-- proc~set1a -->
 <g id="proc~~remove_knots~~CallsGraph_node10" class="node">
-<title>proc~get_knoti</title>
-<g id="a_proc~~remove_knots~~CallsGraph_node10"><a xlink:href="../proc/get_knoti.html" xlink:title="nurbs_volume%get_knoti">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="540.5,-192 394.5,-192 394.5,-168 540.5,-168 540.5,-192"/>
-<text text-anchor="middle" x="467.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knoti</text>
+<title>proc~set1a</title>
+<g id="a_proc~~remove_knots~~CallsGraph_node10"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="493,-171 376,-171 376,-147 493,-147 493,-171"/>
+<text text-anchor="middle" x="434.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
 </a>
 </g>
 </g>
-<!-- none~get_knot&#45;&gt;proc~get_knoti -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="proc~~remove_knots~~CallsGraph_edge9" class="edge">
-<title>none~get_knot&#45;&gt;proc~get_knoti</title>
-<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M351.08,-180C361.94,-180 373.23,-180 384.32,-180"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="384.42,-183.5 394.42,-180 384.42,-176.5 384.42,-183.5"/>
-</g>
-<!-- proc~set1 -->
-<g id="proc~~remove_knots~~CallsGraph_node11" class="node">
-<title>proc~set1</title>
-<g id="a_proc~~remove_knots~~CallsGraph_node11"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="527.5,-108 407.5,-108 407.5,-84 527.5,-84 527.5,-108"/>
-<text text-anchor="middle" x="467.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
-</a>
-</g>
-</g>
-<!-- none~set&#45;&gt;proc~set1 -->
-<g id="proc~~remove_knots~~CallsGraph_edge10" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
-<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M336.05,-110.73C355.28,-108.56 377.08,-106.1 397.27,-103.82"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="397.81,-107.28 407.35,-102.68 397.02,-100.32 397.81,-107.28"/>
+<title>none~set&#45;&gt;proc~set1a</title>
+<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M320.84,-144.53C335,-146.35 350.62,-148.36 365.6,-150.28"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="365.48,-153.79 375.85,-151.59 366.37,-146.85 365.48,-153.79"/>
 </g>
 <!-- proc~set2 -->
-<g id="proc~~remove_knots~~CallsGraph_node12" class="node">
+<g id="proc~~remove_knots~~CallsGraph_node11" class="node">
 <title>proc~set2</title>
-<g id="a_proc~~remove_knots~~CallsGraph_node12"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="527.5,-66 407.5,-66 407.5,-42 527.5,-42 527.5,-66"/>
-<text text-anchor="middle" x="467.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
+<g id="a_proc~~remove_knots~~CallsGraph_node11"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="489.5,-87 379.5,-87 379.5,-63 489.5,-63 489.5,-87"/>
+<text text-anchor="middle" x="434.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set2 -->
-<g id="proc~~remove_knots~~CallsGraph_edge11" class="edge">
+<g id="proc~~remove_knots~~CallsGraph_edge10" class="edge">
 <title>none~set&#45;&gt;proc~set2</title>
-<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M326.95,-104.88C335.09,-102.28 343.38,-99.3 351,-96 368,-88.64 369.89,-82.1 387,-75 392.11,-72.88 397.49,-70.92 402.95,-69.12"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="404.3,-72.37 412.82,-66.06 402.23,-65.68 404.3,-72.37"/>
+<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M315.75,-125.98C323.95,-123.35 332.32,-120.34 340,-117 356.99,-109.62 359.23,-103.88 376,-96 379.84,-94.2 383.88,-92.44 387.97,-90.77"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="389.49,-93.94 397.52,-87.02 386.93,-87.42 389.49,-93.94"/>
 </g>
 <!-- proc~set3 -->
-<g id="proc~~remove_knots~~CallsGraph_node13" class="node">
+<g id="proc~~remove_knots~~CallsGraph_node12" class="node">
 <title>proc~set3</title>
-<g id="a_proc~~remove_knots~~CallsGraph_node13"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="527.5,-150 407.5,-150 407.5,-126 527.5,-126 527.5,-150"/>
-<text text-anchor="middle" x="467.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
+<g id="a_proc~~remove_knots~~CallsGraph_node12"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="489.5,-129 379.5,-129 379.5,-105 489.5,-105 489.5,-129"/>
+<text text-anchor="middle" x="434.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set3 -->
-<g id="proc~~remove_knots~~CallsGraph_edge12" class="edge">
+<g id="proc~~remove_knots~~CallsGraph_edge11" class="edge">
 <title>none~set&#45;&gt;proc~set3</title>
-<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M336.05,-123.27C355.28,-125.44 377.08,-127.9 397.27,-130.18"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="397.02,-133.68 407.35,-131.32 397.81,-126.72 397.02,-133.68"/>
+<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M320.84,-131.47C336.06,-129.51 352.97,-127.34 368.95,-125.29"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="369.82,-128.71 379.29,-123.96 368.93,-121.76 369.82,-128.71"/>
 </g>
 <!-- proc~set4 -->
-<g id="proc~~remove_knots~~CallsGraph_node14" class="node">
+<g id="proc~~remove_knots~~CallsGraph_node13" class="node">
 <title>proc~set4</title>
-<g id="a_proc~~remove_knots~~CallsGraph_node14"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="527.5,-24 407.5,-24 407.5,0 527.5,0 527.5,-24"/>
-<text text-anchor="middle" x="467.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
+<g id="a_proc~~remove_knots~~CallsGraph_node13"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="489.5,-45 379.5,-45 379.5,-21 489.5,-21 489.5,-45"/>
+<text text-anchor="middle" x="434.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set4 -->
-<g id="proc~~remove_knots~~CallsGraph_edge13" class="edge">
+<g id="proc~~remove_knots~~CallsGraph_edge12" class="edge">
 <title>none~set&#45;&gt;proc~set4</title>
-<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M336.05,-105C341.4,-102.54 346.5,-99.57 351,-96 376.27,-75.96 361.42,-52.64 387,-33 390.38,-30.41 394.04,-28.13 397.89,-26.14"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="399.45,-29.28 407.13,-21.98 396.58,-22.89 399.45,-29.28"/>
+<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M320.51,-127.96C327.5,-125.16 334.24,-121.58 340,-117 365.25,-96.93 351.35,-74.8 376,-54 377.55,-52.69 379.2,-51.46 380.9,-50.3"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="382.99,-53.14 389.91,-45.11 379.49,-47.07 382.99,-53.14"/>
 </g>
 <!-- proc~cmp_degree -->
-<g id="proc~~remove_knots~~CallsGraph_node15" class="node">
+<g id="proc~~remove_knots~~CallsGraph_node14" class="node">
 <title>proc~cmp_degree</title>
-<g id="a_proc~~remove_knots~~CallsGraph_node15"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="747,-150 584,-150 584,-126 747,-126 747,-150"/>
-<text text-anchor="middle" x="665.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
+<g id="a_proc~~remove_knots~~CallsGraph_node14"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="683,-181 529,-181 529,-157 683,-157 683,-181"/>
+<text text-anchor="middle" x="606" y="-166.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~set1&#45;&gt;proc~cmp_degree -->
-<g id="proc~~remove_knots~~CallsGraph_edge14" class="edge">
+<g id="proc~~remove_knots~~CallsGraph_edge13" class="edge">
 <title>proc~set1&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#00ffff" d="M524.67,-108.04C547.63,-112.96 574.37,-118.69 598.27,-123.81"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="597.81,-127.29 608.33,-125.96 599.28,-120.45 597.81,-127.29"/>
+<path fill="none" stroke="#48ff00" d="M489.6,-190.79C502.85,-188.28 517.26,-185.56 531.26,-182.92"/>
+<polygon fill="#48ff00" stroke="#48ff00" points="532.19,-186.31 541.36,-181.01 530.89,-179.43 532.19,-186.31"/>
 </g>
-<!-- proc~cmp_nc -->
-<g id="proc~~remove_knots~~CallsGraph_node16" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_proc~~remove_knots~~CallsGraph_node16"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="735,-108 596,-108 596,-84 735,-84 735,-108"/>
-<text text-anchor="middle" x="665.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
-</a>
-</g>
-</g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
-<g id="proc~~remove_knots~~CallsGraph_edge15" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#00ffff" d="M527.57,-96C545.91,-96 566.41,-96 585.85,-96"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="585.91,-99.5 595.91,-96 585.91,-92.5 585.91,-99.5"/>
-</g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
-<g id="proc~~remove_knots~~CallsGraph_edge16" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#003fff" d="M524.67,-66.04C547.63,-70.96 574.37,-76.69 598.27,-81.81"/>
-<polygon fill="#003fff" stroke="#003fff" points="597.81,-85.29 608.33,-83.96 599.28,-78.45 597.81,-85.29"/>
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
+<g id="proc~~remove_knots~~CallsGraph_edge14" class="edge">
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#00ff91" d="M493.36,-162.41C501.56,-162.9 510.14,-163.4 518.74,-163.91"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="518.63,-167.41 528.82,-164.51 519.04,-160.42 518.63,-167.41"/>
 </g>
 <!-- proc~compute_knot_vector -->
-<g id="proc~~remove_knots~~CallsGraph_node17" class="node">
+<g id="proc~~remove_knots~~CallsGraph_node15" class="node">
 <title>proc~compute_knot_vector</title>
-<g id="a_proc~~remove_knots~~CallsGraph_node17"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="729,-66 602,-66 602,-42 729,-42 729,-66"/>
-<text text-anchor="middle" x="665.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<g id="a_proc~~remove_knots~~CallsGraph_node15"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="669.5,-87 542.5,-87 542.5,-63 669.5,-63 669.5,-87"/>
+<text text-anchor="middle" x="606" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
-<g id="proc~~remove_knots~~CallsGraph_edge17" class="edge">
+<g id="proc~~remove_knots~~CallsGraph_edge15" class="edge">
 <title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#003fff" d="M527.57,-54C547.72,-54 570.49,-54 591.59,-54"/>
-<polygon fill="#003fff" stroke="#003fff" points="591.8,-57.5 601.8,-54 591.8,-50.5 591.8,-57.5"/>
+<path fill="none" stroke="#0091ff" d="M489.6,-75C503.08,-75 517.77,-75 532,-75"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="532.26,-78.5 542.26,-75 532.26,-71.5 532.26,-78.5"/>
 </g>
 <!-- proc~set3&#45;&gt;proc~cmp_degree -->
-<g id="proc~~remove_knots~~CallsGraph_edge18" class="edge">
+<g id="proc~~remove_knots~~CallsGraph_edge16" class="edge">
 <title>proc~set3&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#7f00ff" d="M527.57,-138C542.09,-138 557.97,-138 573.6,-138"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="573.82,-141.5 583.82,-138 573.82,-134.5 573.82,-141.5"/>
+<path fill="none" stroke="#4800ff" d="M474.81,-129.06C499.01,-136.48 530.22,-146.06 556.01,-153.97"/>
+<polygon fill="#4800ff" stroke="#4800ff" points="555.02,-157.33 565.61,-156.91 557.07,-150.64 555.02,-157.33"/>
 </g>
 <!-- proc~get_multiplicity -->
-<g id="proc~~remove_knots~~CallsGraph_node18" class="node">
+<g id="proc~~remove_knots~~CallsGraph_node16" class="node">
 <title>proc~get_multiplicity</title>
-<g id="a_proc~~remove_knots~~CallsGraph_node18"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="961,-150 783,-150 783,-126 961,-126 961,-150"/>
-<text text-anchor="middle" x="872" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
+<g id="a_proc~~remove_knots~~CallsGraph_node16"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="888,-192 719,-192 719,-168 888,-168 888,-192"/>
+<text text-anchor="middle" x="803.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
-<g id="proc~~remove_knots~~CallsGraph_edge19" class="edge">
+<g id="proc~~remove_knots~~CallsGraph_edge17" class="edge">
 <title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M747.03,-138C755.47,-138 764.11,-138 772.71,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="772.78,-141.5 782.78,-138 772.78,-134.5 772.78,-141.5"/>
-</g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~remove_knots~~CallsGraph_edge20" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00ff00" d="M735.23,-98.14C795.1,-100.66 884.13,-105.99 961,-117 973.38,-118.77 986.54,-121.23 999.04,-123.84"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="998.39,-127.28 1008.9,-125.95 999.86,-120.43 998.39,-127.28"/>
+<path fill="none" stroke="#ff0000" d="M683.15,-173.28C691.54,-173.76 700.17,-174.24 708.75,-174.73"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="708.61,-178.22 718.79,-175.29 709,-171.23 708.61,-178.22"/>
 </g>
 <!-- proc~repelem -->
-<g id="proc~~remove_knots~~CallsGraph_node19" class="node">
+<g id="proc~~remove_knots~~CallsGraph_node17" class="node">
 <title>proc~repelem</title>
-<g id="a_proc~~remove_knots~~CallsGraph_node19"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="900.5,-66 843.5,-66 843.5,-42 900.5,-42 900.5,-66"/>
-<text text-anchor="middle" x="872" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<g id="a_proc~~remove_knots~~CallsGraph_node17"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="832,-87 775,-87 775,-63 832,-63 832,-87"/>
+<text text-anchor="middle" x="803.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
-<g id="proc~~remove_knots~~CallsGraph_edge21" class="edge">
+<g id="proc~~remove_knots~~CallsGraph_edge18" class="edge">
 <title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#0000ff" d="M729.25,-54C763.23,-54 804.1,-54 833.2,-54"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="833.36,-57.5 843.36,-54 833.35,-50.5 833.36,-57.5"/>
+<path fill="none" stroke="#00ffff" d="M669.66,-75C700.92,-75 737.69,-75 764.61,-75"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="764.78,-78.5 774.78,-75 764.78,-71.5 764.78,-78.5"/>
 </g>
 <!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~remove_knots~~CallsGraph_edge22" class="edge">
+<g id="proc~~remove_knots~~CallsGraph_edge19" class="edge">
 <title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M961.17,-138C969.77,-138 978.42,-138 986.82,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="986.93,-141.5 996.93,-138 986.93,-134.5 986.93,-141.5"/>
+<path fill="none" stroke="#ff0000" d="M876.88,-192.03C889.06,-194.05 901.7,-196.15 913.85,-198.17"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="913.48,-201.66 923.92,-199.85 914.63,-194.76 913.48,-201.66"/>
 </g>
 </g>
 </svg>
@@ -634,31 +583,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~remove_knots~~CalledByGraph Pages: 1 -->
-<svg id="procremove_knotsCalledByGraph" width="326pt" height="32pt"
- viewBox="0.00 0.00 326.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procremove_knotsCalledByGraph" width="306pt" height="32pt"
+ viewBox="0.00 0.00 306.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~remove_knots~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~remove_knots~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 322,-28 322,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 302,-28 302,4 -4,4"/>
 <!-- proc~remove_knots -->
 <g id="proc~~remove_knots~~CalledByGraph_node1" class="node">
 <title>proc~remove_knots</title>
-<polygon fill="none" stroke="black" points="318,-24 146,-24 146,0 318,0 318,-24"/>
-<text text-anchor="middle" x="232" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%remove_knots</text>
+<polygon fill="none" stroke="black" points="298,-24 136,-24 136,0 298,0 298,-24"/>
+<text text-anchor="middle" x="217" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%remove_knots</text>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example1_curve -->
 <g id="proc~~remove_knots~~CalledByGraph_node2" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~remove_knots~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~remove_knots~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="100,-24 0,-24 0,0 100,0 100,-24"/>
+<text text-anchor="middle" x="50" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
 <g id="proc~~remove_knots~~CalledByGraph_edge1" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#ff0000" d="M110.41,-12C118.49,-12 127.01,-12 135.63,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.77,-15.5 145.77,-12 135.77,-8.5 135.77,-15.5"/>
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
+<path fill="none" stroke="#ff0000" d="M100.06,-12C108.27,-12 117.02,-12 125.88,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="125.92,-15.5 135.92,-12 125.92,-8.5 125.92,-15.5"/>
 </g>
 </g>
 </svg>
@@ -774,7 +723,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/remove_knots_a_5_8.html b/proc/remove_knots_a_5_8.html
index cfb4fe360..574c004a2 100644
--- a/proc/remove_knots_a_5_8.html
+++ b/proc/remove_knots_a_5_8.html
@@ -171,7 +171,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~15"></span>
+              <span class="anchor" id="variable-knot~36"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -261,7 +261,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-t~10"></span>
+              <span class="anchor" id="variable-t~9"></span>
               integer,
             </td>
 <td>intent(out)</td>
@@ -333,9 +333,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~remove_knots -->
 <g id="proc~~remove_knots_a_5_8~~CalledByGraph_node2" class="node">
 <title>proc~remove_knots</title>
-<g id="a_proc~~remove_knots_a_5_8~~CalledByGraph_node2"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="318,-108 146,-108 146,-84 318,-84 318,-108"/>
-<text text-anchor="middle" x="232" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
+<g id="a_proc~~remove_knots_a_5_8~~CalledByGraph_node2"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_curve%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="313,-108 151,-108 151,-84 313,-84 313,-108"/>
+<text text-anchor="middle" x="232" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
 </a>
 </g>
 </g>
@@ -348,9 +348,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~remove_knots~2 -->
 <g id="proc~~remove_knots_a_5_8~~CalledByGraph_node3" class="node">
 <title>proc~remove_knots~2</title>
-<g id="a_proc~~remove_knots_a_5_8~~CalledByGraph_node3"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
+<g id="a_proc~~remove_knots_a_5_8~~CalledByGraph_node3"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
 <polygon fill="#d9534f" stroke="#d9534f" points="318,-66 146,-66 146,-42 318,-42 318,-66"/>
-<text text-anchor="middle" x="232" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
+<text text-anchor="middle" x="232" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
 </a>
 </g>
 </g>
@@ -363,9 +363,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~remove_knots~3 -->
 <g id="proc~~remove_knots_a_5_8~~CalledByGraph_node4" class="node">
 <title>proc~remove_knots~3</title>
-<g id="a_proc~~remove_knots_a_5_8~~CalledByGraph_node4"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_curve%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="313,-24 151,-24 151,0 313,0 313,-24"/>
-<text text-anchor="middle" x="232" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
+<g id="a_proc~~remove_knots_a_5_8~~CalledByGraph_node4"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="318,-24 146,-24 146,0 318,0 318,-24"/>
+<text text-anchor="middle" x="232" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
@@ -379,46 +379,46 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~remove_knots_a_5_8~~CalledByGraph_node5" class="node">
 <title>program~example1_curve</title>
 <g id="a_proc~~remove_knots_a_5_8~~CalledByGraph_node5"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-24 5,-24 5,0 105,0 105,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-108 5,-108 5,-84 105,-84 105,-108"/>
+<text text-anchor="middle" x="55" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
-<g id="proc~~remove_knots_a_5_8~~CalledByGraph_edge6" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
-<path fill="none" stroke="#0000ff" d="M105.21,-12C116.27,-12 128.34,-12 140.49,-12"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="140.7,-15.5 150.7,-12 140.7,-8.5 140.7,-15.5"/>
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
+<g id="proc~~remove_knots_a_5_8~~CalledByGraph_edge4" class="edge">
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
+<path fill="none" stroke="#ff0000" d="M105.21,-96C116.27,-96 128.34,-96 140.49,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="140.7,-99.5 150.7,-96 140.7,-92.5 140.7,-99.5"/>
 </g>
 <!-- program~example3_surface -->
 <g id="proc~~remove_knots_a_5_8~~CalledByGraph_node6" class="node">
 <title>program~example3_surface</title>
 <g id="a_proc~~remove_knots_a_5_8~~CalledByGraph_node6"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-66 0,-66 0,-42 110,-42 110,-66"/>
-<text text-anchor="middle" x="55" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
-<g id="proc~~remove_knots_a_5_8~~CalledByGraph_edge5" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
-<path fill="none" stroke="#00ff00" d="M110.41,-54C118.49,-54 127.01,-54 135.63,-54"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="135.77,-57.5 145.77,-54 135.77,-50.5 135.77,-57.5"/>
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
+<g id="proc~~remove_knots_a_5_8~~CalledByGraph_edge6" class="edge">
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#0000ff" d="M110.41,-12C118.49,-12 127.01,-12 135.63,-12"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="135.77,-15.5 145.77,-12 135.77,-8.5 135.77,-15.5"/>
 </g>
 <!-- program~example3_volume -->
 <g id="proc~~remove_knots_a_5_8~~CalledByGraph_node7" class="node">
 <title>program~example3_volume</title>
 <g id="a_proc~~remove_knots_a_5_8~~CalledByGraph_node7"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-108 0,-108 0,-84 110,-84 110,-108"/>
-<text text-anchor="middle" x="55" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-66 0,-66 0,-42 110,-42 110,-66"/>
+<text text-anchor="middle" x="55" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
-<g id="proc~~remove_knots_a_5_8~~CalledByGraph_edge4" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#ff0000" d="M110.41,-96C118.49,-96 127.01,-96 135.63,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.77,-99.5 145.77,-96 135.77,-92.5 135.77,-99.5"/>
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
+<g id="proc~~remove_knots_a_5_8~~CalledByGraph_edge5" class="edge">
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
+<path fill="none" stroke="#00ff00" d="M110.41,-54C118.49,-54 127.01,-54 135.63,-54"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="135.77,-57.5 145.77,-54 135.77,-50.5 135.77,-57.5"/>
 </g>
 </g>
 </svg>
@@ -534,7 +534,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/remove_knots~2.html b/proc/remove_knots~2.html
index 365c177e4..039069ddb 100644
--- a/proc/remove_knots~2.html
+++ b/proc/remove_knots~2.html
@@ -78,20 +78,20 @@ <h1>remove_knots
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 1.9% of total for procedures.">128 statements</a>
+                 title=" 2.8% of total for procedures.">190 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">remove_knots</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine remove_knots(this, dir, Xth, r)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~117"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~112"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-dir~30"></span>
+              <span class="anchor" id="variable-dir~18"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -231,325 +231,310 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~remove_knots~2~~CallsGraph Pages: 1 -->
-<svg id="procremove_knots2CallsGraph" width="641pt" height="143pt"
- viewBox="0.00 0.00 641.00 143.05" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~remove_knots~2~~CallsGraph" class="graph" transform="scale(2.03 2.03) rotate(0) translate(4 287)">
+<svg id="procremove_knots2CallsGraph" width="641pt" height="134pt"
+ viewBox="0.00 0.00 641.00 133.64" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~remove_knots~2~~CallsGraph" class="graph" transform="scale(2.02 2.02) rotate(0) translate(4 266)">
 <title>proc~~remove_knots~2~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-287 1300,-287 1300,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-266 1291,-266 1291,4 -4,4"/>
 <!-- proc~remove_knots~2 -->
 <g id="proc~~remove_knots~2~~CallsGraph_node1" class="node">
 <title>proc~remove_knots~2</title>
 <polygon fill="none" stroke="black" points="172,-129 0,-129 0,-105 172,-105 172,-129"/>
-<text text-anchor="middle" x="86" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%remove_knots</text>
+<text text-anchor="middle" x="86" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%remove_knots</text>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~remove_knots~2~~CallsGraph_node2" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~remove_knots~2~~CallsGraph_node2"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1130,-171 1006,-171 1006,-147 1130,-147 1130,-171"/>
-<text text-anchor="middle" x="1068" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1121,-150 997,-150 997,-126 1121,-126 1121,-150"/>
+<text text-anchor="middle" x="1059" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~remove_knots~2~~CallsGraph_edge1" class="edge">
 <title>proc~remove_knots~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M97.28,-129.22C116.59,-151.35 160.62,-197.97 208,-222 316.75,-277.17 353.56,-283 475.5,-283 475.5,-283 475.5,-283 675.5,-283 815.83,-283 971.79,-209.7 1036.4,-175.82"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1038.07,-178.89 1045.26,-171.12 1034.79,-172.71 1038.07,-178.89"/>
+<path fill="none" stroke="#ff0000" d="M100.83,-129.25C122.27,-147.59 165.49,-182.05 208,-201 315.82,-249.06 348.46,-262 466.5,-262 466.5,-262 466.5,-262 666.5,-262 806.83,-262 962.79,-188.7 1027.4,-154.82"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1029.07,-157.89 1036.26,-150.12 1025.79,-151.71 1029.07,-157.89"/>
 </g>
 <!-- none~get_knot~2 -->
 <g id="proc~~remove_knots~2~~CallsGraph_node3" class="node">
 <title>none~get_knot~2</title>
-<g id="a_proc~~remove_knots~2~~CallsGraph_node3"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~2" xlink:title="nurbs_surface%get_knot">
-<polygon fill="#a7506f" stroke="#a7506f" points="355.5,-213 212.5,-213 212.5,-189 355.5,-189 355.5,-213"/>
-<text text-anchor="middle" x="284" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
+<g id="a_proc~~remove_knots~2~~CallsGraph_node3"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot~2" xlink:title="nurbs_volume%get_knot">
+<polygon fill="#a7506f" stroke="#a7506f" points="351,-192 208,-192 208,-168 351,-168 351,-192"/>
+<text text-anchor="middle" x="279.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;none~get_knot~2 -->
 <g id="proc~~remove_knots~2~~CallsGraph_edge2" class="edge">
 <title>proc~remove_knots~2&#45;&gt;none~get_knot~2</title>
-<path fill="none" stroke="#ff0000" d="M115.08,-129.04C149.43,-143.76 207.69,-168.72 245.75,-185.04"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="244.4,-188.26 254.97,-188.99 247.16,-181.83 244.4,-188.26"/>
+<path fill="none" stroke="#ff0000" d="M123.92,-129.15C154.89,-139.33 199.25,-153.93 232.51,-164.87"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="231.42,-168.2 242.02,-168 233.61,-161.55 231.42,-168.2"/>
 </g>
 <!-- none~set~2 -->
 <g id="proc~~remove_knots~2~~CallsGraph_node4" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~remove_knots~2~~CallsGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="340.5,-150 227.5,-150 227.5,-126 340.5,-126 340.5,-150"/>
-<text text-anchor="middle" x="284" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<g id="a_proc~~remove_knots~2~~CallsGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="336,-129 223,-129 223,-105 336,-105 336,-129"/>
+<text text-anchor="middle" x="279.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;none~set~2 -->
 <g id="proc~~remove_knots~2~~CallsGraph_edge3" class="edge">
 <title>proc~remove_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M172.11,-126.12C187.16,-127.73 202.62,-129.39 217.04,-130.93"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="217.02,-134.45 227.33,-132.04 217.76,-127.49 217.02,-134.45"/>
+<path fill="none" stroke="#ff0000" d="M172.11,-117C185.67,-117 199.51,-117 212.54,-117"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="212.79,-120.5 222.79,-117 212.79,-113.5 212.79,-120.5"/>
 </g>
 <!-- proc~findspan -->
 <g id="proc~~remove_knots~2~~CallsGraph_node5" class="node">
 <title>proc~findspan</title>
 <g id="a_proc~~remove_knots~2~~CallsGraph_node5"><a xlink:href="../proc/findspan.html" xlink:title="findspan">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="313,-108 255,-108 255,-84 313,-84 313,-108"/>
-<text text-anchor="middle" x="284" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">findspan</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="308.5,-87 250.5,-87 250.5,-63 308.5,-63 308.5,-87"/>
+<text text-anchor="middle" x="279.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">findspan</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;proc~findspan -->
 <g id="proc~~remove_knots~2~~CallsGraph_edge4" class="edge">
 <title>proc~remove_knots~2&#45;&gt;proc~findspan</title>
-<path fill="none" stroke="#ff0000" d="M172.11,-107.88C197.57,-105.15 224.2,-102.3 244.98,-100.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="245.41,-103.55 254.98,-99 244.67,-96.59 245.41,-103.55"/>
-</g>
-<!-- proc~is_rational~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_node6" class="node">
-<title>proc~is_rational~2</title>
-<g id="a_proc~~remove_knots~2~~CallsGraph_node6"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="360,-66 208,-66 208,-42 360,-42 360,-66"/>
-<text text-anchor="middle" x="284" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
-</a>
-</g>
-</g>
-<!-- proc~remove_knots~2&#45;&gt;proc~is_rational~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge5" class="edge">
-<title>proc~remove_knots~2&#45;&gt;proc~is_rational~2</title>
-<path fill="none" stroke="#ff0000" d="M119.94,-104.95C144.17,-96.24 177.97,-84.41 208,-75 214.5,-72.96 221.35,-70.91 228.16,-68.94"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="229.4,-72.22 238.05,-66.1 227.48,-65.49 229.4,-72.22"/>
+<path fill="none" stroke="#ff0000" d="M141.88,-104.96C173.47,-98.03 212.38,-89.5 240.59,-83.32"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="241.44,-86.71 250.46,-81.15 239.94,-79.87 241.44,-86.71"/>
 </g>
 <!-- proc~remove_knots_a_5_8 -->
-<g id="proc~~remove_knots~2~~CallsGraph_node7" class="node">
+<g id="proc~~remove_knots~2~~CallsGraph_node6" class="node">
 <title>proc~remove_knots_a_5_8</title>
-<g id="a_proc~~remove_knots~2~~CallsGraph_node7"><a xlink:href="../proc/remove_knots_a_5_8.html" xlink:title="remove_knots_A_5_8">
-<polygon fill="#d9534f" stroke="#d9534f" points="346,-24 222,-24 222,0 346,0 346,-24"/>
-<text text-anchor="middle" x="284" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">remove_knots_A_5_8</text>
+<g id="a_proc~~remove_knots~2~~CallsGraph_node6"><a xlink:href="../proc/remove_knots_a_5_8.html" xlink:title="remove_knots_A_5_8">
+<polygon fill="#d9534f" stroke="#d9534f" points="341.5,-45 217.5,-45 217.5,-21 341.5,-21 341.5,-45"/>
+<text text-anchor="middle" x="279.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">remove_knots_A_5_8</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;proc~remove_knots_a_5_8 -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge6" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge5" class="edge">
 <title>proc~remove_knots~2&#45;&gt;proc~remove_knots_a_5_8</title>
-<path fill="none" stroke="#ff0000" d="M100.93,-104.97C122.5,-86.92 165.89,-52.82 208,-33 212.36,-30.95 216.96,-29.06 221.64,-27.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="223.02,-30.56 231.34,-24 220.74,-23.94 223.02,-30.56"/>
+<path fill="none" stroke="#ff0000" d="M107.41,-104.83C131.02,-91.13 171.34,-68.85 208,-54 213.03,-51.96 218.33,-50.02 223.68,-48.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="224.88,-51.5 233.3,-45.07 222.71,-44.84 224.88,-51.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
-<g id="proc~~remove_knots~2~~CallsGraph_node8" class="node">
+<g id="proc~~remove_knots~2~~CallsGraph_node7" class="node">
 <title>proc~compute_multiplicity1</title>
-<g id="a_proc~~remove_knots~2~~CallsGraph_node8"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1296,-192 1166,-192 1166,-168 1296,-168 1296,-192"/>
-<text text-anchor="middle" x="1231" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<g id="a_proc~~remove_knots~2~~CallsGraph_node7"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1287,-171 1157,-171 1157,-147 1287,-147 1287,-171"/>
+<text text-anchor="middle" x="1222" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge7" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge6" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1130.33,-167C1138.69,-168.09 1147.35,-169.22 1155.92,-170.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1155.53,-173.82 1165.9,-171.64 1156.44,-166.88 1155.53,-173.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1121.33,-146C1129.69,-147.09 1138.35,-148.22 1146.92,-149.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1146.53,-152.82 1156.9,-150.64 1147.44,-145.88 1146.53,-152.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_node9" class="node">
+<g id="proc~~remove_knots~2~~CallsGraph_node8" class="node">
 <title>proc~compute_multiplicity2</title>
-<g id="a_proc~~remove_knots~2~~CallsGraph_node9"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1296,-150 1166,-150 1166,-126 1296,-126 1296,-150"/>
-<text text-anchor="middle" x="1231" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<g id="a_proc~~remove_knots~2~~CallsGraph_node8"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1287,-129 1157,-129 1157,-105 1287,-105 1287,-129"/>
+<text text-anchor="middle" x="1222" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge8" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge7" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1130.33,-151C1138.69,-149.91 1147.35,-148.78 1155.92,-147.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1156.44,-151.12 1165.9,-146.36 1155.53,-144.18 1156.44,-151.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1121.33,-130C1129.69,-128.91 1138.35,-127.78 1146.92,-126.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1147.44,-130.12 1156.9,-125.36 1146.53,-123.18 1147.44,-130.12"/>
 </g>
 <!-- proc~get_knot_all~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_node10" class="node">
+<g id="proc~~remove_knots~2~~CallsGraph_node9" class="node">
 <title>proc~get_knot_all~2</title>
-<g id="a_proc~~remove_knots~2~~CallsGraph_node10"><a xlink:href="../proc/get_knot_all~2.html" xlink:title="nurbs_surface%get_knot_all">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="557,-255 396,-255 396,-231 557,-231 557,-255"/>
-<text text-anchor="middle" x="476.5" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot_all</text>
+<g id="a_proc~~remove_knots~2~~CallsGraph_node9"><a xlink:href="../proc/get_knot_all~2.html" xlink:title="nurbs_volume%get_knot_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="548,-234 387,-234 387,-210 548,-210 548,-234"/>
+<text text-anchor="middle" x="467.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot_all</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot~2&#45;&gt;proc~get_knot_all~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge9" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge8" class="edge">
 <title>none~get_knot~2&#45;&gt;proc~get_knot_all~2</title>
-<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M339.59,-213.04C361.91,-217.96 387.89,-223.69 411.13,-228.81"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="410.38,-232.23 420.9,-230.96 411.89,-225.39 410.38,-232.23"/>
+<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M333.8,-192.04C355.49,-196.93 380.74,-202.63 403.35,-207.74"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="402.67,-211.17 413.19,-209.96 404.21,-204.35 402.67,-211.17"/>
 </g>
 <!-- proc~get_knoti~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_node11" class="node">
+<g id="proc~~remove_knots~2~~CallsGraph_node10" class="node">
 <title>proc~get_knoti~2</title>
-<g id="a_proc~~remove_knots~2~~CallsGraph_node11"><a xlink:href="../proc/get_knoti~2.html" xlink:title="nurbs_surface%get_knoti">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="549.5,-213 403.5,-213 403.5,-189 549.5,-189 549.5,-213"/>
-<text text-anchor="middle" x="476.5" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knoti</text>
+<g id="a_proc~~remove_knots~2~~CallsGraph_node10"><a xlink:href="../proc/get_knoti~2.html" xlink:title="nurbs_volume%get_knoti">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="540.5,-192 394.5,-192 394.5,-168 540.5,-168 540.5,-192"/>
+<text text-anchor="middle" x="467.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knoti</text>
 </a>
 </g>
 </g>
 <!-- none~get_knot~2&#45;&gt;proc~get_knoti~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge10" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge9" class="edge">
 <title>none~get_knot~2&#45;&gt;proc~get_knoti~2</title>
-<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M355.66,-201C367.82,-201 380.56,-201 393,-201"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="393.36,-204.5 403.36,-201 393.36,-197.5 393.36,-204.5"/>
+<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M351.08,-180C361.94,-180 373.23,-180 384.32,-180"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="384.42,-183.5 394.42,-180 384.42,-176.5 384.42,-183.5"/>
 </g>
 <!-- proc~set1~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_node12" class="node">
+<g id="proc~~remove_knots~2~~CallsGraph_node11" class="node">
 <title>proc~set1~2</title>
-<g id="a_proc~~remove_knots~2~~CallsGraph_node12"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="536.5,-129 416.5,-129 416.5,-105 536.5,-105 536.5,-129"/>
-<text text-anchor="middle" x="476.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
+<g id="a_proc~~remove_knots~2~~CallsGraph_node11"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="527.5,-108 407.5,-108 407.5,-84 527.5,-84 527.5,-108"/>
+<text text-anchor="middle" x="467.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set1~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge11" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge10" class="edge">
 <title>none~set~2&#45;&gt;proc~set1~2</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M340.61,-131.87C361.19,-129.6 384.76,-127 406.39,-124.62"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="406.94,-128.08 416.5,-123.5 406.17,-121.12 406.94,-128.08"/>
+<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M336.05,-110.73C355.28,-108.56 377.08,-106.1 397.27,-103.82"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="397.81,-107.28 407.35,-102.68 397.02,-100.32 397.81,-107.28"/>
 </g>
 <!-- proc~set2~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_node13" class="node">
+<g id="proc~~remove_knots~2~~CallsGraph_node12" class="node">
 <title>proc~set2~2</title>
-<g id="a_proc~~remove_knots~2~~CallsGraph_node13"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="536.5,-87 416.5,-87 416.5,-63 536.5,-63 536.5,-87"/>
-<text text-anchor="middle" x="476.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
+<g id="a_proc~~remove_knots~2~~CallsGraph_node12"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="527.5,-66 407.5,-66 407.5,-42 527.5,-42 527.5,-66"/>
+<text text-anchor="middle" x="467.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set2~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge12" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge11" class="edge">
 <title>none~set~2&#45;&gt;proc~set2~2</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M334.83,-125.98C343.36,-123.37 352.03,-120.37 360,-117 377.06,-109.78 378.89,-103.1 396,-96 401.11,-93.88 406.49,-91.92 411.95,-90.12"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="413.3,-93.37 421.82,-87.06 411.23,-86.68 413.3,-93.37"/>
+<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M326.95,-104.88C335.09,-102.28 343.38,-99.3 351,-96 368,-88.64 369.89,-82.1 387,-75 392.11,-72.88 397.49,-70.92 402.95,-69.12"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="404.3,-72.37 412.82,-66.06 402.23,-65.68 404.3,-72.37"/>
 </g>
 <!-- proc~set3~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_node14" class="node">
+<g id="proc~~remove_knots~2~~CallsGraph_node13" class="node">
 <title>proc~set3~2</title>
-<g id="a_proc~~remove_knots~2~~CallsGraph_node14"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="536.5,-171 416.5,-171 416.5,-147 536.5,-147 536.5,-171"/>
-<text text-anchor="middle" x="476.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
+<g id="a_proc~~remove_knots~2~~CallsGraph_node13"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="527.5,-150 407.5,-150 407.5,-126 527.5,-126 527.5,-150"/>
+<text text-anchor="middle" x="467.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set3~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge13" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge12" class="edge">
 <title>none~set~2&#45;&gt;proc~set3~2</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M340.61,-144.13C361.19,-146.4 384.76,-149 406.39,-151.38"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="406.17,-154.88 416.5,-152.5 406.94,-147.92 406.17,-154.88"/>
+<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M336.05,-123.27C355.28,-125.44 377.08,-127.9 397.27,-130.18"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="397.02,-133.68 407.35,-131.32 397.81,-126.72 397.02,-133.68"/>
 </g>
 <!-- proc~set4~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_node15" class="node">
+<g id="proc~~remove_knots~2~~CallsGraph_node14" class="node">
 <title>proc~set4~2</title>
-<g id="a_proc~~remove_knots~2~~CallsGraph_node15"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="536.5,-45 416.5,-45 416.5,-21 536.5,-21 536.5,-45"/>
-<text text-anchor="middle" x="476.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
+<g id="a_proc~~remove_knots~2~~CallsGraph_node14"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="527.5,-24 407.5,-24 407.5,0 527.5,0 527.5,-24"/>
+<text text-anchor="middle" x="467.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set4~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge14" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge13" class="edge">
 <title>none~set~2&#45;&gt;proc~set4~2</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M340.64,-127.8C347.58,-125.02 354.24,-121.49 360,-117 385.43,-97.17 370.42,-73.64 396,-54 399.38,-51.41 403.04,-49.13 406.89,-47.14"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="408.45,-50.28 416.13,-42.98 405.58,-43.89 408.45,-50.28"/>
+<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M336.05,-105C341.4,-102.54 346.5,-99.57 351,-96 376.27,-75.96 361.42,-52.64 387,-33 390.38,-30.41 394.04,-28.13 397.89,-26.14"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="399.45,-29.28 407.13,-21.98 396.58,-22.89 399.45,-29.28"/>
 </g>
 <!-- proc~cmp_degree~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_node16" class="node">
+<g id="proc~~remove_knots~2~~CallsGraph_node15" class="node">
 <title>proc~cmp_degree~2</title>
-<g id="a_proc~~remove_knots~2~~CallsGraph_node16"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="756,-171 593,-171 593,-147 756,-147 756,-171"/>
-<text text-anchor="middle" x="674.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
+<g id="a_proc~~remove_knots~2~~CallsGraph_node15"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="747,-150 584,-150 584,-126 747,-126 747,-150"/>
+<text text-anchor="middle" x="665.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge15" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge14" class="edge">
 <title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#00ffff" d="M533.67,-129.04C556.63,-133.96 583.37,-139.69 607.27,-144.81"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="606.81,-148.29 617.33,-146.96 608.28,-141.45 606.81,-148.29"/>
+<path fill="none" stroke="#00ffff" d="M524.67,-108.04C547.63,-112.96 574.37,-118.69 598.27,-123.81"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="597.81,-127.29 608.33,-125.96 599.28,-120.45 597.81,-127.29"/>
 </g>
 <!-- proc~cmp_nc~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_node17" class="node">
+<g id="proc~~remove_knots~2~~CallsGraph_node16" class="node">
 <title>proc~cmp_nc~2</title>
-<g id="a_proc~~remove_knots~2~~CallsGraph_node17"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="744,-129 605,-129 605,-105 744,-105 744,-129"/>
-<text text-anchor="middle" x="674.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+<g id="a_proc~~remove_knots~2~~CallsGraph_node16"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="735,-108 596,-108 596,-84 735,-84 735,-108"/>
+<text text-anchor="middle" x="665.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
 <!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge16" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge15" class="edge">
 <title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
-<path fill="none" stroke="#00ffff" d="M536.57,-117C554.91,-117 575.41,-117 594.85,-117"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="594.91,-120.5 604.91,-117 594.91,-113.5 594.91,-120.5"/>
+<path fill="none" stroke="#00ffff" d="M527.57,-96C545.91,-96 566.41,-96 585.85,-96"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="585.91,-99.5 595.91,-96 585.91,-92.5 585.91,-99.5"/>
 </g>
 <!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge17" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge16" class="edge">
 <title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
-<path fill="none" stroke="#003fff" d="M533.67,-87.04C556.63,-91.96 583.37,-97.69 607.27,-102.81"/>
-<polygon fill="#003fff" stroke="#003fff" points="606.81,-106.29 617.33,-104.96 608.28,-99.45 606.81,-106.29"/>
+<path fill="none" stroke="#003fff" d="M524.67,-66.04C547.63,-70.96 574.37,-76.69 598.27,-81.81"/>
+<polygon fill="#003fff" stroke="#003fff" points="597.81,-85.29 608.33,-83.96 599.28,-78.45 597.81,-85.29"/>
 </g>
 <!-- proc~compute_knot_vector -->
-<g id="proc~~remove_knots~2~~CallsGraph_node18" class="node">
+<g id="proc~~remove_knots~2~~CallsGraph_node17" class="node">
 <title>proc~compute_knot_vector</title>
-<g id="a_proc~~remove_knots~2~~CallsGraph_node18"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="738,-87 611,-87 611,-63 738,-63 738,-87"/>
-<text text-anchor="middle" x="674.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<g id="a_proc~~remove_knots~2~~CallsGraph_node17"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="729,-66 602,-66 602,-42 729,-42 729,-66"/>
+<text text-anchor="middle" x="665.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge18" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge17" class="edge">
 <title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#003fff" d="M536.57,-75C556.72,-75 579.49,-75 600.59,-75"/>
-<polygon fill="#003fff" stroke="#003fff" points="600.8,-78.5 610.8,-75 600.8,-71.5 600.8,-78.5"/>
+<path fill="none" stroke="#003fff" d="M527.57,-54C547.72,-54 570.49,-54 591.59,-54"/>
+<polygon fill="#003fff" stroke="#003fff" points="591.8,-57.5 601.8,-54 591.8,-50.5 591.8,-57.5"/>
 </g>
 <!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge19" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge18" class="edge">
 <title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
-<path fill="none" stroke="#7f00ff" d="M536.57,-159C551.09,-159 566.97,-159 582.6,-159"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="582.82,-162.5 592.82,-159 582.82,-155.5 582.82,-162.5"/>
+<path fill="none" stroke="#7f00ff" d="M527.57,-138C542.09,-138 557.97,-138 573.6,-138"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="573.82,-141.5 583.82,-138 573.82,-134.5 573.82,-141.5"/>
 </g>
 <!-- proc~get_multiplicity~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_node19" class="node">
+<g id="proc~~remove_knots~2~~CallsGraph_node18" class="node">
 <title>proc~get_multiplicity~2</title>
-<g id="a_proc~~remove_knots~2~~CallsGraph_node19"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="970,-171 792,-171 792,-147 970,-147 970,-171"/>
-<text text-anchor="middle" x="881" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
+<g id="a_proc~~remove_knots~2~~CallsGraph_node18"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="961,-150 783,-150 783,-126 961,-126 961,-150"/>
+<text text-anchor="middle" x="872" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge20" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge19" class="edge">
 <title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
-<path fill="none" stroke="#ff0000" d="M756.03,-159C764.47,-159 773.11,-159 781.71,-159"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="781.78,-162.5 791.78,-159 781.78,-155.5 781.78,-162.5"/>
+<path fill="none" stroke="#ff0000" d="M747.03,-138C755.47,-138 764.11,-138 772.71,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="772.78,-141.5 782.78,-138 772.78,-134.5 772.78,-141.5"/>
 </g>
 <!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge21" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge20" class="edge">
 <title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00ff00" d="M744.23,-119.14C804.1,-121.66 893.13,-126.99 970,-138 982.38,-139.77 995.54,-142.23 1008.04,-144.84"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="1007.39,-148.28 1017.9,-146.95 1008.86,-141.43 1007.39,-148.28"/>
+<path fill="none" stroke="#00ff00" d="M735.23,-98.14C795.1,-100.66 884.13,-105.99 961,-117 973.38,-118.77 986.54,-121.23 999.04,-123.84"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="998.39,-127.28 1008.9,-125.95 999.86,-120.43 998.39,-127.28"/>
 </g>
 <!-- proc~repelem -->
-<g id="proc~~remove_knots~2~~CallsGraph_node20" class="node">
+<g id="proc~~remove_knots~2~~CallsGraph_node19" class="node">
 <title>proc~repelem</title>
-<g id="a_proc~~remove_knots~2~~CallsGraph_node20"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="909.5,-87 852.5,-87 852.5,-63 909.5,-63 909.5,-87"/>
-<text text-anchor="middle" x="881" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<g id="a_proc~~remove_knots~2~~CallsGraph_node19"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="900.5,-66 843.5,-66 843.5,-42 900.5,-42 900.5,-66"/>
+<text text-anchor="middle" x="872" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge22" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge21" class="edge">
 <title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#0000ff" d="M738.25,-75C772.23,-75 813.1,-75 842.2,-75"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="842.36,-78.5 852.36,-75 842.35,-71.5 842.36,-78.5"/>
+<path fill="none" stroke="#0000ff" d="M729.25,-54C763.23,-54 804.1,-54 833.2,-54"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="833.36,-57.5 843.36,-54 833.35,-50.5 833.36,-57.5"/>
 </g>
 <!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~remove_knots~2~~CallsGraph_edge23" class="edge">
+<g id="proc~~remove_knots~2~~CallsGraph_edge22" class="edge">
 <title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M970.17,-159C978.77,-159 987.42,-159 995.82,-159"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="995.93,-162.5 1005.93,-159 995.93,-155.5 995.93,-162.5"/>
+<path fill="none" stroke="#ff0000" d="M961.17,-138C969.77,-138 978.42,-138 986.82,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="986.93,-141.5 996.93,-138 986.93,-134.5 986.93,-141.5"/>
 </g>
 </g>
 </svg>
@@ -658,20 +643,20 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~remove_knots~2~~CalledByGraph_node1" class="node">
 <title>proc~remove_knots~2</title>
 <polygon fill="none" stroke="black" points="318,-24 146,-24 146,0 318,0 318,-24"/>
-<text text-anchor="middle" x="232" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%remove_knots</text>
+<text text-anchor="middle" x="232" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%remove_knots</text>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~remove_knots~2~~CalledByGraph_node2" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~remove_knots~2~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<title>program~example3_volume</title>
+<g id="a_proc~~remove_knots~2~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
 <g id="proc~~remove_knots~2~~CalledByGraph_edge1" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
 <path fill="none" stroke="#ff0000" d="M110.41,-12C118.49,-12 127.01,-12 135.63,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="135.77,-15.5 145.77,-12 135.77,-8.5 135.77,-15.5"/>
 </g>
@@ -789,7 +774,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/remove_knots~3.html b/proc/remove_knots~3.html
index 3b294af3e..ba52f2202 100644
--- a/proc/remove_knots~3.html
+++ b/proc/remove_knots~3.html
@@ -78,20 +78,20 @@ <h1>remove_knots
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.8% of total for procedures.">55 statements</a>
+                 title=" 1.9% of total for procedures.">128 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">remove_knots</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine remove_knots(this, Xth, r)  
+    <h2>private pure subroutine remove_knots(this, dir, Xth, r)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~179"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~178"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -171,6 +171,21 @@ <h3>Arguments</h3>
                 
             </td>
         </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-dir~33"></span>
+              integer,
+            </td>
+<td>intent(in)</td>
+              <td></td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>dir</strong></td>
+            <td>
+                
+            </td>
+        </tr>
         <tr>
             <td>
               <span class="anchor" id="variable-xth~11"></span>
@@ -216,274 +231,325 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~remove_knots~3~~CallsGraph Pages: 1 -->
-<svg id="procremove_knots3CallsGraph" width="641pt" height="132pt"
- viewBox="0.00 0.00 641.00 131.66" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~remove_knots~3~~CallsGraph" class="graph" transform="scale(1.91 1.91) rotate(0) translate(4 247)">
+<svg id="procremove_knots3CallsGraph" width="641pt" height="143pt"
+ viewBox="0.00 0.00 641.00 143.05" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~remove_knots~3~~CallsGraph" class="graph" transform="scale(2.03 2.03) rotate(0) translate(4 287)">
 <title>proc~~remove_knots~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-247 1218,-247 1218,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-287 1300,-287 1300,4 -4,4"/>
 <!-- proc~remove_knots~3 -->
 <g id="proc~~remove_knots~3~~CallsGraph_node1" class="node">
 <title>proc~remove_knots~3</title>
-<polygon fill="none" stroke="black" points="162,-108 0,-108 0,-84 162,-84 162,-108"/>
-<text text-anchor="middle" x="81" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%remove_knots</text>
+<polygon fill="none" stroke="black" points="172,-129 0,-129 0,-105 172,-105 172,-129"/>
+<text text-anchor="middle" x="86" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%remove_knots</text>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~remove_knots~3~~CallsGraph_node2" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~remove_knots~3~~CallsGraph_node2"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1048,-222 924,-222 924,-198 1048,-198 1048,-222"/>
-<text text-anchor="middle" x="986" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="1130,-171 1006,-171 1006,-147 1130,-147 1130,-171"/>
+<text text-anchor="middle" x="1068" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~remove_knots~3~~CallsGraph_edge1" class="edge">
 <title>proc~remove_knots~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M98.2,-108.11C146.45,-142.96 294.54,-241 433.5,-241 433.5,-241 433.5,-241 607,-241 714.07,-241 837.62,-228.49 913.52,-219.37"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="914.41,-222.79 923.91,-218.1 913.56,-215.84 914.41,-222.79"/>
+<path fill="none" stroke="#ff0000" d="M97.28,-129.22C116.59,-151.35 160.62,-197.97 208,-222 316.75,-277.17 353.56,-283 475.5,-283 475.5,-283 475.5,-283 675.5,-283 815.83,-283 971.79,-209.7 1036.4,-175.82"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1038.07,-178.89 1045.26,-171.12 1034.79,-172.71 1038.07,-178.89"/>
 </g>
-<!-- none~set~3 -->
+<!-- none~get_knot~3 -->
 <g id="proc~~remove_knots~3~~CallsGraph_node3" class="node">
+<title>none~get_knot~3</title>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node3"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~3" xlink:title="nurbs_surface%get_knot">
+<polygon fill="#a7506f" stroke="#a7506f" points="355.5,-213 212.5,-213 212.5,-189 355.5,-189 355.5,-213"/>
+<text text-anchor="middle" x="284" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
+</a>
+</g>
+</g>
+<!-- proc~remove_knots~3&#45;&gt;none~get_knot~3 -->
+<g id="proc~~remove_knots~3~~CallsGraph_edge2" class="edge">
+<title>proc~remove_knots~3&#45;&gt;none~get_knot~3</title>
+<path fill="none" stroke="#ff0000" d="M115.08,-129.04C149.43,-143.76 207.69,-168.72 245.75,-185.04"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="244.4,-188.26 254.97,-188.99 247.16,-181.83 244.4,-188.26"/>
+</g>
+<!-- none~set~3 -->
+<g id="proc~~remove_knots~3~~CallsGraph_node4" class="node">
 <title>none~set~3</title>
-<g id="a_proc~~remove_knots~3~~CallsGraph_node3"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="320.5,-150 217.5,-150 217.5,-126 320.5,-126 320.5,-150"/>
-<text text-anchor="middle" x="269" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="340.5,-150 227.5,-150 227.5,-126 340.5,-126 340.5,-150"/>
+<text text-anchor="middle" x="284" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;none~set~3 -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge2" class="edge">
+<g id="proc~~remove_knots~3~~CallsGraph_edge3" class="edge">
 <title>proc~remove_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M135.3,-108.04C157.84,-113.13 184.22,-119.08 207.49,-124.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="206.73,-127.75 217.25,-126.54 208.27,-120.92 206.73,-127.75"/>
+<path fill="none" stroke="#ff0000" d="M172.11,-126.12C187.16,-127.73 202.62,-129.39 217.04,-130.93"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="217.02,-134.45 227.33,-132.04 217.76,-127.49 217.02,-134.45"/>
 </g>
 <!-- proc~findspan -->
-<g id="proc~~remove_knots~3~~CallsGraph_node4" class="node">
+<g id="proc~~remove_knots~3~~CallsGraph_node5" class="node">
 <title>proc~findspan</title>
-<g id="a_proc~~remove_knots~3~~CallsGraph_node4"><a xlink:href="../proc/findspan.html" xlink:title="findspan">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="298,-108 240,-108 240,-84 298,-84 298,-108"/>
-<text text-anchor="middle" x="269" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">findspan</text>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node5"><a xlink:href="../proc/findspan.html" xlink:title="findspan">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="313,-108 255,-108 255,-84 313,-84 313,-108"/>
+<text text-anchor="middle" x="284" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">findspan</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;proc~findspan -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge3" class="edge">
+<g id="proc~~remove_knots~3~~CallsGraph_edge4" class="edge">
 <title>proc~remove_knots~3&#45;&gt;proc~findspan</title>
-<path fill="none" stroke="#ff0000" d="M162.23,-96C185.73,-96 210.34,-96 229.91,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="229.93,-99.5 239.93,-96 229.93,-92.5 229.93,-99.5"/>
+<path fill="none" stroke="#ff0000" d="M172.11,-107.88C197.57,-105.15 224.2,-102.3 244.98,-100.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="245.41,-103.55 254.98,-99 244.67,-96.59 245.41,-103.55"/>
 </g>
 <!-- proc~is_rational~3 -->
-<g id="proc~~remove_knots~3~~CallsGraph_node5" class="node">
+<g id="proc~~remove_knots~3~~CallsGraph_node6" class="node">
 <title>proc~is_rational~3</title>
-<g id="a_proc~~remove_knots~3~~CallsGraph_node5"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="340,-66 198,-66 198,-42 340,-42 340,-66"/>
-<text text-anchor="middle" x="269" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node6"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="360,-66 208,-66 208,-42 360,-42 360,-66"/>
+<text text-anchor="middle" x="284" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;proc~is_rational~3 -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge4" class="edge">
+<g id="proc~~remove_knots~3~~CallsGraph_edge5" class="edge">
 <title>proc~remove_knots~3&#45;&gt;proc~is_rational~3</title>
-<path fill="none" stroke="#ff0000" d="M135.3,-83.96C156.99,-79.07 182.24,-73.37 204.85,-68.26"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="205.71,-71.65 214.69,-66.04 204.17,-64.83 205.71,-71.65"/>
+<path fill="none" stroke="#ff0000" d="M119.94,-104.95C144.17,-96.24 177.97,-84.41 208,-75 214.5,-72.96 221.35,-70.91 228.16,-68.94"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="229.4,-72.22 238.05,-66.1 227.48,-65.49 229.4,-72.22"/>
 </g>
 <!-- proc~remove_knots_a_5_8 -->
-<g id="proc~~remove_knots~3~~CallsGraph_node6" class="node">
+<g id="proc~~remove_knots~3~~CallsGraph_node7" class="node">
 <title>proc~remove_knots_a_5_8</title>
-<g id="a_proc~~remove_knots~3~~CallsGraph_node6"><a xlink:href="../proc/remove_knots_a_5_8.html" xlink:title="remove_knots_A_5_8">
-<polygon fill="#d9534f" stroke="#d9534f" points="331,-24 207,-24 207,0 331,0 331,-24"/>
-<text text-anchor="middle" x="269" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">remove_knots_A_5_8</text>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node7"><a xlink:href="../proc/remove_knots_a_5_8.html" xlink:title="remove_knots_A_5_8">
+<polygon fill="#d9534f" stroke="#d9534f" points="346,-24 222,-24 222,0 346,0 346,-24"/>
+<text text-anchor="middle" x="284" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">remove_knots_A_5_8</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;proc~remove_knots_a_5_8 -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge5" class="edge">
+<g id="proc~~remove_knots~3~~CallsGraph_edge6" class="edge">
 <title>proc~remove_knots~3&#45;&gt;proc~remove_knots_a_5_8</title>
-<path fill="none" stroke="#ff0000" d="M101.5,-83.78C124.07,-70.04 162.67,-47.71 198,-33 202.78,-31.01 207.82,-29.12 212.91,-27.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="214.32,-30.57 222.71,-24.1 212.11,-23.92 214.32,-30.57"/>
+<path fill="none" stroke="#ff0000" d="M100.93,-104.97C122.5,-86.92 165.89,-52.82 208,-33 212.36,-30.95 216.96,-29.06 221.64,-27.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="223.02,-30.56 231.34,-24 220.74,-23.94 223.02,-30.56"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
-<g id="proc~~remove_knots~3~~CallsGraph_node7" class="node">
+<g id="proc~~remove_knots~3~~CallsGraph_node8" class="node">
 <title>proc~compute_multiplicity1</title>
-<g id="a_proc~~remove_knots~3~~CallsGraph_node7"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1214,-243 1084,-243 1084,-219 1214,-219 1214,-243"/>
-<text text-anchor="middle" x="1149" y="-228.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node8"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1296,-192 1166,-192 1166,-168 1296,-168 1296,-192"/>
+<text text-anchor="middle" x="1231" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge6" class="edge">
+<g id="proc~~remove_knots~3~~CallsGraph_edge7" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1048.33,-218C1056.69,-219.09 1065.35,-220.22 1073.92,-221.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1073.53,-224.82 1083.9,-222.64 1074.44,-217.88 1073.53,-224.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1130.33,-167C1138.69,-168.09 1147.35,-169.22 1155.92,-170.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1155.53,-173.82 1165.9,-171.64 1156.44,-166.88 1155.53,-173.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
-<g id="proc~~remove_knots~3~~CallsGraph_node8" class="node">
+<g id="proc~~remove_knots~3~~CallsGraph_node9" class="node">
 <title>proc~compute_multiplicity2</title>
-<g id="a_proc~~remove_knots~3~~CallsGraph_node8"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1214,-201 1084,-201 1084,-177 1214,-177 1214,-201"/>
-<text text-anchor="middle" x="1149" y="-186.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node9"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1296,-150 1166,-150 1166,-126 1296,-126 1296,-150"/>
+<text text-anchor="middle" x="1231" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge7" class="edge">
+<g id="proc~~remove_knots~3~~CallsGraph_edge8" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1048.33,-202C1056.69,-200.91 1065.35,-199.78 1073.92,-198.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1074.44,-202.12 1083.9,-197.36 1073.53,-195.18 1074.44,-202.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1130.33,-151C1138.69,-149.91 1147.35,-148.78 1155.92,-147.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1156.44,-151.12 1165.9,-146.36 1155.53,-144.18 1156.44,-151.12"/>
 </g>
-<!-- proc~set1a -->
-<g id="proc~~remove_knots~3~~CallsGraph_node9" class="node">
-<title>proc~set1a</title>
-<g id="a_proc~~remove_knots~3~~CallsGraph_node9"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="493,-213 376,-213 376,-189 493,-189 493,-213"/>
-<text text-anchor="middle" x="434.5" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+<!-- proc~get_knot_all~3 -->
+<g id="proc~~remove_knots~3~~CallsGraph_node10" class="node">
+<title>proc~get_knot_all~3</title>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node10"><a xlink:href="../proc/get_knot_all~3.html" xlink:title="nurbs_surface%get_knot_all">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="557,-255 396,-255 396,-231 557,-231 557,-255"/>
+<text text-anchor="middle" x="476.5" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot_all</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge8" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
-<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M300.07,-150.17C321.24,-158.67 350.29,-170.21 376,-180 380.72,-181.8 385.67,-183.65 390.6,-185.48"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="389.4,-188.77 400,-188.94 391.82,-182.2 389.4,-188.77"/>
+<!-- none~get_knot~3&#45;&gt;proc~get_knot_all~3 -->
+<g id="proc~~remove_knots~3~~CallsGraph_edge9" class="edge">
+<title>none~get_knot~3&#45;&gt;proc~get_knot_all~3</title>
+<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M339.59,-213.04C361.91,-217.96 387.89,-223.69 411.13,-228.81"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="410.38,-232.23 420.9,-230.96 411.89,-225.39 410.38,-232.23"/>
+</g>
+<!-- proc~get_knoti~3 -->
+<g id="proc~~remove_knots~3~~CallsGraph_node11" class="node">
+<title>proc~get_knoti~3</title>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node11"><a xlink:href="../proc/get_knoti~3.html" xlink:title="nurbs_surface%get_knoti">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="549.5,-213 403.5,-213 403.5,-189 549.5,-189 549.5,-213"/>
+<text text-anchor="middle" x="476.5" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knoti</text>
+</a>
+</g>
+</g>
+<!-- none~get_knot~3&#45;&gt;proc~get_knoti~3 -->
+<g id="proc~~remove_knots~3~~CallsGraph_edge10" class="edge">
+<title>none~get_knot~3&#45;&gt;proc~get_knoti~3</title>
+<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M355.66,-201C367.82,-201 380.56,-201 393,-201"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="393.36,-204.5 403.36,-201 393.36,-197.5 393.36,-204.5"/>
 </g>
 <!-- proc~set1~3 -->
-<g id="proc~~remove_knots~3~~CallsGraph_node10" class="node">
+<g id="proc~~remove_knots~3~~CallsGraph_node12" class="node">
 <title>proc~set1~3</title>
-<g id="a_proc~~remove_knots~3~~CallsGraph_node10"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="489.5,-171 379.5,-171 379.5,-147 489.5,-147 489.5,-171"/>
-<text text-anchor="middle" x="434.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node12"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="536.5,-129 416.5,-129 416.5,-105 536.5,-105 536.5,-129"/>
+<text text-anchor="middle" x="476.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set1~3 -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge9" class="edge">
+<g id="proc~~remove_knots~3~~CallsGraph_edge11" class="edge">
 <title>none~set~3&#45;&gt;proc~set1~3</title>
-<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M320.84,-144.53C336.06,-146.49 352.97,-148.66 368.95,-150.71"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="368.93,-154.24 379.29,-152.04 369.82,-147.29 368.93,-154.24"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M340.61,-131.87C361.19,-129.6 384.76,-127 406.39,-124.62"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="406.94,-128.08 416.5,-123.5 406.17,-121.12 406.94,-128.08"/>
 </g>
 <!-- proc~set2~3 -->
-<g id="proc~~remove_knots~3~~CallsGraph_node11" class="node">
+<g id="proc~~remove_knots~3~~CallsGraph_node13" class="node">
 <title>proc~set2~3</title>
-<g id="a_proc~~remove_knots~3~~CallsGraph_node11"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="489.5,-87 379.5,-87 379.5,-63 489.5,-63 489.5,-87"/>
-<text text-anchor="middle" x="434.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node13"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="536.5,-87 416.5,-87 416.5,-63 536.5,-63 536.5,-87"/>
+<text text-anchor="middle" x="476.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set2~3 -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge10" class="edge">
+<g id="proc~~remove_knots~3~~CallsGraph_edge12" class="edge">
 <title>none~set~3&#45;&gt;proc~set2~3</title>
-<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M315.75,-125.98C323.95,-123.35 332.32,-120.34 340,-117 356.99,-109.62 359.23,-103.88 376,-96 379.84,-94.2 383.88,-92.44 387.97,-90.77"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="389.49,-93.94 397.52,-87.02 386.93,-87.42 389.49,-93.94"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M334.83,-125.98C343.36,-123.37 352.03,-120.37 360,-117 377.06,-109.78 378.89,-103.1 396,-96 401.11,-93.88 406.49,-91.92 411.95,-90.12"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="413.3,-93.37 421.82,-87.06 411.23,-86.68 413.3,-93.37"/>
 </g>
 <!-- proc~set3~3 -->
-<g id="proc~~remove_knots~3~~CallsGraph_node12" class="node">
+<g id="proc~~remove_knots~3~~CallsGraph_node14" class="node">
 <title>proc~set3~3</title>
-<g id="a_proc~~remove_knots~3~~CallsGraph_node12"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="489.5,-129 379.5,-129 379.5,-105 489.5,-105 489.5,-129"/>
-<text text-anchor="middle" x="434.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node14"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="536.5,-171 416.5,-171 416.5,-147 536.5,-147 536.5,-171"/>
+<text text-anchor="middle" x="476.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set3~3 -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge11" class="edge">
+<g id="proc~~remove_knots~3~~CallsGraph_edge13" class="edge">
 <title>none~set~3&#45;&gt;proc~set3~3</title>
-<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M320.84,-131.47C336.06,-129.51 352.97,-127.34 368.95,-125.29"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="369.82,-128.71 379.29,-123.96 368.93,-121.76 369.82,-128.71"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M340.61,-144.13C361.19,-146.4 384.76,-149 406.39,-151.38"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="406.17,-154.88 416.5,-152.5 406.94,-147.92 406.17,-154.88"/>
 </g>
 <!-- proc~set4~3 -->
-<g id="proc~~remove_knots~3~~CallsGraph_node13" class="node">
+<g id="proc~~remove_knots~3~~CallsGraph_node15" class="node">
 <title>proc~set4~3</title>
-<g id="a_proc~~remove_knots~3~~CallsGraph_node13"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="489.5,-45 379.5,-45 379.5,-21 489.5,-21 489.5,-45"/>
-<text text-anchor="middle" x="434.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node15"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="536.5,-45 416.5,-45 416.5,-21 536.5,-21 536.5,-45"/>
+<text text-anchor="middle" x="476.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set4~3 -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge12" class="edge">
+<g id="proc~~remove_knots~3~~CallsGraph_edge14" class="edge">
 <title>none~set~3&#45;&gt;proc~set4~3</title>
-<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M320.51,-127.96C327.5,-125.16 334.24,-121.58 340,-117 365.25,-96.93 351.35,-74.8 376,-54 377.55,-52.69 379.2,-51.46 380.9,-50.3"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="382.99,-53.14 389.91,-45.11 379.49,-47.07 382.99,-53.14"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M340.64,-127.8C347.58,-125.02 354.24,-121.49 360,-117 385.43,-97.17 370.42,-73.64 396,-54 399.38,-51.41 403.04,-49.13 406.89,-47.14"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="408.45,-50.28 416.13,-42.98 405.58,-43.89 408.45,-50.28"/>
 </g>
 <!-- proc~cmp_degree~3 -->
-<g id="proc~~remove_knots~3~~CallsGraph_node14" class="node">
+<g id="proc~~remove_knots~3~~CallsGraph_node16" class="node">
 <title>proc~cmp_degree~3</title>
-<g id="a_proc~~remove_knots~3~~CallsGraph_node14"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="683,-181 529,-181 529,-157 683,-157 683,-181"/>
-<text text-anchor="middle" x="606" y="-166.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node16"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="756,-171 593,-171 593,-147 756,-147 756,-171"/>
+<text text-anchor="middle" x="674.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge13" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#48ff00" d="M493.36,-190.08C505.54,-187.78 518.55,-185.32 531.23,-182.93"/>
-<polygon fill="#48ff00" stroke="#48ff00" points="532.13,-186.32 541.3,-181.03 530.83,-179.44 532.13,-186.32"/>
-</g>
 <!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge14" class="edge">
+<g id="proc~~remove_knots~3~~CallsGraph_edge15" class="edge">
 <title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#00ff91" d="M489.6,-162.19C498.87,-162.74 508.72,-163.32 518.59,-163.9"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="518.68,-167.41 528.86,-164.51 519.09,-160.43 518.68,-167.41"/>
+<path fill="none" stroke="#00ffff" d="M533.67,-129.04C556.63,-133.96 583.37,-139.69 607.27,-144.81"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="606.81,-148.29 617.33,-146.96 608.28,-141.45 606.81,-148.29"/>
+</g>
+<!-- proc~cmp_nc~3 -->
+<g id="proc~~remove_knots~3~~CallsGraph_node17" class="node">
+<title>proc~cmp_nc~3</title>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node17"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="744,-129 605,-129 605,-105 744,-105 744,-129"/>
+<text text-anchor="middle" x="674.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+</a>
+</g>
+</g>
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
+<g id="proc~~remove_knots~3~~CallsGraph_edge16" class="edge">
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#00ffff" d="M536.57,-117C554.91,-117 575.41,-117 594.85,-117"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="594.91,-120.5 604.91,-117 594.91,-113.5 594.91,-120.5"/>
+</g>
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
+<g id="proc~~remove_knots~3~~CallsGraph_edge17" class="edge">
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#003fff" d="M533.67,-87.04C556.63,-91.96 583.37,-97.69 607.27,-102.81"/>
+<polygon fill="#003fff" stroke="#003fff" points="606.81,-106.29 617.33,-104.96 608.28,-99.45 606.81,-106.29"/>
 </g>
 <!-- proc~compute_knot_vector -->
-<g id="proc~~remove_knots~3~~CallsGraph_node15" class="node">
+<g id="proc~~remove_knots~3~~CallsGraph_node18" class="node">
 <title>proc~compute_knot_vector</title>
-<g id="a_proc~~remove_knots~3~~CallsGraph_node15"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="669.5,-87 542.5,-87 542.5,-63 669.5,-63 669.5,-87"/>
-<text text-anchor="middle" x="606" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node18"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="738,-87 611,-87 611,-63 738,-63 738,-87"/>
+<text text-anchor="middle" x="674.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge15" class="edge">
+<g id="proc~~remove_knots~3~~CallsGraph_edge18" class="edge">
 <title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#0091ff" d="M489.6,-75C503.08,-75 517.77,-75 532,-75"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="532.26,-78.5 542.26,-75 532.26,-71.5 532.26,-78.5"/>
+<path fill="none" stroke="#003fff" d="M536.57,-75C556.72,-75 579.49,-75 600.59,-75"/>
+<polygon fill="#003fff" stroke="#003fff" points="600.8,-78.5 610.8,-75 600.8,-71.5 600.8,-78.5"/>
 </g>
 <!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge16" class="edge">
+<g id="proc~~remove_knots~3~~CallsGraph_edge19" class="edge">
 <title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#4800ff" d="M474.81,-129.06C499.01,-136.48 530.22,-146.06 556.01,-153.97"/>
-<polygon fill="#4800ff" stroke="#4800ff" points="555.02,-157.33 565.61,-156.91 557.07,-150.64 555.02,-157.33"/>
+<path fill="none" stroke="#7f00ff" d="M536.57,-159C551.09,-159 566.97,-159 582.6,-159"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="582.82,-162.5 592.82,-159 582.82,-155.5 582.82,-162.5"/>
 </g>
 <!-- proc~get_multiplicity~3 -->
-<g id="proc~~remove_knots~3~~CallsGraph_node16" class="node">
+<g id="proc~~remove_knots~3~~CallsGraph_node19" class="node">
 <title>proc~get_multiplicity~3</title>
-<g id="a_proc~~remove_knots~3~~CallsGraph_node16"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="888,-192 719,-192 719,-168 888,-168 888,-192"/>
-<text text-anchor="middle" x="803.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node19"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="970,-171 792,-171 792,-147 970,-147 970,-171"/>
+<text text-anchor="middle" x="881" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge17" class="edge">
+<g id="proc~~remove_knots~3~~CallsGraph_edge20" class="edge">
 <title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#ff0000" d="M683.15,-173.28C691.54,-173.76 700.17,-174.24 708.75,-174.73"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="708.61,-178.22 718.79,-175.29 709,-171.23 708.61,-178.22"/>
+<path fill="none" stroke="#ff0000" d="M756.03,-159C764.47,-159 773.11,-159 781.71,-159"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="781.78,-162.5 791.78,-159 781.78,-155.5 781.78,-162.5"/>
+</g>
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
+<g id="proc~~remove_knots~3~~CallsGraph_edge21" class="edge">
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
+<path fill="none" stroke="#00ff00" d="M744.23,-119.14C804.1,-121.66 893.13,-126.99 970,-138 982.38,-139.77 995.54,-142.23 1008.04,-144.84"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="1007.39,-148.28 1017.9,-146.95 1008.86,-141.43 1007.39,-148.28"/>
 </g>
 <!-- proc~repelem -->
-<g id="proc~~remove_knots~3~~CallsGraph_node17" class="node">
+<g id="proc~~remove_knots~3~~CallsGraph_node20" class="node">
 <title>proc~repelem</title>
-<g id="a_proc~~remove_knots~3~~CallsGraph_node17"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="832,-87 775,-87 775,-63 832,-63 832,-87"/>
-<text text-anchor="middle" x="803.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<g id="a_proc~~remove_knots~3~~CallsGraph_node20"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="909.5,-87 852.5,-87 852.5,-63 909.5,-63 909.5,-87"/>
+<text text-anchor="middle" x="881" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge18" class="edge">
+<g id="proc~~remove_knots~3~~CallsGraph_edge22" class="edge">
 <title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#00ffff" d="M669.66,-75C700.92,-75 737.69,-75 764.61,-75"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="764.78,-78.5 774.78,-75 764.78,-71.5 764.78,-78.5"/>
+<path fill="none" stroke="#0000ff" d="M738.25,-75C772.23,-75 813.1,-75 842.2,-75"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="842.36,-78.5 852.36,-75 842.35,-71.5 842.36,-78.5"/>
 </g>
 <!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~remove_knots~3~~CallsGraph_edge19" class="edge">
+<g id="proc~~remove_knots~3~~CallsGraph_edge23" class="edge">
 <title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M876.88,-192.03C889.06,-194.05 901.7,-196.15 913.85,-198.17"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="913.48,-201.66 923.92,-199.85 914.63,-194.76 913.48,-201.66"/>
+<path fill="none" stroke="#ff0000" d="M970.17,-159C978.77,-159 987.42,-159 995.82,-159"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="995.93,-162.5 1005.93,-159 995.93,-155.5 995.93,-162.5"/>
 </g>
 </g>
 </svg>
@@ -583,31 +649,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~remove_knots~3~~CalledByGraph Pages: 1 -->
-<svg id="procremove_knots3CalledByGraph" width="306pt" height="32pt"
- viewBox="0.00 0.00 306.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procremove_knots3CalledByGraph" width="326pt" height="32pt"
+ viewBox="0.00 0.00 326.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~remove_knots~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~remove_knots~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 302,-28 302,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 322,-28 322,4 -4,4"/>
 <!-- proc~remove_knots~3 -->
 <g id="proc~~remove_knots~3~~CalledByGraph_node1" class="node">
 <title>proc~remove_knots~3</title>
-<polygon fill="none" stroke="black" points="298,-24 136,-24 136,0 298,0 298,-24"/>
-<text text-anchor="middle" x="217" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%remove_knots</text>
+<polygon fill="none" stroke="black" points="318,-24 146,-24 146,0 318,0 318,-24"/>
+<text text-anchor="middle" x="232" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%remove_knots</text>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~remove_knots~3~~CalledByGraph_node2" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~remove_knots~3~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="100,-24 0,-24 0,0 100,0 100,-24"/>
-<text text-anchor="middle" x="50" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~remove_knots~3~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
 <g id="proc~~remove_knots~3~~CalledByGraph_edge1" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
-<path fill="none" stroke="#ff0000" d="M100.06,-12C108.27,-12 117.02,-12 125.88,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="125.92,-15.5 135.92,-12 125.92,-8.5 125.92,-15.5"/>
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#ff0000" d="M110.41,-12C118.49,-12 127.01,-12 135.63,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="135.77,-15.5 145.77,-12 135.77,-8.5 135.77,-15.5"/>
 </g>
 </g>
 </svg>
@@ -723,7 +789,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/repelem.html b/proc/repelem.html
index 565a119bc..c70628fbd 100644
--- a/proc/repelem.html
+++ b/proc/repelem.html
@@ -214,1103 +214,1103 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~repelem -->
 <g id="proc~~repelem~~CalledByGraph_node1" class="node">
 <title>proc~repelem</title>
-<polygon fill="none" stroke="black" points="1085,-835 1028,-835 1028,-811 1085,-811 1085,-835"/>
-<text text-anchor="middle" x="1056.5" y="-820.6" font-family="Helvetica,sans-Serif" font-size="10.50">repelem</text>
+<polygon fill="none" stroke="black" points="1085,-894 1028,-894 1028,-870 1085,-870 1085,-894"/>
+<text text-anchor="middle" x="1056.5" y="-879.6" font-family="Helvetica,sans-Serif" font-size="10.50">repelem</text>
 </g>
 <!-- proc~compute_knot_vector -->
 <g id="proc~~repelem~~CalledByGraph_node2" class="node">
 <title>proc~compute_knot_vector</title>
 <g id="a_proc~~repelem~~CalledByGraph_node2"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="992,-835 865,-835 865,-811 992,-811 992,-835"/>
-<text text-anchor="middle" x="928.5" y="-820.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="992,-894 865,-894 865,-870 992,-870 992,-894"/>
+<text text-anchor="middle" x="928.5" y="-879.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
 <g id="proc~~repelem~~CalledByGraph_edge1" class="edge">
 <title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#ff0000" d="M992.13,-823C1000.89,-823 1009.66,-823 1017.76,-823"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1017.97,-826.5 1027.97,-823 1017.97,-819.5 1017.97,-826.5"/>
+<path fill="none" stroke="#ff0000" d="M992.13,-882C1000.89,-882 1009.66,-882 1017.76,-882"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1017.97,-885.5 1027.97,-882 1017.97,-878.5 1017.97,-885.5"/>
 </g>
 <!-- proc~set2 -->
 <g id="proc~~repelem~~CalledByGraph_node3" class="node">
 <title>proc~set2</title>
-<g id="a_proc~~repelem~~CalledByGraph_node3"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="829,-1155 709,-1155 709,-1131 829,-1131 829,-1155"/>
-<text text-anchor="middle" x="769" y="-1140.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
+<g id="a_proc~~repelem~~CalledByGraph_node3"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="824,-1205 714,-1205 714,-1181 824,-1181 824,-1205"/>
+<text text-anchor="middle" x="769" y="-1190.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
 <!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~repelem~~CalledByGraph_edge2" class="edge">
 <title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#ff0000" d="M775.98,-1130.85C799.61,-1082.83 886.66,-905.97 916.99,-844.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="920.24,-845.68 921.51,-835.17 913.96,-842.59 920.24,-845.68"/>
+<path fill="none" stroke="#ff0000" d="M776.17,-1180.81C800.04,-1133.68 886.44,-963.08 916.83,-903.06"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="919.97,-904.61 921.37,-894.11 913.73,-901.45 919.97,-904.61"/>
 </g>
 <!-- proc~set2~2 -->
 <g id="proc~~repelem~~CalledByGraph_node4" class="node">
 <title>proc~set2~2</title>
-<g id="a_proc~~repelem~~CalledByGraph_node4"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="829,-835 709,-835 709,-811 829,-811 829,-835"/>
-<text text-anchor="middle" x="769" y="-820.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
+<g id="a_proc~~repelem~~CalledByGraph_node4"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="829,-894 709,-894 709,-870 829,-870 829,-894"/>
+<text text-anchor="middle" x="769" y="-879.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
 <!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~repelem~~CalledByGraph_edge3" class="edge">
 <title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#ff0000" d="M829.1,-823C837.5,-823 846.23,-823 854.86,-823"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="854.91,-826.5 864.91,-823 854.91,-819.5 854.91,-826.5"/>
+<path fill="none" stroke="#ff0000" d="M829.1,-882C837.5,-882 846.23,-882 854.86,-882"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="854.91,-885.5 864.91,-882 854.91,-878.5 854.91,-885.5"/>
 </g>
 <!-- proc~set2~3 -->
 <g id="proc~~repelem~~CalledByGraph_node5" class="node">
 <title>proc~set2~3</title>
-<g id="a_proc~~repelem~~CalledByGraph_node5"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="824,-542 714,-542 714,-518 824,-518 824,-542"/>
-<text text-anchor="middle" x="769" y="-527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
+<g id="a_proc~~repelem~~CalledByGraph_node5"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="829,-585 709,-585 709,-561 829,-561 829,-585"/>
+<text text-anchor="middle" x="769" y="-570.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
 <!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~repelem~~CalledByGraph_edge4" class="edge">
 <title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#ff0000" d="M776.57,-542.22C800.78,-587.27 885.26,-744.43 916.11,-801.81"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="913.09,-803.58 920.9,-810.73 919.25,-800.27 913.09,-803.58"/>
+<path fill="none" stroke="#ff0000" d="M776.17,-585.11C799.99,-631.84 886.08,-800.74 916.64,-860.7"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="913.71,-862.65 921.37,-869.97 919.95,-859.47 913.71,-862.65"/>
 </g>
 <!-- none~set -->
 <g id="proc~~repelem~~CalledByGraph_node6" class="node">
 <title>none~set</title>
-<g id="a_proc~~repelem~~CalledByGraph_node6"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="673,-1411 560,-1411 560,-1387 673,-1387 673,-1411"/>
-<text text-anchor="middle" x="616.5" y="-1396.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<g id="a_proc~~repelem~~CalledByGraph_node6"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="668,-1453 565,-1453 565,-1429 668,-1429 668,-1453"/>
+<text text-anchor="middle" x="616.5" y="-1438.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set2 -->
 <g id="proc~~repelem~~CalledByGraph_edge5" class="edge">
 <title>none~set&#45;&gt;proc~set2</title>
-<path fill="none" stroke="#ff0000" d="M624.56,-1387C648.3,-1346.61 725.49,-1215.31 755.71,-1163.9"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="758.73,-1165.67 760.78,-1155.28 752.7,-1162.12 758.73,-1165.67"/>
+<path fill="none" stroke="#ff0000" d="M624.96,-1428.7C649.09,-1388.94 725.17,-1263.58 755.42,-1213.73"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="758.47,-1215.44 760.67,-1205.08 752.49,-1211.81 758.47,-1215.44"/>
 </g>
 <!-- none~set~2 -->
 <g id="proc~~repelem~~CalledByGraph_node7" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~repelem~~CalledByGraph_node7"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="673,-835 560,-835 560,-811 673,-811 673,-835"/>
-<text text-anchor="middle" x="616.5" y="-820.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<g id="a_proc~~repelem~~CalledByGraph_node7"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="673,-894 560,-894 560,-870 673,-870 673,-894"/>
+<text text-anchor="middle" x="616.5" y="-879.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="proc~~repelem~~CalledByGraph_edge6" class="edge">
 <title>none~set~2&#45;&gt;proc~set2~2</title>
-<path fill="none" stroke="#00ff00" d="M673.11,-823C681.48,-823 690.19,-823 698.8,-823"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="698.83,-826.5 708.83,-823 698.83,-819.5 698.83,-826.5"/>
+<path fill="none" stroke="#00ff00" d="M673.11,-882C681.48,-882 690.19,-882 698.8,-882"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="698.83,-885.5 708.83,-882 698.83,-878.5 698.83,-885.5"/>
 </g>
 <!-- none~set~3 -->
 <g id="proc~~repelem~~CalledByGraph_node8" class="node">
 <title>none~set~3</title>
-<g id="a_proc~~repelem~~CalledByGraph_node8"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="668,-292 565,-292 565,-268 668,-268 668,-292"/>
-<text text-anchor="middle" x="616.5" y="-277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_proc~~repelem~~CalledByGraph_node8"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="673,-318 560,-318 560,-294 673,-294 673,-318"/>
+<text text-anchor="middle" x="616.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="proc~~repelem~~CalledByGraph_edge7" class="edge">
 <title>none~set~3&#45;&gt;proc~set2~3</title>
-<path fill="none" stroke="#0000ff" d="M624.76,-292.06C648.64,-331.73 724.99,-458.56 755.36,-509.01"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="752.48,-511.01 760.64,-517.77 758.48,-507.4 752.48,-511.01"/>
+<path fill="none" stroke="#0000ff" d="M624.36,-318.17C647.96,-360.04 726.03,-498.55 756.08,-551.85"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="753.14,-553.77 761.1,-560.76 759.24,-550.33 753.14,-553.77"/>
 </g>
 <!-- proc~ansatz -->
 <g id="proc~~repelem~~CalledByGraph_node9" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~repelem~~CalledByGraph_node9"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-1432 367.5,-1432 367.5,-1408 499.5,-1408 499.5,-1432"/>
-<text text-anchor="middle" x="433.5" y="-1417.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~repelem~~CalledByGraph_node9"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="494.5,-1226 372.5,-1226 372.5,-1202 494.5,-1202 494.5,-1226"/>
+<text text-anchor="middle" x="433.5" y="-1211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;none~set -->
 <g id="proc~~repelem~~CalledByGraph_edge8" class="edge">
 <title>proc~ansatz&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.59,-1412.45C515.96,-1410.55 533.53,-1408.51 549.92,-1406.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="550.42,-1410.07 559.95,-1405.45 549.61,-1403.12 550.42,-1410.07"/>
+<path fill="none" stroke="#ff0000" d="M494.95,-1223.82C505.46,-1227.59 515.68,-1232.8 524,-1240 579.9,-1288.36 603.5,-1377.86 611.74,-1419.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="608.31,-1419.79 613.6,-1428.97 615.18,-1418.49 608.31,-1419.79"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~repelem~~CalledByGraph_node10" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~repelem~~CalledByGraph_node10"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-1062 367.5,-1062 367.5,-1038 499.5,-1038 499.5,-1062"/>
-<text text-anchor="middle" x="433.5" y="-1047.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~repelem~~CalledByGraph_node10"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-894 367.5,-894 367.5,-870 499.5,-870 499.5,-894"/>
+<text text-anchor="middle" x="433.5" y="-879.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~set~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge23" class="edge">
+<g id="proc~~repelem~~CalledByGraph_edge21" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M499.5,-1042.34C508.38,-1039.21 516.87,-1034.9 524,-1029 582.37,-980.67 604.79,-887.59 612.25,-845.11"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="615.7,-845.67 613.87,-835.23 608.8,-844.53 615.7,-845.67"/>
+<path fill="none" stroke="#00ff00" d="M499.59,-882C515.96,-882 533.53,-882 549.92,-882"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="549.95,-885.5 559.95,-882 549.95,-878.5 549.95,-885.5"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="proc~~repelem~~CalledByGraph_node11" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~repelem~~CalledByGraph_node11"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="494.5,-24 372.5,-24 372.5,0 494.5,0 494.5,-24"/>
-<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~repelem~~CalledByGraph_node11"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-524 367.5,-524 367.5,-500 499.5,-500 499.5,-524"/>
+<text text-anchor="middle" x="433.5" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~set~3 -->
-<g id="proc~~repelem~~CalledByGraph_edge37" class="edge">
+<g id="proc~~repelem~~CalledByGraph_edge36" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M494.87,-21.22C505.52,-25.04 515.8,-30.42 524,-38 589.35,-98.4 608.35,-210.25 613.61,-257.74"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="610.14,-258.26 614.62,-267.86 617.1,-257.56 610.14,-258.26"/>
+<path fill="none" stroke="#0000ff" d="M499.75,-503.91C508.49,-500.83 516.87,-496.66 524,-491 577.36,-448.64 601.93,-367.16 611.04,-328.03"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="614.48,-328.7 613.21,-318.19 607.64,-327.2 614.48,-328.7"/>
 </g>
 <!-- proc~elevate_degree -->
 <g id="proc~~repelem~~CalledByGraph_node12" class="node">
 <title>proc~elevate_degree</title>
-<g id="a_proc~~repelem~~CalledByGraph_node12"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-1268 343.5,-1268 343.5,-1244 523.5,-1244 523.5,-1268"/>
-<text text-anchor="middle" x="433.5" y="-1253.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
+<g id="a_proc~~repelem~~CalledByGraph_node12"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="518.5,-1474 348.5,-1474 348.5,-1450 518.5,-1450 518.5,-1474"/>
+<text text-anchor="middle" x="433.5" y="-1459.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree&#45;&gt;none~set -->
 <g id="proc~~repelem~~CalledByGraph_edge9" class="edge">
 <title>proc~elevate_degree&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M495.54,-1268.14C505.54,-1271.67 515.42,-1276.2 524,-1282 560.9,-1306.97 589.67,-1351.53 604.48,-1377.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="601.42,-1379.57 609.29,-1386.67 607.57,-1376.22 601.42,-1379.57"/>
+<path fill="none" stroke="#ff0000" d="M518.64,-1452.24C530.85,-1450.82 543.22,-1449.39 554.84,-1448.04"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="555.31,-1451.51 564.84,-1446.88 554.51,-1444.55 555.31,-1451.51"/>
 </g>
 <!-- proc~elevate_degree~2 -->
 <g id="proc~~repelem~~CalledByGraph_node13" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_proc~~repelem~~CalledByGraph_node13"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-898 343.5,-898 343.5,-874 523.5,-874 523.5,-898"/>
-<text text-anchor="middle" x="433.5" y="-883.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<g id="a_proc~~repelem~~CalledByGraph_node13"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-730 343.5,-730 343.5,-706 523.5,-706 523.5,-730"/>
+<text text-anchor="middle" x="433.5" y="-715.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;none~set~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge24" class="edge">
+<g id="proc~~repelem~~CalledByGraph_edge22" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M493.23,-873.99C503.59,-871.38 514.19,-868.37 524,-865 544.37,-858.01 566.32,-848.03 583.62,-839.54"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="585.32,-842.61 592.71,-835.01 582.2,-836.34 585.32,-842.61"/>
+<path fill="none" stroke="#00ff00" d="M497.34,-730.1C506.8,-733.62 516.05,-738.15 524,-744 565.61,-774.6 593.89,-830.23 607.05,-860.68"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="603.84,-862.09 610.93,-869.97 610.3,-859.39 603.84,-862.09"/>
 </g>
 <!-- proc~elevate_degree~3 -->
 <g id="proc~~repelem~~CalledByGraph_node14" class="node">
 <title>proc~elevate_degree~3</title>
-<g id="a_proc~~repelem~~CalledByGraph_node14"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="518.5,-272 348.5,-272 348.5,-248 518.5,-248 518.5,-272"/>
-<text text-anchor="middle" x="433.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+<g id="a_proc~~repelem~~CalledByGraph_node14"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-360 343.5,-360 343.5,-336 523.5,-336 523.5,-360"/>
+<text text-anchor="middle" x="433.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;none~set~3 -->
-<g id="proc~~repelem~~CalledByGraph_edge38" class="edge">
+<g id="proc~~repelem~~CalledByGraph_edge37" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M518.64,-269.3C530.85,-270.65 543.22,-272.01 554.84,-273.3"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="554.52,-276.78 564.84,-274.4 555.29,-269.83 554.52,-276.78"/>
+<path fill="none" stroke="#0000ff" d="M486.37,-335.96C507.38,-331.09 531.82,-325.42 553.75,-320.33"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="554.68,-323.71 563.63,-318.04 553.09,-316.89 554.68,-323.71"/>
 </g>
 <!-- proc~insert_knots -->
 <g id="proc~~repelem~~CalledByGraph_node15" class="node">
 <title>proc~insert_knots</title>
-<g id="a_proc~~repelem~~CalledByGraph_node15"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514,-1390 353,-1390 353,-1366 514,-1366 514,-1390"/>
-<text text-anchor="middle" x="433.5" y="-1375.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
+<g id="a_proc~~repelem~~CalledByGraph_node15"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_curve%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="509,-1348 358,-1348 358,-1324 509,-1324 509,-1348"/>
+<text text-anchor="middle" x="433.5" y="-1333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;none~set -->
 <g id="proc~~repelem~~CalledByGraph_edge10" class="edge">
 <title>proc~insert_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M514.15,-1387.24C526.11,-1388.63 538.32,-1390.05 549.94,-1391.39"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="549.64,-1394.88 559.98,-1392.56 550.45,-1387.93 549.64,-1394.88"/>
+<path fill="none" stroke="#ff0000" d="M502.8,-1348.12C510.16,-1350.56 517.37,-1353.49 524,-1357 554.52,-1373.15 582.66,-1401.96 599.45,-1421.27"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="596.79,-1423.55 605.93,-1428.91 602.13,-1419.02 596.79,-1423.55"/>
 </g>
 <!-- proc~insert_knots~2 -->
 <g id="proc~~repelem~~CalledByGraph_node16" class="node">
 <title>proc~insert_knots~2</title>
-<g id="a_proc~~repelem~~CalledByGraph_node16"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514,-1020 353,-1020 353,-996 514,-996 514,-1020"/>
-<text text-anchor="middle" x="433.5" y="-1005.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+<g id="a_proc~~repelem~~CalledByGraph_node16"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514,-852 353,-852 353,-828 514,-828 514,-852"/>
+<text text-anchor="middle" x="433.5" y="-837.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;none~set~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge25" class="edge">
+<g id="proc~~repelem~~CalledByGraph_edge23" class="edge">
 <title>proc~insert_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M508.58,-996C514.06,-993.52 519.29,-990.56 524,-987 572.36,-950.53 598.72,-880.62 609.54,-845.02"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="612.98,-845.72 612.41,-835.14 606.26,-843.77 612.98,-845.72"/>
+<path fill="none" stroke="#00ff00" d="M486.37,-852.04C507.38,-856.91 531.82,-862.58 553.75,-867.67"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="553.09,-871.11 563.63,-869.96 554.68,-864.29 553.09,-871.11"/>
 </g>
 <!-- proc~insert_knots~3 -->
 <g id="proc~~repelem~~CalledByGraph_node17" class="node">
 <title>proc~insert_knots~3</title>
-<g id="a_proc~~repelem~~CalledByGraph_node17"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_curve%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="509,-146 358,-146 358,-122 509,-122 509,-146"/>
-<text text-anchor="middle" x="433.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
+<g id="a_proc~~repelem~~CalledByGraph_node17"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514,-482 353,-482 353,-458 514,-458 514,-482"/>
+<text text-anchor="middle" x="433.5" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;none~set~3 -->
-<g id="proc~~repelem~~CalledByGraph_edge39" class="edge">
+<g id="proc~~repelem~~CalledByGraph_edge38" class="edge">
 <title>proc~insert_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M506.76,-146.1C512.83,-148.54 518.68,-151.48 524,-155 563.52,-181.16 591.99,-230.54 605.89,-258.77"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="602.74,-260.28 610.2,-267.8 609.06,-257.27 602.74,-260.28"/>
+<path fill="none" stroke="#0000ff" d="M507.9,-457.87C513.6,-455.43 519.05,-452.5 524,-449 567.44,-418.25 595.13,-359.72 607.67,-327.91"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="611.07,-328.82 611.34,-318.23 604.52,-326.33 611.07,-328.82"/>
 </g>
 <!-- proc~modify_wc -->
 <g id="proc~~repelem~~CalledByGraph_node18" class="node">
 <title>proc~modify_wc</title>
-<g id="a_proc~~repelem~~CalledByGraph_node18"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-1226 355.5,-1226 355.5,-1202 511.5,-1202 511.5,-1226"/>
-<text text-anchor="middle" x="433.5" y="-1211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
+<g id="a_proc~~repelem~~CalledByGraph_node18"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="506.5,-1638 360.5,-1638 360.5,-1614 506.5,-1614 506.5,-1638"/>
+<text text-anchor="middle" x="433.5" y="-1623.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~set -->
 <g id="proc~~repelem~~CalledByGraph_edge11" class="edge">
 <title>proc~modify_wc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M508.58,-1226C514.06,-1228.48 519.29,-1231.44 524,-1235 572.36,-1271.47 598.72,-1341.38 609.54,-1376.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="606.26,-1378.23 612.41,-1386.86 612.98,-1376.28 606.26,-1378.23"/>
+<path fill="none" stroke="#ff0000" d="M506.79,-1614.78C512.93,-1612.16 518.78,-1608.94 524,-1605 572.36,-1568.53 598.72,-1498.62 609.54,-1463.02"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="612.98,-1463.72 612.41,-1453.14 606.26,-1461.77 612.98,-1463.72"/>
 </g>
 <!-- proc~modify_wc~2 -->
 <g id="proc~~repelem~~CalledByGraph_node19" class="node">
 <title>proc~modify_wc~2</title>
-<g id="a_proc~~repelem~~CalledByGraph_node19"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-856 355.5,-856 355.5,-832 511.5,-832 511.5,-856"/>
-<text text-anchor="middle" x="433.5" y="-841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+<g id="a_proc~~repelem~~CalledByGraph_node19"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-688 355.5,-688 355.5,-664 511.5,-664 511.5,-688"/>
+<text text-anchor="middle" x="433.5" y="-673.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~set~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge26" class="edge">
+<g id="proc~~repelem~~CalledByGraph_edge24" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M511.52,-835.06C524.23,-833.59 537.29,-832.07 549.69,-830.64"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="550.39,-834.08 559.92,-829.45 549.59,-827.12 550.39,-834.08"/>
+<path fill="none" stroke="#00ff00" d="M509.66,-688.16C514.77,-690.61 519.62,-693.53 524,-697 577.36,-739.36 601.93,-820.84 611.04,-859.97"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="607.64,-860.8 613.21,-869.81 614.48,-859.3 607.64,-860.8"/>
 </g>
 <!-- proc~modify_wc~3 -->
 <g id="proc~~repelem~~CalledByGraph_node20" class="node">
 <title>proc~modify_wc~3</title>
-<g id="a_proc~~repelem~~CalledByGraph_node20"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="506.5,-436 360.5,-436 360.5,-412 506.5,-412 506.5,-436"/>
-<text text-anchor="middle" x="433.5" y="-421.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
+<g id="a_proc~~repelem~~CalledByGraph_node20"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-318 355.5,-318 355.5,-294 511.5,-294 511.5,-318"/>
+<text text-anchor="middle" x="433.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
-<g id="proc~~repelem~~CalledByGraph_edge40" class="edge">
+<g id="proc~~repelem~~CalledByGraph_edge39" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M506.73,-411.86C512.81,-409.42 518.66,-406.5 524,-403 563.04,-377.38 591.55,-329.1 605.62,-301.26"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="608.9,-302.52 610.14,-292 602.61,-299.45 608.9,-302.52"/>
+<path fill="none" stroke="#0000ff" d="M511.52,-306C524.23,-306 537.29,-306 549.69,-306"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="549.92,-309.5 559.92,-306 549.92,-302.5 549.92,-309.5"/>
 </g>
 <!-- proc~modify_xc -->
 <g id="proc~~repelem~~CalledByGraph_node21" class="node">
 <title>proc~modify_xc</title>
-<g id="a_proc~~repelem~~CalledByGraph_node21"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="510,-1184 357,-1184 357,-1160 510,-1160 510,-1184"/>
-<text text-anchor="middle" x="433.5" y="-1169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
+<g id="a_proc~~repelem~~CalledByGraph_node21"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="505,-1596 362,-1596 362,-1572 505,-1572 505,-1596"/>
+<text text-anchor="middle" x="433.5" y="-1581.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~set -->
 <g id="proc~~repelem~~CalledByGraph_edge12" class="edge">
 <title>proc~modify_xc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M510.25,-1184.18C515.17,-1186.63 519.82,-1189.54 524,-1193 582.37,-1241.33 604.79,-1334.41 612.25,-1376.89"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="608.8,-1377.47 613.87,-1386.77 615.7,-1376.33 608.8,-1377.47"/>
+<path fill="none" stroke="#ff0000" d="M505.34,-1572.38C511.92,-1569.84 518.26,-1566.75 524,-1563 562.69,-1537.72 591.16,-1490.19 605.36,-1462.51"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="608.62,-1463.8 609.94,-1453.29 602.35,-1460.69 608.62,-1463.8"/>
 </g>
 <!-- proc~modify_xc~2 -->
 <g id="proc~~repelem~~CalledByGraph_node22" class="node">
 <title>proc~modify_xc~2</title>
-<g id="a_proc~~repelem~~CalledByGraph_node22"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="510,-814 357,-814 357,-790 510,-790 510,-814"/>
-<text text-anchor="middle" x="433.5" y="-799.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+<g id="a_proc~~repelem~~CalledByGraph_node22"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="510,-646 357,-646 357,-622 510,-622 510,-646"/>
+<text text-anchor="middle" x="433.5" y="-631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~set~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge27" class="edge">
+<g id="proc~~repelem~~CalledByGraph_edge25" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M510.21,-810.78C523.36,-812.31 536.93,-813.88 549.79,-815.38"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="549.58,-818.88 559.92,-816.55 550.39,-811.92 549.58,-818.88"/>
+<path fill="none" stroke="#00ff00" d="M510.39,-646.02C515.28,-648.5 519.88,-651.47 524,-655 587.46,-709.44 607.42,-814.31 613.26,-859.91"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="609.8,-860.4 614.44,-869.93 616.75,-859.59 609.8,-860.4"/>
 </g>
 <!-- proc~modify_xc~3 -->
 <g id="proc~~repelem~~CalledByGraph_node23" class="node">
 <title>proc~modify_xc~3</title>
-<g id="a_proc~~repelem~~CalledByGraph_node23"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="505,-394 362,-394 362,-370 505,-370 505,-394"/>
-<text text-anchor="middle" x="433.5" y="-379.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
+<g id="a_proc~~repelem~~CalledByGraph_node23"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="510,-276 357,-276 357,-252 510,-252 510,-276"/>
+<text text-anchor="middle" x="433.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
-<g id="proc~~repelem~~CalledByGraph_edge41" class="edge">
+<g id="proc~~repelem~~CalledByGraph_edge40" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M502.27,-369.91C509.8,-367.46 517.2,-364.52 524,-361 553.71,-345.63 581.53,-318.46 598.52,-299.87"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="601.28,-302.03 605.32,-292.24 596.05,-297.37 601.28,-302.03"/>
+<path fill="none" stroke="#0000ff" d="M486.37,-276.04C507.38,-280.91 531.82,-286.58 553.75,-291.67"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="553.09,-295.11 563.63,-293.96 554.68,-288.29 553.09,-295.11"/>
 </g>
 <!-- proc~remove_knots -->
 <g id="proc~~repelem~~CalledByGraph_node24" class="node">
 <title>proc~remove_knots</title>
-<g id="a_proc~~repelem~~CalledByGraph_node24"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-1348 347.5,-1348 347.5,-1324 519.5,-1324 519.5,-1348"/>
-<text text-anchor="middle" x="433.5" y="-1333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
+<g id="a_proc~~repelem~~CalledByGraph_node24"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_curve%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514.5,-1306 352.5,-1306 352.5,-1282 514.5,-1282 514.5,-1306"/>
+<text text-anchor="middle" x="433.5" y="-1291.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots&#45;&gt;none~set -->
 <g id="proc~~repelem~~CalledByGraph_edge13" class="edge">
 <title>proc~remove_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M493.23,-1348.01C503.59,-1350.62 514.19,-1353.63 524,-1357 544.37,-1363.99 566.32,-1373.97 583.62,-1382.46"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="582.2,-1385.66 592.71,-1386.99 585.32,-1379.39 582.2,-1385.66"/>
+<path fill="none" stroke="#ff0000" d="M506.77,-1306.07C512.84,-1308.52 518.68,-1311.47 524,-1315 563.68,-1341.37 592.09,-1391.14 605.94,-1419.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="602.8,-1421.15 610.23,-1428.7 609.13,-1418.17 602.8,-1421.15"/>
 </g>
 <!-- proc~remove_knots~2 -->
 <g id="proc~~repelem~~CalledByGraph_node25" class="node">
 <title>proc~remove_knots~2</title>
-<g id="a_proc~~repelem~~CalledByGraph_node25"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-978 347.5,-978 347.5,-954 519.5,-954 519.5,-978"/>
-<text text-anchor="middle" x="433.5" y="-963.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
+<g id="a_proc~~repelem~~CalledByGraph_node25"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-810 347.5,-810 347.5,-786 519.5,-786 519.5,-810"/>
+<text text-anchor="middle" x="433.5" y="-795.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;none~set~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge28" class="edge">
+<g id="proc~~repelem~~CalledByGraph_edge26" class="edge">
 <title>proc~remove_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M495.54,-953.86C505.54,-950.33 515.42,-945.8 524,-940 560.9,-915.03 589.67,-870.47 604.48,-844.14"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="607.57,-845.78 609.29,-835.33 601.42,-842.43 607.57,-845.78"/>
+<path fill="none" stroke="#00ff00" d="M499.01,-810.08C507.58,-812.56 516.12,-815.51 524,-819 549.77,-830.4 575.92,-849.31 593.63,-863.44"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="591.65,-866.34 601.61,-869.94 596.07,-860.91 591.65,-866.34"/>
 </g>
 <!-- proc~remove_knots~3 -->
 <g id="proc~~repelem~~CalledByGraph_node26" class="node">
 <title>proc~remove_knots~3</title>
-<g id="a_proc~~repelem~~CalledByGraph_node26"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_curve%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514.5,-104 352.5,-104 352.5,-80 514.5,-80 514.5,-104"/>
-<text text-anchor="middle" x="433.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
+<g id="a_proc~~repelem~~CalledByGraph_node26"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-440 347.5,-440 347.5,-416 519.5,-416 519.5,-440"/>
+<text text-anchor="middle" x="433.5" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;none~set~3 -->
-<g id="proc~~repelem~~CalledByGraph_edge42" class="edge">
+<g id="proc~~repelem~~CalledByGraph_edge41" class="edge">
 <title>proc~remove_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M509.05,-104.17C514.37,-106.61 519.43,-109.52 524,-113 572.89,-150.17 599.01,-221.34 609.66,-257.59"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="606.41,-258.96 612.48,-267.64 613.15,-257.07 606.41,-258.96"/>
+<path fill="none" stroke="#0000ff" d="M492.73,-415.93C503.56,-412.36 514.46,-407.8 524,-402 556.34,-382.35 584.87,-348.36 601.15,-326.54"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="604.1,-328.43 607.16,-318.29 598.45,-324.31 604.1,-328.43"/>
 </g>
 <!-- proc~set_c -->
 <g id="proc~~repelem~~CalledByGraph_node27" class="node">
 <title>proc~set_c</title>
-<g id="a_proc~~repelem~~CalledByGraph_node27"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_volume%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-1142 370.5,-1142 370.5,-1118 496.5,-1118 496.5,-1142"/>
-<text text-anchor="middle" x="433.5" y="-1127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
+<g id="a_proc~~repelem~~CalledByGraph_node27"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_curve%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="491.5,-1722 375.5,-1722 375.5,-1698 491.5,-1698 491.5,-1722"/>
+<text text-anchor="middle" x="433.5" y="-1707.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c&#45;&gt;none~set -->
 <g id="proc~~repelem~~CalledByGraph_edge14" class="edge">
 <title>proc~set_c&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M496.64,-1136.15C506.63,-1139.39 516.23,-1144.13 524,-1151 592.58,-1211.63 609.84,-1328.33 614.12,-1376.93"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="610.64,-1377.28 614.9,-1386.98 617.61,-1376.74 610.64,-1377.28"/>
+<path fill="none" stroke="#ff0000" d="M491.54,-1705.37C503.33,-1702.15 514.91,-1697.03 524,-1689 592.58,-1628.37 609.84,-1511.67 614.12,-1463.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="617.61,-1463.26 614.9,-1453.02 610.64,-1462.72 617.61,-1463.26"/>
 </g>
 <!-- proc~set_circle -->
 <g id="proc~~repelem~~CalledByGraph_node28" class="node">
 <title>proc~set_circle</title>
 <g id="a_proc~~repelem~~CalledByGraph_node28"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="502,-520 365,-520 365,-496 502,-496 502,-520"/>
-<text text-anchor="middle" x="433.5" y="-505.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="502,-1680 365,-1680 365,-1656 502,-1656 502,-1680"/>
+<text text-anchor="middle" x="433.5" y="-1665.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_circle&#45;&gt;none~set~3 -->
-<g id="proc~~repelem~~CalledByGraph_edge43" class="edge">
-<title>proc~set_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M502.25,-499.34C510.13,-496.31 517.61,-492.3 524,-487 582.7,-438.3 604.99,-344.45 612.33,-301.91"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="615.79,-302.46 613.93,-292.03 608.88,-301.35 615.79,-302.46"/>
+<!-- proc~set_circle&#45;&gt;none~set -->
+<g id="proc~~repelem~~CalledByGraph_edge15" class="edge">
+<title>proc~set_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M502.24,-1659.33C510.12,-1656.3 517.61,-1652.29 524,-1647 582.37,-1598.67 604.79,-1505.59 612.25,-1463.11"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="615.7,-1463.67 613.87,-1453.23 608.8,-1462.53 615.7,-1463.67"/>
 </g>
 <!-- proc~set_c~2 -->
 <g id="proc~~repelem~~CalledByGraph_node29" class="node">
 <title>proc~set_c~2</title>
-<g id="a_proc~~repelem~~CalledByGraph_node29"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_surface%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-646 370.5,-646 370.5,-622 496.5,-622 496.5,-646"/>
-<text text-anchor="middle" x="433.5" y="-631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
+<g id="a_proc~~repelem~~CalledByGraph_node29"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_volume%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-604 370.5,-604 370.5,-580 496.5,-580 496.5,-604"/>
+<text text-anchor="middle" x="433.5" y="-589.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c~2&#45;&gt;none~set~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge29" class="edge">
+<g id="proc~~repelem~~CalledByGraph_edge27" class="edge">
 <title>proc~set_c~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M496.77,-641.42C506.52,-644.54 516,-648.9 524,-655 573.28,-692.56 599.33,-764.61 609.84,-800.93"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="606.46,-801.86 612.5,-810.57 613.21,-800 606.46,-801.86"/>
+<path fill="none" stroke="#00ff00" d="M496.79,-597.99C506.76,-601.25 516.32,-606.03 524,-613 597.7,-679.85 612.06,-808.35 614.84,-859.85"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="611.35,-860.05 615.29,-869.89 618.34,-859.74 611.35,-860.05"/>
 </g>
 <!-- proc~set_c~3 -->
 <g id="proc~~repelem~~CalledByGraph_node30" class="node">
 <title>proc~set_c~3</title>
-<g id="a_proc~~repelem~~CalledByGraph_node30"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_curve%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="491.5,-478 375.5,-478 375.5,-454 491.5,-454 491.5,-478"/>
-<text text-anchor="middle" x="433.5" y="-463.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
+<g id="a_proc~~repelem~~CalledByGraph_node30"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_surface%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-108 370.5,-108 370.5,-84 496.5,-84 496.5,-108"/>
+<text text-anchor="middle" x="433.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c~3&#45;&gt;none~set~3 -->
-<g id="proc~~repelem~~CalledByGraph_edge44" class="edge">
+<g id="proc~~repelem~~CalledByGraph_edge42" class="edge">
 <title>proc~set_c~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M491.6,-460.05C503.13,-456.88 514.58,-452.12 524,-445 572.54,-408.29 598.82,-337.97 609.58,-302.15"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="613.04,-302.79 612.43,-292.21 606.31,-300.86 613.04,-302.79"/>
+<path fill="none" stroke="#0000ff" d="M496.56,-102.94C506.45,-106.11 516.03,-110.62 524,-117 578.22,-160.42 602.42,-243.9 611.25,-283.76"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="607.82,-284.49 613.3,-293.56 614.67,-283.05 607.82,-284.49"/>
 </g>
 <!-- proc~set_half_circle -->
 <g id="proc~~repelem~~CalledByGraph_node31" class="node">
 <title>proc~set_half_circle</title>
 <g id="a_proc~~repelem~~CalledByGraph_node31"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="515,-352 352,-352 352,-328 515,-328 515,-352"/>
-<text text-anchor="middle" x="433.5" y="-337.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="515,-1554 352,-1554 352,-1530 515,-1530 515,-1554"/>
+<text text-anchor="middle" x="433.5" y="-1539.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_circle&#45;&gt;none~set~3 -->
-<g id="proc~~repelem~~CalledByGraph_edge45" class="edge">
-<title>proc~set_half_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M478.4,-327.94C492.98,-323.75 509.25,-318.88 524,-314 540.92,-308.41 559.38,-301.67 575.26,-295.67"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="576.68,-298.88 584.78,-292.05 574.19,-292.34 576.68,-298.88"/>
+<!-- proc~set_half_circle&#45;&gt;none~set -->
+<g id="proc~~repelem~~CalledByGraph_edge16" class="edge">
+<title>proc~set_half_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M489.35,-1529.87C501.13,-1526.23 513.26,-1521.65 524,-1516 551.9,-1501.31 579.23,-1477.27 596.65,-1460.38"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="599.28,-1462.7 603.93,-1453.18 594.36,-1457.73 599.28,-1462.7"/>
 </g>
 <!-- proc~set_half_ring -->
 <g id="proc~~repelem~~CalledByGraph_node32" class="node">
 <title>proc~set_half_ring</title>
 <g id="a_proc~~repelem~~CalledByGraph_node32"><a xlink:href="../proc/set_half_ring.html" xlink:title="nurbs_volume%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="516,-1722 351,-1722 351,-1698 516,-1698 516,-1722"/>
-<text text-anchor="middle" x="433.5" y="-1707.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="516,-1184 351,-1184 351,-1160 516,-1160 516,-1184"/>
+<text text-anchor="middle" x="433.5" y="-1169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring&#45;&gt;none~set -->
-<g id="proc~~repelem~~CalledByGraph_edge15" class="edge">
-<title>proc~set_half_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M511.55,-1697.88C516.05,-1695.41 520.26,-1692.47 524,-1689 602.78,-1615.93 614.13,-1475.75 615.47,-1421.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="618.98,-1421.15 615.63,-1411.1 611.98,-1421.04 618.98,-1421.15"/>
+<!-- proc~set_half_ring&#45;&gt;none~set~2 -->
+<g id="proc~~repelem~~CalledByGraph_edge28" class="edge">
+<title>proc~set_half_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#00ff00" d="M511.47,-1159.78C515.98,-1157.33 520.22,-1154.43 524,-1151 597.7,-1084.15 612.06,-955.65 614.84,-904.15"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="618.34,-904.26 615.29,-894.11 611.35,-903.95 618.34,-904.26"/>
 </g>
 <!-- proc~set_half_ring~2 -->
 <g id="proc~~repelem~~CalledByGraph_node33" class="node">
 <title>proc~set_half_ring~2</title>
 <g id="a_proc~~repelem~~CalledByGraph_node33"><a xlink:href="../proc/set_half_ring~2.html" xlink:title="nurbs_surface%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="516,-688 351,-688 351,-664 516,-664 516,-688"/>
-<text text-anchor="middle" x="433.5" y="-673.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="516,-150 351,-150 351,-126 516,-126 516,-150"/>
+<text text-anchor="middle" x="433.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring~2&#45;&gt;none~set~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge30" class="edge">
-<title>proc~set_half_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M506.77,-688.07C512.84,-690.52 518.68,-693.47 524,-697 563.68,-723.37 592.09,-773.14 605.94,-801.6"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="602.8,-803.15 610.23,-810.7 609.13,-800.17 602.8,-803.15"/>
+<!-- proc~set_half_ring~2&#45;&gt;none~set~3 -->
+<g id="proc~~repelem~~CalledByGraph_edge43" class="edge">
+<title>proc~set_half_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#0000ff" d="M507.95,-150.06C513.63,-152.52 519.07,-155.46 524,-159 568.52,-190.94 596.03,-251.92 608.18,-284.39"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="604.91,-285.64 611.59,-293.86 611.5,-283.27 604.91,-285.64"/>
 </g>
 <!-- proc~set_hexahedron -->
 <g id="proc~~repelem~~CalledByGraph_node34" class="node">
 <title>proc~set_hexahedron</title>
 <g id="a_proc~~repelem~~CalledByGraph_node34"><a xlink:href="../proc/set_hexahedron.html" xlink:title="nurbs_volume%set_hexahedron">
-<polygon fill="#d9534f" stroke="#d9534f" points="524,-1680 343,-1680 343,-1656 524,-1656 524,-1680"/>
-<text text-anchor="middle" x="433.5" y="-1665.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="524,-1142 343,-1142 343,-1118 524,-1118 524,-1142"/>
+<text text-anchor="middle" x="433.5" y="-1127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- proc~set_hexahedron&#45;&gt;none~set -->
-<g id="proc~~repelem~~CalledByGraph_edge16" class="edge">
-<title>proc~set_hexahedron&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M510.94,-1655.9C515.64,-1653.43 520.05,-1650.49 524,-1647 592.58,-1586.37 609.84,-1469.67 614.12,-1421.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="617.61,-1421.26 614.9,-1411.02 610.64,-1420.72 617.61,-1421.26"/>
+<!-- proc~set_hexahedron&#45;&gt;none~set~2 -->
+<g id="proc~~repelem~~CalledByGraph_edge29" class="edge">
+<title>proc~set_hexahedron&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#00ff00" d="M510.39,-1117.98C515.28,-1115.5 519.88,-1112.53 524,-1109 587.46,-1054.56 607.42,-949.69 613.26,-904.09"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="616.75,-904.41 614.44,-894.07 609.8,-903.6 616.75,-904.41"/>
 </g>
 <!-- proc~set_ring -->
 <g id="proc~~repelem~~CalledByGraph_node35" class="node">
 <title>proc~set_ring</title>
 <g id="a_proc~~repelem~~CalledByGraph_node35"><a xlink:href="../proc/set_ring.html" xlink:title="nurbs_volume%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="503,-1638 364,-1638 364,-1614 503,-1614 503,-1638"/>
-<text text-anchor="middle" x="433.5" y="-1623.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="503,-1100 364,-1100 364,-1076 503,-1076 503,-1100"/>
+<text text-anchor="middle" x="433.5" y="-1085.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring&#45;&gt;none~set -->
-<g id="proc~~repelem~~CalledByGraph_edge17" class="edge">
-<title>proc~set_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.15,-1616.98C510.69,-1613.99 517.85,-1610.09 524,-1605 582.37,-1556.67 604.79,-1463.59 612.25,-1421.11"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="615.7,-1421.67 613.87,-1411.23 608.8,-1420.53 615.7,-1421.67"/>
+<!-- proc~set_ring&#45;&gt;none~set~2 -->
+<g id="proc~~repelem~~CalledByGraph_edge30" class="edge">
+<title>proc~set_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#00ff00" d="M503.4,-1078.55C510.82,-1075.63 517.87,-1071.86 524,-1067 577.36,-1024.64 601.93,-943.16 611.04,-904.03"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="614.48,-904.7 613.21,-894.19 607.64,-903.2 614.48,-904.7"/>
 </g>
 <!-- proc~set_ring~2 -->
 <g id="proc~~repelem~~CalledByGraph_node36" class="node">
 <title>proc~set_ring~2</title>
 <g id="a_proc~~repelem~~CalledByGraph_node36"><a xlink:href="../proc/set_ring~2.html" xlink:title="nurbs_surface%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="503,-730 364,-730 364,-706 503,-706 503,-730"/>
-<text text-anchor="middle" x="433.5" y="-715.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="503,-192 364,-192 364,-168 503,-168 503,-192"/>
+<text text-anchor="middle" x="433.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring~2&#45;&gt;none~set~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge31" class="edge">
-<title>proc~set_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M502.8,-730.12C510.16,-732.56 517.37,-735.49 524,-739 554.52,-755.15 582.66,-783.96 599.45,-803.27"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="596.79,-805.55 605.93,-810.91 602.13,-801.02 596.79,-805.55"/>
+<!-- proc~set_ring~2&#45;&gt;none~set~3 -->
+<g id="proc~~repelem~~CalledByGraph_edge44" class="edge">
+<title>proc~set_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#0000ff" d="M503.21,-191.4C510.49,-193.97 517.57,-197.13 524,-201 558.92,-222.04 587.54,-260.92 603,-285"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="600.19,-287.11 608.45,-293.74 606.13,-283.4 600.19,-287.11"/>
 </g>
 <!-- proc~set_tetragon -->
 <g id="proc~~repelem~~CalledByGraph_node37" class="node">
 <title>proc~set_tetragon</title>
 <g id="a_proc~~repelem~~CalledByGraph_node37"><a xlink:href="../proc/set_tetragon.html" xlink:title="nurbs_surface%set_tetragon">
-<polygon fill="#d9534f" stroke="#d9534f" points="515.5,-772 351.5,-772 351.5,-748 515.5,-748 515.5,-772"/>
-<text text-anchor="middle" x="433.5" y="-757.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="515.5,-234 351.5,-234 351.5,-210 515.5,-210 515.5,-234"/>
+<text text-anchor="middle" x="433.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
 </a>
 </g>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge32" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M493.23,-772.01C503.59,-774.62 514.19,-777.63 524,-781 544.37,-787.99 566.32,-797.97 583.62,-806.46"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="582.2,-809.66 592.71,-810.99 585.32,-803.39 582.2,-809.66"/>
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
+<g id="proc~~repelem~~CalledByGraph_edge45" class="edge">
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#0000ff" d="M499.01,-234.08C507.58,-236.56 516.12,-239.51 524,-243 549.77,-254.4 575.92,-273.31 593.63,-287.44"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="591.65,-290.34 601.61,-293.94 596.07,-284.91 591.65,-290.34"/>
 </g>
 <!-- program~compute_area -->
 <g id="proc~~repelem~~CalledByGraph_node38" class="node">
 <title>program~compute_area</title>
 <g id="a_proc~~repelem~~CalledByGraph_node38"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-1082 8,-1082 8,-1058 97,-1058 97,-1082"/>
-<text text-anchor="middle" x="52.5" y="-1067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-544 8,-544 8,-520 97,-520 97,-544"/>
+<text text-anchor="middle" x="52.5" y="-529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;none~set~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge33" class="edge">
-<title>program~compute_area&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M97.28,-1076.26C200.62,-1090.07 456.06,-1118.35 524,-1071 599.61,-1018.31 612.9,-895.68 615.12,-845.26"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="618.62,-845.23 615.45,-835.12 611.62,-845 618.62,-845.23"/>
+<!-- program~compute_area&#45;&gt;none~set~3 -->
+<g id="proc~~repelem~~CalledByGraph_edge46" class="edge">
+<title>program~compute_area&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#0000ff" d="M97.19,-538.13C200.33,-551.65 455.37,-579.33 524,-533 593.77,-485.9 610.35,-375.75 614.28,-328.34"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="617.78,-328.44 615.01,-318.22 610.8,-327.94 617.78,-328.44"/>
 </g>
 <!-- proc~cmp_area -->
 <g id="proc~~repelem~~CalledByGraph_node51" class="node">
 <title>proc~cmp_area</title>
 <g id="a_proc~~repelem~~CalledByGraph_node51"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-1062 149,-1062 149,-1038 299,-1038 299,-1062"/>
-<text text-anchor="middle" x="224" y="-1047.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-524 149,-524 149,-500 299,-500 299,-524"/>
+<text text-anchor="middle" x="224" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
 <!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="proc~~repelem~~CalledByGraph_edge80" class="edge">
 <title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M97.15,-1064.85C109.98,-1063.34 124.47,-1061.63 138.93,-1059.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="139.4,-1063.39 148.92,-1058.74 138.58,-1056.44 139.4,-1063.39"/>
+<path fill="none" stroke="#ff0000" d="M97.15,-526.85C109.98,-525.34 124.47,-523.63 138.93,-521.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="139.4,-525.39 148.92,-520.74 138.58,-518.44 139.4,-525.39"/>
 </g>
 <!-- program~compute_length -->
 <g id="proc~~repelem~~CalledByGraph_node39" class="node">
 <title>program~compute_length</title>
 <g id="a_proc~~repelem~~CalledByGraph_node39"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-44 3,-44 3,-20 102,-20 102,-44"/>
-<text text-anchor="middle" x="52.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-1246 3,-1246 3,-1222 102,-1222 102,-1246"/>
+<text text-anchor="middle" x="52.5" y="-1231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;none~set~3 -->
-<g id="proc~~repelem~~CalledByGraph_edge46" class="edge">
-<title>program~compute_length&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M102.13,-33.24C215.49,-36.51 490.24,-46.88 524,-71 586.99,-116.01 607.13,-214.1 613.14,-258"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="609.66,-258.44 614.38,-267.93 616.61,-257.57 609.66,-258.44"/>
+<!-- program~compute_length&#45;&gt;none~set -->
+<g id="proc~~repelem~~CalledByGraph_edge17" class="edge">
+<title>program~compute_length&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M102,-1235.43C215.07,-1239.13 489.23,-1250.35 524,-1273 576.18,-1306.99 601.01,-1381.31 610.56,-1418.65"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="607.2,-1419.65 612.95,-1428.55 614,-1418.01 607.2,-1419.65"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="proc~~repelem~~CalledByGraph_node52" class="node">
 <title>proc~cmp_length</title>
 <g id="a_proc~~repelem~~CalledByGraph_node52"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-24 149,-24 149,0 299,0 299,-24"/>
-<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-1226 149,-1226 149,-1202 299,-1202 299,-1226"/>
+<text text-anchor="middle" x="224" y="-1211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="proc~~repelem~~CalledByGraph_edge81" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#ff5400" d="M102.07,-26.27C113.57,-24.91 126.17,-23.43 138.75,-21.94"/>
-<polygon fill="#ff5400" stroke="#ff5400" points="139.29,-25.4 148.82,-20.75 138.47,-18.45 139.29,-25.4"/>
+<path fill="none" stroke="#ff5400" d="M102.07,-1228.27C113.57,-1226.91 126.17,-1225.43 138.75,-1223.94"/>
+<polygon fill="#ff5400" stroke="#ff5400" points="139.29,-1227.4 148.82,-1222.75 138.47,-1220.45 139.29,-1227.4"/>
 </g>
 <!-- program~compute_volume -->
 <g id="proc~~repelem~~CalledByGraph_node40" class="node">
 <title>program~compute_volume</title>
 <g id="a_proc~~repelem~~CalledByGraph_node40"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-1452 0,-1452 0,-1428 105,-1428 105,-1452"/>
-<text text-anchor="middle" x="52.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-914 0,-914 0,-890 105,-890 105,-914"/>
+<text text-anchor="middle" x="52.5" y="-899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;none~set -->
-<g id="proc~~repelem~~CalledByGraph_edge18" class="edge">
-<title>program~compute_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M105.09,-1447.29C192.51,-1458.05 374.77,-1473.61 524,-1441 546.04,-1436.18 569.12,-1425.54 586.59,-1416.18"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="588.62,-1419.06 595.67,-1411.15 585.23,-1412.93 588.62,-1419.06"/>
+<!-- program~compute_volume&#45;&gt;none~set~2 -->
+<g id="proc~~repelem~~CalledByGraph_edge31" class="edge">
+<title>program~compute_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#00ff00" d="M105.23,-905.97C192.1,-911.78 372.63,-920.15 524,-903 536.52,-901.58 549.83,-899.1 562.3,-896.34"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="563.14,-899.73 572.1,-894.07 561.57,-892.91 563.14,-899.73"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="proc~~repelem~~CalledByGraph_node53" class="node">
 <title>proc~cmp_volume</title>
 <g id="a_proc~~repelem~~CalledByGraph_node53"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-1432 141,-1432 141,-1408 307,-1408 307,-1432"/>
-<text text-anchor="middle" x="224" y="-1417.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-894 141,-894 141,-870 307,-870 307,-894"/>
+<text text-anchor="middle" x="224" y="-879.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
 <!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="proc~~repelem~~CalledByGraph_edge82" class="edge">
 <title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#ffaa00" d="M105.28,-1433.89C113.48,-1432.92 122.18,-1431.9 130.98,-1430.86"/>
-<polygon fill="#ffaa00" stroke="#ffaa00" points="131.41,-1434.33 140.93,-1429.68 130.59,-1427.38 131.41,-1434.33"/>
+<path fill="none" stroke="#ffaa00" d="M105.28,-895.89C113.48,-894.92 122.18,-893.9 130.98,-892.86"/>
+<polygon fill="#ffaa00" stroke="#ffaa00" points="131.41,-896.33 140.93,-891.68 130.59,-889.38 131.41,-896.33"/>
 </g>
 <!-- program~example1_curve -->
 <g id="proc~~repelem~~CalledByGraph_node41" class="node">
 <title>program~example1_curve</title>
 <g id="a_proc~~repelem~~CalledByGraph_node41"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-209 174,-209 174,-185 274,-185 274,-209"/>
-<text text-anchor="middle" x="224" y="-194.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="274,-1411 174,-1411 174,-1387 274,-1387 274,-1411"/>
+<text text-anchor="middle" x="224" y="-1396.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;none~set~3 -->
-<g id="proc~~repelem~~CalledByGraph_edge47" class="edge">
-<title>program~example1_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M236.65,-209.21C256.34,-228.87 298.45,-266.76 343,-281 413,-303.37 498.38,-298.23 554.7,-290.72"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="555.45,-294.15 564.87,-289.3 554.48,-287.22 555.45,-294.15"/>
+<!-- program~example1_curve&#45;&gt;none~set -->
+<g id="proc~~repelem~~CalledByGraph_edge18" class="edge">
+<title>program~example1_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M236.65,-1411.21C256.34,-1430.87 298.45,-1468.76 343,-1483 419.63,-1507.49 445.41,-1500.18 524,-1483 546.04,-1478.18 569.12,-1467.54 586.59,-1458.18"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="588.62,-1461.06 595.67,-1453.15 585.23,-1454.93 588.62,-1461.06"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
-<g id="proc~~repelem~~CalledByGraph_edge55" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
-<path fill="none" stroke="#ffb600" d="M255.75,-209.01C279.38,-217.98 312.96,-230.16 343,-239 350.73,-241.27 358.89,-243.47 367.01,-245.53"/>
-<polygon fill="#ffb600" stroke="#ffb600" points="366.32,-248.96 376.87,-247.96 368,-242.16 366.32,-248.96"/>
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
+<g id="proc~~repelem~~CalledByGraph_edge53" class="edge">
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
+<path fill="none" stroke="#ff6d00" d="M255.75,-1411.01C279.38,-1419.98 312.96,-1432.16 343,-1441 350.73,-1443.27 358.89,-1445.47 367.01,-1447.53"/>
+<polygon fill="#ff6d00" stroke="#ff6d00" points="366.32,-1450.96 376.87,-1449.96 368,-1444.16 366.32,-1450.96"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
-<g id="proc~~repelem~~CalledByGraph_edge58" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
-<path fill="none" stroke="#daff00" d="M255.75,-184.99C279.38,-176.02 312.96,-163.84 343,-155 350.73,-152.73 358.89,-150.53 367.01,-148.47"/>
-<polygon fill="#daff00" stroke="#daff00" points="368,-151.84 376.87,-146.04 366.32,-145.04 368,-151.84"/>
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
+<g id="proc~~repelem~~CalledByGraph_edge56" class="edge">
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
+<path fill="none" stroke="#ffda00" d="M255.75,-1386.99C279.38,-1378.02 312.96,-1365.84 343,-1357 350.73,-1354.73 358.89,-1352.53 367.01,-1350.47"/>
+<polygon fill="#ffda00" stroke="#ffda00" points="368,-1353.84 376.87,-1348.04 366.32,-1347.04 368,-1353.84"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
-<g id="proc~~repelem~~CalledByGraph_edge62" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
-<path fill="none" stroke="#00ff6d" d="M238.43,-184.73C259.25,-166.36 301.3,-131.85 343,-113 347.7,-110.88 352.63,-108.95 357.67,-107.22"/>
-<polygon fill="#00ff6d" stroke="#00ff6d" points="358.99,-110.47 367.46,-104.1 356.87,-103.8 358.99,-110.47"/>
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
+<g id="proc~~repelem~~CalledByGraph_edge60" class="edge">
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
+<path fill="none" stroke="#00ff24" d="M238.43,-1386.73C259.25,-1368.36 301.3,-1333.85 343,-1315 347.7,-1312.88 352.63,-1310.95 357.67,-1309.22"/>
+<polygon fill="#00ff24" stroke="#00ff24" points="358.99,-1312.47 367.46,-1306.1 356.87,-1305.8 358.99,-1312.47"/>
 </g>
 <!-- program~example3_surface -->
 <g id="proc~~repelem~~CalledByGraph_node42" class="node">
 <title>program~example3_surface</title>
 <g id="a_proc~~repelem~~CalledByGraph_node42"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-959 169,-959 169,-935 279,-935 279,-959"/>
-<text text-anchor="middle" x="224" y="-944.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-421 169,-421 169,-397 279,-397 279,-421"/>
+<text text-anchor="middle" x="224" y="-406.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;none~set~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge34" class="edge">
-<title>program~example3_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M279.29,-943.65C353.36,-938.41 481.73,-926.79 524,-907 555.44,-892.28 583.53,-862.85 600.04,-843.04"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="602.81,-845.18 606.39,-835.2 597.37,-840.77 602.81,-845.18"/>
+<!-- program~example3_surface&#45;&gt;none~set~3 -->
+<g id="proc~~repelem~~CalledByGraph_edge47" class="edge">
+<title>program~example3_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#0000ff" d="M279.25,-409.25C340.63,-407.85 442.64,-400.37 524,-369 550.6,-358.74 576.99,-339.33 594.54,-324.75"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="597.07,-327.19 602.41,-318.04 592.53,-321.87 597.07,-327.19"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge54" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
-<path fill="none" stroke="#ff9100" d="M265.4,-934.96C288.18,-928.18 317.17,-919.58 343,-912 355.25,-908.4 368.45,-904.55 380.85,-900.95"/>
-<polygon fill="#ff9100" stroke="#ff9100" points="381.97,-904.27 390.6,-898.12 380.02,-897.55 381.97,-904.27"/>
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="proc~~repelem~~CalledByGraph_edge55" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#ffb600" d="M265.4,-396.96C288.18,-390.18 317.17,-381.58 343,-374 355.25,-370.4 368.45,-366.55 380.85,-362.95"/>
+<polygon fill="#ffb600" stroke="#ffb600" points="381.97,-366.27 390.6,-360.12 380.02,-359.55 381.97,-366.27"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge57" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
-<path fill="none" stroke="#ffff00" d="M257.79,-959.06C281.32,-967.49 313.88,-978.67 343,-987 350.94,-989.27 359.33,-991.48 367.66,-993.57"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="366.83,-996.97 377.38,-995.95 368.5,-990.17 366.83,-996.97"/>
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
+<g id="proc~~repelem~~CalledByGraph_edge58" class="edge">
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#daff00" d="M257.79,-421.06C281.32,-429.49 313.88,-440.67 343,-449 350.94,-451.27 359.33,-453.48 367.66,-455.57"/>
+<polygon fill="#daff00" stroke="#daff00" points="366.83,-458.97 377.38,-457.95 368.5,-452.17 366.83,-458.97"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge61" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
-<path fill="none" stroke="#00ff48" d="M279.25,-951.97C297.02,-953.59 317.32,-955.45 337.21,-957.27"/>
-<polygon fill="#00ff48" stroke="#00ff48" points="336.96,-960.77 347.23,-958.19 337.6,-953.8 336.96,-960.77"/>
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
+<g id="proc~~repelem~~CalledByGraph_edge62" class="edge">
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#00ff6d" d="M279.25,-413.97C297.02,-415.59 317.32,-417.45 337.21,-419.27"/>
+<polygon fill="#00ff6d" stroke="#00ff6d" points="336.96,-422.77 347.23,-420.19 337.6,-415.8 336.96,-422.77"/>
 </g>
 <!-- program~example3_volume -->
 <g id="proc~~repelem~~CalledByGraph_node43" class="node">
 <title>program~example3_volume</title>
 <g id="a_proc~~repelem~~CalledByGraph_node43"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-1328 169,-1328 169,-1304 279,-1304 279,-1328"/>
-<text text-anchor="middle" x="224" y="-1313.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-790 169,-790 169,-766 279,-766 279,-790"/>
+<text text-anchor="middle" x="224" y="-775.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;none~set -->
-<g id="proc~~repelem~~CalledByGraph_edge19" class="edge">
-<title>program~example3_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M279.27,-1304.27C340.9,-1293.52 443.34,-1283.59 524,-1315 556.7,-1327.74 584.81,-1358.23 600.94,-1378.75"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="598.26,-1381.01 607.1,-1386.86 603.84,-1376.78 598.26,-1381.01"/>
+<!-- program~example3_volume&#45;&gt;none~set~2 -->
+<g id="proc~~repelem~~CalledByGraph_edge32" class="edge">
+<title>program~example3_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#00ff00" d="M273.4,-765.97C334.76,-753.3 442.38,-739.86 524,-777 561.86,-794.23 590.15,-835.71 604.64,-861.08"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="601.62,-862.85 609.51,-869.93 607.76,-859.48 601.62,-862.85"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
-<g id="proc~~repelem~~CalledByGraph_edge53" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#ff6d00" d="M266.99,-1303.86C300.01,-1294.31 346.14,-1280.97 381.32,-1270.8"/>
-<polygon fill="#ff6d00" stroke="#ff6d00" points="382.29,-1274.16 390.93,-1268.02 380.35,-1267.44 382.29,-1274.16"/>
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
+<g id="proc~~repelem~~CalledByGraph_edge54" class="edge">
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
+<path fill="none" stroke="#ff9100" d="M266.99,-765.86C300.01,-756.31 346.14,-742.97 381.32,-732.8"/>
+<polygon fill="#ff9100" stroke="#ff9100" points="382.29,-736.16 390.93,-730.02 380.35,-729.44 382.29,-736.16"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
-<g id="proc~~repelem~~CalledByGraph_edge56" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#ffda00" d="M256.76,-1328.04C280.35,-1336.74 313.42,-1348.42 343,-1357 350.74,-1359.25 358.9,-1361.42 367.03,-1363.47"/>
-<polygon fill="#ffda00" stroke="#ffda00" points="366.34,-1366.9 376.88,-1365.9 368.01,-1360.11 366.34,-1366.9"/>
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
+<g id="proc~~repelem~~CalledByGraph_edge57" class="edge">
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
+<path fill="none" stroke="#ffff00" d="M256.76,-790.04C280.35,-798.74 313.42,-810.42 343,-819 350.74,-821.25 358.9,-823.42 367.03,-825.47"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="366.34,-828.9 376.88,-827.9 368.01,-822.11 366.34,-828.9"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
-<g id="proc~~repelem~~CalledByGraph_edge60" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#00ff24" d="M279.25,-1321.23C297.02,-1322.94 317.32,-1324.9 337.21,-1326.82"/>
-<polygon fill="#00ff24" stroke="#00ff24" points="336.94,-1330.31 347.23,-1327.78 337.62,-1323.34 336.94,-1330.31"/>
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
+<g id="proc~~repelem~~CalledByGraph_edge61" class="edge">
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
+<path fill="none" stroke="#00ff48" d="M279.25,-783.23C297.02,-784.94 317.32,-786.9 337.21,-788.82"/>
+<polygon fill="#00ff48" stroke="#00ff48" points="336.94,-792.31 347.23,-789.78 337.62,-785.34 336.94,-792.31"/>
 </g>
 <!-- program~example_nurbs_curve -->
 <g id="proc~~repelem~~CalledByGraph_node44" class="node">
 <title>program~example_nurbs_curve</title>
 <g id="a_proc~~repelem~~CalledByGraph_node44"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-230 369,-230 369,-206 498,-206 498,-230"/>
-<text text-anchor="middle" x="433.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-1432 369,-1432 369,-1408 498,-1408 498,-1432"/>
+<text text-anchor="middle" x="433.5" y="-1417.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;none~set~3 -->
-<g id="proc~~repelem~~CalledByGraph_edge48" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M493.21,-230.08C503.56,-232.69 514.17,-235.68 524,-239 544.04,-245.77 565.67,-255.35 582.86,-263.55"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="581.39,-266.72 591.92,-267.93 584.44,-260.42 581.39,-266.72"/>
+<!-- program~example_nurbs_curve&#45;&gt;none~set -->
+<g id="proc~~repelem~~CalledByGraph_edge19" class="edge">
+<title>program~example_nurbs_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M498.06,-1427.37C516.54,-1429.52 536.66,-1431.85 554.95,-1433.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="554.56,-1437.45 564.9,-1435.13 555.37,-1430.5 554.56,-1437.45"/>
 </g>
 <!-- program~example_nurbs_surface -->
 <g id="proc~~repelem~~CalledByGraph_node45" class="node">
 <title>program~example_nurbs_surface</title>
 <g id="a_proc~~repelem~~CalledByGraph_node45"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-604 364,-604 364,-580 503,-580 503,-604"/>
-<text text-anchor="middle" x="433.5" y="-589.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-66 364,-66 364,-42 503,-42 503,-66"/>
+<text text-anchor="middle" x="433.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;none~set~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge35" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M503.19,-600.98C510.72,-603.97 517.87,-607.89 524,-613 583.28,-662.44 605.27,-757.64 612.44,-800.78"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="609,-801.45 613.99,-810.8 615.92,-800.38 609,-801.45"/>
+<!-- program~example_nurbs_surface&#45;&gt;none~set~3 -->
+<g id="proc~~repelem~~CalledByGraph_edge48" class="edge">
+<title>program~example_nurbs_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#0000ff" d="M503.36,-62.78C510.86,-65.81 517.96,-69.79 524,-75 588.41,-130.59 607.88,-237.64 613.43,-283.86"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="609.97,-284.43 614.54,-293.99 616.93,-283.67 609.97,-284.43"/>
 </g>
 <!-- program~example_nurbs_volume -->
 <g id="proc~~repelem~~CalledByGraph_node46" class="node">
 <title>program~example_nurbs_volume</title>
 <g id="a_proc~~repelem~~CalledByGraph_node46"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-1596 364,-1596 364,-1572 503,-1572 503,-1596"/>
-<text text-anchor="middle" x="433.5" y="-1581.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-1058 364,-1058 364,-1034 503,-1034 503,-1058"/>
+<text text-anchor="middle" x="433.5" y="-1043.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;none~set -->
-<g id="proc~~repelem~~CalledByGraph_edge20" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.17,-1574.25C510.62,-1571.38 517.76,-1567.71 524,-1563 572.36,-1526.53 598.72,-1456.62 609.54,-1421.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="612.98,-1421.72 612.41,-1411.14 606.26,-1419.77 612.98,-1421.72"/>
+<!-- program~example_nurbs_volume&#45;&gt;none~set~2 -->
+<g id="proc~~repelem~~CalledByGraph_edge33" class="edge">
+<title>program~example_nurbs_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#00ff00" d="M503.36,-1035.7C510.69,-1032.93 517.75,-1029.43 524,-1025 567.44,-994.25 595.13,-935.72 607.67,-903.91"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="611.07,-904.82 611.34,-894.23 604.52,-902.33 611.07,-904.82"/>
 </g>
 <!-- program~example_put_to_nurbs -->
 <g id="proc~~repelem~~CalledByGraph_node47" class="node">
 <title>program~example_put_to_nurbs</title>
 <g id="a_proc~~repelem~~CalledByGraph_node47"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-1554 367.5,-1554 367.5,-1530 499.5,-1530 499.5,-1554"/>
-<text text-anchor="middle" x="433.5" y="-1539.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-1016 367.5,-1016 367.5,-992 499.5,-992 499.5,-1016"/>
+<text text-anchor="middle" x="433.5" y="-1001.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;none~set -->
-<g id="proc~~repelem~~CalledByGraph_edge21" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.79,-1532.37C508.33,-1529.51 516.65,-1525.8 524,-1521 562.69,-1495.72 591.16,-1448.19 605.36,-1420.51"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="608.62,-1421.8 609.94,-1411.29 602.35,-1418.69 608.62,-1421.8"/>
+<!-- program~example_put_to_nurbs&#45;&gt;none~set~2 -->
+<g id="proc~~repelem~~CalledByGraph_edge34" class="edge">
+<title>program~example_put_to_nurbs&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#00ff00" d="M499.86,-993.58C508.3,-990.84 516.58,-987.38 524,-983 558.19,-962.85 586.86,-925.74 602.56,-902.55"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="605.54,-904.4 608.11,-894.13 599.69,-900.55 605.54,-904.4"/>
 </g>
 <!-- program~nearest_point_1d -->
 <g id="proc~~repelem~~CalledByGraph_node48" class="node">
 <title>program~nearest_point_1d</title>
 <g id="a_proc~~repelem~~CalledByGraph_node48"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-188 382,-188 382,-164 485,-164 485,-188"/>
-<text text-anchor="middle" x="433.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-1390 382,-1390 382,-1366 485,-1366 485,-1390"/>
+<text text-anchor="middle" x="433.5" y="-1375.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;none~set~3 -->
-<g id="proc~~repelem~~CalledByGraph_edge49" class="edge">
-<title>program~nearest_point_1d&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#0000ff" d="M485.34,-183.26C498.41,-186.36 512.13,-190.77 524,-197 554.1,-212.81 582.01,-240.87 598.9,-259.94"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="596.46,-262.47 605.65,-267.75 601.76,-257.9 596.46,-262.47"/>
+<!-- program~nearest_point_1d&#45;&gt;none~set -->
+<g id="proc~~repelem~~CalledByGraph_edge20" class="edge">
+<title>program~nearest_point_1d&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M485.18,-1388.03C497.99,-1391.07 511.62,-1394.75 524,-1399 544.37,-1405.99 566.32,-1415.97 583.62,-1424.46"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="582.2,-1427.66 592.71,-1428.99 585.32,-1421.39 582.2,-1427.66"/>
 </g>
 <!-- program~nearest_point_2d -->
 <g id="proc~~repelem~~CalledByGraph_node49" class="node">
 <title>program~nearest_point_2d</title>
 <g id="a_proc~~repelem~~CalledByGraph_node49"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-562 382,-562 382,-538 485,-538 485,-562"/>
-<text text-anchor="middle" x="433.5" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-24 382,-24 382,0 485,0 485,-24"/>
+<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;none~set~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge36" class="edge">
-<title>program~nearest_point_2d&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#00ff00" d="M485.05,-553C499.01,-556.03 513.26,-561.46 524,-571 593.4,-632.67 610.2,-751.22 614.24,-800.58"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="610.76,-801.07 614.97,-810.79 617.75,-800.57 610.76,-801.07"/>
+<!-- program~nearest_point_2d&#45;&gt;none~set~3 -->
+<g id="proc~~repelem~~CalledByGraph_edge49" class="edge">
+<title>program~nearest_point_2d&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#0000ff" d="M485.2,-14.84C499.17,-17.86 513.38,-23.33 524,-33 598.53,-100.9 612.42,-231.28 614.96,-283.53"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="611.47,-283.86 615.35,-293.71 618.46,-283.58 611.47,-283.86"/>
 </g>
 <!-- program~nearest_point_3d -->
 <g id="proc~~repelem~~CalledByGraph_node50" class="node">
 <title>program~nearest_point_3d</title>
 <g id="a_proc~~repelem~~CalledByGraph_node50"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-1512 382,-1512 382,-1488 485,-1488 485,-1512"/>
-<text text-anchor="middle" x="433.5" y="-1497.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-974 382,-974 382,-950 485,-950 485,-974"/>
+<text text-anchor="middle" x="433.5" y="-959.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;none~set -->
-<g id="proc~~repelem~~CalledByGraph_edge22" class="edge">
-<title>program~nearest_point_3d&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M485.13,-1489.14C498.2,-1485.31 511.97,-1480.33 524,-1474 551.9,-1459.31 579.23,-1435.27 596.65,-1418.38"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="599.28,-1420.7 603.93,-1411.18 594.36,-1415.73 599.28,-1420.7"/>
-</g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge51" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ff2400" d="M299.03,-1050C317.98,-1050 338.36,-1050 357.36,-1050"/>
-<polygon fill="#ff2400" stroke="#ff2400" points="357.45,-1053.5 367.45,-1050 357.45,-1046.5 357.45,-1053.5"/>
+<!-- program~nearest_point_3d&#45;&gt;none~set~2 -->
+<g id="proc~~repelem~~CalledByGraph_edge35" class="edge">
+<title>program~nearest_point_3d&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#00ff00" d="M484.05,-950C497.27,-946.16 511.38,-941.46 524,-936 547.07,-926.03 571.5,-911.38 589.31,-899.85"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="591.55,-902.57 597.98,-894.15 587.7,-896.72 591.55,-902.57"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
 <g id="proc~~repelem~~CalledByGraph_edge52" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#ff4800" d="M299.03,-12C319.64,-12 341.96,-12 362.34,-12"/>
-<polygon fill="#ff4800" stroke="#ff4800" points="362.49,-15.5 372.49,-12 362.49,-8.5 362.49,-15.5"/>
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#ff4800" d="M299.03,-512C317.98,-512 338.36,-512 357.36,-512"/>
+<polygon fill="#ff4800" stroke="#ff4800" points="357.45,-515.5 367.45,-512 357.45,-508.5 357.45,-515.5"/>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="proc~~repelem~~CalledByGraph_edge50" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.01,-1420C323.61,-1420 341,-1420 357.35,-1420"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="357.38,-1423.5 367.38,-1420 357.38,-1416.5 357.38,-1423.5"/>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M299.03,-1214C319.64,-1214 341.96,-1214 362.34,-1214"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="362.49,-1217.5 372.49,-1214 362.49,-1210.5 362.49,-1217.5"/>
+</g>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~repelem~~CalledByGraph_edge51" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ff2400" d="M307.01,-882C323.61,-882 341,-882 357.35,-882"/>
+<polygon fill="#ff2400" stroke="#ff2400" points="357.38,-885.5 367.38,-882 357.38,-878.5 357.38,-885.5"/>
 </g>
 <!-- program~example_ppm1 -->
 <g id="proc~~repelem~~CalledByGraph_node54" class="node">
 <title>program~example_ppm1</title>
 <g id="a_proc~~repelem~~CalledByGraph_node54"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-772 177,-772 177,-748 271,-748 271,-772"/>
-<text text-anchor="middle" x="224" y="-757.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-234 177,-234 177,-210 271,-210 271,-234"/>
+<text text-anchor="middle" x="224" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
 </a>
 </g>
 </g>
 <!-- program~example_ppm1&#45;&gt;proc~set_ring~2 -->
 <g id="proc~~repelem~~CalledByGraph_edge73" class="edge">
 <title>program~example_ppm1&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#0024ff" d="M271.05,-750.68C298.08,-745.21 332.78,-738.18 363.07,-732.05"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="364.05,-735.43 373.16,-730.01 362.66,-728.56 364.05,-735.43"/>
+<path fill="none" stroke="#0024ff" d="M271.05,-212.68C298.08,-207.21 332.78,-200.18 363.07,-194.05"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="364.05,-197.43 373.16,-192.01 362.66,-190.56 364.05,-197.43"/>
 </g>
 <!-- program~example_ppm1&#45;&gt;proc~set_tetragon -->
 <g id="proc~~repelem~~CalledByGraph_edge75" class="edge">
 <title>program~example_ppm1&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0000ff" d="M271.05,-760C291.74,-760 316.91,-760 341.16,-760"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="341.49,-763.5 351.49,-760 341.49,-756.5 341.49,-763.5"/>
+<path fill="none" stroke="#0000ff" d="M271.05,-222C291.74,-222 316.91,-222 341.16,-222"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="341.49,-225.5 351.49,-222 341.49,-218.5 341.49,-225.5"/>
 </g>
 <!-- program~example_ppm2 -->
 <g id="proc~~repelem~~CalledByGraph_node55" class="node">
 <title>program~example_ppm2</title>
 <g id="a_proc~~repelem~~CalledByGraph_node55"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-688 177,-688 177,-664 271,-664 271,-688"/>
-<text text-anchor="middle" x="224" y="-673.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-150 177,-150 177,-126 271,-126 271,-150"/>
+<text text-anchor="middle" x="224" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
 </a>
 </g>
 </g>
 <!-- program~example_ppm2&#45;&gt;proc~set_half_ring~2 -->
 <g id="proc~~repelem~~CalledByGraph_edge69" class="edge">
 <title>program~example_ppm2&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#0091ff" d="M271.05,-676C291.53,-676 316.4,-676 340.43,-676"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="340.66,-679.5 350.66,-676 340.66,-672.5 340.66,-679.5"/>
+<path fill="none" stroke="#0091ff" d="M271.05,-138C291.53,-138 316.4,-138 340.43,-138"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="340.66,-141.5 350.66,-138 340.66,-134.5 340.66,-141.5"/>
 </g>
 <!-- program~example_ppm2&#45;&gt;proc~set_tetragon -->
 <g id="proc~~repelem~~CalledByGraph_edge76" class="edge">
 <title>program~example_ppm2&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0000ff" d="M271.26,-682.65C283.49,-685.76 296.27,-690.32 307,-697 327.88,-709.99 321.99,-726.23 343,-739 346.02,-740.84 349.19,-742.52 352.47,-744.05"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="351.33,-747.36 361.91,-747.98 354.02,-740.9 351.33,-747.36"/>
+<path fill="none" stroke="#0000ff" d="M271.26,-144.65C283.49,-147.76 296.27,-152.32 307,-159 327.88,-171.99 321.99,-188.23 343,-201 346.02,-202.84 349.19,-204.52 352.47,-206.05"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="351.33,-209.36 361.91,-209.98 354.02,-202.9 351.33,-209.36"/>
 </g>
 <!-- program~example_ppm3 -->
 <g id="proc~~repelem~~CalledByGraph_node56" class="node">
 <title>program~example_ppm3</title>
 <g id="a_proc~~repelem~~CalledByGraph_node56"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-898 177,-898 177,-874 271,-874 271,-898"/>
-<text text-anchor="middle" x="224" y="-883.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-360 177,-360 177,-336 271,-336 271,-360"/>
+<text text-anchor="middle" x="224" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
 <g id="proc~~repelem~~CalledByGraph_edge59" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#24ff00" d="M271.26,-879.35C283.49,-876.24 296.27,-871.68 307,-865 327.88,-852.01 321.99,-835.77 343,-823 346.02,-821.16 349.19,-819.48 352.47,-817.95"/>
-<polygon fill="#24ff00" stroke="#24ff00" points="354.02,-821.1 361.91,-814.02 351.33,-814.64 354.02,-821.1"/>
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M271.26,-341.35C283.49,-338.24 296.27,-333.68 307,-327 327.88,-314.01 321.99,-297.77 343,-285 346.02,-283.16 349.19,-281.48 352.47,-279.95"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="354.02,-283.1 361.91,-276.02 351.33,-276.64 354.02,-283.1"/>
 </g>
 <!-- program~example_ppm3&#45;&gt;proc~set_tetragon -->
 <g id="proc~~repelem~~CalledByGraph_edge77" class="edge">
 <title>program~example_ppm3&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0000ff" d="M271.05,-881.81C283.84,-878.75 296.96,-873.6 307,-865 337.85,-838.58 311.89,-807.11 343,-781 344.56,-779.69 346.18,-778.46 347.87,-777.31"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="349.85,-780.2 356.69,-772.12 346.3,-774.17 349.85,-780.2"/>
+<path fill="none" stroke="#0000ff" d="M271.05,-343.81C283.84,-340.75 296.96,-335.6 307,-327 337.85,-300.58 311.89,-269.11 343,-243 344.56,-241.69 346.18,-240.46 347.87,-239.31"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="349.85,-242.2 356.69,-234.12 346.3,-236.17 349.85,-242.2"/>
 </g>
 <!-- program~nearest_point_2d_bench -->
 <g id="proc~~repelem~~CalledByGraph_node57" class="node">
 <title>program~nearest_point_2d_bench</title>
 <g id="a_proc~~repelem~~CalledByGraph_node57"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="295,-856 153,-856 153,-832 295,-832 295,-856"/>
-<text text-anchor="middle" x="224" y="-841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="295,-318 153,-318 153,-294 295,-294 295,-318"/>
+<text text-anchor="middle" x="224" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
 </a>
 </g>
 </g>
 <!-- program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon -->
 <g id="proc~~repelem~~CalledByGraph_edge78" class="edge">
 <title>program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0000ff" d="M288.42,-832C294.93,-829.54 301.26,-826.57 307,-823 327.88,-810.01 321.99,-793.77 343,-781 346.02,-779.16 349.19,-777.48 352.47,-775.95"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="354.02,-779.1 361.91,-772.02 351.33,-772.64 354.02,-779.1"/>
+<path fill="none" stroke="#0000ff" d="M288.42,-294C294.93,-291.54 301.26,-288.57 307,-285 327.88,-272.01 321.99,-255.77 343,-243 346.02,-241.16 349.19,-239.48 352.47,-237.95"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="354.02,-241.1 361.91,-234.02 351.33,-234.64 354.02,-241.1"/>
 </g>
 <!-- program~shape_c_1d -->
 <g id="proc~~repelem~~CalledByGraph_node58" class="node">
 <title>program~shape_c_1d</title>
 <g id="a_proc~~repelem~~CalledByGraph_node58"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-478 186,-478 186,-454 262,-454 262,-478"/>
-<text text-anchor="middle" x="224" y="-463.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-1722 186,-1722 186,-1698 262,-1698 262,-1722"/>
+<text text-anchor="middle" x="224" y="-1707.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~set_c~3 -->
-<g id="proc~~repelem~~CalledByGraph_edge66" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~set_c~3</title>
-<path fill="none" stroke="#00ffff" d="M262.1,-466C290.62,-466 330.8,-466 364.98,-466"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="365.38,-469.5 375.38,-466 365.37,-462.5 365.38,-469.5"/>
+<!-- program~shape_c_1d&#45;&gt;proc~set_c -->
+<g id="proc~~repelem~~CalledByGraph_edge63" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~set_c</title>
+<path fill="none" stroke="#00ff91" d="M262.1,-1710C290.62,-1710 330.8,-1710 364.98,-1710"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="365.38,-1713.5 375.38,-1710 365.37,-1706.5 365.38,-1713.5"/>
 </g>
 <!-- program~shape_c_2d -->
 <g id="proc~~repelem~~CalledByGraph_node59" class="node">
 <title>program~shape_c_2d</title>
 <g id="a_proc~~repelem~~CalledByGraph_node59"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-604 186,-604 186,-580 262,-580 262,-604"/>
-<text text-anchor="middle" x="224" y="-589.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-66 186,-66 186,-42 262,-42 262,-66"/>
+<text text-anchor="middle" x="224" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~set_c~2 -->
-<g id="proc~~repelem~~CalledByGraph_edge65" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~set_c~2</title>
-<path fill="none" stroke="#00ffda" d="M262.1,-599.51C290.11,-605.18 329.36,-613.12 363.13,-619.96"/>
-<polygon fill="#00ffda" stroke="#00ffda" points="362.46,-623.39 372.95,-621.95 363.85,-616.53 362.46,-623.39"/>
+<!-- program~shape_c_2d&#45;&gt;proc~set_c~3 -->
+<g id="proc~~repelem~~CalledByGraph_edge66" class="edge">
+<title>program~shape_c_2d&#45;&gt;proc~set_c~3</title>
+<path fill="none" stroke="#00ffff" d="M262.1,-61.51C290.11,-67.18 329.36,-75.12 363.13,-81.96"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="362.46,-85.39 372.95,-83.95 363.85,-78.53 362.46,-85.39"/>
 </g>
 <!-- program~shape_c_3d -->
 <g id="proc~~repelem~~CalledByGraph_node60" class="node">
 <title>program~shape_c_3d</title>
 <g id="a_proc~~repelem~~CalledByGraph_node60"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-1142 186,-1142 186,-1118 262,-1118 262,-1142"/>
-<text text-anchor="middle" x="224" y="-1127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-604 186,-604 186,-580 262,-580 262,-604"/>
+<text text-anchor="middle" x="224" y="-589.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~set_c -->
-<g id="proc~~repelem~~CalledByGraph_edge63" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~set_c</title>
-<path fill="none" stroke="#00ff91" d="M262.1,-1130C289.25,-1130 326.96,-1130 360,-1130"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="360.09,-1133.5 370.09,-1130 360.09,-1126.5 360.09,-1133.5"/>
+<!-- program~shape_c_3d&#45;&gt;proc~set_c~2 -->
+<g id="proc~~repelem~~CalledByGraph_edge65" class="edge">
+<title>program~shape_c_3d&#45;&gt;proc~set_c~2</title>
+<path fill="none" stroke="#00ffda" d="M262.1,-592C289.25,-592 326.96,-592 360,-592"/>
+<polygon fill="#00ffda" stroke="#00ffda" points="360.09,-595.5 370.09,-592 360.09,-588.5 360.09,-595.5"/>
 </g>
 <!-- program~shape_circle -->
 <g id="proc~~repelem~~CalledByGraph_node61" class="node">
 <title>program~shape_circle</title>
 <g id="a_proc~~repelem~~CalledByGraph_node61"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="263.5,-520 184.5,-520 184.5,-496 263.5,-496 263.5,-520"/>
-<text text-anchor="middle" x="224" y="-505.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="263.5,-1680 184.5,-1680 184.5,-1656 263.5,-1656 263.5,-1680"/>
+<text text-anchor="middle" x="224" y="-1665.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
 <!-- program~shape_circle&#45;&gt;proc~set_circle -->
 <g id="proc~~repelem~~CalledByGraph_edge64" class="edge">
 <title>program~shape_circle&#45;&gt;proc~set_circle</title>
-<path fill="none" stroke="#00ffb6" d="M263.54,-508C289.03,-508 323.33,-508 354.38,-508"/>
-<polygon fill="#00ffb6" stroke="#00ffb6" points="354.76,-511.5 364.76,-508 354.76,-504.5 354.76,-511.5"/>
+<path fill="none" stroke="#00ffb6" d="M263.54,-1668C289.03,-1668 323.33,-1668 354.38,-1668"/>
+<polygon fill="#00ffb6" stroke="#00ffb6" points="354.76,-1671.5 364.76,-1668 354.76,-1664.5 354.76,-1671.5"/>
 </g>
 <!-- program~shape_half_circle -->
 <g id="proc~~repelem~~CalledByGraph_node62" class="node">
 <title>program~shape_half_circle</title>
 <g id="a_proc~~repelem~~CalledByGraph_node62"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="276,-352 172,-352 172,-328 276,-328 276,-352"/>
-<text text-anchor="middle" x="224" y="-337.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="276,-1554 172,-1554 172,-1530 276,-1530 276,-1554"/>
+<text text-anchor="middle" x="224" y="-1539.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
 <!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
 <g id="proc~~repelem~~CalledByGraph_edge67" class="edge">
 <title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
-<path fill="none" stroke="#00daff" d="M276.03,-340C295.8,-340 319.05,-340 341.49,-340"/>
-<polygon fill="#00daff" stroke="#00daff" points="341.73,-343.5 351.73,-340 341.73,-336.5 341.73,-343.5"/>
+<path fill="none" stroke="#00daff" d="M276.03,-1542C295.8,-1542 319.05,-1542 341.49,-1542"/>
+<polygon fill="#00daff" stroke="#00daff" points="341.73,-1545.5 351.73,-1542 341.73,-1538.5 341.73,-1545.5"/>
 </g>
 <!-- program~shape_half_ring_2d -->
 <g id="proc~~repelem~~CalledByGraph_node63" class="node">
 <title>program~shape_half_ring_2d</title>
 <g id="a_proc~~repelem~~CalledByGraph_node63"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-646 166.5,-646 166.5,-622 281.5,-622 281.5,-646"/>
-<text text-anchor="middle" x="224" y="-631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-108 166.5,-108 166.5,-84 281.5,-84 281.5,-108"/>
+<text text-anchor="middle" x="224" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
 </a>
 </g>
 </g>
 <!-- program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2 -->
 <g id="proc~~repelem~~CalledByGraph_edge70" class="edge">
 <title>program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#0091ff" d="M281.7,-645.48C306.81,-650.56 336.59,-656.59 363.02,-661.94"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="362.47,-665.4 372.97,-663.95 363.86,-658.54 362.47,-665.4"/>
+<path fill="none" stroke="#0091ff" d="M281.7,-107.48C306.81,-112.56 336.59,-118.59 363.02,-123.94"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="362.47,-127.4 372.97,-125.95 363.86,-120.54 362.47,-127.4"/>
 </g>
 <!-- program~shape_half_ring_3d -->
 <g id="proc~~repelem~~CalledByGraph_node64" class="node">
 <title>program~shape_half_ring_3d</title>
 <g id="a_proc~~repelem~~CalledByGraph_node64"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-1722 166.5,-1722 166.5,-1698 281.5,-1698 281.5,-1722"/>
-<text text-anchor="middle" x="224" y="-1707.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-1184 166.5,-1184 166.5,-1160 281.5,-1160 281.5,-1184"/>
+<text text-anchor="middle" x="224" y="-1169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
 <!-- program~shape_half_ring_3d&#45;&gt;proc~set_half_ring -->
 <g id="proc~~repelem~~CalledByGraph_edge68" class="edge">
 <title>program~shape_half_ring_3d&#45;&gt;proc~set_half_ring</title>
-<path fill="none" stroke="#00b6ff" d="M281.7,-1710C299.97,-1710 320.71,-1710 340.84,-1710"/>
-<polygon fill="#00b6ff" stroke="#00b6ff" points="340.97,-1713.5 350.97,-1710 340.97,-1706.5 340.97,-1713.5"/>
+<path fill="none" stroke="#00b6ff" d="M281.7,-1172C299.97,-1172 320.71,-1172 340.84,-1172"/>
+<polygon fill="#00b6ff" stroke="#00b6ff" points="340.97,-1175.5 350.97,-1172 340.97,-1168.5 340.97,-1175.5"/>
 </g>
 <!-- program~shape_hexahedron -->
 <g id="proc~~repelem~~CalledByGraph_node65" class="node">
 <title>program~shape_hexahedron</title>
 <g id="a_proc~~repelem~~CalledByGraph_node65"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-1680 167.5,-1680 167.5,-1656 280.5,-1656 280.5,-1680"/>
-<text text-anchor="middle" x="224" y="-1665.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-1142 167.5,-1142 167.5,-1118 280.5,-1118 280.5,-1142"/>
+<text text-anchor="middle" x="224" y="-1127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
 <!-- program~shape_hexahedron&#45;&gt;proc~set_hexahedron -->
 <g id="proc~~repelem~~CalledByGraph_edge71" class="edge">
 <title>program~shape_hexahedron&#45;&gt;proc~set_hexahedron</title>
-<path fill="none" stroke="#006dff" d="M280.61,-1668C296.56,-1668 314.47,-1668 332.24,-1668"/>
-<polygon fill="#006dff" stroke="#006dff" points="332.67,-1671.5 342.67,-1668 332.67,-1664.5 332.67,-1671.5"/>
+<path fill="none" stroke="#006dff" d="M280.61,-1130C296.56,-1130 314.47,-1130 332.24,-1130"/>
+<polygon fill="#006dff" stroke="#006dff" points="332.67,-1133.5 342.67,-1130 332.67,-1126.5 332.67,-1133.5"/>
 </g>
 <!-- program~shape_ring_2d -->
 <g id="proc~~repelem~~CalledByGraph_node66" class="node">
 <title>program~shape_ring_2d</title>
 <g id="a_proc~~repelem~~CalledByGraph_node66"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-730 179,-730 179,-706 269,-706 269,-730"/>
-<text text-anchor="middle" x="224" y="-715.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-192 179,-192 179,-168 269,-168 269,-192"/>
+<text text-anchor="middle" x="224" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
 </a>
 </g>
 </g>
 <!-- program~shape_ring_2d&#45;&gt;proc~set_ring~2 -->
 <g id="proc~~repelem~~CalledByGraph_edge74" class="edge">
 <title>program~shape_ring_2d&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#0024ff" d="M269.01,-718C293.59,-718 324.96,-718 353.63,-718"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="353.65,-721.5 363.65,-718 353.65,-714.5 353.65,-721.5"/>
+<path fill="none" stroke="#0024ff" d="M269.01,-180C293.59,-180 324.96,-180 353.63,-180"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="353.65,-183.5 363.65,-180 353.65,-176.5 353.65,-183.5"/>
 </g>
 <!-- program~shape_ring_3d -->
 <g id="proc~~repelem~~CalledByGraph_node67" class="node">
 <title>program~shape_ring_3d</title>
 <g id="a_proc~~repelem~~CalledByGraph_node67"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-1638 179,-1638 179,-1614 269,-1614 269,-1638"/>
-<text text-anchor="middle" x="224" y="-1623.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-1100 179,-1100 179,-1076 269,-1076 269,-1100"/>
+<text text-anchor="middle" x="224" y="-1085.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
 <!-- program~shape_ring_3d&#45;&gt;proc~set_ring -->
 <g id="proc~~repelem~~CalledByGraph_edge72" class="edge">
 <title>program~shape_ring_3d&#45;&gt;proc~set_ring</title>
-<path fill="none" stroke="#0048ff" d="M269.01,-1626C293.59,-1626 324.96,-1626 353.63,-1626"/>
-<polygon fill="#0048ff" stroke="#0048ff" points="353.65,-1629.5 363.65,-1626 353.65,-1622.5 353.65,-1629.5"/>
+<path fill="none" stroke="#0048ff" d="M269.01,-1088C293.59,-1088 324.96,-1088 353.63,-1088"/>
+<polygon fill="#0048ff" stroke="#0048ff" points="353.65,-1091.5 363.65,-1088 353.65,-1084.5 353.65,-1091.5"/>
 </g>
 <!-- program~shape_tetragon -->
 <g id="proc~~repelem~~CalledByGraph_node68" class="node">
 <title>program~shape_tetragon</title>
 <g id="a_proc~~repelem~~CalledByGraph_node68"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-814 176,-814 176,-790 272,-790 272,-814"/>
-<text text-anchor="middle" x="224" y="-799.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272,-276 176,-276 176,-252 272,-252 272,-276"/>
+<text text-anchor="middle" x="224" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
 </a>
 </g>
 </g>
 <!-- program~shape_tetragon&#45;&gt;proc~set_tetragon -->
 <g id="proc~~repelem~~CalledByGraph_edge79" class="edge">
 <title>program~shape_tetragon&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0000ff" d="M272.08,-792.47C298.94,-787.03 333.11,-780.12 363,-774.07"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="363.85,-777.47 372.96,-772.05 362.46,-770.61 363.85,-777.47"/>
+<path fill="none" stroke="#0000ff" d="M272.08,-254.47C298.94,-249.03 333.11,-242.12 363,-236.07"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="363.85,-239.47 372.96,-234.05 362.46,-232.61 363.85,-239.47"/>
 </g>
 </g>
 </svg>
@@ -1430,7 +1430,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/rotate_xc.html b/proc/rotate_xc.html
index 7299d3dc1..11825cfd9 100644
--- a/proc/rotate_xc.html
+++ b/proc/rotate_xc.html
@@ -83,15 +83,15 @@ <h1>rotate_Xc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">rotate_Xc</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine rotate_Xc(this, alpha, beta, theta)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~53"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~52"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -203,7 +203,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-theta"></span>
+              <span class="anchor" id="variable-theta~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -231,55 +231,55 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~rotate_xc~~CallsGraph Pages: 1 -->
-<svg id="procrotate_xcCallsGraph" width="336pt" height="74pt"
- viewBox="0.00 0.00 336.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procrotate_xcCallsGraph" width="326pt" height="74pt"
+ viewBox="0.00 0.00 326.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~rotate_xc~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~rotate_xc~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 332,-70 332,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 322,-70 322,4 -4,4"/>
 <!-- proc~rotate_xc -->
 <g id="proc~~rotate_xc~~CallsGraph_node1" class="node">
 <title>proc~rotate_xc</title>
-<polygon fill="none" stroke="black" points="148,-45 0,-45 0,-21 148,-21 148,-45"/>
-<text text-anchor="middle" x="74" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%rotate_Xc</text>
+<polygon fill="none" stroke="black" points="138,-45 0,-45 0,-21 138,-21 138,-45"/>
+<text text-anchor="middle" x="69" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%rotate_Xc</text>
 </g>
 <!-- proc~rotation -->
 <g id="proc~~rotate_xc~~CallsGraph_node2" class="node">
 <title>proc~rotation</title>
 <g id="a_proc~~rotate_xc~~CallsGraph_node2"><a xlink:href="../proc/rotation.html" xlink:title="rotation">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="238,-45 184,-45 184,-21 238,-21 238,-45"/>
-<text text-anchor="middle" x="211" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rotation</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="228,-45 174,-45 174,-21 228,-21 228,-45"/>
+<text text-anchor="middle" x="201" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rotation</text>
 </a>
 </g>
 </g>
 <!-- proc~rotate_xc&#45;&gt;proc~rotation -->
 <g id="proc~~rotate_xc~~CallsGraph_edge1" class="edge">
 <title>proc~rotate_xc&#45;&gt;proc~rotation</title>
-<path fill="none" stroke="#ff0000" d="M148.03,-33C156.93,-33 165.7,-33 173.72,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="173.77,-36.5 183.77,-33 173.77,-29.5 173.77,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M138.05,-33C146.93,-33 155.74,-33 163.81,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="163.93,-36.5 173.93,-33 163.93,-29.5 163.93,-36.5"/>
 </g>
 <!-- cosd -->
 <g id="proc~~rotate_xc~~CallsGraph_node3" class="node">
 <title>cosd</title>
-<polygon fill="#777777" stroke="#777777" points="328,-66 274,-66 274,-42 328,-42 328,-66"/>
-<text text-anchor="middle" x="301" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cosd</text>
+<polygon fill="#777777" stroke="#777777" points="318,-66 264,-66 264,-42 318,-42 318,-66"/>
+<text text-anchor="middle" x="291" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cosd</text>
 </g>
 <!-- proc~rotation&#45;&gt;cosd -->
 <g id="proc~~rotate_xc~~CallsGraph_edge2" class="edge">
 <title>proc~rotation&#45;&gt;cosd</title>
-<path fill="none" stroke="#ff0000" d="M238.4,-39.3C246.48,-41.23 255.51,-43.38 264.1,-45.43"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="263.38,-48.86 273.92,-47.78 265,-42.05 263.38,-48.86"/>
+<path fill="none" stroke="#ff0000" d="M228.4,-39.3C236.48,-41.23 245.51,-43.38 254.1,-45.43"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="253.38,-48.86 263.92,-47.78 255,-42.05 253.38,-48.86"/>
 </g>
 <!-- sind -->
 <g id="proc~~rotate_xc~~CallsGraph_node4" class="node">
 <title>sind</title>
-<polygon fill="#777777" stroke="#777777" points="328,-24 274,-24 274,0 328,0 328,-24"/>
-<text text-anchor="middle" x="301" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">sind</text>
+<polygon fill="#777777" stroke="#777777" points="318,-24 264,-24 264,0 318,0 318,-24"/>
+<text text-anchor="middle" x="291" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">sind</text>
 </g>
 <!-- proc~rotation&#45;&gt;sind -->
 <g id="proc~~rotate_xc~~CallsGraph_edge3" class="edge">
 <title>proc~rotation&#45;&gt;sind</title>
-<path fill="none" stroke="#ff0000" d="M238.4,-26.7C246.48,-24.77 255.51,-22.62 264.1,-20.57"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="265,-23.95 273.92,-18.22 263.38,-17.14 265,-23.95"/>
+<path fill="none" stroke="#ff0000" d="M228.4,-26.7C236.48,-24.77 245.51,-22.62 254.1,-20.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="255,-23.95 263.92,-18.22 253.38,-17.14 255,-23.95"/>
 </g>
 </g>
 </svg>
@@ -375,31 +375,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~rotate_xc~~CalledByGraph Pages: 1 -->
-<svg id="procrotate_xcCalledByGraph" width="302pt" height="32pt"
- viewBox="0.00 0.00 302.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procrotate_xcCalledByGraph" width="282pt" height="32pt"
+ viewBox="0.00 0.00 282.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~rotate_xc~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~rotate_xc~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 298,-28 298,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 278,-28 278,4 -4,4"/>
 <!-- proc~rotate_xc -->
 <g id="proc~~rotate_xc~~CalledByGraph_node1" class="node">
 <title>proc~rotate_xc</title>
-<polygon fill="none" stroke="black" points="294,-24 146,-24 146,0 294,0 294,-24"/>
-<text text-anchor="middle" x="220" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%rotate_Xc</text>
+<polygon fill="none" stroke="black" points="274,-24 136,-24 136,0 274,0 274,-24"/>
+<text text-anchor="middle" x="205" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%rotate_Xc</text>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example1_curve -->
 <g id="proc~~rotate_xc~~CalledByGraph_node2" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~rotate_xc~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~rotate_xc~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="100,-24 0,-24 0,0 100,0 100,-24"/>
+<text text-anchor="middle" x="50" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~rotate_xc -->
+<!-- program~example1_curve&#45;&gt;proc~rotate_xc -->
 <g id="proc~~rotate_xc~~CalledByGraph_edge1" class="edge">
-<title>program~example3_volume&#45;&gt;proc~rotate_xc</title>
-<path fill="none" stroke="#ff0000" d="M110.28,-12C118.46,-12 127.07,-12 135.69,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.81,-15.5 145.81,-12 135.81,-8.5 135.81,-15.5"/>
+<title>program~example1_curve&#45;&gt;proc~rotate_xc</title>
+<path fill="none" stroke="#ff0000" d="M100.25,-12C108.41,-12 117.05,-12 125.72,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="125.89,-15.5 135.89,-12 125.89,-8.5 125.89,-15.5"/>
 </g>
 </g>
 </svg>
@@ -515,7 +515,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/rotate_xc~2.html b/proc/rotate_xc~2.html
index 15c60c21a..aaea9be2d 100644
--- a/proc/rotate_xc~2.html
+++ b/proc/rotate_xc~2.html
@@ -83,15 +83,15 @@ <h1>rotate_Xc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">rotate_Xc</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine rotate_Xc(this, alpha, beta, theta)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~120"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~114"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -240,7 +240,7 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~rotate_xc~2~~CallsGraph_node1" class="node">
 <title>proc~rotate_xc~2</title>
 <polygon fill="none" stroke="black" points="148,-45 0,-45 0,-21 148,-21 148,-45"/>
-<text text-anchor="middle" x="74" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%rotate_Xc</text>
+<text text-anchor="middle" x="74" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%rotate_Xc</text>
 </g>
 <!-- proc~rotation -->
 <g id="proc~~rotate_xc~2~~CallsGraph_node2" class="node">
@@ -375,46 +375,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~rotate_xc~2~~CalledByGraph Pages: 1 -->
-<svg id="procrotate_xc2CalledByGraph" width="302pt" height="74pt"
- viewBox="0.00 0.00 302.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~rotate_xc~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
+<svg id="procrotate_xc2CalledByGraph" width="302pt" height="32pt"
+ viewBox="0.00 0.00 302.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~rotate_xc~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~rotate_xc~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 298,-70 298,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 298,-28 298,4 -4,4"/>
 <!-- proc~rotate_xc~2 -->
 <g id="proc~~rotate_xc~2~~CalledByGraph_node1" class="node">
 <title>proc~rotate_xc~2</title>
-<polygon fill="none" stroke="black" points="294,-45 146,-45 146,-21 294,-21 294,-45"/>
-<text text-anchor="middle" x="220" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%rotate_Xc</text>
+<polygon fill="none" stroke="black" points="294,-24 146,-24 146,0 294,0 294,-24"/>
+<text text-anchor="middle" x="220" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%rotate_Xc</text>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~rotate_xc~2~~CalledByGraph_node2" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~rotate_xc~2~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-66 0,-66 0,-42 110,-42 110,-66"/>
-<text text-anchor="middle" x="55" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<title>program~example3_volume</title>
+<g id="a_proc~~rotate_xc~2~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~rotate_xc~2 -->
+<!-- program~example3_volume&#45;&gt;proc~rotate_xc~2 -->
 <g id="proc~~rotate_xc~2~~CalledByGraph_edge1" class="edge">
-<title>program~example3_surface&#45;&gt;proc~rotate_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M110.28,-47.01C118.46,-45.95 127.07,-44.84 135.69,-43.73"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="136.34,-47.18 145.81,-42.43 135.45,-40.24 136.34,-47.18"/>
-</g>
-<!-- program~example_ppm2 -->
-<g id="proc~~rotate_xc~2~~CalledByGraph_node3" class="node">
-<title>program~example_ppm2</title>
-<g id="a_proc~~rotate_xc~2~~CalledByGraph_node3"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-24 8,-24 8,0 102,0 102,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm2&#45;&gt;proc~rotate_xc~2 -->
-<g id="proc~~rotate_xc~2~~CalledByGraph_edge2" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~rotate_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M102.27,-17.96C112.76,-19.31 124.2,-20.79 135.69,-22.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.42,-25.76 145.78,-23.57 136.31,-18.82 135.42,-25.76"/>
+<title>program~example3_volume&#45;&gt;proc~rotate_xc~2</title>
+<path fill="none" stroke="#ff0000" d="M110.28,-12C118.46,-12 127.07,-12 135.69,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="135.81,-15.5 145.81,-12 135.81,-8.5 135.81,-15.5"/>
 </g>
 </g>
 </svg>
@@ -530,7 +515,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/rotate_xc~3.html b/proc/rotate_xc~3.html
index 37b307523..12b283052 100644
--- a/proc/rotate_xc~3.html
+++ b/proc/rotate_xc~3.html
@@ -83,15 +83,15 @@ <h1>rotate_Xc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">rotate_Xc</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine rotate_Xc(this, alpha, beta, theta)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~183"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~181"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -231,55 +231,55 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~rotate_xc~3~~CallsGraph Pages: 1 -->
-<svg id="procrotate_xc3CallsGraph" width="326pt" height="74pt"
- viewBox="0.00 0.00 326.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procrotate_xc3CallsGraph" width="336pt" height="74pt"
+ viewBox="0.00 0.00 336.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~rotate_xc~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~rotate_xc~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 322,-70 322,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 332,-70 332,4 -4,4"/>
 <!-- proc~rotate_xc~3 -->
 <g id="proc~~rotate_xc~3~~CallsGraph_node1" class="node">
 <title>proc~rotate_xc~3</title>
-<polygon fill="none" stroke="black" points="138,-45 0,-45 0,-21 138,-21 138,-45"/>
-<text text-anchor="middle" x="69" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%rotate_Xc</text>
+<polygon fill="none" stroke="black" points="148,-45 0,-45 0,-21 148,-21 148,-45"/>
+<text text-anchor="middle" x="74" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%rotate_Xc</text>
 </g>
 <!-- proc~rotation -->
 <g id="proc~~rotate_xc~3~~CallsGraph_node2" class="node">
 <title>proc~rotation</title>
 <g id="a_proc~~rotate_xc~3~~CallsGraph_node2"><a xlink:href="../proc/rotation.html" xlink:title="rotation">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="228,-45 174,-45 174,-21 228,-21 228,-45"/>
-<text text-anchor="middle" x="201" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rotation</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="238,-45 184,-45 184,-21 238,-21 238,-45"/>
+<text text-anchor="middle" x="211" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rotation</text>
 </a>
 </g>
 </g>
 <!-- proc~rotate_xc~3&#45;&gt;proc~rotation -->
 <g id="proc~~rotate_xc~3~~CallsGraph_edge1" class="edge">
 <title>proc~rotate_xc~3&#45;&gt;proc~rotation</title>
-<path fill="none" stroke="#ff0000" d="M138.05,-33C146.93,-33 155.74,-33 163.81,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="163.93,-36.5 173.93,-33 163.93,-29.5 163.93,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M148.03,-33C156.93,-33 165.7,-33 173.72,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="173.77,-36.5 183.77,-33 173.77,-29.5 173.77,-36.5"/>
 </g>
 <!-- cosd -->
 <g id="proc~~rotate_xc~3~~CallsGraph_node3" class="node">
 <title>cosd</title>
-<polygon fill="#777777" stroke="#777777" points="318,-66 264,-66 264,-42 318,-42 318,-66"/>
-<text text-anchor="middle" x="291" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cosd</text>
+<polygon fill="#777777" stroke="#777777" points="328,-66 274,-66 274,-42 328,-42 328,-66"/>
+<text text-anchor="middle" x="301" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cosd</text>
 </g>
 <!-- proc~rotation&#45;&gt;cosd -->
 <g id="proc~~rotate_xc~3~~CallsGraph_edge2" class="edge">
 <title>proc~rotation&#45;&gt;cosd</title>
-<path fill="none" stroke="#ff0000" d="M228.4,-39.3C236.48,-41.23 245.51,-43.38 254.1,-45.43"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="253.38,-48.86 263.92,-47.78 255,-42.05 253.38,-48.86"/>
+<path fill="none" stroke="#ff0000" d="M238.4,-39.3C246.48,-41.23 255.51,-43.38 264.1,-45.43"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="263.38,-48.86 273.92,-47.78 265,-42.05 263.38,-48.86"/>
 </g>
 <!-- sind -->
 <g id="proc~~rotate_xc~3~~CallsGraph_node4" class="node">
 <title>sind</title>
-<polygon fill="#777777" stroke="#777777" points="318,-24 264,-24 264,0 318,0 318,-24"/>
-<text text-anchor="middle" x="291" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">sind</text>
+<polygon fill="#777777" stroke="#777777" points="328,-24 274,-24 274,0 328,0 328,-24"/>
+<text text-anchor="middle" x="301" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">sind</text>
 </g>
 <!-- proc~rotation&#45;&gt;sind -->
 <g id="proc~~rotate_xc~3~~CallsGraph_edge3" class="edge">
 <title>proc~rotation&#45;&gt;sind</title>
-<path fill="none" stroke="#ff0000" d="M228.4,-26.7C236.48,-24.77 245.51,-22.62 254.1,-20.57"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="255,-23.95 263.92,-18.22 253.38,-17.14 255,-23.95"/>
+<path fill="none" stroke="#ff0000" d="M238.4,-26.7C246.48,-24.77 255.51,-22.62 264.1,-20.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="265,-23.95 273.92,-18.22 263.38,-17.14 265,-23.95"/>
 </g>
 </g>
 </svg>
@@ -375,31 +375,46 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~rotate_xc~3~~CalledByGraph Pages: 1 -->
-<svg id="procrotate_xc3CalledByGraph" width="282pt" height="32pt"
- viewBox="0.00 0.00 282.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~rotate_xc~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<svg id="procrotate_xc3CalledByGraph" width="302pt" height="74pt"
+ viewBox="0.00 0.00 302.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~rotate_xc~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~rotate_xc~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 278,-28 278,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 298,-70 298,4 -4,4"/>
 <!-- proc~rotate_xc~3 -->
 <g id="proc~~rotate_xc~3~~CalledByGraph_node1" class="node">
 <title>proc~rotate_xc~3</title>
-<polygon fill="none" stroke="black" points="274,-24 136,-24 136,0 274,0 274,-24"/>
-<text text-anchor="middle" x="205" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%rotate_Xc</text>
+<polygon fill="none" stroke="black" points="294,-45 146,-45 146,-21 294,-21 294,-45"/>
+<text text-anchor="middle" x="220" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%rotate_Xc</text>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~rotate_xc~3~~CalledByGraph_node2" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~rotate_xc~3~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="100,-24 0,-24 0,0 100,0 100,-24"/>
-<text text-anchor="middle" x="50" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~rotate_xc~3~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-66 0,-66 0,-42 110,-42 110,-66"/>
+<text text-anchor="middle" x="55" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~rotate_xc~3 -->
+<!-- program~example3_surface&#45;&gt;proc~rotate_xc~3 -->
 <g id="proc~~rotate_xc~3~~CalledByGraph_edge1" class="edge">
-<title>program~example1_curve&#45;&gt;proc~rotate_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M100.25,-12C108.41,-12 117.05,-12 125.72,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="125.89,-15.5 135.89,-12 125.89,-8.5 125.89,-15.5"/>
+<title>program~example3_surface&#45;&gt;proc~rotate_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M110.28,-47.01C118.46,-45.95 127.07,-44.84 135.69,-43.73"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="136.34,-47.18 145.81,-42.43 135.45,-40.24 136.34,-47.18"/>
+</g>
+<!-- program~example_ppm2 -->
+<g id="proc~~rotate_xc~3~~CalledByGraph_node3" class="node">
+<title>program~example_ppm2</title>
+<g id="a_proc~~rotate_xc~3~~CalledByGraph_node3"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-24 8,-24 8,0 102,0 102,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm2&#45;&gt;proc~rotate_xc~3 -->
+<g id="proc~~rotate_xc~3~~CalledByGraph_edge2" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~rotate_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M102.27,-17.96C112.76,-19.31 124.2,-20.79 135.69,-22.27"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="135.42,-25.76 145.78,-23.57 136.31,-18.82 135.42,-25.76"/>
 </g>
 </g>
 </svg>
@@ -515,7 +530,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/rotate_xg.html b/proc/rotate_xg.html
index f6e8155ca..c95250db2 100644
--- a/proc/rotate_xg.html
+++ b/proc/rotate_xg.html
@@ -83,15 +83,15 @@ <h1>rotate_Xg
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">rotate_Xg</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine rotate_Xg(this, alpha, beta, theta)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~54"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~53"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -203,7 +203,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-theta~2"></span>
+              <span class="anchor" id="variable-theta~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -231,55 +231,55 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~rotate_xg~~CallsGraph Pages: 1 -->
-<svg id="procrotate_xgCallsGraph" width="336pt" height="74pt"
- viewBox="0.00 0.00 336.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procrotate_xgCallsGraph" width="327pt" height="74pt"
+ viewBox="0.00 0.00 327.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~rotate_xg~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~rotate_xg~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 332,-70 332,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 323,-70 323,4 -4,4"/>
 <!-- proc~rotate_xg -->
 <g id="proc~~rotate_xg~~CallsGraph_node1" class="node">
 <title>proc~rotate_xg</title>
-<polygon fill="none" stroke="black" points="148,-45 0,-45 0,-21 148,-21 148,-45"/>
-<text text-anchor="middle" x="74" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%rotate_Xg</text>
+<polygon fill="none" stroke="black" points="139,-45 0,-45 0,-21 139,-21 139,-45"/>
+<text text-anchor="middle" x="69.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%rotate_Xg</text>
 </g>
 <!-- proc~rotation -->
 <g id="proc~~rotate_xg~~CallsGraph_node2" class="node">
 <title>proc~rotation</title>
 <g id="a_proc~~rotate_xg~~CallsGraph_node2"><a xlink:href="../proc/rotation.html" xlink:title="rotation">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="238,-45 184,-45 184,-21 238,-21 238,-45"/>
-<text text-anchor="middle" x="211" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rotation</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="229,-45 175,-45 175,-21 229,-21 229,-45"/>
+<text text-anchor="middle" x="202" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rotation</text>
 </a>
 </g>
 </g>
 <!-- proc~rotate_xg&#45;&gt;proc~rotation -->
 <g id="proc~~rotate_xg~~CallsGraph_edge1" class="edge">
 <title>proc~rotate_xg&#45;&gt;proc~rotation</title>
-<path fill="none" stroke="#ff0000" d="M148.03,-33C156.93,-33 165.7,-33 173.72,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="173.77,-36.5 183.77,-33 173.77,-29.5 173.77,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M139.19,-33C147.98,-33 156.7,-33 164.68,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="164.71,-36.5 174.71,-33 164.71,-29.5 164.71,-36.5"/>
 </g>
 <!-- cosd -->
 <g id="proc~~rotate_xg~~CallsGraph_node3" class="node">
 <title>cosd</title>
-<polygon fill="#777777" stroke="#777777" points="328,-66 274,-66 274,-42 328,-42 328,-66"/>
-<text text-anchor="middle" x="301" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cosd</text>
+<polygon fill="#777777" stroke="#777777" points="319,-66 265,-66 265,-42 319,-42 319,-66"/>
+<text text-anchor="middle" x="292" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cosd</text>
 </g>
 <!-- proc~rotation&#45;&gt;cosd -->
 <g id="proc~~rotate_xg~~CallsGraph_edge2" class="edge">
 <title>proc~rotation&#45;&gt;cosd</title>
-<path fill="none" stroke="#ff0000" d="M238.4,-39.3C246.48,-41.23 255.51,-43.38 264.1,-45.43"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="263.38,-48.86 273.92,-47.78 265,-42.05 263.38,-48.86"/>
+<path fill="none" stroke="#ff0000" d="M229.4,-39.3C237.48,-41.23 246.51,-43.38 255.1,-45.43"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="254.38,-48.86 264.92,-47.78 256,-42.05 254.38,-48.86"/>
 </g>
 <!-- sind -->
 <g id="proc~~rotate_xg~~CallsGraph_node4" class="node">
 <title>sind</title>
-<polygon fill="#777777" stroke="#777777" points="328,-24 274,-24 274,0 328,0 328,-24"/>
-<text text-anchor="middle" x="301" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">sind</text>
+<polygon fill="#777777" stroke="#777777" points="319,-24 265,-24 265,0 319,0 319,-24"/>
+<text text-anchor="middle" x="292" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">sind</text>
 </g>
 <!-- proc~rotation&#45;&gt;sind -->
 <g id="proc~~rotate_xg~~CallsGraph_edge3" class="edge">
 <title>proc~rotation&#45;&gt;sind</title>
-<path fill="none" stroke="#ff0000" d="M238.4,-26.7C246.48,-24.77 255.51,-22.62 264.1,-20.57"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="265,-23.95 273.92,-18.22 263.38,-17.14 265,-23.95"/>
+<path fill="none" stroke="#ff0000" d="M229.4,-26.7C237.48,-24.77 246.51,-22.62 255.1,-20.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="256,-23.95 264.92,-18.22 254.38,-17.14 256,-23.95"/>
 </g>
 </g>
 </svg>
@@ -375,31 +375,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~rotate_xg~~CalledByGraph Pages: 1 -->
-<svg id="procrotate_xgCalledByGraph" width="302pt" height="32pt"
- viewBox="0.00 0.00 302.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procrotate_xgCalledByGraph" width="283pt" height="32pt"
+ viewBox="0.00 0.00 283.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~rotate_xg~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~rotate_xg~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 298,-28 298,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 279,-28 279,4 -4,4"/>
 <!-- proc~rotate_xg -->
 <g id="proc~~rotate_xg~~CalledByGraph_node1" class="node">
 <title>proc~rotate_xg</title>
-<polygon fill="none" stroke="black" points="294,-24 146,-24 146,0 294,0 294,-24"/>
-<text text-anchor="middle" x="220" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%rotate_Xg</text>
+<polygon fill="none" stroke="black" points="275,-24 136,-24 136,0 275,0 275,-24"/>
+<text text-anchor="middle" x="205.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%rotate_Xg</text>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example1_curve -->
 <g id="proc~~rotate_xg~~CalledByGraph_node2" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~rotate_xg~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~rotate_xg~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="100,-24 0,-24 0,0 100,0 100,-24"/>
+<text text-anchor="middle" x="50" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~rotate_xg -->
+<!-- program~example1_curve&#45;&gt;proc~rotate_xg -->
 <g id="proc~~rotate_xg~~CalledByGraph_edge1" class="edge">
-<title>program~example3_volume&#45;&gt;proc~rotate_xg</title>
-<path fill="none" stroke="#ff0000" d="M110.28,-12C118.46,-12 127.07,-12 135.69,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.81,-15.5 145.81,-12 135.81,-8.5 135.81,-15.5"/>
+<title>program~example1_curve&#45;&gt;proc~rotate_xg</title>
+<path fill="none" stroke="#ff0000" d="M100.41,-12C108.54,-12 117.14,-12 125.77,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="125.89,-15.5 135.89,-12 125.89,-8.5 125.89,-15.5"/>
 </g>
 </g>
 </svg>
@@ -515,7 +515,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/rotate_xg~2.html b/proc/rotate_xg~2.html
index a9da16539..0ca45b287 100644
--- a/proc/rotate_xg~2.html
+++ b/proc/rotate_xg~2.html
@@ -83,15 +83,15 @@ <h1>rotate_Xg
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">rotate_Xg</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine rotate_Xg(this, alpha, beta, theta)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~121"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~115"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -240,7 +240,7 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~rotate_xg~2~~CallsGraph_node1" class="node">
 <title>proc~rotate_xg~2</title>
 <polygon fill="none" stroke="black" points="148,-45 0,-45 0,-21 148,-21 148,-45"/>
-<text text-anchor="middle" x="74" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%rotate_Xg</text>
+<text text-anchor="middle" x="74" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%rotate_Xg</text>
 </g>
 <!-- proc~rotation -->
 <g id="proc~~rotate_xg~2~~CallsGraph_node2" class="node">
@@ -384,20 +384,20 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~rotate_xg~2~~CalledByGraph_node1" class="node">
 <title>proc~rotate_xg~2</title>
 <polygon fill="none" stroke="black" points="294,-24 146,-24 146,0 294,0 294,-24"/>
-<text text-anchor="middle" x="220" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%rotate_Xg</text>
+<text text-anchor="middle" x="220" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%rotate_Xg</text>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~rotate_xg~2~~CalledByGraph_node2" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~rotate_xg~2~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<title>program~example3_volume</title>
+<g id="a_proc~~rotate_xg~2~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~rotate_xg~2 -->
+<!-- program~example3_volume&#45;&gt;proc~rotate_xg~2 -->
 <g id="proc~~rotate_xg~2~~CalledByGraph_edge1" class="edge">
-<title>program~example3_surface&#45;&gt;proc~rotate_xg~2</title>
+<title>program~example3_volume&#45;&gt;proc~rotate_xg~2</title>
 <path fill="none" stroke="#ff0000" d="M110.28,-12C118.46,-12 127.07,-12 135.69,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="135.81,-15.5 145.81,-12 135.81,-8.5 135.81,-15.5"/>
 </g>
@@ -515,7 +515,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/rotate_xg~3.html b/proc/rotate_xg~3.html
index 95ada9c6d..1cb8d0d79 100644
--- a/proc/rotate_xg~3.html
+++ b/proc/rotate_xg~3.html
@@ -83,15 +83,15 @@ <h1>rotate_Xg
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">rotate_Xg</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine rotate_Xg(this, alpha, beta, theta)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~184"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~182"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -231,55 +231,55 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~rotate_xg~3~~CallsGraph Pages: 1 -->
-<svg id="procrotate_xg3CallsGraph" width="327pt" height="74pt"
- viewBox="0.00 0.00 327.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procrotate_xg3CallsGraph" width="336pt" height="74pt"
+ viewBox="0.00 0.00 336.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~rotate_xg~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~rotate_xg~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 323,-70 323,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 332,-70 332,4 -4,4"/>
 <!-- proc~rotate_xg~3 -->
 <g id="proc~~rotate_xg~3~~CallsGraph_node1" class="node">
 <title>proc~rotate_xg~3</title>
-<polygon fill="none" stroke="black" points="139,-45 0,-45 0,-21 139,-21 139,-45"/>
-<text text-anchor="middle" x="69.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%rotate_Xg</text>
+<polygon fill="none" stroke="black" points="148,-45 0,-45 0,-21 148,-21 148,-45"/>
+<text text-anchor="middle" x="74" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%rotate_Xg</text>
 </g>
 <!-- proc~rotation -->
 <g id="proc~~rotate_xg~3~~CallsGraph_node2" class="node">
 <title>proc~rotation</title>
 <g id="a_proc~~rotate_xg~3~~CallsGraph_node2"><a xlink:href="../proc/rotation.html" xlink:title="rotation">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="229,-45 175,-45 175,-21 229,-21 229,-45"/>
-<text text-anchor="middle" x="202" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rotation</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="238,-45 184,-45 184,-21 238,-21 238,-45"/>
+<text text-anchor="middle" x="211" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rotation</text>
 </a>
 </g>
 </g>
 <!-- proc~rotate_xg~3&#45;&gt;proc~rotation -->
 <g id="proc~~rotate_xg~3~~CallsGraph_edge1" class="edge">
 <title>proc~rotate_xg~3&#45;&gt;proc~rotation</title>
-<path fill="none" stroke="#ff0000" d="M139.19,-33C147.98,-33 156.7,-33 164.68,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="164.71,-36.5 174.71,-33 164.71,-29.5 164.71,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M148.03,-33C156.93,-33 165.7,-33 173.72,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="173.77,-36.5 183.77,-33 173.77,-29.5 173.77,-36.5"/>
 </g>
 <!-- cosd -->
 <g id="proc~~rotate_xg~3~~CallsGraph_node3" class="node">
 <title>cosd</title>
-<polygon fill="#777777" stroke="#777777" points="319,-66 265,-66 265,-42 319,-42 319,-66"/>
-<text text-anchor="middle" x="292" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cosd</text>
+<polygon fill="#777777" stroke="#777777" points="328,-66 274,-66 274,-42 328,-42 328,-66"/>
+<text text-anchor="middle" x="301" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">cosd</text>
 </g>
 <!-- proc~rotation&#45;&gt;cosd -->
 <g id="proc~~rotate_xg~3~~CallsGraph_edge2" class="edge">
 <title>proc~rotation&#45;&gt;cosd</title>
-<path fill="none" stroke="#ff0000" d="M229.4,-39.3C237.48,-41.23 246.51,-43.38 255.1,-45.43"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="254.38,-48.86 264.92,-47.78 256,-42.05 254.38,-48.86"/>
+<path fill="none" stroke="#ff0000" d="M238.4,-39.3C246.48,-41.23 255.51,-43.38 264.1,-45.43"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="263.38,-48.86 273.92,-47.78 265,-42.05 263.38,-48.86"/>
 </g>
 <!-- sind -->
 <g id="proc~~rotate_xg~3~~CallsGraph_node4" class="node">
 <title>sind</title>
-<polygon fill="#777777" stroke="#777777" points="319,-24 265,-24 265,0 319,0 319,-24"/>
-<text text-anchor="middle" x="292" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">sind</text>
+<polygon fill="#777777" stroke="#777777" points="328,-24 274,-24 274,0 328,0 328,-24"/>
+<text text-anchor="middle" x="301" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">sind</text>
 </g>
 <!-- proc~rotation&#45;&gt;sind -->
 <g id="proc~~rotate_xg~3~~CallsGraph_edge3" class="edge">
 <title>proc~rotation&#45;&gt;sind</title>
-<path fill="none" stroke="#ff0000" d="M229.4,-26.7C237.48,-24.77 246.51,-22.62 255.1,-20.57"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="256,-23.95 264.92,-18.22 254.38,-17.14 256,-23.95"/>
+<path fill="none" stroke="#ff0000" d="M238.4,-26.7C246.48,-24.77 255.51,-22.62 264.1,-20.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="265,-23.95 273.92,-18.22 263.38,-17.14 265,-23.95"/>
 </g>
 </g>
 </svg>
@@ -375,31 +375,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~rotate_xg~3~~CalledByGraph Pages: 1 -->
-<svg id="procrotate_xg3CalledByGraph" width="283pt" height="32pt"
- viewBox="0.00 0.00 283.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procrotate_xg3CalledByGraph" width="302pt" height="32pt"
+ viewBox="0.00 0.00 302.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~rotate_xg~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~rotate_xg~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 279,-28 279,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 298,-28 298,4 -4,4"/>
 <!-- proc~rotate_xg~3 -->
 <g id="proc~~rotate_xg~3~~CalledByGraph_node1" class="node">
 <title>proc~rotate_xg~3</title>
-<polygon fill="none" stroke="black" points="275,-24 136,-24 136,0 275,0 275,-24"/>
-<text text-anchor="middle" x="205.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%rotate_Xg</text>
+<polygon fill="none" stroke="black" points="294,-24 146,-24 146,0 294,0 294,-24"/>
+<text text-anchor="middle" x="220" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%rotate_Xg</text>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~rotate_xg~3~~CalledByGraph_node2" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~rotate_xg~3~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="100,-24 0,-24 0,0 100,0 100,-24"/>
-<text text-anchor="middle" x="50" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~rotate_xg~3~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~rotate_xg~3 -->
+<!-- program~example3_surface&#45;&gt;proc~rotate_xg~3 -->
 <g id="proc~~rotate_xg~3~~CalledByGraph_edge1" class="edge">
-<title>program~example1_curve&#45;&gt;proc~rotate_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M100.41,-12C108.54,-12 117.14,-12 125.77,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="125.89,-15.5 135.89,-12 125.89,-8.5 125.89,-15.5"/>
+<title>program~example3_surface&#45;&gt;proc~rotate_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M110.28,-12C118.46,-12 127.07,-12 135.69,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="135.81,-15.5 145.81,-12 135.81,-8.5 135.81,-15.5"/>
 </g>
 </g>
 </svg>
@@ -515,7 +515,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/rotation.html b/proc/rotation.html
index 577458e56..bf94bcf37 100644
--- a/proc/rotation.html
+++ b/proc/rotation.html
@@ -364,9 +364,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~rotate_xc -->
 <g id="proc~~rotation~~CalledByGraph_node2" class="node">
 <title>proc~rotate_xc</title>
-<g id="a_proc~~rotation~~CalledByGraph_node2"><a xlink:href="../proc/rotate_xc.html" xlink:title="nurbs_volume%rotate_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="294,-234 146,-234 146,-210 294,-210 294,-234"/>
-<text text-anchor="middle" x="220" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%rotate_Xc</text>
+<g id="a_proc~~rotation~~CalledByGraph_node2"><a xlink:href="../proc/rotate_xc.html" xlink:title="nurbs_curve%rotate_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="289,-234 151,-234 151,-210 289,-210 289,-234"/>
+<text text-anchor="middle" x="220" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%rotate_Xc</text>
 </a>
 </g>
 </g>
@@ -379,9 +379,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~rotate_xc~2 -->
 <g id="proc~~rotation~~CalledByGraph_node3" class="node">
 <title>proc~rotate_xc~2</title>
-<g id="a_proc~~rotation~~CalledByGraph_node3"><a xlink:href="../proc/rotate_xc~2.html" xlink:title="nurbs_surface%rotate_Xc">
+<g id="a_proc~~rotation~~CalledByGraph_node3"><a xlink:href="../proc/rotate_xc~2.html" xlink:title="nurbs_volume%rotate_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="294,-150 146,-150 146,-126 294,-126 294,-150"/>
-<text text-anchor="middle" x="220" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%rotate_Xc</text>
+<text text-anchor="middle" x="220" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%rotate_Xc</text>
 </a>
 </g>
 </g>
@@ -394,9 +394,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~rotate_xc~3 -->
 <g id="proc~~rotation~~CalledByGraph_node4" class="node">
 <title>proc~rotate_xc~3</title>
-<g id="a_proc~~rotation~~CalledByGraph_node4"><a xlink:href="../proc/rotate_xc~3.html" xlink:title="nurbs_curve%rotate_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="289,-66 151,-66 151,-42 289,-42 289,-66"/>
-<text text-anchor="middle" x="220" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%rotate_Xc</text>
+<g id="a_proc~~rotation~~CalledByGraph_node4"><a xlink:href="../proc/rotate_xc~3.html" xlink:title="nurbs_surface%rotate_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="294,-66 146,-66 146,-42 294,-42 294,-66"/>
+<text text-anchor="middle" x="220" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%rotate_Xc</text>
 </a>
 </g>
 </g>
@@ -409,9 +409,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~rotate_xg -->
 <g id="proc~~rotation~~CalledByGraph_node5" class="node">
 <title>proc~rotate_xg</title>
-<g id="a_proc~~rotation~~CalledByGraph_node5"><a xlink:href="../proc/rotate_xg.html" xlink:title="nurbs_volume%rotate_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="294,-192 146,-192 146,-168 294,-168 294,-192"/>
-<text text-anchor="middle" x="220" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%rotate_Xg</text>
+<g id="a_proc~~rotation~~CalledByGraph_node5"><a xlink:href="../proc/rotate_xg.html" xlink:title="nurbs_curve%rotate_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="289.5,-192 150.5,-192 150.5,-168 289.5,-168 289.5,-192"/>
+<text text-anchor="middle" x="220" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%rotate_Xg</text>
 </a>
 </g>
 </g>
@@ -424,9 +424,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~rotate_xg~2 -->
 <g id="proc~~rotation~~CalledByGraph_node6" class="node">
 <title>proc~rotate_xg~2</title>
-<g id="a_proc~~rotation~~CalledByGraph_node6"><a xlink:href="../proc/rotate_xg~2.html" xlink:title="nurbs_surface%rotate_Xg">
+<g id="a_proc~~rotation~~CalledByGraph_node6"><a xlink:href="../proc/rotate_xg~2.html" xlink:title="nurbs_volume%rotate_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="294,-108 146,-108 146,-84 294,-84 294,-108"/>
-<text text-anchor="middle" x="220" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%rotate_Xg</text>
+<text text-anchor="middle" x="220" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%rotate_Xg</text>
 </a>
 </g>
 </g>
@@ -439,9 +439,9 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~rotate_xg~3 -->
 <g id="proc~~rotation~~CalledByGraph_node7" class="node">
 <title>proc~rotate_xg~3</title>
-<g id="a_proc~~rotation~~CalledByGraph_node7"><a xlink:href="../proc/rotate_xg~3.html" xlink:title="nurbs_curve%rotate_Xg">
-<polygon fill="#d9534f" stroke="#d9534f" points="289.5,-24 150.5,-24 150.5,0 289.5,0 289.5,-24"/>
-<text text-anchor="middle" x="220" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%rotate_Xg</text>
+<g id="a_proc~~rotation~~CalledByGraph_node7"><a xlink:href="../proc/rotate_xg~3.html" xlink:title="nurbs_surface%rotate_Xg">
+<polygon fill="#d9534f" stroke="#d9534f" points="294,-24 146,-24 146,0 294,0 294,-24"/>
+<text text-anchor="middle" x="220" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%rotate_Xg</text>
 </a>
 </g>
 </g>
@@ -455,79 +455,79 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~rotation~~CalledByGraph_node8" class="node">
 <title>program~example1_curve</title>
 <g id="a_proc~~rotation~~CalledByGraph_node8"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-45 5,-45 5,-21 105,-21 105,-45"/>
-<text text-anchor="middle" x="55" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-202 5,-202 5,-178 105,-178 105,-202"/>
+<text text-anchor="middle" x="55" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~rotate_xc~3 -->
-<g id="proc~~rotation~~CalledByGraph_edge10" class="edge">
-<title>program~example1_curve&#45;&gt;proc~rotate_xc~3</title>
-<path fill="none" stroke="#00ff00" d="M105.35,-39.36C116.55,-40.8 128.71,-42.37 140.78,-43.92"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="140.51,-47.42 150.87,-45.22 141.4,-40.47 140.51,-47.42"/>
+<!-- program~example1_curve&#45;&gt;proc~rotate_xc -->
+<g id="proc~~rotation~~CalledByGraph_edge7" class="edge">
+<title>program~example1_curve&#45;&gt;proc~rotate_xc</title>
+<path fill="none" stroke="#ff0000" d="M105.35,-199.69C118.75,-202.32 133.53,-205.22 147.87,-208.04"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="147.22,-211.48 157.71,-209.97 148.57,-204.61 147.22,-211.48"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~rotate_xg~3 -->
-<g id="proc~~rotation~~CalledByGraph_edge13" class="edge">
-<title>program~example1_curve&#45;&gt;proc~rotate_xg~3</title>
-<path fill="none" stroke="#ff00ff" d="M105.35,-26.64C116.4,-25.22 128.4,-23.67 140.31,-22.14"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="140.8,-25.6 150.27,-20.85 139.91,-18.66 140.8,-25.6"/>
+<!-- program~example1_curve&#45;&gt;proc~rotate_xg -->
+<g id="proc~~rotation~~CalledByGraph_edge11" class="edge">
+<title>program~example1_curve&#45;&gt;proc~rotate_xg</title>
+<path fill="none" stroke="#00ffff" d="M105.35,-186.97C116.29,-186.3 128.16,-185.57 139.95,-184.85"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="140.51,-188.32 150.27,-184.22 140.08,-181.34 140.51,-188.32"/>
 </g>
 <!-- program~example3_surface -->
 <g id="proc~~rotation~~CalledByGraph_node9" class="node">
 <title>program~example3_surface</title>
 <g id="a_proc~~rotation~~CalledByGraph_node9"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-108 0,-108 0,-84 110,-84 110,-108"/>
-<text text-anchor="middle" x="55" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~rotate_xc~2 -->
-<g id="proc~~rotation~~CalledByGraph_edge8" class="edge">
-<title>program~example3_surface&#45;&gt;proc~rotate_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M102.71,-108.04C121.38,-112.85 143.05,-118.43 162.59,-123.46"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="161.73,-126.86 172.28,-125.96 163.47,-120.08 161.73,-126.86"/>
+<!-- program~example3_surface&#45;&gt;proc~rotate_xc~3 -->
+<g id="proc~~rotation~~CalledByGraph_edge9" class="edge">
+<title>program~example3_surface&#45;&gt;proc~rotate_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M102.71,-24.04C121.38,-28.85 143.05,-34.43 162.59,-39.46"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="161.73,-42.86 172.28,-41.96 163.47,-36.08 161.73,-42.86"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~rotate_xg~2 -->
-<g id="proc~~rotation~~CalledByGraph_edge12" class="edge">
-<title>program~example3_surface&#45;&gt;proc~rotate_xg~2</title>
-<path fill="none" stroke="#0000ff" d="M110.28,-96C118.46,-96 127.07,-96 135.69,-96"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="135.81,-99.5 145.81,-96 135.81,-92.5 135.81,-99.5"/>
+<!-- program~example3_surface&#45;&gt;proc~rotate_xg~3 -->
+<g id="proc~~rotation~~CalledByGraph_edge13" class="edge">
+<title>program~example3_surface&#45;&gt;proc~rotate_xg~3</title>
+<path fill="none" stroke="#ff00ff" d="M110.28,-12C118.46,-12 127.07,-12 135.69,-12"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="135.81,-15.5 145.81,-12 135.81,-8.5 135.81,-15.5"/>
 </g>
 <!-- program~example3_volume -->
 <g id="proc~~rotation~~CalledByGraph_node10" class="node">
 <title>program~example3_volume</title>
 <g id="a_proc~~rotation~~CalledByGraph_node10"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-213 0,-213 0,-189 110,-189 110,-213"/>
-<text text-anchor="middle" x="55" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-139 0,-139 0,-115 110,-115 110,-139"/>
+<text text-anchor="middle" x="55" y="-124.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~rotate_xc -->
-<g id="proc~~rotation~~CalledByGraph_edge7" class="edge">
-<title>program~example3_volume&#45;&gt;proc~rotate_xc</title>
-<path fill="none" stroke="#ff0000" d="M110.28,-207.99C118.46,-209.05 127.07,-210.16 135.69,-211.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.45,-214.76 145.81,-212.57 136.34,-207.82 135.45,-214.76"/>
+<!-- program~example3_volume&#45;&gt;proc~rotate_xc~2 -->
+<g id="proc~~rotation~~CalledByGraph_edge8" class="edge">
+<title>program~example3_volume&#45;&gt;proc~rotate_xc~2</title>
+<path fill="none" stroke="#ffff00" d="M110.28,-130.66C118.46,-131.22 127.07,-131.8 135.69,-132.38"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="135.6,-135.88 145.81,-133.06 136.07,-128.9 135.6,-135.88"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~rotate_xg -->
-<g id="proc~~rotation~~CalledByGraph_edge11" class="edge">
-<title>program~example3_volume&#45;&gt;proc~rotate_xg</title>
-<path fill="none" stroke="#00ffff" d="M110.28,-194.01C118.46,-192.95 127.07,-191.84 135.69,-190.73"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="136.34,-194.18 145.81,-189.43 135.45,-187.24 136.34,-194.18"/>
+<!-- program~example3_volume&#45;&gt;proc~rotate_xg~2 -->
+<g id="proc~~rotation~~CalledByGraph_edge12" class="edge">
+<title>program~example3_volume&#45;&gt;proc~rotate_xg~2</title>
+<path fill="none" stroke="#0000ff" d="M110.28,-116.68C121.64,-114.52 133.79,-112.21 145.71,-109.94"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="146.48,-113.36 155.65,-108.05 145.17,-106.48 146.48,-113.36"/>
 </g>
 <!-- program~example_ppm2 -->
 <g id="proc~~rotation~~CalledByGraph_node11" class="node">
 <title>program~example_ppm2</title>
 <g id="a_proc~~rotation~~CalledByGraph_node11"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-150 8,-150 8,-126 102,-126 102,-150"/>
-<text text-anchor="middle" x="55" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-66 8,-66 8,-42 102,-42 102,-66"/>
+<text text-anchor="middle" x="55" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~rotate_xc~2 -->
-<g id="proc~~rotation~~CalledByGraph_edge9" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~rotate_xc~2</title>
-<path fill="none" stroke="#ffff00" d="M102.27,-138C112.76,-138 124.2,-138 135.69,-138"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="135.78,-141.5 145.78,-138 135.78,-134.5 135.78,-141.5"/>
+<!-- program~example_ppm2&#45;&gt;proc~rotate_xc~3 -->
+<g id="proc~~rotation~~CalledByGraph_edge10" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~rotate_xc~3</title>
+<path fill="none" stroke="#00ff00" d="M102.27,-54C112.76,-54 124.2,-54 135.69,-54"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="135.78,-57.5 145.78,-54 135.78,-50.5 135.78,-57.5"/>
 </g>
 </g>
 </svg>
@@ -643,7 +643,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set1.html b/proc/set1.html
index 3f4ab981c..78be84f42 100644
--- a/proc/set1.html
+++ b/proc/set1.html
@@ -78,20 +78,20 @@ <h1>set1
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.4% of total for procedures.">24 statements</a>
+                 title=" 0.3% of total for procedures.">20 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">set1</li>
           </ol>
         </nav>
@@ -137,14 +137,14 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine set1(this, knot1, knot2, knot3, Xc, Wc)  
+    <h2>private pure subroutine set1(this, knot, Xc, Wc)  
 </h2>
     
 
-    <p>Set control points and weights for the NURBS volume object.</p>
+    <p>Set knot vector, control points and weights for the NURBS curve object.</p>
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -160,7 +160,7 @@ <h3>Arguments</h3>
         <tr>
             <td>
               <span class="anchor" id="variable-this"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -174,7 +174,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~2"></span>
+              <span class="anchor" id="variable-knot~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -182,44 +182,14 @@ <h3>Arguments</h3>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>knot1</strong>(:)</td>
+            <td><strong>knot</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~2"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>knot2</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-knot3~2"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>knot3</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-xc~4"></span>
+              <span class="anchor" id="variable-xc~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -234,7 +204,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~3"></span>
+              <span class="anchor" id="variable-wc~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -262,112 +232,91 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set1~~CallsGraph Pages: 1 -->
-<svg id="procset1CallsGraph" width="641pt" height="55pt"
- viewBox="0.00 0.00 641.00 54.71" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set1~~CallsGraph" class="graph" transform="scale(1.35 1.35) rotate(0) translate(4 70)">
+<svg id="procset1CallsGraph" width="641pt" height="57pt"
+ viewBox="0.00 0.00 641.00 56.54" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set1~~CallsGraph" class="graph" transform="scale(1.31 1.31) rotate(0) translate(4 70)">
 <title>proc~~set1~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 863,-70 863,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 835,-70 835,4 -4,4"/>
 <!-- proc~set1 -->
 <g id="proc~~set1~~CallsGraph_node1" class="node">
 <title>proc~set1</title>
-<polygon fill="none" stroke="black" points="120,-45 0,-45 0,-21 120,-21 120,-45"/>
-<text text-anchor="middle" x="60" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set1</text>
+<polygon fill="none" stroke="black" points="110,-45 0,-45 0,-21 110,-21 110,-45"/>
+<text text-anchor="middle" x="55" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set1</text>
 </g>
 <!-- proc~cmp_degree -->
 <g id="proc~~set1~~CallsGraph_node2" class="node">
 <title>proc~cmp_degree</title>
-<g id="a_proc~~set1~~CallsGraph_node2"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="319,-65 156,-65 156,-41 319,-41 319,-65"/>
-<text text-anchor="middle" x="237.5" y="-50.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
+<g id="a_proc~~set1~~CallsGraph_node2"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="300,-45 146,-45 146,-21 300,-21 300,-45"/>
+<text text-anchor="middle" x="223" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~set1&#45;&gt;proc~cmp_degree -->
 <g id="proc~~set1~~CallsGraph_edge1" class="edge">
 <title>proc~set1&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#ff0000" d="M120.42,-39.77C128.64,-40.71 137.23,-41.69 145.86,-42.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="145.65,-46.17 155.98,-43.82 146.44,-39.21 145.65,-46.17"/>
-</g>
-<!-- proc~cmp_nc -->
-<g id="proc~~set1~~CallsGraph_node3" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_proc~~set1~~CallsGraph_node3"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="513.5,-24 374.5,-24 374.5,0 513.5,0 513.5,-24"/>
-<text text-anchor="middle" x="444" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
-</a>
-</g>
-</g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
-<g id="proc~~set1~~CallsGraph_edge2" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#ff0000" d="M120.27,-29.74C185.82,-26.14 291.73,-20.32 364.22,-16.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="364.42,-19.83 374.22,-15.78 364.04,-12.84 364.42,-19.83"/>
+<path fill="none" stroke="#ff0000" d="M110.35,-33C118.51,-33 127.09,-33 135.71,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="135.83,-36.5 145.83,-33 135.83,-29.5 135.83,-36.5"/>
 </g>
 <!-- proc~get_multiplicity -->
-<g id="proc~~set1~~CallsGraph_node5" class="node">
+<g id="proc~~set1~~CallsGraph_node3" class="node">
 <title>proc~get_multiplicity</title>
-<g id="a_proc~~set1~~CallsGraph_node5"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="533,-66 355,-66 355,-42 533,-42 533,-66"/>
-<text text-anchor="middle" x="444" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
+<g id="a_proc~~set1~~CallsGraph_node3"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="505,-45 336,-45 336,-21 505,-21 505,-45"/>
+<text text-anchor="middle" x="420.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
-<g id="proc~~set1~~CallsGraph_edge3" class="edge">
+<g id="proc~~set1~~CallsGraph_edge2" class="edge">
 <title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M319.03,-53.39C327.47,-53.44 336.11,-53.48 344.71,-53.52"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="344.76,-57.02 354.78,-53.57 344.8,-50.02 344.76,-57.02"/>
+<path fill="none" stroke="#ff0000" d="M300.15,-33C308.54,-33 317.17,-33 325.75,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="325.79,-36.5 335.79,-33 325.79,-29.5 325.79,-36.5"/>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~set1~~CallsGraph_node4" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~set1~~CallsGraph_node4"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="693,-45 569,-45 569,-21 693,-21 693,-45"/>
-<text text-anchor="middle" x="631" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="665,-45 541,-45 541,-21 665,-21 665,-45"/>
+<text text-anchor="middle" x="603" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~set1~~CallsGraph_edge4" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00ffff" d="M513.62,-19.79C528.33,-21.46 543.9,-23.23 558.7,-24.91"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="558.48,-28.4 568.81,-26.05 559.27,-21.45 558.48,-28.4"/>
+<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
+<g id="proc~~set1~~CallsGraph_edge3" class="edge">
+<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
+<path fill="none" stroke="#ff0000" d="M505.15,-33C513.73,-33 522.4,-33 530.84,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="530.99,-36.5 540.99,-33 530.99,-29.5 530.99,-36.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
-<g id="proc~~set1~~CallsGraph_node6" class="node">
+<g id="proc~~set1~~CallsGraph_node5" class="node">
 <title>proc~compute_multiplicity1</title>
-<g id="a_proc~~set1~~CallsGraph_node6"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="859,-66 729,-66 729,-42 859,-42 859,-66"/>
-<text text-anchor="middle" x="794" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<g id="a_proc~~set1~~CallsGraph_node5"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="831,-66 701,-66 701,-42 831,-42 831,-66"/>
+<text text-anchor="middle" x="766" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
-<g id="proc~~set1~~CallsGraph_edge5" class="edge">
+<g id="proc~~set1~~CallsGraph_edge4" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M693.33,-41C701.69,-42.09 710.35,-43.22 718.92,-44.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="718.53,-47.82 728.9,-45.64 719.44,-40.88 718.53,-47.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M665.33,-41C673.69,-42.09 682.35,-43.22 690.92,-44.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="690.53,-47.82 700.9,-45.64 691.44,-40.88 690.53,-47.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
-<g id="proc~~set1~~CallsGraph_node7" class="node">
+<g id="proc~~set1~~CallsGraph_node6" class="node">
 <title>proc~compute_multiplicity2</title>
-<g id="a_proc~~set1~~CallsGraph_node7"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="859,-24 729,-24 729,0 859,0 859,-24"/>
-<text text-anchor="middle" x="794" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<g id="a_proc~~set1~~CallsGraph_node6"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="831,-24 701,-24 701,0 831,0 831,-24"/>
+<text text-anchor="middle" x="766" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
-<g id="proc~~set1~~CallsGraph_edge6" class="edge">
+<g id="proc~~set1~~CallsGraph_edge5" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M693.33,-25C701.69,-23.91 710.35,-22.78 718.92,-21.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="719.44,-25.12 728.9,-20.36 718.53,-18.18 719.44,-25.12"/>
-</g>
-<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~set1~~CallsGraph_edge7" class="edge">
-<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00ffff" d="M533.17,-43.99C541.77,-43.02 550.42,-42.03 558.82,-41.08"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="559.39,-44.54 568.93,-39.93 558.6,-37.58 559.39,-44.54"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M665.33,-25C673.69,-23.91 682.35,-22.78 690.92,-21.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="691.44,-25.12 700.9,-20.36 690.53,-18.18 691.44,-25.12"/>
 </g>
 </g>
 </svg>
@@ -467,355 +416,310 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set1~~CalledByGraph Pages: 1 -->
-<svg id="procset1CalledByGraph" width="641pt" height="488pt"
- viewBox="0.00 0.00 641.00 488.05" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set1~~CalledByGraph" class="graph" transform="scale(1.31 1.31) rotate(0) translate(4 633.29)">
+<svg id="procset1CalledByGraph" width="641pt" height="448pt"
+ viewBox="0.00 0.00 641.00 448.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set1~~CalledByGraph" class="graph" transform="scale(1.22 1.22) rotate(0) translate(4 544.5)">
 <title>proc~~set1~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-633.29 833,-633.29 833,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-544.5 780,-544.5 780,4 -4,4"/>
 <!-- proc~set1 -->
 <g id="proc~~set1~~CalledByGraph_node1" class="node">
 <title>proc~set1</title>
-<polygon fill="none" stroke="black" points="829,-318 709,-318 709,-294 829,-294 829,-318"/>
-<text text-anchor="middle" x="769" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set1</text>
+<polygon fill="none" stroke="black" points="776,-276 666,-276 666,-252 776,-252 776,-276"/>
+<text text-anchor="middle" x="721" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set1</text>
 </g>
 <!-- none~set -->
 <g id="proc~~set1~~CalledByGraph_node2" class="node">
 <title>none~set</title>
-<g id="a_proc~~set1~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="673,-318 560,-318 560,-294 673,-294 673,-318"/>
-<text text-anchor="middle" x="616.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<g id="a_proc~~set1~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="630,-276 527,-276 527,-252 630,-252 630,-276"/>
+<text text-anchor="middle" x="578.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set1 -->
 <g id="proc~~set1~~CalledByGraph_edge1" class="edge">
 <title>none~set&#45;&gt;proc~set1</title>
-<path fill="none" stroke="#ff0000" d="M673.11,-306C681.48,-306 690.19,-306 698.8,-306"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="698.83,-309.5 708.83,-306 698.83,-302.5 698.83,-309.5"/>
+<path fill="none" stroke="#ff0000" d="M630.22,-264C638.38,-264 646.92,-264 655.35,-264"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="655.55,-267.5 665.55,-264 655.55,-260.5 655.55,-267.5"/>
 </g>
 <!-- proc~ansatz -->
 <g id="proc~~set1~~CalledByGraph_node3" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~set1~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-566 367.5,-566 367.5,-542 499.5,-542 499.5,-566"/>
-<text text-anchor="middle" x="433.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~set1~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="467,-482 345,-482 345,-458 467,-458 467,-482"/>
+<text text-anchor="middle" x="406" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;none~set -->
 <g id="proc~~set1~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.76,-542.65C508.6,-539.03 517.01,-534.27 524,-528 584.64,-473.59 606.02,-372.87 612.74,-328.26"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="616.23,-328.58 614.15,-318.19 609.3,-327.61 616.23,-328.58"/>
+<path fill="none" stroke="#ff0000" d="M467.12,-458.13C475.76,-454.59 484.06,-449.98 491,-444 540.47,-401.35 563.98,-323.98 572.94,-286.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="576.41,-286.63 575.18,-276.11 569.58,-285.1 576.41,-286.63"/>
 </g>
 <!-- proc~elevate_degree -->
 <g id="proc~~set1~~CalledByGraph_node4" class="node">
 <title>proc~elevate_degree</title>
-<g id="a_proc~~set1~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-486 343.5,-486 343.5,-462 523.5,-462 523.5,-486"/>
-<text text-anchor="middle" x="433.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
+<g id="a_proc~~set1~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="491,-402 321,-402 321,-378 491,-378 491,-402"/>
+<text text-anchor="middle" x="406" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree&#45;&gt;none~set -->
 <g id="proc~~set1~~CalledByGraph_edge3" class="edge">
 <title>proc~elevate_degree&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M507.95,-461.94C513.63,-459.48 519.07,-456.54 524,-453 568.52,-421.06 596.03,-360.08 608.18,-327.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="611.5,-328.73 611.59,-318.14 604.91,-326.36 611.5,-328.73"/>
+<path fill="none" stroke="#ff0000" d="M472.9,-377.91C479.26,-375.47 485.41,-372.53 491,-369 524.67,-347.73 551.51,-308.93 565.91,-284.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="568.98,-286.61 570.98,-276.21 562.92,-283.09 568.98,-286.61"/>
 </g>
 <!-- proc~insert_knots -->
 <g id="proc~~set1~~CalledByGraph_node5" class="node">
 <title>proc~insert_knots</title>
-<g id="a_proc~~set1~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514,-444 353,-444 353,-420 514,-420 514,-444"/>
-<text text-anchor="middle" x="433.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
+<g id="a_proc~~set1~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_curve%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-360 330.5,-360 330.5,-336 481.5,-336 481.5,-360"/>
+<text text-anchor="middle" x="406" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;none~set -->
 <g id="proc~~set1~~CalledByGraph_edge4" class="edge">
 <title>proc~insert_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M505.06,-419.93C511.69,-417.49 518.12,-414.54 524,-411 558.92,-389.96 587.54,-351.08 603,-327"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="606.13,-328.6 608.45,-318.26 600.19,-324.89 606.13,-328.6"/>
+<path fill="none" stroke="#ff0000" d="M467.18,-335.97C475.36,-333.47 483.51,-330.5 491,-327 515.36,-315.61 539.83,-296.96 556.5,-282.9"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="559.18,-285.21 564.46,-276.02 554.6,-279.91 559.18,-285.21"/>
 </g>
 <!-- proc~modify_wc -->
 <g id="proc~~set1~~CalledByGraph_node6" class="node">
 <title>proc~modify_wc</title>
-<g id="a_proc~~set1~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-360 355.5,-360 355.5,-336 511.5,-336 511.5,-360"/>
-<text text-anchor="middle" x="433.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
+<g id="a_proc~~set1~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="479,-276 333,-276 333,-252 479,-252 479,-276"/>
+<text text-anchor="middle" x="406" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~set -->
 <g id="proc~~set1~~CalledByGraph_edge5" class="edge">
 <title>proc~modify_wc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M486.37,-335.96C507.38,-331.09 531.82,-325.42 553.75,-320.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="554.68,-323.71 563.63,-318.04 553.09,-316.89 554.68,-323.71"/>
+<path fill="none" stroke="#ff0000" d="M479.31,-264C491.66,-264 504.39,-264 516.42,-264"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="516.78,-267.5 526.78,-264 516.78,-260.5 516.78,-267.5"/>
 </g>
 <!-- proc~modify_xc -->
 <g id="proc~~set1~~CalledByGraph_node7" class="node">
 <title>proc~modify_xc</title>
-<g id="a_proc~~set1~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="510,-318 357,-318 357,-294 510,-294 510,-318"/>
-<text text-anchor="middle" x="433.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
+<g id="a_proc~~set1~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-234 334.5,-234 334.5,-210 477.5,-210 477.5,-234"/>
+<text text-anchor="middle" x="406" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~set -->
 <g id="proc~~set1~~CalledByGraph_edge6" class="edge">
 <title>proc~modify_xc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M510.21,-306C523.36,-306 536.93,-306 549.79,-306"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="549.92,-309.5 559.92,-306 549.92,-302.5 549.92,-309.5"/>
+<path fill="none" stroke="#ff0000" d="M455.86,-234.04C475.48,-238.87 498.26,-244.48 518.77,-249.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="518.09,-252.97 528.63,-251.96 519.76,-246.17 518.09,-252.97"/>
 </g>
 <!-- proc~remove_knots -->
 <g id="proc~~set1~~CalledByGraph_node8" class="node">
 <title>proc~remove_knots</title>
-<g id="a_proc~~set1~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-402 347.5,-402 347.5,-378 519.5,-378 519.5,-402"/>
-<text text-anchor="middle" x="433.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
+<g id="a_proc~~set1~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_curve%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="487,-318 325,-318 325,-294 487,-294 487,-318"/>
+<text text-anchor="middle" x="406" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots&#45;&gt;none~set -->
 <g id="proc~~set1~~CalledByGraph_edge7" class="edge">
 <title>proc~remove_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.01,-377.92C507.58,-375.44 516.12,-372.49 524,-369 549.77,-357.6 575.92,-338.69 593.63,-324.56"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="596.07,-327.09 601.61,-318.06 591.65,-321.66 596.07,-327.09"/>
+<path fill="none" stroke="#ff0000" d="M455.86,-293.96C475.48,-289.13 498.26,-283.52 518.77,-278.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="519.76,-281.83 528.63,-276.04 518.09,-275.03 519.76,-281.83"/>
 </g>
 <!-- proc~set_c -->
 <g id="proc~~set1~~CalledByGraph_node9" class="node">
 <title>proc~set_c</title>
-<g id="a_proc~~set1~~CalledByGraph_node9"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_volume%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-276 370.5,-276 370.5,-252 496.5,-252 496.5,-276"/>
-<text text-anchor="middle" x="433.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
+<g id="a_proc~~set1~~CalledByGraph_node9"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_curve%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="464,-192 348,-192 348,-168 464,-168 464,-192"/>
+<text text-anchor="middle" x="406" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c&#45;&gt;none~set -->
 <g id="proc~~set1~~CalledByGraph_edge8" class="edge">
 <title>proc~set_c&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M486.37,-276.04C507.38,-280.91 531.82,-286.58 553.75,-291.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="553.09,-295.11 563.63,-293.96 554.68,-288.29 553.09,-295.11"/>
+<path fill="none" stroke="#ff0000" d="M464.06,-191.1C473.28,-193.79 482.56,-197.05 491,-201 515.36,-212.39 539.83,-231.04 556.5,-245.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="554.6,-248.09 564.46,-251.98 559.18,-242.79 554.6,-248.09"/>
 </g>
-<!-- proc~set_half_ring -->
+<!-- proc~set_circle -->
 <g id="proc~~set1~~CalledByGraph_node10" class="node">
-<title>proc~set_half_ring</title>
-<g id="a_proc~~set1~~CalledByGraph_node10"><a xlink:href="../proc/set_half_ring.html" xlink:title="nurbs_volume%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="516,-234 351,-234 351,-210 516,-210 516,-234"/>
-<text text-anchor="middle" x="433.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
+<title>proc~set_circle</title>
+<g id="a_proc~~set1~~CalledByGraph_node10"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
+<polygon fill="#d9534f" stroke="#d9534f" points="474.5,-150 337.5,-150 337.5,-126 474.5,-126 474.5,-150"/>
+<text text-anchor="middle" x="406" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring&#45;&gt;none~set -->
+<!-- proc~set_circle&#45;&gt;none~set -->
 <g id="proc~~set1~~CalledByGraph_edge9" class="edge">
-<title>proc~set_half_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.01,-234.08C507.58,-236.56 516.12,-239.51 524,-243 549.77,-254.4 575.92,-273.31 593.63,-287.44"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="591.65,-290.34 601.61,-293.94 596.07,-284.91 591.65,-290.34"/>
+<title>proc~set_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M472.9,-150.09C479.26,-152.53 485.41,-155.47 491,-159 524.67,-180.27 551.51,-219.07 565.91,-243.08"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="562.92,-244.91 570.98,-251.79 568.98,-241.39 562.92,-244.91"/>
 </g>
-<!-- proc~set_hexahedron -->
+<!-- proc~set_half_circle -->
 <g id="proc~~set1~~CalledByGraph_node11" class="node">
-<title>proc~set_hexahedron</title>
-<g id="a_proc~~set1~~CalledByGraph_node11"><a xlink:href="../proc/set_hexahedron.html" xlink:title="nurbs_volume%set_hexahedron">
-<polygon fill="#d9534f" stroke="#d9534f" points="524,-192 343,-192 343,-168 524,-168 524,-192"/>
-<text text-anchor="middle" x="433.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
+<title>proc~set_half_circle</title>
+<g id="a_proc~~set1~~CalledByGraph_node11"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
+<polygon fill="#d9534f" stroke="#d9534f" points="487.5,-108 324.5,-108 324.5,-84 487.5,-84 487.5,-108"/>
+<text text-anchor="middle" x="406" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_hexahedron&#45;&gt;none~set -->
+<!-- proc~set_half_circle&#45;&gt;none~set -->
 <g id="proc~~set1~~CalledByGraph_edge10" class="edge">
-<title>proc~set_hexahedron&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M505.06,-192.07C511.69,-194.51 518.12,-197.46 524,-201 558.92,-222.04 587.54,-260.92 603,-285"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="600.19,-287.11 608.45,-293.74 606.13,-283.4 600.19,-287.11"/>
+<title>proc~set_half_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M475.62,-108.12C481.09,-110.56 486.3,-113.49 491,-117 534.04,-149.18 559.53,-209.61 570.72,-242.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="567.51,-243.52 573.97,-251.92 574.16,-241.32 567.51,-243.52"/>
 </g>
-<!-- proc~set_ring -->
+<!-- program~compute_length -->
 <g id="proc~~set1~~CalledByGraph_node12" class="node">
-<title>proc~set_ring</title>
-<g id="a_proc~~set1~~CalledByGraph_node12"><a xlink:href="../proc/set_ring.html" xlink:title="nurbs_volume%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="503,-150 364,-150 364,-126 503,-126 503,-150"/>
-<text text-anchor="middle" x="433.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
+<title>program~compute_length</title>
+<g id="a_proc~~set1~~CalledByGraph_node12"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-502 0,-502 0,-478 99,-478 99,-502"/>
+<text text-anchor="middle" x="49.5" y="-487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring&#45;&gt;none~set -->
+<!-- program~compute_length&#45;&gt;none~set -->
 <g id="proc~~set1~~CalledByGraph_edge11" class="edge">
-<title>proc~set_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.41,-148.22C510.74,-151.01 517.78,-154.53 524,-159 568.52,-190.94 596.03,-251.92 608.18,-284.39"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="604.91,-285.64 611.59,-293.86 611.5,-283.27 604.91,-285.64"/>
+<title>program~compute_length&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M84.64,-502.01C164.06,-527.61 364.11,-578.44 491,-491 559.8,-443.59 573.92,-333.61 576.79,-286.3"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="580.29,-286.35 577.28,-276.19 573.3,-286.01 580.29,-286.35"/>
+</g>
+<!-- proc~cmp_length -->
+<g id="proc~~set1~~CalledByGraph_node16" class="node">
+<title>proc~cmp_length</title>
+<g id="a_proc~~set1~~CalledByGraph_node16"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
+<polygon fill="#d9534f" stroke="#d9534f" points="285,-482 135,-482 135,-458 285,-458 285,-482"/>
+<text text-anchor="middle" x="210" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+</a>
+</g>
+</g>
+<!-- program~compute_length&#45;&gt;proc~cmp_length -->
+<g id="proc~~set1~~CalledByGraph_edge22" class="edge">
+<title>program~compute_length&#45;&gt;proc~cmp_length</title>
+<path fill="none" stroke="#ff0000" d="M99.35,-483.84C107.54,-482.8 116.25,-481.7 125.03,-480.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="125.48,-484.07 134.96,-479.34 124.6,-477.12 125.48,-484.07"/>
 </g>
-<!-- program~compute_volume -->
+<!-- program~example1_curve -->
 <g id="proc~~set1~~CalledByGraph_node13" class="node">
-<title>program~compute_volume</title>
-<g id="a_proc~~set1~~CalledByGraph_node13"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-586 0,-586 0,-562 105,-562 105,-586"/>
-<text text-anchor="middle" x="52.5" y="-571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~set1~~CalledByGraph_node13"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-381 160,-381 160,-357 260,-357 260,-381"/>
+<text text-anchor="middle" x="210" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;none~set -->
+<!-- program~example1_curve&#45;&gt;none~set -->
 <g id="proc~~set1~~CalledByGraph_edge12" class="edge">
-<title>program~compute_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M86.78,-586.01C169.65,-613.64 388.35,-672.14 524,-575 605.44,-516.68 615.25,-381.64 615.83,-328.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="619.33,-328.19 615.83,-318.18 612.33,-328.18 619.33,-328.19"/>
+<title>program~example1_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M233.08,-381.16C282.76,-406.72 405.66,-459.8 491,-411 538.32,-383.94 562.31,-319.79 572.06,-285.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="575.49,-286.59 574.73,-276.02 568.74,-284.75 575.49,-286.59"/>
 </g>
-<!-- proc~cmp_volume -->
-<g id="proc~~set1~~CalledByGraph_node18" class="node">
-<title>proc~cmp_volume</title>
-<g id="a_proc~~set1~~CalledByGraph_node18"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-566 141,-566 141,-542 307,-542 307,-566"/>
-<text text-anchor="middle" x="224" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
-</a>
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
+<g id="proc~~set1~~CalledByGraph_edge16" class="edge">
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
+<path fill="none" stroke="#ff7500" d="M260.21,-374.33C275.59,-375.99 293.12,-377.89 310.54,-379.78"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="310.45,-383.29 320.77,-380.88 311.21,-376.33 310.45,-383.29"/>
 </g>
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
+<g id="proc~~set1~~CalledByGraph_edge17" class="edge">
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
+<path fill="none" stroke="#ffeb00" d="M260.21,-363.67C278.44,-361.7 299.67,-359.4 320.17,-357.18"/>
+<polygon fill="#ffeb00" stroke="#ffeb00" points="320.6,-360.66 330.16,-356.1 319.84,-353.7 320.6,-360.66"/>
 </g>
-<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
-<g id="proc~~set1~~CalledByGraph_edge25" class="edge">
-<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#ff0000" d="M105.28,-567.89C113.48,-566.92 122.18,-565.9 130.98,-564.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="131.41,-568.33 140.93,-563.68 130.59,-561.38 131.41,-568.33"/>
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
+<g id="proc~~set1~~CalledByGraph_edge18" class="edge">
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
+<path fill="none" stroke="#00ff4e" d="M239.62,-356.99C261.63,-348.02 292.92,-335.84 321,-327 328.08,-324.77 335.55,-322.62 343,-320.6"/>
+<polygon fill="#00ff4e" stroke="#00ff4e" points="343.97,-323.97 352.75,-318.03 342.19,-317.2 343.97,-323.97"/>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example_nurbs_curve -->
 <g id="proc~~set1~~CalledByGraph_node14" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~set1~~CalledByGraph_node14"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-465 169,-465 169,-441 279,-441 279,-465"/>
-<text text-anchor="middle" x="224" y="-450.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example_nurbs_curve</title>
+<g id="a_proc~~set1~~CalledByGraph_node14"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 341.5,-66 341.5,-42 470.5,-42 470.5,-66"/>
+<text text-anchor="middle" x="406" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;none~set -->
+<!-- program~example_nurbs_curve&#45;&gt;none~set -->
 <g id="proc~~set1~~CalledByGraph_edge13" class="edge">
-<title>program~example3_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M246.93,-465.12C299.32,-492.29 434.06,-551.38 524,-495 583.54,-457.67 605.3,-369.39 612.41,-328.06"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="615.87,-328.6 613.98,-318.18 608.95,-327.5 615.87,-328.6"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
-<g id="proc~~set1~~CalledByGraph_edge18" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#ff6600" d="M279.25,-458.49C295.84,-460.17 314.64,-462.07 333.24,-463.95"/>
-<polygon fill="#ff6600" stroke="#ff6600" points="332.94,-467.44 343.24,-464.97 333.64,-460.48 332.94,-467.44"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
-<g id="proc~~set1~~CalledByGraph_edge19" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#ffcc00" d="M279.25,-447.51C298.63,-445.55 321.03,-443.28 342.61,-441.1"/>
-<polygon fill="#ffcc00" stroke="#ffcc00" points="343.19,-444.56 352.79,-440.07 342.49,-437.59 343.19,-444.56"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
-<g id="proc~~set1~~CalledByGraph_edge20" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#00ff00" d="M255.75,-440.99C279.38,-432.02 312.96,-419.84 343,-411 350.73,-408.73 358.89,-406.53 367.01,-404.47"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="368,-407.84 376.87,-402.04 366.32,-401.04 368,-407.84"/>
+<title>program~example_nurbs_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M470.56,-63.24C477.95,-66.17 484.99,-70 491,-75 543.77,-118.84 565.87,-201.81 573.75,-241.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="570.34,-242.42 575.61,-251.62 577.22,-241.15 570.34,-242.42"/>
 </g>
-<!-- program~example_nurbs_volume -->
+<!-- program~nearest_point_1d -->
 <g id="proc~~set1~~CalledByGraph_node15" class="node">
-<title>program~example_nurbs_volume</title>
-<g id="a_proc~~set1~~CalledByGraph_node15"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-108 364,-108 364,-84 503,-84 503,-108"/>
-<text text-anchor="middle" x="433.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<title>program~nearest_point_1d</title>
+<g id="a_proc~~set1~~CalledByGraph_node15"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="457.5,-24 354.5,-24 354.5,0 457.5,0 457.5,-24"/>
+<text text-anchor="middle" x="406" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;none~set -->
+<!-- program~nearest_point_1d&#45;&gt;none~set -->
 <g id="proc~~set1~~CalledByGraph_edge14" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.44,-105.4C510.85,-108.33 517.9,-112.11 524,-117 578.22,-160.42 602.42,-243.9 611.25,-283.76"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="607.82,-284.49 613.3,-293.56 614.67,-283.05 607.82,-284.49"/>
+<title>program~nearest_point_1d&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M457.92,-16.54C469.88,-19.69 481.8,-24.79 491,-33 553.86,-89.12 571.19,-195.45 575.85,-241.64"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="572.38,-242.13 576.76,-251.78 579.35,-241.51 572.38,-242.13"/>
 </g>
-<!-- program~example_put_to_nurbs -->
-<g id="proc~~set1~~CalledByGraph_node16" class="node">
-<title>program~example_put_to_nurbs</title>
-<g id="a_proc~~set1~~CalledByGraph_node16"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-66 367.5,-66 367.5,-42 499.5,-42 499.5,-66"/>
-<text text-anchor="middle" x="433.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
-</a>
-</g>
-</g>
-<!-- program~example_put_to_nurbs&#45;&gt;none~set -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="proc~~set1~~CalledByGraph_edge15" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.72,-61.4C508.57,-64.57 516.99,-68.95 524,-75 588.41,-130.59 607.88,-237.64 613.43,-283.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="609.97,-284.43 614.54,-293.99 616.93,-283.67 609.97,-284.43"/>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M285.17,-470C301.32,-470 318.36,-470 334.36,-470"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="334.71,-473.5 344.71,-470 334.71,-466.5 334.71,-473.5"/>
 </g>
-<!-- program~nearest_point_3d -->
+<!-- program~shape_c_1d -->
 <g id="proc~~set1~~CalledByGraph_node17" class="node">
-<title>program~nearest_point_3d</title>
-<g id="a_proc~~set1~~CalledByGraph_node17"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-24 382,-24 382,0 485,0 485,-24"/>
-<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
+<title>program~shape_c_1d</title>
+<g id="a_proc~~set1~~CalledByGraph_node17"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-192 172,-192 172,-168 248,-168 248,-192"/>
+<text text-anchor="middle" x="210" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;none~set -->
-<g id="proc~~set1~~CalledByGraph_edge16" class="edge">
-<title>program~nearest_point_3d&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M485.2,-14.84C499.17,-17.86 513.38,-23.33 524,-33 598.53,-100.9 612.42,-231.28 614.96,-283.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="611.47,-283.86 615.35,-293.71 618.46,-283.58 611.47,-283.86"/>
-</g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~set1~~CalledByGraph_edge17" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.01,-554C323.61,-554 341,-554 357.35,-554"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="357.38,-557.5 367.38,-554 357.38,-550.5 357.38,-557.5"/>
-</g>
-<!-- program~shape_c_3d -->
-<g id="proc~~set1~~CalledByGraph_node19" class="node">
-<title>program~shape_c_3d</title>
-<g id="a_proc~~set1~~CalledByGraph_node19"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-276 186,-276 186,-252 262,-252 262,-276"/>
-<text text-anchor="middle" x="224" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_c_3d&#45;&gt;proc~set_c -->
-<g id="proc~~set1~~CalledByGraph_edge21" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~set_c</title>
-<path fill="none" stroke="#00ff66" d="M262.1,-264C289.25,-264 326.96,-264 360,-264"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="360.09,-267.5 370.09,-264 360.09,-260.5 360.09,-267.5"/>
-</g>
-<!-- program~shape_half_ring_3d -->
-<g id="proc~~set1~~CalledByGraph_node20" class="node">
-<title>program~shape_half_ring_3d</title>
-<g id="a_proc~~set1~~CalledByGraph_node20"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-234 166.5,-234 166.5,-210 281.5,-210 281.5,-234"/>
-<text text-anchor="middle" x="224" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
-</a>
-</g>
+<!-- program~shape_c_1d&#45;&gt;proc~set_c -->
+<g id="proc~~set1~~CalledByGraph_edge19" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~set_c</title>
+<path fill="none" stroke="#00ffc4" d="M248.41,-180C273.62,-180 307.6,-180 337.47,-180"/>
+<polygon fill="#00ffc4" stroke="#00ffc4" points="337.84,-183.5 347.84,-180 337.84,-176.5 337.84,-183.5"/>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~set_half_ring -->
-<g id="proc~~set1~~CalledByGraph_edge22" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~set_half_ring</title>
-<path fill="none" stroke="#00ffcb" d="M281.7,-222C299.97,-222 320.71,-222 340.84,-222"/>
-<polygon fill="#00ffcb" stroke="#00ffcb" points="340.97,-225.5 350.97,-222 340.97,-218.5 340.97,-225.5"/>
-</g>
-<!-- program~shape_hexahedron -->
-<g id="proc~~set1~~CalledByGraph_node21" class="node">
-<title>program~shape_hexahedron</title>
-<g id="a_proc~~set1~~CalledByGraph_node21"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-192 167.5,-192 167.5,-168 280.5,-168 280.5,-192"/>
-<text text-anchor="middle" x="224" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
+<!-- program~shape_circle -->
+<g id="proc~~set1~~CalledByGraph_node18" class="node">
+<title>program~shape_circle</title>
+<g id="a_proc~~set1~~CalledByGraph_node18"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249.5,-150 170.5,-150 170.5,-126 249.5,-126 249.5,-150"/>
+<text text-anchor="middle" x="210" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~set_hexahedron -->
-<g id="proc~~set1~~CalledByGraph_edge23" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~set_hexahedron</title>
-<path fill="none" stroke="#00cbff" d="M280.61,-180C296.56,-180 314.47,-180 332.24,-180"/>
-<polygon fill="#00cbff" stroke="#00cbff" points="332.67,-183.5 342.67,-180 332.67,-176.5 332.67,-183.5"/>
+<!-- program~shape_circle&#45;&gt;proc~set_circle -->
+<g id="proc~~set1~~CalledByGraph_edge20" class="edge">
+<title>program~shape_circle&#45;&gt;proc~set_circle</title>
+<path fill="none" stroke="#00c4ff" d="M249.79,-138C271.95,-138 300.54,-138 327.13,-138"/>
+<polygon fill="#00c4ff" stroke="#00c4ff" points="327.21,-141.5 337.21,-138 327.21,-134.5 327.21,-141.5"/>
 </g>
-<!-- program~shape_ring_3d -->
-<g id="proc~~set1~~CalledByGraph_node22" class="node">
-<title>program~shape_ring_3d</title>
-<g id="a_proc~~set1~~CalledByGraph_node22"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-150 179,-150 179,-126 269,-126 269,-150"/>
-<text text-anchor="middle" x="224" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+<!-- program~shape_half_circle -->
+<g id="proc~~set1~~CalledByGraph_node19" class="node">
+<title>program~shape_half_circle</title>
+<g id="a_proc~~set1~~CalledByGraph_node19"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-108 158,-108 158,-84 262,-84 262,-108"/>
+<text text-anchor="middle" x="210" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~set_ring -->
-<g id="proc~~set1~~CalledByGraph_edge24" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~set_ring</title>
-<path fill="none" stroke="#0066ff" d="M269.01,-138C293.59,-138 324.96,-138 353.63,-138"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="353.65,-141.5 363.65,-138 353.65,-134.5 353.65,-141.5"/>
+<!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
+<g id="proc~~set1~~CalledByGraph_edge21" class="edge">
+<title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
+<path fill="none" stroke="#004eff" d="M262.22,-96C278.08,-96 296.06,-96 313.78,-96"/>
+<polygon fill="#004eff" stroke="#004eff" points="314.17,-99.5 324.17,-96 314.17,-92.5 314.17,-99.5"/>
 </g>
 </g>
 </svg>
@@ -935,7 +839,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set1a.html b/proc/set1a.html
index 12ddf01b4..b365d34f0 100644
--- a/proc/set1a.html
+++ b/proc/set1a.html
@@ -159,7 +159,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~133"></span>
+              <span class="anchor" id="variable-this~2"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -174,7 +174,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~18"></span>
+              <span class="anchor" id="variable-knot~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -189,7 +189,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~53"></span>
+              <span class="anchor" id="variable-xc~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -204,7 +204,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~50"></span>
+              <span class="anchor" id="variable-wc~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -243,33 +243,33 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="117,-45 0,-45 0,-21 117,-21 117,-45"/>
 <text text-anchor="middle" x="58.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set1a</text>
 </g>
-<!-- proc~cmp_degree~3 -->
+<!-- proc~cmp_degree -->
 <g id="proc~~set1a~~CallsGraph_node2" class="node">
-<title>proc~cmp_degree~3</title>
-<g id="a_proc~~set1a~~CallsGraph_node2"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
+<title>proc~cmp_degree</title>
+<g id="a_proc~~set1a~~CallsGraph_node2"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="307,-45 153,-45 153,-21 307,-21 307,-45"/>
 <text text-anchor="middle" x="230" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
 <g id="proc~~set1a~~CallsGraph_edge1" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
 <path fill="none" stroke="#ff0000" d="M117.36,-33C125.56,-33 134.14,-33 142.74,-33"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="142.82,-36.5 152.82,-33 142.82,-29.5 142.82,-36.5"/>
 </g>
-<!-- proc~get_multiplicity~3 -->
+<!-- proc~get_multiplicity -->
 <g id="proc~~set1a~~CallsGraph_node3" class="node">
-<title>proc~get_multiplicity~3</title>
-<g id="a_proc~~set1a~~CallsGraph_node3"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
+<title>proc~get_multiplicity</title>
+<g id="a_proc~~set1a~~CallsGraph_node3"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="512,-45 343,-45 343,-21 512,-21 512,-45"/>
 <text text-anchor="middle" x="427.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
+<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="proc~~set1a~~CallsGraph_edge2" class="edge">
-<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
+<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
 <path fill="none" stroke="#ff0000" d="M307.15,-33C315.54,-33 324.17,-33 332.75,-33"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="332.79,-36.5 342.79,-33 332.79,-29.5 332.79,-36.5"/>
 </g>
@@ -282,9 +282,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set1a~~CallsGraph_edge3" class="edge">
-<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#ff0000" d="M512.15,-33C520.73,-33 529.4,-33 537.84,-33"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="537.99,-36.5 547.99,-33 537.99,-29.5 537.99,-36.5"/>
 </g>
@@ -427,139 +427,139 @@ <h3 class="card-title">Called by</h3>
 <polygon fill="none" stroke="black" points="783,-276 666,-276 666,-252 783,-252 783,-276"/>
 <text text-anchor="middle" x="724.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set1a</text>
 </g>
-<!-- none~set~3 -->
+<!-- none~set -->
 <g id="proc~~set1a~~CalledByGraph_node2" class="node">
-<title>none~set~3</title>
-<g id="a_proc~~set1a~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
+<title>none~set</title>
+<g id="a_proc~~set1a~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="630,-276 527,-276 527,-252 630,-252 630,-276"/>
 <text text-anchor="middle" x="578.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="proc~~set1a~~CalledByGraph_edge1" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
+<title>none~set&#45;&gt;proc~set1a</title>
 <path fill="none" stroke="#ff0000" d="M630.27,-264C638.53,-264 647.21,-264 655.8,-264"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="655.82,-267.5 665.82,-264 655.82,-260.5 655.82,-267.5"/>
 </g>
-<!-- proc~ansatz~3 -->
+<!-- proc~ansatz -->
 <g id="proc~~set1a~~CalledByGraph_node3" class="node">
-<title>proc~ansatz~3</title>
-<g id="a_proc~~set1a~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
+<title>proc~ansatz</title>
+<g id="a_proc~~set1a~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="467,-482 345,-482 345,-458 467,-458 467,-482"/>
 <text text-anchor="middle" x="406" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;none~set~3 -->
+<!-- proc~ansatz&#45;&gt;none~set -->
 <g id="proc~~set1a~~CalledByGraph_edge2" class="edge">
-<title>proc~ansatz~3&#45;&gt;none~set~3</title>
+<title>proc~ansatz&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M467.12,-458.13C475.76,-454.59 484.06,-449.98 491,-444 540.47,-401.35 563.98,-323.98 572.94,-286.1"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="576.41,-286.63 575.18,-276.11 569.58,-285.1 576.41,-286.63"/>
 </g>
-<!-- proc~elevate_degree~3 -->
+<!-- proc~elevate_degree -->
 <g id="proc~~set1a~~CalledByGraph_node4" class="node">
-<title>proc~elevate_degree~3</title>
-<g id="a_proc~~set1a~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
+<title>proc~elevate_degree</title>
+<g id="a_proc~~set1a~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="491,-402 321,-402 321,-378 491,-378 491,-402"/>
 <text text-anchor="middle" x="406" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~elevate_degree~3&#45;&gt;none~set~3 -->
+<!-- proc~elevate_degree&#45;&gt;none~set -->
 <g id="proc~~set1a~~CalledByGraph_edge3" class="edge">
-<title>proc~elevate_degree~3&#45;&gt;none~set~3</title>
+<title>proc~elevate_degree&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M472.9,-377.91C479.26,-375.47 485.41,-372.53 491,-369 524.67,-347.73 551.51,-308.93 565.91,-284.92"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="568.98,-286.61 570.98,-276.21 562.92,-283.09 568.98,-286.61"/>
 </g>
-<!-- proc~insert_knots~3 -->
+<!-- proc~insert_knots -->
 <g id="proc~~set1a~~CalledByGraph_node5" class="node">
-<title>proc~insert_knots~3</title>
-<g id="a_proc~~set1a~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_curve%insert_knots">
+<title>proc~insert_knots</title>
+<g id="a_proc~~set1a~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_curve%insert_knots">
 <polygon fill="#d9534f" stroke="#d9534f" points="481.5,-360 330.5,-360 330.5,-336 481.5,-336 481.5,-360"/>
 <text text-anchor="middle" x="406" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
 </a>
 </g>
 </g>
-<!-- proc~insert_knots~3&#45;&gt;none~set~3 -->
+<!-- proc~insert_knots&#45;&gt;none~set -->
 <g id="proc~~set1a~~CalledByGraph_edge4" class="edge">
-<title>proc~insert_knots~3&#45;&gt;none~set~3</title>
+<title>proc~insert_knots&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M467.18,-335.97C475.36,-333.47 483.51,-330.5 491,-327 515.36,-315.61 539.83,-296.96 556.5,-282.9"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="559.18,-285.21 564.46,-276.02 554.6,-279.91 559.18,-285.21"/>
 </g>
-<!-- proc~modify_wc~3 -->
+<!-- proc~modify_wc -->
 <g id="proc~~set1a~~CalledByGraph_node6" class="node">
-<title>proc~modify_wc~3</title>
-<g id="a_proc~~set1a~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
+<title>proc~modify_wc</title>
+<g id="a_proc~~set1a~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
 <polygon fill="#d9534f" stroke="#d9534f" points="479,-276 333,-276 333,-252 479,-252 479,-276"/>
 <text text-anchor="middle" x="406" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
+<!-- proc~modify_wc&#45;&gt;none~set -->
 <g id="proc~~set1a~~CalledByGraph_edge5" class="edge">
-<title>proc~modify_wc~3&#45;&gt;none~set~3</title>
+<title>proc~modify_wc&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M479.31,-264C491.66,-264 504.39,-264 516.42,-264"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="516.78,-267.5 526.78,-264 516.78,-260.5 516.78,-267.5"/>
 </g>
-<!-- proc~modify_xc~3 -->
+<!-- proc~modify_xc -->
 <g id="proc~~set1a~~CalledByGraph_node7" class="node">
-<title>proc~modify_xc~3</title>
-<g id="a_proc~~set1a~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
+<title>proc~modify_xc</title>
+<g id="a_proc~~set1a~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="477.5,-234 334.5,-234 334.5,-210 477.5,-210 477.5,-234"/>
 <text text-anchor="middle" x="406" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
+<!-- proc~modify_xc&#45;&gt;none~set -->
 <g id="proc~~set1a~~CalledByGraph_edge6" class="edge">
-<title>proc~modify_xc~3&#45;&gt;none~set~3</title>
+<title>proc~modify_xc&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M455.86,-234.04C475.48,-238.87 498.26,-244.48 518.77,-249.53"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="518.09,-252.97 528.63,-251.96 519.76,-246.17 518.09,-252.97"/>
 </g>
-<!-- proc~remove_knots~3 -->
+<!-- proc~remove_knots -->
 <g id="proc~~set1a~~CalledByGraph_node8" class="node">
-<title>proc~remove_knots~3</title>
-<g id="a_proc~~set1a~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_curve%remove_knots">
+<title>proc~remove_knots</title>
+<g id="a_proc~~set1a~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_curve%remove_knots">
 <polygon fill="#d9534f" stroke="#d9534f" points="487,-318 325,-318 325,-294 487,-294 487,-318"/>
 <text text-anchor="middle" x="406" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
 </a>
 </g>
 </g>
-<!-- proc~remove_knots~3&#45;&gt;none~set~3 -->
+<!-- proc~remove_knots&#45;&gt;none~set -->
 <g id="proc~~set1a~~CalledByGraph_edge7" class="edge">
-<title>proc~remove_knots~3&#45;&gt;none~set~3</title>
+<title>proc~remove_knots&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M455.86,-293.96C475.48,-289.13 498.26,-283.52 518.77,-278.47"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="519.76,-281.83 528.63,-276.04 518.09,-275.03 519.76,-281.83"/>
 </g>
-<!-- proc~set_circle -->
+<!-- proc~set_c -->
 <g id="proc~~set1a~~CalledByGraph_node9" class="node">
-<title>proc~set_circle</title>
-<g id="a_proc~~set1a~~CalledByGraph_node9"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="474.5,-192 337.5,-192 337.5,-168 474.5,-168 474.5,-192"/>
-<text text-anchor="middle" x="406" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
+<title>proc~set_c</title>
+<g id="a_proc~~set1a~~CalledByGraph_node9"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_curve%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="464,-192 348,-192 348,-168 464,-168 464,-192"/>
+<text text-anchor="middle" x="406" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
 </a>
 </g>
 </g>
-<!-- proc~set_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_c&#45;&gt;none~set -->
 <g id="proc~~set1a~~CalledByGraph_edge8" class="edge">
-<title>proc~set_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M467.18,-192.03C475.36,-194.53 483.51,-197.5 491,-201 515.36,-212.39 539.83,-231.04 556.5,-245.1"/>
+<title>proc~set_c&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M464.06,-191.1C473.28,-193.79 482.56,-197.05 491,-201 515.36,-212.39 539.83,-231.04 556.5,-245.1"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="554.6,-248.09 564.46,-251.98 559.18,-242.79 554.6,-248.09"/>
 </g>
-<!-- proc~set_c~3 -->
+<!-- proc~set_circle -->
 <g id="proc~~set1a~~CalledByGraph_node10" class="node">
-<title>proc~set_c~3</title>
-<g id="a_proc~~set1a~~CalledByGraph_node10"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_curve%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="464,-150 348,-150 348,-126 464,-126 464,-150"/>
-<text text-anchor="middle" x="406" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
+<title>proc~set_circle</title>
+<g id="a_proc~~set1a~~CalledByGraph_node10"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
+<polygon fill="#d9534f" stroke="#d9534f" points="474.5,-150 337.5,-150 337.5,-126 474.5,-126 474.5,-150"/>
+<text text-anchor="middle" x="406" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c~3&#45;&gt;none~set~3 -->
+<!-- proc~set_circle&#45;&gt;none~set -->
 <g id="proc~~set1a~~CalledByGraph_edge9" class="edge">
-<title>proc~set_c~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M464.15,-147.05C473.55,-149.98 482.87,-153.86 491,-159 524.67,-180.27 551.51,-219.07 565.91,-243.08"/>
+<title>proc~set_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M472.9,-150.09C479.26,-152.53 485.41,-155.47 491,-159 524.67,-180.27 551.51,-219.07 565.91,-243.08"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="562.92,-244.91 570.98,-251.79 568.98,-241.39 562.92,-244.91"/>
 </g>
 <!-- proc~set_half_circle -->
@@ -571,9 +571,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~set_half_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_half_circle&#45;&gt;none~set -->
 <g id="proc~~set1a~~CalledByGraph_edge10" class="edge">
-<title>proc~set_half_circle&#45;&gt;none~set~3</title>
+<title>proc~set_half_circle&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M475.62,-108.12C481.09,-110.56 486.3,-113.49 491,-117 534.04,-149.18 559.53,-209.61 570.72,-242.07"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="567.51,-243.52 573.97,-251.92 574.16,-241.32 567.51,-243.52"/>
 </g>
@@ -586,9 +586,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;none~set~3 -->
+<!-- program~compute_length&#45;&gt;none~set -->
 <g id="proc~~set1a~~CalledByGraph_edge11" class="edge">
-<title>program~compute_length&#45;&gt;none~set~3</title>
+<title>program~compute_length&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M84.64,-502.01C164.06,-527.61 364.11,-578.44 491,-491 559.8,-443.59 573.92,-333.61 576.79,-286.3"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="580.29,-286.35 577.28,-276.19 573.3,-286.01 580.29,-286.35"/>
 </g>
@@ -616,27 +616,27 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;none~set~3 -->
+<!-- program~example1_curve&#45;&gt;none~set -->
 <g id="proc~~set1a~~CalledByGraph_edge12" class="edge">
-<title>program~example1_curve&#45;&gt;none~set~3</title>
+<title>program~example1_curve&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M233.08,-381.16C282.76,-406.72 405.66,-459.8 491,-411 538.32,-383.94 562.31,-319.79 572.06,-285.88"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="575.49,-286.59 574.73,-276.02 568.74,-284.75 575.49,-286.59"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
 <g id="proc~~set1a~~CalledByGraph_edge16" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
 <path fill="none" stroke="#ff7500" d="M260.21,-374.33C275.59,-375.99 293.12,-377.89 310.54,-379.78"/>
 <polygon fill="#ff7500" stroke="#ff7500" points="310.45,-383.29 320.77,-380.88 311.21,-376.33 310.45,-383.29"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
 <g id="proc~~set1a~~CalledByGraph_edge17" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
 <path fill="none" stroke="#ffeb00" d="M260.21,-363.67C278.44,-361.7 299.67,-359.4 320.17,-357.18"/>
 <polygon fill="#ffeb00" stroke="#ffeb00" points="320.6,-360.66 330.16,-356.1 319.84,-353.7 320.6,-360.66"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
 <g id="proc~~set1a~~CalledByGraph_edge18" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
 <path fill="none" stroke="#00ff4e" d="M239.62,-356.99C261.63,-348.02 292.92,-335.84 321,-327 328.08,-324.77 335.55,-322.62 343,-320.6"/>
 <polygon fill="#00ff4e" stroke="#00ff4e" points="343.97,-323.97 352.75,-318.03 342.19,-317.2 343.97,-323.97"/>
 </g>
@@ -649,9 +649,9 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;none~set~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;none~set -->
 <g id="proc~~set1a~~CalledByGraph_edge13" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;none~set~3</title>
+<title>program~example_nurbs_curve&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M470.56,-63.24C477.95,-66.17 484.99,-70 491,-75 543.77,-118.84 565.87,-201.81 573.75,-241.61"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="570.34,-242.42 575.61,-251.62 577.22,-241.15 570.34,-242.42"/>
 </g>
@@ -664,15 +664,15 @@ <h3 class="card-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;none~set~3 -->
+<!-- program~nearest_point_1d&#45;&gt;none~set -->
 <g id="proc~~set1a~~CalledByGraph_edge14" class="edge">
-<title>program~nearest_point_1d&#45;&gt;none~set~3</title>
+<title>program~nearest_point_1d&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M457.92,-16.54C469.88,-19.69 481.8,-24.79 491,-33 553.86,-89.12 571.19,-195.45 575.85,-241.64"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="572.38,-242.13 576.76,-251.78 579.35,-241.51 572.38,-242.13"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="proc~~set1a~~CalledByGraph_edge15" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
 <path fill="none" stroke="#ff0000" d="M285.17,-470C301.32,-470 318.36,-470 334.36,-470"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="334.71,-473.5 344.71,-470 334.71,-466.5 334.71,-473.5"/>
 </g>
@@ -680,31 +680,31 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~set1a~~CalledByGraph_node17" class="node">
 <title>program~shape_c_1d</title>
 <g id="a_proc~~set1a~~CalledByGraph_node17"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-150 172,-150 172,-126 248,-126 248,-150"/>
-<text text-anchor="middle" x="210" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-192 172,-192 172,-168 248,-168 248,-192"/>
+<text text-anchor="middle" x="210" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~set_c~3 -->
-<g id="proc~~set1a~~CalledByGraph_edge20" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~set_c~3</title>
-<path fill="none" stroke="#00c4ff" d="M248.41,-138C273.62,-138 307.6,-138 337.47,-138"/>
-<polygon fill="#00c4ff" stroke="#00c4ff" points="337.84,-141.5 347.84,-138 337.84,-134.5 337.84,-141.5"/>
+<!-- program~shape_c_1d&#45;&gt;proc~set_c -->
+<g id="proc~~set1a~~CalledByGraph_edge19" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~set_c</title>
+<path fill="none" stroke="#00ffc4" d="M248.41,-180C273.62,-180 307.6,-180 337.47,-180"/>
+<polygon fill="#00ffc4" stroke="#00ffc4" points="337.84,-183.5 347.84,-180 337.84,-176.5 337.84,-183.5"/>
 </g>
 <!-- program~shape_circle -->
 <g id="proc~~set1a~~CalledByGraph_node18" class="node">
 <title>program~shape_circle</title>
 <g id="a_proc~~set1a~~CalledByGraph_node18"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249.5,-192 170.5,-192 170.5,-168 249.5,-168 249.5,-192"/>
-<text text-anchor="middle" x="210" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249.5,-150 170.5,-150 170.5,-126 249.5,-126 249.5,-150"/>
+<text text-anchor="middle" x="210" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
 <!-- program~shape_circle&#45;&gt;proc~set_circle -->
-<g id="proc~~set1a~~CalledByGraph_edge19" class="edge">
+<g id="proc~~set1a~~CalledByGraph_edge20" class="edge">
 <title>program~shape_circle&#45;&gt;proc~set_circle</title>
-<path fill="none" stroke="#00ffc4" d="M249.79,-180C271.95,-180 300.54,-180 327.13,-180"/>
-<polygon fill="#00ffc4" stroke="#00ffc4" points="327.21,-183.5 337.21,-180 327.21,-176.5 327.21,-183.5"/>
+<path fill="none" stroke="#00c4ff" d="M249.79,-138C271.95,-138 300.54,-138 327.13,-138"/>
+<polygon fill="#00c4ff" stroke="#00c4ff" points="327.21,-141.5 337.21,-138 327.21,-134.5 327.21,-141.5"/>
 </g>
 <!-- program~shape_half_circle -->
 <g id="proc~~set1a~~CalledByGraph_node19" class="node">
@@ -839,7 +839,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set1~2.html b/proc/set1~2.html
index a3b55978d..1be78c513 100644
--- a/proc/set1~2.html
+++ b/proc/set1~2.html
@@ -78,20 +78,20 @@ <h1>set1
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.3% of total for procedures.">23 statements</a>
+                 title=" 0.4% of total for procedures.">24 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">set1</li>
           </ol>
         </nav>
@@ -137,14 +137,14 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine set1(this, knot1, knot2, Xc, Wc)  
+    <h2>private pure subroutine set1(this, knot1, knot2, knot3, Xc, Wc)  
 </h2>
     
 
-    <p>Set knot vectors, control points and weights for the NURBS surface object.</p>
+    <p>Set control points and weights for the NURBS volume object.</p>
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,8 +159,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~69"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~62"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -174,7 +174,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~24"></span>
+              <span class="anchor" id="variable-knot1~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -189,7 +189,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~24"></span>
+              <span class="anchor" id="variable-knot2~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -204,7 +204,22 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~28"></span>
+              <span class="anchor" id="variable-knot3~3"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>knot3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xc~24"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -256,14 +271,14 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~set1~2~~CallsGraph_node1" class="node">
 <title>proc~set1~2</title>
 <polygon fill="none" stroke="black" points="120,-45 0,-45 0,-21 120,-21 120,-45"/>
-<text text-anchor="middle" x="60" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set1</text>
+<text text-anchor="middle" x="60" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set1</text>
 </g>
 <!-- proc~cmp_degree~2 -->
 <g id="proc~~set1~2~~CallsGraph_node2" class="node">
 <title>proc~cmp_degree~2</title>
-<g id="a_proc~~set1~2~~CallsGraph_node2"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<g id="a_proc~~set1~2~~CallsGraph_node2"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="319,-65 156,-65 156,-41 319,-41 319,-65"/>
-<text text-anchor="middle" x="237.5" y="-50.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
+<text text-anchor="middle" x="237.5" y="-50.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
@@ -276,9 +291,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~cmp_nc~2 -->
 <g id="proc~~set1~2~~CallsGraph_node3" class="node">
 <title>proc~cmp_nc~2</title>
-<g id="a_proc~~set1~2~~CallsGraph_node3"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<g id="a_proc~~set1~2~~CallsGraph_node3"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="513.5,-24 374.5,-24 374.5,0 513.5,0 513.5,-24"/>
-<text text-anchor="middle" x="444" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+<text text-anchor="middle" x="444" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
@@ -291,9 +306,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_multiplicity~2 -->
 <g id="proc~~set1~2~~CallsGraph_node5" class="node">
 <title>proc~get_multiplicity~2</title>
-<g id="a_proc~~set1~2~~CallsGraph_node5"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<g id="a_proc~~set1~2~~CallsGraph_node5"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="533,-66 355,-66 355,-42 533,-42 533,-66"/>
-<text text-anchor="middle" x="444" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
+<text text-anchor="middle" x="444" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
@@ -452,418 +467,355 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set1~2~~CalledByGraph Pages: 1 -->
-<svg id="procset12CalledByGraph" width="641pt" height="454pt"
- viewBox="0.00 0.00 641.00 454.44" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set1~2~~CalledByGraph" class="graph" transform="scale(1.25 1.25) rotate(0) translate(4 566)">
+<svg id="procset12CalledByGraph" width="641pt" height="488pt"
+ viewBox="0.00 0.00 641.00 488.05" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set1~2~~CalledByGraph" class="graph" transform="scale(1.31 1.31) rotate(0) translate(4 633.29)">
 <title>proc~~set1~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-566 800,-566 800,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-633.29 833,-633.29 833,4 -4,4"/>
 <!-- proc~set1~2 -->
 <g id="proc~~set1~2~~CalledByGraph_node1" class="node">
 <title>proc~set1~2</title>
-<polygon fill="none" stroke="black" points="796,-297 676,-297 676,-273 796,-273 796,-297"/>
-<text text-anchor="middle" x="736" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set1</text>
+<polygon fill="none" stroke="black" points="829,-318 709,-318 709,-294 829,-294 829,-318"/>
+<text text-anchor="middle" x="769" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set1</text>
 </g>
 <!-- none~set~2 -->
 <g id="proc~~set1~2~~CalledByGraph_node2" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="640,-297 527,-297 527,-273 640,-273 640,-297"/>
-<text text-anchor="middle" x="583.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<g id="a_proc~~set1~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="673,-318 560,-318 560,-294 673,-294 673,-318"/>
+<text text-anchor="middle" x="616.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="proc~~set1~2~~CalledByGraph_edge1" class="edge">
 <title>none~set~2&#45;&gt;proc~set1~2</title>
-<path fill="none" stroke="#ff0000" d="M640.11,-285C648.48,-285 657.19,-285 665.8,-285"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="665.83,-288.5 675.83,-285 665.83,-281.5 665.83,-288.5"/>
+<path fill="none" stroke="#ff0000" d="M673.11,-306C681.48,-306 690.19,-306 698.8,-306"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="698.83,-309.5 708.83,-306 698.83,-302.5 698.83,-309.5"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~set1~2~~CalledByGraph_node3" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="467,-562 335,-562 335,-538 467,-538 467,-562"/>
-<text text-anchor="middle" x="401" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~set1~2~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-566 367.5,-566 367.5,-542 499.5,-542 499.5,-566"/>
+<text text-anchor="middle" x="433.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~set~2 -->
 <g id="proc~~set1~2~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M467.04,-538.75C475.81,-535.12 484.14,-530.33 491,-524 555.57,-464.48 574.98,-354.4 580.47,-307.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="583.96,-307.57 581.54,-297.26 577,-306.83 583.96,-307.57"/>
+<path fill="none" stroke="#ff0000" d="M499.76,-542.65C508.6,-539.03 517.01,-534.27 524,-528 584.64,-473.59 606.02,-372.87 612.74,-328.26"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="616.23,-328.58 614.15,-318.19 609.3,-327.61 616.23,-328.58"/>
 </g>
 <!-- proc~elevate_degree~2 -->
 <g id="proc~~set1~2~~CalledByGraph_node4" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="491,-360 311,-360 311,-336 491,-336 491,-360"/>
-<text text-anchor="middle" x="401" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<g id="a_proc~~set1~2~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-486 343.5,-486 343.5,-462 523.5,-462 523.5,-486"/>
+<text text-anchor="middle" x="433.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;none~set~2 -->
 <g id="proc~~set1~2~~CalledByGraph_edge3" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M460.4,-335.97C470.7,-333.36 481.24,-330.35 491,-327 511.36,-320 533.32,-310.01 550.61,-301.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="552.31,-304.6 559.7,-297.01 549.19,-298.33 552.31,-304.6"/>
+<path fill="none" stroke="#ff0000" d="M507.95,-461.94C513.63,-459.48 519.07,-456.54 524,-453 568.52,-421.06 596.03,-360.08 608.18,-327.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="611.5,-328.73 611.59,-318.14 604.91,-326.36 611.5,-328.73"/>
 </g>
 <!-- proc~insert_knots~2 -->
 <g id="proc~~set1~2~~CalledByGraph_node5" class="node">
 <title>proc~insert_knots~2</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-482 320.5,-482 320.5,-458 481.5,-458 481.5,-482"/>
-<text text-anchor="middle" x="401" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+<g id="a_proc~~set1~2~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514,-444 353,-444 353,-420 514,-420 514,-444"/>
+<text text-anchor="middle" x="433.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;none~set~2 -->
 <g id="proc~~set1~2~~CalledByGraph_edge4" class="edge">
 <title>proc~insert_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M475.67,-457.96C481.12,-455.5 486.31,-452.54 491,-449 539.34,-412.5 565.71,-342.6 576.53,-307.01"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="579.97,-307.72 579.4,-297.14 573.25,-305.76 579.97,-307.72"/>
+<path fill="none" stroke="#ff0000" d="M505.06,-419.93C511.69,-417.49 518.12,-414.54 524,-411 558.92,-389.96 587.54,-351.08 603,-327"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="606.13,-328.6 608.45,-318.26 600.19,-324.89 606.13,-328.6"/>
 </g>
 <!-- proc~modify_wc~2 -->
 <g id="proc~~set1~2~~CalledByGraph_node6" class="node">
 <title>proc~modify_wc~2</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="479,-318 323,-318 323,-294 479,-294 479,-318"/>
-<text text-anchor="middle" x="401" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+<g id="a_proc~~set1~2~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-360 355.5,-360 355.5,-336 511.5,-336 511.5,-360"/>
+<text text-anchor="middle" x="433.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~set~2 -->
 <g id="proc~~set1~2~~CalledByGraph_edge5" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M479.07,-297.03C491.65,-295.57 504.57,-294.07 516.84,-292.64"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="517.44,-296.09 526.97,-291.46 516.63,-289.14 517.44,-296.09"/>
+<path fill="none" stroke="#ff0000" d="M486.37,-335.96C507.38,-331.09 531.82,-325.42 553.75,-320.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="554.68,-323.71 563.63,-318.04 553.09,-316.89 554.68,-323.71"/>
 </g>
 <!-- proc~modify_xc~2 -->
 <g id="proc~~set1~2~~CalledByGraph_node7" class="node">
 <title>proc~modify_xc~2</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-276 324.5,-276 324.5,-252 477.5,-252 477.5,-276"/>
-<text text-anchor="middle" x="401" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+<g id="a_proc~~set1~2~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="510,-318 357,-318 357,-294 510,-294 510,-318"/>
+<text text-anchor="middle" x="433.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~set~2 -->
 <g id="proc~~set1~2~~CalledByGraph_edge6" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M477.5,-272.78C490.54,-274.3 503.99,-275.87 516.74,-277.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="516.46,-280.84 526.8,-278.52 517.27,-273.89 516.46,-280.84"/>
+<path fill="none" stroke="#ff0000" d="M510.21,-306C523.36,-306 536.93,-306 549.79,-306"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="549.92,-309.5 559.92,-306 549.92,-302.5 549.92,-309.5"/>
 </g>
 <!-- proc~remove_knots~2 -->
 <g id="proc~~set1~2~~CalledByGraph_node8" class="node">
 <title>proc~remove_knots~2</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="487,-440 315,-440 315,-416 487,-416 487,-440"/>
-<text text-anchor="middle" x="401" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
+<g id="a_proc~~set1~2~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-402 347.5,-402 347.5,-378 519.5,-378 519.5,-402"/>
+<text text-anchor="middle" x="433.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;none~set~2 -->
 <g id="proc~~set1~2~~CalledByGraph_edge7" class="edge">
 <title>proc~remove_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M462.24,-415.98C472.34,-412.44 482.34,-407.87 491,-402 527.88,-377 556.66,-332.45 571.47,-306.13"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="574.56,-307.78 576.29,-297.32 568.42,-304.42 574.56,-307.78"/>
+<path fill="none" stroke="#ff0000" d="M499.01,-377.92C507.58,-375.44 516.12,-372.49 524,-369 549.77,-357.6 575.92,-338.69 593.63,-324.56"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="596.07,-327.09 601.61,-318.06 591.65,-321.66 596.07,-327.09"/>
 </g>
 <!-- proc~set_c~2 -->
 <g id="proc~~set1~2~~CalledByGraph_node9" class="node">
 <title>proc~set_c~2</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node9"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_surface%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="464,-108 338,-108 338,-84 464,-84 464,-108"/>
-<text text-anchor="middle" x="401" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
+<g id="a_proc~~set1~2~~CalledByGraph_node9"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_volume%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-276 370.5,-276 370.5,-252 496.5,-252 496.5,-276"/>
+<text text-anchor="middle" x="433.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c~2&#45;&gt;none~set~2 -->
 <g id="proc~~set1~2~~CalledByGraph_edge8" class="edge">
 <title>proc~set_c~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M464.39,-103.61C473.92,-106.72 483.18,-111.03 491,-117 540.26,-154.6 566.32,-226.63 576.83,-262.93"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="573.46,-263.87 579.5,-272.57 580.2,-262 573.46,-263.87"/>
+<path fill="none" stroke="#ff0000" d="M486.37,-276.04C507.38,-280.91 531.82,-286.58 553.75,-291.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="553.09,-295.11 563.63,-293.96 554.68,-288.29 553.09,-295.11"/>
 </g>
-<!-- proc~set_half_ring~2 -->
+<!-- proc~set_half_ring -->
 <g id="proc~~set1~2~~CalledByGraph_node10" class="node">
-<title>proc~set_half_ring~2</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node10"><a xlink:href="../proc/set_half_ring~2.html" xlink:title="nurbs_surface%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="483.5,-150 318.5,-150 318.5,-126 483.5,-126 483.5,-150"/>
-<text text-anchor="middle" x="401" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
+<title>proc~set_half_ring</title>
+<g id="a_proc~~set1~2~~CalledByGraph_node10"><a xlink:href="../proc/set_half_ring.html" xlink:title="nurbs_volume%set_half_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="516,-234 351,-234 351,-210 516,-210 516,-234"/>
+<text text-anchor="middle" x="433.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_half_ring&#45;&gt;none~set~2 -->
 <g id="proc~~set1~2~~CalledByGraph_edge9" class="edge">
-<title>proc~set_half_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M473.87,-150.11C479.91,-152.55 485.71,-155.48 491,-159 530.66,-185.4 559.08,-235.16 572.94,-263.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="569.8,-265.16 577.22,-272.71 576.13,-262.17 569.8,-265.16"/>
+<title>proc~set_half_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M499.01,-234.08C507.58,-236.56 516.12,-239.51 524,-243 549.77,-254.4 575.92,-273.31 593.63,-287.44"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="591.65,-290.34 601.61,-293.94 596.07,-284.91 591.65,-290.34"/>
 </g>
-<!-- proc~set_ring~2 -->
+<!-- proc~set_hexahedron -->
 <g id="proc~~set1~2~~CalledByGraph_node11" class="node">
-<title>proc~set_ring~2</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node11"><a xlink:href="../proc/set_ring~2.html" xlink:title="nurbs_surface%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="470.5,-192 331.5,-192 331.5,-168 470.5,-168 470.5,-192"/>
-<text text-anchor="middle" x="401" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
+<title>proc~set_hexahedron</title>
+<g id="a_proc~~set1~2~~CalledByGraph_node11"><a xlink:href="../proc/set_hexahedron.html" xlink:title="nurbs_volume%set_hexahedron">
+<polygon fill="#d9534f" stroke="#d9534f" points="524,-192 343,-192 343,-168 524,-168 524,-192"/>
+<text text-anchor="middle" x="433.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_hexahedron&#45;&gt;none~set~2 -->
 <g id="proc~~set1~2~~CalledByGraph_edge10" class="edge">
-<title>proc~set_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M469.92,-192.15C477.23,-194.59 484.41,-197.51 491,-201 521.51,-217.17 549.65,-245.97 566.45,-265.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="563.79,-267.55 572.93,-272.91 569.12,-263.02 563.79,-267.55"/>
+<title>proc~set_hexahedron&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M505.06,-192.07C511.69,-194.51 518.12,-197.46 524,-201 558.92,-222.04 587.54,-260.92 603,-285"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="600.19,-287.11 608.45,-293.74 606.13,-283.4 600.19,-287.11"/>
 </g>
-<!-- proc~set_tetragon -->
+<!-- proc~set_ring -->
 <g id="proc~~set1~2~~CalledByGraph_node12" class="node">
-<title>proc~set_tetragon</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node12"><a xlink:href="../proc/set_tetragon.html" xlink:title="nurbs_surface%set_tetragon">
-<polygon fill="#d9534f" stroke="#d9534f" points="483,-234 319,-234 319,-210 483,-210 483,-234"/>
-<text text-anchor="middle" x="401" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
+<title>proc~set_ring</title>
+<g id="a_proc~~set1~2~~CalledByGraph_node12"><a xlink:href="../proc/set_ring.html" xlink:title="nurbs_volume%set_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="503,-150 364,-150 364,-126 503,-126 503,-150"/>
+<text text-anchor="middle" x="433.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
+<!-- proc~set_ring&#45;&gt;none~set~2 -->
 <g id="proc~~set1~2~~CalledByGraph_edge11" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M460.4,-234.03C470.7,-236.64 481.24,-239.65 491,-243 511.36,-250 533.32,-259.99 550.61,-268.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="549.19,-271.67 559.7,-272.99 552.31,-265.4 549.19,-271.67"/>
+<title>proc~set_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M503.41,-148.22C510.74,-151.01 517.78,-154.53 524,-159 568.52,-190.94 596.03,-251.92 608.18,-284.39"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="604.91,-285.64 611.59,-293.86 611.5,-283.27 604.91,-285.64"/>
 </g>
-<!-- program~compute_area -->
+<!-- program~compute_volume -->
 <g id="proc~~set1~2~~CalledByGraph_node13" class="node">
-<title>program~compute_area</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node13"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-542 0,-542 0,-518 89,-518 89,-542"/>
-<text text-anchor="middle" x="44.5" y="-527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<title>program~compute_volume</title>
+<g id="a_proc~~set1~2~~CalledByGraph_node13"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-586 0,-586 0,-562 105,-562 105,-586"/>
+<text text-anchor="middle" x="52.5" y="-571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;none~set~2 -->
+<!-- program~compute_volume&#45;&gt;none~set~2 -->
 <g id="proc~~set1~2~~CalledByGraph_edge12" class="edge">
-<title>program~compute_area&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M89.19,-528.67C195.01,-525.11 458.77,-514.01 491,-491 552.97,-446.76 573.59,-350.77 579.93,-307.25"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="583.42,-307.52 581.27,-297.15 576.48,-306.6 583.42,-307.52"/>
+<title>program~compute_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M86.78,-586.01C169.65,-613.64 388.35,-672.14 524,-575 605.44,-516.68 615.25,-381.64 615.83,-328.27"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="619.33,-328.19 615.83,-318.18 612.33,-328.18 619.33,-328.19"/>
 </g>
-<!-- proc~cmp_area -->
-<g id="proc~~set1~2~~CalledByGraph_node17" class="node">
-<title>proc~cmp_area</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node17"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="275,-562 125,-562 125,-538 275,-538 275,-562"/>
-<text text-anchor="middle" x="200" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<!-- proc~cmp_volume -->
+<g id="proc~~set1~2~~CalledByGraph_node18" class="node">
+<title>proc~cmp_volume</title>
+<g id="a_proc~~set1~2~~CalledByGraph_node18"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-566 141,-566 141,-542 307,-542 307,-566"/>
+<text text-anchor="middle" x="224" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;proc~cmp_area -->
-<g id="proc~~set1~2~~CalledByGraph_edge31" class="edge">
-<title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M89.08,-535.68C97.19,-536.73 105.92,-537.87 114.78,-539.03"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="114.45,-542.51 124.81,-540.33 115.35,-535.57 114.45,-542.51"/>
+<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
+<g id="proc~~set1~2~~CalledByGraph_edge25" class="edge">
+<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
+<path fill="none" stroke="#ff0000" d="M105.28,-567.89C113.48,-566.92 122.18,-565.9 130.98,-564.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="131.41,-568.33 140.93,-563.68 130.59,-561.38 131.41,-568.33"/>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~set1~2~~CalledByGraph_node14" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node14"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="255,-420 145,-420 145,-396 255,-396 255,-420"/>
-<text text-anchor="middle" x="200" y="-405.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<title>program~example3_volume</title>
+<g id="a_proc~~set1~2~~CalledByGraph_node14"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-465 169,-465 169,-441 279,-441 279,-465"/>
+<text text-anchor="middle" x="224" y="-450.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;none~set~2 -->
+<!-- program~example3_volume&#45;&gt;none~set~2 -->
 <g id="proc~~set1~2~~CalledByGraph_edge13" class="edge">
-<title>program~example3_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M255.17,-404.6C327.24,-399.42 450.29,-388.08 491,-369 522.44,-354.27 550.52,-324.84 567.04,-305.03"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="569.81,-307.17 573.38,-297.2 564.37,-302.77 569.81,-307.17"/>
-</g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
-<g id="proc~~set1~2~~CalledByGraph_edge17" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
-<path fill="none" stroke="#ff6d00" d="M239.39,-395.97C260.5,-389.4 287.17,-381.16 311,-374 323.16,-370.34 336.28,-366.47 348.62,-362.86"/>
-<polygon fill="#ff6d00" stroke="#ff6d00" points="349.69,-366.2 358.3,-360.04 347.72,-359.48 349.69,-366.2"/>
+<title>program~example3_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M246.93,-465.12C299.32,-492.29 434.06,-551.38 524,-495 583.54,-457.67 605.3,-369.39 612.41,-328.06"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="615.87,-328.6 613.98,-318.18 608.95,-327.5 615.87,-328.6"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
 <g id="proc~~set1~2~~CalledByGraph_edge18" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
-<path fill="none" stroke="#ffda00" d="M230.54,-420.16C252.49,-428.91 283.3,-440.61 311,-449 318.48,-451.27 326.37,-453.44 334.24,-455.47"/>
-<polygon fill="#ffda00" stroke="#ffda00" points="333.62,-458.92 344.17,-457.96 335.32,-452.13 333.62,-458.92"/>
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
+<path fill="none" stroke="#ff6600" d="M279.25,-458.49C295.84,-460.17 314.64,-462.07 333.24,-463.95"/>
+<polygon fill="#ff6600" stroke="#ff6600" points="332.94,-467.44 343.24,-464.97 333.64,-460.48 332.94,-467.44"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
+<g id="proc~~set1~2~~CalledByGraph_edge19" class="edge">
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
+<path fill="none" stroke="#ffcc00" d="M279.25,-447.51C298.63,-445.55 321.03,-443.28 342.61,-441.1"/>
+<polygon fill="#ffcc00" stroke="#ffcc00" points="343.19,-444.56 352.79,-440.07 342.49,-437.59 343.19,-444.56"/>
+</g>
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
 <g id="proc~~set1~2~~CalledByGraph_edge20" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
-<path fill="none" stroke="#00ff24" d="M255.11,-413.44C270.51,-414.99 287.75,-416.72 304.82,-418.43"/>
-<polygon fill="#00ff24" stroke="#00ff24" points="304.53,-421.92 314.83,-419.44 305.23,-414.96 304.53,-421.92"/>
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
+<path fill="none" stroke="#00ff00" d="M255.75,-440.99C279.38,-432.02 312.96,-419.84 343,-411 350.73,-408.73 358.89,-406.53 367.01,-404.47"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="368,-407.84 376.87,-402.04 366.32,-401.04 368,-407.84"/>
 </g>
-<!-- program~example_nurbs_surface -->
+<!-- program~example_nurbs_volume -->
 <g id="proc~~set1~2~~CalledByGraph_node15" class="node">
-<title>program~example_nurbs_surface</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node15"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 331.5,-66 331.5,-42 470.5,-42 470.5,-66"/>
-<text text-anchor="middle" x="401" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<title>program~example_nurbs_volume</title>
+<g id="a_proc~~set1~2~~CalledByGraph_node15"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-108 364,-108 364,-84 503,-84 503,-108"/>
+<text text-anchor="middle" x="433.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;none~set~2 -->
+<!-- program~example_nurbs_volume&#45;&gt;none~set~2 -->
 <g id="proc~~set1~2~~CalledByGraph_edge14" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M470.75,-63.21C478.08,-66.17 485.03,-70.01 491,-75 550.25,-124.48 572.25,-219.65 579.43,-262.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="575.99,-263.45 580.98,-272.8 582.91,-262.38 575.99,-263.45"/>
+<title>program~example_nurbs_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M503.44,-105.4C510.85,-108.33 517.9,-112.11 524,-117 578.22,-160.42 602.42,-243.9 611.25,-283.76"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="607.82,-284.49 613.3,-293.56 614.67,-283.05 607.82,-284.49"/>
 </g>
-<!-- program~nearest_point_2d -->
+<!-- program~example_put_to_nurbs -->
 <g id="proc~~set1~2~~CalledByGraph_node16" class="node">
-<title>program~nearest_point_2d</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node16"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452.5,-24 349.5,-24 349.5,0 452.5,0 452.5,-24"/>
-<text text-anchor="middle" x="401" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<title>program~example_put_to_nurbs</title>
+<g id="a_proc~~set1~2~~CalledByGraph_node16"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-66 367.5,-66 367.5,-42 499.5,-42 499.5,-66"/>
+<text text-anchor="middle" x="433.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;none~set~2 -->
+<!-- program~example_put_to_nurbs&#45;&gt;none~set~2 -->
 <g id="proc~~set1~2~~CalledByGraph_edge15" class="edge">
-<title>program~nearest_point_2d&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M452.73,-15.16C466.47,-18.21 480.44,-23.61 491,-33 560.36,-94.71 577.18,-213.24 581.23,-262.59"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="577.76,-263.07 581.96,-272.8 584.74,-262.57 577.76,-263.07"/>
-</g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~set1~2~~CalledByGraph_edge16" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ff0000" d="M275.1,-550C291.15,-550 308.13,-550 324.24,-550"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="324.68,-553.5 334.68,-550 324.68,-546.5 324.68,-553.5"/>
+<title>program~example_put_to_nurbs&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M499.72,-61.4C508.57,-64.57 516.99,-68.95 524,-75 588.41,-130.59 607.88,-237.64 613.43,-283.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="609.97,-284.43 614.54,-293.99 616.93,-283.67 609.97,-284.43"/>
 </g>
-<!-- program~example_ppm1 -->
-<g id="proc~~set1~2~~CalledByGraph_node18" class="node">
-<title>program~example_ppm1</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node18"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-192 153,-192 153,-168 247,-168 247,-192"/>
-<text text-anchor="middle" x="200" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+<!-- program~nearest_point_3d -->
+<g id="proc~~set1~2~~CalledByGraph_node17" class="node">
+<title>program~nearest_point_3d</title>
+<g id="a_proc~~set1~2~~CalledByGraph_node17"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-24 382,-24 382,0 485,0 485,-24"/>
+<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~set_ring~2 -->
-<g id="proc~~set1~2~~CalledByGraph_edge24" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#0091ff" d="M247.15,-180C269.15,-180 296.09,-180 321.19,-180"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="321.45,-183.5 331.45,-180 321.45,-176.5 321.45,-183.5"/>
+<!-- program~nearest_point_3d&#45;&gt;none~set~2 -->
+<g id="proc~~set1~2~~CalledByGraph_edge16" class="edge">
+<title>program~nearest_point_3d&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M485.2,-14.84C499.17,-17.86 513.38,-23.33 524,-33 598.53,-100.9 612.42,-231.28 614.96,-283.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="611.47,-283.86 615.35,-293.71 618.46,-283.58 611.47,-283.86"/>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set1~2~~CalledByGraph_edge26" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.15,-189.74C272.73,-195.14 304.98,-201.95 333.26,-207.91"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="332.57,-211.34 343.07,-209.99 334.01,-204.5 332.57,-211.34"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~set1~2~~CalledByGraph_edge17" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ff0000" d="M307.01,-554C323.61,-554 341,-554 357.35,-554"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="357.38,-557.5 367.38,-554 357.38,-550.5 357.38,-557.5"/>
 </g>
-<!-- program~example_ppm2 -->
+<!-- program~shape_c_3d -->
 <g id="proc~~set1~2~~CalledByGraph_node19" class="node">
-<title>program~example_ppm2</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node19"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-150 153,-150 153,-126 247,-126 247,-150"/>
-<text text-anchor="middle" x="200" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+<title>program~shape_c_3d</title>
+<g id="a_proc~~set1~2~~CalledByGraph_node19"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-276 186,-276 186,-252 262,-252 262,-276"/>
+<text text-anchor="middle" x="224" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~set_half_ring~2 -->
-<g id="proc~~set1~2~~CalledByGraph_edge22" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#00ffff" d="M247.15,-138C265.39,-138 287.03,-138 308.19,-138"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="308.2,-141.5 318.2,-138 308.2,-134.5 308.2,-141.5"/>
-</g>
-<!-- program~example_ppm2&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set1~2~~CalledByGraph_edge27" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.02,-146.55C256.72,-149.56 266.56,-153.6 275,-159 295.71,-172.25 290,-188.21 311,-201 314.01,-202.83 317.16,-204.5 320.41,-206.03"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="319.22,-209.32 329.8,-209.95 321.92,-202.87 319.22,-209.32"/>
+<!-- program~shape_c_3d&#45;&gt;proc~set_c~2 -->
+<g id="proc~~set1~2~~CalledByGraph_edge21" class="edge">
+<title>program~shape_c_3d&#45;&gt;proc~set_c~2</title>
+<path fill="none" stroke="#00ff66" d="M262.1,-264C289.25,-264 326.96,-264 360,-264"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="360.09,-267.5 370.09,-264 360.09,-260.5 360.09,-267.5"/>
 </g>
-<!-- program~example_ppm3 -->
+<!-- program~shape_half_ring_3d -->
 <g id="proc~~set1~2~~CalledByGraph_node20" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node20"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-318 153,-318 153,-294 247,-294 247,-318"/>
-<text text-anchor="middle" x="200" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+<title>program~shape_half_ring_3d</title>
+<g id="a_proc~~set1~2~~CalledByGraph_node20"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-234 166.5,-234 166.5,-210 281.5,-210 281.5,-234"/>
+<text text-anchor="middle" x="224" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
-<g id="proc~~set1~2~~CalledByGraph_edge19" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#48ff00" d="M247.15,-296.26C272.73,-290.86 304.98,-284.05 333.26,-278.09"/>
-<polygon fill="#48ff00" stroke="#48ff00" points="334.01,-281.5 343.07,-276.01 332.57,-274.66 334.01,-281.5"/>
-</g>
-<!-- program~example_ppm3&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set1~2~~CalledByGraph_edge28" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.02,-297.45C256.72,-294.44 266.56,-290.4 275,-285 295.71,-271.75 290,-255.79 311,-243 314.01,-241.17 317.16,-239.5 320.41,-237.97"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="321.92,-241.13 329.8,-234.05 319.22,-234.68 321.92,-241.13"/>
+<!-- program~shape_half_ring_3d&#45;&gt;proc~set_half_ring -->
+<g id="proc~~set1~2~~CalledByGraph_edge22" class="edge">
+<title>program~shape_half_ring_3d&#45;&gt;proc~set_half_ring</title>
+<path fill="none" stroke="#00ffcb" d="M281.7,-222C299.97,-222 320.71,-222 340.84,-222"/>
+<polygon fill="#00ffcb" stroke="#00ffcb" points="340.97,-225.5 350.97,-222 340.97,-218.5 340.97,-225.5"/>
 </g>
-<!-- program~nearest_point_2d_bench -->
+<!-- program~shape_hexahedron -->
 <g id="proc~~set1~2~~CalledByGraph_node21" class="node">
-<title>program~nearest_point_2d_bench</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node21"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-234 129,-234 129,-210 271,-210 271,-234"/>
-<text text-anchor="middle" x="200" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+<title>program~shape_hexahedron</title>
+<g id="a_proc~~set1~2~~CalledByGraph_node21"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-192 167.5,-192 167.5,-168 280.5,-168 280.5,-192"/>
+<text text-anchor="middle" x="224" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set1~2~~CalledByGraph_edge29" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M271.16,-222C283.34,-222 296.17,-222 308.82,-222"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="308.91,-225.5 318.91,-222 308.91,-218.5 308.91,-225.5"/>
-</g>
-<!-- program~shape_c_2d -->
-<g id="proc~~set1~2~~CalledByGraph_node22" class="node">
-<title>program~shape_c_2d</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node22"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="238,-24 162,-24 162,0 238,0 238,-24"/>
-<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_c_2d&#45;&gt;proc~set_c~2 -->
-<g id="proc~~set1~2~~CalledByGraph_edge21" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~set_c~2</title>
-<path fill="none" stroke="#00ff91" d="M238.17,-18.06C250.55,-21.21 263.98,-25.94 275,-33 295.71,-46.25 290,-62.21 311,-75 316.34,-78.25 322.14,-81 328.14,-83.32"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="327.09,-86.66 337.68,-86.63 329.38,-80.05 327.09,-86.66"/>
-</g>
-<!-- program~shape_half_ring_2d -->
-<g id="proc~~set1~2~~CalledByGraph_node23" class="node">
-<title>program~shape_half_ring_2d</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node23"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="257.5,-66 142.5,-66 142.5,-42 257.5,-42 257.5,-66"/>
-<text text-anchor="middle" x="200" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2 -->
+<!-- program~shape_hexahedron&#45;&gt;proc~set_hexahedron -->
 <g id="proc~~set1~2~~CalledByGraph_edge23" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#00ffff" d="M257.09,-66.07C263.38,-68.53 269.49,-71.47 275,-75 295.71,-88.25 290,-104.21 311,-117 314.01,-118.83 317.16,-120.5 320.41,-122.03"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="319.22,-125.32 329.8,-125.95 321.92,-118.87 319.22,-125.32"/>
-</g>
-<!-- program~shape_ring_2d -->
-<g id="proc~~set1~2~~CalledByGraph_node24" class="node">
-<title>program~shape_ring_2d</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node24"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="245,-108 155,-108 155,-84 245,-84 245,-108"/>
-<text text-anchor="middle" x="200" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
-</a>
-</g>
+<title>program~shape_hexahedron&#45;&gt;proc~set_hexahedron</title>
+<path fill="none" stroke="#00cbff" d="M280.61,-180C296.56,-180 314.47,-180 332.24,-180"/>
+<polygon fill="#00cbff" stroke="#00cbff" points="332.67,-183.5 342.67,-180 332.67,-176.5 332.67,-183.5"/>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~set_ring~2 -->
-<g id="proc~~set1~2~~CalledByGraph_edge25" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#0091ff" d="M245.08,-103.96C255.4,-107.03 266,-111.24 275,-117 295.71,-130.25 290,-146.21 311,-159 314.41,-161.08 318.01,-162.95 321.73,-164.64"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="320.6,-167.95 331.18,-168.46 323.22,-161.46 320.6,-167.95"/>
-</g>
-<!-- program~shape_tetragon -->
-<g id="proc~~set1~2~~CalledByGraph_node25" class="node">
-<title>program~shape_tetragon</title>
-<g id="a_proc~~set1~2~~CalledByGraph_node25"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-276 152,-276 152,-252 248,-252 248,-276"/>
-<text text-anchor="middle" x="200" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<!-- program~shape_ring_3d -->
+<g id="proc~~set1~2~~CalledByGraph_node22" class="node">
+<title>program~shape_ring_3d</title>
+<g id="a_proc~~set1~2~~CalledByGraph_node22"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-150 179,-150 179,-126 269,-126 269,-150"/>
+<text text-anchor="middle" x="224" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set1~2~~CalledByGraph_edge30" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M248.16,-254.05C273.44,-248.71 305.03,-242.04 332.84,-236.17"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="333.83,-239.54 342.89,-234.05 332.39,-232.69 333.83,-239.54"/>
+<!-- program~shape_ring_3d&#45;&gt;proc~set_ring -->
+<g id="proc~~set1~2~~CalledByGraph_edge24" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~set_ring</title>
+<path fill="none" stroke="#0066ff" d="M269.01,-138C293.59,-138 324.96,-138 353.63,-138"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="353.65,-141.5 363.65,-138 353.65,-134.5 353.65,-141.5"/>
 </g>
 </g>
 </svg>
@@ -983,7 +935,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set1~3.html b/proc/set1~3.html
index 584fcdddb..fd19902e3 100644
--- a/proc/set1~3.html
+++ b/proc/set1~3.html
@@ -78,20 +78,20 @@ <h1>set1
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.3% of total for procedures.">20 statements</a>
+                 title=" 0.3% of total for procedures.">23 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">set1</li>
           </ol>
         </nav>
@@ -137,14 +137,14 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine set1(this, knot, Xc, Wc)  
+    <h2>private pure subroutine set1(this, knot1, knot2, Xc, Wc)  
 </h2>
     
 
-    <p>Set knot vector, control points and weights for the NURBS curve object.</p>
+    <p>Set knot vectors, control points and weights for the NURBS surface object.</p>
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,8 +159,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~132"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~130"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -174,7 +174,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~17"></span>
+              <span class="anchor" id="variable-knot1~25"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -182,14 +182,29 @@ <h3>Arguments</h3>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>knot</strong>(:)</td>
+            <td><strong>knot1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~52"></span>
+              <span class="anchor" id="variable-knot2~25"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>knot2</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xc~46"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -204,7 +219,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~49"></span>
+              <span class="anchor" id="variable-wc~47"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -232,91 +247,112 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set1~3~~CallsGraph Pages: 1 -->
-<svg id="procset13CallsGraph" width="641pt" height="57pt"
- viewBox="0.00 0.00 641.00 56.54" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set1~3~~CallsGraph" class="graph" transform="scale(1.31 1.31) rotate(0) translate(4 70)">
+<svg id="procset13CallsGraph" width="641pt" height="55pt"
+ viewBox="0.00 0.00 641.00 54.71" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set1~3~~CallsGraph" class="graph" transform="scale(1.35 1.35) rotate(0) translate(4 70)">
 <title>proc~~set1~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 835,-70 835,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 863,-70 863,4 -4,4"/>
 <!-- proc~set1~3 -->
 <g id="proc~~set1~3~~CallsGraph_node1" class="node">
 <title>proc~set1~3</title>
-<polygon fill="none" stroke="black" points="110,-45 0,-45 0,-21 110,-21 110,-45"/>
-<text text-anchor="middle" x="55" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set1</text>
+<polygon fill="none" stroke="black" points="120,-45 0,-45 0,-21 120,-21 120,-45"/>
+<text text-anchor="middle" x="60" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set1</text>
 </g>
 <!-- proc~cmp_degree~3 -->
 <g id="proc~~set1~3~~CallsGraph_node2" class="node">
 <title>proc~cmp_degree~3</title>
-<g id="a_proc~~set1~3~~CallsGraph_node2"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="300,-45 146,-45 146,-21 300,-21 300,-45"/>
-<text text-anchor="middle" x="223" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
+<g id="a_proc~~set1~3~~CallsGraph_node2"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="319,-65 156,-65 156,-41 319,-41 319,-65"/>
+<text text-anchor="middle" x="237.5" y="-50.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="proc~~set1~3~~CallsGraph_edge1" class="edge">
 <title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ff0000" d="M110.35,-33C118.51,-33 127.09,-33 135.71,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.83,-36.5 145.83,-33 135.83,-29.5 135.83,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M120.42,-39.77C128.64,-40.71 137.23,-41.69 145.86,-42.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="145.65,-46.17 155.98,-43.82 146.44,-39.21 145.65,-46.17"/>
 </g>
-<!-- proc~get_multiplicity~3 -->
+<!-- proc~cmp_nc~3 -->
 <g id="proc~~set1~3~~CallsGraph_node3" class="node">
+<title>proc~cmp_nc~3</title>
+<g id="a_proc~~set1~3~~CallsGraph_node3"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="513.5,-24 374.5,-24 374.5,0 513.5,0 513.5,-24"/>
+<text text-anchor="middle" x="444" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+</a>
+</g>
+</g>
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
+<g id="proc~~set1~3~~CallsGraph_edge2" class="edge">
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#ff0000" d="M120.27,-29.74C185.82,-26.14 291.73,-20.32 364.22,-16.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="364.42,-19.83 374.22,-15.78 364.04,-12.84 364.42,-19.83"/>
+</g>
+<!-- proc~get_multiplicity~3 -->
+<g id="proc~~set1~3~~CallsGraph_node5" class="node">
 <title>proc~get_multiplicity~3</title>
-<g id="a_proc~~set1~3~~CallsGraph_node3"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="505,-45 336,-45 336,-21 505,-21 505,-45"/>
-<text text-anchor="middle" x="420.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
+<g id="a_proc~~set1~3~~CallsGraph_node5"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="533,-66 355,-66 355,-42 533,-42 533,-66"/>
+<text text-anchor="middle" x="444" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
-<g id="proc~~set1~3~~CallsGraph_edge2" class="edge">
+<g id="proc~~set1~3~~CallsGraph_edge3" class="edge">
 <title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#ff0000" d="M300.15,-33C308.54,-33 317.17,-33 325.75,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="325.79,-36.5 335.79,-33 325.79,-29.5 325.79,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M319.03,-53.39C327.47,-53.44 336.11,-53.48 344.71,-53.52"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="344.76,-57.02 354.78,-53.57 344.8,-50.02 344.76,-57.02"/>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~set1~3~~CallsGraph_node4" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~set1~3~~CallsGraph_node4"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="665,-45 541,-45 541,-21 665,-21 665,-45"/>
-<text text-anchor="middle" x="603" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="693,-45 569,-45 569,-21 693,-21 693,-45"/>
+<text text-anchor="middle" x="631" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~set1~3~~CallsGraph_edge3" class="edge">
-<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M505.15,-33C513.73,-33 522.4,-33 530.84,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="530.99,-36.5 540.99,-33 530.99,-29.5 530.99,-36.5"/>
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
+<g id="proc~~set1~3~~CallsGraph_edge4" class="edge">
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
+<path fill="none" stroke="#00ffff" d="M513.62,-19.79C528.33,-21.46 543.9,-23.23 558.7,-24.91"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="558.48,-28.4 568.81,-26.05 559.27,-21.45 558.48,-28.4"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
-<g id="proc~~set1~3~~CallsGraph_node5" class="node">
+<g id="proc~~set1~3~~CallsGraph_node6" class="node">
 <title>proc~compute_multiplicity1</title>
-<g id="a_proc~~set1~3~~CallsGraph_node5"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="831,-66 701,-66 701,-42 831,-42 831,-66"/>
-<text text-anchor="middle" x="766" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<g id="a_proc~~set1~3~~CallsGraph_node6"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="859,-66 729,-66 729,-42 859,-42 859,-66"/>
+<text text-anchor="middle" x="794" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
-<g id="proc~~set1~3~~CallsGraph_edge4" class="edge">
+<g id="proc~~set1~3~~CallsGraph_edge5" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M665.33,-41C673.69,-42.09 682.35,-43.22 690.92,-44.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="690.53,-47.82 700.9,-45.64 691.44,-40.88 690.53,-47.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M693.33,-41C701.69,-42.09 710.35,-43.22 718.92,-44.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="718.53,-47.82 728.9,-45.64 719.44,-40.88 718.53,-47.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
-<g id="proc~~set1~3~~CallsGraph_node6" class="node">
+<g id="proc~~set1~3~~CallsGraph_node7" class="node">
 <title>proc~compute_multiplicity2</title>
-<g id="a_proc~~set1~3~~CallsGraph_node6"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="831,-24 701,-24 701,0 831,0 831,-24"/>
-<text text-anchor="middle" x="766" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<g id="a_proc~~set1~3~~CallsGraph_node7"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="859,-24 729,-24 729,0 859,0 859,-24"/>
+<text text-anchor="middle" x="794" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
-<g id="proc~~set1~3~~CallsGraph_edge5" class="edge">
+<g id="proc~~set1~3~~CallsGraph_edge6" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M665.33,-25C673.69,-23.91 682.35,-22.78 690.92,-21.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="691.44,-25.12 700.9,-20.36 690.53,-18.18 691.44,-25.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M693.33,-25C701.69,-23.91 710.35,-22.78 718.92,-21.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="719.44,-25.12 728.9,-20.36 718.53,-18.18 719.44,-25.12"/>
+</g>
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<g id="proc~~set1~3~~CallsGraph_edge7" class="edge">
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
+<path fill="none" stroke="#00ffff" d="M533.17,-43.99C541.77,-43.02 550.42,-42.03 558.82,-41.08"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="559.39,-44.54 568.93,-39.93 558.6,-37.58 559.39,-44.54"/>
 </g>
 </g>
 </svg>
@@ -416,310 +452,418 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set1~3~~CalledByGraph Pages: 1 -->
-<svg id="procset13CalledByGraph" width="641pt" height="448pt"
- viewBox="0.00 0.00 641.00 448.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set1~3~~CalledByGraph" class="graph" transform="scale(1.22 1.22) rotate(0) translate(4 544.5)">
+<svg id="procset13CalledByGraph" width="641pt" height="454pt"
+ viewBox="0.00 0.00 641.00 454.44" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set1~3~~CalledByGraph" class="graph" transform="scale(1.25 1.25) rotate(0) translate(4 566)">
 <title>proc~~set1~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-544.5 780,-544.5 780,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-566 800,-566 800,4 -4,4"/>
 <!-- proc~set1~3 -->
 <g id="proc~~set1~3~~CalledByGraph_node1" class="node">
 <title>proc~set1~3</title>
-<polygon fill="none" stroke="black" points="776,-276 666,-276 666,-252 776,-252 776,-276"/>
-<text text-anchor="middle" x="721" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set1</text>
+<polygon fill="none" stroke="black" points="796,-297 676,-297 676,-273 796,-273 796,-297"/>
+<text text-anchor="middle" x="736" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set1</text>
 </g>
 <!-- none~set~3 -->
 <g id="proc~~set1~3~~CalledByGraph_node2" class="node">
 <title>none~set~3</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="630,-276 527,-276 527,-252 630,-252 630,-276"/>
-<text text-anchor="middle" x="578.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_proc~~set1~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="640,-297 527,-297 527,-273 640,-273 640,-297"/>
+<text text-anchor="middle" x="583.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="proc~~set1~3~~CalledByGraph_edge1" class="edge">
 <title>none~set~3&#45;&gt;proc~set1~3</title>
-<path fill="none" stroke="#ff0000" d="M630.22,-264C638.38,-264 646.92,-264 655.35,-264"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="655.55,-267.5 665.55,-264 655.55,-260.5 655.55,-267.5"/>
+<path fill="none" stroke="#ff0000" d="M640.11,-285C648.48,-285 657.19,-285 665.8,-285"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="665.83,-288.5 675.83,-285 665.83,-281.5 665.83,-288.5"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="proc~~set1~3~~CalledByGraph_node3" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="467,-482 345,-482 345,-458 467,-458 467,-482"/>
-<text text-anchor="middle" x="406" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~set1~3~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="467,-562 335,-562 335,-538 467,-538 467,-562"/>
+<text text-anchor="middle" x="401" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~set~3 -->
 <g id="proc~~set1~3~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M467.12,-458.13C475.76,-454.59 484.06,-449.98 491,-444 540.47,-401.35 563.98,-323.98 572.94,-286.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="576.41,-286.63 575.18,-276.11 569.58,-285.1 576.41,-286.63"/>
+<path fill="none" stroke="#ff0000" d="M467.04,-538.75C475.81,-535.12 484.14,-530.33 491,-524 555.57,-464.48 574.98,-354.4 580.47,-307.31"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="583.96,-307.57 581.54,-297.26 577,-306.83 583.96,-307.57"/>
 </g>
 <!-- proc~elevate_degree~3 -->
 <g id="proc~~set1~3~~CalledByGraph_node4" class="node">
 <title>proc~elevate_degree~3</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="491,-402 321,-402 321,-378 491,-378 491,-402"/>
-<text text-anchor="middle" x="406" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+<g id="a_proc~~set1~3~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="491,-360 311,-360 311,-336 491,-336 491,-360"/>
+<text text-anchor="middle" x="401" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;none~set~3 -->
 <g id="proc~~set1~3~~CalledByGraph_edge3" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M472.9,-377.91C479.26,-375.47 485.41,-372.53 491,-369 524.67,-347.73 551.51,-308.93 565.91,-284.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="568.98,-286.61 570.98,-276.21 562.92,-283.09 568.98,-286.61"/>
+<path fill="none" stroke="#ff0000" d="M460.4,-335.97C470.7,-333.36 481.24,-330.35 491,-327 511.36,-320 533.32,-310.01 550.61,-301.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="552.31,-304.6 559.7,-297.01 549.19,-298.33 552.31,-304.6"/>
 </g>
 <!-- proc~insert_knots~3 -->
 <g id="proc~~set1~3~~CalledByGraph_node5" class="node">
 <title>proc~insert_knots~3</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_curve%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-360 330.5,-360 330.5,-336 481.5,-336 481.5,-360"/>
-<text text-anchor="middle" x="406" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
+<g id="a_proc~~set1~3~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-482 320.5,-482 320.5,-458 481.5,-458 481.5,-482"/>
+<text text-anchor="middle" x="401" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;none~set~3 -->
 <g id="proc~~set1~3~~CalledByGraph_edge4" class="edge">
 <title>proc~insert_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M467.18,-335.97C475.36,-333.47 483.51,-330.5 491,-327 515.36,-315.61 539.83,-296.96 556.5,-282.9"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="559.18,-285.21 564.46,-276.02 554.6,-279.91 559.18,-285.21"/>
+<path fill="none" stroke="#ff0000" d="M475.67,-457.96C481.12,-455.5 486.31,-452.54 491,-449 539.34,-412.5 565.71,-342.6 576.53,-307.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="579.97,-307.72 579.4,-297.14 573.25,-305.76 579.97,-307.72"/>
 </g>
 <!-- proc~modify_wc~3 -->
 <g id="proc~~set1~3~~CalledByGraph_node6" class="node">
 <title>proc~modify_wc~3</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="479,-276 333,-276 333,-252 479,-252 479,-276"/>
-<text text-anchor="middle" x="406" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
+<g id="a_proc~~set1~3~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="479,-318 323,-318 323,-294 479,-294 479,-318"/>
+<text text-anchor="middle" x="401" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
 <g id="proc~~set1~3~~CalledByGraph_edge5" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M479.31,-264C491.66,-264 504.39,-264 516.42,-264"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="516.78,-267.5 526.78,-264 516.78,-260.5 516.78,-267.5"/>
+<path fill="none" stroke="#ff0000" d="M479.07,-297.03C491.65,-295.57 504.57,-294.07 516.84,-292.64"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="517.44,-296.09 526.97,-291.46 516.63,-289.14 517.44,-296.09"/>
 </g>
 <!-- proc~modify_xc~3 -->
 <g id="proc~~set1~3~~CalledByGraph_node7" class="node">
 <title>proc~modify_xc~3</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-234 334.5,-234 334.5,-210 477.5,-210 477.5,-234"/>
-<text text-anchor="middle" x="406" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
+<g id="a_proc~~set1~3~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-276 324.5,-276 324.5,-252 477.5,-252 477.5,-276"/>
+<text text-anchor="middle" x="401" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
 <g id="proc~~set1~3~~CalledByGraph_edge6" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M455.86,-234.04C475.48,-238.87 498.26,-244.48 518.77,-249.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="518.09,-252.97 528.63,-251.96 519.76,-246.17 518.09,-252.97"/>
+<path fill="none" stroke="#ff0000" d="M477.5,-272.78C490.54,-274.3 503.99,-275.87 516.74,-277.35"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="516.46,-280.84 526.8,-278.52 517.27,-273.89 516.46,-280.84"/>
 </g>
 <!-- proc~remove_knots~3 -->
 <g id="proc~~set1~3~~CalledByGraph_node8" class="node">
 <title>proc~remove_knots~3</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_curve%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="487,-318 325,-318 325,-294 487,-294 487,-318"/>
-<text text-anchor="middle" x="406" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
+<g id="a_proc~~set1~3~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="487,-440 315,-440 315,-416 487,-416 487,-440"/>
+<text text-anchor="middle" x="401" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;none~set~3 -->
 <g id="proc~~set1~3~~CalledByGraph_edge7" class="edge">
 <title>proc~remove_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M455.86,-293.96C475.48,-289.13 498.26,-283.52 518.77,-278.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="519.76,-281.83 528.63,-276.04 518.09,-275.03 519.76,-281.83"/>
+<path fill="none" stroke="#ff0000" d="M462.24,-415.98C472.34,-412.44 482.34,-407.87 491,-402 527.88,-377 556.66,-332.45 571.47,-306.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="574.56,-307.78 576.29,-297.32 568.42,-304.42 574.56,-307.78"/>
 </g>
-<!-- proc~set_circle -->
+<!-- proc~set_c~3 -->
 <g id="proc~~set1~3~~CalledByGraph_node9" class="node">
-<title>proc~set_circle</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node9"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="474.5,-192 337.5,-192 337.5,-168 474.5,-168 474.5,-192"/>
-<text text-anchor="middle" x="406" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
+<title>proc~set_c~3</title>
+<g id="a_proc~~set1~3~~CalledByGraph_node9"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_surface%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="464,-108 338,-108 338,-84 464,-84 464,-108"/>
+<text text-anchor="middle" x="401" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
 </a>
 </g>
 </g>
-<!-- proc~set_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_c~3&#45;&gt;none~set~3 -->
 <g id="proc~~set1~3~~CalledByGraph_edge8" class="edge">
-<title>proc~set_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M467.18,-192.03C475.36,-194.53 483.51,-197.5 491,-201 515.36,-212.39 539.83,-231.04 556.5,-245.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="554.6,-248.09 564.46,-251.98 559.18,-242.79 554.6,-248.09"/>
+<title>proc~set_c~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M464.39,-103.61C473.92,-106.72 483.18,-111.03 491,-117 540.26,-154.6 566.32,-226.63 576.83,-262.93"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="573.46,-263.87 579.5,-272.57 580.2,-262 573.46,-263.87"/>
 </g>
-<!-- proc~set_c~3 -->
+<!-- proc~set_half_ring~2 -->
 <g id="proc~~set1~3~~CalledByGraph_node10" class="node">
-<title>proc~set_c~3</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node10"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_curve%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="464,-150 348,-150 348,-126 464,-126 464,-150"/>
-<text text-anchor="middle" x="406" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
+<title>proc~set_half_ring~2</title>
+<g id="a_proc~~set1~3~~CalledByGraph_node10"><a xlink:href="../proc/set_half_ring~2.html" xlink:title="nurbs_surface%set_half_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="483.5,-150 318.5,-150 318.5,-126 483.5,-126 483.5,-150"/>
+<text text-anchor="middle" x="401" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c~3&#45;&gt;none~set~3 -->
+<!-- proc~set_half_ring~2&#45;&gt;none~set~3 -->
 <g id="proc~~set1~3~~CalledByGraph_edge9" class="edge">
-<title>proc~set_c~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M464.15,-147.05C473.55,-149.98 482.87,-153.86 491,-159 524.67,-180.27 551.51,-219.07 565.91,-243.08"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="562.92,-244.91 570.98,-251.79 568.98,-241.39 562.92,-244.91"/>
+<title>proc~set_half_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M473.87,-150.11C479.91,-152.55 485.71,-155.48 491,-159 530.66,-185.4 559.08,-235.16 572.94,-263.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="569.8,-265.16 577.22,-272.71 576.13,-262.17 569.8,-265.16"/>
 </g>
-<!-- proc~set_half_circle -->
+<!-- proc~set_ring~2 -->
 <g id="proc~~set1~3~~CalledByGraph_node11" class="node">
-<title>proc~set_half_circle</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node11"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="487.5,-108 324.5,-108 324.5,-84 487.5,-84 487.5,-108"/>
-<text text-anchor="middle" x="406" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
+<title>proc~set_ring~2</title>
+<g id="a_proc~~set1~3~~CalledByGraph_node11"><a xlink:href="../proc/set_ring~2.html" xlink:title="nurbs_surface%set_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="470.5,-192 331.5,-192 331.5,-168 470.5,-168 470.5,-192"/>
+<text text-anchor="middle" x="401" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_ring~2&#45;&gt;none~set~3 -->
 <g id="proc~~set1~3~~CalledByGraph_edge10" class="edge">
-<title>proc~set_half_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M475.62,-108.12C481.09,-110.56 486.3,-113.49 491,-117 534.04,-149.18 559.53,-209.61 570.72,-242.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="567.51,-243.52 573.97,-251.92 574.16,-241.32 567.51,-243.52"/>
+<title>proc~set_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M469.92,-192.15C477.23,-194.59 484.41,-197.51 491,-201 521.51,-217.17 549.65,-245.97 566.45,-265.28"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="563.79,-267.55 572.93,-272.91 569.12,-263.02 563.79,-267.55"/>
 </g>
-<!-- program~compute_length -->
+<!-- proc~set_tetragon -->
 <g id="proc~~set1~3~~CalledByGraph_node12" class="node">
-<title>program~compute_length</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node12"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-502 0,-502 0,-478 99,-478 99,-502"/>
-<text text-anchor="middle" x="49.5" y="-487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<title>proc~set_tetragon</title>
+<g id="a_proc~~set1~3~~CalledByGraph_node12"><a xlink:href="../proc/set_tetragon.html" xlink:title="nurbs_surface%set_tetragon">
+<polygon fill="#d9534f" stroke="#d9534f" points="483,-234 319,-234 319,-210 483,-210 483,-234"/>
+<text text-anchor="middle" x="401" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;none~set~3 -->
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
 <g id="proc~~set1~3~~CalledByGraph_edge11" class="edge">
-<title>program~compute_length&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M84.64,-502.01C164.06,-527.61 364.11,-578.44 491,-491 559.8,-443.59 573.92,-333.61 576.79,-286.3"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="580.29,-286.35 577.28,-276.19 573.3,-286.01 580.29,-286.35"/>
-</g>
-<!-- proc~cmp_length -->
-<g id="proc~~set1~3~~CalledByGraph_node16" class="node">
-<title>proc~cmp_length</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node16"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="285,-482 135,-482 135,-458 285,-458 285,-482"/>
-<text text-anchor="middle" x="210" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
-</a>
-</g>
-</g>
-<!-- program~compute_length&#45;&gt;proc~cmp_length -->
-<g id="proc~~set1~3~~CalledByGraph_edge22" class="edge">
-<title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#ff0000" d="M99.35,-483.84C107.54,-482.8 116.25,-481.7 125.03,-480.6"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="125.48,-484.07 134.96,-479.34 124.6,-477.12 125.48,-484.07"/>
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M460.4,-234.03C470.7,-236.64 481.24,-239.65 491,-243 511.36,-250 533.32,-259.99 550.61,-268.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="549.19,-271.67 559.7,-272.99 552.31,-265.4 549.19,-271.67"/>
 </g>
-<!-- program~example1_curve -->
+<!-- program~compute_area -->
 <g id="proc~~set1~3~~CalledByGraph_node13" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node13"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-381 160,-381 160,-357 260,-357 260,-381"/>
-<text text-anchor="middle" x="210" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~compute_area</title>
+<g id="a_proc~~set1~3~~CalledByGraph_node13"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-542 0,-542 0,-518 89,-518 89,-542"/>
+<text text-anchor="middle" x="44.5" y="-527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;none~set~3 -->
+<!-- program~compute_area&#45;&gt;none~set~3 -->
 <g id="proc~~set1~3~~CalledByGraph_edge12" class="edge">
-<title>program~example1_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M233.08,-381.16C282.76,-406.72 405.66,-459.8 491,-411 538.32,-383.94 562.31,-319.79 572.06,-285.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="575.49,-286.59 574.73,-276.02 568.74,-284.75 575.49,-286.59"/>
+<title>program~compute_area&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M89.19,-528.67C195.01,-525.11 458.77,-514.01 491,-491 552.97,-446.76 573.59,-350.77 579.93,-307.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="583.42,-307.52 581.27,-297.15 576.48,-306.6 583.42,-307.52"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
-<g id="proc~~set1~3~~CalledByGraph_edge16" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
-<path fill="none" stroke="#ff7500" d="M260.21,-374.33C275.59,-375.99 293.12,-377.89 310.54,-379.78"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="310.45,-383.29 320.77,-380.88 311.21,-376.33 310.45,-383.29"/>
+<!-- proc~cmp_area -->
+<g id="proc~~set1~3~~CalledByGraph_node17" class="node">
+<title>proc~cmp_area</title>
+<g id="a_proc~~set1~3~~CalledByGraph_node17"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
+<polygon fill="#d9534f" stroke="#d9534f" points="275,-562 125,-562 125,-538 275,-538 275,-562"/>
+<text text-anchor="middle" x="200" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+</a>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
-<g id="proc~~set1~3~~CalledByGraph_edge17" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
-<path fill="none" stroke="#ffeb00" d="M260.21,-363.67C278.44,-361.7 299.67,-359.4 320.17,-357.18"/>
-<polygon fill="#ffeb00" stroke="#ffeb00" points="320.6,-360.66 330.16,-356.1 319.84,-353.7 320.6,-360.66"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
-<g id="proc~~set1~3~~CalledByGraph_edge18" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
-<path fill="none" stroke="#00ff4e" d="M239.62,-356.99C261.63,-348.02 292.92,-335.84 321,-327 328.08,-324.77 335.55,-322.62 343,-320.6"/>
-<polygon fill="#00ff4e" stroke="#00ff4e" points="343.97,-323.97 352.75,-318.03 342.19,-317.2 343.97,-323.97"/>
+<!-- program~compute_area&#45;&gt;proc~cmp_area -->
+<g id="proc~~set1~3~~CalledByGraph_edge31" class="edge">
+<title>program~compute_area&#45;&gt;proc~cmp_area</title>
+<path fill="none" stroke="#ff0000" d="M89.08,-535.68C97.19,-536.73 105.92,-537.87 114.78,-539.03"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="114.45,-542.51 124.81,-540.33 115.35,-535.57 114.45,-542.51"/>
 </g>
-<!-- program~example_nurbs_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~set1~3~~CalledByGraph_node14" class="node">
-<title>program~example_nurbs_curve</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node14"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 341.5,-66 341.5,-42 470.5,-42 470.5,-66"/>
-<text text-anchor="middle" x="406" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~set1~3~~CalledByGraph_node14"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="255,-420 145,-420 145,-396 255,-396 255,-420"/>
+<text text-anchor="middle" x="200" y="-405.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;none~set~3 -->
+<!-- program~example3_surface&#45;&gt;none~set~3 -->
 <g id="proc~~set1~3~~CalledByGraph_edge13" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M470.56,-63.24C477.95,-66.17 484.99,-70 491,-75 543.77,-118.84 565.87,-201.81 573.75,-241.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="570.34,-242.42 575.61,-251.62 577.22,-241.15 570.34,-242.42"/>
+<title>program~example3_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M255.17,-404.6C327.24,-399.42 450.29,-388.08 491,-369 522.44,-354.27 550.52,-324.84 567.04,-305.03"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="569.81,-307.17 573.38,-297.2 564.37,-302.77 569.81,-307.17"/>
 </g>
-<!-- program~nearest_point_1d -->
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="proc~~set1~3~~CalledByGraph_edge17" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#ff6d00" d="M239.39,-395.97C260.5,-389.4 287.17,-381.16 311,-374 323.16,-370.34 336.28,-366.47 348.62,-362.86"/>
+<polygon fill="#ff6d00" stroke="#ff6d00" points="349.69,-366.2 358.3,-360.04 347.72,-359.48 349.69,-366.2"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
+<g id="proc~~set1~3~~CalledByGraph_edge18" class="edge">
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#ffda00" d="M230.54,-420.16C252.49,-428.91 283.3,-440.61 311,-449 318.48,-451.27 326.37,-453.44 334.24,-455.47"/>
+<polygon fill="#ffda00" stroke="#ffda00" points="333.62,-458.92 344.17,-457.96 335.32,-452.13 333.62,-458.92"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
+<g id="proc~~set1~3~~CalledByGraph_edge20" class="edge">
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#00ff24" d="M255.11,-413.44C270.51,-414.99 287.75,-416.72 304.82,-418.43"/>
+<polygon fill="#00ff24" stroke="#00ff24" points="304.53,-421.92 314.83,-419.44 305.23,-414.96 304.53,-421.92"/>
+</g>
+<!-- program~example_nurbs_surface -->
 <g id="proc~~set1~3~~CalledByGraph_node15" class="node">
-<title>program~nearest_point_1d</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node15"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="457.5,-24 354.5,-24 354.5,0 457.5,0 457.5,-24"/>
-<text text-anchor="middle" x="406" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<title>program~example_nurbs_surface</title>
+<g id="a_proc~~set1~3~~CalledByGraph_node15"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 331.5,-66 331.5,-42 470.5,-42 470.5,-66"/>
+<text text-anchor="middle" x="401" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;none~set~3 -->
+<!-- program~example_nurbs_surface&#45;&gt;none~set~3 -->
 <g id="proc~~set1~3~~CalledByGraph_edge14" class="edge">
-<title>program~nearest_point_1d&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M457.92,-16.54C469.88,-19.69 481.8,-24.79 491,-33 553.86,-89.12 571.19,-195.45 575.85,-241.64"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="572.38,-242.13 576.76,-251.78 579.35,-241.51 572.38,-242.13"/>
+<title>program~example_nurbs_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M470.75,-63.21C478.08,-66.17 485.03,-70.01 491,-75 550.25,-124.48 572.25,-219.65 579.43,-262.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="575.99,-263.45 580.98,-272.8 582.91,-262.38 575.99,-263.45"/>
+</g>
+<!-- program~nearest_point_2d -->
+<g id="proc~~set1~3~~CalledByGraph_node16" class="node">
+<title>program~nearest_point_2d</title>
+<g id="a_proc~~set1~3~~CalledByGraph_node16"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452.5,-24 349.5,-24 349.5,0 452.5,0 452.5,-24"/>
+<text text-anchor="middle" x="401" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+</a>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+</g>
+<!-- program~nearest_point_2d&#45;&gt;none~set~3 -->
 <g id="proc~~set1~3~~CalledByGraph_edge15" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#ff0000" d="M285.17,-470C301.32,-470 318.36,-470 334.36,-470"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="334.71,-473.5 344.71,-470 334.71,-466.5 334.71,-473.5"/>
+<title>program~nearest_point_2d&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M452.73,-15.16C466.47,-18.21 480.44,-23.61 491,-33 560.36,-94.71 577.18,-213.24 581.23,-262.59"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="577.76,-263.07 581.96,-272.8 584.74,-262.57 577.76,-263.07"/>
 </g>
-<!-- program~shape_c_1d -->
-<g id="proc~~set1~3~~CalledByGraph_node17" class="node">
-<title>program~shape_c_1d</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node17"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-150 172,-150 172,-126 248,-126 248,-150"/>
-<text text-anchor="middle" x="210" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~set1~3~~CalledByGraph_edge16" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#ff0000" d="M275.1,-550C291.15,-550 308.13,-550 324.24,-550"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="324.68,-553.5 334.68,-550 324.68,-546.5 324.68,-553.5"/>
+</g>
+<!-- program~example_ppm1 -->
+<g id="proc~~set1~3~~CalledByGraph_node18" class="node">
+<title>program~example_ppm1</title>
+<g id="a_proc~~set1~3~~CalledByGraph_node18"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-192 153,-192 153,-168 247,-168 247,-192"/>
+<text text-anchor="middle" x="200" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~set_c~3 -->
-<g id="proc~~set1~3~~CalledByGraph_edge20" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~set_c~3</title>
-<path fill="none" stroke="#00c4ff" d="M248.41,-138C273.62,-138 307.6,-138 337.47,-138"/>
-<polygon fill="#00c4ff" stroke="#00c4ff" points="337.84,-141.5 347.84,-138 337.84,-134.5 337.84,-141.5"/>
+<!-- program~example_ppm1&#45;&gt;proc~set_ring~2 -->
+<g id="proc~~set1~3~~CalledByGraph_edge24" class="edge">
+<title>program~example_ppm1&#45;&gt;proc~set_ring~2</title>
+<path fill="none" stroke="#0091ff" d="M247.15,-180C269.15,-180 296.09,-180 321.19,-180"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="321.45,-183.5 331.45,-180 321.45,-176.5 321.45,-183.5"/>
 </g>
-<!-- program~shape_circle -->
-<g id="proc~~set1~3~~CalledByGraph_node18" class="node">
-<title>program~shape_circle</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node18"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249.5,-192 170.5,-192 170.5,-168 249.5,-168 249.5,-192"/>
-<text text-anchor="middle" x="210" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<!-- program~example_ppm1&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set1~3~~CalledByGraph_edge26" class="edge">
+<title>program~example_ppm1&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.15,-189.74C272.73,-195.14 304.98,-201.95 333.26,-207.91"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="332.57,-211.34 343.07,-209.99 334.01,-204.5 332.57,-211.34"/>
+</g>
+<!-- program~example_ppm2 -->
+<g id="proc~~set1~3~~CalledByGraph_node19" class="node">
+<title>program~example_ppm2</title>
+<g id="a_proc~~set1~3~~CalledByGraph_node19"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-150 153,-150 153,-126 247,-126 247,-150"/>
+<text text-anchor="middle" x="200" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm2&#45;&gt;proc~set_half_ring~2 -->
+<g id="proc~~set1~3~~CalledByGraph_edge22" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~set_half_ring~2</title>
+<path fill="none" stroke="#00ffff" d="M247.15,-138C265.39,-138 287.03,-138 308.19,-138"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="308.2,-141.5 318.2,-138 308.2,-134.5 308.2,-141.5"/>
+</g>
+<!-- program~example_ppm2&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set1~3~~CalledByGraph_edge27" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.02,-146.55C256.72,-149.56 266.56,-153.6 275,-159 295.71,-172.25 290,-188.21 311,-201 314.01,-202.83 317.16,-204.5 320.41,-206.03"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="319.22,-209.32 329.8,-209.95 321.92,-202.87 319.22,-209.32"/>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~set1~3~~CalledByGraph_node20" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~set1~3~~CalledByGraph_node20"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-318 153,-318 153,-294 247,-294 247,-318"/>
+<text text-anchor="middle" x="200" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~set_circle -->
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
 <g id="proc~~set1~3~~CalledByGraph_edge19" class="edge">
-<title>program~shape_circle&#45;&gt;proc~set_circle</title>
-<path fill="none" stroke="#00ffc4" d="M249.79,-180C271.95,-180 300.54,-180 327.13,-180"/>
-<polygon fill="#00ffc4" stroke="#00ffc4" points="327.21,-183.5 337.21,-180 327.21,-176.5 327.21,-183.5"/>
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#48ff00" d="M247.15,-296.26C272.73,-290.86 304.98,-284.05 333.26,-278.09"/>
+<polygon fill="#48ff00" stroke="#48ff00" points="334.01,-281.5 343.07,-276.01 332.57,-274.66 334.01,-281.5"/>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set1~3~~CalledByGraph_edge28" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.02,-297.45C256.72,-294.44 266.56,-290.4 275,-285 295.71,-271.75 290,-255.79 311,-243 314.01,-241.17 317.16,-239.5 320.41,-237.97"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="321.92,-241.13 329.8,-234.05 319.22,-234.68 321.92,-241.13"/>
+</g>
+<!-- program~nearest_point_2d_bench -->
+<g id="proc~~set1~3~~CalledByGraph_node21" class="node">
+<title>program~nearest_point_2d_bench</title>
+<g id="a_proc~~set1~3~~CalledByGraph_node21"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-234 129,-234 129,-210 271,-210 271,-234"/>
+<text text-anchor="middle" x="200" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+</a>
 </g>
-<!-- program~shape_half_circle -->
-<g id="proc~~set1~3~~CalledByGraph_node19" class="node">
-<title>program~shape_half_circle</title>
-<g id="a_proc~~set1~3~~CalledByGraph_node19"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-108 158,-108 158,-84 262,-84 262,-108"/>
-<text text-anchor="middle" x="210" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+</g>
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set1~3~~CalledByGraph_edge29" class="edge">
+<title>program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M271.16,-222C283.34,-222 296.17,-222 308.82,-222"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="308.91,-225.5 318.91,-222 308.91,-218.5 308.91,-225.5"/>
+</g>
+<!-- program~shape_c_2d -->
+<g id="proc~~set1~3~~CalledByGraph_node22" class="node">
+<title>program~shape_c_2d</title>
+<g id="a_proc~~set1~3~~CalledByGraph_node22"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="238,-24 162,-24 162,0 238,0 238,-24"/>
+<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
+<!-- program~shape_c_2d&#45;&gt;proc~set_c~3 -->
 <g id="proc~~set1~3~~CalledByGraph_edge21" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
-<path fill="none" stroke="#004eff" d="M262.22,-96C278.08,-96 296.06,-96 313.78,-96"/>
-<polygon fill="#004eff" stroke="#004eff" points="314.17,-99.5 324.17,-96 314.17,-92.5 314.17,-99.5"/>
+<title>program~shape_c_2d&#45;&gt;proc~set_c~3</title>
+<path fill="none" stroke="#00ff91" d="M238.17,-18.06C250.55,-21.21 263.98,-25.94 275,-33 295.71,-46.25 290,-62.21 311,-75 316.34,-78.25 322.14,-81 328.14,-83.32"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="327.09,-86.66 337.68,-86.63 329.38,-80.05 327.09,-86.66"/>
+</g>
+<!-- program~shape_half_ring_2d -->
+<g id="proc~~set1~3~~CalledByGraph_node23" class="node">
+<title>program~shape_half_ring_2d</title>
+<g id="a_proc~~set1~3~~CalledByGraph_node23"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="257.5,-66 142.5,-66 142.5,-42 257.5,-42 257.5,-66"/>
+<text text-anchor="middle" x="200" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2 -->
+<g id="proc~~set1~3~~CalledByGraph_edge23" class="edge">
+<title>program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2</title>
+<path fill="none" stroke="#00ffff" d="M257.09,-66.07C263.38,-68.53 269.49,-71.47 275,-75 295.71,-88.25 290,-104.21 311,-117 314.01,-118.83 317.16,-120.5 320.41,-122.03"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="319.22,-125.32 329.8,-125.95 321.92,-118.87 319.22,-125.32"/>
+</g>
+<!-- program~shape_ring_2d -->
+<g id="proc~~set1~3~~CalledByGraph_node24" class="node">
+<title>program~shape_ring_2d</title>
+<g id="a_proc~~set1~3~~CalledByGraph_node24"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="245,-108 155,-108 155,-84 245,-84 245,-108"/>
+<text text-anchor="middle" x="200" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_ring_2d&#45;&gt;proc~set_ring~2 -->
+<g id="proc~~set1~3~~CalledByGraph_edge25" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~set_ring~2</title>
+<path fill="none" stroke="#0091ff" d="M245.08,-103.96C255.4,-107.03 266,-111.24 275,-117 295.71,-130.25 290,-146.21 311,-159 314.41,-161.08 318.01,-162.95 321.73,-164.64"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="320.6,-167.95 331.18,-168.46 323.22,-161.46 320.6,-167.95"/>
+</g>
+<!-- program~shape_tetragon -->
+<g id="proc~~set1~3~~CalledByGraph_node25" class="node">
+<title>program~shape_tetragon</title>
+<g id="a_proc~~set1~3~~CalledByGraph_node25"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-276 152,-276 152,-252 248,-252 248,-276"/>
+<text text-anchor="middle" x="200" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+</a>
+</g>
+</g>
+<!-- program~shape_tetragon&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set1~3~~CalledByGraph_edge30" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M248.16,-254.05C273.44,-248.71 305.03,-242.04 332.84,-236.17"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="333.83,-239.54 342.89,-234.05 332.39,-232.69 333.83,-239.54"/>
 </g>
 </g>
 </svg>
@@ -839,7 +983,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set2.html b/proc/set2.html
index b5e2697d0..965221161 100644
--- a/proc/set2.html
+++ b/proc/set2.html
@@ -78,20 +78,20 @@ <h1>set2
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.3% of total for procedures.">17 statements</a>
+                 title=" 0.3% of total for procedures.">22 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">set2</li>
           </ol>
         </nav>
@@ -137,14 +137,14 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine set2(this, Xth_dir1, Xth_dir2, Xth_dir3, degree, continuity1, continuity2, continuity3, Xc, Wc)  
+    <h2>private pure subroutine set2(this, Xth_dir, degree, continuity, Xc, Wc)  
 </h2>
     
 
-    <p>Set control points and weights for the NURBS volume object.</p>
+    <p>Set NURBS curve using nodes of parameter space (Xth), degree, continuity, control points and weights.</p>
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,8 +159,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~2"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~3"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -174,7 +174,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth_dir1"></span>
+              <span class="anchor" id="variable-xth_dir"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -182,37 +182,7 @@ <h3>Arguments</h3>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>Xth_dir1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-xth_dir2"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>Xth_dir2</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-xth_dir3"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>Xth_dir3</strong>(:)</td>
+            <td><strong>Xth_dir</strong>(:)</td>
             <td>
                 
             </td>
@@ -222,49 +192,19 @@ <h3>Arguments</h3>
               <span class="anchor" id="variable-degree~2"></span>
               integer,
             </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>degree</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-continuity1"></span>
-              integer,
-            </td>
-<td>intent(in),</td>
+<td>intent(in)</td>
               <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>continuity1</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-continuity2"></span>
-              integer,
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
+              
             </td>
             <td>::</td>
-            <td><strong>continuity2</strong>(:)</td>
+            <td><strong>degree</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-continuity3"></span>
+              <span class="anchor" id="variable-continuity"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -272,14 +212,14 @@ <h3>Arguments</h3>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>continuity3</strong>(:)</td>
+            <td><strong>continuity</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~5"></span>
+              <span class="anchor" id="variable-xc~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -294,7 +234,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~4"></span>
+              <span class="anchor" id="variable-wc~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -322,106 +262,46 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set2~~CallsGraph Pages: 1 -->
-<svg id="procset2CallsGraph" width="629pt" height="95pt"
- viewBox="0.00 0.00 629.00 95.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set2~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 91)">
+<svg id="procset2CallsGraph" width="374pt" height="32pt"
+ viewBox="0.00 0.00 374.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set2~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~set2~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-91 625,-91 625,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 370,-28 370,4 -4,4"/>
 <!-- proc~set2 -->
 <g id="proc~~set2~~CallsGraph_node1" class="node">
 <title>proc~set2</title>
-<polygon fill="none" stroke="black" points="120,-45 0,-45 0,-21 120,-21 120,-45"/>
-<text text-anchor="middle" x="60" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set2</text>
-</g>
-<!-- proc~cmp_nc -->
-<g id="proc~~set2~~CallsGraph_node2" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_proc~~set2~~CallsGraph_node2"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="295,-66 156,-66 156,-42 295,-42 295,-66"/>
-<text text-anchor="middle" x="225.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
-</a>
-</g>
-</g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
-<g id="proc~~set2~~CallsGraph_edge1" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#ff0000" d="M120.03,-40.58C128.38,-41.65 137.07,-42.77 145.72,-43.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="145.46,-47.38 155.83,-45.18 146.35,-40.43 145.46,-47.38"/>
+<polygon fill="none" stroke="black" points="110,-24 0,-24 0,0 110,0 110,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set2</text>
 </g>
 <!-- proc~compute_knot_vector -->
-<g id="proc~~set2~~CallsGraph_node3" class="node">
+<g id="proc~~set2~~CallsGraph_node2" class="node">
 <title>proc~compute_knot_vector</title>
-<g id="a_proc~~set2~~CallsGraph_node3"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="289,-24 162,-24 162,0 289,0 289,-24"/>
-<text text-anchor="middle" x="225.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<g id="a_proc~~set2~~CallsGraph_node2"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="273,-24 146,-24 146,0 273,0 273,-24"/>
+<text text-anchor="middle" x="209.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
-<g id="proc~~set2~~CallsGraph_edge2" class="edge">
+<g id="proc~~set2~~CallsGraph_edge1" class="edge">
 <title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#ff0000" d="M120.03,-25.42C130.36,-24.09 141.21,-22.7 151.85,-21.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="152.5,-24.78 161.97,-20.03 151.61,-17.83 152.5,-24.78"/>
-</g>
-<!-- interface~compute_multiplicity -->
-<g id="proc~~set2~~CallsGraph_node4" class="node">
-<title>interface~compute_multiplicity</title>
-<g id="a_proc~~set2~~CallsGraph_node4"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="455,-66 331,-66 331,-42 455,-42 455,-66"/>
-<text text-anchor="middle" x="393" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
-</a>
-</g>
-</g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~set2~~CallsGraph_edge3" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M295.25,-54C303.65,-54 312.24,-54 320.68,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="320.86,-57.5 330.86,-54 320.86,-50.5 320.86,-57.5"/>
+<path fill="none" stroke="#ff0000" d="M110.2,-12C118.5,-12 127.19,-12 135.82,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="135.89,-15.5 145.89,-12 135.89,-8.5 135.89,-15.5"/>
 </g>
 <!-- proc~repelem -->
-<g id="proc~~set2~~CallsGraph_node5" class="node">
+<g id="proc~~set2~~CallsGraph_node3" class="node">
 <title>proc~repelem</title>
-<g id="a_proc~~set2~~CallsGraph_node5"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="421.5,-24 364.5,-24 364.5,0 421.5,0 421.5,-24"/>
-<text text-anchor="middle" x="393" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<g id="a_proc~~set2~~CallsGraph_node3"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="366,-24 309,-24 309,0 366,0 366,-24"/>
+<text text-anchor="middle" x="337.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
-<g id="proc~~set2~~CallsGraph_edge4" class="edge">
+<g id="proc~~set2~~CallsGraph_edge2" class="edge">
 <title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#00ffff" d="M289.07,-12C311,-12 334.95,-12 354.23,-12"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="354.41,-15.5 364.41,-12 354.41,-8.5 354.41,-15.5"/>
-</g>
-<!-- proc~compute_multiplicity1 -->
-<g id="proc~~set2~~CallsGraph_node6" class="node">
-<title>proc~compute_multiplicity1</title>
-<g id="a_proc~~set2~~CallsGraph_node6"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="621,-87 491,-87 491,-63 621,-63 621,-87"/>
-<text text-anchor="middle" x="556" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
-</a>
-</g>
-</g>
-<!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
-<g id="proc~~set2~~CallsGraph_edge5" class="edge">
-<title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M455.33,-62C463.69,-63.09 472.35,-64.22 480.92,-65.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="480.53,-68.82 490.9,-66.64 481.44,-61.88 480.53,-68.82"/>
-</g>
-<!-- proc~compute_multiplicity2 -->
-<g id="proc~~set2~~CallsGraph_node7" class="node">
-<title>proc~compute_multiplicity2</title>
-<g id="a_proc~~set2~~CallsGraph_node7"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="621,-45 491,-45 491,-21 621,-21 621,-45"/>
-<text text-anchor="middle" x="556" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
-</a>
-</g>
-</g>
-<!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
-<g id="proc~~set2~~CallsGraph_edge6" class="edge">
-<title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M455.33,-46C463.69,-44.91 472.35,-43.78 480.92,-42.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="481.44,-46.12 490.9,-41.36 480.53,-39.18 481.44,-46.12"/>
+<path fill="none" stroke="#ff0000" d="M273.13,-12C281.89,-12 290.66,-12 298.76,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="298.97,-15.5 308.97,-12 298.97,-8.5 298.97,-15.5"/>
 </g>
 </g>
 </svg>
@@ -517,355 +397,310 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set2~~CalledByGraph Pages: 1 -->
-<svg id="procset2CalledByGraph" width="641pt" height="488pt"
- viewBox="0.00 0.00 641.00 488.05" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set2~~CalledByGraph" class="graph" transform="scale(1.31 1.31) rotate(0) translate(4 633.29)">
+<svg id="procset2CalledByGraph" width="641pt" height="448pt"
+ viewBox="0.00 0.00 641.00 448.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set2~~CalledByGraph" class="graph" transform="scale(1.22 1.22) rotate(0) translate(4 544.5)">
 <title>proc~~set2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-633.29 833,-633.29 833,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-544.5 780,-544.5 780,4 -4,4"/>
 <!-- proc~set2 -->
 <g id="proc~~set2~~CalledByGraph_node1" class="node">
 <title>proc~set2</title>
-<polygon fill="none" stroke="black" points="829,-318 709,-318 709,-294 829,-294 829,-318"/>
-<text text-anchor="middle" x="769" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set2</text>
+<polygon fill="none" stroke="black" points="776,-276 666,-276 666,-252 776,-252 776,-276"/>
+<text text-anchor="middle" x="721" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set2</text>
 </g>
 <!-- none~set -->
 <g id="proc~~set2~~CalledByGraph_node2" class="node">
 <title>none~set</title>
-<g id="a_proc~~set2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="673,-318 560,-318 560,-294 673,-294 673,-318"/>
-<text text-anchor="middle" x="616.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<g id="a_proc~~set2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="630,-276 527,-276 527,-252 630,-252 630,-276"/>
+<text text-anchor="middle" x="578.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set2 -->
 <g id="proc~~set2~~CalledByGraph_edge1" class="edge">
 <title>none~set&#45;&gt;proc~set2</title>
-<path fill="none" stroke="#ff0000" d="M673.11,-306C681.48,-306 690.19,-306 698.8,-306"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="698.83,-309.5 708.83,-306 698.83,-302.5 698.83,-309.5"/>
+<path fill="none" stroke="#ff0000" d="M630.22,-264C638.38,-264 646.92,-264 655.35,-264"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="655.55,-267.5 665.55,-264 655.55,-260.5 655.55,-267.5"/>
 </g>
 <!-- proc~ansatz -->
 <g id="proc~~set2~~CalledByGraph_node3" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~set2~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-566 367.5,-566 367.5,-542 499.5,-542 499.5,-566"/>
-<text text-anchor="middle" x="433.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~set2~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="467,-482 345,-482 345,-458 467,-458 467,-482"/>
+<text text-anchor="middle" x="406" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;none~set -->
 <g id="proc~~set2~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.76,-542.65C508.6,-539.03 517.01,-534.27 524,-528 584.64,-473.59 606.02,-372.87 612.74,-328.26"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="616.23,-328.58 614.15,-318.19 609.3,-327.61 616.23,-328.58"/>
+<path fill="none" stroke="#ff0000" d="M467.12,-458.13C475.76,-454.59 484.06,-449.98 491,-444 540.47,-401.35 563.98,-323.98 572.94,-286.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="576.41,-286.63 575.18,-276.11 569.58,-285.1 576.41,-286.63"/>
 </g>
 <!-- proc~elevate_degree -->
 <g id="proc~~set2~~CalledByGraph_node4" class="node">
 <title>proc~elevate_degree</title>
-<g id="a_proc~~set2~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-486 343.5,-486 343.5,-462 523.5,-462 523.5,-486"/>
-<text text-anchor="middle" x="433.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
+<g id="a_proc~~set2~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="491,-402 321,-402 321,-378 491,-378 491,-402"/>
+<text text-anchor="middle" x="406" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree&#45;&gt;none~set -->
 <g id="proc~~set2~~CalledByGraph_edge3" class="edge">
 <title>proc~elevate_degree&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M507.95,-461.94C513.63,-459.48 519.07,-456.54 524,-453 568.52,-421.06 596.03,-360.08 608.18,-327.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="611.5,-328.73 611.59,-318.14 604.91,-326.36 611.5,-328.73"/>
+<path fill="none" stroke="#ff0000" d="M472.9,-377.91C479.26,-375.47 485.41,-372.53 491,-369 524.67,-347.73 551.51,-308.93 565.91,-284.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="568.98,-286.61 570.98,-276.21 562.92,-283.09 568.98,-286.61"/>
 </g>
 <!-- proc~insert_knots -->
 <g id="proc~~set2~~CalledByGraph_node5" class="node">
 <title>proc~insert_knots</title>
-<g id="a_proc~~set2~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514,-444 353,-444 353,-420 514,-420 514,-444"/>
-<text text-anchor="middle" x="433.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
+<g id="a_proc~~set2~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_curve%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-360 330.5,-360 330.5,-336 481.5,-336 481.5,-360"/>
+<text text-anchor="middle" x="406" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;none~set -->
 <g id="proc~~set2~~CalledByGraph_edge4" class="edge">
 <title>proc~insert_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M505.06,-419.93C511.69,-417.49 518.12,-414.54 524,-411 558.92,-389.96 587.54,-351.08 603,-327"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="606.13,-328.6 608.45,-318.26 600.19,-324.89 606.13,-328.6"/>
+<path fill="none" stroke="#ff0000" d="M467.18,-335.97C475.36,-333.47 483.51,-330.5 491,-327 515.36,-315.61 539.83,-296.96 556.5,-282.9"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="559.18,-285.21 564.46,-276.02 554.6,-279.91 559.18,-285.21"/>
 </g>
 <!-- proc~modify_wc -->
 <g id="proc~~set2~~CalledByGraph_node6" class="node">
 <title>proc~modify_wc</title>
-<g id="a_proc~~set2~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-360 355.5,-360 355.5,-336 511.5,-336 511.5,-360"/>
-<text text-anchor="middle" x="433.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
+<g id="a_proc~~set2~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="479,-276 333,-276 333,-252 479,-252 479,-276"/>
+<text text-anchor="middle" x="406" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~set -->
 <g id="proc~~set2~~CalledByGraph_edge5" class="edge">
 <title>proc~modify_wc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M486.37,-335.96C507.38,-331.09 531.82,-325.42 553.75,-320.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="554.68,-323.71 563.63,-318.04 553.09,-316.89 554.68,-323.71"/>
+<path fill="none" stroke="#ff0000" d="M479.31,-264C491.66,-264 504.39,-264 516.42,-264"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="516.78,-267.5 526.78,-264 516.78,-260.5 516.78,-267.5"/>
 </g>
 <!-- proc~modify_xc -->
 <g id="proc~~set2~~CalledByGraph_node7" class="node">
 <title>proc~modify_xc</title>
-<g id="a_proc~~set2~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="510,-318 357,-318 357,-294 510,-294 510,-318"/>
-<text text-anchor="middle" x="433.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
+<g id="a_proc~~set2~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-234 334.5,-234 334.5,-210 477.5,-210 477.5,-234"/>
+<text text-anchor="middle" x="406" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~set -->
 <g id="proc~~set2~~CalledByGraph_edge6" class="edge">
 <title>proc~modify_xc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M510.21,-306C523.36,-306 536.93,-306 549.79,-306"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="549.92,-309.5 559.92,-306 549.92,-302.5 549.92,-309.5"/>
+<path fill="none" stroke="#ff0000" d="M455.86,-234.04C475.48,-238.87 498.26,-244.48 518.77,-249.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="518.09,-252.97 528.63,-251.96 519.76,-246.17 518.09,-252.97"/>
 </g>
 <!-- proc~remove_knots -->
 <g id="proc~~set2~~CalledByGraph_node8" class="node">
 <title>proc~remove_knots</title>
-<g id="a_proc~~set2~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-402 347.5,-402 347.5,-378 519.5,-378 519.5,-402"/>
-<text text-anchor="middle" x="433.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
+<g id="a_proc~~set2~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_curve%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="487,-318 325,-318 325,-294 487,-294 487,-318"/>
+<text text-anchor="middle" x="406" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots&#45;&gt;none~set -->
 <g id="proc~~set2~~CalledByGraph_edge7" class="edge">
 <title>proc~remove_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.01,-377.92C507.58,-375.44 516.12,-372.49 524,-369 549.77,-357.6 575.92,-338.69 593.63,-324.56"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="596.07,-327.09 601.61,-318.06 591.65,-321.66 596.07,-327.09"/>
+<path fill="none" stroke="#ff0000" d="M455.86,-293.96C475.48,-289.13 498.26,-283.52 518.77,-278.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="519.76,-281.83 528.63,-276.04 518.09,-275.03 519.76,-281.83"/>
 </g>
 <!-- proc~set_c -->
 <g id="proc~~set2~~CalledByGraph_node9" class="node">
 <title>proc~set_c</title>
-<g id="a_proc~~set2~~CalledByGraph_node9"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_volume%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-276 370.5,-276 370.5,-252 496.5,-252 496.5,-276"/>
-<text text-anchor="middle" x="433.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
+<g id="a_proc~~set2~~CalledByGraph_node9"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_curve%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="464,-192 348,-192 348,-168 464,-168 464,-192"/>
+<text text-anchor="middle" x="406" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c&#45;&gt;none~set -->
 <g id="proc~~set2~~CalledByGraph_edge8" class="edge">
 <title>proc~set_c&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M486.37,-276.04C507.38,-280.91 531.82,-286.58 553.75,-291.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="553.09,-295.11 563.63,-293.96 554.68,-288.29 553.09,-295.11"/>
+<path fill="none" stroke="#ff0000" d="M464.06,-191.1C473.28,-193.79 482.56,-197.05 491,-201 515.36,-212.39 539.83,-231.04 556.5,-245.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="554.6,-248.09 564.46,-251.98 559.18,-242.79 554.6,-248.09"/>
 </g>
-<!-- proc~set_half_ring -->
+<!-- proc~set_circle -->
 <g id="proc~~set2~~CalledByGraph_node10" class="node">
-<title>proc~set_half_ring</title>
-<g id="a_proc~~set2~~CalledByGraph_node10"><a xlink:href="../proc/set_half_ring.html" xlink:title="nurbs_volume%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="516,-234 351,-234 351,-210 516,-210 516,-234"/>
-<text text-anchor="middle" x="433.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
+<title>proc~set_circle</title>
+<g id="a_proc~~set2~~CalledByGraph_node10"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
+<polygon fill="#d9534f" stroke="#d9534f" points="474.5,-150 337.5,-150 337.5,-126 474.5,-126 474.5,-150"/>
+<text text-anchor="middle" x="406" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring&#45;&gt;none~set -->
+<!-- proc~set_circle&#45;&gt;none~set -->
 <g id="proc~~set2~~CalledByGraph_edge9" class="edge">
-<title>proc~set_half_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.01,-234.08C507.58,-236.56 516.12,-239.51 524,-243 549.77,-254.4 575.92,-273.31 593.63,-287.44"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="591.65,-290.34 601.61,-293.94 596.07,-284.91 591.65,-290.34"/>
+<title>proc~set_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M472.9,-150.09C479.26,-152.53 485.41,-155.47 491,-159 524.67,-180.27 551.51,-219.07 565.91,-243.08"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="562.92,-244.91 570.98,-251.79 568.98,-241.39 562.92,-244.91"/>
 </g>
-<!-- proc~set_hexahedron -->
+<!-- proc~set_half_circle -->
 <g id="proc~~set2~~CalledByGraph_node11" class="node">
-<title>proc~set_hexahedron</title>
-<g id="a_proc~~set2~~CalledByGraph_node11"><a xlink:href="../proc/set_hexahedron.html" xlink:title="nurbs_volume%set_hexahedron">
-<polygon fill="#d9534f" stroke="#d9534f" points="524,-192 343,-192 343,-168 524,-168 524,-192"/>
-<text text-anchor="middle" x="433.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
+<title>proc~set_half_circle</title>
+<g id="a_proc~~set2~~CalledByGraph_node11"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
+<polygon fill="#d9534f" stroke="#d9534f" points="487.5,-108 324.5,-108 324.5,-84 487.5,-84 487.5,-108"/>
+<text text-anchor="middle" x="406" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_hexahedron&#45;&gt;none~set -->
+<!-- proc~set_half_circle&#45;&gt;none~set -->
 <g id="proc~~set2~~CalledByGraph_edge10" class="edge">
-<title>proc~set_hexahedron&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M505.06,-192.07C511.69,-194.51 518.12,-197.46 524,-201 558.92,-222.04 587.54,-260.92 603,-285"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="600.19,-287.11 608.45,-293.74 606.13,-283.4 600.19,-287.11"/>
+<title>proc~set_half_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M475.62,-108.12C481.09,-110.56 486.3,-113.49 491,-117 534.04,-149.18 559.53,-209.61 570.72,-242.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="567.51,-243.52 573.97,-251.92 574.16,-241.32 567.51,-243.52"/>
 </g>
-<!-- proc~set_ring -->
+<!-- program~compute_length -->
 <g id="proc~~set2~~CalledByGraph_node12" class="node">
-<title>proc~set_ring</title>
-<g id="a_proc~~set2~~CalledByGraph_node12"><a xlink:href="../proc/set_ring.html" xlink:title="nurbs_volume%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="503,-150 364,-150 364,-126 503,-126 503,-150"/>
-<text text-anchor="middle" x="433.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
+<title>program~compute_length</title>
+<g id="a_proc~~set2~~CalledByGraph_node12"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-502 0,-502 0,-478 99,-478 99,-502"/>
+<text text-anchor="middle" x="49.5" y="-487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring&#45;&gt;none~set -->
+<!-- program~compute_length&#45;&gt;none~set -->
 <g id="proc~~set2~~CalledByGraph_edge11" class="edge">
-<title>proc~set_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.41,-148.22C510.74,-151.01 517.78,-154.53 524,-159 568.52,-190.94 596.03,-251.92 608.18,-284.39"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="604.91,-285.64 611.59,-293.86 611.5,-283.27 604.91,-285.64"/>
+<title>program~compute_length&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M84.64,-502.01C164.06,-527.61 364.11,-578.44 491,-491 559.8,-443.59 573.92,-333.61 576.79,-286.3"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="580.29,-286.35 577.28,-276.19 573.3,-286.01 580.29,-286.35"/>
+</g>
+<!-- proc~cmp_length -->
+<g id="proc~~set2~~CalledByGraph_node16" class="node">
+<title>proc~cmp_length</title>
+<g id="a_proc~~set2~~CalledByGraph_node16"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
+<polygon fill="#d9534f" stroke="#d9534f" points="285,-482 135,-482 135,-458 285,-458 285,-482"/>
+<text text-anchor="middle" x="210" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+</a>
 </g>
-<!-- program~compute_volume -->
+</g>
+<!-- program~compute_length&#45;&gt;proc~cmp_length -->
+<g id="proc~~set2~~CalledByGraph_edge22" class="edge">
+<title>program~compute_length&#45;&gt;proc~cmp_length</title>
+<path fill="none" stroke="#ff0000" d="M99.35,-483.84C107.54,-482.8 116.25,-481.7 125.03,-480.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="125.48,-484.07 134.96,-479.34 124.6,-477.12 125.48,-484.07"/>
+</g>
+<!-- program~example1_curve -->
 <g id="proc~~set2~~CalledByGraph_node13" class="node">
-<title>program~compute_volume</title>
-<g id="a_proc~~set2~~CalledByGraph_node13"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-586 0,-586 0,-562 105,-562 105,-586"/>
-<text text-anchor="middle" x="52.5" y="-571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~set2~~CalledByGraph_node13"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-381 160,-381 160,-357 260,-357 260,-381"/>
+<text text-anchor="middle" x="210" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;none~set -->
+<!-- program~example1_curve&#45;&gt;none~set -->
 <g id="proc~~set2~~CalledByGraph_edge12" class="edge">
-<title>program~compute_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M86.78,-586.01C169.65,-613.64 388.35,-672.14 524,-575 605.44,-516.68 615.25,-381.64 615.83,-328.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="619.33,-328.19 615.83,-318.18 612.33,-328.18 619.33,-328.19"/>
+<title>program~example1_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M233.08,-381.16C282.76,-406.72 405.66,-459.8 491,-411 538.32,-383.94 562.31,-319.79 572.06,-285.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="575.49,-286.59 574.73,-276.02 568.74,-284.75 575.49,-286.59"/>
 </g>
-<!-- proc~cmp_volume -->
-<g id="proc~~set2~~CalledByGraph_node18" class="node">
-<title>proc~cmp_volume</title>
-<g id="a_proc~~set2~~CalledByGraph_node18"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-566 141,-566 141,-542 307,-542 307,-566"/>
-<text text-anchor="middle" x="224" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
-</a>
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
+<g id="proc~~set2~~CalledByGraph_edge16" class="edge">
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
+<path fill="none" stroke="#ff7500" d="M260.21,-374.33C275.59,-375.99 293.12,-377.89 310.54,-379.78"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="310.45,-383.29 320.77,-380.88 311.21,-376.33 310.45,-383.29"/>
 </g>
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
+<g id="proc~~set2~~CalledByGraph_edge17" class="edge">
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
+<path fill="none" stroke="#ffeb00" d="M260.21,-363.67C278.44,-361.7 299.67,-359.4 320.17,-357.18"/>
+<polygon fill="#ffeb00" stroke="#ffeb00" points="320.6,-360.66 330.16,-356.1 319.84,-353.7 320.6,-360.66"/>
 </g>
-<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
-<g id="proc~~set2~~CalledByGraph_edge25" class="edge">
-<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#ff0000" d="M105.28,-567.89C113.48,-566.92 122.18,-565.9 130.98,-564.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="131.41,-568.33 140.93,-563.68 130.59,-561.38 131.41,-568.33"/>
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
+<g id="proc~~set2~~CalledByGraph_edge18" class="edge">
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
+<path fill="none" stroke="#00ff4e" d="M239.62,-356.99C261.63,-348.02 292.92,-335.84 321,-327 328.08,-324.77 335.55,-322.62 343,-320.6"/>
+<polygon fill="#00ff4e" stroke="#00ff4e" points="343.97,-323.97 352.75,-318.03 342.19,-317.2 343.97,-323.97"/>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example_nurbs_curve -->
 <g id="proc~~set2~~CalledByGraph_node14" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~set2~~CalledByGraph_node14"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-465 169,-465 169,-441 279,-441 279,-465"/>
-<text text-anchor="middle" x="224" y="-450.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example_nurbs_curve</title>
+<g id="a_proc~~set2~~CalledByGraph_node14"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 341.5,-66 341.5,-42 470.5,-42 470.5,-66"/>
+<text text-anchor="middle" x="406" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;none~set -->
+<!-- program~example_nurbs_curve&#45;&gt;none~set -->
 <g id="proc~~set2~~CalledByGraph_edge13" class="edge">
-<title>program~example3_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M246.93,-465.12C299.32,-492.29 434.06,-551.38 524,-495 583.54,-457.67 605.3,-369.39 612.41,-328.06"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="615.87,-328.6 613.98,-318.18 608.95,-327.5 615.87,-328.6"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
-<g id="proc~~set2~~CalledByGraph_edge18" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#ff6600" d="M279.25,-458.49C295.84,-460.17 314.64,-462.07 333.24,-463.95"/>
-<polygon fill="#ff6600" stroke="#ff6600" points="332.94,-467.44 343.24,-464.97 333.64,-460.48 332.94,-467.44"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
-<g id="proc~~set2~~CalledByGraph_edge19" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#ffcc00" d="M279.25,-447.51C298.63,-445.55 321.03,-443.28 342.61,-441.1"/>
-<polygon fill="#ffcc00" stroke="#ffcc00" points="343.19,-444.56 352.79,-440.07 342.49,-437.59 343.19,-444.56"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
-<g id="proc~~set2~~CalledByGraph_edge20" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#00ff00" d="M255.75,-440.99C279.38,-432.02 312.96,-419.84 343,-411 350.73,-408.73 358.89,-406.53 367.01,-404.47"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="368,-407.84 376.87,-402.04 366.32,-401.04 368,-407.84"/>
+<title>program~example_nurbs_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M470.56,-63.24C477.95,-66.17 484.99,-70 491,-75 543.77,-118.84 565.87,-201.81 573.75,-241.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="570.34,-242.42 575.61,-251.62 577.22,-241.15 570.34,-242.42"/>
 </g>
-<!-- program~example_nurbs_volume -->
+<!-- program~nearest_point_1d -->
 <g id="proc~~set2~~CalledByGraph_node15" class="node">
-<title>program~example_nurbs_volume</title>
-<g id="a_proc~~set2~~CalledByGraph_node15"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-108 364,-108 364,-84 503,-84 503,-108"/>
-<text text-anchor="middle" x="433.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<title>program~nearest_point_1d</title>
+<g id="a_proc~~set2~~CalledByGraph_node15"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="457.5,-24 354.5,-24 354.5,0 457.5,0 457.5,-24"/>
+<text text-anchor="middle" x="406" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;none~set -->
+<!-- program~nearest_point_1d&#45;&gt;none~set -->
 <g id="proc~~set2~~CalledByGraph_edge14" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.44,-105.4C510.85,-108.33 517.9,-112.11 524,-117 578.22,-160.42 602.42,-243.9 611.25,-283.76"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="607.82,-284.49 613.3,-293.56 614.67,-283.05 607.82,-284.49"/>
+<title>program~nearest_point_1d&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M457.92,-16.54C469.88,-19.69 481.8,-24.79 491,-33 553.86,-89.12 571.19,-195.45 575.85,-241.64"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="572.38,-242.13 576.76,-251.78 579.35,-241.51 572.38,-242.13"/>
 </g>
-<!-- program~example_put_to_nurbs -->
-<g id="proc~~set2~~CalledByGraph_node16" class="node">
-<title>program~example_put_to_nurbs</title>
-<g id="a_proc~~set2~~CalledByGraph_node16"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-66 367.5,-66 367.5,-42 499.5,-42 499.5,-66"/>
-<text text-anchor="middle" x="433.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
-</a>
-</g>
-</g>
-<!-- program~example_put_to_nurbs&#45;&gt;none~set -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="proc~~set2~~CalledByGraph_edge15" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.72,-61.4C508.57,-64.57 516.99,-68.95 524,-75 588.41,-130.59 607.88,-237.64 613.43,-283.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="609.97,-284.43 614.54,-293.99 616.93,-283.67 609.97,-284.43"/>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M285.17,-470C301.32,-470 318.36,-470 334.36,-470"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="334.71,-473.5 344.71,-470 334.71,-466.5 334.71,-473.5"/>
 </g>
-<!-- program~nearest_point_3d -->
+<!-- program~shape_c_1d -->
 <g id="proc~~set2~~CalledByGraph_node17" class="node">
-<title>program~nearest_point_3d</title>
-<g id="a_proc~~set2~~CalledByGraph_node17"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-24 382,-24 382,0 485,0 485,-24"/>
-<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
-</a>
-</g>
-</g>
-<!-- program~nearest_point_3d&#45;&gt;none~set -->
-<g id="proc~~set2~~CalledByGraph_edge16" class="edge">
-<title>program~nearest_point_3d&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M485.2,-14.84C499.17,-17.86 513.38,-23.33 524,-33 598.53,-100.9 612.42,-231.28 614.96,-283.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="611.47,-283.86 615.35,-293.71 618.46,-283.58 611.47,-283.86"/>
-</g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~set2~~CalledByGraph_edge17" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.01,-554C323.61,-554 341,-554 357.35,-554"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="357.38,-557.5 367.38,-554 357.38,-550.5 357.38,-557.5"/>
-</g>
-<!-- program~shape_c_3d -->
-<g id="proc~~set2~~CalledByGraph_node19" class="node">
-<title>program~shape_c_3d</title>
-<g id="a_proc~~set2~~CalledByGraph_node19"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-276 186,-276 186,-252 262,-252 262,-276"/>
-<text text-anchor="middle" x="224" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<title>program~shape_c_1d</title>
+<g id="a_proc~~set2~~CalledByGraph_node17"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-192 172,-192 172,-168 248,-168 248,-192"/>
+<text text-anchor="middle" x="210" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~set_c -->
-<g id="proc~~set2~~CalledByGraph_edge21" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~set_c</title>
-<path fill="none" stroke="#00ff66" d="M262.1,-264C289.25,-264 326.96,-264 360,-264"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="360.09,-267.5 370.09,-264 360.09,-260.5 360.09,-267.5"/>
-</g>
-<!-- program~shape_half_ring_3d -->
-<g id="proc~~set2~~CalledByGraph_node20" class="node">
-<title>program~shape_half_ring_3d</title>
-<g id="a_proc~~set2~~CalledByGraph_node20"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-234 166.5,-234 166.5,-210 281.5,-210 281.5,-234"/>
-<text text-anchor="middle" x="224" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
-</a>
-</g>
+<!-- program~shape_c_1d&#45;&gt;proc~set_c -->
+<g id="proc~~set2~~CalledByGraph_edge19" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~set_c</title>
+<path fill="none" stroke="#00ffc4" d="M248.41,-180C273.62,-180 307.6,-180 337.47,-180"/>
+<polygon fill="#00ffc4" stroke="#00ffc4" points="337.84,-183.5 347.84,-180 337.84,-176.5 337.84,-183.5"/>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~set_half_ring -->
-<g id="proc~~set2~~CalledByGraph_edge22" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~set_half_ring</title>
-<path fill="none" stroke="#00ffcb" d="M281.7,-222C299.97,-222 320.71,-222 340.84,-222"/>
-<polygon fill="#00ffcb" stroke="#00ffcb" points="340.97,-225.5 350.97,-222 340.97,-218.5 340.97,-225.5"/>
-</g>
-<!-- program~shape_hexahedron -->
-<g id="proc~~set2~~CalledByGraph_node21" class="node">
-<title>program~shape_hexahedron</title>
-<g id="a_proc~~set2~~CalledByGraph_node21"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-192 167.5,-192 167.5,-168 280.5,-168 280.5,-192"/>
-<text text-anchor="middle" x="224" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
+<!-- program~shape_circle -->
+<g id="proc~~set2~~CalledByGraph_node18" class="node">
+<title>program~shape_circle</title>
+<g id="a_proc~~set2~~CalledByGraph_node18"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249.5,-150 170.5,-150 170.5,-126 249.5,-126 249.5,-150"/>
+<text text-anchor="middle" x="210" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~set_hexahedron -->
-<g id="proc~~set2~~CalledByGraph_edge23" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~set_hexahedron</title>
-<path fill="none" stroke="#00cbff" d="M280.61,-180C296.56,-180 314.47,-180 332.24,-180"/>
-<polygon fill="#00cbff" stroke="#00cbff" points="332.67,-183.5 342.67,-180 332.67,-176.5 332.67,-183.5"/>
+<!-- program~shape_circle&#45;&gt;proc~set_circle -->
+<g id="proc~~set2~~CalledByGraph_edge20" class="edge">
+<title>program~shape_circle&#45;&gt;proc~set_circle</title>
+<path fill="none" stroke="#00c4ff" d="M249.79,-138C271.95,-138 300.54,-138 327.13,-138"/>
+<polygon fill="#00c4ff" stroke="#00c4ff" points="327.21,-141.5 337.21,-138 327.21,-134.5 327.21,-141.5"/>
 </g>
-<!-- program~shape_ring_3d -->
-<g id="proc~~set2~~CalledByGraph_node22" class="node">
-<title>program~shape_ring_3d</title>
-<g id="a_proc~~set2~~CalledByGraph_node22"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-150 179,-150 179,-126 269,-126 269,-150"/>
-<text text-anchor="middle" x="224" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+<!-- program~shape_half_circle -->
+<g id="proc~~set2~~CalledByGraph_node19" class="node">
+<title>program~shape_half_circle</title>
+<g id="a_proc~~set2~~CalledByGraph_node19"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-108 158,-108 158,-84 262,-84 262,-108"/>
+<text text-anchor="middle" x="210" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~set_ring -->
-<g id="proc~~set2~~CalledByGraph_edge24" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~set_ring</title>
-<path fill="none" stroke="#0066ff" d="M269.01,-138C293.59,-138 324.96,-138 353.63,-138"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="353.65,-141.5 363.65,-138 353.65,-134.5 353.65,-141.5"/>
+<!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
+<g id="proc~~set2~~CalledByGraph_edge21" class="edge">
+<title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
+<path fill="none" stroke="#004eff" d="M262.22,-96C278.08,-96 296.06,-96 313.78,-96"/>
+<polygon fill="#004eff" stroke="#004eff" points="314.17,-99.5 324.17,-96 314.17,-92.5 314.17,-99.5"/>
 </g>
 </g>
 </svg>
@@ -985,7 +820,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set2~2.html b/proc/set2~2.html
index b9298cf6f..0af753d66 100644
--- a/proc/set2~2.html
+++ b/proc/set2~2.html
@@ -78,20 +78,20 @@ <h1>set2
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.2% of total for procedures.">15 statements</a>
+                 title=" 0.3% of total for procedures.">17 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">set2</li>
           </ol>
         </nav>
@@ -137,14 +137,14 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine set2(this, Xth_dir1, Xth_dir2, degree, continuity1, continuity2, Xc, Wc)  
+    <h2>private pure subroutine set2(this, Xth_dir1, Xth_dir2, Xth_dir3, degree, continuity1, continuity2, continuity3, Xc, Wc)  
 </h2>
     
 
-    <p>Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights</p>
+    <p>Set control points and weights for the NURBS volume object.</p>
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,8 +159,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~70"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~63"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -174,7 +174,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth_dir1~2"></span>
+              <span class="anchor" id="variable-xth_dir1"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -189,7 +189,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth_dir2~2"></span>
+              <span class="anchor" id="variable-xth_dir2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -204,7 +204,22 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~24"></span>
+              <span class="anchor" id="variable-xth_dir3"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>Xth_dir3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-degree~22"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -219,7 +234,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-continuity1~2"></span>
+              <span class="anchor" id="variable-continuity1"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -234,7 +249,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-continuity2~2"></span>
+              <span class="anchor" id="variable-continuity2"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -249,7 +264,22 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~29"></span>
+              <span class="anchor" id="variable-continuity3"></span>
+              integer,
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>continuity3</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xc~25"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -301,14 +331,14 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~set2~2~~CallsGraph_node1" class="node">
 <title>proc~set2~2</title>
 <polygon fill="none" stroke="black" points="120,-45 0,-45 0,-21 120,-21 120,-45"/>
-<text text-anchor="middle" x="60" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set2</text>
+<text text-anchor="middle" x="60" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set2</text>
 </g>
 <!-- proc~cmp_nc~2 -->
 <g id="proc~~set2~2~~CallsGraph_node2" class="node">
 <title>proc~cmp_nc~2</title>
-<g id="a_proc~~set2~2~~CallsGraph_node2"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<g id="a_proc~~set2~2~~CallsGraph_node2"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="295,-66 156,-66 156,-42 295,-42 295,-66"/>
-<text text-anchor="middle" x="225.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+<text text-anchor="middle" x="225.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
@@ -487,418 +517,355 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set2~2~~CalledByGraph Pages: 1 -->
-<svg id="procset22CalledByGraph" width="641pt" height="454pt"
- viewBox="0.00 0.00 641.00 454.44" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set2~2~~CalledByGraph" class="graph" transform="scale(1.25 1.25) rotate(0) translate(4 566)">
+<svg id="procset22CalledByGraph" width="641pt" height="488pt"
+ viewBox="0.00 0.00 641.00 488.05" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set2~2~~CalledByGraph" class="graph" transform="scale(1.31 1.31) rotate(0) translate(4 633.29)">
 <title>proc~~set2~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-566 800,-566 800,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-633.29 833,-633.29 833,4 -4,4"/>
 <!-- proc~set2~2 -->
 <g id="proc~~set2~2~~CalledByGraph_node1" class="node">
 <title>proc~set2~2</title>
-<polygon fill="none" stroke="black" points="796,-297 676,-297 676,-273 796,-273 796,-297"/>
-<text text-anchor="middle" x="736" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set2</text>
+<polygon fill="none" stroke="black" points="829,-318 709,-318 709,-294 829,-294 829,-318"/>
+<text text-anchor="middle" x="769" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set2</text>
 </g>
 <!-- none~set~2 -->
 <g id="proc~~set2~2~~CalledByGraph_node2" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="640,-297 527,-297 527,-273 640,-273 640,-297"/>
-<text text-anchor="middle" x="583.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<g id="a_proc~~set2~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="673,-318 560,-318 560,-294 673,-294 673,-318"/>
+<text text-anchor="middle" x="616.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="proc~~set2~2~~CalledByGraph_edge1" class="edge">
 <title>none~set~2&#45;&gt;proc~set2~2</title>
-<path fill="none" stroke="#ff0000" d="M640.11,-285C648.48,-285 657.19,-285 665.8,-285"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="665.83,-288.5 675.83,-285 665.83,-281.5 665.83,-288.5"/>
+<path fill="none" stroke="#ff0000" d="M673.11,-306C681.48,-306 690.19,-306 698.8,-306"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="698.83,-309.5 708.83,-306 698.83,-302.5 698.83,-309.5"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~set2~2~~CalledByGraph_node3" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="467,-562 335,-562 335,-538 467,-538 467,-562"/>
-<text text-anchor="middle" x="401" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~set2~2~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-566 367.5,-566 367.5,-542 499.5,-542 499.5,-566"/>
+<text text-anchor="middle" x="433.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~set~2 -->
 <g id="proc~~set2~2~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M467.04,-538.75C475.81,-535.12 484.14,-530.33 491,-524 555.57,-464.48 574.98,-354.4 580.47,-307.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="583.96,-307.57 581.54,-297.26 577,-306.83 583.96,-307.57"/>
+<path fill="none" stroke="#ff0000" d="M499.76,-542.65C508.6,-539.03 517.01,-534.27 524,-528 584.64,-473.59 606.02,-372.87 612.74,-328.26"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="616.23,-328.58 614.15,-318.19 609.3,-327.61 616.23,-328.58"/>
 </g>
 <!-- proc~elevate_degree~2 -->
 <g id="proc~~set2~2~~CalledByGraph_node4" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="491,-360 311,-360 311,-336 491,-336 491,-360"/>
-<text text-anchor="middle" x="401" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<g id="a_proc~~set2~2~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-486 343.5,-486 343.5,-462 523.5,-462 523.5,-486"/>
+<text text-anchor="middle" x="433.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;none~set~2 -->
 <g id="proc~~set2~2~~CalledByGraph_edge3" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M460.4,-335.97C470.7,-333.36 481.24,-330.35 491,-327 511.36,-320 533.32,-310.01 550.61,-301.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="552.31,-304.6 559.7,-297.01 549.19,-298.33 552.31,-304.6"/>
+<path fill="none" stroke="#ff0000" d="M507.95,-461.94C513.63,-459.48 519.07,-456.54 524,-453 568.52,-421.06 596.03,-360.08 608.18,-327.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="611.5,-328.73 611.59,-318.14 604.91,-326.36 611.5,-328.73"/>
 </g>
 <!-- proc~insert_knots~2 -->
 <g id="proc~~set2~2~~CalledByGraph_node5" class="node">
 <title>proc~insert_knots~2</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-482 320.5,-482 320.5,-458 481.5,-458 481.5,-482"/>
-<text text-anchor="middle" x="401" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+<g id="a_proc~~set2~2~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514,-444 353,-444 353,-420 514,-420 514,-444"/>
+<text text-anchor="middle" x="433.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;none~set~2 -->
 <g id="proc~~set2~2~~CalledByGraph_edge4" class="edge">
 <title>proc~insert_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M475.67,-457.96C481.12,-455.5 486.31,-452.54 491,-449 539.34,-412.5 565.71,-342.6 576.53,-307.01"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="579.97,-307.72 579.4,-297.14 573.25,-305.76 579.97,-307.72"/>
+<path fill="none" stroke="#ff0000" d="M505.06,-419.93C511.69,-417.49 518.12,-414.54 524,-411 558.92,-389.96 587.54,-351.08 603,-327"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="606.13,-328.6 608.45,-318.26 600.19,-324.89 606.13,-328.6"/>
 </g>
 <!-- proc~modify_wc~2 -->
 <g id="proc~~set2~2~~CalledByGraph_node6" class="node">
 <title>proc~modify_wc~2</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="479,-318 323,-318 323,-294 479,-294 479,-318"/>
-<text text-anchor="middle" x="401" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+<g id="a_proc~~set2~2~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-360 355.5,-360 355.5,-336 511.5,-336 511.5,-360"/>
+<text text-anchor="middle" x="433.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~set~2 -->
 <g id="proc~~set2~2~~CalledByGraph_edge5" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M479.07,-297.03C491.65,-295.57 504.57,-294.07 516.84,-292.64"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="517.44,-296.09 526.97,-291.46 516.63,-289.14 517.44,-296.09"/>
+<path fill="none" stroke="#ff0000" d="M486.37,-335.96C507.38,-331.09 531.82,-325.42 553.75,-320.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="554.68,-323.71 563.63,-318.04 553.09,-316.89 554.68,-323.71"/>
 </g>
 <!-- proc~modify_xc~2 -->
 <g id="proc~~set2~2~~CalledByGraph_node7" class="node">
 <title>proc~modify_xc~2</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-276 324.5,-276 324.5,-252 477.5,-252 477.5,-276"/>
-<text text-anchor="middle" x="401" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+<g id="a_proc~~set2~2~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="510,-318 357,-318 357,-294 510,-294 510,-318"/>
+<text text-anchor="middle" x="433.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~set~2 -->
 <g id="proc~~set2~2~~CalledByGraph_edge6" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M477.5,-272.78C490.54,-274.3 503.99,-275.87 516.74,-277.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="516.46,-280.84 526.8,-278.52 517.27,-273.89 516.46,-280.84"/>
+<path fill="none" stroke="#ff0000" d="M510.21,-306C523.36,-306 536.93,-306 549.79,-306"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="549.92,-309.5 559.92,-306 549.92,-302.5 549.92,-309.5"/>
 </g>
 <!-- proc~remove_knots~2 -->
 <g id="proc~~set2~2~~CalledByGraph_node8" class="node">
 <title>proc~remove_knots~2</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="487,-440 315,-440 315,-416 487,-416 487,-440"/>
-<text text-anchor="middle" x="401" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
+<g id="a_proc~~set2~2~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-402 347.5,-402 347.5,-378 519.5,-378 519.5,-402"/>
+<text text-anchor="middle" x="433.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;none~set~2 -->
 <g id="proc~~set2~2~~CalledByGraph_edge7" class="edge">
 <title>proc~remove_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M462.24,-415.98C472.34,-412.44 482.34,-407.87 491,-402 527.88,-377 556.66,-332.45 571.47,-306.13"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="574.56,-307.78 576.29,-297.32 568.42,-304.42 574.56,-307.78"/>
+<path fill="none" stroke="#ff0000" d="M499.01,-377.92C507.58,-375.44 516.12,-372.49 524,-369 549.77,-357.6 575.92,-338.69 593.63,-324.56"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="596.07,-327.09 601.61,-318.06 591.65,-321.66 596.07,-327.09"/>
 </g>
 <!-- proc~set_c~2 -->
 <g id="proc~~set2~2~~CalledByGraph_node9" class="node">
 <title>proc~set_c~2</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node9"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_surface%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="464,-108 338,-108 338,-84 464,-84 464,-108"/>
-<text text-anchor="middle" x="401" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
+<g id="a_proc~~set2~2~~CalledByGraph_node9"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_volume%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-276 370.5,-276 370.5,-252 496.5,-252 496.5,-276"/>
+<text text-anchor="middle" x="433.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c~2&#45;&gt;none~set~2 -->
 <g id="proc~~set2~2~~CalledByGraph_edge8" class="edge">
 <title>proc~set_c~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M464.39,-103.61C473.92,-106.72 483.18,-111.03 491,-117 540.26,-154.6 566.32,-226.63 576.83,-262.93"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="573.46,-263.87 579.5,-272.57 580.2,-262 573.46,-263.87"/>
+<path fill="none" stroke="#ff0000" d="M486.37,-276.04C507.38,-280.91 531.82,-286.58 553.75,-291.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="553.09,-295.11 563.63,-293.96 554.68,-288.29 553.09,-295.11"/>
 </g>
-<!-- proc~set_half_ring~2 -->
+<!-- proc~set_half_ring -->
 <g id="proc~~set2~2~~CalledByGraph_node10" class="node">
-<title>proc~set_half_ring~2</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node10"><a xlink:href="../proc/set_half_ring~2.html" xlink:title="nurbs_surface%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="483.5,-150 318.5,-150 318.5,-126 483.5,-126 483.5,-150"/>
-<text text-anchor="middle" x="401" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
+<title>proc~set_half_ring</title>
+<g id="a_proc~~set2~2~~CalledByGraph_node10"><a xlink:href="../proc/set_half_ring.html" xlink:title="nurbs_volume%set_half_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="516,-234 351,-234 351,-210 516,-210 516,-234"/>
+<text text-anchor="middle" x="433.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_half_ring&#45;&gt;none~set~2 -->
 <g id="proc~~set2~2~~CalledByGraph_edge9" class="edge">
-<title>proc~set_half_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M473.87,-150.11C479.91,-152.55 485.71,-155.48 491,-159 530.66,-185.4 559.08,-235.16 572.94,-263.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="569.8,-265.16 577.22,-272.71 576.13,-262.17 569.8,-265.16"/>
+<title>proc~set_half_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M499.01,-234.08C507.58,-236.56 516.12,-239.51 524,-243 549.77,-254.4 575.92,-273.31 593.63,-287.44"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="591.65,-290.34 601.61,-293.94 596.07,-284.91 591.65,-290.34"/>
 </g>
-<!-- proc~set_ring~2 -->
+<!-- proc~set_hexahedron -->
 <g id="proc~~set2~2~~CalledByGraph_node11" class="node">
-<title>proc~set_ring~2</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node11"><a xlink:href="../proc/set_ring~2.html" xlink:title="nurbs_surface%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="470.5,-192 331.5,-192 331.5,-168 470.5,-168 470.5,-192"/>
-<text text-anchor="middle" x="401" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
+<title>proc~set_hexahedron</title>
+<g id="a_proc~~set2~2~~CalledByGraph_node11"><a xlink:href="../proc/set_hexahedron.html" xlink:title="nurbs_volume%set_hexahedron">
+<polygon fill="#d9534f" stroke="#d9534f" points="524,-192 343,-192 343,-168 524,-168 524,-192"/>
+<text text-anchor="middle" x="433.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_hexahedron&#45;&gt;none~set~2 -->
 <g id="proc~~set2~2~~CalledByGraph_edge10" class="edge">
-<title>proc~set_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M469.92,-192.15C477.23,-194.59 484.41,-197.51 491,-201 521.51,-217.17 549.65,-245.97 566.45,-265.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="563.79,-267.55 572.93,-272.91 569.12,-263.02 563.79,-267.55"/>
+<title>proc~set_hexahedron&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M505.06,-192.07C511.69,-194.51 518.12,-197.46 524,-201 558.92,-222.04 587.54,-260.92 603,-285"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="600.19,-287.11 608.45,-293.74 606.13,-283.4 600.19,-287.11"/>
 </g>
-<!-- proc~set_tetragon -->
+<!-- proc~set_ring -->
 <g id="proc~~set2~2~~CalledByGraph_node12" class="node">
-<title>proc~set_tetragon</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node12"><a xlink:href="../proc/set_tetragon.html" xlink:title="nurbs_surface%set_tetragon">
-<polygon fill="#d9534f" stroke="#d9534f" points="483,-234 319,-234 319,-210 483,-210 483,-234"/>
-<text text-anchor="middle" x="401" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
+<title>proc~set_ring</title>
+<g id="a_proc~~set2~2~~CalledByGraph_node12"><a xlink:href="../proc/set_ring.html" xlink:title="nurbs_volume%set_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="503,-150 364,-150 364,-126 503,-126 503,-150"/>
+<text text-anchor="middle" x="433.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
+<!-- proc~set_ring&#45;&gt;none~set~2 -->
 <g id="proc~~set2~2~~CalledByGraph_edge11" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M460.4,-234.03C470.7,-236.64 481.24,-239.65 491,-243 511.36,-250 533.32,-259.99 550.61,-268.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="549.19,-271.67 559.7,-272.99 552.31,-265.4 549.19,-271.67"/>
+<title>proc~set_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M503.41,-148.22C510.74,-151.01 517.78,-154.53 524,-159 568.52,-190.94 596.03,-251.92 608.18,-284.39"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="604.91,-285.64 611.59,-293.86 611.5,-283.27 604.91,-285.64"/>
 </g>
-<!-- program~compute_area -->
+<!-- program~compute_volume -->
 <g id="proc~~set2~2~~CalledByGraph_node13" class="node">
-<title>program~compute_area</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node13"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-542 0,-542 0,-518 89,-518 89,-542"/>
-<text text-anchor="middle" x="44.5" y="-527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<title>program~compute_volume</title>
+<g id="a_proc~~set2~2~~CalledByGraph_node13"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-586 0,-586 0,-562 105,-562 105,-586"/>
+<text text-anchor="middle" x="52.5" y="-571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;none~set~2 -->
+<!-- program~compute_volume&#45;&gt;none~set~2 -->
 <g id="proc~~set2~2~~CalledByGraph_edge12" class="edge">
-<title>program~compute_area&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M89.19,-528.67C195.01,-525.11 458.77,-514.01 491,-491 552.97,-446.76 573.59,-350.77 579.93,-307.25"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="583.42,-307.52 581.27,-297.15 576.48,-306.6 583.42,-307.52"/>
+<title>program~compute_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M86.78,-586.01C169.65,-613.64 388.35,-672.14 524,-575 605.44,-516.68 615.25,-381.64 615.83,-328.27"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="619.33,-328.19 615.83,-318.18 612.33,-328.18 619.33,-328.19"/>
 </g>
-<!-- proc~cmp_area -->
-<g id="proc~~set2~2~~CalledByGraph_node17" class="node">
-<title>proc~cmp_area</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node17"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="275,-562 125,-562 125,-538 275,-538 275,-562"/>
-<text text-anchor="middle" x="200" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<!-- proc~cmp_volume -->
+<g id="proc~~set2~2~~CalledByGraph_node18" class="node">
+<title>proc~cmp_volume</title>
+<g id="a_proc~~set2~2~~CalledByGraph_node18"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-566 141,-566 141,-542 307,-542 307,-566"/>
+<text text-anchor="middle" x="224" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;proc~cmp_area -->
-<g id="proc~~set2~2~~CalledByGraph_edge31" class="edge">
-<title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M89.08,-535.68C97.19,-536.73 105.92,-537.87 114.78,-539.03"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="114.45,-542.51 124.81,-540.33 115.35,-535.57 114.45,-542.51"/>
+<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
+<g id="proc~~set2~2~~CalledByGraph_edge25" class="edge">
+<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
+<path fill="none" stroke="#ff0000" d="M105.28,-567.89C113.48,-566.92 122.18,-565.9 130.98,-564.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="131.41,-568.33 140.93,-563.68 130.59,-561.38 131.41,-568.33"/>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~set2~2~~CalledByGraph_node14" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node14"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="255,-420 145,-420 145,-396 255,-396 255,-420"/>
-<text text-anchor="middle" x="200" y="-405.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<title>program~example3_volume</title>
+<g id="a_proc~~set2~2~~CalledByGraph_node14"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-465 169,-465 169,-441 279,-441 279,-465"/>
+<text text-anchor="middle" x="224" y="-450.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;none~set~2 -->
+<!-- program~example3_volume&#45;&gt;none~set~2 -->
 <g id="proc~~set2~2~~CalledByGraph_edge13" class="edge">
-<title>program~example3_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M255.17,-404.6C327.24,-399.42 450.29,-388.08 491,-369 522.44,-354.27 550.52,-324.84 567.04,-305.03"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="569.81,-307.17 573.38,-297.2 564.37,-302.77 569.81,-307.17"/>
-</g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
-<g id="proc~~set2~2~~CalledByGraph_edge17" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
-<path fill="none" stroke="#ff6d00" d="M239.39,-395.97C260.5,-389.4 287.17,-381.16 311,-374 323.16,-370.34 336.28,-366.47 348.62,-362.86"/>
-<polygon fill="#ff6d00" stroke="#ff6d00" points="349.69,-366.2 358.3,-360.04 347.72,-359.48 349.69,-366.2"/>
+<title>program~example3_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M246.93,-465.12C299.32,-492.29 434.06,-551.38 524,-495 583.54,-457.67 605.3,-369.39 612.41,-328.06"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="615.87,-328.6 613.98,-318.18 608.95,-327.5 615.87,-328.6"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
 <g id="proc~~set2~2~~CalledByGraph_edge18" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
-<path fill="none" stroke="#ffda00" d="M230.54,-420.16C252.49,-428.91 283.3,-440.61 311,-449 318.48,-451.27 326.37,-453.44 334.24,-455.47"/>
-<polygon fill="#ffda00" stroke="#ffda00" points="333.62,-458.92 344.17,-457.96 335.32,-452.13 333.62,-458.92"/>
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
+<path fill="none" stroke="#ff6600" d="M279.25,-458.49C295.84,-460.17 314.64,-462.07 333.24,-463.95"/>
+<polygon fill="#ff6600" stroke="#ff6600" points="332.94,-467.44 343.24,-464.97 333.64,-460.48 332.94,-467.44"/>
+</g>
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
+<g id="proc~~set2~2~~CalledByGraph_edge19" class="edge">
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
+<path fill="none" stroke="#ffcc00" d="M279.25,-447.51C298.63,-445.55 321.03,-443.28 342.61,-441.1"/>
+<polygon fill="#ffcc00" stroke="#ffcc00" points="343.19,-444.56 352.79,-440.07 342.49,-437.59 343.19,-444.56"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
 <g id="proc~~set2~2~~CalledByGraph_edge20" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
-<path fill="none" stroke="#00ff24" d="M255.11,-413.44C270.51,-414.99 287.75,-416.72 304.82,-418.43"/>
-<polygon fill="#00ff24" stroke="#00ff24" points="304.53,-421.92 314.83,-419.44 305.23,-414.96 304.53,-421.92"/>
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
+<path fill="none" stroke="#00ff00" d="M255.75,-440.99C279.38,-432.02 312.96,-419.84 343,-411 350.73,-408.73 358.89,-406.53 367.01,-404.47"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="368,-407.84 376.87,-402.04 366.32,-401.04 368,-407.84"/>
 </g>
-<!-- program~example_nurbs_surface -->
+<!-- program~example_nurbs_volume -->
 <g id="proc~~set2~2~~CalledByGraph_node15" class="node">
-<title>program~example_nurbs_surface</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node15"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 331.5,-66 331.5,-42 470.5,-42 470.5,-66"/>
-<text text-anchor="middle" x="401" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<title>program~example_nurbs_volume</title>
+<g id="a_proc~~set2~2~~CalledByGraph_node15"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-108 364,-108 364,-84 503,-84 503,-108"/>
+<text text-anchor="middle" x="433.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;none~set~2 -->
+<!-- program~example_nurbs_volume&#45;&gt;none~set~2 -->
 <g id="proc~~set2~2~~CalledByGraph_edge14" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M470.75,-63.21C478.08,-66.17 485.03,-70.01 491,-75 550.25,-124.48 572.25,-219.65 579.43,-262.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="575.99,-263.45 580.98,-272.8 582.91,-262.38 575.99,-263.45"/>
+<title>program~example_nurbs_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M503.44,-105.4C510.85,-108.33 517.9,-112.11 524,-117 578.22,-160.42 602.42,-243.9 611.25,-283.76"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="607.82,-284.49 613.3,-293.56 614.67,-283.05 607.82,-284.49"/>
 </g>
-<!-- program~nearest_point_2d -->
+<!-- program~example_put_to_nurbs -->
 <g id="proc~~set2~2~~CalledByGraph_node16" class="node">
-<title>program~nearest_point_2d</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node16"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452.5,-24 349.5,-24 349.5,0 452.5,0 452.5,-24"/>
-<text text-anchor="middle" x="401" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<title>program~example_put_to_nurbs</title>
+<g id="a_proc~~set2~2~~CalledByGraph_node16"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-66 367.5,-66 367.5,-42 499.5,-42 499.5,-66"/>
+<text text-anchor="middle" x="433.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;none~set~2 -->
+<!-- program~example_put_to_nurbs&#45;&gt;none~set~2 -->
 <g id="proc~~set2~2~~CalledByGraph_edge15" class="edge">
-<title>program~nearest_point_2d&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M452.73,-15.16C466.47,-18.21 480.44,-23.61 491,-33 560.36,-94.71 577.18,-213.24 581.23,-262.59"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="577.76,-263.07 581.96,-272.8 584.74,-262.57 577.76,-263.07"/>
-</g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~set2~2~~CalledByGraph_edge16" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ff0000" d="M275.1,-550C291.15,-550 308.13,-550 324.24,-550"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="324.68,-553.5 334.68,-550 324.68,-546.5 324.68,-553.5"/>
+<title>program~example_put_to_nurbs&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M499.72,-61.4C508.57,-64.57 516.99,-68.95 524,-75 588.41,-130.59 607.88,-237.64 613.43,-283.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="609.97,-284.43 614.54,-293.99 616.93,-283.67 609.97,-284.43"/>
 </g>
-<!-- program~example_ppm1 -->
-<g id="proc~~set2~2~~CalledByGraph_node18" class="node">
-<title>program~example_ppm1</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node18"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-192 153,-192 153,-168 247,-168 247,-192"/>
-<text text-anchor="middle" x="200" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+<!-- program~nearest_point_3d -->
+<g id="proc~~set2~2~~CalledByGraph_node17" class="node">
+<title>program~nearest_point_3d</title>
+<g id="a_proc~~set2~2~~CalledByGraph_node17"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-24 382,-24 382,0 485,0 485,-24"/>
+<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~set_ring~2 -->
-<g id="proc~~set2~2~~CalledByGraph_edge24" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#0091ff" d="M247.15,-180C269.15,-180 296.09,-180 321.19,-180"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="321.45,-183.5 331.45,-180 321.45,-176.5 321.45,-183.5"/>
+<!-- program~nearest_point_3d&#45;&gt;none~set~2 -->
+<g id="proc~~set2~2~~CalledByGraph_edge16" class="edge">
+<title>program~nearest_point_3d&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M485.2,-14.84C499.17,-17.86 513.38,-23.33 524,-33 598.53,-100.9 612.42,-231.28 614.96,-283.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="611.47,-283.86 615.35,-293.71 618.46,-283.58 611.47,-283.86"/>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set2~2~~CalledByGraph_edge26" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.15,-189.74C272.73,-195.14 304.98,-201.95 333.26,-207.91"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="332.57,-211.34 343.07,-209.99 334.01,-204.5 332.57,-211.34"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~set2~2~~CalledByGraph_edge17" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ff0000" d="M307.01,-554C323.61,-554 341,-554 357.35,-554"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="357.38,-557.5 367.38,-554 357.38,-550.5 357.38,-557.5"/>
 </g>
-<!-- program~example_ppm2 -->
+<!-- program~shape_c_3d -->
 <g id="proc~~set2~2~~CalledByGraph_node19" class="node">
-<title>program~example_ppm2</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node19"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-150 153,-150 153,-126 247,-126 247,-150"/>
-<text text-anchor="middle" x="200" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+<title>program~shape_c_3d</title>
+<g id="a_proc~~set2~2~~CalledByGraph_node19"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-276 186,-276 186,-252 262,-252 262,-276"/>
+<text text-anchor="middle" x="224" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~set_half_ring~2 -->
-<g id="proc~~set2~2~~CalledByGraph_edge22" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#00ffff" d="M247.15,-138C265.39,-138 287.03,-138 308.19,-138"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="308.2,-141.5 318.2,-138 308.2,-134.5 308.2,-141.5"/>
-</g>
-<!-- program~example_ppm2&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set2~2~~CalledByGraph_edge27" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.02,-146.55C256.72,-149.56 266.56,-153.6 275,-159 295.71,-172.25 290,-188.21 311,-201 314.01,-202.83 317.16,-204.5 320.41,-206.03"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="319.22,-209.32 329.8,-209.95 321.92,-202.87 319.22,-209.32"/>
+<!-- program~shape_c_3d&#45;&gt;proc~set_c~2 -->
+<g id="proc~~set2~2~~CalledByGraph_edge21" class="edge">
+<title>program~shape_c_3d&#45;&gt;proc~set_c~2</title>
+<path fill="none" stroke="#00ff66" d="M262.1,-264C289.25,-264 326.96,-264 360,-264"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="360.09,-267.5 370.09,-264 360.09,-260.5 360.09,-267.5"/>
 </g>
-<!-- program~example_ppm3 -->
+<!-- program~shape_half_ring_3d -->
 <g id="proc~~set2~2~~CalledByGraph_node20" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node20"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-318 153,-318 153,-294 247,-294 247,-318"/>
-<text text-anchor="middle" x="200" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+<title>program~shape_half_ring_3d</title>
+<g id="a_proc~~set2~2~~CalledByGraph_node20"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-234 166.5,-234 166.5,-210 281.5,-210 281.5,-234"/>
+<text text-anchor="middle" x="224" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
-<g id="proc~~set2~2~~CalledByGraph_edge19" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#48ff00" d="M247.15,-296.26C272.73,-290.86 304.98,-284.05 333.26,-278.09"/>
-<polygon fill="#48ff00" stroke="#48ff00" points="334.01,-281.5 343.07,-276.01 332.57,-274.66 334.01,-281.5"/>
-</g>
-<!-- program~example_ppm3&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set2~2~~CalledByGraph_edge28" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.02,-297.45C256.72,-294.44 266.56,-290.4 275,-285 295.71,-271.75 290,-255.79 311,-243 314.01,-241.17 317.16,-239.5 320.41,-237.97"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="321.92,-241.13 329.8,-234.05 319.22,-234.68 321.92,-241.13"/>
+<!-- program~shape_half_ring_3d&#45;&gt;proc~set_half_ring -->
+<g id="proc~~set2~2~~CalledByGraph_edge22" class="edge">
+<title>program~shape_half_ring_3d&#45;&gt;proc~set_half_ring</title>
+<path fill="none" stroke="#00ffcb" d="M281.7,-222C299.97,-222 320.71,-222 340.84,-222"/>
+<polygon fill="#00ffcb" stroke="#00ffcb" points="340.97,-225.5 350.97,-222 340.97,-218.5 340.97,-225.5"/>
 </g>
-<!-- program~nearest_point_2d_bench -->
+<!-- program~shape_hexahedron -->
 <g id="proc~~set2~2~~CalledByGraph_node21" class="node">
-<title>program~nearest_point_2d_bench</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node21"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-234 129,-234 129,-210 271,-210 271,-234"/>
-<text text-anchor="middle" x="200" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
-</a>
-</g>
-</g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set2~2~~CalledByGraph_edge29" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M271.16,-222C283.34,-222 296.17,-222 308.82,-222"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="308.91,-225.5 318.91,-222 308.91,-218.5 308.91,-225.5"/>
-</g>
-<!-- program~shape_c_2d -->
-<g id="proc~~set2~2~~CalledByGraph_node22" class="node">
-<title>program~shape_c_2d</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node22"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="238,-24 162,-24 162,0 238,0 238,-24"/>
-<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+<title>program~shape_hexahedron</title>
+<g id="a_proc~~set2~2~~CalledByGraph_node21"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-192 167.5,-192 167.5,-168 280.5,-168 280.5,-192"/>
+<text text-anchor="middle" x="224" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~set_c~2 -->
-<g id="proc~~set2~2~~CalledByGraph_edge21" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~set_c~2</title>
-<path fill="none" stroke="#00ff91" d="M238.17,-18.06C250.55,-21.21 263.98,-25.94 275,-33 295.71,-46.25 290,-62.21 311,-75 316.34,-78.25 322.14,-81 328.14,-83.32"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="327.09,-86.66 337.68,-86.63 329.38,-80.05 327.09,-86.66"/>
-</g>
-<!-- program~shape_half_ring_2d -->
-<g id="proc~~set2~2~~CalledByGraph_node23" class="node">
-<title>program~shape_half_ring_2d</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node23"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="257.5,-66 142.5,-66 142.5,-42 257.5,-42 257.5,-66"/>
-<text text-anchor="middle" x="200" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2 -->
+<!-- program~shape_hexahedron&#45;&gt;proc~set_hexahedron -->
 <g id="proc~~set2~2~~CalledByGraph_edge23" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#00ffff" d="M257.09,-66.07C263.38,-68.53 269.49,-71.47 275,-75 295.71,-88.25 290,-104.21 311,-117 314.01,-118.83 317.16,-120.5 320.41,-122.03"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="319.22,-125.32 329.8,-125.95 321.92,-118.87 319.22,-125.32"/>
-</g>
-<!-- program~shape_ring_2d -->
-<g id="proc~~set2~2~~CalledByGraph_node24" class="node">
-<title>program~shape_ring_2d</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node24"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="245,-108 155,-108 155,-84 245,-84 245,-108"/>
-<text text-anchor="middle" x="200" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
-</a>
-</g>
+<title>program~shape_hexahedron&#45;&gt;proc~set_hexahedron</title>
+<path fill="none" stroke="#00cbff" d="M280.61,-180C296.56,-180 314.47,-180 332.24,-180"/>
+<polygon fill="#00cbff" stroke="#00cbff" points="332.67,-183.5 342.67,-180 332.67,-176.5 332.67,-183.5"/>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~set_ring~2 -->
-<g id="proc~~set2~2~~CalledByGraph_edge25" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#0091ff" d="M245.08,-103.96C255.4,-107.03 266,-111.24 275,-117 295.71,-130.25 290,-146.21 311,-159 314.41,-161.08 318.01,-162.95 321.73,-164.64"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="320.6,-167.95 331.18,-168.46 323.22,-161.46 320.6,-167.95"/>
-</g>
-<!-- program~shape_tetragon -->
-<g id="proc~~set2~2~~CalledByGraph_node25" class="node">
-<title>program~shape_tetragon</title>
-<g id="a_proc~~set2~2~~CalledByGraph_node25"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-276 152,-276 152,-252 248,-252 248,-276"/>
-<text text-anchor="middle" x="200" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<!-- program~shape_ring_3d -->
+<g id="proc~~set2~2~~CalledByGraph_node22" class="node">
+<title>program~shape_ring_3d</title>
+<g id="a_proc~~set2~2~~CalledByGraph_node22"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-150 179,-150 179,-126 269,-126 269,-150"/>
+<text text-anchor="middle" x="224" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set2~2~~CalledByGraph_edge30" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M248.16,-254.05C273.44,-248.71 305.03,-242.04 332.84,-236.17"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="333.83,-239.54 342.89,-234.05 332.39,-232.69 333.83,-239.54"/>
+<!-- program~shape_ring_3d&#45;&gt;proc~set_ring -->
+<g id="proc~~set2~2~~CalledByGraph_edge24" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~set_ring</title>
+<path fill="none" stroke="#0066ff" d="M269.01,-138C293.59,-138 324.96,-138 353.63,-138"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="353.65,-141.5 363.65,-138 353.65,-134.5 353.65,-141.5"/>
 </g>
 </g>
 </svg>
@@ -1018,7 +985,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set2~3.html b/proc/set2~3.html
index fcb8326aa..a9dc74740 100644
--- a/proc/set2~3.html
+++ b/proc/set2~3.html
@@ -78,20 +78,20 @@ <h1>set2
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.3% of total for procedures.">22 statements</a>
+                 title=" 0.2% of total for procedures.">15 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">set2</li>
           </ol>
         </nav>
@@ -137,14 +137,14 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine set2(this, Xth_dir, degree, continuity, Xc, Wc)  
+    <h2>private pure subroutine set2(this, Xth_dir1, Xth_dir2, degree, continuity1, continuity2, Xc, Wc)  
 </h2>
     
 
-    <p>Set NURBS curve using nodes of parameter space (Xth), degree, continuity, control points and weights.</p>
+    <p>Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights</p>
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,8 +159,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~134"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~131"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -174,7 +174,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xth_dir~2"></span>
+              <span class="anchor" id="variable-xth_dir1~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -182,29 +182,59 @@ <h3>Arguments</h3>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>Xth_dir</strong>(:)</td>
+            <td><strong>Xth_dir1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~55"></span>
+              <span class="anchor" id="variable-xth_dir2~2"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>Xth_dir2</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-degree~54"></span>
               integer,
             </td>
-<td>intent(in)</td>
+<td>intent(in),</td>
               <td></td>            <td>
-              
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>degree</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-continuity1~2"></span>
+              integer,
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
             </td>
             <td>::</td>
-            <td><strong>degree</strong></td>
+            <td><strong>continuity1</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-continuity~2"></span>
+              <span class="anchor" id="variable-continuity2~2"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -212,14 +242,14 @@ <h3>Arguments</h3>
               contiguous
             </td>
             <td>::</td>
-            <td><strong>continuity</strong>(:)</td>
+            <td><strong>continuity2</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~54"></span>
+              <span class="anchor" id="variable-xc~47"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -234,7 +264,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~51"></span>
+              <span class="anchor" id="variable-wc~48"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -262,46 +292,106 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set2~3~~CallsGraph Pages: 1 -->
-<svg id="procset23CallsGraph" width="374pt" height="32pt"
- viewBox="0.00 0.00 374.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set2~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<svg id="procset23CallsGraph" width="629pt" height="95pt"
+ viewBox="0.00 0.00 629.00 95.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set2~3~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 91)">
 <title>proc~~set2~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 370,-28 370,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-91 625,-91 625,4 -4,4"/>
 <!-- proc~set2~3 -->
 <g id="proc~~set2~3~~CallsGraph_node1" class="node">
 <title>proc~set2~3</title>
-<polygon fill="none" stroke="black" points="110,-24 0,-24 0,0 110,0 110,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set2</text>
+<polygon fill="none" stroke="black" points="120,-45 0,-45 0,-21 120,-21 120,-45"/>
+<text text-anchor="middle" x="60" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set2</text>
 </g>
-<!-- proc~compute_knot_vector -->
+<!-- proc~cmp_nc~3 -->
 <g id="proc~~set2~3~~CallsGraph_node2" class="node">
+<title>proc~cmp_nc~3</title>
+<g id="a_proc~~set2~3~~CallsGraph_node2"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="295,-66 156,-66 156,-42 295,-42 295,-66"/>
+<text text-anchor="middle" x="225.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+</a>
+</g>
+</g>
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
+<g id="proc~~set2~3~~CallsGraph_edge1" class="edge">
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#ff0000" d="M120.03,-40.58C128.38,-41.65 137.07,-42.77 145.72,-43.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="145.46,-47.38 155.83,-45.18 146.35,-40.43 145.46,-47.38"/>
+</g>
+<!-- proc~compute_knot_vector -->
+<g id="proc~~set2~3~~CallsGraph_node3" class="node">
 <title>proc~compute_knot_vector</title>
-<g id="a_proc~~set2~3~~CallsGraph_node2"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="273,-24 146,-24 146,0 273,0 273,-24"/>
-<text text-anchor="middle" x="209.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<g id="a_proc~~set2~3~~CallsGraph_node3"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="289,-24 162,-24 162,0 289,0 289,-24"/>
+<text text-anchor="middle" x="225.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
-<g id="proc~~set2~3~~CallsGraph_edge1" class="edge">
+<g id="proc~~set2~3~~CallsGraph_edge2" class="edge">
 <title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#ff0000" d="M110.2,-12C118.5,-12 127.19,-12 135.82,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.89,-15.5 145.89,-12 135.89,-8.5 135.89,-15.5"/>
+<path fill="none" stroke="#ff0000" d="M120.03,-25.42C130.36,-24.09 141.21,-22.7 151.85,-21.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="152.5,-24.78 161.97,-20.03 151.61,-17.83 152.5,-24.78"/>
+</g>
+<!-- interface~compute_multiplicity -->
+<g id="proc~~set2~3~~CallsGraph_node4" class="node">
+<title>interface~compute_multiplicity</title>
+<g id="a_proc~~set2~3~~CallsGraph_node4"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
+<polygon fill="#a7506f" stroke="#a7506f" points="455,-66 331,-66 331,-42 455,-42 455,-66"/>
+<text text-anchor="middle" x="393" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+</a>
+</g>
+</g>
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
+<g id="proc~~set2~3~~CallsGraph_edge3" class="edge">
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
+<path fill="none" stroke="#ff0000" d="M295.25,-54C303.65,-54 312.24,-54 320.68,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="320.86,-57.5 330.86,-54 320.86,-50.5 320.86,-57.5"/>
 </g>
 <!-- proc~repelem -->
-<g id="proc~~set2~3~~CallsGraph_node3" class="node">
+<g id="proc~~set2~3~~CallsGraph_node5" class="node">
 <title>proc~repelem</title>
-<g id="a_proc~~set2~3~~CallsGraph_node3"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="366,-24 309,-24 309,0 366,0 366,-24"/>
-<text text-anchor="middle" x="337.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<g id="a_proc~~set2~3~~CallsGraph_node5"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="421.5,-24 364.5,-24 364.5,0 421.5,0 421.5,-24"/>
+<text text-anchor="middle" x="393" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
 <!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
-<g id="proc~~set2~3~~CallsGraph_edge2" class="edge">
+<g id="proc~~set2~3~~CallsGraph_edge4" class="edge">
 <title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#ff0000" d="M273.13,-12C281.89,-12 290.66,-12 298.76,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="298.97,-15.5 308.97,-12 298.97,-8.5 298.97,-15.5"/>
+<path fill="none" stroke="#00ffff" d="M289.07,-12C311,-12 334.95,-12 354.23,-12"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="354.41,-15.5 364.41,-12 354.41,-8.5 354.41,-15.5"/>
+</g>
+<!-- proc~compute_multiplicity1 -->
+<g id="proc~~set2~3~~CallsGraph_node6" class="node">
+<title>proc~compute_multiplicity1</title>
+<g id="a_proc~~set2~3~~CallsGraph_node6"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="621,-87 491,-87 491,-63 621,-63 621,-87"/>
+<text text-anchor="middle" x="556" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+</a>
+</g>
+</g>
+<!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
+<g id="proc~~set2~3~~CallsGraph_edge5" class="edge">
+<title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M455.33,-62C463.69,-63.09 472.35,-64.22 480.92,-65.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="480.53,-68.82 490.9,-66.64 481.44,-61.88 480.53,-68.82"/>
+</g>
+<!-- proc~compute_multiplicity2 -->
+<g id="proc~~set2~3~~CallsGraph_node7" class="node">
+<title>proc~compute_multiplicity2</title>
+<g id="a_proc~~set2~3~~CallsGraph_node7"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="621,-45 491,-45 491,-21 621,-21 621,-45"/>
+<text text-anchor="middle" x="556" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+</a>
+</g>
+</g>
+<!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
+<g id="proc~~set2~3~~CallsGraph_edge6" class="edge">
+<title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M455.33,-46C463.69,-44.91 472.35,-43.78 480.92,-42.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="481.44,-46.12 490.9,-41.36 480.53,-39.18 481.44,-46.12"/>
 </g>
 </g>
 </svg>
@@ -397,310 +487,418 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set2~3~~CalledByGraph Pages: 1 -->
-<svg id="procset23CalledByGraph" width="641pt" height="448pt"
- viewBox="0.00 0.00 641.00 448.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set2~3~~CalledByGraph" class="graph" transform="scale(1.22 1.22) rotate(0) translate(4 544.5)">
+<svg id="procset23CalledByGraph" width="641pt" height="454pt"
+ viewBox="0.00 0.00 641.00 454.44" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set2~3~~CalledByGraph" class="graph" transform="scale(1.25 1.25) rotate(0) translate(4 566)">
 <title>proc~~set2~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-544.5 780,-544.5 780,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-566 800,-566 800,4 -4,4"/>
 <!-- proc~set2~3 -->
 <g id="proc~~set2~3~~CalledByGraph_node1" class="node">
 <title>proc~set2~3</title>
-<polygon fill="none" stroke="black" points="776,-276 666,-276 666,-252 776,-252 776,-276"/>
-<text text-anchor="middle" x="721" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set2</text>
+<polygon fill="none" stroke="black" points="796,-297 676,-297 676,-273 796,-273 796,-297"/>
+<text text-anchor="middle" x="736" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set2</text>
 </g>
 <!-- none~set~3 -->
 <g id="proc~~set2~3~~CalledByGraph_node2" class="node">
 <title>none~set~3</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="630,-276 527,-276 527,-252 630,-252 630,-276"/>
-<text text-anchor="middle" x="578.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_proc~~set2~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="640,-297 527,-297 527,-273 640,-273 640,-297"/>
+<text text-anchor="middle" x="583.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="proc~~set2~3~~CalledByGraph_edge1" class="edge">
 <title>none~set~3&#45;&gt;proc~set2~3</title>
-<path fill="none" stroke="#ff0000" d="M630.22,-264C638.38,-264 646.92,-264 655.35,-264"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="655.55,-267.5 665.55,-264 655.55,-260.5 655.55,-267.5"/>
+<path fill="none" stroke="#ff0000" d="M640.11,-285C648.48,-285 657.19,-285 665.8,-285"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="665.83,-288.5 675.83,-285 665.83,-281.5 665.83,-288.5"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="proc~~set2~3~~CalledByGraph_node3" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="467,-482 345,-482 345,-458 467,-458 467,-482"/>
-<text text-anchor="middle" x="406" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~set2~3~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="467,-562 335,-562 335,-538 467,-538 467,-562"/>
+<text text-anchor="middle" x="401" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~set~3 -->
 <g id="proc~~set2~3~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M467.12,-458.13C475.76,-454.59 484.06,-449.98 491,-444 540.47,-401.35 563.98,-323.98 572.94,-286.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="576.41,-286.63 575.18,-276.11 569.58,-285.1 576.41,-286.63"/>
+<path fill="none" stroke="#ff0000" d="M467.04,-538.75C475.81,-535.12 484.14,-530.33 491,-524 555.57,-464.48 574.98,-354.4 580.47,-307.31"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="583.96,-307.57 581.54,-297.26 577,-306.83 583.96,-307.57"/>
 </g>
 <!-- proc~elevate_degree~3 -->
 <g id="proc~~set2~3~~CalledByGraph_node4" class="node">
 <title>proc~elevate_degree~3</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="491,-402 321,-402 321,-378 491,-378 491,-402"/>
-<text text-anchor="middle" x="406" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+<g id="a_proc~~set2~3~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="491,-360 311,-360 311,-336 491,-336 491,-360"/>
+<text text-anchor="middle" x="401" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;none~set~3 -->
 <g id="proc~~set2~3~~CalledByGraph_edge3" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M472.9,-377.91C479.26,-375.47 485.41,-372.53 491,-369 524.67,-347.73 551.51,-308.93 565.91,-284.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="568.98,-286.61 570.98,-276.21 562.92,-283.09 568.98,-286.61"/>
+<path fill="none" stroke="#ff0000" d="M460.4,-335.97C470.7,-333.36 481.24,-330.35 491,-327 511.36,-320 533.32,-310.01 550.61,-301.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="552.31,-304.6 559.7,-297.01 549.19,-298.33 552.31,-304.6"/>
 </g>
 <!-- proc~insert_knots~3 -->
 <g id="proc~~set2~3~~CalledByGraph_node5" class="node">
 <title>proc~insert_knots~3</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_curve%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-360 330.5,-360 330.5,-336 481.5,-336 481.5,-360"/>
-<text text-anchor="middle" x="406" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
+<g id="a_proc~~set2~3~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-482 320.5,-482 320.5,-458 481.5,-458 481.5,-482"/>
+<text text-anchor="middle" x="401" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;none~set~3 -->
 <g id="proc~~set2~3~~CalledByGraph_edge4" class="edge">
 <title>proc~insert_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M467.18,-335.97C475.36,-333.47 483.51,-330.5 491,-327 515.36,-315.61 539.83,-296.96 556.5,-282.9"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="559.18,-285.21 564.46,-276.02 554.6,-279.91 559.18,-285.21"/>
+<path fill="none" stroke="#ff0000" d="M475.67,-457.96C481.12,-455.5 486.31,-452.54 491,-449 539.34,-412.5 565.71,-342.6 576.53,-307.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="579.97,-307.72 579.4,-297.14 573.25,-305.76 579.97,-307.72"/>
 </g>
 <!-- proc~modify_wc~3 -->
 <g id="proc~~set2~3~~CalledByGraph_node6" class="node">
 <title>proc~modify_wc~3</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="479,-276 333,-276 333,-252 479,-252 479,-276"/>
-<text text-anchor="middle" x="406" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
+<g id="a_proc~~set2~3~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="479,-318 323,-318 323,-294 479,-294 479,-318"/>
+<text text-anchor="middle" x="401" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
 <g id="proc~~set2~3~~CalledByGraph_edge5" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M479.31,-264C491.66,-264 504.39,-264 516.42,-264"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="516.78,-267.5 526.78,-264 516.78,-260.5 516.78,-267.5"/>
+<path fill="none" stroke="#ff0000" d="M479.07,-297.03C491.65,-295.57 504.57,-294.07 516.84,-292.64"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="517.44,-296.09 526.97,-291.46 516.63,-289.14 517.44,-296.09"/>
 </g>
 <!-- proc~modify_xc~3 -->
 <g id="proc~~set2~3~~CalledByGraph_node7" class="node">
 <title>proc~modify_xc~3</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-234 334.5,-234 334.5,-210 477.5,-210 477.5,-234"/>
-<text text-anchor="middle" x="406" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
+<g id="a_proc~~set2~3~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-276 324.5,-276 324.5,-252 477.5,-252 477.5,-276"/>
+<text text-anchor="middle" x="401" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
 <g id="proc~~set2~3~~CalledByGraph_edge6" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M455.86,-234.04C475.48,-238.87 498.26,-244.48 518.77,-249.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="518.09,-252.97 528.63,-251.96 519.76,-246.17 518.09,-252.97"/>
+<path fill="none" stroke="#ff0000" d="M477.5,-272.78C490.54,-274.3 503.99,-275.87 516.74,-277.35"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="516.46,-280.84 526.8,-278.52 517.27,-273.89 516.46,-280.84"/>
 </g>
 <!-- proc~remove_knots~3 -->
 <g id="proc~~set2~3~~CalledByGraph_node8" class="node">
 <title>proc~remove_knots~3</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_curve%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="487,-318 325,-318 325,-294 487,-294 487,-318"/>
-<text text-anchor="middle" x="406" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
+<g id="a_proc~~set2~3~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="487,-440 315,-440 315,-416 487,-416 487,-440"/>
+<text text-anchor="middle" x="401" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;none~set~3 -->
 <g id="proc~~set2~3~~CalledByGraph_edge7" class="edge">
 <title>proc~remove_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M455.86,-293.96C475.48,-289.13 498.26,-283.52 518.77,-278.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="519.76,-281.83 528.63,-276.04 518.09,-275.03 519.76,-281.83"/>
+<path fill="none" stroke="#ff0000" d="M462.24,-415.98C472.34,-412.44 482.34,-407.87 491,-402 527.88,-377 556.66,-332.45 571.47,-306.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="574.56,-307.78 576.29,-297.32 568.42,-304.42 574.56,-307.78"/>
 </g>
-<!-- proc~set_circle -->
+<!-- proc~set_c~3 -->
 <g id="proc~~set2~3~~CalledByGraph_node9" class="node">
-<title>proc~set_circle</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node9"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="474.5,-192 337.5,-192 337.5,-168 474.5,-168 474.5,-192"/>
-<text text-anchor="middle" x="406" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
+<title>proc~set_c~3</title>
+<g id="a_proc~~set2~3~~CalledByGraph_node9"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_surface%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="464,-108 338,-108 338,-84 464,-84 464,-108"/>
+<text text-anchor="middle" x="401" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
 </a>
 </g>
 </g>
-<!-- proc~set_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_c~3&#45;&gt;none~set~3 -->
 <g id="proc~~set2~3~~CalledByGraph_edge8" class="edge">
-<title>proc~set_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M467.18,-192.03C475.36,-194.53 483.51,-197.5 491,-201 515.36,-212.39 539.83,-231.04 556.5,-245.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="554.6,-248.09 564.46,-251.98 559.18,-242.79 554.6,-248.09"/>
+<title>proc~set_c~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M464.39,-103.61C473.92,-106.72 483.18,-111.03 491,-117 540.26,-154.6 566.32,-226.63 576.83,-262.93"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="573.46,-263.87 579.5,-272.57 580.2,-262 573.46,-263.87"/>
 </g>
-<!-- proc~set_c~3 -->
+<!-- proc~set_half_ring~2 -->
 <g id="proc~~set2~3~~CalledByGraph_node10" class="node">
-<title>proc~set_c~3</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node10"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_curve%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="464,-150 348,-150 348,-126 464,-126 464,-150"/>
-<text text-anchor="middle" x="406" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
+<title>proc~set_half_ring~2</title>
+<g id="a_proc~~set2~3~~CalledByGraph_node10"><a xlink:href="../proc/set_half_ring~2.html" xlink:title="nurbs_surface%set_half_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="483.5,-150 318.5,-150 318.5,-126 483.5,-126 483.5,-150"/>
+<text text-anchor="middle" x="401" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c~3&#45;&gt;none~set~3 -->
+<!-- proc~set_half_ring~2&#45;&gt;none~set~3 -->
 <g id="proc~~set2~3~~CalledByGraph_edge9" class="edge">
-<title>proc~set_c~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M464.15,-147.05C473.55,-149.98 482.87,-153.86 491,-159 524.67,-180.27 551.51,-219.07 565.91,-243.08"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="562.92,-244.91 570.98,-251.79 568.98,-241.39 562.92,-244.91"/>
+<title>proc~set_half_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M473.87,-150.11C479.91,-152.55 485.71,-155.48 491,-159 530.66,-185.4 559.08,-235.16 572.94,-263.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="569.8,-265.16 577.22,-272.71 576.13,-262.17 569.8,-265.16"/>
 </g>
-<!-- proc~set_half_circle -->
+<!-- proc~set_ring~2 -->
 <g id="proc~~set2~3~~CalledByGraph_node11" class="node">
-<title>proc~set_half_circle</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node11"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="487.5,-108 324.5,-108 324.5,-84 487.5,-84 487.5,-108"/>
-<text text-anchor="middle" x="406" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
+<title>proc~set_ring~2</title>
+<g id="a_proc~~set2~3~~CalledByGraph_node11"><a xlink:href="../proc/set_ring~2.html" xlink:title="nurbs_surface%set_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="470.5,-192 331.5,-192 331.5,-168 470.5,-168 470.5,-192"/>
+<text text-anchor="middle" x="401" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_ring~2&#45;&gt;none~set~3 -->
 <g id="proc~~set2~3~~CalledByGraph_edge10" class="edge">
-<title>proc~set_half_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M475.62,-108.12C481.09,-110.56 486.3,-113.49 491,-117 534.04,-149.18 559.53,-209.61 570.72,-242.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="567.51,-243.52 573.97,-251.92 574.16,-241.32 567.51,-243.52"/>
+<title>proc~set_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M469.92,-192.15C477.23,-194.59 484.41,-197.51 491,-201 521.51,-217.17 549.65,-245.97 566.45,-265.28"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="563.79,-267.55 572.93,-272.91 569.12,-263.02 563.79,-267.55"/>
 </g>
-<!-- program~compute_length -->
+<!-- proc~set_tetragon -->
 <g id="proc~~set2~3~~CalledByGraph_node12" class="node">
-<title>program~compute_length</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node12"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-502 0,-502 0,-478 99,-478 99,-502"/>
-<text text-anchor="middle" x="49.5" y="-487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<title>proc~set_tetragon</title>
+<g id="a_proc~~set2~3~~CalledByGraph_node12"><a xlink:href="../proc/set_tetragon.html" xlink:title="nurbs_surface%set_tetragon">
+<polygon fill="#d9534f" stroke="#d9534f" points="483,-234 319,-234 319,-210 483,-210 483,-234"/>
+<text text-anchor="middle" x="401" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;none~set~3 -->
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
 <g id="proc~~set2~3~~CalledByGraph_edge11" class="edge">
-<title>program~compute_length&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M84.64,-502.01C164.06,-527.61 364.11,-578.44 491,-491 559.8,-443.59 573.92,-333.61 576.79,-286.3"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="580.29,-286.35 577.28,-276.19 573.3,-286.01 580.29,-286.35"/>
-</g>
-<!-- proc~cmp_length -->
-<g id="proc~~set2~3~~CalledByGraph_node16" class="node">
-<title>proc~cmp_length</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node16"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="285,-482 135,-482 135,-458 285,-458 285,-482"/>
-<text text-anchor="middle" x="210" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
-</a>
-</g>
-</g>
-<!-- program~compute_length&#45;&gt;proc~cmp_length -->
-<g id="proc~~set2~3~~CalledByGraph_edge22" class="edge">
-<title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#ff0000" d="M99.35,-483.84C107.54,-482.8 116.25,-481.7 125.03,-480.6"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="125.48,-484.07 134.96,-479.34 124.6,-477.12 125.48,-484.07"/>
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M460.4,-234.03C470.7,-236.64 481.24,-239.65 491,-243 511.36,-250 533.32,-259.99 550.61,-268.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="549.19,-271.67 559.7,-272.99 552.31,-265.4 549.19,-271.67"/>
 </g>
-<!-- program~example1_curve -->
+<!-- program~compute_area -->
 <g id="proc~~set2~3~~CalledByGraph_node13" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node13"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-381 160,-381 160,-357 260,-357 260,-381"/>
-<text text-anchor="middle" x="210" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~compute_area</title>
+<g id="a_proc~~set2~3~~CalledByGraph_node13"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-542 0,-542 0,-518 89,-518 89,-542"/>
+<text text-anchor="middle" x="44.5" y="-527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;none~set~3 -->
+<!-- program~compute_area&#45;&gt;none~set~3 -->
 <g id="proc~~set2~3~~CalledByGraph_edge12" class="edge">
-<title>program~example1_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M233.08,-381.16C282.76,-406.72 405.66,-459.8 491,-411 538.32,-383.94 562.31,-319.79 572.06,-285.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="575.49,-286.59 574.73,-276.02 568.74,-284.75 575.49,-286.59"/>
+<title>program~compute_area&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M89.19,-528.67C195.01,-525.11 458.77,-514.01 491,-491 552.97,-446.76 573.59,-350.77 579.93,-307.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="583.42,-307.52 581.27,-297.15 576.48,-306.6 583.42,-307.52"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
-<g id="proc~~set2~3~~CalledByGraph_edge16" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
-<path fill="none" stroke="#ff7500" d="M260.21,-374.33C275.59,-375.99 293.12,-377.89 310.54,-379.78"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="310.45,-383.29 320.77,-380.88 311.21,-376.33 310.45,-383.29"/>
+<!-- proc~cmp_area -->
+<g id="proc~~set2~3~~CalledByGraph_node17" class="node">
+<title>proc~cmp_area</title>
+<g id="a_proc~~set2~3~~CalledByGraph_node17"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
+<polygon fill="#d9534f" stroke="#d9534f" points="275,-562 125,-562 125,-538 275,-538 275,-562"/>
+<text text-anchor="middle" x="200" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+</a>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
-<g id="proc~~set2~3~~CalledByGraph_edge17" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
-<path fill="none" stroke="#ffeb00" d="M260.21,-363.67C278.44,-361.7 299.67,-359.4 320.17,-357.18"/>
-<polygon fill="#ffeb00" stroke="#ffeb00" points="320.6,-360.66 330.16,-356.1 319.84,-353.7 320.6,-360.66"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
-<g id="proc~~set2~3~~CalledByGraph_edge18" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
-<path fill="none" stroke="#00ff4e" d="M239.62,-356.99C261.63,-348.02 292.92,-335.84 321,-327 328.08,-324.77 335.55,-322.62 343,-320.6"/>
-<polygon fill="#00ff4e" stroke="#00ff4e" points="343.97,-323.97 352.75,-318.03 342.19,-317.2 343.97,-323.97"/>
+<!-- program~compute_area&#45;&gt;proc~cmp_area -->
+<g id="proc~~set2~3~~CalledByGraph_edge31" class="edge">
+<title>program~compute_area&#45;&gt;proc~cmp_area</title>
+<path fill="none" stroke="#ff0000" d="M89.08,-535.68C97.19,-536.73 105.92,-537.87 114.78,-539.03"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="114.45,-542.51 124.81,-540.33 115.35,-535.57 114.45,-542.51"/>
 </g>
-<!-- program~example_nurbs_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~set2~3~~CalledByGraph_node14" class="node">
-<title>program~example_nurbs_curve</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node14"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 341.5,-66 341.5,-42 470.5,-42 470.5,-66"/>
-<text text-anchor="middle" x="406" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~set2~3~~CalledByGraph_node14"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="255,-420 145,-420 145,-396 255,-396 255,-420"/>
+<text text-anchor="middle" x="200" y="-405.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;none~set~3 -->
+<!-- program~example3_surface&#45;&gt;none~set~3 -->
 <g id="proc~~set2~3~~CalledByGraph_edge13" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M470.56,-63.24C477.95,-66.17 484.99,-70 491,-75 543.77,-118.84 565.87,-201.81 573.75,-241.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="570.34,-242.42 575.61,-251.62 577.22,-241.15 570.34,-242.42"/>
+<title>program~example3_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M255.17,-404.6C327.24,-399.42 450.29,-388.08 491,-369 522.44,-354.27 550.52,-324.84 567.04,-305.03"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="569.81,-307.17 573.38,-297.2 564.37,-302.77 569.81,-307.17"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="proc~~set2~3~~CalledByGraph_edge17" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#ff6d00" d="M239.39,-395.97C260.5,-389.4 287.17,-381.16 311,-374 323.16,-370.34 336.28,-366.47 348.62,-362.86"/>
+<polygon fill="#ff6d00" stroke="#ff6d00" points="349.69,-366.2 358.3,-360.04 347.72,-359.48 349.69,-366.2"/>
 </g>
-<!-- program~nearest_point_1d -->
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
+<g id="proc~~set2~3~~CalledByGraph_edge18" class="edge">
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#ffda00" d="M230.54,-420.16C252.49,-428.91 283.3,-440.61 311,-449 318.48,-451.27 326.37,-453.44 334.24,-455.47"/>
+<polygon fill="#ffda00" stroke="#ffda00" points="333.62,-458.92 344.17,-457.96 335.32,-452.13 333.62,-458.92"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
+<g id="proc~~set2~3~~CalledByGraph_edge20" class="edge">
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#00ff24" d="M255.11,-413.44C270.51,-414.99 287.75,-416.72 304.82,-418.43"/>
+<polygon fill="#00ff24" stroke="#00ff24" points="304.53,-421.92 314.83,-419.44 305.23,-414.96 304.53,-421.92"/>
+</g>
+<!-- program~example_nurbs_surface -->
 <g id="proc~~set2~3~~CalledByGraph_node15" class="node">
-<title>program~nearest_point_1d</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node15"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="457.5,-24 354.5,-24 354.5,0 457.5,0 457.5,-24"/>
-<text text-anchor="middle" x="406" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<title>program~example_nurbs_surface</title>
+<g id="a_proc~~set2~3~~CalledByGraph_node15"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 331.5,-66 331.5,-42 470.5,-42 470.5,-66"/>
+<text text-anchor="middle" x="401" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;none~set~3 -->
+<!-- program~example_nurbs_surface&#45;&gt;none~set~3 -->
 <g id="proc~~set2~3~~CalledByGraph_edge14" class="edge">
-<title>program~nearest_point_1d&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M457.92,-16.54C469.88,-19.69 481.8,-24.79 491,-33 553.86,-89.12 571.19,-195.45 575.85,-241.64"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="572.38,-242.13 576.76,-251.78 579.35,-241.51 572.38,-242.13"/>
+<title>program~example_nurbs_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M470.75,-63.21C478.08,-66.17 485.03,-70.01 491,-75 550.25,-124.48 572.25,-219.65 579.43,-262.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="575.99,-263.45 580.98,-272.8 582.91,-262.38 575.99,-263.45"/>
+</g>
+<!-- program~nearest_point_2d -->
+<g id="proc~~set2~3~~CalledByGraph_node16" class="node">
+<title>program~nearest_point_2d</title>
+<g id="a_proc~~set2~3~~CalledByGraph_node16"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452.5,-24 349.5,-24 349.5,0 452.5,0 452.5,-24"/>
+<text text-anchor="middle" x="401" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+</a>
+</g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- program~nearest_point_2d&#45;&gt;none~set~3 -->
 <g id="proc~~set2~3~~CalledByGraph_edge15" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#ff0000" d="M285.17,-470C301.32,-470 318.36,-470 334.36,-470"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="334.71,-473.5 344.71,-470 334.71,-466.5 334.71,-473.5"/>
+<title>program~nearest_point_2d&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M452.73,-15.16C466.47,-18.21 480.44,-23.61 491,-33 560.36,-94.71 577.18,-213.24 581.23,-262.59"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="577.76,-263.07 581.96,-272.8 584.74,-262.57 577.76,-263.07"/>
 </g>
-<!-- program~shape_c_1d -->
-<g id="proc~~set2~3~~CalledByGraph_node17" class="node">
-<title>program~shape_c_1d</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node17"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-150 172,-150 172,-126 248,-126 248,-150"/>
-<text text-anchor="middle" x="210" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~set2~3~~CalledByGraph_edge16" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#ff0000" d="M275.1,-550C291.15,-550 308.13,-550 324.24,-550"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="324.68,-553.5 334.68,-550 324.68,-546.5 324.68,-553.5"/>
+</g>
+<!-- program~example_ppm1 -->
+<g id="proc~~set2~3~~CalledByGraph_node18" class="node">
+<title>program~example_ppm1</title>
+<g id="a_proc~~set2~3~~CalledByGraph_node18"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-192 153,-192 153,-168 247,-168 247,-192"/>
+<text text-anchor="middle" x="200" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~set_c~3 -->
-<g id="proc~~set2~3~~CalledByGraph_edge20" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~set_c~3</title>
-<path fill="none" stroke="#00c4ff" d="M248.41,-138C273.62,-138 307.6,-138 337.47,-138"/>
-<polygon fill="#00c4ff" stroke="#00c4ff" points="337.84,-141.5 347.84,-138 337.84,-134.5 337.84,-141.5"/>
+<!-- program~example_ppm1&#45;&gt;proc~set_ring~2 -->
+<g id="proc~~set2~3~~CalledByGraph_edge24" class="edge">
+<title>program~example_ppm1&#45;&gt;proc~set_ring~2</title>
+<path fill="none" stroke="#0091ff" d="M247.15,-180C269.15,-180 296.09,-180 321.19,-180"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="321.45,-183.5 331.45,-180 321.45,-176.5 321.45,-183.5"/>
 </g>
-<!-- program~shape_circle -->
-<g id="proc~~set2~3~~CalledByGraph_node18" class="node">
-<title>program~shape_circle</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node18"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249.5,-192 170.5,-192 170.5,-168 249.5,-168 249.5,-192"/>
-<text text-anchor="middle" x="210" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<!-- program~example_ppm1&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set2~3~~CalledByGraph_edge26" class="edge">
+<title>program~example_ppm1&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.15,-189.74C272.73,-195.14 304.98,-201.95 333.26,-207.91"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="332.57,-211.34 343.07,-209.99 334.01,-204.5 332.57,-211.34"/>
+</g>
+<!-- program~example_ppm2 -->
+<g id="proc~~set2~3~~CalledByGraph_node19" class="node">
+<title>program~example_ppm2</title>
+<g id="a_proc~~set2~3~~CalledByGraph_node19"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-150 153,-150 153,-126 247,-126 247,-150"/>
+<text text-anchor="middle" x="200" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~set_circle -->
+<!-- program~example_ppm2&#45;&gt;proc~set_half_ring~2 -->
+<g id="proc~~set2~3~~CalledByGraph_edge22" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~set_half_ring~2</title>
+<path fill="none" stroke="#00ffff" d="M247.15,-138C265.39,-138 287.03,-138 308.19,-138"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="308.2,-141.5 318.2,-138 308.2,-134.5 308.2,-141.5"/>
+</g>
+<!-- program~example_ppm2&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set2~3~~CalledByGraph_edge27" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.02,-146.55C256.72,-149.56 266.56,-153.6 275,-159 295.71,-172.25 290,-188.21 311,-201 314.01,-202.83 317.16,-204.5 320.41,-206.03"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="319.22,-209.32 329.8,-209.95 321.92,-202.87 319.22,-209.32"/>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~set2~3~~CalledByGraph_node20" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~set2~3~~CalledByGraph_node20"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-318 153,-318 153,-294 247,-294 247,-318"/>
+<text text-anchor="middle" x="200" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
 <g id="proc~~set2~3~~CalledByGraph_edge19" class="edge">
-<title>program~shape_circle&#45;&gt;proc~set_circle</title>
-<path fill="none" stroke="#00ffc4" d="M249.79,-180C271.95,-180 300.54,-180 327.13,-180"/>
-<polygon fill="#00ffc4" stroke="#00ffc4" points="327.21,-183.5 337.21,-180 327.21,-176.5 327.21,-183.5"/>
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#48ff00" d="M247.15,-296.26C272.73,-290.86 304.98,-284.05 333.26,-278.09"/>
+<polygon fill="#48ff00" stroke="#48ff00" points="334.01,-281.5 343.07,-276.01 332.57,-274.66 334.01,-281.5"/>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set2~3~~CalledByGraph_edge28" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.02,-297.45C256.72,-294.44 266.56,-290.4 275,-285 295.71,-271.75 290,-255.79 311,-243 314.01,-241.17 317.16,-239.5 320.41,-237.97"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="321.92,-241.13 329.8,-234.05 319.22,-234.68 321.92,-241.13"/>
+</g>
+<!-- program~nearest_point_2d_bench -->
+<g id="proc~~set2~3~~CalledByGraph_node21" class="node">
+<title>program~nearest_point_2d_bench</title>
+<g id="a_proc~~set2~3~~CalledByGraph_node21"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-234 129,-234 129,-210 271,-210 271,-234"/>
+<text text-anchor="middle" x="200" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+</a>
 </g>
-<!-- program~shape_half_circle -->
-<g id="proc~~set2~3~~CalledByGraph_node19" class="node">
-<title>program~shape_half_circle</title>
-<g id="a_proc~~set2~3~~CalledByGraph_node19"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-108 158,-108 158,-84 262,-84 262,-108"/>
-<text text-anchor="middle" x="210" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+</g>
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set2~3~~CalledByGraph_edge29" class="edge">
+<title>program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M271.16,-222C283.34,-222 296.17,-222 308.82,-222"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="308.91,-225.5 318.91,-222 308.91,-218.5 308.91,-225.5"/>
+</g>
+<!-- program~shape_c_2d -->
+<g id="proc~~set2~3~~CalledByGraph_node22" class="node">
+<title>program~shape_c_2d</title>
+<g id="a_proc~~set2~3~~CalledByGraph_node22"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="238,-24 162,-24 162,0 238,0 238,-24"/>
+<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
+<!-- program~shape_c_2d&#45;&gt;proc~set_c~3 -->
 <g id="proc~~set2~3~~CalledByGraph_edge21" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
-<path fill="none" stroke="#004eff" d="M262.22,-96C278.08,-96 296.06,-96 313.78,-96"/>
-<polygon fill="#004eff" stroke="#004eff" points="314.17,-99.5 324.17,-96 314.17,-92.5 314.17,-99.5"/>
+<title>program~shape_c_2d&#45;&gt;proc~set_c~3</title>
+<path fill="none" stroke="#00ff91" d="M238.17,-18.06C250.55,-21.21 263.98,-25.94 275,-33 295.71,-46.25 290,-62.21 311,-75 316.34,-78.25 322.14,-81 328.14,-83.32"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="327.09,-86.66 337.68,-86.63 329.38,-80.05 327.09,-86.66"/>
+</g>
+<!-- program~shape_half_ring_2d -->
+<g id="proc~~set2~3~~CalledByGraph_node23" class="node">
+<title>program~shape_half_ring_2d</title>
+<g id="a_proc~~set2~3~~CalledByGraph_node23"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="257.5,-66 142.5,-66 142.5,-42 257.5,-42 257.5,-66"/>
+<text text-anchor="middle" x="200" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2 -->
+<g id="proc~~set2~3~~CalledByGraph_edge23" class="edge">
+<title>program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2</title>
+<path fill="none" stroke="#00ffff" d="M257.09,-66.07C263.38,-68.53 269.49,-71.47 275,-75 295.71,-88.25 290,-104.21 311,-117 314.01,-118.83 317.16,-120.5 320.41,-122.03"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="319.22,-125.32 329.8,-125.95 321.92,-118.87 319.22,-125.32"/>
+</g>
+<!-- program~shape_ring_2d -->
+<g id="proc~~set2~3~~CalledByGraph_node24" class="node">
+<title>program~shape_ring_2d</title>
+<g id="a_proc~~set2~3~~CalledByGraph_node24"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="245,-108 155,-108 155,-84 245,-84 245,-108"/>
+<text text-anchor="middle" x="200" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_ring_2d&#45;&gt;proc~set_ring~2 -->
+<g id="proc~~set2~3~~CalledByGraph_edge25" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~set_ring~2</title>
+<path fill="none" stroke="#0091ff" d="M245.08,-103.96C255.4,-107.03 266,-111.24 275,-117 295.71,-130.25 290,-146.21 311,-159 314.41,-161.08 318.01,-162.95 321.73,-164.64"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="320.6,-167.95 331.18,-168.46 323.22,-161.46 320.6,-167.95"/>
+</g>
+<!-- program~shape_tetragon -->
+<g id="proc~~set2~3~~CalledByGraph_node25" class="node">
+<title>program~shape_tetragon</title>
+<g id="a_proc~~set2~3~~CalledByGraph_node25"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-276 152,-276 152,-252 248,-252 248,-276"/>
+<text text-anchor="middle" x="200" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+</a>
+</g>
+</g>
+<!-- program~shape_tetragon&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set2~3~~CalledByGraph_edge30" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M248.16,-254.05C273.44,-248.71 305.03,-242.04 332.84,-236.17"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="333.83,-239.54 342.89,-234.05 332.39,-232.69 333.83,-239.54"/>
 </g>
 </g>
 </svg>
@@ -820,7 +1018,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set3.html b/proc/set3.html
index b1bf3d897..3cfaa04d2 100644
--- a/proc/set3.html
+++ b/proc/set3.html
@@ -78,20 +78,20 @@ <h1>set3
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.4% of total for procedures.">30 statements</a>
+                 title=" 0.3% of total for procedures.">22 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">set3</li>
           </ol>
         </nav>
@@ -137,14 +137,14 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine set3(this, nc, Xc, Wc)  
+    <h2>private pure subroutine set3(this, Xc, Wc)  
 </h2>
     
 
-    <p>Set Bezier or Rational Bezier volume using control points and weights.</p>
+    <p>Set Bezier or Rational Bezier curve using control points and weights.</p>
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,8 +159,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~3"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~4"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -174,22 +174,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~2"></span>
-              integer,
-            </td>
-<td>intent(in),</td>
-              <td></td>            <td>
-              contiguous
-            </td>
-            <td>::</td>
-            <td><strong>nc</strong>(:)</td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-xc~6"></span>
+              <span class="anchor" id="variable-xc~11"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -204,7 +189,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~5"></span>
+              <span class="anchor" id="variable-wc~11"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -232,91 +217,91 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set3~~CallsGraph Pages: 1 -->
-<svg id="procset3CallsGraph" width="641pt" height="55pt"
- viewBox="0.00 0.00 641.00 54.71" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set3~~CallsGraph" class="graph" transform="scale(1.35 1.35) rotate(0) translate(4 70)">
+<svg id="procset3CallsGraph" width="641pt" height="57pt"
+ viewBox="0.00 0.00 641.00 56.54" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set3~~CallsGraph" class="graph" transform="scale(1.31 1.31) rotate(0) translate(4 70)">
 <title>proc~~set3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 863,-70 863,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 835,-70 835,4 -4,4"/>
 <!-- proc~set3 -->
 <g id="proc~~set3~~CallsGraph_node1" class="node">
 <title>proc~set3</title>
-<polygon fill="none" stroke="black" points="120,-45 0,-45 0,-21 120,-21 120,-45"/>
-<text text-anchor="middle" x="60" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set3</text>
+<polygon fill="none" stroke="black" points="110,-45 0,-45 0,-21 110,-21 110,-45"/>
+<text text-anchor="middle" x="55" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set3</text>
 </g>
 <!-- proc~cmp_degree -->
 <g id="proc~~set3~~CallsGraph_node2" class="node">
 <title>proc~cmp_degree</title>
-<g id="a_proc~~set3~~CallsGraph_node2"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="319,-45 156,-45 156,-21 319,-21 319,-45"/>
-<text text-anchor="middle" x="237.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
+<g id="a_proc~~set3~~CallsGraph_node2"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="300,-45 146,-45 146,-21 300,-21 300,-45"/>
+<text text-anchor="middle" x="223" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~set3&#45;&gt;proc~cmp_degree -->
 <g id="proc~~set3~~CallsGraph_edge1" class="edge">
 <title>proc~set3&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#ff0000" d="M120.42,-33C128.64,-33 137.23,-33 145.86,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="145.98,-36.5 155.98,-33 145.98,-29.5 145.98,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M110.35,-33C118.51,-33 127.09,-33 135.71,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="135.83,-36.5 145.83,-33 135.83,-29.5 135.83,-36.5"/>
 </g>
 <!-- proc~get_multiplicity -->
 <g id="proc~~set3~~CallsGraph_node3" class="node">
 <title>proc~get_multiplicity</title>
-<g id="a_proc~~set3~~CallsGraph_node3"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="533,-45 355,-45 355,-21 533,-21 533,-45"/>
-<text text-anchor="middle" x="444" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
+<g id="a_proc~~set3~~CallsGraph_node3"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="505,-45 336,-45 336,-21 505,-21 505,-45"/>
+<text text-anchor="middle" x="420.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="proc~~set3~~CallsGraph_edge2" class="edge">
 <title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M319.03,-33C327.47,-33 336.11,-33 344.71,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="344.78,-36.5 354.78,-33 344.78,-29.5 344.78,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M300.15,-33C308.54,-33 317.17,-33 325.75,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="325.79,-36.5 335.79,-33 325.79,-29.5 325.79,-36.5"/>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~set3~~CallsGraph_node4" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~set3~~CallsGraph_node4"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="693,-45 569,-45 569,-21 693,-21 693,-45"/>
-<text text-anchor="middle" x="631" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="665,-45 541,-45 541,-21 665,-21 665,-45"/>
+<text text-anchor="middle" x="603" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set3~~CallsGraph_edge3" class="edge">
 <title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M533.17,-33C541.77,-33 550.42,-33 558.82,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="558.93,-36.5 568.93,-33 558.93,-29.5 558.93,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M505.15,-33C513.73,-33 522.4,-33 530.84,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="530.99,-36.5 540.99,-33 530.99,-29.5 530.99,-36.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~set3~~CallsGraph_node5" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~set3~~CallsGraph_node5"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="859,-66 729,-66 729,-42 859,-42 859,-66"/>
-<text text-anchor="middle" x="794" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="831,-66 701,-66 701,-42 831,-42 831,-66"/>
+<text text-anchor="middle" x="766" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~set3~~CallsGraph_edge4" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M693.33,-41C701.69,-42.09 710.35,-43.22 718.92,-44.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="718.53,-47.82 728.9,-45.64 719.44,-40.88 718.53,-47.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M665.33,-41C673.69,-42.09 682.35,-43.22 690.92,-44.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="690.53,-47.82 700.9,-45.64 691.44,-40.88 690.53,-47.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~set3~~CallsGraph_node6" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~set3~~CallsGraph_node6"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="859,-24 729,-24 729,0 859,0 859,-24"/>
-<text text-anchor="middle" x="794" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="831,-24 701,-24 701,0 831,0 831,-24"/>
+<text text-anchor="middle" x="766" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~set3~~CallsGraph_edge5" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M693.33,-25C701.69,-23.91 710.35,-22.78 718.92,-21.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="719.44,-25.12 728.9,-20.36 718.53,-18.18 719.44,-25.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M665.33,-25C673.69,-23.91 682.35,-22.78 690.92,-21.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="691.44,-25.12 700.9,-20.36 690.53,-18.18 691.44,-25.12"/>
 </g>
 </g>
 </svg>
@@ -416,355 +401,310 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set3~~CalledByGraph Pages: 1 -->
-<svg id="procset3CalledByGraph" width="641pt" height="488pt"
- viewBox="0.00 0.00 641.00 488.05" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set3~~CalledByGraph" class="graph" transform="scale(1.31 1.31) rotate(0) translate(4 633.29)">
+<svg id="procset3CalledByGraph" width="641pt" height="448pt"
+ viewBox="0.00 0.00 641.00 448.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set3~~CalledByGraph" class="graph" transform="scale(1.22 1.22) rotate(0) translate(4 544.5)">
 <title>proc~~set3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-633.29 833,-633.29 833,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-544.5 780,-544.5 780,4 -4,4"/>
 <!-- proc~set3 -->
 <g id="proc~~set3~~CalledByGraph_node1" class="node">
 <title>proc~set3</title>
-<polygon fill="none" stroke="black" points="829,-318 709,-318 709,-294 829,-294 829,-318"/>
-<text text-anchor="middle" x="769" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set3</text>
+<polygon fill="none" stroke="black" points="776,-276 666,-276 666,-252 776,-252 776,-276"/>
+<text text-anchor="middle" x="721" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set3</text>
 </g>
 <!-- none~set -->
 <g id="proc~~set3~~CalledByGraph_node2" class="node">
 <title>none~set</title>
-<g id="a_proc~~set3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="673,-318 560,-318 560,-294 673,-294 673,-318"/>
-<text text-anchor="middle" x="616.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<g id="a_proc~~set3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="630,-276 527,-276 527,-252 630,-252 630,-276"/>
+<text text-anchor="middle" x="578.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set3 -->
 <g id="proc~~set3~~CalledByGraph_edge1" class="edge">
 <title>none~set&#45;&gt;proc~set3</title>
-<path fill="none" stroke="#ff0000" d="M673.11,-306C681.48,-306 690.19,-306 698.8,-306"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="698.83,-309.5 708.83,-306 698.83,-302.5 698.83,-309.5"/>
+<path fill="none" stroke="#ff0000" d="M630.22,-264C638.38,-264 646.92,-264 655.35,-264"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="655.55,-267.5 665.55,-264 655.55,-260.5 655.55,-267.5"/>
 </g>
 <!-- proc~ansatz -->
 <g id="proc~~set3~~CalledByGraph_node3" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~set3~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-566 367.5,-566 367.5,-542 499.5,-542 499.5,-566"/>
-<text text-anchor="middle" x="433.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~set3~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="467,-482 345,-482 345,-458 467,-458 467,-482"/>
+<text text-anchor="middle" x="406" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;none~set -->
 <g id="proc~~set3~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.76,-542.65C508.6,-539.03 517.01,-534.27 524,-528 584.64,-473.59 606.02,-372.87 612.74,-328.26"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="616.23,-328.58 614.15,-318.19 609.3,-327.61 616.23,-328.58"/>
+<path fill="none" stroke="#ff0000" d="M467.12,-458.13C475.76,-454.59 484.06,-449.98 491,-444 540.47,-401.35 563.98,-323.98 572.94,-286.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="576.41,-286.63 575.18,-276.11 569.58,-285.1 576.41,-286.63"/>
 </g>
 <!-- proc~elevate_degree -->
 <g id="proc~~set3~~CalledByGraph_node4" class="node">
 <title>proc~elevate_degree</title>
-<g id="a_proc~~set3~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-486 343.5,-486 343.5,-462 523.5,-462 523.5,-486"/>
-<text text-anchor="middle" x="433.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
+<g id="a_proc~~set3~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="491,-402 321,-402 321,-378 491,-378 491,-402"/>
+<text text-anchor="middle" x="406" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree&#45;&gt;none~set -->
 <g id="proc~~set3~~CalledByGraph_edge3" class="edge">
 <title>proc~elevate_degree&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M507.95,-461.94C513.63,-459.48 519.07,-456.54 524,-453 568.52,-421.06 596.03,-360.08 608.18,-327.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="611.5,-328.73 611.59,-318.14 604.91,-326.36 611.5,-328.73"/>
+<path fill="none" stroke="#ff0000" d="M472.9,-377.91C479.26,-375.47 485.41,-372.53 491,-369 524.67,-347.73 551.51,-308.93 565.91,-284.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="568.98,-286.61 570.98,-276.21 562.92,-283.09 568.98,-286.61"/>
 </g>
 <!-- proc~insert_knots -->
 <g id="proc~~set3~~CalledByGraph_node5" class="node">
 <title>proc~insert_knots</title>
-<g id="a_proc~~set3~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514,-444 353,-444 353,-420 514,-420 514,-444"/>
-<text text-anchor="middle" x="433.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
+<g id="a_proc~~set3~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_curve%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-360 330.5,-360 330.5,-336 481.5,-336 481.5,-360"/>
+<text text-anchor="middle" x="406" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;none~set -->
 <g id="proc~~set3~~CalledByGraph_edge4" class="edge">
 <title>proc~insert_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M505.06,-419.93C511.69,-417.49 518.12,-414.54 524,-411 558.92,-389.96 587.54,-351.08 603,-327"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="606.13,-328.6 608.45,-318.26 600.19,-324.89 606.13,-328.6"/>
+<path fill="none" stroke="#ff0000" d="M467.18,-335.97C475.36,-333.47 483.51,-330.5 491,-327 515.36,-315.61 539.83,-296.96 556.5,-282.9"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="559.18,-285.21 564.46,-276.02 554.6,-279.91 559.18,-285.21"/>
 </g>
 <!-- proc~modify_wc -->
 <g id="proc~~set3~~CalledByGraph_node6" class="node">
 <title>proc~modify_wc</title>
-<g id="a_proc~~set3~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-360 355.5,-360 355.5,-336 511.5,-336 511.5,-360"/>
-<text text-anchor="middle" x="433.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
+<g id="a_proc~~set3~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="479,-276 333,-276 333,-252 479,-252 479,-276"/>
+<text text-anchor="middle" x="406" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~set -->
 <g id="proc~~set3~~CalledByGraph_edge5" class="edge">
 <title>proc~modify_wc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M486.37,-335.96C507.38,-331.09 531.82,-325.42 553.75,-320.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="554.68,-323.71 563.63,-318.04 553.09,-316.89 554.68,-323.71"/>
+<path fill="none" stroke="#ff0000" d="M479.31,-264C491.66,-264 504.39,-264 516.42,-264"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="516.78,-267.5 526.78,-264 516.78,-260.5 516.78,-267.5"/>
 </g>
 <!-- proc~modify_xc -->
 <g id="proc~~set3~~CalledByGraph_node7" class="node">
 <title>proc~modify_xc</title>
-<g id="a_proc~~set3~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="510,-318 357,-318 357,-294 510,-294 510,-318"/>
-<text text-anchor="middle" x="433.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
+<g id="a_proc~~set3~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-234 334.5,-234 334.5,-210 477.5,-210 477.5,-234"/>
+<text text-anchor="middle" x="406" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~set -->
 <g id="proc~~set3~~CalledByGraph_edge6" class="edge">
 <title>proc~modify_xc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M510.21,-306C523.36,-306 536.93,-306 549.79,-306"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="549.92,-309.5 559.92,-306 549.92,-302.5 549.92,-309.5"/>
+<path fill="none" stroke="#ff0000" d="M455.86,-234.04C475.48,-238.87 498.26,-244.48 518.77,-249.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="518.09,-252.97 528.63,-251.96 519.76,-246.17 518.09,-252.97"/>
 </g>
 <!-- proc~remove_knots -->
 <g id="proc~~set3~~CalledByGraph_node8" class="node">
 <title>proc~remove_knots</title>
-<g id="a_proc~~set3~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-402 347.5,-402 347.5,-378 519.5,-378 519.5,-402"/>
-<text text-anchor="middle" x="433.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
+<g id="a_proc~~set3~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_curve%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="487,-318 325,-318 325,-294 487,-294 487,-318"/>
+<text text-anchor="middle" x="406" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots&#45;&gt;none~set -->
 <g id="proc~~set3~~CalledByGraph_edge7" class="edge">
 <title>proc~remove_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.01,-377.92C507.58,-375.44 516.12,-372.49 524,-369 549.77,-357.6 575.92,-338.69 593.63,-324.56"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="596.07,-327.09 601.61,-318.06 591.65,-321.66 596.07,-327.09"/>
+<path fill="none" stroke="#ff0000" d="M455.86,-293.96C475.48,-289.13 498.26,-283.52 518.77,-278.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="519.76,-281.83 528.63,-276.04 518.09,-275.03 519.76,-281.83"/>
 </g>
 <!-- proc~set_c -->
 <g id="proc~~set3~~CalledByGraph_node9" class="node">
 <title>proc~set_c</title>
-<g id="a_proc~~set3~~CalledByGraph_node9"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_volume%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-276 370.5,-276 370.5,-252 496.5,-252 496.5,-276"/>
-<text text-anchor="middle" x="433.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
+<g id="a_proc~~set3~~CalledByGraph_node9"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_curve%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="464,-192 348,-192 348,-168 464,-168 464,-192"/>
+<text text-anchor="middle" x="406" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c&#45;&gt;none~set -->
 <g id="proc~~set3~~CalledByGraph_edge8" class="edge">
 <title>proc~set_c&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M486.37,-276.04C507.38,-280.91 531.82,-286.58 553.75,-291.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="553.09,-295.11 563.63,-293.96 554.68,-288.29 553.09,-295.11"/>
+<path fill="none" stroke="#ff0000" d="M464.06,-191.1C473.28,-193.79 482.56,-197.05 491,-201 515.36,-212.39 539.83,-231.04 556.5,-245.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="554.6,-248.09 564.46,-251.98 559.18,-242.79 554.6,-248.09"/>
 </g>
-<!-- proc~set_half_ring -->
+<!-- proc~set_circle -->
 <g id="proc~~set3~~CalledByGraph_node10" class="node">
-<title>proc~set_half_ring</title>
-<g id="a_proc~~set3~~CalledByGraph_node10"><a xlink:href="../proc/set_half_ring.html" xlink:title="nurbs_volume%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="516,-234 351,-234 351,-210 516,-210 516,-234"/>
-<text text-anchor="middle" x="433.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
+<title>proc~set_circle</title>
+<g id="a_proc~~set3~~CalledByGraph_node10"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
+<polygon fill="#d9534f" stroke="#d9534f" points="474.5,-150 337.5,-150 337.5,-126 474.5,-126 474.5,-150"/>
+<text text-anchor="middle" x="406" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring&#45;&gt;none~set -->
+<!-- proc~set_circle&#45;&gt;none~set -->
 <g id="proc~~set3~~CalledByGraph_edge9" class="edge">
-<title>proc~set_half_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.01,-234.08C507.58,-236.56 516.12,-239.51 524,-243 549.77,-254.4 575.92,-273.31 593.63,-287.44"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="591.65,-290.34 601.61,-293.94 596.07,-284.91 591.65,-290.34"/>
+<title>proc~set_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M472.9,-150.09C479.26,-152.53 485.41,-155.47 491,-159 524.67,-180.27 551.51,-219.07 565.91,-243.08"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="562.92,-244.91 570.98,-251.79 568.98,-241.39 562.92,-244.91"/>
 </g>
-<!-- proc~set_hexahedron -->
+<!-- proc~set_half_circle -->
 <g id="proc~~set3~~CalledByGraph_node11" class="node">
-<title>proc~set_hexahedron</title>
-<g id="a_proc~~set3~~CalledByGraph_node11"><a xlink:href="../proc/set_hexahedron.html" xlink:title="nurbs_volume%set_hexahedron">
-<polygon fill="#d9534f" stroke="#d9534f" points="524,-192 343,-192 343,-168 524,-168 524,-192"/>
-<text text-anchor="middle" x="433.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
+<title>proc~set_half_circle</title>
+<g id="a_proc~~set3~~CalledByGraph_node11"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
+<polygon fill="#d9534f" stroke="#d9534f" points="487.5,-108 324.5,-108 324.5,-84 487.5,-84 487.5,-108"/>
+<text text-anchor="middle" x="406" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_hexahedron&#45;&gt;none~set -->
+<!-- proc~set_half_circle&#45;&gt;none~set -->
 <g id="proc~~set3~~CalledByGraph_edge10" class="edge">
-<title>proc~set_hexahedron&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M505.06,-192.07C511.69,-194.51 518.12,-197.46 524,-201 558.92,-222.04 587.54,-260.92 603,-285"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="600.19,-287.11 608.45,-293.74 606.13,-283.4 600.19,-287.11"/>
+<title>proc~set_half_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M475.62,-108.12C481.09,-110.56 486.3,-113.49 491,-117 534.04,-149.18 559.53,-209.61 570.72,-242.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="567.51,-243.52 573.97,-251.92 574.16,-241.32 567.51,-243.52"/>
 </g>
-<!-- proc~set_ring -->
+<!-- program~compute_length -->
 <g id="proc~~set3~~CalledByGraph_node12" class="node">
-<title>proc~set_ring</title>
-<g id="a_proc~~set3~~CalledByGraph_node12"><a xlink:href="../proc/set_ring.html" xlink:title="nurbs_volume%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="503,-150 364,-150 364,-126 503,-126 503,-150"/>
-<text text-anchor="middle" x="433.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
+<title>program~compute_length</title>
+<g id="a_proc~~set3~~CalledByGraph_node12"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-502 0,-502 0,-478 99,-478 99,-502"/>
+<text text-anchor="middle" x="49.5" y="-487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring&#45;&gt;none~set -->
+<!-- program~compute_length&#45;&gt;none~set -->
 <g id="proc~~set3~~CalledByGraph_edge11" class="edge">
-<title>proc~set_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.41,-148.22C510.74,-151.01 517.78,-154.53 524,-159 568.52,-190.94 596.03,-251.92 608.18,-284.39"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="604.91,-285.64 611.59,-293.86 611.5,-283.27 604.91,-285.64"/>
+<title>program~compute_length&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M84.64,-502.01C164.06,-527.61 364.11,-578.44 491,-491 559.8,-443.59 573.92,-333.61 576.79,-286.3"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="580.29,-286.35 577.28,-276.19 573.3,-286.01 580.29,-286.35"/>
 </g>
-<!-- program~compute_volume -->
+<!-- proc~cmp_length -->
+<g id="proc~~set3~~CalledByGraph_node16" class="node">
+<title>proc~cmp_length</title>
+<g id="a_proc~~set3~~CalledByGraph_node16"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
+<polygon fill="#d9534f" stroke="#d9534f" points="285,-482 135,-482 135,-458 285,-458 285,-482"/>
+<text text-anchor="middle" x="210" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+</a>
+</g>
+</g>
+<!-- program~compute_length&#45;&gt;proc~cmp_length -->
+<g id="proc~~set3~~CalledByGraph_edge22" class="edge">
+<title>program~compute_length&#45;&gt;proc~cmp_length</title>
+<path fill="none" stroke="#ff0000" d="M99.35,-483.84C107.54,-482.8 116.25,-481.7 125.03,-480.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="125.48,-484.07 134.96,-479.34 124.6,-477.12 125.48,-484.07"/>
+</g>
+<!-- program~example1_curve -->
 <g id="proc~~set3~~CalledByGraph_node13" class="node">
-<title>program~compute_volume</title>
-<g id="a_proc~~set3~~CalledByGraph_node13"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-586 0,-586 0,-562 105,-562 105,-586"/>
-<text text-anchor="middle" x="52.5" y="-571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~set3~~CalledByGraph_node13"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-381 160,-381 160,-357 260,-357 260,-381"/>
+<text text-anchor="middle" x="210" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;none~set -->
+<!-- program~example1_curve&#45;&gt;none~set -->
 <g id="proc~~set3~~CalledByGraph_edge12" class="edge">
-<title>program~compute_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M86.78,-586.01C169.65,-613.64 388.35,-672.14 524,-575 605.44,-516.68 615.25,-381.64 615.83,-328.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="619.33,-328.19 615.83,-318.18 612.33,-328.18 619.33,-328.19"/>
+<title>program~example1_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M233.08,-381.16C282.76,-406.72 405.66,-459.8 491,-411 538.32,-383.94 562.31,-319.79 572.06,-285.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="575.49,-286.59 574.73,-276.02 568.74,-284.75 575.49,-286.59"/>
 </g>
-<!-- proc~cmp_volume -->
-<g id="proc~~set3~~CalledByGraph_node18" class="node">
-<title>proc~cmp_volume</title>
-<g id="a_proc~~set3~~CalledByGraph_node18"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-566 141,-566 141,-542 307,-542 307,-566"/>
-<text text-anchor="middle" x="224" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
-</a>
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
+<g id="proc~~set3~~CalledByGraph_edge16" class="edge">
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
+<path fill="none" stroke="#ff7500" d="M260.21,-374.33C275.59,-375.99 293.12,-377.89 310.54,-379.78"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="310.45,-383.29 320.77,-380.88 311.21,-376.33 310.45,-383.29"/>
 </g>
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
+<g id="proc~~set3~~CalledByGraph_edge17" class="edge">
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
+<path fill="none" stroke="#ffeb00" d="M260.21,-363.67C278.44,-361.7 299.67,-359.4 320.17,-357.18"/>
+<polygon fill="#ffeb00" stroke="#ffeb00" points="320.6,-360.66 330.16,-356.1 319.84,-353.7 320.6,-360.66"/>
 </g>
-<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
-<g id="proc~~set3~~CalledByGraph_edge25" class="edge">
-<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#ff0000" d="M105.28,-567.89C113.48,-566.92 122.18,-565.9 130.98,-564.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="131.41,-568.33 140.93,-563.68 130.59,-561.38 131.41,-568.33"/>
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
+<g id="proc~~set3~~CalledByGraph_edge18" class="edge">
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
+<path fill="none" stroke="#00ff4e" d="M239.62,-356.99C261.63,-348.02 292.92,-335.84 321,-327 328.08,-324.77 335.55,-322.62 343,-320.6"/>
+<polygon fill="#00ff4e" stroke="#00ff4e" points="343.97,-323.97 352.75,-318.03 342.19,-317.2 343.97,-323.97"/>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example_nurbs_curve -->
 <g id="proc~~set3~~CalledByGraph_node14" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~set3~~CalledByGraph_node14"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-465 169,-465 169,-441 279,-441 279,-465"/>
-<text text-anchor="middle" x="224" y="-450.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example_nurbs_curve</title>
+<g id="a_proc~~set3~~CalledByGraph_node14"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 341.5,-66 341.5,-42 470.5,-42 470.5,-66"/>
+<text text-anchor="middle" x="406" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;none~set -->
+<!-- program~example_nurbs_curve&#45;&gt;none~set -->
 <g id="proc~~set3~~CalledByGraph_edge13" class="edge">
-<title>program~example3_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M246.93,-465.12C299.32,-492.29 434.06,-551.38 524,-495 583.54,-457.67 605.3,-369.39 612.41,-328.06"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="615.87,-328.6 613.98,-318.18 608.95,-327.5 615.87,-328.6"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
-<g id="proc~~set3~~CalledByGraph_edge18" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#ff6600" d="M279.25,-458.49C295.84,-460.17 314.64,-462.07 333.24,-463.95"/>
-<polygon fill="#ff6600" stroke="#ff6600" points="332.94,-467.44 343.24,-464.97 333.64,-460.48 332.94,-467.44"/>
+<title>program~example_nurbs_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M470.56,-63.24C477.95,-66.17 484.99,-70 491,-75 543.77,-118.84 565.87,-201.81 573.75,-241.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="570.34,-242.42 575.61,-251.62 577.22,-241.15 570.34,-242.42"/>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
-<g id="proc~~set3~~CalledByGraph_edge19" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#ffcc00" d="M279.25,-447.51C298.63,-445.55 321.03,-443.28 342.61,-441.1"/>
-<polygon fill="#ffcc00" stroke="#ffcc00" points="343.19,-444.56 352.79,-440.07 342.49,-437.59 343.19,-444.56"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
-<g id="proc~~set3~~CalledByGraph_edge20" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#00ff00" d="M255.75,-440.99C279.38,-432.02 312.96,-419.84 343,-411 350.73,-408.73 358.89,-406.53 367.01,-404.47"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="368,-407.84 376.87,-402.04 366.32,-401.04 368,-407.84"/>
-</g>
-<!-- program~example_nurbs_volume -->
+<!-- program~nearest_point_1d -->
 <g id="proc~~set3~~CalledByGraph_node15" class="node">
-<title>program~example_nurbs_volume</title>
-<g id="a_proc~~set3~~CalledByGraph_node15"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-108 364,-108 364,-84 503,-84 503,-108"/>
-<text text-anchor="middle" x="433.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<title>program~nearest_point_1d</title>
+<g id="a_proc~~set3~~CalledByGraph_node15"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="457.5,-24 354.5,-24 354.5,0 457.5,0 457.5,-24"/>
+<text text-anchor="middle" x="406" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;none~set -->
+<!-- program~nearest_point_1d&#45;&gt;none~set -->
 <g id="proc~~set3~~CalledByGraph_edge14" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.44,-105.4C510.85,-108.33 517.9,-112.11 524,-117 578.22,-160.42 602.42,-243.9 611.25,-283.76"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="607.82,-284.49 613.3,-293.56 614.67,-283.05 607.82,-284.49"/>
-</g>
-<!-- program~example_put_to_nurbs -->
-<g id="proc~~set3~~CalledByGraph_node16" class="node">
-<title>program~example_put_to_nurbs</title>
-<g id="a_proc~~set3~~CalledByGraph_node16"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-66 367.5,-66 367.5,-42 499.5,-42 499.5,-66"/>
-<text text-anchor="middle" x="433.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
-</a>
+<title>program~nearest_point_1d&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M457.92,-16.54C469.88,-19.69 481.8,-24.79 491,-33 553.86,-89.12 571.19,-195.45 575.85,-241.64"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="572.38,-242.13 576.76,-251.78 579.35,-241.51 572.38,-242.13"/>
 </g>
-</g>
-<!-- program~example_put_to_nurbs&#45;&gt;none~set -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="proc~~set3~~CalledByGraph_edge15" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.72,-61.4C508.57,-64.57 516.99,-68.95 524,-75 588.41,-130.59 607.88,-237.64 613.43,-283.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="609.97,-284.43 614.54,-293.99 616.93,-283.67 609.97,-284.43"/>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M285.17,-470C301.32,-470 318.36,-470 334.36,-470"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="334.71,-473.5 344.71,-470 334.71,-466.5 334.71,-473.5"/>
 </g>
-<!-- program~nearest_point_3d -->
+<!-- program~shape_c_1d -->
 <g id="proc~~set3~~CalledByGraph_node17" class="node">
-<title>program~nearest_point_3d</title>
-<g id="a_proc~~set3~~CalledByGraph_node17"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-24 382,-24 382,0 485,0 485,-24"/>
-<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
+<title>program~shape_c_1d</title>
+<g id="a_proc~~set3~~CalledByGraph_node17"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-192 172,-192 172,-168 248,-168 248,-192"/>
+<text text-anchor="middle" x="210" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;none~set -->
-<g id="proc~~set3~~CalledByGraph_edge16" class="edge">
-<title>program~nearest_point_3d&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M485.2,-14.84C499.17,-17.86 513.38,-23.33 524,-33 598.53,-100.9 612.42,-231.28 614.96,-283.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="611.47,-283.86 615.35,-293.71 618.46,-283.58 611.47,-283.86"/>
-</g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~set3~~CalledByGraph_edge17" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.01,-554C323.61,-554 341,-554 357.35,-554"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="357.38,-557.5 367.38,-554 357.38,-550.5 357.38,-557.5"/>
-</g>
-<!-- program~shape_c_3d -->
-<g id="proc~~set3~~CalledByGraph_node19" class="node">
-<title>program~shape_c_3d</title>
-<g id="a_proc~~set3~~CalledByGraph_node19"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-276 186,-276 186,-252 262,-252 262,-276"/>
-<text text-anchor="middle" x="224" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_c_3d&#45;&gt;proc~set_c -->
-<g id="proc~~set3~~CalledByGraph_edge21" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~set_c</title>
-<path fill="none" stroke="#00ff66" d="M262.1,-264C289.25,-264 326.96,-264 360,-264"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="360.09,-267.5 370.09,-264 360.09,-260.5 360.09,-267.5"/>
-</g>
-<!-- program~shape_half_ring_3d -->
-<g id="proc~~set3~~CalledByGraph_node20" class="node">
-<title>program~shape_half_ring_3d</title>
-<g id="a_proc~~set3~~CalledByGraph_node20"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-234 166.5,-234 166.5,-210 281.5,-210 281.5,-234"/>
-<text text-anchor="middle" x="224" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
-</a>
-</g>
+<!-- program~shape_c_1d&#45;&gt;proc~set_c -->
+<g id="proc~~set3~~CalledByGraph_edge19" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~set_c</title>
+<path fill="none" stroke="#00ffc4" d="M248.41,-180C273.62,-180 307.6,-180 337.47,-180"/>
+<polygon fill="#00ffc4" stroke="#00ffc4" points="337.84,-183.5 347.84,-180 337.84,-176.5 337.84,-183.5"/>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~set_half_ring -->
-<g id="proc~~set3~~CalledByGraph_edge22" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~set_half_ring</title>
-<path fill="none" stroke="#00ffcb" d="M281.7,-222C299.97,-222 320.71,-222 340.84,-222"/>
-<polygon fill="#00ffcb" stroke="#00ffcb" points="340.97,-225.5 350.97,-222 340.97,-218.5 340.97,-225.5"/>
-</g>
-<!-- program~shape_hexahedron -->
-<g id="proc~~set3~~CalledByGraph_node21" class="node">
-<title>program~shape_hexahedron</title>
-<g id="a_proc~~set3~~CalledByGraph_node21"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-192 167.5,-192 167.5,-168 280.5,-168 280.5,-192"/>
-<text text-anchor="middle" x="224" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
+<!-- program~shape_circle -->
+<g id="proc~~set3~~CalledByGraph_node18" class="node">
+<title>program~shape_circle</title>
+<g id="a_proc~~set3~~CalledByGraph_node18"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249.5,-150 170.5,-150 170.5,-126 249.5,-126 249.5,-150"/>
+<text text-anchor="middle" x="210" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~set_hexahedron -->
-<g id="proc~~set3~~CalledByGraph_edge23" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~set_hexahedron</title>
-<path fill="none" stroke="#00cbff" d="M280.61,-180C296.56,-180 314.47,-180 332.24,-180"/>
-<polygon fill="#00cbff" stroke="#00cbff" points="332.67,-183.5 342.67,-180 332.67,-176.5 332.67,-183.5"/>
+<!-- program~shape_circle&#45;&gt;proc~set_circle -->
+<g id="proc~~set3~~CalledByGraph_edge20" class="edge">
+<title>program~shape_circle&#45;&gt;proc~set_circle</title>
+<path fill="none" stroke="#00c4ff" d="M249.79,-138C271.95,-138 300.54,-138 327.13,-138"/>
+<polygon fill="#00c4ff" stroke="#00c4ff" points="327.21,-141.5 337.21,-138 327.21,-134.5 327.21,-141.5"/>
 </g>
-<!-- program~shape_ring_3d -->
-<g id="proc~~set3~~CalledByGraph_node22" class="node">
-<title>program~shape_ring_3d</title>
-<g id="a_proc~~set3~~CalledByGraph_node22"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-150 179,-150 179,-126 269,-126 269,-150"/>
-<text text-anchor="middle" x="224" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+<!-- program~shape_half_circle -->
+<g id="proc~~set3~~CalledByGraph_node19" class="node">
+<title>program~shape_half_circle</title>
+<g id="a_proc~~set3~~CalledByGraph_node19"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-108 158,-108 158,-84 262,-84 262,-108"/>
+<text text-anchor="middle" x="210" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~set_ring -->
-<g id="proc~~set3~~CalledByGraph_edge24" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~set_ring</title>
-<path fill="none" stroke="#0066ff" d="M269.01,-138C293.59,-138 324.96,-138 353.63,-138"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="353.65,-141.5 363.65,-138 353.65,-134.5 353.65,-141.5"/>
+<!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
+<g id="proc~~set3~~CalledByGraph_edge21" class="edge">
+<title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
+<path fill="none" stroke="#004eff" d="M262.22,-96C278.08,-96 296.06,-96 313.78,-96"/>
+<polygon fill="#004eff" stroke="#004eff" points="314.17,-99.5 324.17,-96 314.17,-92.5 314.17,-99.5"/>
 </g>
 </g>
 </svg>
@@ -884,7 +824,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set3~2.html b/proc/set3~2.html
index 5dc195c81..a2f30cb95 100644
--- a/proc/set3~2.html
+++ b/proc/set3~2.html
@@ -78,20 +78,20 @@ <h1>set3
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.4% of total for procedures.">26 statements</a>
+                 title=" 0.4% of total for procedures.">30 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">set3</li>
           </ol>
         </nav>
@@ -141,10 +141,10 @@ <h2>private pure subroutine set3(this, nc, Xc, Wc)
 </h2>
     
 
-    <p>Set Bezier or Rational Bezier surface using control points and weights.</p>
+    <p>Set Bezier or Rational Bezier volume using control points and weights.</p>
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,8 +159,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~71"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~64"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -174,7 +174,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~29"></span>
+              <span class="anchor" id="variable-nc~22"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -189,7 +189,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~30"></span>
+              <span class="anchor" id="variable-xc~26"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -241,14 +241,14 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~set3~2~~CallsGraph_node1" class="node">
 <title>proc~set3~2</title>
 <polygon fill="none" stroke="black" points="120,-45 0,-45 0,-21 120,-21 120,-45"/>
-<text text-anchor="middle" x="60" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set3</text>
+<text text-anchor="middle" x="60" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set3</text>
 </g>
 <!-- proc~cmp_degree~2 -->
 <g id="proc~~set3~2~~CallsGraph_node2" class="node">
 <title>proc~cmp_degree~2</title>
-<g id="a_proc~~set3~2~~CallsGraph_node2"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<g id="a_proc~~set3~2~~CallsGraph_node2"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="319,-45 156,-45 156,-21 319,-21 319,-45"/>
-<text text-anchor="middle" x="237.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
+<text text-anchor="middle" x="237.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
@@ -261,9 +261,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_multiplicity~2 -->
 <g id="proc~~set3~2~~CallsGraph_node3" class="node">
 <title>proc~get_multiplicity~2</title>
-<g id="a_proc~~set3~2~~CallsGraph_node3"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<g id="a_proc~~set3~2~~CallsGraph_node3"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="533,-45 355,-45 355,-21 533,-21 533,-45"/>
-<text text-anchor="middle" x="444" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
+<text text-anchor="middle" x="444" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
@@ -416,418 +416,355 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set3~2~~CalledByGraph Pages: 1 -->
-<svg id="procset32CalledByGraph" width="641pt" height="454pt"
- viewBox="0.00 0.00 641.00 454.44" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set3~2~~CalledByGraph" class="graph" transform="scale(1.25 1.25) rotate(0) translate(4 566)">
+<svg id="procset32CalledByGraph" width="641pt" height="488pt"
+ viewBox="0.00 0.00 641.00 488.05" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set3~2~~CalledByGraph" class="graph" transform="scale(1.31 1.31) rotate(0) translate(4 633.29)">
 <title>proc~~set3~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-566 800,-566 800,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-633.29 833,-633.29 833,4 -4,4"/>
 <!-- proc~set3~2 -->
 <g id="proc~~set3~2~~CalledByGraph_node1" class="node">
 <title>proc~set3~2</title>
-<polygon fill="none" stroke="black" points="796,-297 676,-297 676,-273 796,-273 796,-297"/>
-<text text-anchor="middle" x="736" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set3</text>
+<polygon fill="none" stroke="black" points="829,-318 709,-318 709,-294 829,-294 829,-318"/>
+<text text-anchor="middle" x="769" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set3</text>
 </g>
 <!-- none~set~2 -->
 <g id="proc~~set3~2~~CalledByGraph_node2" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="640,-297 527,-297 527,-273 640,-273 640,-297"/>
-<text text-anchor="middle" x="583.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<g id="a_proc~~set3~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="673,-318 560,-318 560,-294 673,-294 673,-318"/>
+<text text-anchor="middle" x="616.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set3~2 -->
 <g id="proc~~set3~2~~CalledByGraph_edge1" class="edge">
 <title>none~set~2&#45;&gt;proc~set3~2</title>
-<path fill="none" stroke="#ff0000" d="M640.11,-285C648.48,-285 657.19,-285 665.8,-285"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="665.83,-288.5 675.83,-285 665.83,-281.5 665.83,-288.5"/>
+<path fill="none" stroke="#ff0000" d="M673.11,-306C681.48,-306 690.19,-306 698.8,-306"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="698.83,-309.5 708.83,-306 698.83,-302.5 698.83,-309.5"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~set3~2~~CalledByGraph_node3" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="467,-562 335,-562 335,-538 467,-538 467,-562"/>
-<text text-anchor="middle" x="401" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~set3~2~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-566 367.5,-566 367.5,-542 499.5,-542 499.5,-566"/>
+<text text-anchor="middle" x="433.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~set~2 -->
 <g id="proc~~set3~2~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M467.04,-538.75C475.81,-535.12 484.14,-530.33 491,-524 555.57,-464.48 574.98,-354.4 580.47,-307.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="583.96,-307.57 581.54,-297.26 577,-306.83 583.96,-307.57"/>
+<path fill="none" stroke="#ff0000" d="M499.76,-542.65C508.6,-539.03 517.01,-534.27 524,-528 584.64,-473.59 606.02,-372.87 612.74,-328.26"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="616.23,-328.58 614.15,-318.19 609.3,-327.61 616.23,-328.58"/>
 </g>
 <!-- proc~elevate_degree~2 -->
 <g id="proc~~set3~2~~CalledByGraph_node4" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="491,-360 311,-360 311,-336 491,-336 491,-360"/>
-<text text-anchor="middle" x="401" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<g id="a_proc~~set3~2~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-486 343.5,-486 343.5,-462 523.5,-462 523.5,-486"/>
+<text text-anchor="middle" x="433.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;none~set~2 -->
 <g id="proc~~set3~2~~CalledByGraph_edge3" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M460.4,-335.97C470.7,-333.36 481.24,-330.35 491,-327 511.36,-320 533.32,-310.01 550.61,-301.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="552.31,-304.6 559.7,-297.01 549.19,-298.33 552.31,-304.6"/>
+<path fill="none" stroke="#ff0000" d="M507.95,-461.94C513.63,-459.48 519.07,-456.54 524,-453 568.52,-421.06 596.03,-360.08 608.18,-327.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="611.5,-328.73 611.59,-318.14 604.91,-326.36 611.5,-328.73"/>
 </g>
 <!-- proc~insert_knots~2 -->
 <g id="proc~~set3~2~~CalledByGraph_node5" class="node">
 <title>proc~insert_knots~2</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-482 320.5,-482 320.5,-458 481.5,-458 481.5,-482"/>
-<text text-anchor="middle" x="401" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+<g id="a_proc~~set3~2~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514,-444 353,-444 353,-420 514,-420 514,-444"/>
+<text text-anchor="middle" x="433.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;none~set~2 -->
 <g id="proc~~set3~2~~CalledByGraph_edge4" class="edge">
 <title>proc~insert_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M475.67,-457.96C481.12,-455.5 486.31,-452.54 491,-449 539.34,-412.5 565.71,-342.6 576.53,-307.01"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="579.97,-307.72 579.4,-297.14 573.25,-305.76 579.97,-307.72"/>
+<path fill="none" stroke="#ff0000" d="M505.06,-419.93C511.69,-417.49 518.12,-414.54 524,-411 558.92,-389.96 587.54,-351.08 603,-327"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="606.13,-328.6 608.45,-318.26 600.19,-324.89 606.13,-328.6"/>
 </g>
 <!-- proc~modify_wc~2 -->
 <g id="proc~~set3~2~~CalledByGraph_node6" class="node">
 <title>proc~modify_wc~2</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="479,-318 323,-318 323,-294 479,-294 479,-318"/>
-<text text-anchor="middle" x="401" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+<g id="a_proc~~set3~2~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-360 355.5,-360 355.5,-336 511.5,-336 511.5,-360"/>
+<text text-anchor="middle" x="433.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~set~2 -->
 <g id="proc~~set3~2~~CalledByGraph_edge5" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M479.07,-297.03C491.65,-295.57 504.57,-294.07 516.84,-292.64"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="517.44,-296.09 526.97,-291.46 516.63,-289.14 517.44,-296.09"/>
+<path fill="none" stroke="#ff0000" d="M486.37,-335.96C507.38,-331.09 531.82,-325.42 553.75,-320.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="554.68,-323.71 563.63,-318.04 553.09,-316.89 554.68,-323.71"/>
 </g>
 <!-- proc~modify_xc~2 -->
 <g id="proc~~set3~2~~CalledByGraph_node7" class="node">
 <title>proc~modify_xc~2</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-276 324.5,-276 324.5,-252 477.5,-252 477.5,-276"/>
-<text text-anchor="middle" x="401" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+<g id="a_proc~~set3~2~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="510,-318 357,-318 357,-294 510,-294 510,-318"/>
+<text text-anchor="middle" x="433.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~set~2 -->
 <g id="proc~~set3~2~~CalledByGraph_edge6" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M477.5,-272.78C490.54,-274.3 503.99,-275.87 516.74,-277.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="516.46,-280.84 526.8,-278.52 517.27,-273.89 516.46,-280.84"/>
+<path fill="none" stroke="#ff0000" d="M510.21,-306C523.36,-306 536.93,-306 549.79,-306"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="549.92,-309.5 559.92,-306 549.92,-302.5 549.92,-309.5"/>
 </g>
 <!-- proc~remove_knots~2 -->
 <g id="proc~~set3~2~~CalledByGraph_node8" class="node">
 <title>proc~remove_knots~2</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="487,-440 315,-440 315,-416 487,-416 487,-440"/>
-<text text-anchor="middle" x="401" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
+<g id="a_proc~~set3~2~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-402 347.5,-402 347.5,-378 519.5,-378 519.5,-402"/>
+<text text-anchor="middle" x="433.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;none~set~2 -->
 <g id="proc~~set3~2~~CalledByGraph_edge7" class="edge">
 <title>proc~remove_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M462.24,-415.98C472.34,-412.44 482.34,-407.87 491,-402 527.88,-377 556.66,-332.45 571.47,-306.13"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="574.56,-307.78 576.29,-297.32 568.42,-304.42 574.56,-307.78"/>
+<path fill="none" stroke="#ff0000" d="M499.01,-377.92C507.58,-375.44 516.12,-372.49 524,-369 549.77,-357.6 575.92,-338.69 593.63,-324.56"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="596.07,-327.09 601.61,-318.06 591.65,-321.66 596.07,-327.09"/>
 </g>
 <!-- proc~set_c~2 -->
 <g id="proc~~set3~2~~CalledByGraph_node9" class="node">
 <title>proc~set_c~2</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node9"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_surface%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="464,-108 338,-108 338,-84 464,-84 464,-108"/>
-<text text-anchor="middle" x="401" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
+<g id="a_proc~~set3~2~~CalledByGraph_node9"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_volume%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-276 370.5,-276 370.5,-252 496.5,-252 496.5,-276"/>
+<text text-anchor="middle" x="433.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c~2&#45;&gt;none~set~2 -->
 <g id="proc~~set3~2~~CalledByGraph_edge8" class="edge">
 <title>proc~set_c~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M464.39,-103.61C473.92,-106.72 483.18,-111.03 491,-117 540.26,-154.6 566.32,-226.63 576.83,-262.93"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="573.46,-263.87 579.5,-272.57 580.2,-262 573.46,-263.87"/>
+<path fill="none" stroke="#ff0000" d="M486.37,-276.04C507.38,-280.91 531.82,-286.58 553.75,-291.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="553.09,-295.11 563.63,-293.96 554.68,-288.29 553.09,-295.11"/>
 </g>
-<!-- proc~set_half_ring~2 -->
+<!-- proc~set_half_ring -->
 <g id="proc~~set3~2~~CalledByGraph_node10" class="node">
-<title>proc~set_half_ring~2</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node10"><a xlink:href="../proc/set_half_ring~2.html" xlink:title="nurbs_surface%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="483.5,-150 318.5,-150 318.5,-126 483.5,-126 483.5,-150"/>
-<text text-anchor="middle" x="401" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
+<title>proc~set_half_ring</title>
+<g id="a_proc~~set3~2~~CalledByGraph_node10"><a xlink:href="../proc/set_half_ring.html" xlink:title="nurbs_volume%set_half_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="516,-234 351,-234 351,-210 516,-210 516,-234"/>
+<text text-anchor="middle" x="433.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_half_ring&#45;&gt;none~set~2 -->
 <g id="proc~~set3~2~~CalledByGraph_edge9" class="edge">
-<title>proc~set_half_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M473.87,-150.11C479.91,-152.55 485.71,-155.48 491,-159 530.66,-185.4 559.08,-235.16 572.94,-263.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="569.8,-265.16 577.22,-272.71 576.13,-262.17 569.8,-265.16"/>
+<title>proc~set_half_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M499.01,-234.08C507.58,-236.56 516.12,-239.51 524,-243 549.77,-254.4 575.92,-273.31 593.63,-287.44"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="591.65,-290.34 601.61,-293.94 596.07,-284.91 591.65,-290.34"/>
 </g>
-<!-- proc~set_ring~2 -->
+<!-- proc~set_hexahedron -->
 <g id="proc~~set3~2~~CalledByGraph_node11" class="node">
-<title>proc~set_ring~2</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node11"><a xlink:href="../proc/set_ring~2.html" xlink:title="nurbs_surface%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="470.5,-192 331.5,-192 331.5,-168 470.5,-168 470.5,-192"/>
-<text text-anchor="middle" x="401" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
+<title>proc~set_hexahedron</title>
+<g id="a_proc~~set3~2~~CalledByGraph_node11"><a xlink:href="../proc/set_hexahedron.html" xlink:title="nurbs_volume%set_hexahedron">
+<polygon fill="#d9534f" stroke="#d9534f" points="524,-192 343,-192 343,-168 524,-168 524,-192"/>
+<text text-anchor="middle" x="433.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_hexahedron&#45;&gt;none~set~2 -->
 <g id="proc~~set3~2~~CalledByGraph_edge10" class="edge">
-<title>proc~set_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M469.92,-192.15C477.23,-194.59 484.41,-197.51 491,-201 521.51,-217.17 549.65,-245.97 566.45,-265.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="563.79,-267.55 572.93,-272.91 569.12,-263.02 563.79,-267.55"/>
+<title>proc~set_hexahedron&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M505.06,-192.07C511.69,-194.51 518.12,-197.46 524,-201 558.92,-222.04 587.54,-260.92 603,-285"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="600.19,-287.11 608.45,-293.74 606.13,-283.4 600.19,-287.11"/>
 </g>
-<!-- proc~set_tetragon -->
+<!-- proc~set_ring -->
 <g id="proc~~set3~2~~CalledByGraph_node12" class="node">
-<title>proc~set_tetragon</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node12"><a xlink:href="../proc/set_tetragon.html" xlink:title="nurbs_surface%set_tetragon">
-<polygon fill="#d9534f" stroke="#d9534f" points="483,-234 319,-234 319,-210 483,-210 483,-234"/>
-<text text-anchor="middle" x="401" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
+<title>proc~set_ring</title>
+<g id="a_proc~~set3~2~~CalledByGraph_node12"><a xlink:href="../proc/set_ring.html" xlink:title="nurbs_volume%set_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="503,-150 364,-150 364,-126 503,-126 503,-150"/>
+<text text-anchor="middle" x="433.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
+<!-- proc~set_ring&#45;&gt;none~set~2 -->
 <g id="proc~~set3~2~~CalledByGraph_edge11" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M460.4,-234.03C470.7,-236.64 481.24,-239.65 491,-243 511.36,-250 533.32,-259.99 550.61,-268.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="549.19,-271.67 559.7,-272.99 552.31,-265.4 549.19,-271.67"/>
+<title>proc~set_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M503.41,-148.22C510.74,-151.01 517.78,-154.53 524,-159 568.52,-190.94 596.03,-251.92 608.18,-284.39"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="604.91,-285.64 611.59,-293.86 611.5,-283.27 604.91,-285.64"/>
 </g>
-<!-- program~compute_area -->
+<!-- program~compute_volume -->
 <g id="proc~~set3~2~~CalledByGraph_node13" class="node">
-<title>program~compute_area</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node13"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-542 0,-542 0,-518 89,-518 89,-542"/>
-<text text-anchor="middle" x="44.5" y="-527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<title>program~compute_volume</title>
+<g id="a_proc~~set3~2~~CalledByGraph_node13"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-586 0,-586 0,-562 105,-562 105,-586"/>
+<text text-anchor="middle" x="52.5" y="-571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;none~set~2 -->
+<!-- program~compute_volume&#45;&gt;none~set~2 -->
 <g id="proc~~set3~2~~CalledByGraph_edge12" class="edge">
-<title>program~compute_area&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M89.19,-528.67C195.01,-525.11 458.77,-514.01 491,-491 552.97,-446.76 573.59,-350.77 579.93,-307.25"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="583.42,-307.52 581.27,-297.15 576.48,-306.6 583.42,-307.52"/>
+<title>program~compute_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M86.78,-586.01C169.65,-613.64 388.35,-672.14 524,-575 605.44,-516.68 615.25,-381.64 615.83,-328.27"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="619.33,-328.19 615.83,-318.18 612.33,-328.18 619.33,-328.19"/>
 </g>
-<!-- proc~cmp_area -->
-<g id="proc~~set3~2~~CalledByGraph_node17" class="node">
-<title>proc~cmp_area</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node17"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="275,-562 125,-562 125,-538 275,-538 275,-562"/>
-<text text-anchor="middle" x="200" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<!-- proc~cmp_volume -->
+<g id="proc~~set3~2~~CalledByGraph_node18" class="node">
+<title>proc~cmp_volume</title>
+<g id="a_proc~~set3~2~~CalledByGraph_node18"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-566 141,-566 141,-542 307,-542 307,-566"/>
+<text text-anchor="middle" x="224" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;proc~cmp_area -->
-<g id="proc~~set3~2~~CalledByGraph_edge31" class="edge">
-<title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M89.08,-535.68C97.19,-536.73 105.92,-537.87 114.78,-539.03"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="114.45,-542.51 124.81,-540.33 115.35,-535.57 114.45,-542.51"/>
+<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
+<g id="proc~~set3~2~~CalledByGraph_edge25" class="edge">
+<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
+<path fill="none" stroke="#ff0000" d="M105.28,-567.89C113.48,-566.92 122.18,-565.9 130.98,-564.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="131.41,-568.33 140.93,-563.68 130.59,-561.38 131.41,-568.33"/>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~set3~2~~CalledByGraph_node14" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node14"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="255,-420 145,-420 145,-396 255,-396 255,-420"/>
-<text text-anchor="middle" x="200" y="-405.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<title>program~example3_volume</title>
+<g id="a_proc~~set3~2~~CalledByGraph_node14"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-465 169,-465 169,-441 279,-441 279,-465"/>
+<text text-anchor="middle" x="224" y="-450.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;none~set~2 -->
+<!-- program~example3_volume&#45;&gt;none~set~2 -->
 <g id="proc~~set3~2~~CalledByGraph_edge13" class="edge">
-<title>program~example3_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M255.17,-404.6C327.24,-399.42 450.29,-388.08 491,-369 522.44,-354.27 550.52,-324.84 567.04,-305.03"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="569.81,-307.17 573.38,-297.2 564.37,-302.77 569.81,-307.17"/>
-</g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
-<g id="proc~~set3~2~~CalledByGraph_edge17" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
-<path fill="none" stroke="#ff6d00" d="M239.39,-395.97C260.5,-389.4 287.17,-381.16 311,-374 323.16,-370.34 336.28,-366.47 348.62,-362.86"/>
-<polygon fill="#ff6d00" stroke="#ff6d00" points="349.69,-366.2 358.3,-360.04 347.72,-359.48 349.69,-366.2"/>
+<title>program~example3_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M246.93,-465.12C299.32,-492.29 434.06,-551.38 524,-495 583.54,-457.67 605.3,-369.39 612.41,-328.06"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="615.87,-328.6 613.98,-318.18 608.95,-327.5 615.87,-328.6"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
 <g id="proc~~set3~2~~CalledByGraph_edge18" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
-<path fill="none" stroke="#ffda00" d="M230.54,-420.16C252.49,-428.91 283.3,-440.61 311,-449 318.48,-451.27 326.37,-453.44 334.24,-455.47"/>
-<polygon fill="#ffda00" stroke="#ffda00" points="333.62,-458.92 344.17,-457.96 335.32,-452.13 333.62,-458.92"/>
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
+<path fill="none" stroke="#ff6600" d="M279.25,-458.49C295.84,-460.17 314.64,-462.07 333.24,-463.95"/>
+<polygon fill="#ff6600" stroke="#ff6600" points="332.94,-467.44 343.24,-464.97 333.64,-460.48 332.94,-467.44"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
+<g id="proc~~set3~2~~CalledByGraph_edge19" class="edge">
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
+<path fill="none" stroke="#ffcc00" d="M279.25,-447.51C298.63,-445.55 321.03,-443.28 342.61,-441.1"/>
+<polygon fill="#ffcc00" stroke="#ffcc00" points="343.19,-444.56 352.79,-440.07 342.49,-437.59 343.19,-444.56"/>
+</g>
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
 <g id="proc~~set3~2~~CalledByGraph_edge20" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
-<path fill="none" stroke="#00ff24" d="M255.11,-413.44C270.51,-414.99 287.75,-416.72 304.82,-418.43"/>
-<polygon fill="#00ff24" stroke="#00ff24" points="304.53,-421.92 314.83,-419.44 305.23,-414.96 304.53,-421.92"/>
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
+<path fill="none" stroke="#00ff00" d="M255.75,-440.99C279.38,-432.02 312.96,-419.84 343,-411 350.73,-408.73 358.89,-406.53 367.01,-404.47"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="368,-407.84 376.87,-402.04 366.32,-401.04 368,-407.84"/>
 </g>
-<!-- program~example_nurbs_surface -->
+<!-- program~example_nurbs_volume -->
 <g id="proc~~set3~2~~CalledByGraph_node15" class="node">
-<title>program~example_nurbs_surface</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node15"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 331.5,-66 331.5,-42 470.5,-42 470.5,-66"/>
-<text text-anchor="middle" x="401" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<title>program~example_nurbs_volume</title>
+<g id="a_proc~~set3~2~~CalledByGraph_node15"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-108 364,-108 364,-84 503,-84 503,-108"/>
+<text text-anchor="middle" x="433.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;none~set~2 -->
+<!-- program~example_nurbs_volume&#45;&gt;none~set~2 -->
 <g id="proc~~set3~2~~CalledByGraph_edge14" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M470.75,-63.21C478.08,-66.17 485.03,-70.01 491,-75 550.25,-124.48 572.25,-219.65 579.43,-262.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="575.99,-263.45 580.98,-272.8 582.91,-262.38 575.99,-263.45"/>
+<title>program~example_nurbs_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M503.44,-105.4C510.85,-108.33 517.9,-112.11 524,-117 578.22,-160.42 602.42,-243.9 611.25,-283.76"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="607.82,-284.49 613.3,-293.56 614.67,-283.05 607.82,-284.49"/>
 </g>
-<!-- program~nearest_point_2d -->
+<!-- program~example_put_to_nurbs -->
 <g id="proc~~set3~2~~CalledByGraph_node16" class="node">
-<title>program~nearest_point_2d</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node16"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452.5,-24 349.5,-24 349.5,0 452.5,0 452.5,-24"/>
-<text text-anchor="middle" x="401" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<title>program~example_put_to_nurbs</title>
+<g id="a_proc~~set3~2~~CalledByGraph_node16"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-66 367.5,-66 367.5,-42 499.5,-42 499.5,-66"/>
+<text text-anchor="middle" x="433.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;none~set~2 -->
+<!-- program~example_put_to_nurbs&#45;&gt;none~set~2 -->
 <g id="proc~~set3~2~~CalledByGraph_edge15" class="edge">
-<title>program~nearest_point_2d&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M452.73,-15.16C466.47,-18.21 480.44,-23.61 491,-33 560.36,-94.71 577.18,-213.24 581.23,-262.59"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="577.76,-263.07 581.96,-272.8 584.74,-262.57 577.76,-263.07"/>
-</g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~set3~2~~CalledByGraph_edge16" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ff0000" d="M275.1,-550C291.15,-550 308.13,-550 324.24,-550"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="324.68,-553.5 334.68,-550 324.68,-546.5 324.68,-553.5"/>
+<title>program~example_put_to_nurbs&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M499.72,-61.4C508.57,-64.57 516.99,-68.95 524,-75 588.41,-130.59 607.88,-237.64 613.43,-283.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="609.97,-284.43 614.54,-293.99 616.93,-283.67 609.97,-284.43"/>
 </g>
-<!-- program~example_ppm1 -->
-<g id="proc~~set3~2~~CalledByGraph_node18" class="node">
-<title>program~example_ppm1</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node18"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-192 153,-192 153,-168 247,-168 247,-192"/>
-<text text-anchor="middle" x="200" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+<!-- program~nearest_point_3d -->
+<g id="proc~~set3~2~~CalledByGraph_node17" class="node">
+<title>program~nearest_point_3d</title>
+<g id="a_proc~~set3~2~~CalledByGraph_node17"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-24 382,-24 382,0 485,0 485,-24"/>
+<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~set_ring~2 -->
-<g id="proc~~set3~2~~CalledByGraph_edge24" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#0091ff" d="M247.15,-180C269.15,-180 296.09,-180 321.19,-180"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="321.45,-183.5 331.45,-180 321.45,-176.5 321.45,-183.5"/>
+<!-- program~nearest_point_3d&#45;&gt;none~set~2 -->
+<g id="proc~~set3~2~~CalledByGraph_edge16" class="edge">
+<title>program~nearest_point_3d&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M485.2,-14.84C499.17,-17.86 513.38,-23.33 524,-33 598.53,-100.9 612.42,-231.28 614.96,-283.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="611.47,-283.86 615.35,-293.71 618.46,-283.58 611.47,-283.86"/>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set3~2~~CalledByGraph_edge26" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.15,-189.74C272.73,-195.14 304.98,-201.95 333.26,-207.91"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="332.57,-211.34 343.07,-209.99 334.01,-204.5 332.57,-211.34"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~set3~2~~CalledByGraph_edge17" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ff0000" d="M307.01,-554C323.61,-554 341,-554 357.35,-554"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="357.38,-557.5 367.38,-554 357.38,-550.5 357.38,-557.5"/>
 </g>
-<!-- program~example_ppm2 -->
+<!-- program~shape_c_3d -->
 <g id="proc~~set3~2~~CalledByGraph_node19" class="node">
-<title>program~example_ppm2</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node19"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-150 153,-150 153,-126 247,-126 247,-150"/>
-<text text-anchor="middle" x="200" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+<title>program~shape_c_3d</title>
+<g id="a_proc~~set3~2~~CalledByGraph_node19"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-276 186,-276 186,-252 262,-252 262,-276"/>
+<text text-anchor="middle" x="224" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~set_half_ring~2 -->
-<g id="proc~~set3~2~~CalledByGraph_edge22" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#00ffff" d="M247.15,-138C265.39,-138 287.03,-138 308.19,-138"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="308.2,-141.5 318.2,-138 308.2,-134.5 308.2,-141.5"/>
-</g>
-<!-- program~example_ppm2&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set3~2~~CalledByGraph_edge27" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.02,-146.55C256.72,-149.56 266.56,-153.6 275,-159 295.71,-172.25 290,-188.21 311,-201 314.01,-202.83 317.16,-204.5 320.41,-206.03"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="319.22,-209.32 329.8,-209.95 321.92,-202.87 319.22,-209.32"/>
+<!-- program~shape_c_3d&#45;&gt;proc~set_c~2 -->
+<g id="proc~~set3~2~~CalledByGraph_edge21" class="edge">
+<title>program~shape_c_3d&#45;&gt;proc~set_c~2</title>
+<path fill="none" stroke="#00ff66" d="M262.1,-264C289.25,-264 326.96,-264 360,-264"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="360.09,-267.5 370.09,-264 360.09,-260.5 360.09,-267.5"/>
 </g>
-<!-- program~example_ppm3 -->
+<!-- program~shape_half_ring_3d -->
 <g id="proc~~set3~2~~CalledByGraph_node20" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node20"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-318 153,-318 153,-294 247,-294 247,-318"/>
-<text text-anchor="middle" x="200" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+<title>program~shape_half_ring_3d</title>
+<g id="a_proc~~set3~2~~CalledByGraph_node20"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-234 166.5,-234 166.5,-210 281.5,-210 281.5,-234"/>
+<text text-anchor="middle" x="224" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
-<g id="proc~~set3~2~~CalledByGraph_edge19" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#48ff00" d="M247.15,-296.26C272.73,-290.86 304.98,-284.05 333.26,-278.09"/>
-<polygon fill="#48ff00" stroke="#48ff00" points="334.01,-281.5 343.07,-276.01 332.57,-274.66 334.01,-281.5"/>
-</g>
-<!-- program~example_ppm3&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set3~2~~CalledByGraph_edge28" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.02,-297.45C256.72,-294.44 266.56,-290.4 275,-285 295.71,-271.75 290,-255.79 311,-243 314.01,-241.17 317.16,-239.5 320.41,-237.97"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="321.92,-241.13 329.8,-234.05 319.22,-234.68 321.92,-241.13"/>
+<!-- program~shape_half_ring_3d&#45;&gt;proc~set_half_ring -->
+<g id="proc~~set3~2~~CalledByGraph_edge22" class="edge">
+<title>program~shape_half_ring_3d&#45;&gt;proc~set_half_ring</title>
+<path fill="none" stroke="#00ffcb" d="M281.7,-222C299.97,-222 320.71,-222 340.84,-222"/>
+<polygon fill="#00ffcb" stroke="#00ffcb" points="340.97,-225.5 350.97,-222 340.97,-218.5 340.97,-225.5"/>
 </g>
-<!-- program~nearest_point_2d_bench -->
+<!-- program~shape_hexahedron -->
 <g id="proc~~set3~2~~CalledByGraph_node21" class="node">
-<title>program~nearest_point_2d_bench</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node21"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-234 129,-234 129,-210 271,-210 271,-234"/>
-<text text-anchor="middle" x="200" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+<title>program~shape_hexahedron</title>
+<g id="a_proc~~set3~2~~CalledByGraph_node21"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-192 167.5,-192 167.5,-168 280.5,-168 280.5,-192"/>
+<text text-anchor="middle" x="224" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set3~2~~CalledByGraph_edge29" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M271.16,-222C283.34,-222 296.17,-222 308.82,-222"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="308.91,-225.5 318.91,-222 308.91,-218.5 308.91,-225.5"/>
-</g>
-<!-- program~shape_c_2d -->
-<g id="proc~~set3~2~~CalledByGraph_node22" class="node">
-<title>program~shape_c_2d</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node22"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="238,-24 162,-24 162,0 238,0 238,-24"/>
-<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_c_2d&#45;&gt;proc~set_c~2 -->
-<g id="proc~~set3~2~~CalledByGraph_edge21" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~set_c~2</title>
-<path fill="none" stroke="#00ff91" d="M238.17,-18.06C250.55,-21.21 263.98,-25.94 275,-33 295.71,-46.25 290,-62.21 311,-75 316.34,-78.25 322.14,-81 328.14,-83.32"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="327.09,-86.66 337.68,-86.63 329.38,-80.05 327.09,-86.66"/>
-</g>
-<!-- program~shape_half_ring_2d -->
-<g id="proc~~set3~2~~CalledByGraph_node23" class="node">
-<title>program~shape_half_ring_2d</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node23"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="257.5,-66 142.5,-66 142.5,-42 257.5,-42 257.5,-66"/>
-<text text-anchor="middle" x="200" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2 -->
+<!-- program~shape_hexahedron&#45;&gt;proc~set_hexahedron -->
 <g id="proc~~set3~2~~CalledByGraph_edge23" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#00ffff" d="M257.09,-66.07C263.38,-68.53 269.49,-71.47 275,-75 295.71,-88.25 290,-104.21 311,-117 314.01,-118.83 317.16,-120.5 320.41,-122.03"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="319.22,-125.32 329.8,-125.95 321.92,-118.87 319.22,-125.32"/>
-</g>
-<!-- program~shape_ring_2d -->
-<g id="proc~~set3~2~~CalledByGraph_node24" class="node">
-<title>program~shape_ring_2d</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node24"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="245,-108 155,-108 155,-84 245,-84 245,-108"/>
-<text text-anchor="middle" x="200" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
-</a>
+<title>program~shape_hexahedron&#45;&gt;proc~set_hexahedron</title>
+<path fill="none" stroke="#00cbff" d="M280.61,-180C296.56,-180 314.47,-180 332.24,-180"/>
+<polygon fill="#00cbff" stroke="#00cbff" points="332.67,-183.5 342.67,-180 332.67,-176.5 332.67,-183.5"/>
 </g>
-</g>
-<!-- program~shape_ring_2d&#45;&gt;proc~set_ring~2 -->
-<g id="proc~~set3~2~~CalledByGraph_edge25" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#0091ff" d="M245.08,-103.96C255.4,-107.03 266,-111.24 275,-117 295.71,-130.25 290,-146.21 311,-159 314.41,-161.08 318.01,-162.95 321.73,-164.64"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="320.6,-167.95 331.18,-168.46 323.22,-161.46 320.6,-167.95"/>
-</g>
-<!-- program~shape_tetragon -->
-<g id="proc~~set3~2~~CalledByGraph_node25" class="node">
-<title>program~shape_tetragon</title>
-<g id="a_proc~~set3~2~~CalledByGraph_node25"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-276 152,-276 152,-252 248,-252 248,-276"/>
-<text text-anchor="middle" x="200" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<!-- program~shape_ring_3d -->
+<g id="proc~~set3~2~~CalledByGraph_node22" class="node">
+<title>program~shape_ring_3d</title>
+<g id="a_proc~~set3~2~~CalledByGraph_node22"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-150 179,-150 179,-126 269,-126 269,-150"/>
+<text text-anchor="middle" x="224" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set3~2~~CalledByGraph_edge30" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M248.16,-254.05C273.44,-248.71 305.03,-242.04 332.84,-236.17"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="333.83,-239.54 342.89,-234.05 332.39,-232.69 333.83,-239.54"/>
+<!-- program~shape_ring_3d&#45;&gt;proc~set_ring -->
+<g id="proc~~set3~2~~CalledByGraph_edge24" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~set_ring</title>
+<path fill="none" stroke="#0066ff" d="M269.01,-138C293.59,-138 324.96,-138 353.63,-138"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="353.65,-141.5 363.65,-138 353.65,-134.5 353.65,-141.5"/>
 </g>
 </g>
 </svg>
@@ -947,7 +884,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set3~3.html b/proc/set3~3.html
index 37f2f4cee..91d6c3016 100644
--- a/proc/set3~3.html
+++ b/proc/set3~3.html
@@ -78,20 +78,20 @@ <h1>set3
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.3% of total for procedures.">22 statements</a>
+                 title=" 0.4% of total for procedures.">26 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">set3</li>
           </ol>
         </nav>
@@ -137,14 +137,14 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine set3(this, Xc, Wc)  
+    <h2>private pure subroutine set3(this, nc, Xc, Wc)  
 </h2>
     
 
-    <p>Set Bezier or Rational Bezier curve using control points and weights.</p>
+    <p>Set Bezier or Rational Bezier surface using control points and weights.</p>
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -159,8 +159,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~135"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~132"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -174,7 +174,22 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~55"></span>
+              <span class="anchor" id="variable-nc~57"></span>
+              integer,
+            </td>
+<td>intent(in),</td>
+              <td></td>            <td>
+              contiguous
+            </td>
+            <td>::</td>
+            <td><strong>nc</strong>(:)</td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-xc~48"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -189,7 +204,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~52"></span>
+              <span class="anchor" id="variable-wc~49"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -217,91 +232,91 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set3~3~~CallsGraph Pages: 1 -->
-<svg id="procset33CallsGraph" width="641pt" height="57pt"
- viewBox="0.00 0.00 641.00 56.54" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set3~3~~CallsGraph" class="graph" transform="scale(1.31 1.31) rotate(0) translate(4 70)">
+<svg id="procset33CallsGraph" width="641pt" height="55pt"
+ viewBox="0.00 0.00 641.00 54.71" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set3~3~~CallsGraph" class="graph" transform="scale(1.35 1.35) rotate(0) translate(4 70)">
 <title>proc~~set3~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 835,-70 835,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 863,-70 863,4 -4,4"/>
 <!-- proc~set3~3 -->
 <g id="proc~~set3~3~~CallsGraph_node1" class="node">
 <title>proc~set3~3</title>
-<polygon fill="none" stroke="black" points="110,-45 0,-45 0,-21 110,-21 110,-45"/>
-<text text-anchor="middle" x="55" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set3</text>
+<polygon fill="none" stroke="black" points="120,-45 0,-45 0,-21 120,-21 120,-45"/>
+<text text-anchor="middle" x="60" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set3</text>
 </g>
 <!-- proc~cmp_degree~3 -->
 <g id="proc~~set3~3~~CallsGraph_node2" class="node">
 <title>proc~cmp_degree~3</title>
-<g id="a_proc~~set3~3~~CallsGraph_node2"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="300,-45 146,-45 146,-21 300,-21 300,-45"/>
-<text text-anchor="middle" x="223" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
+<g id="a_proc~~set3~3~~CallsGraph_node2"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="319,-45 156,-45 156,-21 319,-21 319,-45"/>
+<text text-anchor="middle" x="237.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="proc~~set3~3~~CallsGraph_edge1" class="edge">
 <title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ff0000" d="M110.35,-33C118.51,-33 127.09,-33 135.71,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.83,-36.5 145.83,-33 135.83,-29.5 135.83,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M120.42,-33C128.64,-33 137.23,-33 145.86,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="145.98,-36.5 155.98,-33 145.98,-29.5 145.98,-36.5"/>
 </g>
 <!-- proc~get_multiplicity~3 -->
 <g id="proc~~set3~3~~CallsGraph_node3" class="node">
 <title>proc~get_multiplicity~3</title>
-<g id="a_proc~~set3~3~~CallsGraph_node3"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="505,-45 336,-45 336,-21 505,-21 505,-45"/>
-<text text-anchor="middle" x="420.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
+<g id="a_proc~~set3~3~~CallsGraph_node3"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="533,-45 355,-45 355,-21 533,-21 533,-45"/>
+<text text-anchor="middle" x="444" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="proc~~set3~3~~CallsGraph_edge2" class="edge">
 <title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#ff0000" d="M300.15,-33C308.54,-33 317.17,-33 325.75,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="325.79,-36.5 335.79,-33 325.79,-29.5 325.79,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M319.03,-33C327.47,-33 336.11,-33 344.71,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="344.78,-36.5 354.78,-33 344.78,-29.5 344.78,-36.5"/>
 </g>
 <!-- interface~compute_multiplicity -->
 <g id="proc~~set3~3~~CallsGraph_node4" class="node">
 <title>interface~compute_multiplicity</title>
 <g id="a_proc~~set3~3~~CallsGraph_node4"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="665,-45 541,-45 541,-21 665,-21 665,-45"/>
-<text text-anchor="middle" x="603" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="693,-45 569,-45 569,-21 693,-21 693,-45"/>
+<text text-anchor="middle" x="631" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set3~3~~CallsGraph_edge3" class="edge">
 <title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M505.15,-33C513.73,-33 522.4,-33 530.84,-33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="530.99,-36.5 540.99,-33 530.99,-29.5 530.99,-36.5"/>
+<path fill="none" stroke="#ff0000" d="M533.17,-33C541.77,-33 550.42,-33 558.82,-33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="558.93,-36.5 568.93,-33 558.93,-29.5 558.93,-36.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~set3~3~~CallsGraph_node5" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~set3~3~~CallsGraph_node5"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="831,-66 701,-66 701,-42 831,-42 831,-66"/>
-<text text-anchor="middle" x="766" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="859,-66 729,-66 729,-42 859,-42 859,-66"/>
+<text text-anchor="middle" x="794" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~set3~3~~CallsGraph_edge4" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M665.33,-41C673.69,-42.09 682.35,-43.22 690.92,-44.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="690.53,-47.82 700.9,-45.64 691.44,-40.88 690.53,-47.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M693.33,-41C701.69,-42.09 710.35,-43.22 718.92,-44.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="718.53,-47.82 728.9,-45.64 719.44,-40.88 718.53,-47.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~set3~3~~CallsGraph_node6" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~set3~3~~CallsGraph_node6"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="831,-24 701,-24 701,0 831,0 831,-24"/>
-<text text-anchor="middle" x="766" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="859,-24 729,-24 729,0 859,0 859,-24"/>
+<text text-anchor="middle" x="794" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~set3~3~~CallsGraph_edge5" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M665.33,-25C673.69,-23.91 682.35,-22.78 690.92,-21.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="691.44,-25.12 700.9,-20.36 690.53,-18.18 691.44,-25.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M693.33,-25C701.69,-23.91 710.35,-22.78 718.92,-21.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="719.44,-25.12 728.9,-20.36 718.53,-18.18 719.44,-25.12"/>
 </g>
 </g>
 </svg>
@@ -401,310 +416,418 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set3~3~~CalledByGraph Pages: 1 -->
-<svg id="procset33CalledByGraph" width="641pt" height="448pt"
- viewBox="0.00 0.00 641.00 448.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set3~3~~CalledByGraph" class="graph" transform="scale(1.22 1.22) rotate(0) translate(4 544.5)">
+<svg id="procset33CalledByGraph" width="641pt" height="454pt"
+ viewBox="0.00 0.00 641.00 454.44" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set3~3~~CalledByGraph" class="graph" transform="scale(1.25 1.25) rotate(0) translate(4 566)">
 <title>proc~~set3~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-544.5 780,-544.5 780,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-566 800,-566 800,4 -4,4"/>
 <!-- proc~set3~3 -->
 <g id="proc~~set3~3~~CalledByGraph_node1" class="node">
 <title>proc~set3~3</title>
-<polygon fill="none" stroke="black" points="776,-276 666,-276 666,-252 776,-252 776,-276"/>
-<text text-anchor="middle" x="721" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set3</text>
+<polygon fill="none" stroke="black" points="796,-297 676,-297 676,-273 796,-273 796,-297"/>
+<text text-anchor="middle" x="736" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set3</text>
 </g>
 <!-- none~set~3 -->
 <g id="proc~~set3~3~~CalledByGraph_node2" class="node">
 <title>none~set~3</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="630,-276 527,-276 527,-252 630,-252 630,-276"/>
-<text text-anchor="middle" x="578.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_proc~~set3~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="640,-297 527,-297 527,-273 640,-273 640,-297"/>
+<text text-anchor="middle" x="583.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="proc~~set3~3~~CalledByGraph_edge1" class="edge">
 <title>none~set~3&#45;&gt;proc~set3~3</title>
-<path fill="none" stroke="#ff0000" d="M630.22,-264C638.38,-264 646.92,-264 655.35,-264"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="655.55,-267.5 665.55,-264 655.55,-260.5 655.55,-267.5"/>
+<path fill="none" stroke="#ff0000" d="M640.11,-285C648.48,-285 657.19,-285 665.8,-285"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="665.83,-288.5 675.83,-285 665.83,-281.5 665.83,-288.5"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="proc~~set3~3~~CalledByGraph_node3" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="467,-482 345,-482 345,-458 467,-458 467,-482"/>
-<text text-anchor="middle" x="406" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~set3~3~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="467,-562 335,-562 335,-538 467,-538 467,-562"/>
+<text text-anchor="middle" x="401" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~set~3 -->
 <g id="proc~~set3~3~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M467.12,-458.13C475.76,-454.59 484.06,-449.98 491,-444 540.47,-401.35 563.98,-323.98 572.94,-286.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="576.41,-286.63 575.18,-276.11 569.58,-285.1 576.41,-286.63"/>
+<path fill="none" stroke="#ff0000" d="M467.04,-538.75C475.81,-535.12 484.14,-530.33 491,-524 555.57,-464.48 574.98,-354.4 580.47,-307.31"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="583.96,-307.57 581.54,-297.26 577,-306.83 583.96,-307.57"/>
 </g>
 <!-- proc~elevate_degree~3 -->
 <g id="proc~~set3~3~~CalledByGraph_node4" class="node">
 <title>proc~elevate_degree~3</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="491,-402 321,-402 321,-378 491,-378 491,-402"/>
-<text text-anchor="middle" x="406" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+<g id="a_proc~~set3~3~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="491,-360 311,-360 311,-336 491,-336 491,-360"/>
+<text text-anchor="middle" x="401" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;none~set~3 -->
 <g id="proc~~set3~3~~CalledByGraph_edge3" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M472.9,-377.91C479.26,-375.47 485.41,-372.53 491,-369 524.67,-347.73 551.51,-308.93 565.91,-284.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="568.98,-286.61 570.98,-276.21 562.92,-283.09 568.98,-286.61"/>
+<path fill="none" stroke="#ff0000" d="M460.4,-335.97C470.7,-333.36 481.24,-330.35 491,-327 511.36,-320 533.32,-310.01 550.61,-301.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="552.31,-304.6 559.7,-297.01 549.19,-298.33 552.31,-304.6"/>
 </g>
 <!-- proc~insert_knots~3 -->
 <g id="proc~~set3~3~~CalledByGraph_node5" class="node">
 <title>proc~insert_knots~3</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_curve%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-360 330.5,-360 330.5,-336 481.5,-336 481.5,-360"/>
-<text text-anchor="middle" x="406" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
+<g id="a_proc~~set3~3~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-482 320.5,-482 320.5,-458 481.5,-458 481.5,-482"/>
+<text text-anchor="middle" x="401" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;none~set~3 -->
 <g id="proc~~set3~3~~CalledByGraph_edge4" class="edge">
 <title>proc~insert_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M467.18,-335.97C475.36,-333.47 483.51,-330.5 491,-327 515.36,-315.61 539.83,-296.96 556.5,-282.9"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="559.18,-285.21 564.46,-276.02 554.6,-279.91 559.18,-285.21"/>
+<path fill="none" stroke="#ff0000" d="M475.67,-457.96C481.12,-455.5 486.31,-452.54 491,-449 539.34,-412.5 565.71,-342.6 576.53,-307.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="579.97,-307.72 579.4,-297.14 573.25,-305.76 579.97,-307.72"/>
 </g>
 <!-- proc~modify_wc~3 -->
 <g id="proc~~set3~3~~CalledByGraph_node6" class="node">
 <title>proc~modify_wc~3</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="479,-276 333,-276 333,-252 479,-252 479,-276"/>
-<text text-anchor="middle" x="406" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
+<g id="a_proc~~set3~3~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="479,-318 323,-318 323,-294 479,-294 479,-318"/>
+<text text-anchor="middle" x="401" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
 <g id="proc~~set3~3~~CalledByGraph_edge5" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M479.31,-264C491.66,-264 504.39,-264 516.42,-264"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="516.78,-267.5 526.78,-264 516.78,-260.5 516.78,-267.5"/>
+<path fill="none" stroke="#ff0000" d="M479.07,-297.03C491.65,-295.57 504.57,-294.07 516.84,-292.64"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="517.44,-296.09 526.97,-291.46 516.63,-289.14 517.44,-296.09"/>
 </g>
 <!-- proc~modify_xc~3 -->
 <g id="proc~~set3~3~~CalledByGraph_node7" class="node">
 <title>proc~modify_xc~3</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-234 334.5,-234 334.5,-210 477.5,-210 477.5,-234"/>
-<text text-anchor="middle" x="406" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
+<g id="a_proc~~set3~3~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-276 324.5,-276 324.5,-252 477.5,-252 477.5,-276"/>
+<text text-anchor="middle" x="401" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
 <g id="proc~~set3~3~~CalledByGraph_edge6" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M455.86,-234.04C475.48,-238.87 498.26,-244.48 518.77,-249.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="518.09,-252.97 528.63,-251.96 519.76,-246.17 518.09,-252.97"/>
+<path fill="none" stroke="#ff0000" d="M477.5,-272.78C490.54,-274.3 503.99,-275.87 516.74,-277.35"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="516.46,-280.84 526.8,-278.52 517.27,-273.89 516.46,-280.84"/>
 </g>
 <!-- proc~remove_knots~3 -->
 <g id="proc~~set3~3~~CalledByGraph_node8" class="node">
 <title>proc~remove_knots~3</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_curve%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="487,-318 325,-318 325,-294 487,-294 487,-318"/>
-<text text-anchor="middle" x="406" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
+<g id="a_proc~~set3~3~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="487,-440 315,-440 315,-416 487,-416 487,-440"/>
+<text text-anchor="middle" x="401" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;none~set~3 -->
 <g id="proc~~set3~3~~CalledByGraph_edge7" class="edge">
 <title>proc~remove_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M455.86,-293.96C475.48,-289.13 498.26,-283.52 518.77,-278.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="519.76,-281.83 528.63,-276.04 518.09,-275.03 519.76,-281.83"/>
+<path fill="none" stroke="#ff0000" d="M462.24,-415.98C472.34,-412.44 482.34,-407.87 491,-402 527.88,-377 556.66,-332.45 571.47,-306.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="574.56,-307.78 576.29,-297.32 568.42,-304.42 574.56,-307.78"/>
 </g>
-<!-- proc~set_circle -->
+<!-- proc~set_c~3 -->
 <g id="proc~~set3~3~~CalledByGraph_node9" class="node">
-<title>proc~set_circle</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node9"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="474.5,-192 337.5,-192 337.5,-168 474.5,-168 474.5,-192"/>
-<text text-anchor="middle" x="406" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
+<title>proc~set_c~3</title>
+<g id="a_proc~~set3~3~~CalledByGraph_node9"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_surface%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="464,-108 338,-108 338,-84 464,-84 464,-108"/>
+<text text-anchor="middle" x="401" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
 </a>
 </g>
 </g>
-<!-- proc~set_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_c~3&#45;&gt;none~set~3 -->
 <g id="proc~~set3~3~~CalledByGraph_edge8" class="edge">
-<title>proc~set_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M467.18,-192.03C475.36,-194.53 483.51,-197.5 491,-201 515.36,-212.39 539.83,-231.04 556.5,-245.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="554.6,-248.09 564.46,-251.98 559.18,-242.79 554.6,-248.09"/>
+<title>proc~set_c~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M464.39,-103.61C473.92,-106.72 483.18,-111.03 491,-117 540.26,-154.6 566.32,-226.63 576.83,-262.93"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="573.46,-263.87 579.5,-272.57 580.2,-262 573.46,-263.87"/>
 </g>
-<!-- proc~set_c~3 -->
+<!-- proc~set_half_ring~2 -->
 <g id="proc~~set3~3~~CalledByGraph_node10" class="node">
-<title>proc~set_c~3</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node10"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_curve%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="464,-150 348,-150 348,-126 464,-126 464,-150"/>
-<text text-anchor="middle" x="406" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
+<title>proc~set_half_ring~2</title>
+<g id="a_proc~~set3~3~~CalledByGraph_node10"><a xlink:href="../proc/set_half_ring~2.html" xlink:title="nurbs_surface%set_half_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="483.5,-150 318.5,-150 318.5,-126 483.5,-126 483.5,-150"/>
+<text text-anchor="middle" x="401" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c~3&#45;&gt;none~set~3 -->
+<!-- proc~set_half_ring~2&#45;&gt;none~set~3 -->
 <g id="proc~~set3~3~~CalledByGraph_edge9" class="edge">
-<title>proc~set_c~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M464.15,-147.05C473.55,-149.98 482.87,-153.86 491,-159 524.67,-180.27 551.51,-219.07 565.91,-243.08"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="562.92,-244.91 570.98,-251.79 568.98,-241.39 562.92,-244.91"/>
+<title>proc~set_half_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M473.87,-150.11C479.91,-152.55 485.71,-155.48 491,-159 530.66,-185.4 559.08,-235.16 572.94,-263.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="569.8,-265.16 577.22,-272.71 576.13,-262.17 569.8,-265.16"/>
 </g>
-<!-- proc~set_half_circle -->
+<!-- proc~set_ring~2 -->
 <g id="proc~~set3~3~~CalledByGraph_node11" class="node">
-<title>proc~set_half_circle</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node11"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="487.5,-108 324.5,-108 324.5,-84 487.5,-84 487.5,-108"/>
-<text text-anchor="middle" x="406" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
+<title>proc~set_ring~2</title>
+<g id="a_proc~~set3~3~~CalledByGraph_node11"><a xlink:href="../proc/set_ring~2.html" xlink:title="nurbs_surface%set_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="470.5,-192 331.5,-192 331.5,-168 470.5,-168 470.5,-192"/>
+<text text-anchor="middle" x="401" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_ring~2&#45;&gt;none~set~3 -->
 <g id="proc~~set3~3~~CalledByGraph_edge10" class="edge">
-<title>proc~set_half_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M475.62,-108.12C481.09,-110.56 486.3,-113.49 491,-117 534.04,-149.18 559.53,-209.61 570.72,-242.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="567.51,-243.52 573.97,-251.92 574.16,-241.32 567.51,-243.52"/>
+<title>proc~set_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M469.92,-192.15C477.23,-194.59 484.41,-197.51 491,-201 521.51,-217.17 549.65,-245.97 566.45,-265.28"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="563.79,-267.55 572.93,-272.91 569.12,-263.02 563.79,-267.55"/>
 </g>
-<!-- program~compute_length -->
+<!-- proc~set_tetragon -->
 <g id="proc~~set3~3~~CalledByGraph_node12" class="node">
-<title>program~compute_length</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node12"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-502 0,-502 0,-478 99,-478 99,-502"/>
-<text text-anchor="middle" x="49.5" y="-487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<title>proc~set_tetragon</title>
+<g id="a_proc~~set3~3~~CalledByGraph_node12"><a xlink:href="../proc/set_tetragon.html" xlink:title="nurbs_surface%set_tetragon">
+<polygon fill="#d9534f" stroke="#d9534f" points="483,-234 319,-234 319,-210 483,-210 483,-234"/>
+<text text-anchor="middle" x="401" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;none~set~3 -->
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
 <g id="proc~~set3~3~~CalledByGraph_edge11" class="edge">
-<title>program~compute_length&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M84.64,-502.01C164.06,-527.61 364.11,-578.44 491,-491 559.8,-443.59 573.92,-333.61 576.79,-286.3"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="580.29,-286.35 577.28,-276.19 573.3,-286.01 580.29,-286.35"/>
-</g>
-<!-- proc~cmp_length -->
-<g id="proc~~set3~3~~CalledByGraph_node16" class="node">
-<title>proc~cmp_length</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node16"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="285,-482 135,-482 135,-458 285,-458 285,-482"/>
-<text text-anchor="middle" x="210" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
-</a>
-</g>
-</g>
-<!-- program~compute_length&#45;&gt;proc~cmp_length -->
-<g id="proc~~set3~3~~CalledByGraph_edge22" class="edge">
-<title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#ff0000" d="M99.35,-483.84C107.54,-482.8 116.25,-481.7 125.03,-480.6"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="125.48,-484.07 134.96,-479.34 124.6,-477.12 125.48,-484.07"/>
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M460.4,-234.03C470.7,-236.64 481.24,-239.65 491,-243 511.36,-250 533.32,-259.99 550.61,-268.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="549.19,-271.67 559.7,-272.99 552.31,-265.4 549.19,-271.67"/>
 </g>
-<!-- program~example1_curve -->
+<!-- program~compute_area -->
 <g id="proc~~set3~3~~CalledByGraph_node13" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node13"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-381 160,-381 160,-357 260,-357 260,-381"/>
-<text text-anchor="middle" x="210" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~compute_area</title>
+<g id="a_proc~~set3~3~~CalledByGraph_node13"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-542 0,-542 0,-518 89,-518 89,-542"/>
+<text text-anchor="middle" x="44.5" y="-527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;none~set~3 -->
+<!-- program~compute_area&#45;&gt;none~set~3 -->
 <g id="proc~~set3~3~~CalledByGraph_edge12" class="edge">
-<title>program~example1_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M233.08,-381.16C282.76,-406.72 405.66,-459.8 491,-411 538.32,-383.94 562.31,-319.79 572.06,-285.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="575.49,-286.59 574.73,-276.02 568.74,-284.75 575.49,-286.59"/>
+<title>program~compute_area&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M89.19,-528.67C195.01,-525.11 458.77,-514.01 491,-491 552.97,-446.76 573.59,-350.77 579.93,-307.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="583.42,-307.52 581.27,-297.15 576.48,-306.6 583.42,-307.52"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
-<g id="proc~~set3~3~~CalledByGraph_edge16" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
-<path fill="none" stroke="#ff7500" d="M260.21,-374.33C275.59,-375.99 293.12,-377.89 310.54,-379.78"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="310.45,-383.29 320.77,-380.88 311.21,-376.33 310.45,-383.29"/>
+<!-- proc~cmp_area -->
+<g id="proc~~set3~3~~CalledByGraph_node17" class="node">
+<title>proc~cmp_area</title>
+<g id="a_proc~~set3~3~~CalledByGraph_node17"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
+<polygon fill="#d9534f" stroke="#d9534f" points="275,-562 125,-562 125,-538 275,-538 275,-562"/>
+<text text-anchor="middle" x="200" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+</a>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
-<g id="proc~~set3~3~~CalledByGraph_edge17" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
-<path fill="none" stroke="#ffeb00" d="M260.21,-363.67C278.44,-361.7 299.67,-359.4 320.17,-357.18"/>
-<polygon fill="#ffeb00" stroke="#ffeb00" points="320.6,-360.66 330.16,-356.1 319.84,-353.7 320.6,-360.66"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
-<g id="proc~~set3~3~~CalledByGraph_edge18" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
-<path fill="none" stroke="#00ff4e" d="M239.62,-356.99C261.63,-348.02 292.92,-335.84 321,-327 328.08,-324.77 335.55,-322.62 343,-320.6"/>
-<polygon fill="#00ff4e" stroke="#00ff4e" points="343.97,-323.97 352.75,-318.03 342.19,-317.2 343.97,-323.97"/>
+<!-- program~compute_area&#45;&gt;proc~cmp_area -->
+<g id="proc~~set3~3~~CalledByGraph_edge31" class="edge">
+<title>program~compute_area&#45;&gt;proc~cmp_area</title>
+<path fill="none" stroke="#ff0000" d="M89.08,-535.68C97.19,-536.73 105.92,-537.87 114.78,-539.03"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="114.45,-542.51 124.81,-540.33 115.35,-535.57 114.45,-542.51"/>
 </g>
-<!-- program~example_nurbs_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~set3~3~~CalledByGraph_node14" class="node">
-<title>program~example_nurbs_curve</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node14"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 341.5,-66 341.5,-42 470.5,-42 470.5,-66"/>
-<text text-anchor="middle" x="406" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~set3~3~~CalledByGraph_node14"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="255,-420 145,-420 145,-396 255,-396 255,-420"/>
+<text text-anchor="middle" x="200" y="-405.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;none~set~3 -->
+<!-- program~example3_surface&#45;&gt;none~set~3 -->
 <g id="proc~~set3~3~~CalledByGraph_edge13" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M470.56,-63.24C477.95,-66.17 484.99,-70 491,-75 543.77,-118.84 565.87,-201.81 573.75,-241.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="570.34,-242.42 575.61,-251.62 577.22,-241.15 570.34,-242.42"/>
+<title>program~example3_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M255.17,-404.6C327.24,-399.42 450.29,-388.08 491,-369 522.44,-354.27 550.52,-324.84 567.04,-305.03"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="569.81,-307.17 573.38,-297.2 564.37,-302.77 569.81,-307.17"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="proc~~set3~3~~CalledByGraph_edge17" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#ff6d00" d="M239.39,-395.97C260.5,-389.4 287.17,-381.16 311,-374 323.16,-370.34 336.28,-366.47 348.62,-362.86"/>
+<polygon fill="#ff6d00" stroke="#ff6d00" points="349.69,-366.2 358.3,-360.04 347.72,-359.48 349.69,-366.2"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
+<g id="proc~~set3~3~~CalledByGraph_edge18" class="edge">
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#ffda00" d="M230.54,-420.16C252.49,-428.91 283.3,-440.61 311,-449 318.48,-451.27 326.37,-453.44 334.24,-455.47"/>
+<polygon fill="#ffda00" stroke="#ffda00" points="333.62,-458.92 344.17,-457.96 335.32,-452.13 333.62,-458.92"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
+<g id="proc~~set3~3~~CalledByGraph_edge20" class="edge">
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#00ff24" d="M255.11,-413.44C270.51,-414.99 287.75,-416.72 304.82,-418.43"/>
+<polygon fill="#00ff24" stroke="#00ff24" points="304.53,-421.92 314.83,-419.44 305.23,-414.96 304.53,-421.92"/>
 </g>
-<!-- program~nearest_point_1d -->
+<!-- program~example_nurbs_surface -->
 <g id="proc~~set3~3~~CalledByGraph_node15" class="node">
-<title>program~nearest_point_1d</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node15"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="457.5,-24 354.5,-24 354.5,0 457.5,0 457.5,-24"/>
-<text text-anchor="middle" x="406" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<title>program~example_nurbs_surface</title>
+<g id="a_proc~~set3~3~~CalledByGraph_node15"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 331.5,-66 331.5,-42 470.5,-42 470.5,-66"/>
+<text text-anchor="middle" x="401" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;none~set~3 -->
+<!-- program~example_nurbs_surface&#45;&gt;none~set~3 -->
 <g id="proc~~set3~3~~CalledByGraph_edge14" class="edge">
-<title>program~nearest_point_1d&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M457.92,-16.54C469.88,-19.69 481.8,-24.79 491,-33 553.86,-89.12 571.19,-195.45 575.85,-241.64"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="572.38,-242.13 576.76,-251.78 579.35,-241.51 572.38,-242.13"/>
+<title>program~example_nurbs_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M470.75,-63.21C478.08,-66.17 485.03,-70.01 491,-75 550.25,-124.48 572.25,-219.65 579.43,-262.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="575.99,-263.45 580.98,-272.8 582.91,-262.38 575.99,-263.45"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- program~nearest_point_2d -->
+<g id="proc~~set3~3~~CalledByGraph_node16" class="node">
+<title>program~nearest_point_2d</title>
+<g id="a_proc~~set3~3~~CalledByGraph_node16"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452.5,-24 349.5,-24 349.5,0 452.5,0 452.5,-24"/>
+<text text-anchor="middle" x="401" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+</a>
+</g>
+</g>
+<!-- program~nearest_point_2d&#45;&gt;none~set~3 -->
 <g id="proc~~set3~3~~CalledByGraph_edge15" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#ff0000" d="M285.17,-470C301.32,-470 318.36,-470 334.36,-470"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="334.71,-473.5 344.71,-470 334.71,-466.5 334.71,-473.5"/>
+<title>program~nearest_point_2d&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M452.73,-15.16C466.47,-18.21 480.44,-23.61 491,-33 560.36,-94.71 577.18,-213.24 581.23,-262.59"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="577.76,-263.07 581.96,-272.8 584.74,-262.57 577.76,-263.07"/>
 </g>
-<!-- program~shape_c_1d -->
-<g id="proc~~set3~3~~CalledByGraph_node17" class="node">
-<title>program~shape_c_1d</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node17"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-150 172,-150 172,-126 248,-126 248,-150"/>
-<text text-anchor="middle" x="210" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~set3~3~~CalledByGraph_edge16" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#ff0000" d="M275.1,-550C291.15,-550 308.13,-550 324.24,-550"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="324.68,-553.5 334.68,-550 324.68,-546.5 324.68,-553.5"/>
+</g>
+<!-- program~example_ppm1 -->
+<g id="proc~~set3~3~~CalledByGraph_node18" class="node">
+<title>program~example_ppm1</title>
+<g id="a_proc~~set3~3~~CalledByGraph_node18"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-192 153,-192 153,-168 247,-168 247,-192"/>
+<text text-anchor="middle" x="200" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~set_c~3 -->
-<g id="proc~~set3~3~~CalledByGraph_edge20" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~set_c~3</title>
-<path fill="none" stroke="#00c4ff" d="M248.41,-138C273.62,-138 307.6,-138 337.47,-138"/>
-<polygon fill="#00c4ff" stroke="#00c4ff" points="337.84,-141.5 347.84,-138 337.84,-134.5 337.84,-141.5"/>
+<!-- program~example_ppm1&#45;&gt;proc~set_ring~2 -->
+<g id="proc~~set3~3~~CalledByGraph_edge24" class="edge">
+<title>program~example_ppm1&#45;&gt;proc~set_ring~2</title>
+<path fill="none" stroke="#0091ff" d="M247.15,-180C269.15,-180 296.09,-180 321.19,-180"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="321.45,-183.5 331.45,-180 321.45,-176.5 321.45,-183.5"/>
 </g>
-<!-- program~shape_circle -->
-<g id="proc~~set3~3~~CalledByGraph_node18" class="node">
-<title>program~shape_circle</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node18"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249.5,-192 170.5,-192 170.5,-168 249.5,-168 249.5,-192"/>
-<text text-anchor="middle" x="210" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<!-- program~example_ppm1&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set3~3~~CalledByGraph_edge26" class="edge">
+<title>program~example_ppm1&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.15,-189.74C272.73,-195.14 304.98,-201.95 333.26,-207.91"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="332.57,-211.34 343.07,-209.99 334.01,-204.5 332.57,-211.34"/>
+</g>
+<!-- program~example_ppm2 -->
+<g id="proc~~set3~3~~CalledByGraph_node19" class="node">
+<title>program~example_ppm2</title>
+<g id="a_proc~~set3~3~~CalledByGraph_node19"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-150 153,-150 153,-126 247,-126 247,-150"/>
+<text text-anchor="middle" x="200" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm2&#45;&gt;proc~set_half_ring~2 -->
+<g id="proc~~set3~3~~CalledByGraph_edge22" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~set_half_ring~2</title>
+<path fill="none" stroke="#00ffff" d="M247.15,-138C265.39,-138 287.03,-138 308.19,-138"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="308.2,-141.5 318.2,-138 308.2,-134.5 308.2,-141.5"/>
+</g>
+<!-- program~example_ppm2&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set3~3~~CalledByGraph_edge27" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.02,-146.55C256.72,-149.56 266.56,-153.6 275,-159 295.71,-172.25 290,-188.21 311,-201 314.01,-202.83 317.16,-204.5 320.41,-206.03"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="319.22,-209.32 329.8,-209.95 321.92,-202.87 319.22,-209.32"/>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~set3~3~~CalledByGraph_node20" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~set3~3~~CalledByGraph_node20"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-318 153,-318 153,-294 247,-294 247,-318"/>
+<text text-anchor="middle" x="200" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~set_circle -->
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
 <g id="proc~~set3~3~~CalledByGraph_edge19" class="edge">
-<title>program~shape_circle&#45;&gt;proc~set_circle</title>
-<path fill="none" stroke="#00ffc4" d="M249.79,-180C271.95,-180 300.54,-180 327.13,-180"/>
-<polygon fill="#00ffc4" stroke="#00ffc4" points="327.21,-183.5 337.21,-180 327.21,-176.5 327.21,-183.5"/>
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#48ff00" d="M247.15,-296.26C272.73,-290.86 304.98,-284.05 333.26,-278.09"/>
+<polygon fill="#48ff00" stroke="#48ff00" points="334.01,-281.5 343.07,-276.01 332.57,-274.66 334.01,-281.5"/>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set3~3~~CalledByGraph_edge28" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.02,-297.45C256.72,-294.44 266.56,-290.4 275,-285 295.71,-271.75 290,-255.79 311,-243 314.01,-241.17 317.16,-239.5 320.41,-237.97"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="321.92,-241.13 329.8,-234.05 319.22,-234.68 321.92,-241.13"/>
+</g>
+<!-- program~nearest_point_2d_bench -->
+<g id="proc~~set3~3~~CalledByGraph_node21" class="node">
+<title>program~nearest_point_2d_bench</title>
+<g id="a_proc~~set3~3~~CalledByGraph_node21"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-234 129,-234 129,-210 271,-210 271,-234"/>
+<text text-anchor="middle" x="200" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+</a>
 </g>
-<!-- program~shape_half_circle -->
-<g id="proc~~set3~3~~CalledByGraph_node19" class="node">
-<title>program~shape_half_circle</title>
-<g id="a_proc~~set3~3~~CalledByGraph_node19"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-108 158,-108 158,-84 262,-84 262,-108"/>
-<text text-anchor="middle" x="210" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+</g>
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set3~3~~CalledByGraph_edge29" class="edge">
+<title>program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M271.16,-222C283.34,-222 296.17,-222 308.82,-222"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="308.91,-225.5 318.91,-222 308.91,-218.5 308.91,-225.5"/>
+</g>
+<!-- program~shape_c_2d -->
+<g id="proc~~set3~3~~CalledByGraph_node22" class="node">
+<title>program~shape_c_2d</title>
+<g id="a_proc~~set3~3~~CalledByGraph_node22"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="238,-24 162,-24 162,0 238,0 238,-24"/>
+<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
+<!-- program~shape_c_2d&#45;&gt;proc~set_c~3 -->
 <g id="proc~~set3~3~~CalledByGraph_edge21" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
-<path fill="none" stroke="#004eff" d="M262.22,-96C278.08,-96 296.06,-96 313.78,-96"/>
-<polygon fill="#004eff" stroke="#004eff" points="314.17,-99.5 324.17,-96 314.17,-92.5 314.17,-99.5"/>
+<title>program~shape_c_2d&#45;&gt;proc~set_c~3</title>
+<path fill="none" stroke="#00ff91" d="M238.17,-18.06C250.55,-21.21 263.98,-25.94 275,-33 295.71,-46.25 290,-62.21 311,-75 316.34,-78.25 322.14,-81 328.14,-83.32"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="327.09,-86.66 337.68,-86.63 329.38,-80.05 327.09,-86.66"/>
+</g>
+<!-- program~shape_half_ring_2d -->
+<g id="proc~~set3~3~~CalledByGraph_node23" class="node">
+<title>program~shape_half_ring_2d</title>
+<g id="a_proc~~set3~3~~CalledByGraph_node23"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="257.5,-66 142.5,-66 142.5,-42 257.5,-42 257.5,-66"/>
+<text text-anchor="middle" x="200" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2 -->
+<g id="proc~~set3~3~~CalledByGraph_edge23" class="edge">
+<title>program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2</title>
+<path fill="none" stroke="#00ffff" d="M257.09,-66.07C263.38,-68.53 269.49,-71.47 275,-75 295.71,-88.25 290,-104.21 311,-117 314.01,-118.83 317.16,-120.5 320.41,-122.03"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="319.22,-125.32 329.8,-125.95 321.92,-118.87 319.22,-125.32"/>
+</g>
+<!-- program~shape_ring_2d -->
+<g id="proc~~set3~3~~CalledByGraph_node24" class="node">
+<title>program~shape_ring_2d</title>
+<g id="a_proc~~set3~3~~CalledByGraph_node24"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="245,-108 155,-108 155,-84 245,-84 245,-108"/>
+<text text-anchor="middle" x="200" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_ring_2d&#45;&gt;proc~set_ring~2 -->
+<g id="proc~~set3~3~~CalledByGraph_edge25" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~set_ring~2</title>
+<path fill="none" stroke="#0091ff" d="M245.08,-103.96C255.4,-107.03 266,-111.24 275,-117 295.71,-130.25 290,-146.21 311,-159 314.41,-161.08 318.01,-162.95 321.73,-164.64"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="320.6,-167.95 331.18,-168.46 323.22,-161.46 320.6,-167.95"/>
+</g>
+<!-- program~shape_tetragon -->
+<g id="proc~~set3~3~~CalledByGraph_node25" class="node">
+<title>program~shape_tetragon</title>
+<g id="a_proc~~set3~3~~CalledByGraph_node25"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-276 152,-276 152,-252 248,-252 248,-276"/>
+<text text-anchor="middle" x="200" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+</a>
+</g>
+</g>
+<!-- program~shape_tetragon&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set3~3~~CalledByGraph_edge30" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M248.16,-254.05C273.44,-248.71 305.03,-242.04 332.84,-236.17"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="333.83,-239.54 342.89,-234.05 332.39,-232.69 333.83,-239.54"/>
 </g>
 </g>
 </svg>
@@ -824,7 +947,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set4.html b/proc/set4.html
index c74475036..3f769104d 100644
--- a/proc/set4.html
+++ b/proc/set4.html
@@ -78,20 +78,20 @@ <h1>set4
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.5% of total for procedures.">36 statements</a>
+                 title=" 0.4% of total for procedures.">26 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">set4</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine set4(this, degree, nc, Xc, Wc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~4"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~5"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -176,34 +176,34 @@ <h3>Arguments</h3>
               <span class="anchor" id="variable-degree~3"></span>
               integer,
             </td>
-<td>intent(in),</td>
+<td>intent(in)</td>
               <td></td>            <td>
-              contiguous
+              
             </td>
             <td>::</td>
-            <td><strong>degree</strong>(:)</td>
+            <td><strong>degree</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~3"></span>
+              <span class="anchor" id="variable-nc~2"></span>
               integer,
             </td>
-<td>intent(in),</td>
+<td>intent(in)</td>
               <td></td>            <td>
-              contiguous
+              
             </td>
             <td>::</td>
-            <td><strong>nc</strong>(:)</td>
+            <td><strong>nc</strong></td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~7"></span>
+              <span class="anchor" id="variable-xc~12"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -218,7 +218,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~6"></span>
+              <span class="anchor" id="variable-wc~12"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -246,355 +246,310 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set4~~CalledByGraph Pages: 1 -->
-<svg id="procset4CalledByGraph" width="641pt" height="488pt"
- viewBox="0.00 0.00 641.00 488.05" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set4~~CalledByGraph" class="graph" transform="scale(1.31 1.31) rotate(0) translate(4 633.29)">
+<svg id="procset4CalledByGraph" width="641pt" height="448pt"
+ viewBox="0.00 0.00 641.00 448.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set4~~CalledByGraph" class="graph" transform="scale(1.22 1.22) rotate(0) translate(4 544.5)">
 <title>proc~~set4~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-633.29 833,-633.29 833,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-544.5 780,-544.5 780,4 -4,4"/>
 <!-- proc~set4 -->
 <g id="proc~~set4~~CalledByGraph_node1" class="node">
 <title>proc~set4</title>
-<polygon fill="none" stroke="black" points="829,-318 709,-318 709,-294 829,-294 829,-318"/>
-<text text-anchor="middle" x="769" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set4</text>
+<polygon fill="none" stroke="black" points="776,-276 666,-276 666,-252 776,-252 776,-276"/>
+<text text-anchor="middle" x="721" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set4</text>
 </g>
 <!-- none~set -->
 <g id="proc~~set4~~CalledByGraph_node2" class="node">
 <title>none~set</title>
-<g id="a_proc~~set4~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="673,-318 560,-318 560,-294 673,-294 673,-318"/>
-<text text-anchor="middle" x="616.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<g id="a_proc~~set4~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="630,-276 527,-276 527,-252 630,-252 630,-276"/>
+<text text-anchor="middle" x="578.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set4 -->
 <g id="proc~~set4~~CalledByGraph_edge1" class="edge">
 <title>none~set&#45;&gt;proc~set4</title>
-<path fill="none" stroke="#ff0000" d="M673.11,-306C681.48,-306 690.19,-306 698.8,-306"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="698.83,-309.5 708.83,-306 698.83,-302.5 698.83,-309.5"/>
+<path fill="none" stroke="#ff0000" d="M630.22,-264C638.38,-264 646.92,-264 655.35,-264"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="655.55,-267.5 665.55,-264 655.55,-260.5 655.55,-267.5"/>
 </g>
 <!-- proc~ansatz -->
 <g id="proc~~set4~~CalledByGraph_node3" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~set4~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-566 367.5,-566 367.5,-542 499.5,-542 499.5,-566"/>
-<text text-anchor="middle" x="433.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~set4~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="467,-482 345,-482 345,-458 467,-458 467,-482"/>
+<text text-anchor="middle" x="406" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;none~set -->
 <g id="proc~~set4~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.76,-542.65C508.6,-539.03 517.01,-534.27 524,-528 584.64,-473.59 606.02,-372.87 612.74,-328.26"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="616.23,-328.58 614.15,-318.19 609.3,-327.61 616.23,-328.58"/>
+<path fill="none" stroke="#ff0000" d="M467.12,-458.13C475.76,-454.59 484.06,-449.98 491,-444 540.47,-401.35 563.98,-323.98 572.94,-286.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="576.41,-286.63 575.18,-276.11 569.58,-285.1 576.41,-286.63"/>
 </g>
 <!-- proc~elevate_degree -->
 <g id="proc~~set4~~CalledByGraph_node4" class="node">
 <title>proc~elevate_degree</title>
-<g id="a_proc~~set4~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-486 343.5,-486 343.5,-462 523.5,-462 523.5,-486"/>
-<text text-anchor="middle" x="433.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
+<g id="a_proc~~set4~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="491,-402 321,-402 321,-378 491,-378 491,-402"/>
+<text text-anchor="middle" x="406" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree&#45;&gt;none~set -->
 <g id="proc~~set4~~CalledByGraph_edge3" class="edge">
 <title>proc~elevate_degree&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M507.95,-461.94C513.63,-459.48 519.07,-456.54 524,-453 568.52,-421.06 596.03,-360.08 608.18,-327.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="611.5,-328.73 611.59,-318.14 604.91,-326.36 611.5,-328.73"/>
+<path fill="none" stroke="#ff0000" d="M472.9,-377.91C479.26,-375.47 485.41,-372.53 491,-369 524.67,-347.73 551.51,-308.93 565.91,-284.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="568.98,-286.61 570.98,-276.21 562.92,-283.09 568.98,-286.61"/>
 </g>
 <!-- proc~insert_knots -->
 <g id="proc~~set4~~CalledByGraph_node5" class="node">
 <title>proc~insert_knots</title>
-<g id="a_proc~~set4~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="514,-444 353,-444 353,-420 514,-420 514,-444"/>
-<text text-anchor="middle" x="433.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
+<g id="a_proc~~set4~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_curve%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-360 330.5,-360 330.5,-336 481.5,-336 481.5,-360"/>
+<text text-anchor="middle" x="406" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots&#45;&gt;none~set -->
 <g id="proc~~set4~~CalledByGraph_edge4" class="edge">
 <title>proc~insert_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M505.06,-419.93C511.69,-417.49 518.12,-414.54 524,-411 558.92,-389.96 587.54,-351.08 603,-327"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="606.13,-328.6 608.45,-318.26 600.19,-324.89 606.13,-328.6"/>
+<path fill="none" stroke="#ff0000" d="M467.18,-335.97C475.36,-333.47 483.51,-330.5 491,-327 515.36,-315.61 539.83,-296.96 556.5,-282.9"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="559.18,-285.21 564.46,-276.02 554.6,-279.91 559.18,-285.21"/>
 </g>
 <!-- proc~modify_wc -->
 <g id="proc~~set4~~CalledByGraph_node6" class="node">
 <title>proc~modify_wc</title>
-<g id="a_proc~~set4~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_volume%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-360 355.5,-360 355.5,-336 511.5,-336 511.5,-360"/>
-<text text-anchor="middle" x="433.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
+<g id="a_proc~~set4~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc.html" xlink:title="nurbs_curve%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="479,-276 333,-276 333,-252 479,-252 479,-276"/>
+<text text-anchor="middle" x="406" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc&#45;&gt;none~set -->
 <g id="proc~~set4~~CalledByGraph_edge5" class="edge">
 <title>proc~modify_wc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M486.37,-335.96C507.38,-331.09 531.82,-325.42 553.75,-320.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="554.68,-323.71 563.63,-318.04 553.09,-316.89 554.68,-323.71"/>
+<path fill="none" stroke="#ff0000" d="M479.31,-264C491.66,-264 504.39,-264 516.42,-264"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="516.78,-267.5 526.78,-264 516.78,-260.5 516.78,-267.5"/>
 </g>
 <!-- proc~modify_xc -->
 <g id="proc~~set4~~CalledByGraph_node7" class="node">
 <title>proc~modify_xc</title>
-<g id="a_proc~~set4~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_volume%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="510,-318 357,-318 357,-294 510,-294 510,-318"/>
-<text text-anchor="middle" x="433.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
+<g id="a_proc~~set4~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc.html" xlink:title="nurbs_curve%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-234 334.5,-234 334.5,-210 477.5,-210 477.5,-234"/>
+<text text-anchor="middle" x="406" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc&#45;&gt;none~set -->
 <g id="proc~~set4~~CalledByGraph_edge6" class="edge">
 <title>proc~modify_xc&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M510.21,-306C523.36,-306 536.93,-306 549.79,-306"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="549.92,-309.5 559.92,-306 549.92,-302.5 549.92,-309.5"/>
+<path fill="none" stroke="#ff0000" d="M455.86,-234.04C475.48,-238.87 498.26,-244.48 518.77,-249.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="518.09,-252.97 528.63,-251.96 519.76,-246.17 518.09,-252.97"/>
 </g>
 <!-- proc~remove_knots -->
 <g id="proc~~set4~~CalledByGraph_node8" class="node">
 <title>proc~remove_knots</title>
-<g id="a_proc~~set4~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-402 347.5,-402 347.5,-378 519.5,-378 519.5,-402"/>
-<text text-anchor="middle" x="433.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
+<g id="a_proc~~set4~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_curve%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="487,-318 325,-318 325,-294 487,-294 487,-318"/>
+<text text-anchor="middle" x="406" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots&#45;&gt;none~set -->
 <g id="proc~~set4~~CalledByGraph_edge7" class="edge">
 <title>proc~remove_knots&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.01,-377.92C507.58,-375.44 516.12,-372.49 524,-369 549.77,-357.6 575.92,-338.69 593.63,-324.56"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="596.07,-327.09 601.61,-318.06 591.65,-321.66 596.07,-327.09"/>
+<path fill="none" stroke="#ff0000" d="M455.86,-293.96C475.48,-289.13 498.26,-283.52 518.77,-278.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="519.76,-281.83 528.63,-276.04 518.09,-275.03 519.76,-281.83"/>
 </g>
 <!-- proc~set_c -->
 <g id="proc~~set4~~CalledByGraph_node9" class="node">
 <title>proc~set_c</title>
-<g id="a_proc~~set4~~CalledByGraph_node9"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_volume%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-276 370.5,-276 370.5,-252 496.5,-252 496.5,-276"/>
-<text text-anchor="middle" x="433.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
+<g id="a_proc~~set4~~CalledByGraph_node9"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_curve%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="464,-192 348,-192 348,-168 464,-168 464,-192"/>
+<text text-anchor="middle" x="406" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c&#45;&gt;none~set -->
 <g id="proc~~set4~~CalledByGraph_edge8" class="edge">
 <title>proc~set_c&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M486.37,-276.04C507.38,-280.91 531.82,-286.58 553.75,-291.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="553.09,-295.11 563.63,-293.96 554.68,-288.29 553.09,-295.11"/>
+<path fill="none" stroke="#ff0000" d="M464.06,-191.1C473.28,-193.79 482.56,-197.05 491,-201 515.36,-212.39 539.83,-231.04 556.5,-245.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="554.6,-248.09 564.46,-251.98 559.18,-242.79 554.6,-248.09"/>
 </g>
-<!-- proc~set_half_ring -->
+<!-- proc~set_circle -->
 <g id="proc~~set4~~CalledByGraph_node10" class="node">
-<title>proc~set_half_ring</title>
-<g id="a_proc~~set4~~CalledByGraph_node10"><a xlink:href="../proc/set_half_ring.html" xlink:title="nurbs_volume%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="516,-234 351,-234 351,-210 516,-210 516,-234"/>
-<text text-anchor="middle" x="433.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
+<title>proc~set_circle</title>
+<g id="a_proc~~set4~~CalledByGraph_node10"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
+<polygon fill="#d9534f" stroke="#d9534f" points="474.5,-150 337.5,-150 337.5,-126 474.5,-126 474.5,-150"/>
+<text text-anchor="middle" x="406" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring&#45;&gt;none~set -->
+<!-- proc~set_circle&#45;&gt;none~set -->
 <g id="proc~~set4~~CalledByGraph_edge9" class="edge">
-<title>proc~set_half_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.01,-234.08C507.58,-236.56 516.12,-239.51 524,-243 549.77,-254.4 575.92,-273.31 593.63,-287.44"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="591.65,-290.34 601.61,-293.94 596.07,-284.91 591.65,-290.34"/>
+<title>proc~set_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M472.9,-150.09C479.26,-152.53 485.41,-155.47 491,-159 524.67,-180.27 551.51,-219.07 565.91,-243.08"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="562.92,-244.91 570.98,-251.79 568.98,-241.39 562.92,-244.91"/>
 </g>
-<!-- proc~set_hexahedron -->
+<!-- proc~set_half_circle -->
 <g id="proc~~set4~~CalledByGraph_node11" class="node">
-<title>proc~set_hexahedron</title>
-<g id="a_proc~~set4~~CalledByGraph_node11"><a xlink:href="../proc/set_hexahedron.html" xlink:title="nurbs_volume%set_hexahedron">
-<polygon fill="#d9534f" stroke="#d9534f" points="524,-192 343,-192 343,-168 524,-168 524,-192"/>
-<text text-anchor="middle" x="433.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
+<title>proc~set_half_circle</title>
+<g id="a_proc~~set4~~CalledByGraph_node11"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
+<polygon fill="#d9534f" stroke="#d9534f" points="487.5,-108 324.5,-108 324.5,-84 487.5,-84 487.5,-108"/>
+<text text-anchor="middle" x="406" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
 </a>
 </g>
 </g>
-<!-- proc~set_hexahedron&#45;&gt;none~set -->
+<!-- proc~set_half_circle&#45;&gt;none~set -->
 <g id="proc~~set4~~CalledByGraph_edge10" class="edge">
-<title>proc~set_hexahedron&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M505.06,-192.07C511.69,-194.51 518.12,-197.46 524,-201 558.92,-222.04 587.54,-260.92 603,-285"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="600.19,-287.11 608.45,-293.74 606.13,-283.4 600.19,-287.11"/>
+<title>proc~set_half_circle&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M475.62,-108.12C481.09,-110.56 486.3,-113.49 491,-117 534.04,-149.18 559.53,-209.61 570.72,-242.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="567.51,-243.52 573.97,-251.92 574.16,-241.32 567.51,-243.52"/>
 </g>
-<!-- proc~set_ring -->
+<!-- program~compute_length -->
 <g id="proc~~set4~~CalledByGraph_node12" class="node">
-<title>proc~set_ring</title>
-<g id="a_proc~~set4~~CalledByGraph_node12"><a xlink:href="../proc/set_ring.html" xlink:title="nurbs_volume%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="503,-150 364,-150 364,-126 503,-126 503,-150"/>
-<text text-anchor="middle" x="433.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
+<title>program~compute_length</title>
+<g id="a_proc~~set4~~CalledByGraph_node12"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-502 0,-502 0,-478 99,-478 99,-502"/>
+<text text-anchor="middle" x="49.5" y="-487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring&#45;&gt;none~set -->
+<!-- program~compute_length&#45;&gt;none~set -->
 <g id="proc~~set4~~CalledByGraph_edge11" class="edge">
-<title>proc~set_ring&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.41,-148.22C510.74,-151.01 517.78,-154.53 524,-159 568.52,-190.94 596.03,-251.92 608.18,-284.39"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="604.91,-285.64 611.59,-293.86 611.5,-283.27 604.91,-285.64"/>
+<title>program~compute_length&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M84.64,-502.01C164.06,-527.61 364.11,-578.44 491,-491 559.8,-443.59 573.92,-333.61 576.79,-286.3"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="580.29,-286.35 577.28,-276.19 573.3,-286.01 580.29,-286.35"/>
+</g>
+<!-- proc~cmp_length -->
+<g id="proc~~set4~~CalledByGraph_node16" class="node">
+<title>proc~cmp_length</title>
+<g id="a_proc~~set4~~CalledByGraph_node16"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
+<polygon fill="#d9534f" stroke="#d9534f" points="285,-482 135,-482 135,-458 285,-458 285,-482"/>
+<text text-anchor="middle" x="210" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+</a>
+</g>
+</g>
+<!-- program~compute_length&#45;&gt;proc~cmp_length -->
+<g id="proc~~set4~~CalledByGraph_edge22" class="edge">
+<title>program~compute_length&#45;&gt;proc~cmp_length</title>
+<path fill="none" stroke="#ff0000" d="M99.35,-483.84C107.54,-482.8 116.25,-481.7 125.03,-480.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="125.48,-484.07 134.96,-479.34 124.6,-477.12 125.48,-484.07"/>
 </g>
-<!-- program~compute_volume -->
+<!-- program~example1_curve -->
 <g id="proc~~set4~~CalledByGraph_node13" class="node">
-<title>program~compute_volume</title>
-<g id="a_proc~~set4~~CalledByGraph_node13"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-586 0,-586 0,-562 105,-562 105,-586"/>
-<text text-anchor="middle" x="52.5" y="-571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~set4~~CalledByGraph_node13"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-381 160,-381 160,-357 260,-357 260,-381"/>
+<text text-anchor="middle" x="210" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;none~set -->
+<!-- program~example1_curve&#45;&gt;none~set -->
 <g id="proc~~set4~~CalledByGraph_edge12" class="edge">
-<title>program~compute_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M86.78,-586.01C169.65,-613.64 388.35,-672.14 524,-575 605.44,-516.68 615.25,-381.64 615.83,-328.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="619.33,-328.19 615.83,-318.18 612.33,-328.18 619.33,-328.19"/>
+<title>program~example1_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M233.08,-381.16C282.76,-406.72 405.66,-459.8 491,-411 538.32,-383.94 562.31,-319.79 572.06,-285.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="575.49,-286.59 574.73,-276.02 568.74,-284.75 575.49,-286.59"/>
 </g>
-<!-- proc~cmp_volume -->
-<g id="proc~~set4~~CalledByGraph_node18" class="node">
-<title>proc~cmp_volume</title>
-<g id="a_proc~~set4~~CalledByGraph_node18"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-566 141,-566 141,-542 307,-542 307,-566"/>
-<text text-anchor="middle" x="224" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
-</a>
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
+<g id="proc~~set4~~CalledByGraph_edge16" class="edge">
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
+<path fill="none" stroke="#ff7500" d="M260.21,-374.33C275.59,-375.99 293.12,-377.89 310.54,-379.78"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="310.45,-383.29 320.77,-380.88 311.21,-376.33 310.45,-383.29"/>
 </g>
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
+<g id="proc~~set4~~CalledByGraph_edge17" class="edge">
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
+<path fill="none" stroke="#ffeb00" d="M260.21,-363.67C278.44,-361.7 299.67,-359.4 320.17,-357.18"/>
+<polygon fill="#ffeb00" stroke="#ffeb00" points="320.6,-360.66 330.16,-356.1 319.84,-353.7 320.6,-360.66"/>
 </g>
-<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
-<g id="proc~~set4~~CalledByGraph_edge25" class="edge">
-<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#ff0000" d="M105.28,-567.89C113.48,-566.92 122.18,-565.9 130.98,-564.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="131.41,-568.33 140.93,-563.68 130.59,-561.38 131.41,-568.33"/>
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
+<g id="proc~~set4~~CalledByGraph_edge18" class="edge">
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
+<path fill="none" stroke="#00ff4e" d="M239.62,-356.99C261.63,-348.02 292.92,-335.84 321,-327 328.08,-324.77 335.55,-322.62 343,-320.6"/>
+<polygon fill="#00ff4e" stroke="#00ff4e" points="343.97,-323.97 352.75,-318.03 342.19,-317.2 343.97,-323.97"/>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example_nurbs_curve -->
 <g id="proc~~set4~~CalledByGraph_node14" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~set4~~CalledByGraph_node14"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-465 169,-465 169,-441 279,-441 279,-465"/>
-<text text-anchor="middle" x="224" y="-450.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example_nurbs_curve</title>
+<g id="a_proc~~set4~~CalledByGraph_node14"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 341.5,-66 341.5,-42 470.5,-42 470.5,-66"/>
+<text text-anchor="middle" x="406" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;none~set -->
+<!-- program~example_nurbs_curve&#45;&gt;none~set -->
 <g id="proc~~set4~~CalledByGraph_edge13" class="edge">
-<title>program~example3_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M246.93,-465.12C299.32,-492.29 434.06,-551.38 524,-495 583.54,-457.67 605.3,-369.39 612.41,-328.06"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="615.87,-328.6 613.98,-318.18 608.95,-327.5 615.87,-328.6"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
-<g id="proc~~set4~~CalledByGraph_edge18" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
-<path fill="none" stroke="#ff6600" d="M279.25,-458.49C295.84,-460.17 314.64,-462.07 333.24,-463.95"/>
-<polygon fill="#ff6600" stroke="#ff6600" points="332.94,-467.44 343.24,-464.97 333.64,-460.48 332.94,-467.44"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
-<g id="proc~~set4~~CalledByGraph_edge19" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
-<path fill="none" stroke="#ffcc00" d="M279.25,-447.51C298.63,-445.55 321.03,-443.28 342.61,-441.1"/>
-<polygon fill="#ffcc00" stroke="#ffcc00" points="343.19,-444.56 352.79,-440.07 342.49,-437.59 343.19,-444.56"/>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
-<g id="proc~~set4~~CalledByGraph_edge20" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
-<path fill="none" stroke="#00ff00" d="M255.75,-440.99C279.38,-432.02 312.96,-419.84 343,-411 350.73,-408.73 358.89,-406.53 367.01,-404.47"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="368,-407.84 376.87,-402.04 366.32,-401.04 368,-407.84"/>
+<title>program~example_nurbs_curve&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M470.56,-63.24C477.95,-66.17 484.99,-70 491,-75 543.77,-118.84 565.87,-201.81 573.75,-241.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="570.34,-242.42 575.61,-251.62 577.22,-241.15 570.34,-242.42"/>
 </g>
-<!-- program~example_nurbs_volume -->
+<!-- program~nearest_point_1d -->
 <g id="proc~~set4~~CalledByGraph_node15" class="node">
-<title>program~example_nurbs_volume</title>
-<g id="a_proc~~set4~~CalledByGraph_node15"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-108 364,-108 364,-84 503,-84 503,-108"/>
-<text text-anchor="middle" x="433.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<title>program~nearest_point_1d</title>
+<g id="a_proc~~set4~~CalledByGraph_node15"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="457.5,-24 354.5,-24 354.5,0 457.5,0 457.5,-24"/>
+<text text-anchor="middle" x="406" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;none~set -->
+<!-- program~nearest_point_1d&#45;&gt;none~set -->
 <g id="proc~~set4~~CalledByGraph_edge14" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M503.44,-105.4C510.85,-108.33 517.9,-112.11 524,-117 578.22,-160.42 602.42,-243.9 611.25,-283.76"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="607.82,-284.49 613.3,-293.56 614.67,-283.05 607.82,-284.49"/>
-</g>
-<!-- program~example_put_to_nurbs -->
-<g id="proc~~set4~~CalledByGraph_node16" class="node">
-<title>program~example_put_to_nurbs</title>
-<g id="a_proc~~set4~~CalledByGraph_node16"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-66 367.5,-66 367.5,-42 499.5,-42 499.5,-66"/>
-<text text-anchor="middle" x="433.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
-</a>
-</g>
+<title>program~nearest_point_1d&#45;&gt;none~set</title>
+<path fill="none" stroke="#ff0000" d="M457.92,-16.54C469.88,-19.69 481.8,-24.79 491,-33 553.86,-89.12 571.19,-195.45 575.85,-241.64"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="572.38,-242.13 576.76,-251.78 579.35,-241.51 572.38,-242.13"/>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;none~set -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="proc~~set4~~CalledByGraph_edge15" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M499.72,-61.4C508.57,-64.57 516.99,-68.95 524,-75 588.41,-130.59 607.88,-237.64 613.43,-283.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="609.97,-284.43 614.54,-293.99 616.93,-283.67 609.97,-284.43"/>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M285.17,-470C301.32,-470 318.36,-470 334.36,-470"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="334.71,-473.5 344.71,-470 334.71,-466.5 334.71,-473.5"/>
 </g>
-<!-- program~nearest_point_3d -->
+<!-- program~shape_c_1d -->
 <g id="proc~~set4~~CalledByGraph_node17" class="node">
-<title>program~nearest_point_3d</title>
-<g id="a_proc~~set4~~CalledByGraph_node17"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-24 382,-24 382,0 485,0 485,-24"/>
-<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
-</a>
-</g>
-</g>
-<!-- program~nearest_point_3d&#45;&gt;none~set -->
-<g id="proc~~set4~~CalledByGraph_edge16" class="edge">
-<title>program~nearest_point_3d&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M485.2,-14.84C499.17,-17.86 513.38,-23.33 524,-33 598.53,-100.9 612.42,-231.28 614.96,-283.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="611.47,-283.86 615.35,-293.71 618.46,-283.58 611.47,-283.86"/>
-</g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~set4~~CalledByGraph_edge17" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.01,-554C323.61,-554 341,-554 357.35,-554"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="357.38,-557.5 367.38,-554 357.38,-550.5 357.38,-557.5"/>
-</g>
-<!-- program~shape_c_3d -->
-<g id="proc~~set4~~CalledByGraph_node19" class="node">
-<title>program~shape_c_3d</title>
-<g id="a_proc~~set4~~CalledByGraph_node19"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-276 186,-276 186,-252 262,-252 262,-276"/>
-<text text-anchor="middle" x="224" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<title>program~shape_c_1d</title>
+<g id="a_proc~~set4~~CalledByGraph_node17"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-192 172,-192 172,-168 248,-168 248,-192"/>
+<text text-anchor="middle" x="210" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~set_c -->
-<g id="proc~~set4~~CalledByGraph_edge21" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~set_c</title>
-<path fill="none" stroke="#00ff66" d="M262.1,-264C289.25,-264 326.96,-264 360,-264"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="360.09,-267.5 370.09,-264 360.09,-260.5 360.09,-267.5"/>
-</g>
-<!-- program~shape_half_ring_3d -->
-<g id="proc~~set4~~CalledByGraph_node20" class="node">
-<title>program~shape_half_ring_3d</title>
-<g id="a_proc~~set4~~CalledByGraph_node20"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-234 166.5,-234 166.5,-210 281.5,-210 281.5,-234"/>
-<text text-anchor="middle" x="224" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
-</a>
-</g>
+<!-- program~shape_c_1d&#45;&gt;proc~set_c -->
+<g id="proc~~set4~~CalledByGraph_edge19" class="edge">
+<title>program~shape_c_1d&#45;&gt;proc~set_c</title>
+<path fill="none" stroke="#00ffc4" d="M248.41,-180C273.62,-180 307.6,-180 337.47,-180"/>
+<polygon fill="#00ffc4" stroke="#00ffc4" points="337.84,-183.5 347.84,-180 337.84,-176.5 337.84,-183.5"/>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~set_half_ring -->
-<g id="proc~~set4~~CalledByGraph_edge22" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~set_half_ring</title>
-<path fill="none" stroke="#00ffcb" d="M281.7,-222C299.97,-222 320.71,-222 340.84,-222"/>
-<polygon fill="#00ffcb" stroke="#00ffcb" points="340.97,-225.5 350.97,-222 340.97,-218.5 340.97,-225.5"/>
-</g>
-<!-- program~shape_hexahedron -->
-<g id="proc~~set4~~CalledByGraph_node21" class="node">
-<title>program~shape_hexahedron</title>
-<g id="a_proc~~set4~~CalledByGraph_node21"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-192 167.5,-192 167.5,-168 280.5,-168 280.5,-192"/>
-<text text-anchor="middle" x="224" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
+<!-- program~shape_circle -->
+<g id="proc~~set4~~CalledByGraph_node18" class="node">
+<title>program~shape_circle</title>
+<g id="a_proc~~set4~~CalledByGraph_node18"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249.5,-150 170.5,-150 170.5,-126 249.5,-126 249.5,-150"/>
+<text text-anchor="middle" x="210" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~set_hexahedron -->
-<g id="proc~~set4~~CalledByGraph_edge23" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~set_hexahedron</title>
-<path fill="none" stroke="#00cbff" d="M280.61,-180C296.56,-180 314.47,-180 332.24,-180"/>
-<polygon fill="#00cbff" stroke="#00cbff" points="332.67,-183.5 342.67,-180 332.67,-176.5 332.67,-183.5"/>
+<!-- program~shape_circle&#45;&gt;proc~set_circle -->
+<g id="proc~~set4~~CalledByGraph_edge20" class="edge">
+<title>program~shape_circle&#45;&gt;proc~set_circle</title>
+<path fill="none" stroke="#00c4ff" d="M249.79,-138C271.95,-138 300.54,-138 327.13,-138"/>
+<polygon fill="#00c4ff" stroke="#00c4ff" points="327.21,-141.5 337.21,-138 327.21,-134.5 327.21,-141.5"/>
 </g>
-<!-- program~shape_ring_3d -->
-<g id="proc~~set4~~CalledByGraph_node22" class="node">
-<title>program~shape_ring_3d</title>
-<g id="a_proc~~set4~~CalledByGraph_node22"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-150 179,-150 179,-126 269,-126 269,-150"/>
-<text text-anchor="middle" x="224" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+<!-- program~shape_half_circle -->
+<g id="proc~~set4~~CalledByGraph_node19" class="node">
+<title>program~shape_half_circle</title>
+<g id="a_proc~~set4~~CalledByGraph_node19"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-108 158,-108 158,-84 262,-84 262,-108"/>
+<text text-anchor="middle" x="210" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~set_ring -->
-<g id="proc~~set4~~CalledByGraph_edge24" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~set_ring</title>
-<path fill="none" stroke="#0066ff" d="M269.01,-138C293.59,-138 324.96,-138 353.63,-138"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="353.65,-141.5 363.65,-138 353.65,-134.5 353.65,-141.5"/>
+<!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
+<g id="proc~~set4~~CalledByGraph_edge21" class="edge">
+<title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
+<path fill="none" stroke="#004eff" d="M262.22,-96C278.08,-96 296.06,-96 313.78,-96"/>
+<polygon fill="#004eff" stroke="#004eff" points="314.17,-99.5 324.17,-96 314.17,-92.5 314.17,-99.5"/>
 </g>
 </g>
 </svg>
@@ -714,7 +669,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set4~2.html b/proc/set4~2.html
index dabba533a..33c6008c9 100644
--- a/proc/set4~2.html
+++ b/proc/set4~2.html
@@ -78,20 +78,20 @@ <h1>set4
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.5% of total for procedures.">31 statements</a>
+                 title=" 0.5% of total for procedures.">36 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">set4</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine set4(this, degree, nc, Xc, Wc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~72"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~65"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~25"></span>
+              <span class="anchor" id="variable-degree~23"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~30"></span>
+              <span class="anchor" id="variable-nc~23"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -203,7 +203,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~31"></span>
+              <span class="anchor" id="variable-xc~27"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -246,418 +246,355 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set4~2~~CalledByGraph Pages: 1 -->
-<svg id="procset42CalledByGraph" width="641pt" height="454pt"
- viewBox="0.00 0.00 641.00 454.44" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set4~2~~CalledByGraph" class="graph" transform="scale(1.25 1.25) rotate(0) translate(4 566)">
+<svg id="procset42CalledByGraph" width="641pt" height="488pt"
+ viewBox="0.00 0.00 641.00 488.05" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set4~2~~CalledByGraph" class="graph" transform="scale(1.31 1.31) rotate(0) translate(4 633.29)">
 <title>proc~~set4~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-566 800,-566 800,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-633.29 833,-633.29 833,4 -4,4"/>
 <!-- proc~set4~2 -->
 <g id="proc~~set4~2~~CalledByGraph_node1" class="node">
 <title>proc~set4~2</title>
-<polygon fill="none" stroke="black" points="796,-297 676,-297 676,-273 796,-273 796,-297"/>
-<text text-anchor="middle" x="736" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set4</text>
+<polygon fill="none" stroke="black" points="829,-318 709,-318 709,-294 829,-294 829,-318"/>
+<text text-anchor="middle" x="769" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set4</text>
 </g>
 <!-- none~set~2 -->
 <g id="proc~~set4~2~~CalledByGraph_node2" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="640,-297 527,-297 527,-273 640,-273 640,-297"/>
-<text text-anchor="middle" x="583.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<g id="a_proc~~set4~2~~CalledByGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="673,-318 560,-318 560,-294 673,-294 673,-318"/>
+<text text-anchor="middle" x="616.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
 <!-- none~set~2&#45;&gt;proc~set4~2 -->
 <g id="proc~~set4~2~~CalledByGraph_edge1" class="edge">
 <title>none~set~2&#45;&gt;proc~set4~2</title>
-<path fill="none" stroke="#ff0000" d="M640.11,-285C648.48,-285 657.19,-285 665.8,-285"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="665.83,-288.5 675.83,-285 665.83,-281.5 665.83,-288.5"/>
+<path fill="none" stroke="#ff0000" d="M673.11,-306C681.48,-306 690.19,-306 698.8,-306"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="698.83,-309.5 708.83,-306 698.83,-302.5 698.83,-309.5"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~set4~2~~CalledByGraph_node3" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="467,-562 335,-562 335,-538 467,-538 467,-562"/>
-<text text-anchor="middle" x="401" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~set4~2~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-566 367.5,-566 367.5,-542 499.5,-542 499.5,-566"/>
+<text text-anchor="middle" x="433.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;none~set~2 -->
 <g id="proc~~set4~2~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M467.04,-538.75C475.81,-535.12 484.14,-530.33 491,-524 555.57,-464.48 574.98,-354.4 580.47,-307.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="583.96,-307.57 581.54,-297.26 577,-306.83 583.96,-307.57"/>
+<path fill="none" stroke="#ff0000" d="M499.76,-542.65C508.6,-539.03 517.01,-534.27 524,-528 584.64,-473.59 606.02,-372.87 612.74,-328.26"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="616.23,-328.58 614.15,-318.19 609.3,-327.61 616.23,-328.58"/>
 </g>
 <!-- proc~elevate_degree~2 -->
 <g id="proc~~set4~2~~CalledByGraph_node4" class="node">
 <title>proc~elevate_degree~2</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="491,-360 311,-360 311,-336 491,-336 491,-360"/>
-<text text-anchor="middle" x="401" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
+<g id="a_proc~~set4~2~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="523.5,-486 343.5,-486 343.5,-462 523.5,-462 523.5,-486"/>
+<text text-anchor="middle" x="433.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~2&#45;&gt;none~set~2 -->
 <g id="proc~~set4~2~~CalledByGraph_edge3" class="edge">
 <title>proc~elevate_degree~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M460.4,-335.97C470.7,-333.36 481.24,-330.35 491,-327 511.36,-320 533.32,-310.01 550.61,-301.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="552.31,-304.6 559.7,-297.01 549.19,-298.33 552.31,-304.6"/>
+<path fill="none" stroke="#ff0000" d="M507.95,-461.94C513.63,-459.48 519.07,-456.54 524,-453 568.52,-421.06 596.03,-360.08 608.18,-327.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="611.5,-328.73 611.59,-318.14 604.91,-326.36 611.5,-328.73"/>
 </g>
 <!-- proc~insert_knots~2 -->
 <g id="proc~~set4~2~~CalledByGraph_node5" class="node">
 <title>proc~insert_knots~2</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-482 320.5,-482 320.5,-458 481.5,-458 481.5,-482"/>
-<text text-anchor="middle" x="401" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
+<g id="a_proc~~set4~2~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="514,-444 353,-444 353,-420 514,-420 514,-444"/>
+<text text-anchor="middle" x="433.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~2&#45;&gt;none~set~2 -->
 <g id="proc~~set4~2~~CalledByGraph_edge4" class="edge">
 <title>proc~insert_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M475.67,-457.96C481.12,-455.5 486.31,-452.54 491,-449 539.34,-412.5 565.71,-342.6 576.53,-307.01"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="579.97,-307.72 579.4,-297.14 573.25,-305.76 579.97,-307.72"/>
+<path fill="none" stroke="#ff0000" d="M505.06,-419.93C511.69,-417.49 518.12,-414.54 524,-411 558.92,-389.96 587.54,-351.08 603,-327"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="606.13,-328.6 608.45,-318.26 600.19,-324.89 606.13,-328.6"/>
 </g>
 <!-- proc~modify_wc~2 -->
 <g id="proc~~set4~2~~CalledByGraph_node6" class="node">
 <title>proc~modify_wc~2</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_surface%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="479,-318 323,-318 323,-294 479,-294 479,-318"/>
-<text text-anchor="middle" x="401" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
+<g id="a_proc~~set4~2~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc~2.html" xlink:title="nurbs_volume%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="511.5,-360 355.5,-360 355.5,-336 511.5,-336 511.5,-360"/>
+<text text-anchor="middle" x="433.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~2&#45;&gt;none~set~2 -->
 <g id="proc~~set4~2~~CalledByGraph_edge5" class="edge">
 <title>proc~modify_wc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M479.07,-297.03C491.65,-295.57 504.57,-294.07 516.84,-292.64"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="517.44,-296.09 526.97,-291.46 516.63,-289.14 517.44,-296.09"/>
+<path fill="none" stroke="#ff0000" d="M486.37,-335.96C507.38,-331.09 531.82,-325.42 553.75,-320.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="554.68,-323.71 563.63,-318.04 553.09,-316.89 554.68,-323.71"/>
 </g>
 <!-- proc~modify_xc~2 -->
 <g id="proc~~set4~2~~CalledByGraph_node7" class="node">
 <title>proc~modify_xc~2</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-276 324.5,-276 324.5,-252 477.5,-252 477.5,-276"/>
-<text text-anchor="middle" x="401" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
+<g id="a_proc~~set4~2~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_volume%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="510,-318 357,-318 357,-294 510,-294 510,-318"/>
+<text text-anchor="middle" x="433.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~2&#45;&gt;none~set~2 -->
 <g id="proc~~set4~2~~CalledByGraph_edge6" class="edge">
 <title>proc~modify_xc~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M477.5,-272.78C490.54,-274.3 503.99,-275.87 516.74,-277.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="516.46,-280.84 526.8,-278.52 517.27,-273.89 516.46,-280.84"/>
+<path fill="none" stroke="#ff0000" d="M510.21,-306C523.36,-306 536.93,-306 549.79,-306"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="549.92,-309.5 559.92,-306 549.92,-302.5 549.92,-309.5"/>
 </g>
 <!-- proc~remove_knots~2 -->
 <g id="proc~~set4~2~~CalledByGraph_node8" class="node">
 <title>proc~remove_knots~2</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="487,-440 315,-440 315,-416 487,-416 487,-440"/>
-<text text-anchor="middle" x="401" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
+<g id="a_proc~~set4~2~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="519.5,-402 347.5,-402 347.5,-378 519.5,-378 519.5,-402"/>
+<text text-anchor="middle" x="433.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~2&#45;&gt;none~set~2 -->
 <g id="proc~~set4~2~~CalledByGraph_edge7" class="edge">
 <title>proc~remove_knots~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M462.24,-415.98C472.34,-412.44 482.34,-407.87 491,-402 527.88,-377 556.66,-332.45 571.47,-306.13"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="574.56,-307.78 576.29,-297.32 568.42,-304.42 574.56,-307.78"/>
+<path fill="none" stroke="#ff0000" d="M499.01,-377.92C507.58,-375.44 516.12,-372.49 524,-369 549.77,-357.6 575.92,-338.69 593.63,-324.56"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="596.07,-327.09 601.61,-318.06 591.65,-321.66 596.07,-327.09"/>
 </g>
 <!-- proc~set_c~2 -->
 <g id="proc~~set4~2~~CalledByGraph_node9" class="node">
 <title>proc~set_c~2</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node9"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_surface%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="464,-108 338,-108 338,-84 464,-84 464,-108"/>
-<text text-anchor="middle" x="401" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
+<g id="a_proc~~set4~2~~CalledByGraph_node9"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_volume%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="496.5,-276 370.5,-276 370.5,-252 496.5,-252 496.5,-276"/>
+<text text-anchor="middle" x="433.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c~2&#45;&gt;none~set~2 -->
 <g id="proc~~set4~2~~CalledByGraph_edge8" class="edge">
 <title>proc~set_c~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M464.39,-103.61C473.92,-106.72 483.18,-111.03 491,-117 540.26,-154.6 566.32,-226.63 576.83,-262.93"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="573.46,-263.87 579.5,-272.57 580.2,-262 573.46,-263.87"/>
+<path fill="none" stroke="#ff0000" d="M486.37,-276.04C507.38,-280.91 531.82,-286.58 553.75,-291.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="553.09,-295.11 563.63,-293.96 554.68,-288.29 553.09,-295.11"/>
 </g>
-<!-- proc~set_half_ring~2 -->
+<!-- proc~set_half_ring -->
 <g id="proc~~set4~2~~CalledByGraph_node10" class="node">
-<title>proc~set_half_ring~2</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node10"><a xlink:href="../proc/set_half_ring~2.html" xlink:title="nurbs_surface%set_half_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="483.5,-150 318.5,-150 318.5,-126 483.5,-126 483.5,-150"/>
-<text text-anchor="middle" x="401" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
+<title>proc~set_half_ring</title>
+<g id="a_proc~~set4~2~~CalledByGraph_node10"><a xlink:href="../proc/set_half_ring.html" xlink:title="nurbs_volume%set_half_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="516,-234 351,-234 351,-210 516,-210 516,-234"/>
+<text text-anchor="middle" x="433.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_half_ring&#45;&gt;none~set~2 -->
 <g id="proc~~set4~2~~CalledByGraph_edge9" class="edge">
-<title>proc~set_half_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M473.87,-150.11C479.91,-152.55 485.71,-155.48 491,-159 530.66,-185.4 559.08,-235.16 572.94,-263.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="569.8,-265.16 577.22,-272.71 576.13,-262.17 569.8,-265.16"/>
+<title>proc~set_half_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M499.01,-234.08C507.58,-236.56 516.12,-239.51 524,-243 549.77,-254.4 575.92,-273.31 593.63,-287.44"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="591.65,-290.34 601.61,-293.94 596.07,-284.91 591.65,-290.34"/>
 </g>
-<!-- proc~set_ring~2 -->
+<!-- proc~set_hexahedron -->
 <g id="proc~~set4~2~~CalledByGraph_node11" class="node">
-<title>proc~set_ring~2</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node11"><a xlink:href="../proc/set_ring~2.html" xlink:title="nurbs_surface%set_ring">
-<polygon fill="#d9534f" stroke="#d9534f" points="470.5,-192 331.5,-192 331.5,-168 470.5,-168 470.5,-192"/>
-<text text-anchor="middle" x="401" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
+<title>proc~set_hexahedron</title>
+<g id="a_proc~~set4~2~~CalledByGraph_node11"><a xlink:href="../proc/set_hexahedron.html" xlink:title="nurbs_volume%set_hexahedron">
+<polygon fill="#d9534f" stroke="#d9534f" points="524,-192 343,-192 343,-168 524,-168 524,-192"/>
+<text text-anchor="middle" x="433.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_hexahedron&#45;&gt;none~set~2 -->
 <g id="proc~~set4~2~~CalledByGraph_edge10" class="edge">
-<title>proc~set_ring~2&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M469.92,-192.15C477.23,-194.59 484.41,-197.51 491,-201 521.51,-217.17 549.65,-245.97 566.45,-265.28"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="563.79,-267.55 572.93,-272.91 569.12,-263.02 563.79,-267.55"/>
+<title>proc~set_hexahedron&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M505.06,-192.07C511.69,-194.51 518.12,-197.46 524,-201 558.92,-222.04 587.54,-260.92 603,-285"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="600.19,-287.11 608.45,-293.74 606.13,-283.4 600.19,-287.11"/>
 </g>
-<!-- proc~set_tetragon -->
+<!-- proc~set_ring -->
 <g id="proc~~set4~2~~CalledByGraph_node12" class="node">
-<title>proc~set_tetragon</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node12"><a xlink:href="../proc/set_tetragon.html" xlink:title="nurbs_surface%set_tetragon">
-<polygon fill="#d9534f" stroke="#d9534f" points="483,-234 319,-234 319,-210 483,-210 483,-234"/>
-<text text-anchor="middle" x="401" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
+<title>proc~set_ring</title>
+<g id="a_proc~~set4~2~~CalledByGraph_node12"><a xlink:href="../proc/set_ring.html" xlink:title="nurbs_volume%set_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="503,-150 364,-150 364,-126 503,-126 503,-150"/>
+<text text-anchor="middle" x="433.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
+<!-- proc~set_ring&#45;&gt;none~set~2 -->
 <g id="proc~~set4~2~~CalledByGraph_edge11" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M460.4,-234.03C470.7,-236.64 481.24,-239.65 491,-243 511.36,-250 533.32,-259.99 550.61,-268.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="549.19,-271.67 559.7,-272.99 552.31,-265.4 549.19,-271.67"/>
+<title>proc~set_ring&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M503.41,-148.22C510.74,-151.01 517.78,-154.53 524,-159 568.52,-190.94 596.03,-251.92 608.18,-284.39"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="604.91,-285.64 611.59,-293.86 611.5,-283.27 604.91,-285.64"/>
 </g>
-<!-- program~compute_area -->
+<!-- program~compute_volume -->
 <g id="proc~~set4~2~~CalledByGraph_node13" class="node">
-<title>program~compute_area</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node13"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-542 0,-542 0,-518 89,-518 89,-542"/>
-<text text-anchor="middle" x="44.5" y="-527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<title>program~compute_volume</title>
+<g id="a_proc~~set4~2~~CalledByGraph_node13"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-586 0,-586 0,-562 105,-562 105,-586"/>
+<text text-anchor="middle" x="52.5" y="-571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;none~set~2 -->
+<!-- program~compute_volume&#45;&gt;none~set~2 -->
 <g id="proc~~set4~2~~CalledByGraph_edge12" class="edge">
-<title>program~compute_area&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M89.19,-528.67C195.01,-525.11 458.77,-514.01 491,-491 552.97,-446.76 573.59,-350.77 579.93,-307.25"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="583.42,-307.52 581.27,-297.15 576.48,-306.6 583.42,-307.52"/>
+<title>program~compute_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M86.78,-586.01C169.65,-613.64 388.35,-672.14 524,-575 605.44,-516.68 615.25,-381.64 615.83,-328.27"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="619.33,-328.19 615.83,-318.18 612.33,-328.18 619.33,-328.19"/>
 </g>
-<!-- proc~cmp_area -->
-<g id="proc~~set4~2~~CalledByGraph_node17" class="node">
-<title>proc~cmp_area</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node17"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="275,-562 125,-562 125,-538 275,-538 275,-562"/>
-<text text-anchor="middle" x="200" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<!-- proc~cmp_volume -->
+<g id="proc~~set4~2~~CalledByGraph_node18" class="node">
+<title>proc~cmp_volume</title>
+<g id="a_proc~~set4~2~~CalledByGraph_node18"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-566 141,-566 141,-542 307,-542 307,-566"/>
+<text text-anchor="middle" x="224" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;proc~cmp_area -->
-<g id="proc~~set4~2~~CalledByGraph_edge31" class="edge">
-<title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M89.08,-535.68C97.19,-536.73 105.92,-537.87 114.78,-539.03"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="114.45,-542.51 124.81,-540.33 115.35,-535.57 114.45,-542.51"/>
+<!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
+<g id="proc~~set4~2~~CalledByGraph_edge25" class="edge">
+<title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
+<path fill="none" stroke="#ff0000" d="M105.28,-567.89C113.48,-566.92 122.18,-565.9 130.98,-564.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="131.41,-568.33 140.93,-563.68 130.59,-561.38 131.41,-568.33"/>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~set4~2~~CalledByGraph_node14" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node14"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="255,-420 145,-420 145,-396 255,-396 255,-420"/>
-<text text-anchor="middle" x="200" y="-405.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<title>program~example3_volume</title>
+<g id="a_proc~~set4~2~~CalledByGraph_node14"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="279,-465 169,-465 169,-441 279,-441 279,-465"/>
+<text text-anchor="middle" x="224" y="-450.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;none~set~2 -->
+<!-- program~example3_volume&#45;&gt;none~set~2 -->
 <g id="proc~~set4~2~~CalledByGraph_edge13" class="edge">
-<title>program~example3_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M255.17,-404.6C327.24,-399.42 450.29,-388.08 491,-369 522.44,-354.27 550.52,-324.84 567.04,-305.03"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="569.81,-307.17 573.38,-297.2 564.37,-302.77 569.81,-307.17"/>
-</g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
-<g id="proc~~set4~2~~CalledByGraph_edge17" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
-<path fill="none" stroke="#ff6d00" d="M239.39,-395.97C260.5,-389.4 287.17,-381.16 311,-374 323.16,-370.34 336.28,-366.47 348.62,-362.86"/>
-<polygon fill="#ff6d00" stroke="#ff6d00" points="349.69,-366.2 358.3,-360.04 347.72,-359.48 349.69,-366.2"/>
+<title>program~example3_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M246.93,-465.12C299.32,-492.29 434.06,-551.38 524,-495 583.54,-457.67 605.3,-369.39 612.41,-328.06"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="615.87,-328.6 613.98,-318.18 608.95,-327.5 615.87,-328.6"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
 <g id="proc~~set4~2~~CalledByGraph_edge18" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
-<path fill="none" stroke="#ffda00" d="M230.54,-420.16C252.49,-428.91 283.3,-440.61 311,-449 318.48,-451.27 326.37,-453.44 334.24,-455.47"/>
-<polygon fill="#ffda00" stroke="#ffda00" points="333.62,-458.92 344.17,-457.96 335.32,-452.13 333.62,-458.92"/>
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
+<path fill="none" stroke="#ff6600" d="M279.25,-458.49C295.84,-460.17 314.64,-462.07 333.24,-463.95"/>
+<polygon fill="#ff6600" stroke="#ff6600" points="332.94,-467.44 343.24,-464.97 333.64,-460.48 332.94,-467.44"/>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
+<g id="proc~~set4~2~~CalledByGraph_edge19" class="edge">
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
+<path fill="none" stroke="#ffcc00" d="M279.25,-447.51C298.63,-445.55 321.03,-443.28 342.61,-441.1"/>
+<polygon fill="#ffcc00" stroke="#ffcc00" points="343.19,-444.56 352.79,-440.07 342.49,-437.59 343.19,-444.56"/>
+</g>
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
 <g id="proc~~set4~2~~CalledByGraph_edge20" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
-<path fill="none" stroke="#00ff24" d="M255.11,-413.44C270.51,-414.99 287.75,-416.72 304.82,-418.43"/>
-<polygon fill="#00ff24" stroke="#00ff24" points="304.53,-421.92 314.83,-419.44 305.23,-414.96 304.53,-421.92"/>
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
+<path fill="none" stroke="#00ff00" d="M255.75,-440.99C279.38,-432.02 312.96,-419.84 343,-411 350.73,-408.73 358.89,-406.53 367.01,-404.47"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="368,-407.84 376.87,-402.04 366.32,-401.04 368,-407.84"/>
 </g>
-<!-- program~example_nurbs_surface -->
+<!-- program~example_nurbs_volume -->
 <g id="proc~~set4~2~~CalledByGraph_node15" class="node">
-<title>program~example_nurbs_surface</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node15"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 331.5,-66 331.5,-42 470.5,-42 470.5,-66"/>
-<text text-anchor="middle" x="401" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<title>program~example_nurbs_volume</title>
+<g id="a_proc~~set4~2~~CalledByGraph_node15"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-108 364,-108 364,-84 503,-84 503,-108"/>
+<text text-anchor="middle" x="433.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;none~set~2 -->
+<!-- program~example_nurbs_volume&#45;&gt;none~set~2 -->
 <g id="proc~~set4~2~~CalledByGraph_edge14" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M470.75,-63.21C478.08,-66.17 485.03,-70.01 491,-75 550.25,-124.48 572.25,-219.65 579.43,-262.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="575.99,-263.45 580.98,-272.8 582.91,-262.38 575.99,-263.45"/>
+<title>program~example_nurbs_volume&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M503.44,-105.4C510.85,-108.33 517.9,-112.11 524,-117 578.22,-160.42 602.42,-243.9 611.25,-283.76"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="607.82,-284.49 613.3,-293.56 614.67,-283.05 607.82,-284.49"/>
 </g>
-<!-- program~nearest_point_2d -->
+<!-- program~example_put_to_nurbs -->
 <g id="proc~~set4~2~~CalledByGraph_node16" class="node">
-<title>program~nearest_point_2d</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node16"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452.5,-24 349.5,-24 349.5,0 452.5,0 452.5,-24"/>
-<text text-anchor="middle" x="401" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+<title>program~example_put_to_nurbs</title>
+<g id="a_proc~~set4~2~~CalledByGraph_node16"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-66 367.5,-66 367.5,-42 499.5,-42 499.5,-66"/>
+<text text-anchor="middle" x="433.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;none~set~2 -->
+<!-- program~example_put_to_nurbs&#45;&gt;none~set~2 -->
 <g id="proc~~set4~2~~CalledByGraph_edge15" class="edge">
-<title>program~nearest_point_2d&#45;&gt;none~set~2</title>
-<path fill="none" stroke="#ff0000" d="M452.73,-15.16C466.47,-18.21 480.44,-23.61 491,-33 560.36,-94.71 577.18,-213.24 581.23,-262.59"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="577.76,-263.07 581.96,-272.8 584.74,-262.57 577.76,-263.07"/>
-</g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~set4~2~~CalledByGraph_edge16" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ff0000" d="M275.1,-550C291.15,-550 308.13,-550 324.24,-550"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="324.68,-553.5 334.68,-550 324.68,-546.5 324.68,-553.5"/>
+<title>program~example_put_to_nurbs&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M499.72,-61.4C508.57,-64.57 516.99,-68.95 524,-75 588.41,-130.59 607.88,-237.64 613.43,-283.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="609.97,-284.43 614.54,-293.99 616.93,-283.67 609.97,-284.43"/>
 </g>
-<!-- program~example_ppm1 -->
-<g id="proc~~set4~2~~CalledByGraph_node18" class="node">
-<title>program~example_ppm1</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node18"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-192 153,-192 153,-168 247,-168 247,-192"/>
-<text text-anchor="middle" x="200" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
+<!-- program~nearest_point_3d -->
+<g id="proc~~set4~2~~CalledByGraph_node17" class="node">
+<title>program~nearest_point_3d</title>
+<g id="a_proc~~set4~2~~CalledByGraph_node17"><a xlink:href="../program/nearest_point_3d.html" xlink:title="nearest_point_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-24 382,-24 382,0 485,0 485,-24"/>
+<text text-anchor="middle" x="433.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~set_ring~2 -->
-<g id="proc~~set4~2~~CalledByGraph_edge24" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#0091ff" d="M247.15,-180C269.15,-180 296.09,-180 321.19,-180"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="321.45,-183.5 331.45,-180 321.45,-176.5 321.45,-183.5"/>
+<!-- program~nearest_point_3d&#45;&gt;none~set~2 -->
+<g id="proc~~set4~2~~CalledByGraph_edge16" class="edge">
+<title>program~nearest_point_3d&#45;&gt;none~set~2</title>
+<path fill="none" stroke="#ff0000" d="M485.2,-14.84C499.17,-17.86 513.38,-23.33 524,-33 598.53,-100.9 612.42,-231.28 614.96,-283.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="611.47,-283.86 615.35,-293.71 618.46,-283.58 611.47,-283.86"/>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set4~2~~CalledByGraph_edge26" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.15,-189.74C272.73,-195.14 304.98,-201.95 333.26,-207.91"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="332.57,-211.34 343.07,-209.99 334.01,-204.5 332.57,-211.34"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~set4~2~~CalledByGraph_edge17" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ff0000" d="M307.01,-554C323.61,-554 341,-554 357.35,-554"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="357.38,-557.5 367.38,-554 357.38,-550.5 357.38,-557.5"/>
 </g>
-<!-- program~example_ppm2 -->
+<!-- program~shape_c_3d -->
 <g id="proc~~set4~2~~CalledByGraph_node19" class="node">
-<title>program~example_ppm2</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node19"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-150 153,-150 153,-126 247,-126 247,-150"/>
-<text text-anchor="middle" x="200" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+<title>program~shape_c_3d</title>
+<g id="a_proc~~set4~2~~CalledByGraph_node19"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-276 186,-276 186,-252 262,-252 262,-276"/>
+<text text-anchor="middle" x="224" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~set_half_ring~2 -->
-<g id="proc~~set4~2~~CalledByGraph_edge22" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#00ffff" d="M247.15,-138C265.39,-138 287.03,-138 308.19,-138"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="308.2,-141.5 318.2,-138 308.2,-134.5 308.2,-141.5"/>
-</g>
-<!-- program~example_ppm2&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set4~2~~CalledByGraph_edge27" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.02,-146.55C256.72,-149.56 266.56,-153.6 275,-159 295.71,-172.25 290,-188.21 311,-201 314.01,-202.83 317.16,-204.5 320.41,-206.03"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="319.22,-209.32 329.8,-209.95 321.92,-202.87 319.22,-209.32"/>
+<!-- program~shape_c_3d&#45;&gt;proc~set_c~2 -->
+<g id="proc~~set4~2~~CalledByGraph_edge21" class="edge">
+<title>program~shape_c_3d&#45;&gt;proc~set_c~2</title>
+<path fill="none" stroke="#00ff66" d="M262.1,-264C289.25,-264 326.96,-264 360,-264"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="360.09,-267.5 370.09,-264 360.09,-260.5 360.09,-267.5"/>
 </g>
-<!-- program~example_ppm3 -->
+<!-- program~shape_half_ring_3d -->
 <g id="proc~~set4~2~~CalledByGraph_node20" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node20"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-318 153,-318 153,-294 247,-294 247,-318"/>
-<text text-anchor="middle" x="200" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+<title>program~shape_half_ring_3d</title>
+<g id="a_proc~~set4~2~~CalledByGraph_node20"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="281.5,-234 166.5,-234 166.5,-210 281.5,-210 281.5,-234"/>
+<text text-anchor="middle" x="224" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
-<g id="proc~~set4~2~~CalledByGraph_edge19" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
-<path fill="none" stroke="#48ff00" d="M247.15,-296.26C272.73,-290.86 304.98,-284.05 333.26,-278.09"/>
-<polygon fill="#48ff00" stroke="#48ff00" points="334.01,-281.5 343.07,-276.01 332.57,-274.66 334.01,-281.5"/>
-</g>
-<!-- program~example_ppm3&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set4~2~~CalledByGraph_edge28" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M247.02,-297.45C256.72,-294.44 266.56,-290.4 275,-285 295.71,-271.75 290,-255.79 311,-243 314.01,-241.17 317.16,-239.5 320.41,-237.97"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="321.92,-241.13 329.8,-234.05 319.22,-234.68 321.92,-241.13"/>
+<!-- program~shape_half_ring_3d&#45;&gt;proc~set_half_ring -->
+<g id="proc~~set4~2~~CalledByGraph_edge22" class="edge">
+<title>program~shape_half_ring_3d&#45;&gt;proc~set_half_ring</title>
+<path fill="none" stroke="#00ffcb" d="M281.7,-222C299.97,-222 320.71,-222 340.84,-222"/>
+<polygon fill="#00ffcb" stroke="#00ffcb" points="340.97,-225.5 350.97,-222 340.97,-218.5 340.97,-225.5"/>
 </g>
-<!-- program~nearest_point_2d_bench -->
+<!-- program~shape_hexahedron -->
 <g id="proc~~set4~2~~CalledByGraph_node21" class="node">
-<title>program~nearest_point_2d_bench</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node21"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-234 129,-234 129,-210 271,-210 271,-234"/>
-<text text-anchor="middle" x="200" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+<title>program~shape_hexahedron</title>
+<g id="a_proc~~set4~2~~CalledByGraph_node21"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="280.5,-192 167.5,-192 167.5,-168 280.5,-168 280.5,-192"/>
+<text text-anchor="middle" x="224" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set4~2~~CalledByGraph_edge29" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M271.16,-222C283.34,-222 296.17,-222 308.82,-222"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="308.91,-225.5 318.91,-222 308.91,-218.5 308.91,-225.5"/>
-</g>
-<!-- program~shape_c_2d -->
-<g id="proc~~set4~2~~CalledByGraph_node22" class="node">
-<title>program~shape_c_2d</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node22"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="238,-24 162,-24 162,0 238,0 238,-24"/>
-<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_c_2d&#45;&gt;proc~set_c~2 -->
-<g id="proc~~set4~2~~CalledByGraph_edge21" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~set_c~2</title>
-<path fill="none" stroke="#00ff91" d="M238.17,-18.06C250.55,-21.21 263.98,-25.94 275,-33 295.71,-46.25 290,-62.21 311,-75 316.34,-78.25 322.14,-81 328.14,-83.32"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="327.09,-86.66 337.68,-86.63 329.38,-80.05 327.09,-86.66"/>
-</g>
-<!-- program~shape_half_ring_2d -->
-<g id="proc~~set4~2~~CalledByGraph_node23" class="node">
-<title>program~shape_half_ring_2d</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node23"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="257.5,-66 142.5,-66 142.5,-42 257.5,-42 257.5,-66"/>
-<text text-anchor="middle" x="200" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2 -->
+<!-- program~shape_hexahedron&#45;&gt;proc~set_hexahedron -->
 <g id="proc~~set4~2~~CalledByGraph_edge23" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2</title>
-<path fill="none" stroke="#00ffff" d="M257.09,-66.07C263.38,-68.53 269.49,-71.47 275,-75 295.71,-88.25 290,-104.21 311,-117 314.01,-118.83 317.16,-120.5 320.41,-122.03"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="319.22,-125.32 329.8,-125.95 321.92,-118.87 319.22,-125.32"/>
-</g>
-<!-- program~shape_ring_2d -->
-<g id="proc~~set4~2~~CalledByGraph_node24" class="node">
-<title>program~shape_ring_2d</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node24"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="245,-108 155,-108 155,-84 245,-84 245,-108"/>
-<text text-anchor="middle" x="200" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
-</a>
+<title>program~shape_hexahedron&#45;&gt;proc~set_hexahedron</title>
+<path fill="none" stroke="#00cbff" d="M280.61,-180C296.56,-180 314.47,-180 332.24,-180"/>
+<polygon fill="#00cbff" stroke="#00cbff" points="332.67,-183.5 342.67,-180 332.67,-176.5 332.67,-183.5"/>
 </g>
-</g>
-<!-- program~shape_ring_2d&#45;&gt;proc~set_ring~2 -->
-<g id="proc~~set4~2~~CalledByGraph_edge25" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~set_ring~2</title>
-<path fill="none" stroke="#0091ff" d="M245.08,-103.96C255.4,-107.03 266,-111.24 275,-117 295.71,-130.25 290,-146.21 311,-159 314.41,-161.08 318.01,-162.95 321.73,-164.64"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="320.6,-167.95 331.18,-168.46 323.22,-161.46 320.6,-167.95"/>
-</g>
-<!-- program~shape_tetragon -->
-<g id="proc~~set4~2~~CalledByGraph_node25" class="node">
-<title>program~shape_tetragon</title>
-<g id="a_proc~~set4~2~~CalledByGraph_node25"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-276 152,-276 152,-252 248,-252 248,-276"/>
-<text text-anchor="middle" x="200" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<!-- program~shape_ring_3d -->
+<g id="proc~~set4~2~~CalledByGraph_node22" class="node">
+<title>program~shape_ring_3d</title>
+<g id="a_proc~~set4~2~~CalledByGraph_node22"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="269,-150 179,-150 179,-126 269,-126 269,-150"/>
+<text text-anchor="middle" x="224" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~set_tetragon -->
-<g id="proc~~set4~2~~CalledByGraph_edge30" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~set_tetragon</title>
-<path fill="none" stroke="#0024ff" d="M248.16,-254.05C273.44,-248.71 305.03,-242.04 332.84,-236.17"/>
-<polygon fill="#0024ff" stroke="#0024ff" points="333.83,-239.54 342.89,-234.05 332.39,-232.69 333.83,-239.54"/>
+<!-- program~shape_ring_3d&#45;&gt;proc~set_ring -->
+<g id="proc~~set4~2~~CalledByGraph_edge24" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~set_ring</title>
+<path fill="none" stroke="#0066ff" d="M269.01,-138C293.59,-138 324.96,-138 353.63,-138"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="353.65,-141.5 363.65,-138 353.65,-134.5 353.65,-141.5"/>
 </g>
 </g>
 </svg>
@@ -777,7 +714,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set4~3.html b/proc/set4~3.html
index 48d8f4ac6..67c42a396 100644
--- a/proc/set4~3.html
+++ b/proc/set4~3.html
@@ -78,20 +78,20 @@ <h1>set4
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.4% of total for procedures.">26 statements</a>
+                 title=" 0.5% of total for procedures.">31 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">set4</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine set4(this, degree, nc, Xc, Wc)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~136"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~133"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,37 +173,37 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~56"></span>
+              <span class="anchor" id="variable-degree~55"></span>
               integer,
             </td>
-<td>intent(in)</td>
+<td>intent(in),</td>
               <td></td>            <td>
-              
+              contiguous
             </td>
             <td>::</td>
-            <td><strong>degree</strong></td>
+            <td><strong>degree</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~60"></span>
+              <span class="anchor" id="variable-nc~58"></span>
               integer,
             </td>
-<td>intent(in)</td>
+<td>intent(in),</td>
               <td></td>            <td>
-              
+              contiguous
             </td>
             <td>::</td>
-            <td><strong>nc</strong></td>
+            <td><strong>nc</strong>(:)</td>
             <td>
                 
             </td>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~56"></span>
+              <span class="anchor" id="variable-xc~49"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -218,7 +218,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~53"></span>
+              <span class="anchor" id="variable-wc~50"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -246,310 +246,418 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set4~3~~CalledByGraph Pages: 1 -->
-<svg id="procset43CalledByGraph" width="641pt" height="448pt"
- viewBox="0.00 0.00 641.00 448.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set4~3~~CalledByGraph" class="graph" transform="scale(1.22 1.22) rotate(0) translate(4 544.5)">
+<svg id="procset43CalledByGraph" width="641pt" height="454pt"
+ viewBox="0.00 0.00 641.00 454.44" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set4~3~~CalledByGraph" class="graph" transform="scale(1.25 1.25) rotate(0) translate(4 566)">
 <title>proc~~set4~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-544.5 780,-544.5 780,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-566 800,-566 800,4 -4,4"/>
 <!-- proc~set4~3 -->
 <g id="proc~~set4~3~~CalledByGraph_node1" class="node">
 <title>proc~set4~3</title>
-<polygon fill="none" stroke="black" points="776,-276 666,-276 666,-252 776,-252 776,-276"/>
-<text text-anchor="middle" x="721" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set4</text>
+<polygon fill="none" stroke="black" points="796,-297 676,-297 676,-273 796,-273 796,-297"/>
+<text text-anchor="middle" x="736" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set4</text>
 </g>
 <!-- none~set~3 -->
 <g id="proc~~set4~3~~CalledByGraph_node2" class="node">
 <title>none~set~3</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="630,-276 527,-276 527,-252 630,-252 630,-276"/>
-<text text-anchor="middle" x="578.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_proc~~set4~3~~CalledByGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="640,-297 527,-297 527,-273 640,-273 640,-297"/>
+<text text-anchor="middle" x="583.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="proc~~set4~3~~CalledByGraph_edge1" class="edge">
 <title>none~set~3&#45;&gt;proc~set4~3</title>
-<path fill="none" stroke="#ff0000" d="M630.22,-264C638.38,-264 646.92,-264 655.35,-264"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="655.55,-267.5 665.55,-264 655.55,-260.5 655.55,-267.5"/>
+<path fill="none" stroke="#ff0000" d="M640.11,-285C648.48,-285 657.19,-285 665.8,-285"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="665.83,-288.5 675.83,-285 665.83,-281.5 665.83,-288.5"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="proc~~set4~3~~CalledByGraph_node3" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="467,-482 345,-482 345,-458 467,-458 467,-482"/>
-<text text-anchor="middle" x="406" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~set4~3~~CalledByGraph_node3"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="467,-562 335,-562 335,-538 467,-538 467,-562"/>
+<text text-anchor="middle" x="401" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;none~set~3 -->
 <g id="proc~~set4~3~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M467.12,-458.13C475.76,-454.59 484.06,-449.98 491,-444 540.47,-401.35 563.98,-323.98 572.94,-286.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="576.41,-286.63 575.18,-276.11 569.58,-285.1 576.41,-286.63"/>
+<path fill="none" stroke="#ff0000" d="M467.04,-538.75C475.81,-535.12 484.14,-530.33 491,-524 555.57,-464.48 574.98,-354.4 580.47,-307.31"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="583.96,-307.57 581.54,-297.26 577,-306.83 583.96,-307.57"/>
 </g>
 <!-- proc~elevate_degree~3 -->
 <g id="proc~~set4~3~~CalledByGraph_node4" class="node">
 <title>proc~elevate_degree~3</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="491,-402 321,-402 321,-378 491,-378 491,-402"/>
-<text text-anchor="middle" x="406" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
+<g id="a_proc~~set4~3~~CalledByGraph_node4"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="491,-360 311,-360 311,-336 491,-336 491,-360"/>
+<text text-anchor="middle" x="401" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~elevate_degree~3&#45;&gt;none~set~3 -->
 <g id="proc~~set4~3~~CalledByGraph_edge3" class="edge">
 <title>proc~elevate_degree~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M472.9,-377.91C479.26,-375.47 485.41,-372.53 491,-369 524.67,-347.73 551.51,-308.93 565.91,-284.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="568.98,-286.61 570.98,-276.21 562.92,-283.09 568.98,-286.61"/>
+<path fill="none" stroke="#ff0000" d="M460.4,-335.97C470.7,-333.36 481.24,-330.35 491,-327 511.36,-320 533.32,-310.01 550.61,-301.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="552.31,-304.6 559.7,-297.01 549.19,-298.33 552.31,-304.6"/>
 </g>
 <!-- proc~insert_knots~3 -->
 <g id="proc~~set4~3~~CalledByGraph_node5" class="node">
 <title>proc~insert_knots~3</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_curve%insert_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-360 330.5,-360 330.5,-336 481.5,-336 481.5,-360"/>
-<text text-anchor="middle" x="406" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
+<g id="a_proc~~set4~3~~CalledByGraph_node5"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="481.5,-482 320.5,-482 320.5,-458 481.5,-458 481.5,-482"/>
+<text text-anchor="middle" x="401" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~insert_knots~3&#45;&gt;none~set~3 -->
 <g id="proc~~set4~3~~CalledByGraph_edge4" class="edge">
 <title>proc~insert_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M467.18,-335.97C475.36,-333.47 483.51,-330.5 491,-327 515.36,-315.61 539.83,-296.96 556.5,-282.9"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="559.18,-285.21 564.46,-276.02 554.6,-279.91 559.18,-285.21"/>
+<path fill="none" stroke="#ff0000" d="M475.67,-457.96C481.12,-455.5 486.31,-452.54 491,-449 539.34,-412.5 565.71,-342.6 576.53,-307.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="579.97,-307.72 579.4,-297.14 573.25,-305.76 579.97,-307.72"/>
 </g>
 <!-- proc~modify_wc~3 -->
 <g id="proc~~set4~3~~CalledByGraph_node6" class="node">
 <title>proc~modify_wc~3</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_curve%modify_Wc">
-<polygon fill="#d9534f" stroke="#d9534f" points="479,-276 333,-276 333,-252 479,-252 479,-276"/>
-<text text-anchor="middle" x="406" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Wc</text>
+<g id="a_proc~~set4~3~~CalledByGraph_node6"><a xlink:href="../proc/modify_wc~3.html" xlink:title="nurbs_surface%modify_Wc">
+<polygon fill="#d9534f" stroke="#d9534f" points="479,-318 323,-318 323,-294 479,-294 479,-318"/>
+<text text-anchor="middle" x="401" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Wc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_wc~3&#45;&gt;none~set~3 -->
 <g id="proc~~set4~3~~CalledByGraph_edge5" class="edge">
 <title>proc~modify_wc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M479.31,-264C491.66,-264 504.39,-264 516.42,-264"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="516.78,-267.5 526.78,-264 516.78,-260.5 516.78,-267.5"/>
+<path fill="none" stroke="#ff0000" d="M479.07,-297.03C491.65,-295.57 504.57,-294.07 516.84,-292.64"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="517.44,-296.09 526.97,-291.46 516.63,-289.14 517.44,-296.09"/>
 </g>
 <!-- proc~modify_xc~3 -->
 <g id="proc~~set4~3~~CalledByGraph_node7" class="node">
 <title>proc~modify_xc~3</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_curve%modify_Xc">
-<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-234 334.5,-234 334.5,-210 477.5,-210 477.5,-234"/>
-<text text-anchor="middle" x="406" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%modify_Xc</text>
+<g id="a_proc~~set4~3~~CalledByGraph_node7"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
+<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-276 324.5,-276 324.5,-252 477.5,-252 477.5,-276"/>
+<text text-anchor="middle" x="401" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
 <!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
 <g id="proc~~set4~3~~CalledByGraph_edge6" class="edge">
 <title>proc~modify_xc~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M455.86,-234.04C475.48,-238.87 498.26,-244.48 518.77,-249.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="518.09,-252.97 528.63,-251.96 519.76,-246.17 518.09,-252.97"/>
+<path fill="none" stroke="#ff0000" d="M477.5,-272.78C490.54,-274.3 503.99,-275.87 516.74,-277.35"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="516.46,-280.84 526.8,-278.52 517.27,-273.89 516.46,-280.84"/>
 </g>
 <!-- proc~remove_knots~3 -->
 <g id="proc~~set4~3~~CalledByGraph_node8" class="node">
 <title>proc~remove_knots~3</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_curve%remove_knots">
-<polygon fill="#d9534f" stroke="#d9534f" points="487,-318 325,-318 325,-294 487,-294 487,-318"/>
-<text text-anchor="middle" x="406" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
+<g id="a_proc~~set4~3~~CalledByGraph_node8"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
+<polygon fill="#d9534f" stroke="#d9534f" points="487,-440 315,-440 315,-416 487,-416 487,-440"/>
+<text text-anchor="middle" x="401" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
 <!-- proc~remove_knots~3&#45;&gt;none~set~3 -->
 <g id="proc~~set4~3~~CalledByGraph_edge7" class="edge">
 <title>proc~remove_knots~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M455.86,-293.96C475.48,-289.13 498.26,-283.52 518.77,-278.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="519.76,-281.83 528.63,-276.04 518.09,-275.03 519.76,-281.83"/>
+<path fill="none" stroke="#ff0000" d="M462.24,-415.98C472.34,-412.44 482.34,-407.87 491,-402 527.88,-377 556.66,-332.45 571.47,-306.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="574.56,-307.78 576.29,-297.32 568.42,-304.42 574.56,-307.78"/>
 </g>
-<!-- proc~set_circle -->
+<!-- proc~set_c~3 -->
 <g id="proc~~set4~3~~CalledByGraph_node9" class="node">
-<title>proc~set_circle</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node9"><a xlink:href="../proc/set_circle.html" xlink:title="nurbs_curve%set_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="474.5,-192 337.5,-192 337.5,-168 474.5,-168 474.5,-192"/>
-<text text-anchor="middle" x="406" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_circle</text>
+<title>proc~set_c~3</title>
+<g id="a_proc~~set4~3~~CalledByGraph_node9"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_surface%set_C">
+<polygon fill="#d9534f" stroke="#d9534f" points="464,-108 338,-108 338,-84 464,-84 464,-108"/>
+<text text-anchor="middle" x="401" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
 </a>
 </g>
 </g>
-<!-- proc~set_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_c~3&#45;&gt;none~set~3 -->
 <g id="proc~~set4~3~~CalledByGraph_edge8" class="edge">
-<title>proc~set_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M467.18,-192.03C475.36,-194.53 483.51,-197.5 491,-201 515.36,-212.39 539.83,-231.04 556.5,-245.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="554.6,-248.09 564.46,-251.98 559.18,-242.79 554.6,-248.09"/>
+<title>proc~set_c~3&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M464.39,-103.61C473.92,-106.72 483.18,-111.03 491,-117 540.26,-154.6 566.32,-226.63 576.83,-262.93"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="573.46,-263.87 579.5,-272.57 580.2,-262 573.46,-263.87"/>
 </g>
-<!-- proc~set_c~3 -->
+<!-- proc~set_half_ring~2 -->
 <g id="proc~~set4~3~~CalledByGraph_node10" class="node">
-<title>proc~set_c~3</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node10"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_curve%set_C">
-<polygon fill="#d9534f" stroke="#d9534f" points="464,-150 348,-150 348,-126 464,-126 464,-150"/>
-<text text-anchor="middle" x="406" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
+<title>proc~set_half_ring~2</title>
+<g id="a_proc~~set4~3~~CalledByGraph_node10"><a xlink:href="../proc/set_half_ring~2.html" xlink:title="nurbs_surface%set_half_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="483.5,-150 318.5,-150 318.5,-126 483.5,-126 483.5,-150"/>
+<text text-anchor="middle" x="401" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_half_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c~3&#45;&gt;none~set~3 -->
+<!-- proc~set_half_ring~2&#45;&gt;none~set~3 -->
 <g id="proc~~set4~3~~CalledByGraph_edge9" class="edge">
-<title>proc~set_c~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M464.15,-147.05C473.55,-149.98 482.87,-153.86 491,-159 524.67,-180.27 551.51,-219.07 565.91,-243.08"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="562.92,-244.91 570.98,-251.79 568.98,-241.39 562.92,-244.91"/>
+<title>proc~set_half_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M473.87,-150.11C479.91,-152.55 485.71,-155.48 491,-159 530.66,-185.4 559.08,-235.16 572.94,-263.61"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="569.8,-265.16 577.22,-272.71 576.13,-262.17 569.8,-265.16"/>
 </g>
-<!-- proc~set_half_circle -->
+<!-- proc~set_ring~2 -->
 <g id="proc~~set4~3~~CalledByGraph_node11" class="node">
-<title>proc~set_half_circle</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node11"><a xlink:href="../proc/set_half_circle.html" xlink:title="nurbs_curve%set_half_circle">
-<polygon fill="#d9534f" stroke="#d9534f" points="487.5,-108 324.5,-108 324.5,-84 487.5,-84 487.5,-108"/>
-<text text-anchor="middle" x="406" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_half_circle</text>
+<title>proc~set_ring~2</title>
+<g id="a_proc~~set4~3~~CalledByGraph_node11"><a xlink:href="../proc/set_ring~2.html" xlink:title="nurbs_surface%set_ring">
+<polygon fill="#d9534f" stroke="#d9534f" points="470.5,-192 331.5,-192 331.5,-168 470.5,-168 470.5,-192"/>
+<text text-anchor="middle" x="401" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_ring</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_ring~2&#45;&gt;none~set~3 -->
 <g id="proc~~set4~3~~CalledByGraph_edge10" class="edge">
-<title>proc~set_half_circle&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M475.62,-108.12C481.09,-110.56 486.3,-113.49 491,-117 534.04,-149.18 559.53,-209.61 570.72,-242.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="567.51,-243.52 573.97,-251.92 574.16,-241.32 567.51,-243.52"/>
+<title>proc~set_ring~2&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M469.92,-192.15C477.23,-194.59 484.41,-197.51 491,-201 521.51,-217.17 549.65,-245.97 566.45,-265.28"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="563.79,-267.55 572.93,-272.91 569.12,-263.02 563.79,-267.55"/>
 </g>
-<!-- program~compute_length -->
+<!-- proc~set_tetragon -->
 <g id="proc~~set4~3~~CalledByGraph_node12" class="node">
-<title>program~compute_length</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node12"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="99,-502 0,-502 0,-478 99,-478 99,-502"/>
-<text text-anchor="middle" x="49.5" y="-487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<title>proc~set_tetragon</title>
+<g id="a_proc~~set4~3~~CalledByGraph_node12"><a xlink:href="../proc/set_tetragon.html" xlink:title="nurbs_surface%set_tetragon">
+<polygon fill="#d9534f" stroke="#d9534f" points="483,-234 319,-234 319,-210 483,-210 483,-234"/>
+<text text-anchor="middle" x="401" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_tetragon</text>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;none~set~3 -->
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
 <g id="proc~~set4~3~~CalledByGraph_edge11" class="edge">
-<title>program~compute_length&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M84.64,-502.01C164.06,-527.61 364.11,-578.44 491,-491 559.8,-443.59 573.92,-333.61 576.79,-286.3"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="580.29,-286.35 577.28,-276.19 573.3,-286.01 580.29,-286.35"/>
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M460.4,-234.03C470.7,-236.64 481.24,-239.65 491,-243 511.36,-250 533.32,-259.99 550.61,-268.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="549.19,-271.67 559.7,-272.99 552.31,-265.4 549.19,-271.67"/>
 </g>
-<!-- proc~cmp_length -->
-<g id="proc~~set4~3~~CalledByGraph_node16" class="node">
-<title>proc~cmp_length</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node16"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="285,-482 135,-482 135,-458 285,-458 285,-482"/>
-<text text-anchor="middle" x="210" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
-</a>
-</g>
-</g>
-<!-- program~compute_length&#45;&gt;proc~cmp_length -->
-<g id="proc~~set4~3~~CalledByGraph_edge22" class="edge">
-<title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#ff0000" d="M99.35,-483.84C107.54,-482.8 116.25,-481.7 125.03,-480.6"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="125.48,-484.07 134.96,-479.34 124.6,-477.12 125.48,-484.07"/>
-</g>
-<!-- program~example1_curve -->
+<!-- program~compute_area -->
 <g id="proc~~set4~3~~CalledByGraph_node13" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node13"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-381 160,-381 160,-357 260,-357 260,-381"/>
-<text text-anchor="middle" x="210" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~compute_area</title>
+<g id="a_proc~~set4~3~~CalledByGraph_node13"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="89,-542 0,-542 0,-518 89,-518 89,-542"/>
+<text text-anchor="middle" x="44.5" y="-527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;none~set~3 -->
+<!-- program~compute_area&#45;&gt;none~set~3 -->
 <g id="proc~~set4~3~~CalledByGraph_edge12" class="edge">
-<title>program~example1_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M233.08,-381.16C282.76,-406.72 405.66,-459.8 491,-411 538.32,-383.94 562.31,-319.79 572.06,-285.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="575.49,-286.59 574.73,-276.02 568.74,-284.75 575.49,-286.59"/>
+<title>program~compute_area&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M89.19,-528.67C195.01,-525.11 458.77,-514.01 491,-491 552.97,-446.76 573.59,-350.77 579.93,-307.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="583.42,-307.52 581.27,-297.15 576.48,-306.6 583.42,-307.52"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
-<g id="proc~~set4~3~~CalledByGraph_edge16" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
-<path fill="none" stroke="#ff7500" d="M260.21,-374.33C275.59,-375.99 293.12,-377.89 310.54,-379.78"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="310.45,-383.29 320.77,-380.88 311.21,-376.33 310.45,-383.29"/>
+<!-- proc~cmp_area -->
+<g id="proc~~set4~3~~CalledByGraph_node17" class="node">
+<title>proc~cmp_area</title>
+<g id="a_proc~~set4~3~~CalledByGraph_node17"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
+<polygon fill="#d9534f" stroke="#d9534f" points="275,-562 125,-562 125,-538 275,-538 275,-562"/>
+<text text-anchor="middle" x="200" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+</a>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
-<g id="proc~~set4~3~~CalledByGraph_edge17" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
-<path fill="none" stroke="#ffeb00" d="M260.21,-363.67C278.44,-361.7 299.67,-359.4 320.17,-357.18"/>
-<polygon fill="#ffeb00" stroke="#ffeb00" points="320.6,-360.66 330.16,-356.1 319.84,-353.7 320.6,-360.66"/>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
-<g id="proc~~set4~3~~CalledByGraph_edge18" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
-<path fill="none" stroke="#00ff4e" d="M239.62,-356.99C261.63,-348.02 292.92,-335.84 321,-327 328.08,-324.77 335.55,-322.62 343,-320.6"/>
-<polygon fill="#00ff4e" stroke="#00ff4e" points="343.97,-323.97 352.75,-318.03 342.19,-317.2 343.97,-323.97"/>
+<!-- program~compute_area&#45;&gt;proc~cmp_area -->
+<g id="proc~~set4~3~~CalledByGraph_edge31" class="edge">
+<title>program~compute_area&#45;&gt;proc~cmp_area</title>
+<path fill="none" stroke="#ff0000" d="M89.08,-535.68C97.19,-536.73 105.92,-537.87 114.78,-539.03"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="114.45,-542.51 124.81,-540.33 115.35,-535.57 114.45,-542.51"/>
 </g>
-<!-- program~example_nurbs_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~set4~3~~CalledByGraph_node14" class="node">
-<title>program~example_nurbs_curve</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node14"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 341.5,-66 341.5,-42 470.5,-42 470.5,-66"/>
-<text text-anchor="middle" x="406" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~set4~3~~CalledByGraph_node14"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="255,-420 145,-420 145,-396 255,-396 255,-420"/>
+<text text-anchor="middle" x="200" y="-405.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;none~set~3 -->
+<!-- program~example3_surface&#45;&gt;none~set~3 -->
 <g id="proc~~set4~3~~CalledByGraph_edge13" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M470.56,-63.24C477.95,-66.17 484.99,-70 491,-75 543.77,-118.84 565.87,-201.81 573.75,-241.61"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="570.34,-242.42 575.61,-251.62 577.22,-241.15 570.34,-242.42"/>
+<title>program~example3_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M255.17,-404.6C327.24,-399.42 450.29,-388.08 491,-369 522.44,-354.27 550.52,-324.84 567.04,-305.03"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="569.81,-307.17 573.38,-297.2 564.37,-302.77 569.81,-307.17"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
+<g id="proc~~set4~3~~CalledByGraph_edge17" class="edge">
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
+<path fill="none" stroke="#ff6d00" d="M239.39,-395.97C260.5,-389.4 287.17,-381.16 311,-374 323.16,-370.34 336.28,-366.47 348.62,-362.86"/>
+<polygon fill="#ff6d00" stroke="#ff6d00" points="349.69,-366.2 358.3,-360.04 347.72,-359.48 349.69,-366.2"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
+<g id="proc~~set4~3~~CalledByGraph_edge18" class="edge">
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
+<path fill="none" stroke="#ffda00" d="M230.54,-420.16C252.49,-428.91 283.3,-440.61 311,-449 318.48,-451.27 326.37,-453.44 334.24,-455.47"/>
+<polygon fill="#ffda00" stroke="#ffda00" points="333.62,-458.92 344.17,-457.96 335.32,-452.13 333.62,-458.92"/>
+</g>
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
+<g id="proc~~set4~3~~CalledByGraph_edge20" class="edge">
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
+<path fill="none" stroke="#00ff24" d="M255.11,-413.44C270.51,-414.99 287.75,-416.72 304.82,-418.43"/>
+<polygon fill="#00ff24" stroke="#00ff24" points="304.53,-421.92 314.83,-419.44 305.23,-414.96 304.53,-421.92"/>
 </g>
-<!-- program~nearest_point_1d -->
+<!-- program~example_nurbs_surface -->
 <g id="proc~~set4~3~~CalledByGraph_node15" class="node">
-<title>program~nearest_point_1d</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node15"><a xlink:href="../program/nearest_point_1d.html" xlink:title="nearest_point_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="457.5,-24 354.5,-24 354.5,0 457.5,0 457.5,-24"/>
-<text text-anchor="middle" x="406" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_1d</text>
+<title>program~example_nurbs_surface</title>
+<g id="a_proc~~set4~3~~CalledByGraph_node15"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="470.5,-66 331.5,-66 331.5,-42 470.5,-42 470.5,-66"/>
+<text text-anchor="middle" x="401" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;none~set~3 -->
+<!-- program~example_nurbs_surface&#45;&gt;none~set~3 -->
 <g id="proc~~set4~3~~CalledByGraph_edge14" class="edge">
-<title>program~nearest_point_1d&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M457.92,-16.54C469.88,-19.69 481.8,-24.79 491,-33 553.86,-89.12 571.19,-195.45 575.85,-241.64"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="572.38,-242.13 576.76,-251.78 579.35,-241.51 572.38,-242.13"/>
+<title>program~example_nurbs_surface&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M470.75,-63.21C478.08,-66.17 485.03,-70.01 491,-75 550.25,-124.48 572.25,-219.65 579.43,-262.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="575.99,-263.45 580.98,-272.8 582.91,-262.38 575.99,-263.45"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- program~nearest_point_2d -->
+<g id="proc~~set4~3~~CalledByGraph_node16" class="node">
+<title>program~nearest_point_2d</title>
+<g id="a_proc~~set4~3~~CalledByGraph_node16"><a xlink:href="../program/nearest_point_2d.html" xlink:title="nearest_point_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452.5,-24 349.5,-24 349.5,0 452.5,0 452.5,-24"/>
+<text text-anchor="middle" x="401" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d</text>
+</a>
+</g>
+</g>
+<!-- program~nearest_point_2d&#45;&gt;none~set~3 -->
 <g id="proc~~set4~3~~CalledByGraph_edge15" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#ff0000" d="M285.17,-470C301.32,-470 318.36,-470 334.36,-470"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="334.71,-473.5 344.71,-470 334.71,-466.5 334.71,-473.5"/>
+<title>program~nearest_point_2d&#45;&gt;none~set~3</title>
+<path fill="none" stroke="#ff0000" d="M452.73,-15.16C466.47,-18.21 480.44,-23.61 491,-33 560.36,-94.71 577.18,-213.24 581.23,-262.59"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="577.76,-263.07 581.96,-272.8 584.74,-262.57 577.76,-263.07"/>
 </g>
-<!-- program~shape_c_1d -->
-<g id="proc~~set4~3~~CalledByGraph_node17" class="node">
-<title>program~shape_c_1d</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node17"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-150 172,-150 172,-126 248,-126 248,-150"/>
-<text text-anchor="middle" x="210" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~set4~3~~CalledByGraph_edge16" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#ff0000" d="M275.1,-550C291.15,-550 308.13,-550 324.24,-550"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="324.68,-553.5 334.68,-550 324.68,-546.5 324.68,-553.5"/>
+</g>
+<!-- program~example_ppm1 -->
+<g id="proc~~set4~3~~CalledByGraph_node18" class="node">
+<title>program~example_ppm1</title>
+<g id="a_proc~~set4~3~~CalledByGraph_node18"><a xlink:href="../program/example_ppm1.html" xlink:title="example_ppm1">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-192 153,-192 153,-168 247,-168 247,-192"/>
+<text text-anchor="middle" x="200" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm1</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~set_c~3 -->
-<g id="proc~~set4~3~~CalledByGraph_edge20" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~set_c~3</title>
-<path fill="none" stroke="#00c4ff" d="M248.41,-138C273.62,-138 307.6,-138 337.47,-138"/>
-<polygon fill="#00c4ff" stroke="#00c4ff" points="337.84,-141.5 347.84,-138 337.84,-134.5 337.84,-141.5"/>
+<!-- program~example_ppm1&#45;&gt;proc~set_ring~2 -->
+<g id="proc~~set4~3~~CalledByGraph_edge24" class="edge">
+<title>program~example_ppm1&#45;&gt;proc~set_ring~2</title>
+<path fill="none" stroke="#0091ff" d="M247.15,-180C269.15,-180 296.09,-180 321.19,-180"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="321.45,-183.5 331.45,-180 321.45,-176.5 321.45,-183.5"/>
 </g>
-<!-- program~shape_circle -->
-<g id="proc~~set4~3~~CalledByGraph_node18" class="node">
-<title>program~shape_circle</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node18"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249.5,-192 170.5,-192 170.5,-168 249.5,-168 249.5,-192"/>
-<text text-anchor="middle" x="210" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<!-- program~example_ppm1&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set4~3~~CalledByGraph_edge26" class="edge">
+<title>program~example_ppm1&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.15,-189.74C272.73,-195.14 304.98,-201.95 333.26,-207.91"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="332.57,-211.34 343.07,-209.99 334.01,-204.5 332.57,-211.34"/>
+</g>
+<!-- program~example_ppm2 -->
+<g id="proc~~set4~3~~CalledByGraph_node19" class="node">
+<title>program~example_ppm2</title>
+<g id="a_proc~~set4~3~~CalledByGraph_node19"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-150 153,-150 153,-126 247,-126 247,-150"/>
+<text text-anchor="middle" x="200" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm2&#45;&gt;proc~set_half_ring~2 -->
+<g id="proc~~set4~3~~CalledByGraph_edge22" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~set_half_ring~2</title>
+<path fill="none" stroke="#00ffff" d="M247.15,-138C265.39,-138 287.03,-138 308.19,-138"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="308.2,-141.5 318.2,-138 308.2,-134.5 308.2,-141.5"/>
+</g>
+<!-- program~example_ppm2&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set4~3~~CalledByGraph_edge27" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.02,-146.55C256.72,-149.56 266.56,-153.6 275,-159 295.71,-172.25 290,-188.21 311,-201 314.01,-202.83 317.16,-204.5 320.41,-206.03"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="319.22,-209.32 329.8,-209.95 321.92,-202.87 319.22,-209.32"/>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~set4~3~~CalledByGraph_node20" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~set4~3~~CalledByGraph_node20"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="247,-318 153,-318 153,-294 247,-294 247,-318"/>
+<text text-anchor="middle" x="200" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~set_circle -->
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
 <g id="proc~~set4~3~~CalledByGraph_edge19" class="edge">
-<title>program~shape_circle&#45;&gt;proc~set_circle</title>
-<path fill="none" stroke="#00ffc4" d="M249.79,-180C271.95,-180 300.54,-180 327.13,-180"/>
-<polygon fill="#00ffc4" stroke="#00ffc4" points="327.21,-183.5 337.21,-180 327.21,-176.5 327.21,-183.5"/>
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
+<path fill="none" stroke="#48ff00" d="M247.15,-296.26C272.73,-290.86 304.98,-284.05 333.26,-278.09"/>
+<polygon fill="#48ff00" stroke="#48ff00" points="334.01,-281.5 343.07,-276.01 332.57,-274.66 334.01,-281.5"/>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set4~3~~CalledByGraph_edge28" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M247.02,-297.45C256.72,-294.44 266.56,-290.4 275,-285 295.71,-271.75 290,-255.79 311,-243 314.01,-241.17 317.16,-239.5 320.41,-237.97"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="321.92,-241.13 329.8,-234.05 319.22,-234.68 321.92,-241.13"/>
+</g>
+<!-- program~nearest_point_2d_bench -->
+<g id="proc~~set4~3~~CalledByGraph_node21" class="node">
+<title>program~nearest_point_2d_bench</title>
+<g id="a_proc~~set4~3~~CalledByGraph_node21"><a xlink:href="../program/nearest_point_2d_bench.html" xlink:title="nearest_point_2d_bench">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="271,-234 129,-234 129,-210 271,-210 271,-234"/>
+<text text-anchor="middle" x="200" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_2d_bench</text>
+</a>
 </g>
-<!-- program~shape_half_circle -->
-<g id="proc~~set4~3~~CalledByGraph_node19" class="node">
-<title>program~shape_half_circle</title>
-<g id="a_proc~~set4~3~~CalledByGraph_node19"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="262,-108 158,-108 158,-84 262,-84 262,-108"/>
-<text text-anchor="middle" x="210" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+</g>
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set4~3~~CalledByGraph_edge29" class="edge">
+<title>program~nearest_point_2d_bench&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M271.16,-222C283.34,-222 296.17,-222 308.82,-222"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="308.91,-225.5 318.91,-222 308.91,-218.5 308.91,-225.5"/>
+</g>
+<!-- program~shape_c_2d -->
+<g id="proc~~set4~3~~CalledByGraph_node22" class="node">
+<title>program~shape_c_2d</title>
+<g id="a_proc~~set4~3~~CalledByGraph_node22"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="238,-24 162,-24 162,0 238,0 238,-24"/>
+<text text-anchor="middle" x="200" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~set_half_circle -->
+<!-- program~shape_c_2d&#45;&gt;proc~set_c~3 -->
 <g id="proc~~set4~3~~CalledByGraph_edge21" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~set_half_circle</title>
-<path fill="none" stroke="#004eff" d="M262.22,-96C278.08,-96 296.06,-96 313.78,-96"/>
-<polygon fill="#004eff" stroke="#004eff" points="314.17,-99.5 324.17,-96 314.17,-92.5 314.17,-99.5"/>
+<title>program~shape_c_2d&#45;&gt;proc~set_c~3</title>
+<path fill="none" stroke="#00ff91" d="M238.17,-18.06C250.55,-21.21 263.98,-25.94 275,-33 295.71,-46.25 290,-62.21 311,-75 316.34,-78.25 322.14,-81 328.14,-83.32"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="327.09,-86.66 337.68,-86.63 329.38,-80.05 327.09,-86.66"/>
+</g>
+<!-- program~shape_half_ring_2d -->
+<g id="proc~~set4~3~~CalledByGraph_node23" class="node">
+<title>program~shape_half_ring_2d</title>
+<g id="a_proc~~set4~3~~CalledByGraph_node23"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="257.5,-66 142.5,-66 142.5,-42 257.5,-42 257.5,-66"/>
+<text text-anchor="middle" x="200" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2 -->
+<g id="proc~~set4~3~~CalledByGraph_edge23" class="edge">
+<title>program~shape_half_ring_2d&#45;&gt;proc~set_half_ring~2</title>
+<path fill="none" stroke="#00ffff" d="M257.09,-66.07C263.38,-68.53 269.49,-71.47 275,-75 295.71,-88.25 290,-104.21 311,-117 314.01,-118.83 317.16,-120.5 320.41,-122.03"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="319.22,-125.32 329.8,-125.95 321.92,-118.87 319.22,-125.32"/>
+</g>
+<!-- program~shape_ring_2d -->
+<g id="proc~~set4~3~~CalledByGraph_node24" class="node">
+<title>program~shape_ring_2d</title>
+<g id="a_proc~~set4~3~~CalledByGraph_node24"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="245,-108 155,-108 155,-84 245,-84 245,-108"/>
+<text text-anchor="middle" x="200" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_ring_2d&#45;&gt;proc~set_ring~2 -->
+<g id="proc~~set4~3~~CalledByGraph_edge25" class="edge">
+<title>program~shape_ring_2d&#45;&gt;proc~set_ring~2</title>
+<path fill="none" stroke="#0091ff" d="M245.08,-103.96C255.4,-107.03 266,-111.24 275,-117 295.71,-130.25 290,-146.21 311,-159 314.41,-161.08 318.01,-162.95 321.73,-164.64"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="320.6,-167.95 331.18,-168.46 323.22,-161.46 320.6,-167.95"/>
+</g>
+<!-- program~shape_tetragon -->
+<g id="proc~~set4~3~~CalledByGraph_node25" class="node">
+<title>program~shape_tetragon</title>
+<g id="a_proc~~set4~3~~CalledByGraph_node25"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="248,-276 152,-276 152,-252 248,-252 248,-276"/>
+<text text-anchor="middle" x="200" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+</a>
+</g>
+</g>
+<!-- program~shape_tetragon&#45;&gt;proc~set_tetragon -->
+<g id="proc~~set4~3~~CalledByGraph_edge30" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~set_tetragon</title>
+<path fill="none" stroke="#0024ff" d="M248.16,-254.05C273.44,-248.71 305.03,-242.04 332.84,-236.17"/>
+<polygon fill="#0024ff" stroke="#0024ff" points="333.83,-239.54 342.89,-234.05 332.39,-232.69 333.83,-239.54"/>
 </g>
 </g>
 </svg>
@@ -669,7 +777,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_c.html b/proc/set_c.html
index fc600b7df..477bc0a3a 100644
--- a/proc/set_c.html
+++ b/proc/set_c.html
@@ -78,20 +78,20 @@ <h1>set_C
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.6% of total for procedures.">40 statements</a>
+                 title=" 0.3% of total for procedures.">19 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">set_C</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine set_C(this, center, radius1, radius2, length)  
+    <h2>private pure subroutine set_C(this, center, radius)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~59"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~50"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-radius1~2"></span>
+              <span class="anchor" id="variable-radius~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -196,37 +196,7 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>radius1</strong></td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-radius2~2"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in)</td>
-              <td></td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>radius2</strong></td>
-            <td>
-                
-            </td>
-        </tr>
-        <tr>
-            <td>
-              <span class="anchor" id="variable-length~2"></span>
-              real(kind=rk),
-            </td>
-<td>intent(in)</td>
-              <td></td>            <td>
-              
-            </td>
-            <td>::</td>
-            <td><strong>length</strong></td>
+            <td><strong>radius</strong></td>
             <td>
                 
             </td>
@@ -246,229 +216,223 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set_c~~CallsGraph Pages: 1 -->
-<svg id="procset_cCallsGraph" width="641pt" height="86pt"
- viewBox="0.00 0.00 641.00 85.97" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set_c~~CallsGraph" class="graph" transform="scale(1.84 1.84) rotate(0) translate(4 154)">
+<svg id="procset_cCallsGraph" width="641pt" height="113pt"
+ viewBox="0.00 0.00 641.00 112.75" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set_c~~CallsGraph" class="graph" transform="scale(1.77 1.77) rotate(0) translate(4 196)">
 <title>proc~~set_c~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-154 1174,-154 1174,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-196 1133,-196 1133,4 -4,4"/>
 <!-- proc~set_c -->
 <g id="proc~~set_c~~CallsGraph_node1" class="node">
 <title>proc~set_c</title>
-<polygon fill="none" stroke="black" points="126,-87 0,-87 0,-63 126,-63 126,-87"/>
-<text text-anchor="middle" x="63" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set_C</text>
+<polygon fill="none" stroke="black" points="116,-108 0,-108 0,-84 116,-84 116,-108"/>
+<text text-anchor="middle" x="58" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set_C</text>
 </g>
 <!-- none~set -->
 <g id="proc~~set_c~~CallsGraph_node2" class="node">
 <title>none~set</title>
-<g id="a_proc~~set_c~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="275,-87 162,-87 162,-63 275,-63 275,-87"/>
-<text text-anchor="middle" x="218.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
+<g id="a_proc~~set_c~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="255,-108 152,-108 152,-84 255,-84 255,-108"/>
+<text text-anchor="middle" x="203.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c&#45;&gt;none~set -->
 <g id="proc~~set_c~~CallsGraph_edge1" class="edge">
 <title>proc~set_c&#45;&gt;none~set</title>
-<path fill="none" stroke="#ff0000" d="M126.43,-75C134.7,-75 143.19,-75 151.51,-75"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="151.54,-78.5 161.54,-75 151.54,-71.5 151.54,-78.5"/>
+<path fill="none" stroke="#ff0000" d="M116.13,-96C124.46,-96 133.07,-96 141.48,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="141.61,-99.5 151.61,-96 141.61,-92.5 141.61,-99.5"/>
 </g>
 <!-- proc~set1 -->
 <g id="proc~~set_c~~CallsGraph_node3" class="node">
 <title>proc~set1</title>
-<g id="a_proc~~set_c~~CallsGraph_node3"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="431,-108 311,-108 311,-84 431,-84 431,-108"/>
-<text text-anchor="middle" x="371" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
+<g id="a_proc~~set_c~~CallsGraph_node3"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="404.5,-192 294.5,-192 294.5,-168 404.5,-168 404.5,-192"/>
+<text text-anchor="middle" x="349.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set1 -->
 <g id="proc~~set_c~~CallsGraph_edge2" class="edge">
 <title>none~set&#45;&gt;proc~set1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M275.11,-82.76C283.48,-83.93 292.19,-85.14 300.8,-86.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="300.44,-89.83 310.83,-87.74 301.41,-82.89 300.44,-89.83"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M218.37,-108.01C234.81,-121.77 263.46,-144.32 291,-159 294.29,-160.75 297.75,-162.42 301.29,-163.99"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="300.15,-167.31 310.72,-167.92 302.84,-160.85 300.15,-167.31"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set1a -->
 <g id="proc~~set_c~~CallsGraph_node4" class="node">
+<title>proc~set1a</title>
+<g id="a_proc~~set_c~~CallsGraph_node4"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="408,-150 291,-150 291,-126 408,-126 408,-150"/>
+<text text-anchor="middle" x="349.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+</a>
+</g>
+</g>
+<!-- none~set&#45;&gt;proc~set1a -->
+<g id="proc~~set_c~~CallsGraph_edge3" class="edge">
+<title>none~set&#45;&gt;proc~set1a</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M245.76,-108.04C261.88,-112.74 280.53,-118.18 297.48,-123.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="296.65,-126.52 307.23,-125.96 298.61,-119.8 296.65,-126.52"/>
+</g>
+<!-- proc~set2 -->
+<g id="proc~~set_c~~CallsGraph_node5" class="node">
 <title>proc~set2</title>
-<g id="a_proc~~set_c~~CallsGraph_node4"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="431,-66 311,-66 311,-42 431,-42 431,-66"/>
-<text text-anchor="middle" x="371" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
+<g id="a_proc~~set_c~~CallsGraph_node5"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="404.5,-66 294.5,-66 294.5,-42 404.5,-42 404.5,-66"/>
+<text text-anchor="middle" x="349.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set2 -->
-<g id="proc~~set_c~~CallsGraph_edge3" class="edge">
+<g id="proc~~set_c~~CallsGraph_edge4" class="edge">
 <title>none~set&#45;&gt;proc~set2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M275.11,-67.24C283.48,-66.07 292.19,-64.86 300.8,-63.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="301.41,-67.11 310.83,-62.26 300.44,-60.17 301.41,-67.11"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M245.76,-83.96C261.88,-79.26 280.53,-73.82 297.48,-68.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="298.61,-72.2 307.23,-66.04 296.65,-65.48 298.61,-72.2"/>
 </g>
 <!-- proc~set3 -->
-<g id="proc~~set_c~~CallsGraph_node5" class="node">
+<g id="proc~~set_c~~CallsGraph_node6" class="node">
 <title>proc~set3</title>
-<g id="a_proc~~set_c~~CallsGraph_node5"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="431,-150 311,-150 311,-126 431,-126 431,-150"/>
-<text text-anchor="middle" x="371" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
+<g id="a_proc~~set_c~~CallsGraph_node6"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="404.5,-108 294.5,-108 294.5,-84 404.5,-84 404.5,-108"/>
+<text text-anchor="middle" x="349.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set3 -->
-<g id="proc~~set_c~~CallsGraph_edge4" class="edge">
+<g id="proc~~set_c~~CallsGraph_edge5" class="edge">
 <title>none~set&#45;&gt;proc~set3</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M244.1,-87.01C262.37,-95.75 288.01,-107.65 311,-117 315.49,-118.82 320.2,-120.65 324.92,-122.42"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="323.96,-125.8 334.55,-125.96 326.37,-119.22 323.96,-125.8"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M255.27,-96C264.64,-96 274.55,-96 284.26,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="284.28,-99.5 294.28,-96 284.28,-92.5 284.28,-99.5"/>
 </g>
 <!-- proc~set4 -->
-<g id="proc~~set_c~~CallsGraph_node6" class="node">
+<g id="proc~~set_c~~CallsGraph_node7" class="node">
 <title>proc~set4</title>
-<g id="a_proc~~set_c~~CallsGraph_node6"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="431,-24 311,-24 311,0 431,0 431,-24"/>
-<text text-anchor="middle" x="371" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
+<g id="a_proc~~set_c~~CallsGraph_node7"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="404.5,-24 294.5,-24 294.5,0 404.5,0 404.5,-24"/>
+<text text-anchor="middle" x="349.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set&#45;&gt;proc~set4 -->
-<g id="proc~~set_c~~CallsGraph_edge5" class="edge">
+<g id="proc~~set_c~~CallsGraph_edge6" class="edge">
 <title>none~set&#45;&gt;proc~set4</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M244.1,-62.99C262.37,-54.25 288.01,-42.35 311,-33 315.49,-31.18 320.2,-29.35 324.92,-27.58"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="326.37,-30.78 334.55,-24.04 323.96,-24.2 326.37,-30.78"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M218.37,-83.99C234.81,-70.23 263.46,-47.68 291,-33 294.29,-31.25 297.75,-29.58 301.29,-28.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="302.84,-31.15 310.72,-24.08 300.15,-24.69 302.84,-31.15"/>
 </g>
 <!-- proc~cmp_degree -->
-<g id="proc~~set_c~~CallsGraph_node7" class="node">
+<g id="proc~~set_c~~CallsGraph_node8" class="node">
 <title>proc~cmp_degree</title>
-<g id="a_proc~~set_c~~CallsGraph_node7"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="630,-150 467,-150 467,-126 630,-126 630,-150"/>
-<text text-anchor="middle" x="548.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
+<g id="a_proc~~set_c~~CallsGraph_node8"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="598,-150 444,-150 444,-126 598,-126 598,-150"/>
+<text text-anchor="middle" x="521" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
 <!-- proc~set1&#45;&gt;proc~cmp_degree -->
-<g id="proc~~set_c~~CallsGraph_edge6" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#ff0000" d="M422.29,-108.04C442.58,-112.89 466.15,-118.53 487.34,-123.6"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="486.66,-127.04 497.2,-125.96 488.29,-120.23 486.66,-127.04"/>
-</g>
-<!-- proc~cmp_nc -->
-<g id="proc~~set_c~~CallsGraph_node8" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_proc~~set_c~~CallsGraph_node8"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
-<polygon fill="#d9534f" stroke="#d9534f" points="618,-108 479,-108 479,-84 618,-84 618,-108"/>
-<text text-anchor="middle" x="548.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
-</a>
-</g>
-</g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
 <g id="proc~~set_c~~CallsGraph_edge7" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#ff0000" d="M431.42,-96C443.3,-96 455.97,-96 468.4,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="468.76,-99.5 478.76,-96 468.76,-92.5 468.76,-99.5"/>
+<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#ff0000" d="M399.07,-167.96C418.58,-163.13 441.23,-157.52 461.62,-152.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="462.56,-155.84 471.42,-150.04 460.87,-149.05 462.56,-155.84"/>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
 <g id="proc~~set_c~~CallsGraph_edge8" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
-<path fill="none" stroke="#7fff00" d="M422.29,-66.04C442.58,-70.89 466.15,-76.53 487.34,-81.6"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="486.66,-85.04 497.2,-83.96 488.29,-78.23 486.66,-85.04"/>
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#cbff00" d="M408.36,-138C416.56,-138 425.14,-138 433.74,-138"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="433.82,-141.5 443.82,-138 433.82,-134.5 433.82,-141.5"/>
 </g>
 <!-- proc~compute_knot_vector -->
 <g id="proc~~set_c~~CallsGraph_node9" class="node">
 <title>proc~compute_knot_vector</title>
 <g id="a_proc~~set_c~~CallsGraph_node9"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="612,-66 485,-66 485,-42 612,-42 612,-66"/>
-<text text-anchor="middle" x="548.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="584.5,-66 457.5,-66 457.5,-42 584.5,-42 584.5,-66"/>
+<text text-anchor="middle" x="521" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~set_c~~CallsGraph_edge9" class="edge">
 <title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#7fff00" d="M431.42,-54C445.26,-54 460.16,-54 474.51,-54"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="474.85,-57.5 484.85,-54 474.85,-50.5 474.85,-57.5"/>
+<path fill="none" stroke="#00ff66" d="M404.6,-54C418.08,-54 432.77,-54 447,-54"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="447.26,-57.5 457.26,-54 447.26,-50.5 447.26,-57.5"/>
 </g>
 <!-- proc~set3&#45;&gt;proc~cmp_degree -->
 <g id="proc~~set_c~~CallsGraph_edge10" class="edge">
 <title>proc~set3&#45;&gt;proc~cmp_degree</title>
-<path fill="none" stroke="#00ffff" d="M431.42,-138C439.64,-138 448.23,-138 456.86,-138"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="456.98,-141.5 466.98,-138 456.98,-134.5 456.98,-141.5"/>
+<path fill="none" stroke="#0066ff" d="M399.07,-108.04C418.58,-112.87 441.23,-118.48 461.62,-123.53"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="460.87,-126.95 471.42,-125.96 462.56,-120.16 460.87,-126.95"/>
 </g>
 <!-- proc~get_multiplicity -->
-<g id="proc~~set_c~~CallsGraph_node11" class="node">
+<g id="proc~~set_c~~CallsGraph_node10" class="node">
 <title>proc~get_multiplicity</title>
-<g id="a_proc~~set_c~~CallsGraph_node11"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="844,-149 666,-149 666,-125 844,-125 844,-149"/>
-<text text-anchor="middle" x="755" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
+<g id="a_proc~~set_c~~CallsGraph_node10"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="803,-150 634,-150 634,-126 803,-126 803,-150"/>
+<text text-anchor="middle" x="718.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="proc~~set_c~~CallsGraph_edge11" class="edge">
 <title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M630.03,-137.61C638.47,-137.56 647.11,-137.52 655.71,-137.48"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="655.8,-140.98 665.78,-137.43 655.76,-133.98 655.8,-140.98"/>
+<path fill="none" stroke="#ff0000" d="M598.15,-138C606.54,-138 615.17,-138 623.75,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="623.79,-141.5 633.79,-138 623.79,-134.5 623.79,-141.5"/>
 </g>
-<!-- interface~compute_multiplicity -->
-<g id="proc~~set_c~~CallsGraph_node10" class="node">
-<title>interface~compute_multiplicity</title>
-<g id="a_proc~~set_c~~CallsGraph_node10"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="1004,-129 880,-129 880,-105 1004,-105 1004,-129"/>
-<text text-anchor="middle" x="942" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<!-- proc~repelem -->
+<g id="proc~~set_c~~CallsGraph_node11" class="node">
+<title>proc~repelem</title>
+<g id="a_proc~~set_c~~CallsGraph_node11"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="747,-66 690,-66 690,-42 747,-42 747,-66"/>
+<text text-anchor="middle" x="718.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
 <g id="proc~~set_c~~CallsGraph_edge12" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00ff00" d="M618.14,-99.68C688.69,-103.47 798.03,-109.33 869.57,-113.17"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="869.67,-116.68 879.85,-113.72 870.05,-109.69 869.67,-116.68"/>
+<title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
+<path fill="none" stroke="#00ffff" d="M584.66,-54C615.92,-54 652.69,-54 679.61,-54"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="679.78,-57.5 689.78,-54 679.78,-50.5 679.78,-57.5"/>
 </g>
-<!-- proc~repelem -->
+<!-- interface~compute_multiplicity -->
 <g id="proc~~set_c~~CallsGraph_node12" class="node">
-<title>proc~repelem</title>
-<g id="a_proc~~set_c~~CallsGraph_node12"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="783.5,-66 726.5,-66 726.5,-42 783.5,-42 783.5,-66"/>
-<text text-anchor="middle" x="755" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<title>interface~compute_multiplicity</title>
+<g id="a_proc~~set_c~~CallsGraph_node12"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
+<polygon fill="#a7506f" stroke="#a7506f" points="963,-150 839,-150 839,-126 963,-126 963,-150"/>
+<text text-anchor="middle" x="901" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
+<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set_c~~CallsGraph_edge13" class="edge">
-<title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#0000ff" d="M612.25,-54C646.23,-54 687.1,-54 716.2,-54"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="716.36,-57.5 726.36,-54 716.35,-50.5 716.36,-57.5"/>
+<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
+<path fill="none" stroke="#ff0000" d="M803.15,-138C811.73,-138 820.4,-138 828.84,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="828.99,-141.5 838.99,-138 828.99,-134.5 828.99,-141.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~set_c~~CallsGraph_node13" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~set_c~~CallsGraph_node13"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1170,-150 1040,-150 1040,-126 1170,-126 1170,-150"/>
-<text text-anchor="middle" x="1105" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1129,-171 999,-171 999,-147 1129,-147 1129,-171"/>
+<text text-anchor="middle" x="1064" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~set_c~~CallsGraph_edge14" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1004.33,-125C1012.69,-126.09 1021.35,-127.22 1029.92,-128.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1029.53,-131.82 1039.9,-129.64 1030.44,-124.88 1029.53,-131.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M963.33,-146C971.69,-147.09 980.35,-148.22 988.92,-149.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="988.53,-152.82 998.9,-150.64 989.44,-145.88 988.53,-152.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~set_c~~CallsGraph_node14" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~set_c~~CallsGraph_node14"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1170,-108 1040,-108 1040,-84 1170,-84 1170,-108"/>
-<text text-anchor="middle" x="1105" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1129,-129 999,-129 999,-105 1129,-105 1129,-129"/>
+<text text-anchor="middle" x="1064" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~set_c~~CallsGraph_edge15" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1004.33,-109C1012.69,-107.91 1021.35,-106.78 1029.92,-105.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="1030.44,-109.12 1039.9,-104.36 1029.53,-102.18 1030.44,-109.12"/>
-</g>
-<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
-<g id="proc~~set_c~~CallsGraph_edge16" class="edge">
-<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#00ff00" d="M844.17,-127.47C852.77,-126.54 861.42,-125.6 869.82,-124.7"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="870.36,-128.16 879.93,-123.6 869.61,-121.2 870.36,-128.16"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M963.33,-130C971.69,-128.91 980.35,-127.78 988.92,-126.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="989.44,-130.12 998.9,-125.36 988.53,-123.18 989.44,-130.12"/>
 </g>
 </g>
 </svg>
@@ -568,31 +532,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set_c~~CalledByGraph Pages: 1 -->
-<svg id="procset_cCalledByGraph" width="246pt" height="32pt"
- viewBox="0.00 0.00 246.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procset_cCalledByGraph" width="236pt" height="32pt"
+ viewBox="0.00 0.00 236.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~set_c~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~set_c~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 242,-28 242,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 232,-28 232,4 -4,4"/>
 <!-- proc~set_c -->
 <g id="proc~~set_c~~CalledByGraph_node1" class="node">
 <title>proc~set_c</title>
-<polygon fill="none" stroke="black" points="238,-24 112,-24 112,0 238,0 238,-24"/>
-<text text-anchor="middle" x="175" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set_C</text>
+<polygon fill="none" stroke="black" points="228,-24 112,-24 112,0 228,0 228,-24"/>
+<text text-anchor="middle" x="170" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set_C</text>
 </g>
-<!-- program~shape_c_3d -->
+<!-- program~shape_c_1d -->
 <g id="proc~~set_c~~CalledByGraph_node2" class="node">
-<title>program~shape_c_3d</title>
-<g id="a_proc~~set_c~~CalledByGraph_node2"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
+<title>program~shape_c_1d</title>
+<g id="a_proc~~set_c~~CalledByGraph_node2"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="76,-24 0,-24 0,0 76,0 76,-24"/>
-<text text-anchor="middle" x="38" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<text text-anchor="middle" x="38" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~set_c -->
+<!-- program~shape_c_1d&#45;&gt;proc~set_c -->
 <g id="proc~~set_c~~CalledByGraph_edge1" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~set_c</title>
-<path fill="none" stroke="#ff0000" d="M76.25,-12C84.3,-12 93.08,-12 101.96,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="102,-15.5 112,-12 102,-8.5 102,-15.5"/>
+<title>program~shape_c_1d&#45;&gt;proc~set_c</title>
+<path fill="none" stroke="#ff0000" d="M76.25,-12C84.23,-12 92.9,-12 101.63,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="101.86,-15.5 111.86,-12 101.86,-8.5 101.86,-15.5"/>
 </g>
 </g>
 </svg>
@@ -708,7 +672,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_circle.html b/proc/set_circle.html
index 8c0d01ed9..8df8cf0c2 100644
--- a/proc/set_circle.html
+++ b/proc/set_circle.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~180"></span>
+              <span class="anchor" id="variable-this~49"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center~9"></span>
+              <span class="anchor" id="variable-center"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -227,116 +227,116 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="137,-108 0,-108 0,-84 137,-84 137,-108"/>
 <text text-anchor="middle" x="68.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set_circle</text>
 </g>
-<!-- none~set~3 -->
+<!-- none~set -->
 <g id="proc~~set_circle~~CallsGraph_node2" class="node">
-<title>none~set~3</title>
-<g id="a_proc~~set_circle~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
+<title>none~set</title>
+<g id="a_proc~~set_circle~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="276,-108 173,-108 173,-84 276,-84 276,-108"/>
 <text text-anchor="middle" x="224.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_circle&#45;&gt;none~set -->
 <g id="proc~~set_circle~~CallsGraph_edge1" class="edge">
-<title>proc~set_circle&#45;&gt;none~set~3</title>
+<title>proc~set_circle&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M137.05,-96C145.55,-96 154.21,-96 162.6,-96"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="162.68,-99.5 172.68,-96 162.68,-92.5 162.68,-99.5"/>
 </g>
-<!-- proc~set1a -->
+<!-- proc~set1 -->
 <g id="proc~~set_circle~~CallsGraph_node3" class="node">
-<title>proc~set1a</title>
-<g id="a_proc~~set_circle~~CallsGraph_node3"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="429,-192 312,-192 312,-168 429,-168 429,-192"/>
-<text text-anchor="middle" x="370.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+<title>proc~set1</title>
+<g id="a_proc~~set_circle~~CallsGraph_node3"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="425.5,-192 315.5,-192 315.5,-168 425.5,-168 425.5,-192"/>
+<text text-anchor="middle" x="370.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
+<!-- none~set&#45;&gt;proc~set1 -->
 <g id="proc~~set_circle~~CallsGraph_edge2" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
+<title>none~set&#45;&gt;proc~set1</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M239.37,-108.01C255.81,-121.77 284.46,-144.32 312,-159 315.29,-160.75 318.75,-162.42 322.29,-163.99"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="321.15,-167.31 331.72,-167.92 323.84,-160.85 321.15,-167.31"/>
 </g>
-<!-- proc~set1~3 -->
+<!-- proc~set1a -->
 <g id="proc~~set_circle~~CallsGraph_node4" class="node">
-<title>proc~set1~3</title>
-<g id="a_proc~~set_circle~~CallsGraph_node4"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="425.5,-150 315.5,-150 315.5,-126 425.5,-126 425.5,-150"/>
-<text text-anchor="middle" x="370.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<title>proc~set1a</title>
+<g id="a_proc~~set_circle~~CallsGraph_node4"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="429,-150 312,-150 312,-126 429,-126 429,-150"/>
+<text text-anchor="middle" x="370.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1~3 -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="proc~~set_circle~~CallsGraph_edge3" class="edge">
-<title>none~set~3&#45;&gt;proc~set1~3</title>
+<title>none~set&#45;&gt;proc~set1a</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M266.76,-108.04C282.88,-112.74 301.53,-118.18 318.48,-123.12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="317.65,-126.52 328.23,-125.96 319.61,-119.8 317.65,-126.52"/>
 </g>
-<!-- proc~set2~3 -->
+<!-- proc~set2 -->
 <g id="proc~~set_circle~~CallsGraph_node5" class="node">
-<title>proc~set2~3</title>
-<g id="a_proc~~set_circle~~CallsGraph_node5"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
+<title>proc~set2</title>
+<g id="a_proc~~set_circle~~CallsGraph_node5"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="425.5,-66 315.5,-66 315.5,-42 425.5,-42 425.5,-66"/>
 <text text-anchor="middle" x="370.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set2~3 -->
+<!-- none~set&#45;&gt;proc~set2 -->
 <g id="proc~~set_circle~~CallsGraph_edge4" class="edge">
-<title>none~set~3&#45;&gt;proc~set2~3</title>
+<title>none~set&#45;&gt;proc~set2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M266.76,-83.96C282.88,-79.26 301.53,-73.82 318.48,-68.88"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="319.61,-72.2 328.23,-66.04 317.65,-65.48 319.61,-72.2"/>
 </g>
-<!-- proc~set3~3 -->
+<!-- proc~set3 -->
 <g id="proc~~set_circle~~CallsGraph_node6" class="node">
-<title>proc~set3~3</title>
-<g id="a_proc~~set_circle~~CallsGraph_node6"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
+<title>proc~set3</title>
+<g id="a_proc~~set_circle~~CallsGraph_node6"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="425.5,-108 315.5,-108 315.5,-84 425.5,-84 425.5,-108"/>
 <text text-anchor="middle" x="370.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set3~3 -->
+<!-- none~set&#45;&gt;proc~set3 -->
 <g id="proc~~set_circle~~CallsGraph_edge5" class="edge">
-<title>none~set~3&#45;&gt;proc~set3~3</title>
+<title>none~set&#45;&gt;proc~set3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M276.27,-96C285.64,-96 295.55,-96 305.26,-96"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="305.28,-99.5 315.28,-96 305.28,-92.5 305.28,-99.5"/>
 </g>
-<!-- proc~set4~3 -->
+<!-- proc~set4 -->
 <g id="proc~~set_circle~~CallsGraph_node7" class="node">
-<title>proc~set4~3</title>
-<g id="a_proc~~set_circle~~CallsGraph_node7"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
+<title>proc~set4</title>
+<g id="a_proc~~set_circle~~CallsGraph_node7"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="425.5,-24 315.5,-24 315.5,0 425.5,0 425.5,-24"/>
 <text text-anchor="middle" x="370.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set4~3 -->
+<!-- none~set&#45;&gt;proc~set4 -->
 <g id="proc~~set_circle~~CallsGraph_edge6" class="edge">
-<title>none~set~3&#45;&gt;proc~set4~3</title>
+<title>none~set&#45;&gt;proc~set4</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M239.37,-83.99C255.81,-70.23 284.46,-47.68 312,-33 315.29,-31.25 318.75,-29.58 322.29,-28.01"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="323.84,-31.15 331.72,-24.08 321.15,-24.69 323.84,-31.15"/>
 </g>
-<!-- proc~cmp_degree~3 -->
+<!-- proc~cmp_degree -->
 <g id="proc~~set_circle~~CallsGraph_node8" class="node">
-<title>proc~cmp_degree~3</title>
-<g id="a_proc~~set_circle~~CallsGraph_node8"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
+<title>proc~cmp_degree</title>
+<g id="a_proc~~set_circle~~CallsGraph_node8"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="619,-150 465,-150 465,-126 619,-126 619,-150"/>
 <text text-anchor="middle" x="542" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1&#45;&gt;proc~cmp_degree -->
 <g id="proc~~set_circle~~CallsGraph_edge7" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
+<title>proc~set1&#45;&gt;proc~cmp_degree</title>
 <path fill="none" stroke="#ff0000" d="M420.07,-167.96C439.58,-163.13 462.23,-157.52 482.62,-152.47"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="483.56,-155.84 492.42,-150.04 481.87,-149.05 483.56,-155.84"/>
 </g>
-<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
 <g id="proc~~set_circle~~CallsGraph_edge8" class="edge">
-<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#cbff00" d="M425.6,-138C434.87,-138 444.72,-138 454.59,-138"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="454.86,-141.5 464.86,-138 454.86,-134.5 454.86,-141.5"/>
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#cbff00" d="M429.36,-138C437.56,-138 446.14,-138 454.74,-138"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="454.82,-141.5 464.82,-138 454.82,-134.5 454.82,-141.5"/>
 </g>
 <!-- proc~compute_knot_vector -->
 <g id="proc~~set_circle~~CallsGraph_node9" class="node">
@@ -347,30 +347,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~set_circle~~CallsGraph_edge9" class="edge">
-<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#00ff66" d="M425.6,-54C439.08,-54 453.77,-54 468,-54"/>
 <polygon fill="#00ff66" stroke="#00ff66" points="468.26,-57.5 478.26,-54 468.26,-50.5 468.26,-57.5"/>
 </g>
-<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set3&#45;&gt;proc~cmp_degree -->
 <g id="proc~~set_circle~~CallsGraph_edge10" class="edge">
-<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
+<title>proc~set3&#45;&gt;proc~cmp_degree</title>
 <path fill="none" stroke="#0066ff" d="M420.07,-108.04C439.58,-112.87 462.23,-118.48 482.62,-123.53"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="481.87,-126.95 492.42,-125.96 483.56,-120.16 481.87,-126.95"/>
 </g>
-<!-- proc~get_multiplicity~3 -->
+<!-- proc~get_multiplicity -->
 <g id="proc~~set_circle~~CallsGraph_node10" class="node">
-<title>proc~get_multiplicity~3</title>
-<g id="a_proc~~set_circle~~CallsGraph_node10"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
+<title>proc~get_multiplicity</title>
+<g id="a_proc~~set_circle~~CallsGraph_node10"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="824,-150 655,-150 655,-126 824,-126 824,-150"/>
 <text text-anchor="middle" x="739.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
+<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="proc~~set_circle~~CallsGraph_edge11" class="edge">
-<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
+<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
 <path fill="none" stroke="#ff0000" d="M619.15,-138C627.54,-138 636.17,-138 644.75,-138"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="644.79,-141.5 654.79,-138 644.79,-134.5 644.79,-141.5"/>
 </g>
@@ -398,9 +398,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set_circle~~CallsGraph_edge13" class="edge">
-<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#ff0000" d="M824.15,-138C832.73,-138 841.4,-138 849.84,-138"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="849.99,-141.5 859.99,-138 849.99,-134.5 849.99,-141.5"/>
 </g>
@@ -672,7 +672,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_c~2.html b/proc/set_c~2.html
index 6afc69b4d..a413fb6f2 100644
--- a/proc/set_c~2.html
+++ b/proc/set_c~2.html
@@ -78,20 +78,20 @@ <h1>set_C
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.4% of total for procedures.">27 statements</a>
+                 title=" 0.6% of total for procedures.">40 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">set_C</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine set_C(this, center, radius1, radius2)  
+    <h2>private pure subroutine set_C(this, center, radius1, radius2, length)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~126"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~120"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-radius1~5"></span>
+              <span class="anchor" id="variable-radius1~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -203,7 +203,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-radius2~5"></span>
+              <span class="anchor" id="variable-radius2~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -214,6 +214,21 @@ <h3>Arguments</h3>
             <td><strong>radius2</strong></td>
             <td>
                 
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-length~3"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in)</td>
+              <td></td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>length</strong></td>
+            <td>
+                
             </td>
         </tr>
     </tbody>
@@ -240,14 +255,14 @@ <h3 class="card-title">Calls</h3>
 <g id="proc~~set_c~2~~CallsGraph_node1" class="node">
 <title>proc~set_c~2</title>
 <polygon fill="none" stroke="black" points="126,-87 0,-87 0,-63 126,-63 126,-87"/>
-<text text-anchor="middle" x="63" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set_C</text>
+<text text-anchor="middle" x="63" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set_C</text>
 </g>
 <!-- none~set~2 -->
 <g id="proc~~set_c~2~~CallsGraph_node2" class="node">
 <title>none~set~2</title>
-<g id="a_proc~~set_c~2~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<g id="a_proc~~set_c~2~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="275,-87 162,-87 162,-63 275,-63 275,-87"/>
-<text text-anchor="middle" x="218.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
+<text text-anchor="middle" x="218.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
@@ -260,9 +275,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~set1~2 -->
 <g id="proc~~set_c~2~~CallsGraph_node3" class="node">
 <title>proc~set1~2</title>
-<g id="a_proc~~set_c~2~~CallsGraph_node3"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<g id="a_proc~~set_c~2~~CallsGraph_node3"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="431,-108 311,-108 311,-84 431,-84 431,-108"/>
-<text text-anchor="middle" x="371" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
+<text text-anchor="middle" x="371" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
@@ -275,9 +290,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~set2~2 -->
 <g id="proc~~set_c~2~~CallsGraph_node4" class="node">
 <title>proc~set2~2</title>
-<g id="a_proc~~set_c~2~~CallsGraph_node4"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<g id="a_proc~~set_c~2~~CallsGraph_node4"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="431,-66 311,-66 311,-42 431,-42 431,-66"/>
-<text text-anchor="middle" x="371" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
+<text text-anchor="middle" x="371" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
@@ -290,9 +305,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~set3~2 -->
 <g id="proc~~set_c~2~~CallsGraph_node5" class="node">
 <title>proc~set3~2</title>
-<g id="a_proc~~set_c~2~~CallsGraph_node5"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<g id="a_proc~~set_c~2~~CallsGraph_node5"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="431,-150 311,-150 311,-126 431,-126 431,-150"/>
-<text text-anchor="middle" x="371" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
+<text text-anchor="middle" x="371" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
@@ -305,9 +320,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~set4~2 -->
 <g id="proc~~set_c~2~~CallsGraph_node6" class="node">
 <title>proc~set4~2</title>
-<g id="a_proc~~set_c~2~~CallsGraph_node6"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<g id="a_proc~~set_c~2~~CallsGraph_node6"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="431,-24 311,-24 311,0 431,0 431,-24"/>
-<text text-anchor="middle" x="371" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
+<text text-anchor="middle" x="371" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
@@ -320,9 +335,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~cmp_degree~2 -->
 <g id="proc~~set_c~2~~CallsGraph_node7" class="node">
 <title>proc~cmp_degree~2</title>
-<g id="a_proc~~set_c~2~~CallsGraph_node7"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<g id="a_proc~~set_c~2~~CallsGraph_node7"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="630,-150 467,-150 467,-126 630,-126 630,-150"/>
-<text text-anchor="middle" x="548.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
+<text text-anchor="middle" x="548.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
@@ -335,9 +350,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~cmp_nc~2 -->
 <g id="proc~~set_c~2~~CallsGraph_node8" class="node">
 <title>proc~cmp_nc~2</title>
-<g id="a_proc~~set_c~2~~CallsGraph_node8"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<g id="a_proc~~set_c~2~~CallsGraph_node8"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="618,-108 479,-108 479,-84 618,-84 618,-108"/>
-<text text-anchor="middle" x="548.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+<text text-anchor="middle" x="548.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
@@ -377,9 +392,9 @@ <h3 class="card-title">Calls</h3>
 <!-- proc~get_multiplicity~2 -->
 <g id="proc~~set_c~2~~CallsGraph_node11" class="node">
 <title>proc~get_multiplicity~2</title>
-<g id="a_proc~~set_c~2~~CallsGraph_node11"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<g id="a_proc~~set_c~2~~CallsGraph_node11"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="844,-149 666,-149 666,-125 844,-125 844,-149"/>
-<text text-anchor="middle" x="755" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
+<text text-anchor="middle" x="755" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
@@ -562,20 +577,20 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~set_c~2~~CalledByGraph_node1" class="node">
 <title>proc~set_c~2</title>
 <polygon fill="none" stroke="black" points="238,-24 112,-24 112,0 238,0 238,-24"/>
-<text text-anchor="middle" x="175" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set_C</text>
+<text text-anchor="middle" x="175" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set_C</text>
 </g>
-<!-- program~shape_c_2d -->
+<!-- program~shape_c_3d -->
 <g id="proc~~set_c~2~~CalledByGraph_node2" class="node">
-<title>program~shape_c_2d</title>
-<g id="a_proc~~set_c~2~~CalledByGraph_node2"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
+<title>program~shape_c_3d</title>
+<g id="a_proc~~set_c~2~~CalledByGraph_node2"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="76,-24 0,-24 0,0 76,0 76,-24"/>
-<text text-anchor="middle" x="38" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+<text text-anchor="middle" x="38" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~set_c~2 -->
+<!-- program~shape_c_3d&#45;&gt;proc~set_c~2 -->
 <g id="proc~~set_c~2~~CalledByGraph_edge1" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~set_c~2</title>
+<title>program~shape_c_3d&#45;&gt;proc~set_c~2</title>
 <path fill="none" stroke="#ff0000" d="M76.25,-12C84.3,-12 93.08,-12 101.96,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="102,-15.5 112,-12 102,-8.5 102,-15.5"/>
 </g>
@@ -693,7 +708,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_c~3.html b/proc/set_c~3.html
index 27f7aa296..55a633e08 100644
--- a/proc/set_c~3.html
+++ b/proc/set_c~3.html
@@ -78,20 +78,20 @@ <h1>set_C
 
             <li class="list-inline-item" id="statements"><i class="fa fa-list-ol"></i>
               <a data-bs-toggle="tooltip" data-bs-placement="bottom" data-bs-html="true"
-                 title=" 0.3% of total for procedures.">19 statements</a>
+                 title=" 0.4% of total for procedures.">27 statements</a>
             </li>
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">set_C</li>
           </ol>
         </nav>
@@ -137,13 +137,13 @@ <h3>Contents</h3>
     </div>
     
     <div class="col-md-9" id='text'>
-    <h2>private pure subroutine set_C(this, center, radius)  
+    <h2>private pure subroutine set_C(this, center, radius1, radius2)  
 </h2>
     
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~181"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~187"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center~10"></span>
+              <span class="anchor" id="variable-center~9"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-radius~3"></span>
+              <span class="anchor" id="variable-radius1~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -196,7 +196,22 @@ <h3>Arguments</h3>
               
             </td>
             <td>::</td>
-            <td><strong>radius</strong></td>
+            <td><strong>radius1</strong></td>
+            <td>
+                
+            </td>
+        </tr>
+        <tr>
+            <td>
+              <span class="anchor" id="variable-radius2~5"></span>
+              real(kind=rk),
+            </td>
+<td>intent(in)</td>
+              <td></td>            <td>
+              
+            </td>
+            <td>::</td>
+            <td><strong>radius2</strong></td>
             <td>
                 
             </td>
@@ -216,223 +231,229 @@ <h3 class="card-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set_c~3~~CallsGraph Pages: 1 -->
-<svg id="procset_c3CallsGraph" width="641pt" height="113pt"
- viewBox="0.00 0.00 641.00 112.75" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set_c~3~~CallsGraph" class="graph" transform="scale(1.77 1.77) rotate(0) translate(4 196)">
+<svg id="procset_c3CallsGraph" width="641pt" height="86pt"
+ viewBox="0.00 0.00 641.00 85.97" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set_c~3~~CallsGraph" class="graph" transform="scale(1.84 1.84) rotate(0) translate(4 154)">
 <title>proc~~set_c~3~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-196 1133,-196 1133,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-154 1174,-154 1174,4 -4,4"/>
 <!-- proc~set_c~3 -->
 <g id="proc~~set_c~3~~CallsGraph_node1" class="node">
 <title>proc~set_c~3</title>
-<polygon fill="none" stroke="black" points="116,-108 0,-108 0,-84 116,-84 116,-108"/>
-<text text-anchor="middle" x="58" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set_C</text>
+<polygon fill="none" stroke="black" points="126,-87 0,-87 0,-63 126,-63 126,-87"/>
+<text text-anchor="middle" x="63" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set_C</text>
 </g>
 <!-- none~set~3 -->
 <g id="proc~~set_c~3~~CallsGraph_node2" class="node">
 <title>none~set~3</title>
-<g id="a_proc~~set_c~3~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
-<polygon fill="#a7506f" stroke="#a7506f" points="255,-108 152,-108 152,-84 255,-84 255,-108"/>
-<text text-anchor="middle" x="203.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
+<g id="a_proc~~set_c~3~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
+<polygon fill="#a7506f" stroke="#a7506f" points="275,-87 162,-87 162,-63 275,-63 275,-87"/>
+<text text-anchor="middle" x="218.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
 <!-- proc~set_c~3&#45;&gt;none~set~3 -->
 <g id="proc~~set_c~3~~CallsGraph_edge1" class="edge">
 <title>proc~set_c~3&#45;&gt;none~set~3</title>
-<path fill="none" stroke="#ff0000" d="M116.13,-96C124.46,-96 133.07,-96 141.48,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="141.61,-99.5 151.61,-96 141.61,-92.5 141.61,-99.5"/>
-</g>
-<!-- proc~set1a -->
-<g id="proc~~set_c~3~~CallsGraph_node3" class="node">
-<title>proc~set1a</title>
-<g id="a_proc~~set_c~3~~CallsGraph_node3"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="408,-192 291,-192 291,-168 408,-168 408,-192"/>
-<text text-anchor="middle" x="349.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
-</a>
-</g>
-</g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
-<g id="proc~~set_c~3~~CallsGraph_edge2" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M218.37,-108.01C234.81,-121.77 263.46,-144.32 291,-159 294.29,-160.75 297.75,-162.42 301.29,-163.99"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="300.15,-167.31 310.72,-167.92 302.84,-160.85 300.15,-167.31"/>
+<path fill="none" stroke="#ff0000" d="M126.43,-75C134.7,-75 143.19,-75 151.51,-75"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="151.54,-78.5 161.54,-75 151.54,-71.5 151.54,-78.5"/>
 </g>
 <!-- proc~set1~3 -->
-<g id="proc~~set_c~3~~CallsGraph_node4" class="node">
+<g id="proc~~set_c~3~~CallsGraph_node3" class="node">
 <title>proc~set1~3</title>
-<g id="a_proc~~set_c~3~~CallsGraph_node4"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="404.5,-150 294.5,-150 294.5,-126 404.5,-126 404.5,-150"/>
-<text text-anchor="middle" x="349.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<g id="a_proc~~set_c~3~~CallsGraph_node3"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="431,-108 311,-108 311,-84 431,-84 431,-108"/>
+<text text-anchor="middle" x="371" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set1~3 -->
-<g id="proc~~set_c~3~~CallsGraph_edge3" class="edge">
+<g id="proc~~set_c~3~~CallsGraph_edge2" class="edge">
 <title>none~set~3&#45;&gt;proc~set1~3</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M245.76,-108.04C261.88,-112.74 280.53,-118.18 297.48,-123.12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="296.65,-126.52 307.23,-125.96 298.61,-119.8 296.65,-126.52"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M275.11,-82.76C283.48,-83.93 292.19,-85.14 300.8,-86.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="300.44,-89.83 310.83,-87.74 301.41,-82.89 300.44,-89.83"/>
 </g>
 <!-- proc~set2~3 -->
-<g id="proc~~set_c~3~~CallsGraph_node5" class="node">
+<g id="proc~~set_c~3~~CallsGraph_node4" class="node">
 <title>proc~set2~3</title>
-<g id="a_proc~~set_c~3~~CallsGraph_node5"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
-<polygon fill="#d9534f" stroke="#d9534f" points="404.5,-66 294.5,-66 294.5,-42 404.5,-42 404.5,-66"/>
-<text text-anchor="middle" x="349.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
+<g id="a_proc~~set_c~3~~CallsGraph_node4"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
+<polygon fill="#d9534f" stroke="#d9534f" points="431,-66 311,-66 311,-42 431,-42 431,-66"/>
+<text text-anchor="middle" x="371" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set2~3 -->
-<g id="proc~~set_c~3~~CallsGraph_edge4" class="edge">
+<g id="proc~~set_c~3~~CallsGraph_edge3" class="edge">
 <title>none~set~3&#45;&gt;proc~set2~3</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M245.76,-83.96C261.88,-79.26 280.53,-73.82 297.48,-68.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="298.61,-72.2 307.23,-66.04 296.65,-65.48 298.61,-72.2"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M275.11,-67.24C283.48,-66.07 292.19,-64.86 300.8,-63.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="301.41,-67.11 310.83,-62.26 300.44,-60.17 301.41,-67.11"/>
 </g>
 <!-- proc~set3~3 -->
-<g id="proc~~set_c~3~~CallsGraph_node6" class="node">
+<g id="proc~~set_c~3~~CallsGraph_node5" class="node">
 <title>proc~set3~3</title>
-<g id="a_proc~~set_c~3~~CallsGraph_node6"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
-<polygon fill="#d9534f" stroke="#d9534f" points="404.5,-108 294.5,-108 294.5,-84 404.5,-84 404.5,-108"/>
-<text text-anchor="middle" x="349.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
+<g id="a_proc~~set_c~3~~CallsGraph_node5"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
+<polygon fill="#d9534f" stroke="#d9534f" points="431,-150 311,-150 311,-126 431,-126 431,-150"/>
+<text text-anchor="middle" x="371" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set3~3 -->
-<g id="proc~~set_c~3~~CallsGraph_edge5" class="edge">
+<g id="proc~~set_c~3~~CallsGraph_edge4" class="edge">
 <title>none~set~3&#45;&gt;proc~set3~3</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M255.27,-96C264.64,-96 274.55,-96 284.26,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="284.28,-99.5 294.28,-96 284.28,-92.5 284.28,-99.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M244.1,-87.01C262.37,-95.75 288.01,-107.65 311,-117 315.49,-118.82 320.2,-120.65 324.92,-122.42"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="323.96,-125.8 334.55,-125.96 326.37,-119.22 323.96,-125.8"/>
 </g>
 <!-- proc~set4~3 -->
-<g id="proc~~set_c~3~~CallsGraph_node7" class="node">
+<g id="proc~~set_c~3~~CallsGraph_node6" class="node">
 <title>proc~set4~3</title>
-<g id="a_proc~~set_c~3~~CallsGraph_node7"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
-<polygon fill="#d9534f" stroke="#d9534f" points="404.5,-24 294.5,-24 294.5,0 404.5,0 404.5,-24"/>
-<text text-anchor="middle" x="349.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
+<g id="a_proc~~set_c~3~~CallsGraph_node6"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
+<polygon fill="#d9534f" stroke="#d9534f" points="431,-24 311,-24 311,0 431,0 431,-24"/>
+<text text-anchor="middle" x="371" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
 <!-- none~set~3&#45;&gt;proc~set4~3 -->
-<g id="proc~~set_c~3~~CallsGraph_edge6" class="edge">
+<g id="proc~~set_c~3~~CallsGraph_edge5" class="edge">
 <title>none~set~3&#45;&gt;proc~set4~3</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M218.37,-83.99C234.81,-70.23 263.46,-47.68 291,-33 294.29,-31.25 297.75,-29.58 301.29,-28.01"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="302.84,-31.15 310.72,-24.08 300.15,-24.69 302.84,-31.15"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M244.1,-62.99C262.37,-54.25 288.01,-42.35 311,-33 315.49,-31.18 320.2,-29.35 324.92,-27.58"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="326.37,-30.78 334.55,-24.04 323.96,-24.2 326.37,-30.78"/>
 </g>
 <!-- proc~cmp_degree~3 -->
-<g id="proc~~set_c~3~~CallsGraph_node8" class="node">
+<g id="proc~~set_c~3~~CallsGraph_node7" class="node">
 <title>proc~cmp_degree~3</title>
-<g id="a_proc~~set_c~3~~CallsGraph_node8"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
-<polygon fill="#d9534f" stroke="#d9534f" points="598,-150 444,-150 444,-126 598,-126 598,-150"/>
-<text text-anchor="middle" x="521" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
+<g id="a_proc~~set_c~3~~CallsGraph_node7"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
+<polygon fill="#d9534f" stroke="#d9534f" points="630,-150 467,-150 467,-126 630,-126 630,-150"/>
+<text text-anchor="middle" x="548.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<g id="proc~~set_c~3~~CallsGraph_edge6" class="edge">
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
+<path fill="none" stroke="#ff0000" d="M422.29,-108.04C442.58,-112.89 466.15,-118.53 487.34,-123.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="486.66,-127.04 497.2,-125.96 488.29,-120.23 486.66,-127.04"/>
+</g>
+<!-- proc~cmp_nc~3 -->
+<g id="proc~~set_c~3~~CallsGraph_node8" class="node">
+<title>proc~cmp_nc~3</title>
+<g id="a_proc~~set_c~3~~CallsGraph_node8"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
+<polygon fill="#d9534f" stroke="#d9534f" points="618,-108 479,-108 479,-84 618,-84 618,-108"/>
+<text text-anchor="middle" x="548.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
+</a>
+</g>
+</g>
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~set_c~3~~CallsGraph_edge7" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#ff0000" d="M399.07,-167.96C418.58,-163.13 441.23,-157.52 461.62,-152.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="462.56,-155.84 471.42,-150.04 460.87,-149.05 462.56,-155.84"/>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#ff0000" d="M431.42,-96C443.3,-96 455.97,-96 468.4,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="468.76,-99.5 478.76,-96 468.76,-92.5 468.76,-99.5"/>
 </g>
-<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~set_c~3~~CallsGraph_edge8" class="edge">
-<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#cbff00" d="M404.6,-138C413.87,-138 423.72,-138 433.59,-138"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="433.86,-141.5 443.86,-138 433.86,-134.5 433.86,-141.5"/>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
+<path fill="none" stroke="#7fff00" d="M422.29,-66.04C442.58,-70.89 466.15,-76.53 487.34,-81.6"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="486.66,-85.04 497.2,-83.96 488.29,-78.23 486.66,-85.04"/>
 </g>
 <!-- proc~compute_knot_vector -->
 <g id="proc~~set_c~3~~CallsGraph_node9" class="node">
 <title>proc~compute_knot_vector</title>
 <g id="a_proc~~set_c~3~~CallsGraph_node9"><a xlink:href="../proc/compute_knot_vector.html" xlink:title="compute_knot_vector">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="584.5,-66 457.5,-66 457.5,-42 584.5,-42 584.5,-66"/>
-<text text-anchor="middle" x="521" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="612,-66 485,-66 485,-42 612,-42 612,-66"/>
+<text text-anchor="middle" x="548.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_knot_vector</text>
 </a>
 </g>
 </g>
 <!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~set_c~3~~CallsGraph_edge9" class="edge">
 <title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
-<path fill="none" stroke="#00ff66" d="M404.6,-54C418.08,-54 432.77,-54 447,-54"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="447.26,-57.5 457.26,-54 447.26,-50.5 447.26,-57.5"/>
+<path fill="none" stroke="#7fff00" d="M431.42,-54C445.26,-54 460.16,-54 474.51,-54"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="474.85,-57.5 484.85,-54 474.85,-50.5 474.85,-57.5"/>
 </g>
 <!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="proc~~set_c~3~~CallsGraph_edge10" class="edge">
 <title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#0066ff" d="M399.07,-108.04C418.58,-112.87 441.23,-118.48 461.62,-123.53"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="460.87,-126.95 471.42,-125.96 462.56,-120.16 460.87,-126.95"/>
+<path fill="none" stroke="#00ffff" d="M431.42,-138C439.64,-138 448.23,-138 456.86,-138"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="456.98,-141.5 466.98,-138 456.98,-134.5 456.98,-141.5"/>
 </g>
 <!-- proc~get_multiplicity~3 -->
-<g id="proc~~set_c~3~~CallsGraph_node10" class="node">
+<g id="proc~~set_c~3~~CallsGraph_node11" class="node">
 <title>proc~get_multiplicity~3</title>
-<g id="a_proc~~set_c~3~~CallsGraph_node10"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="803,-150 634,-150 634,-126 803,-126 803,-150"/>
-<text text-anchor="middle" x="718.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
+<g id="a_proc~~set_c~3~~CallsGraph_node11"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="844,-149 666,-149 666,-125 844,-125 844,-149"/>
+<text text-anchor="middle" x="755" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
 <!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="proc~~set_c~3~~CallsGraph_edge11" class="edge">
 <title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
-<path fill="none" stroke="#ff0000" d="M598.15,-138C606.54,-138 615.17,-138 623.75,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="623.79,-141.5 633.79,-138 623.79,-134.5 623.79,-141.5"/>
+<path fill="none" stroke="#ff0000" d="M630.03,-137.61C638.47,-137.56 647.11,-137.52 655.71,-137.48"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="655.8,-140.98 665.78,-137.43 655.76,-133.98 655.8,-140.98"/>
 </g>
-<!-- proc~repelem -->
-<g id="proc~~set_c~3~~CallsGraph_node11" class="node">
-<title>proc~repelem</title>
-<g id="a_proc~~set_c~3~~CallsGraph_node11"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="747,-66 690,-66 690,-42 747,-42 747,-66"/>
-<text text-anchor="middle" x="718.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
+<!-- interface~compute_multiplicity -->
+<g id="proc~~set_c~3~~CallsGraph_node10" class="node">
+<title>interface~compute_multiplicity</title>
+<g id="a_proc~~set_c~3~~CallsGraph_node10"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
+<polygon fill="#a7506f" stroke="#a7506f" points="1004,-129 880,-129 880,-105 1004,-105 1004,-129"/>
+<text text-anchor="middle" x="942" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set_c~3~~CallsGraph_edge12" class="edge">
-<title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
-<path fill="none" stroke="#00ffff" d="M584.66,-54C615.92,-54 652.69,-54 679.61,-54"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="679.78,-57.5 689.78,-54 679.78,-50.5 679.78,-57.5"/>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
+<path fill="none" stroke="#00ff00" d="M618.14,-99.68C688.69,-103.47 798.03,-109.33 869.57,-113.17"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="869.67,-116.68 879.85,-113.72 870.05,-109.69 869.67,-116.68"/>
 </g>
-<!-- interface~compute_multiplicity -->
+<!-- proc~repelem -->
 <g id="proc~~set_c~3~~CallsGraph_node12" class="node">
-<title>interface~compute_multiplicity</title>
-<g id="a_proc~~set_c~3~~CallsGraph_node12"><a xlink:href="../interface/compute_multiplicity.html" xlink:title="compute_multiplicity">
-<polygon fill="#a7506f" stroke="#a7506f" points="963,-150 839,-150 839,-126 963,-126 963,-150"/>
-<text text-anchor="middle" x="901" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity</text>
+<title>proc~repelem</title>
+<g id="a_proc~~set_c~3~~CallsGraph_node12"><a xlink:href="../proc/repelem.html" xlink:title="repelem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="783.5,-66 726.5,-66 726.5,-42 783.5,-42 783.5,-66"/>
+<text text-anchor="middle" x="755" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">repelem</text>
 </a>
 </g>
 </g>
-<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~compute_knot_vector&#45;&gt;proc~repelem -->
 <g id="proc~~set_c~3~~CallsGraph_edge13" class="edge">
-<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
-<path fill="none" stroke="#ff0000" d="M803.15,-138C811.73,-138 820.4,-138 828.84,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="828.99,-141.5 838.99,-138 828.99,-134.5 828.99,-141.5"/>
+<title>proc~compute_knot_vector&#45;&gt;proc~repelem</title>
+<path fill="none" stroke="#0000ff" d="M612.25,-54C646.23,-54 687.1,-54 716.2,-54"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="716.36,-57.5 726.36,-54 716.35,-50.5 716.36,-57.5"/>
 </g>
 <!-- proc~compute_multiplicity1 -->
 <g id="proc~~set_c~3~~CallsGraph_node13" class="node">
 <title>proc~compute_multiplicity1</title>
 <g id="a_proc~~set_c~3~~CallsGraph_node13"><a xlink:href="../proc/compute_multiplicity1.html" xlink:title="compute_multiplicity1">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1129,-171 999,-171 999,-147 1129,-147 1129,-171"/>
-<text text-anchor="middle" x="1064" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1170,-150 1040,-150 1040,-126 1170,-126 1170,-150"/>
+<text text-anchor="middle" x="1105" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity1</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1 -->
 <g id="proc~~set_c~3~~CallsGraph_edge14" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity1</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M963.33,-146C971.69,-147.09 980.35,-148.22 988.92,-149.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="988.53,-152.82 998.9,-150.64 989.44,-145.88 988.53,-152.82"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1004.33,-125C1012.69,-126.09 1021.35,-127.22 1029.92,-128.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1029.53,-131.82 1039.9,-129.64 1030.44,-124.88 1029.53,-131.82"/>
 </g>
 <!-- proc~compute_multiplicity2 -->
 <g id="proc~~set_c~3~~CallsGraph_node14" class="node">
 <title>proc~compute_multiplicity2</title>
 <g id="a_proc~~set_c~3~~CallsGraph_node14"><a xlink:href="../proc/compute_multiplicity2.html" xlink:title="compute_multiplicity2">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1129,-129 999,-129 999,-105 1129,-105 1129,-129"/>
-<text text-anchor="middle" x="1064" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1170,-108 1040,-108 1040,-84 1170,-84 1170,-108"/>
+<text text-anchor="middle" x="1105" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_multiplicity2</text>
 </a>
 </g>
 </g>
 <!-- interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2 -->
 <g id="proc~~set_c~3~~CallsGraph_edge15" class="edge">
 <title>interface~compute_multiplicity&#45;&gt;proc~compute_multiplicity2</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M963.33,-130C971.69,-128.91 980.35,-127.78 988.92,-126.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="989.44,-130.12 998.9,-125.36 988.53,-123.18 989.44,-130.12"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1004.33,-109C1012.69,-107.91 1021.35,-106.78 1029.92,-105.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1030.44,-109.12 1039.9,-104.36 1029.53,-102.18 1030.44,-109.12"/>
+</g>
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<g id="proc~~set_c~3~~CallsGraph_edge16" class="edge">
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
+<path fill="none" stroke="#00ff00" d="M844.17,-127.47C852.77,-126.54 861.42,-125.6 869.82,-124.7"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="870.36,-128.16 879.93,-123.6 869.61,-121.2 870.36,-128.16"/>
 </g>
 </g>
 </svg>
@@ -532,31 +553,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~set_c~3~~CalledByGraph Pages: 1 -->
-<svg id="procset_c3CalledByGraph" width="236pt" height="32pt"
- viewBox="0.00 0.00 236.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procset_c3CalledByGraph" width="246pt" height="32pt"
+ viewBox="0.00 0.00 246.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~set_c~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~set_c~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 232,-28 232,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 242,-28 242,4 -4,4"/>
 <!-- proc~set_c~3 -->
 <g id="proc~~set_c~3~~CalledByGraph_node1" class="node">
 <title>proc~set_c~3</title>
-<polygon fill="none" stroke="black" points="228,-24 112,-24 112,0 228,0 228,-24"/>
-<text text-anchor="middle" x="170" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set_C</text>
+<polygon fill="none" stroke="black" points="238,-24 112,-24 112,0 238,0 238,-24"/>
+<text text-anchor="middle" x="175" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set_C</text>
 </g>
-<!-- program~shape_c_1d -->
+<!-- program~shape_c_2d -->
 <g id="proc~~set_c~3~~CalledByGraph_node2" class="node">
-<title>program~shape_c_1d</title>
-<g id="a_proc~~set_c~3~~CalledByGraph_node2"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
+<title>program~shape_c_2d</title>
+<g id="a_proc~~set_c~3~~CalledByGraph_node2"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="76,-24 0,-24 0,0 76,0 76,-24"/>
-<text text-anchor="middle" x="38" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<text text-anchor="middle" x="38" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~set_c~3 -->
+<!-- program~shape_c_2d&#45;&gt;proc~set_c~3 -->
 <g id="proc~~set_c~3~~CalledByGraph_edge1" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~set_c~3</title>
-<path fill="none" stroke="#ff0000" d="M76.25,-12C84.23,-12 92.9,-12 101.63,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="101.86,-15.5 111.86,-12 101.86,-8.5 101.86,-15.5"/>
+<title>program~shape_c_2d&#45;&gt;proc~set_c~3</title>
+<path fill="none" stroke="#ff0000" d="M76.25,-12C84.3,-12 93.08,-12 101.96,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="102,-15.5 112,-12 102,-8.5 102,-15.5"/>
 </g>
 </g>
 </svg>
@@ -672,7 +693,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_elem.html b/proc/set_elem.html
index 12685d997..7f5b24162 100644
--- a/proc/set_elem.html
+++ b/proc/set_elem.html
@@ -83,15 +83,15 @@ <h1>set_elem
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">set_elem</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine set_elem(this, elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~45"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~44"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -190,127 +190,6 @@ <h3>Arguments</h3>
   </table>
 
     <br>
-    <div class="card">
-      <div class="card-header">
-  <h3 class="card-title">Called by</h3>
-      </div>
-      <div class="card-body">
-  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.43.0 (0)
- -->
-<!-- Title: proc~~set_elem~~CalledByGraph Pages: 1 -->
-<svg id="procset_elemCalledByGraph" width="299pt" height="32pt"
- viewBox="0.00 0.00 299.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set_elem~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
-<title>proc~~set_elem~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 295,-28 295,4 -4,4"/>
-<!-- proc~set_elem -->
-<g id="proc~~set_elem~~CalledByGraph_node1" class="node">
-<title>proc~set_elem</title>
-<polygon fill="none" stroke="black" points="291,-24 146,-24 146,0 291,0 291,-24"/>
-<text text-anchor="middle" x="218.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set_elem</text>
-</g>
-<!-- program~example3_volume -->
-<g id="proc~~set_elem~~CalledByGraph_node2" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~set_elem~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
-</a>
-</g>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~set_elem -->
-<g id="proc~~set_elem~~CalledByGraph_edge1" class="edge">
-<title>program~example3_volume&#45;&gt;proc~set_elem</title>
-<path fill="none" stroke="#ff0000" d="M110.23,-12C118.46,-12 127.11,-12 135.77,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.92,-15.5 145.92,-12 135.92,-8.5 135.92,-15.5"/>
-</g>
-</g>
-</svg>
-</div>          <div>
-            <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
-          </div>
-          <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
-            <div class="modal-dialog modal-lg" role="document">
-              <div class="modal-content">
-                <div class="modal-header">
-                  <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
-                  <button type="button" class="btn-close" data-bs-dismiss="modal" aria-label="Close"></button>
-                </div>
-                <div class="modal-body">
-<p>Nodes of different colours represent the following: </p>
-<?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.43.0 (0)
- -->
-<!-- Title: Graph Key Pages: 1 -->
-<svg width="641pt" height="28pt"
- viewBox="0.00 0.00 641.00 27.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="graph0" class="graph" transform="scale(1.16 1.16) rotate(0) translate(4 28)">
-<title>Graph Key</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 741.5,-28 741.5,4 -4,4"/>
-<!-- Subroutine -->
-<g id="node1" class="node">
-<title>Subroutine</title>
-<polygon fill="#d9534f" stroke="#d9534f" points="70,-24 0,-24 0,0 70,0 70,-24"/>
-<text text-anchor="middle" x="35" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
-</g>
-<!-- Function -->
-<g id="node2" class="node">
-<title>Function</title>
-<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-24 88,-24 88,0 146,0 146,-24"/>
-<text text-anchor="middle" x="117" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
-</g>
-<!-- Interface -->
-<g id="node3" class="node">
-<title>Interface</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="225.5,-24 164.5,-24 164.5,0 225.5,0 225.5,-24"/>
-<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
-</g>
-<!-- Type Bound Procedure -->
-<g id="node4" class="node">
-<title>Type Bound Procedure</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="374,-24 244,-24 244,0 374,0 374,-24"/>
-<text text-anchor="middle" x="309" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Type Bound Procedure</text>
-</g>
-<!-- Unknown Procedure Type -->
-<g id="node5" class="node">
-<title>Unknown Procedure Type</title>
-<polygon fill="#777777" stroke="#777777" points="537.5,-24 392.5,-24 392.5,0 537.5,0 537.5,-24"/>
-<text text-anchor="middle" x="465" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
-</g>
-<!-- Program -->
-<g id="node6" class="node">
-<title>Program</title>
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-24 556,-24 556,0 614,0 614,-24"/>
-<text text-anchor="middle" x="585" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
-</g>
-<!-- This Page&#39;s Entity -->
-<g id="node7" class="node">
-<title>This Page&#39;s Entity</title>
-<polygon fill="none" stroke="black" points="737.5,-24 632.5,-24 632.5,0 737.5,0 737.5,-24"/>
-<text text-anchor="middle" x="685" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
-</g>
-</g>
-</svg>
-
-<p>Solid arrows point from a procedure to one which it calls. Dashed 
-arrows point from an interface to procedures which implement that interface.
-This could include the module procedures in a generic interface or the
-implementation in a submodule of an interface in a parent module.
-</p>
- Where possible, edges connecting nodes are
-given different colours to make them easier to distinguish in
-large graphs.</div>
-            </div>
-          </div>
-        </div>
-      </div>
-    </div>
-    <br>
 
 
     
@@ -341,7 +220,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_elem_xc_vis.html b/proc/set_elem_xc_vis.html
index 04ecee60b..2ae860b91 100644
--- a/proc/set_elem_xc_vis.html
+++ b/proc/set_elem_xc_vis.html
@@ -83,15 +83,15 @@ <h1>set_elem_Xc_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">set_elem_Xc_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine set_elem_Xc_vis(this, elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~43"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~42"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -220,7 +220,7 @@ <h3>Arguments</h3>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_elem_xc_vis~2.html b/proc/set_elem_xc_vis~2.html
index 49380e3d6..87f1208a9 100644
--- a/proc/set_elem_xc_vis~2.html
+++ b/proc/set_elem_xc_vis~2.html
@@ -83,15 +83,15 @@ <h1>set_elem_Xc_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">set_elem_Xc_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine set_elem_Xc_vis(this, elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~111"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~104"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~22"></span>
+              <span class="anchor" id="variable-elemconn~18"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -220,7 +220,7 @@ <h3>Arguments</h3>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_elem_xc_vis~3.html b/proc/set_elem_xc_vis~3.html
index 2411ef83b..96682f2fa 100644
--- a/proc/set_elem_xc_vis~3.html
+++ b/proc/set_elem_xc_vis~3.html
@@ -83,15 +83,15 @@ <h1>set_elem_Xc_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">set_elem_Xc_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine set_elem_Xc_vis(this, elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~173"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~172"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -220,7 +220,7 @@ <h3>Arguments</h3>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_elem_xg_vis.html b/proc/set_elem_xg_vis.html
index fc6cd80f6..2998c81c6 100644
--- a/proc/set_elem_xg_vis.html
+++ b/proc/set_elem_xg_vis.html
@@ -83,15 +83,15 @@ <h1>set_elem_Xg_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">set_elem_Xg_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine set_elem_Xg_vis(this, elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~44"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~43"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -190,142 +190,6 @@ <h3>Arguments</h3>
   </table>
 
     <br>
-    <div class="card">
-      <div class="card-header">
-  <h3 class="card-title">Called by</h3>
-      </div>
-      <div class="card-body">
-  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.43.0 (0)
- -->
-<!-- Title: proc~~set_elem_xg_vis~~CalledByGraph Pages: 1 -->
-<svg id="procset_elem_xg_visCalledByGraph" width="562pt" height="32pt"
- viewBox="0.00 0.00 562.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~set_elem_xg_vis~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
-<title>proc~~set_elem_xg_vis~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 558,-28 558,4 -4,4"/>
-<!-- proc~set_elem_xg_vis -->
-<g id="proc~~set_elem_xg_vis~~CalledByGraph_node1" class="node">
-<title>proc~set_elem_xg_vis</title>
-<polygon fill="none" stroke="black" points="554,-24 370,-24 370,0 554,0 554,-24"/>
-<text text-anchor="middle" x="462" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set_elem_Xg_vis</text>
-</g>
-<!-- proc~put_to_nurbs -->
-<g id="proc~~set_elem_xg_vis~~CalledByGraph_node2" class="node">
-<title>proc~put_to_nurbs</title>
-<g id="a_proc~~set_elem_xg_vis~~CalledByGraph_node2"><a xlink:href="../proc/put_to_nurbs.html" xlink:title="nurbs_volume%put_to_nurbs">
-<polygon fill="#d9534f" stroke="#d9534f" points="334,-24 168,-24 168,0 334,0 334,-24"/>
-<text text-anchor="middle" x="251" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%put_to_nurbs</text>
-</a>
-</g>
-</g>
-<!-- proc~put_to_nurbs&#45;&gt;proc~set_elem_xg_vis -->
-<g id="proc~~set_elem_xg_vis~~CalledByGraph_edge1" class="edge">
-<title>proc~put_to_nurbs&#45;&gt;proc~set_elem_xg_vis</title>
-<path fill="none" stroke="#ff0000" d="M334,-12C342.47,-12 351.14,-12 359.78,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="359.9,-15.5 369.9,-12 359.9,-8.5 359.9,-15.5"/>
-</g>
-<!-- program~example_put_to_nurbs -->
-<g id="proc~~set_elem_xg_vis~~CalledByGraph_node3" class="node">
-<title>program~example_put_to_nurbs</title>
-<g id="a_proc~~set_elem_xg_vis~~CalledByGraph_node3"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="132,-24 0,-24 0,0 132,0 132,-24"/>
-<text text-anchor="middle" x="66" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
-</a>
-</g>
-</g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~put_to_nurbs -->
-<g id="proc~~set_elem_xg_vis~~CalledByGraph_edge2" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~put_to_nurbs</title>
-<path fill="none" stroke="#ff0000" d="M132.03,-12C140.38,-12 149.04,-12 157.72,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="157.89,-15.5 167.89,-12 157.89,-8.5 157.89,-15.5"/>
-</g>
-</g>
-</svg>
-</div>          <div>
-            <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
-          </div>
-          <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
-            <div class="modal-dialog modal-lg" role="document">
-              <div class="modal-content">
-                <div class="modal-header">
-                  <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
-                  <button type="button" class="btn-close" data-bs-dismiss="modal" aria-label="Close"></button>
-                </div>
-                <div class="modal-body">
-<p>Nodes of different colours represent the following: </p>
-<?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.43.0 (0)
- -->
-<!-- Title: Graph Key Pages: 1 -->
-<svg width="641pt" height="28pt"
- viewBox="0.00 0.00 641.00 27.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="graph0" class="graph" transform="scale(1.16 1.16) rotate(0) translate(4 28)">
-<title>Graph Key</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 741.5,-28 741.5,4 -4,4"/>
-<!-- Subroutine -->
-<g id="node1" class="node">
-<title>Subroutine</title>
-<polygon fill="#d9534f" stroke="#d9534f" points="70,-24 0,-24 0,0 70,0 70,-24"/>
-<text text-anchor="middle" x="35" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
-</g>
-<!-- Function -->
-<g id="node2" class="node">
-<title>Function</title>
-<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-24 88,-24 88,0 146,0 146,-24"/>
-<text text-anchor="middle" x="117" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
-</g>
-<!-- Interface -->
-<g id="node3" class="node">
-<title>Interface</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="225.5,-24 164.5,-24 164.5,0 225.5,0 225.5,-24"/>
-<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
-</g>
-<!-- Type Bound Procedure -->
-<g id="node4" class="node">
-<title>Type Bound Procedure</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="374,-24 244,-24 244,0 374,0 374,-24"/>
-<text text-anchor="middle" x="309" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Type Bound Procedure</text>
-</g>
-<!-- Unknown Procedure Type -->
-<g id="node5" class="node">
-<title>Unknown Procedure Type</title>
-<polygon fill="#777777" stroke="#777777" points="537.5,-24 392.5,-24 392.5,0 537.5,0 537.5,-24"/>
-<text text-anchor="middle" x="465" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
-</g>
-<!-- Program -->
-<g id="node6" class="node">
-<title>Program</title>
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-24 556,-24 556,0 614,0 614,-24"/>
-<text text-anchor="middle" x="585" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
-</g>
-<!-- This Page&#39;s Entity -->
-<g id="node7" class="node">
-<title>This Page&#39;s Entity</title>
-<polygon fill="none" stroke="black" points="737.5,-24 632.5,-24 632.5,0 737.5,0 737.5,-24"/>
-<text text-anchor="middle" x="685" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
-</g>
-</g>
-</svg>
-
-<p>Solid arrows point from a procedure to one which it calls. Dashed 
-arrows point from an interface to procedures which implement that interface.
-This could include the module procedures in a generic interface or the
-implementation in a submodule of an interface in a parent module.
-</p>
- Where possible, edges connecting nodes are
-given different colours to make them easier to distinguish in
-large graphs.</div>
-            </div>
-          </div>
-        </div>
-      </div>
-    </div>
-    <br>
 
 
     
@@ -356,7 +220,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_elem_xg_vis~2.html b/proc/set_elem_xg_vis~2.html
index 9c9c4a22f..49d91b621 100644
--- a/proc/set_elem_xg_vis~2.html
+++ b/proc/set_elem_xg_vis~2.html
@@ -83,15 +83,15 @@ <h1>set_elem_Xg_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">set_elem_Xg_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine set_elem_Xg_vis(this, elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~112"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~105"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~23"></span>
+              <span class="anchor" id="variable-elemconn~19"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -190,6 +190,142 @@ <h3>Arguments</h3>
   </table>
 
     <br>
+    <div class="card">
+      <div class="card-header">
+  <h3 class="card-title">Called by</h3>
+      </div>
+      <div class="card-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.43.0 (0)
+ -->
+<!-- Title: proc~~set_elem_xg_vis~2~~CalledByGraph Pages: 1 -->
+<svg id="procset_elem_xg_vis2CalledByGraph" width="562pt" height="32pt"
+ viewBox="0.00 0.00 562.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set_elem_xg_vis~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>proc~~set_elem_xg_vis~2~~CalledByGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 558,-28 558,4 -4,4"/>
+<!-- proc~set_elem_xg_vis~2 -->
+<g id="proc~~set_elem_xg_vis~2~~CalledByGraph_node1" class="node">
+<title>proc~set_elem_xg_vis~2</title>
+<polygon fill="none" stroke="black" points="554,-24 370,-24 370,0 554,0 554,-24"/>
+<text text-anchor="middle" x="462" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set_elem_Xg_vis</text>
+</g>
+<!-- proc~put_to_nurbs -->
+<g id="proc~~set_elem_xg_vis~2~~CalledByGraph_node2" class="node">
+<title>proc~put_to_nurbs</title>
+<g id="a_proc~~set_elem_xg_vis~2~~CalledByGraph_node2"><a xlink:href="../proc/put_to_nurbs.html" xlink:title="nurbs_volume%put_to_nurbs">
+<polygon fill="#d9534f" stroke="#d9534f" points="334,-24 168,-24 168,0 334,0 334,-24"/>
+<text text-anchor="middle" x="251" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%put_to_nurbs</text>
+</a>
+</g>
+</g>
+<!-- proc~put_to_nurbs&#45;&gt;proc~set_elem_xg_vis~2 -->
+<g id="proc~~set_elem_xg_vis~2~~CalledByGraph_edge1" class="edge">
+<title>proc~put_to_nurbs&#45;&gt;proc~set_elem_xg_vis~2</title>
+<path fill="none" stroke="#ff0000" d="M334,-12C342.47,-12 351.14,-12 359.78,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="359.9,-15.5 369.9,-12 359.9,-8.5 359.9,-15.5"/>
+</g>
+<!-- program~example_put_to_nurbs -->
+<g id="proc~~set_elem_xg_vis~2~~CalledByGraph_node3" class="node">
+<title>program~example_put_to_nurbs</title>
+<g id="a_proc~~set_elem_xg_vis~2~~CalledByGraph_node3"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="132,-24 0,-24 0,0 132,0 132,-24"/>
+<text text-anchor="middle" x="66" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
+</a>
+</g>
+</g>
+<!-- program~example_put_to_nurbs&#45;&gt;proc~put_to_nurbs -->
+<g id="proc~~set_elem_xg_vis~2~~CalledByGraph_edge2" class="edge">
+<title>program~example_put_to_nurbs&#45;&gt;proc~put_to_nurbs</title>
+<path fill="none" stroke="#ff0000" d="M132.03,-12C140.38,-12 149.04,-12 157.72,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="157.89,-15.5 167.89,-12 157.89,-8.5 157.89,-15.5"/>
+</g>
+</g>
+</svg>
+</div>          <div>
+            <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
+          </div>
+          <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
+            <div class="modal-dialog modal-lg" role="document">
+              <div class="modal-content">
+                <div class="modal-header">
+                  <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
+                  <button type="button" class="btn-close" data-bs-dismiss="modal" aria-label="Close"></button>
+                </div>
+                <div class="modal-body">
+<p>Nodes of different colours represent the following: </p>
+<?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.43.0 (0)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="641pt" height="28pt"
+ viewBox="0.00 0.00 641.00 27.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1.16 1.16) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 741.5,-28 741.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="70,-24 0,-24 0,0 70,0 70,-24"/>
+<text text-anchor="middle" x="35" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-24 88,-24 88,0 146,0 146,-24"/>
+<text text-anchor="middle" x="117" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="225.5,-24 164.5,-24 164.5,0 225.5,0 225.5,-24"/>
+<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Type Bound Procedure -->
+<g id="node4" class="node">
+<title>Type Bound Procedure</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="374,-24 244,-24 244,0 374,0 374,-24"/>
+<text text-anchor="middle" x="309" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Type Bound Procedure</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node5" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="537.5,-24 392.5,-24 392.5,0 537.5,0 537.5,-24"/>
+<text text-anchor="middle" x="465" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node6" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-24 556,-24 556,0 614,0 614,-24"/>
+<text text-anchor="middle" x="585" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node7" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="737.5,-24 632.5,-24 632.5,0 737.5,0 737.5,-24"/>
+<text text-anchor="middle" x="685" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+<p>Solid arrows point from a procedure to one which it calls. Dashed 
+arrows point from an interface to procedures which implement that interface.
+This could include the module procedures in a generic interface or the
+implementation in a submodule of an interface in a parent module.
+</p>
+ Where possible, edges connecting nodes are
+given different colours to make them easier to distinguish in
+large graphs.</div>
+            </div>
+          </div>
+        </div>
+      </div>
+    </div>
+    <br>
 
 
     
@@ -220,7 +356,7 @@ <h3>Arguments</h3>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_elem_xg_vis~3.html b/proc/set_elem_xg_vis~3.html
index 92534512f..7cf866556 100644
--- a/proc/set_elem_xg_vis~3.html
+++ b/proc/set_elem_xg_vis~3.html
@@ -83,15 +83,15 @@ <h1>set_elem_Xg_vis
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">set_elem_Xg_vis</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine set_elem_Xg_vis(this, elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~174"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~173"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -220,7 +220,7 @@ <h3>Arguments</h3>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_elem~2.html b/proc/set_elem~2.html
index 0ea0cbdcf..16ba23641 100644
--- a/proc/set_elem~2.html
+++ b/proc/set_elem~2.html
@@ -83,15 +83,15 @@ <h1>set_elem
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">set_elem</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine set_elem(this, elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~113"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~106"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~24"></span>
+              <span class="anchor" id="variable-elemconn~20"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -190,6 +190,127 @@ <h3>Arguments</h3>
   </table>
 
     <br>
+    <div class="card">
+      <div class="card-header">
+  <h3 class="card-title">Called by</h3>
+      </div>
+      <div class="card-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.43.0 (0)
+ -->
+<!-- Title: proc~~set_elem~2~~CalledByGraph Pages: 1 -->
+<svg id="procset_elem2CalledByGraph" width="299pt" height="32pt"
+ viewBox="0.00 0.00 299.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~set_elem~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>proc~~set_elem~2~~CalledByGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 295,-28 295,4 -4,4"/>
+<!-- proc~set_elem~2 -->
+<g id="proc~~set_elem~2~~CalledByGraph_node1" class="node">
+<title>proc~set_elem~2</title>
+<polygon fill="none" stroke="black" points="291,-24 146,-24 146,0 291,0 291,-24"/>
+<text text-anchor="middle" x="218.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set_elem</text>
+</g>
+<!-- program~example3_volume -->
+<g id="proc~~set_elem~2~~CalledByGraph_node2" class="node">
+<title>program~example3_volume</title>
+<g id="a_proc~~set_elem~2~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+</a>
+</g>
+</g>
+<!-- program~example3_volume&#45;&gt;proc~set_elem~2 -->
+<g id="proc~~set_elem~2~~CalledByGraph_edge1" class="edge">
+<title>program~example3_volume&#45;&gt;proc~set_elem~2</title>
+<path fill="none" stroke="#ff0000" d="M110.23,-12C118.46,-12 127.11,-12 135.77,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="135.92,-15.5 145.92,-12 135.92,-8.5 135.92,-15.5"/>
+</g>
+</g>
+</svg>
+</div>          <div>
+            <a type="button" class="graph-help" data-bs-toggle="modal" href="#CalledByGraph-help-text">Help</a>
+          </div>
+          <div class="modal fade" id="CalledByGraph-help-text" tabindex="-1" role="dialog">
+            <div class="modal-dialog modal-lg" role="document">
+              <div class="modal-content">
+                <div class="modal-header">
+                  <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
+                  <button type="button" class="btn-close" data-bs-dismiss="modal" aria-label="Close"></button>
+                </div>
+                <div class="modal-body">
+<p>Nodes of different colours represent the following: </p>
+<?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.43.0 (0)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="641pt" height="28pt"
+ viewBox="0.00 0.00 641.00 27.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1.16 1.16) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 741.5,-28 741.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="70,-24 0,-24 0,0 70,0 70,-24"/>
+<text text-anchor="middle" x="35" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-24 88,-24 88,0 146,0 146,-24"/>
+<text text-anchor="middle" x="117" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="225.5,-24 164.5,-24 164.5,0 225.5,0 225.5,-24"/>
+<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Type Bound Procedure -->
+<g id="node4" class="node">
+<title>Type Bound Procedure</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="374,-24 244,-24 244,0 374,0 374,-24"/>
+<text text-anchor="middle" x="309" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Type Bound Procedure</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node5" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="537.5,-24 392.5,-24 392.5,0 537.5,0 537.5,-24"/>
+<text text-anchor="middle" x="465" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node6" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-24 556,-24 556,0 614,0 614,-24"/>
+<text text-anchor="middle" x="585" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node7" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="737.5,-24 632.5,-24 632.5,0 737.5,0 737.5,-24"/>
+<text text-anchor="middle" x="685" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+<p>Solid arrows point from a procedure to one which it calls. Dashed 
+arrows point from an interface to procedures which implement that interface.
+This could include the module procedures in a generic interface or the
+implementation in a submodule of an interface in a parent module.
+</p>
+ Where possible, edges connecting nodes are
+given different colours to make them easier to distinguish in
+large graphs.</div>
+            </div>
+          </div>
+        </div>
+      </div>
+    </div>
+    <br>
 
 
     
@@ -220,7 +341,7 @@ <h3>Arguments</h3>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_elem~3.html b/proc/set_elem~3.html
index 6e5373fcf..3a71b7b5a 100644
--- a/proc/set_elem~3.html
+++ b/proc/set_elem~3.html
@@ -83,15 +83,15 @@ <h1>set_elem
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">set_elem</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine set_elem(this, elemConn)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~175"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~174"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -220,7 +220,7 @@ <h3>Arguments</h3>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_half_circle.html b/proc/set_half_circle.html
index 768eb3b61..b35e1889e 100644
--- a/proc/set_half_circle.html
+++ b/proc/set_half_circle.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~188"></span>
+              <span class="anchor" id="variable-this~57"></span>
               class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center~11"></span>
+              <span class="anchor" id="variable-center~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -227,116 +227,116 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="163,-108 0,-108 0,-84 163,-84 163,-108"/>
 <text text-anchor="middle" x="81.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%set_half_circle</text>
 </g>
-<!-- none~set~3 -->
+<!-- none~set -->
 <g id="proc~~set_half_circle~~CallsGraph_node2" class="node">
-<title>none~set~3</title>
-<g id="a_proc~~set_half_circle~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
+<title>none~set</title>
+<g id="a_proc~~set_half_circle~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="302,-108 199,-108 199,-84 302,-84 302,-108"/>
 <text text-anchor="middle" x="250.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_half_circle&#45;&gt;none~set -->
 <g id="proc~~set_half_circle~~CallsGraph_edge1" class="edge">
-<title>proc~set_half_circle&#45;&gt;none~set~3</title>
+<title>proc~set_half_circle&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M163.06,-96C171.72,-96 180.42,-96 188.79,-96"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="188.81,-99.5 198.81,-96 188.81,-92.5 188.81,-99.5"/>
 </g>
-<!-- proc~set1a -->
+<!-- proc~set1 -->
 <g id="proc~~set_half_circle~~CallsGraph_node3" class="node">
-<title>proc~set1a</title>
-<g id="a_proc~~set_half_circle~~CallsGraph_node3"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="455,-192 338,-192 338,-168 455,-168 455,-192"/>
-<text text-anchor="middle" x="396.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+<title>proc~set1</title>
+<g id="a_proc~~set_half_circle~~CallsGraph_node3"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="451.5,-192 341.5,-192 341.5,-168 451.5,-168 451.5,-192"/>
+<text text-anchor="middle" x="396.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
+<!-- none~set&#45;&gt;proc~set1 -->
 <g id="proc~~set_half_circle~~CallsGraph_edge2" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
+<title>none~set&#45;&gt;proc~set1</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M265.37,-108.01C281.81,-121.77 310.46,-144.32 338,-159 341.29,-160.75 344.75,-162.42 348.29,-163.99"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="347.15,-167.31 357.72,-167.92 349.84,-160.85 347.15,-167.31"/>
 </g>
-<!-- proc~set1~3 -->
+<!-- proc~set1a -->
 <g id="proc~~set_half_circle~~CallsGraph_node4" class="node">
-<title>proc~set1~3</title>
-<g id="a_proc~~set_half_circle~~CallsGraph_node4"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="451.5,-150 341.5,-150 341.5,-126 451.5,-126 451.5,-150"/>
-<text text-anchor="middle" x="396.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<title>proc~set1a</title>
+<g id="a_proc~~set_half_circle~~CallsGraph_node4"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="455,-150 338,-150 338,-126 455,-126 455,-150"/>
+<text text-anchor="middle" x="396.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1~3 -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="proc~~set_half_circle~~CallsGraph_edge3" class="edge">
-<title>none~set~3&#45;&gt;proc~set1~3</title>
+<title>none~set&#45;&gt;proc~set1a</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M292.76,-108.04C308.88,-112.74 327.53,-118.18 344.48,-123.12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="343.65,-126.52 354.23,-125.96 345.61,-119.8 343.65,-126.52"/>
 </g>
-<!-- proc~set2~3 -->
+<!-- proc~set2 -->
 <g id="proc~~set_half_circle~~CallsGraph_node5" class="node">
-<title>proc~set2~3</title>
-<g id="a_proc~~set_half_circle~~CallsGraph_node5"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
+<title>proc~set2</title>
+<g id="a_proc~~set_half_circle~~CallsGraph_node5"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="451.5,-66 341.5,-66 341.5,-42 451.5,-42 451.5,-66"/>
 <text text-anchor="middle" x="396.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set2~3 -->
+<!-- none~set&#45;&gt;proc~set2 -->
 <g id="proc~~set_half_circle~~CallsGraph_edge4" class="edge">
-<title>none~set~3&#45;&gt;proc~set2~3</title>
+<title>none~set&#45;&gt;proc~set2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M292.76,-83.96C308.88,-79.26 327.53,-73.82 344.48,-68.88"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="345.61,-72.2 354.23,-66.04 343.65,-65.48 345.61,-72.2"/>
 </g>
-<!-- proc~set3~3 -->
+<!-- proc~set3 -->
 <g id="proc~~set_half_circle~~CallsGraph_node6" class="node">
-<title>proc~set3~3</title>
-<g id="a_proc~~set_half_circle~~CallsGraph_node6"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
+<title>proc~set3</title>
+<g id="a_proc~~set_half_circle~~CallsGraph_node6"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="451.5,-108 341.5,-108 341.5,-84 451.5,-84 451.5,-108"/>
 <text text-anchor="middle" x="396.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set3~3 -->
+<!-- none~set&#45;&gt;proc~set3 -->
 <g id="proc~~set_half_circle~~CallsGraph_edge5" class="edge">
-<title>none~set~3&#45;&gt;proc~set3~3</title>
+<title>none~set&#45;&gt;proc~set3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M302.27,-96C311.64,-96 321.55,-96 331.26,-96"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="331.28,-99.5 341.28,-96 331.28,-92.5 331.28,-99.5"/>
 </g>
-<!-- proc~set4~3 -->
+<!-- proc~set4 -->
 <g id="proc~~set_half_circle~~CallsGraph_node7" class="node">
-<title>proc~set4~3</title>
-<g id="a_proc~~set_half_circle~~CallsGraph_node7"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
+<title>proc~set4</title>
+<g id="a_proc~~set_half_circle~~CallsGraph_node7"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="451.5,-24 341.5,-24 341.5,0 451.5,0 451.5,-24"/>
 <text text-anchor="middle" x="396.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set4~3 -->
+<!-- none~set&#45;&gt;proc~set4 -->
 <g id="proc~~set_half_circle~~CallsGraph_edge6" class="edge">
-<title>none~set~3&#45;&gt;proc~set4~3</title>
+<title>none~set&#45;&gt;proc~set4</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M265.37,-83.99C281.81,-70.23 310.46,-47.68 338,-33 341.29,-31.25 344.75,-29.58 348.29,-28.01"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="349.84,-31.15 357.72,-24.08 347.15,-24.69 349.84,-31.15"/>
 </g>
-<!-- proc~cmp_degree~3 -->
+<!-- proc~cmp_degree -->
 <g id="proc~~set_half_circle~~CallsGraph_node8" class="node">
-<title>proc~cmp_degree~3</title>
-<g id="a_proc~~set_half_circle~~CallsGraph_node8"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
+<title>proc~cmp_degree</title>
+<g id="a_proc~~set_half_circle~~CallsGraph_node8"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="645,-150 491,-150 491,-126 645,-126 645,-150"/>
 <text text-anchor="middle" x="568" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1&#45;&gt;proc~cmp_degree -->
 <g id="proc~~set_half_circle~~CallsGraph_edge7" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
+<title>proc~set1&#45;&gt;proc~cmp_degree</title>
 <path fill="none" stroke="#ff0000" d="M446.07,-167.96C465.58,-163.13 488.23,-157.52 508.62,-152.47"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="509.56,-155.84 518.42,-150.04 507.87,-149.05 509.56,-155.84"/>
 </g>
-<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
 <g id="proc~~set_half_circle~~CallsGraph_edge8" class="edge">
-<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#cbff00" d="M451.6,-138C460.87,-138 470.72,-138 480.59,-138"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="480.86,-141.5 490.86,-138 480.86,-134.5 480.86,-141.5"/>
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#cbff00" d="M455.36,-138C463.56,-138 472.14,-138 480.74,-138"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="480.82,-141.5 490.82,-138 480.82,-134.5 480.82,-141.5"/>
 </g>
 <!-- proc~compute_knot_vector -->
 <g id="proc~~set_half_circle~~CallsGraph_node9" class="node">
@@ -347,30 +347,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~set_half_circle~~CallsGraph_edge9" class="edge">
-<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#00ff66" d="M451.6,-54C465.08,-54 479.77,-54 494,-54"/>
 <polygon fill="#00ff66" stroke="#00ff66" points="494.26,-57.5 504.26,-54 494.26,-50.5 494.26,-57.5"/>
 </g>
-<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set3&#45;&gt;proc~cmp_degree -->
 <g id="proc~~set_half_circle~~CallsGraph_edge10" class="edge">
-<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
+<title>proc~set3&#45;&gt;proc~cmp_degree</title>
 <path fill="none" stroke="#0066ff" d="M446.07,-108.04C465.58,-112.87 488.23,-118.48 508.62,-123.53"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="507.87,-126.95 518.42,-125.96 509.56,-120.16 507.87,-126.95"/>
 </g>
-<!-- proc~get_multiplicity~3 -->
+<!-- proc~get_multiplicity -->
 <g id="proc~~set_half_circle~~CallsGraph_node10" class="node">
-<title>proc~get_multiplicity~3</title>
-<g id="a_proc~~set_half_circle~~CallsGraph_node10"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
+<title>proc~get_multiplicity</title>
+<g id="a_proc~~set_half_circle~~CallsGraph_node10"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="850,-150 681,-150 681,-126 850,-126 850,-150"/>
 <text text-anchor="middle" x="765.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
+<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="proc~~set_half_circle~~CallsGraph_edge11" class="edge">
-<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
+<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
 <path fill="none" stroke="#ff0000" d="M645.15,-138C653.54,-138 662.17,-138 670.75,-138"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="670.79,-141.5 680.79,-138 670.79,-134.5 670.79,-141.5"/>
 </g>
@@ -398,9 +398,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set_half_circle~~CallsGraph_edge13" class="edge">
-<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#ff0000" d="M850.15,-138C858.73,-138 867.4,-138 875.84,-138"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="875.99,-141.5 885.99,-138 875.99,-134.5 875.99,-141.5"/>
 </g>
@@ -672,7 +672,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_half_ring.html b/proc/set_half_ring.html
index ac3ffda56..0e3a6ba63 100644
--- a/proc/set_half_ring.html
+++ b/proc/set_half_ring.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~60"></span>
+              <span class="anchor" id="variable-this~121"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center~3"></span>
+              <span class="anchor" id="variable-center~7"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -218,7 +218,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-length~3"></span>
+              <span class="anchor" id="variable-length~4"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -257,114 +257,114 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="165,-87 0,-87 0,-63 165,-63 165,-87"/>
 <text text-anchor="middle" x="82.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set_half_ring</text>
 </g>
-<!-- none~set -->
+<!-- none~set~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_node2" class="node">
-<title>none~set</title>
-<g id="a_proc~~set_half_ring~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
+<title>none~set~2</title>
+<g id="a_proc~~set_half_ring~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="314,-87 201,-87 201,-63 314,-63 314,-87"/>
 <text text-anchor="middle" x="257.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring&#45;&gt;none~set -->
+<!-- proc~set_half_ring&#45;&gt;none~set~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_edge1" class="edge">
-<title>proc~set_half_ring&#45;&gt;none~set</title>
+<title>proc~set_half_ring&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M165.19,-75C173.77,-75 182.42,-75 190.79,-75"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="190.84,-78.5 200.84,-75 190.84,-71.5 190.84,-78.5"/>
 </g>
-<!-- proc~set1 -->
+<!-- proc~set1~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_node3" class="node">
-<title>proc~set1</title>
-<g id="a_proc~~set_half_ring~~CallsGraph_node3"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
+<title>proc~set1~2</title>
+<g id="a_proc~~set_half_ring~~CallsGraph_node3"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="470,-108 350,-108 350,-84 470,-84 470,-108"/>
 <text text-anchor="middle" x="410" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set1 -->
+<!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_edge2" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
+<title>none~set~2&#45;&gt;proc~set1~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M314.11,-82.76C322.48,-83.93 331.19,-85.14 339.8,-86.34"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="339.44,-89.83 349.83,-87.74 340.41,-82.89 339.44,-89.83"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set2~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_node4" class="node">
-<title>proc~set2</title>
-<g id="a_proc~~set_half_ring~~CallsGraph_node4"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
+<title>proc~set2~2</title>
+<g id="a_proc~~set_half_ring~~CallsGraph_node4"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="470,-66 350,-66 350,-42 470,-42 470,-66"/>
 <text text-anchor="middle" x="410" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set2 -->
+<!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_edge3" class="edge">
-<title>none~set&#45;&gt;proc~set2</title>
+<title>none~set~2&#45;&gt;proc~set2~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M314.11,-67.24C322.48,-66.07 331.19,-64.86 339.8,-63.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="340.41,-67.11 349.83,-62.26 339.44,-60.17 340.41,-67.11"/>
 </g>
-<!-- proc~set3 -->
+<!-- proc~set3~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_node5" class="node">
-<title>proc~set3</title>
-<g id="a_proc~~set_half_ring~~CallsGraph_node5"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
+<title>proc~set3~2</title>
+<g id="a_proc~~set_half_ring~~CallsGraph_node5"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="470,-150 350,-150 350,-126 470,-126 470,-150"/>
 <text text-anchor="middle" x="410" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set3 -->
+<!-- none~set~2&#45;&gt;proc~set3~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_edge4" class="edge">
-<title>none~set&#45;&gt;proc~set3</title>
+<title>none~set~2&#45;&gt;proc~set3~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M283.1,-87.01C301.37,-95.75 327.01,-107.65 350,-117 354.49,-118.82 359.2,-120.65 363.92,-122.42"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="362.96,-125.8 373.55,-125.96 365.37,-119.22 362.96,-125.8"/>
 </g>
-<!-- proc~set4 -->
+<!-- proc~set4~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_node6" class="node">
-<title>proc~set4</title>
-<g id="a_proc~~set_half_ring~~CallsGraph_node6"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
+<title>proc~set4~2</title>
+<g id="a_proc~~set_half_ring~~CallsGraph_node6"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="470,-24 350,-24 350,0 470,0 470,-24"/>
 <text text-anchor="middle" x="410" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set4 -->
+<!-- none~set~2&#45;&gt;proc~set4~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_edge5" class="edge">
-<title>none~set&#45;&gt;proc~set4</title>
+<title>none~set~2&#45;&gt;proc~set4~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M283.1,-62.99C301.37,-54.25 327.01,-42.35 350,-33 354.49,-31.18 359.2,-29.35 363.92,-27.58"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="365.37,-30.78 373.55,-24.04 362.96,-24.2 365.37,-30.78"/>
 </g>
-<!-- proc~cmp_degree -->
+<!-- proc~cmp_degree~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_node7" class="node">
-<title>proc~cmp_degree</title>
-<g id="a_proc~~set_half_ring~~CallsGraph_node7"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
+<title>proc~cmp_degree~2</title>
+<g id="a_proc~~set_half_ring~~CallsGraph_node7"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="669,-150 506,-150 506,-126 669,-126 669,-150"/>
 <text text-anchor="middle" x="587.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_degree -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_edge6" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#ff0000" d="M461.29,-108.04C481.58,-112.89 505.15,-118.53 526.34,-123.6"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="525.66,-127.04 536.2,-125.96 527.29,-120.23 525.66,-127.04"/>
 </g>
-<!-- proc~cmp_nc -->
+<!-- proc~cmp_nc~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_node8" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_proc~~set_half_ring~~CallsGraph_node8"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
+<title>proc~cmp_nc~2</title>
+<g id="a_proc~~set_half_ring~~CallsGraph_node8"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="657,-108 518,-108 518,-84 657,-84 657,-108"/>
 <text text-anchor="middle" x="587.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_edge7" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#ff0000" d="M470.42,-96C482.3,-96 494.97,-96 507.4,-96"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="507.76,-99.5 517.76,-96 507.76,-92.5 507.76,-99.5"/>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_edge8" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
+<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#7fff00" d="M461.29,-66.04C481.58,-70.89 505.15,-76.53 526.34,-81.6"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="525.66,-85.04 536.2,-83.96 527.29,-78.23 525.66,-85.04"/>
 </g>
@@ -377,30 +377,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~set_half_ring~~CallsGraph_edge9" class="edge">
-<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#7fff00" d="M470.42,-54C484.26,-54 499.16,-54 513.51,-54"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="513.85,-57.5 523.85,-54 513.85,-50.5 513.85,-57.5"/>
 </g>
-<!-- proc~set3&#45;&gt;proc~cmp_degree -->
+<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_edge10" class="edge">
-<title>proc~set3&#45;&gt;proc~cmp_degree</title>
+<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#00ffff" d="M470.42,-138C478.64,-138 487.23,-138 495.86,-138"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="495.98,-141.5 505.98,-138 495.98,-134.5 495.98,-141.5"/>
 </g>
-<!-- proc~get_multiplicity -->
+<!-- proc~get_multiplicity~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_node11" class="node">
-<title>proc~get_multiplicity</title>
-<g id="a_proc~~set_half_ring~~CallsGraph_node11"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
+<title>proc~get_multiplicity~2</title>
+<g id="a_proc~~set_half_ring~~CallsGraph_node11"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="883,-149 705,-149 705,-125 883,-125 883,-149"/>
 <text text-anchor="middle" x="794" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
+<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="proc~~set_half_ring~~CallsGraph_edge11" class="edge">
-<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
+<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
 <path fill="none" stroke="#ff0000" d="M669.03,-137.61C677.47,-137.56 686.11,-137.52 694.71,-137.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="694.8,-140.98 704.78,-137.43 694.76,-133.98 694.8,-140.98"/>
 </g>
@@ -413,9 +413,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set_half_ring~~CallsGraph_edge12" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M657.14,-99.68C727.69,-103.47 837.03,-109.33 908.57,-113.17"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="908.67,-116.68 918.85,-113.72 909.05,-109.69 908.67,-116.68"/>
 </g>
@@ -464,9 +464,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1043.33,-109C1051.69,-107.91 1060.35,-106.78 1068.92,-105.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1069.44,-109.12 1078.9,-104.36 1068.53,-102.18 1069.44,-109.12"/>
 </g>
-<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set_half_ring~~CallsGraph_edge16" class="edge">
-<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M883.17,-127.47C891.77,-126.54 900.42,-125.6 908.82,-124.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="909.36,-128.16 918.93,-123.6 908.61,-121.2 909.36,-128.16"/>
 </g>
@@ -708,7 +708,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_half_ring~2.html b/proc/set_half_ring~2.html
index 005ce642b..6fd068bc7 100644
--- a/proc/set_half_ring~2.html
+++ b/proc/set_half_ring~2.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~127"></span>
+              <span class="anchor" id="variable-this~188"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center~7"></span>
+              <span class="anchor" id="variable-center~10"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -242,114 +242,114 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="165,-87 0,-87 0,-63 165,-63 165,-87"/>
 <text text-anchor="middle" x="82.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set_half_ring</text>
 </g>
-<!-- none~set~2 -->
+<!-- none~set~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_node2" class="node">
-<title>none~set~2</title>
-<g id="a_proc~~set_half_ring~2~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<title>none~set~3</title>
+<g id="a_proc~~set_half_ring~2~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="314,-87 201,-87 201,-63 314,-63 314,-87"/>
 <text text-anchor="middle" x="257.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_half_ring~2&#45;&gt;none~set~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_edge1" class="edge">
-<title>proc~set_half_ring~2&#45;&gt;none~set~2</title>
+<title>proc~set_half_ring~2&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff0000" d="M165.19,-75C173.77,-75 182.42,-75 190.79,-75"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="190.84,-78.5 200.84,-75 190.84,-71.5 190.84,-78.5"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_node3" class="node">
-<title>proc~set1~2</title>
-<g id="a_proc~~set_half_ring~2~~CallsGraph_node3"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<title>proc~set1~3</title>
+<g id="a_proc~~set_half_ring~2~~CallsGraph_node3"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="470,-108 350,-108 350,-84 470,-84 470,-108"/>
 <text text-anchor="middle" x="410" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_edge2" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M314.11,-82.76C322.48,-83.93 331.19,-85.14 339.8,-86.34"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="339.44,-89.83 349.83,-87.74 340.41,-82.89 339.44,-89.83"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_node4" class="node">
-<title>proc~set2~2</title>
-<g id="a_proc~~set_half_ring~2~~CallsGraph_node4"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<title>proc~set2~3</title>
+<g id="a_proc~~set_half_ring~2~~CallsGraph_node4"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="470,-66 350,-66 350,-42 470,-42 470,-66"/>
 <text text-anchor="middle" x="410" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_edge3" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M314.11,-67.24C322.48,-66.07 331.19,-64.86 339.8,-63.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="340.41,-67.11 349.83,-62.26 339.44,-60.17 340.41,-67.11"/>
 </g>
-<!-- proc~set3~2 -->
+<!-- proc~set3~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_node5" class="node">
-<title>proc~set3~2</title>
-<g id="a_proc~~set_half_ring~2~~CallsGraph_node5"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<title>proc~set3~3</title>
+<g id="a_proc~~set_half_ring~2~~CallsGraph_node5"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="470,-150 350,-150 350,-126 470,-126 470,-150"/>
 <text text-anchor="middle" x="410" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_edge4" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
+<title>none~set~3&#45;&gt;proc~set3~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M283.1,-87.01C301.37,-95.75 327.01,-107.65 350,-117 354.49,-118.82 359.2,-120.65 363.92,-122.42"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="362.96,-125.8 373.55,-125.96 365.37,-119.22 362.96,-125.8"/>
 </g>
-<!-- proc~set4~2 -->
+<!-- proc~set4~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_node6" class="node">
-<title>proc~set4~2</title>
-<g id="a_proc~~set_half_ring~2~~CallsGraph_node6"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<title>proc~set4~3</title>
+<g id="a_proc~~set_half_ring~2~~CallsGraph_node6"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="470,-24 350,-24 350,0 470,0 470,-24"/>
 <text text-anchor="middle" x="410" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set4~2 -->
+<!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_edge5" class="edge">
-<title>none~set~2&#45;&gt;proc~set4~2</title>
+<title>none~set~3&#45;&gt;proc~set4~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M283.1,-62.99C301.37,-54.25 327.01,-42.35 350,-33 354.49,-31.18 359.2,-29.35 363.92,-27.58"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="365.37,-30.78 373.55,-24.04 362.96,-24.2 365.37,-30.78"/>
 </g>
-<!-- proc~cmp_degree~2 -->
+<!-- proc~cmp_degree~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_node7" class="node">
-<title>proc~cmp_degree~2</title>
-<g id="a_proc~~set_half_ring~2~~CallsGraph_node7"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<title>proc~cmp_degree~3</title>
+<g id="a_proc~~set_half_ring~2~~CallsGraph_node7"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="669,-150 506,-150 506,-126 669,-126 669,-150"/>
 <text text-anchor="middle" x="587.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_edge6" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#ff0000" d="M461.29,-108.04C481.58,-112.89 505.15,-118.53 526.34,-123.6"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="525.66,-127.04 536.2,-125.96 527.29,-120.23 525.66,-127.04"/>
 </g>
-<!-- proc~cmp_nc~2 -->
+<!-- proc~cmp_nc~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_node8" class="node">
-<title>proc~cmp_nc~2</title>
-<g id="a_proc~~set_half_ring~2~~CallsGraph_node8"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<title>proc~cmp_nc~3</title>
+<g id="a_proc~~set_half_ring~2~~CallsGraph_node8"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="657,-108 518,-108 518,-84 657,-84 657,-108"/>
 <text text-anchor="middle" x="587.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_edge7" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#ff0000" d="M470.42,-96C482.3,-96 494.97,-96 507.4,-96"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="507.76,-99.5 517.76,-96 507.76,-92.5 507.76,-99.5"/>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_edge8" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#7fff00" d="M461.29,-66.04C481.58,-70.89 505.15,-76.53 526.34,-81.6"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="525.66,-85.04 536.2,-83.96 527.29,-78.23 525.66,-85.04"/>
 </g>
@@ -362,30 +362,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~set_half_ring~2~~CallsGraph_edge9" class="edge">
-<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#7fff00" d="M470.42,-54C484.26,-54 499.16,-54 513.51,-54"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="513.85,-57.5 523.85,-54 513.85,-50.5 513.85,-57.5"/>
 </g>
-<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_edge10" class="edge">
-<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#00ffff" d="M470.42,-138C478.64,-138 487.23,-138 495.86,-138"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="495.98,-141.5 505.98,-138 495.98,-134.5 495.98,-141.5"/>
 </g>
-<!-- proc~get_multiplicity~2 -->
+<!-- proc~get_multiplicity~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_node11" class="node">
-<title>proc~get_multiplicity~2</title>
-<g id="a_proc~~set_half_ring~2~~CallsGraph_node11"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<title>proc~get_multiplicity~3</title>
+<g id="a_proc~~set_half_ring~2~~CallsGraph_node11"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="883,-149 705,-149 705,-125 883,-125 883,-149"/>
 <text text-anchor="middle" x="794" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="proc~~set_half_ring~2~~CallsGraph_edge11" class="edge">
-<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#ff0000" d="M669.03,-137.61C677.47,-137.56 686.11,-137.52 694.71,-137.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="694.8,-140.98 704.78,-137.43 694.76,-133.98 694.8,-140.98"/>
 </g>
@@ -398,9 +398,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set_half_ring~2~~CallsGraph_edge12" class="edge">
-<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M657.14,-99.68C727.69,-103.47 837.03,-109.33 908.57,-113.17"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="908.67,-116.68 918.85,-113.72 909.05,-109.69 908.67,-116.68"/>
 </g>
@@ -449,9 +449,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1043.33,-109C1051.69,-107.91 1060.35,-106.78 1068.92,-105.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1069.44,-109.12 1078.9,-104.36 1068.53,-102.18 1069.44,-109.12"/>
 </g>
-<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set_half_ring~2~~CallsGraph_edge16" class="edge">
-<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M883.17,-127.47C891.77,-126.54 900.42,-125.6 908.82,-124.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="909.36,-128.16 918.93,-123.6 908.61,-121.2 909.36,-128.16"/>
 </g>
@@ -708,7 +708,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_hexahedron.html b/proc/set_hexahedron.html
index 8e3ee5259..eff64beaa 100644
--- a/proc/set_hexahedron.html
+++ b/proc/set_hexahedron.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~49"></span>
+              <span class="anchor" id="variable-this~110"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-l"></span>
+              <span class="anchor" id="variable-l~3"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~7"></span>
+              <span class="anchor" id="variable-nc~27"></span>
               integer,
             </td>
 <td>intent(in),</td>
@@ -203,7 +203,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~9"></span>
+              <span class="anchor" id="variable-wc~33"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -242,18 +242,18 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="181,-66 0,-66 0,-42 181,-42 181,-66"/>
 <text text-anchor="middle" x="90.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set_hexahedron</text>
 </g>
-<!-- none~set -->
+<!-- none~set~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_node2" class="node">
-<title>none~set</title>
-<g id="a_proc~~set_hexahedron~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
+<title>none~set~2</title>
+<g id="a_proc~~set_hexahedron~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="330,-87 217,-87 217,-63 330,-63 330,-87"/>
 <text text-anchor="middle" x="273.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_hexahedron&#45;&gt;none~set -->
+<!-- proc~set_hexahedron&#45;&gt;none~set~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_edge1" class="edge">
-<title>proc~set_hexahedron&#45;&gt;none~set</title>
+<title>proc~set_hexahedron&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M181.2,-64.41C189.8,-65.4 198.4,-66.4 206.71,-67.37"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="206.33,-70.85 216.67,-68.52 207.14,-63.89 206.33,-70.85"/>
 </g>
@@ -272,99 +272,99 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M181.2,-43.59C193.18,-42.2 205.18,-40.81 216.36,-39.51"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="216.84,-42.98 226.37,-38.35 216.03,-36.03 216.84,-42.98"/>
 </g>
-<!-- proc~set1 -->
+<!-- proc~set1~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_node4" class="node">
-<title>proc~set1</title>
-<g id="a_proc~~set_hexahedron~~CallsGraph_node4"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
+<title>proc~set1~2</title>
+<g id="a_proc~~set_hexahedron~~CallsGraph_node4"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="486,-108 366,-108 366,-84 486,-84 486,-108"/>
 <text text-anchor="middle" x="426" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set1 -->
+<!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_edge3" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
+<title>none~set~2&#45;&gt;proc~set1~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M330.11,-82.76C338.48,-83.93 347.19,-85.14 355.8,-86.34"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="355.44,-89.83 365.83,-87.74 356.41,-82.89 355.44,-89.83"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set2~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_node5" class="node">
-<title>proc~set2</title>
-<g id="a_proc~~set_hexahedron~~CallsGraph_node5"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
+<title>proc~set2~2</title>
+<g id="a_proc~~set_hexahedron~~CallsGraph_node5"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="486,-66 366,-66 366,-42 486,-42 486,-66"/>
 <text text-anchor="middle" x="426" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set2 -->
+<!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_edge4" class="edge">
-<title>none~set&#45;&gt;proc~set2</title>
+<title>none~set~2&#45;&gt;proc~set2~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M330.11,-67.24C338.48,-66.07 347.19,-64.86 355.8,-63.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="356.41,-67.11 365.83,-62.26 355.44,-60.17 356.41,-67.11"/>
 </g>
-<!-- proc~set3 -->
+<!-- proc~set3~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_node6" class="node">
-<title>proc~set3</title>
-<g id="a_proc~~set_hexahedron~~CallsGraph_node6"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
+<title>proc~set3~2</title>
+<g id="a_proc~~set_hexahedron~~CallsGraph_node6"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="486,-150 366,-150 366,-126 486,-126 486,-150"/>
 <text text-anchor="middle" x="426" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set3 -->
+<!-- none~set~2&#45;&gt;proc~set3~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_edge5" class="edge">
-<title>none~set&#45;&gt;proc~set3</title>
+<title>none~set~2&#45;&gt;proc~set3~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M299.1,-87.01C317.37,-95.75 343.01,-107.65 366,-117 370.49,-118.82 375.2,-120.65 379.92,-122.42"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="378.96,-125.8 389.55,-125.96 381.37,-119.22 378.96,-125.8"/>
 </g>
-<!-- proc~set4 -->
+<!-- proc~set4~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_node7" class="node">
-<title>proc~set4</title>
-<g id="a_proc~~set_hexahedron~~CallsGraph_node7"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
+<title>proc~set4~2</title>
+<g id="a_proc~~set_hexahedron~~CallsGraph_node7"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="486,-24 366,-24 366,0 486,0 486,-24"/>
 <text text-anchor="middle" x="426" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set4 -->
+<!-- none~set~2&#45;&gt;proc~set4~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_edge6" class="edge">
-<title>none~set&#45;&gt;proc~set4</title>
+<title>none~set~2&#45;&gt;proc~set4~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M308.92,-63C315.99,-60.25 323.3,-57.19 330,-54 346.72,-46.03 349.2,-40.81 366,-33 369.88,-31.2 373.97,-29.45 378.1,-27.79"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="379.68,-30.93 387.75,-24.07 377.16,-24.4 379.68,-30.93"/>
 </g>
-<!-- proc~cmp_degree -->
+<!-- proc~cmp_degree~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_node8" class="node">
-<title>proc~cmp_degree</title>
-<g id="a_proc~~set_hexahedron~~CallsGraph_node8"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
+<title>proc~cmp_degree~2</title>
+<g id="a_proc~~set_hexahedron~~CallsGraph_node8"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="685,-150 522,-150 522,-126 685,-126 685,-150"/>
 <text text-anchor="middle" x="603.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_degree -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_edge7" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#ff0000" d="M477.29,-108.04C497.58,-112.89 521.15,-118.53 542.34,-123.6"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="541.66,-127.04 552.2,-125.96 543.29,-120.23 541.66,-127.04"/>
 </g>
-<!-- proc~cmp_nc -->
+<!-- proc~cmp_nc~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_node9" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_proc~~set_hexahedron~~CallsGraph_node9"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
+<title>proc~cmp_nc~2</title>
+<g id="a_proc~~set_hexahedron~~CallsGraph_node9"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="673,-108 534,-108 534,-84 673,-84 673,-108"/>
 <text text-anchor="middle" x="603.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_edge8" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#ff0000" d="M486.42,-96C498.3,-96 510.97,-96 523.4,-96"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="523.76,-99.5 533.76,-96 523.76,-92.5 523.76,-99.5"/>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_edge9" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
+<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#7fff00" d="M477.29,-66.04C497.58,-70.89 521.15,-76.53 542.34,-81.6"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="541.66,-85.04 552.2,-83.96 543.29,-78.23 541.66,-85.04"/>
 </g>
@@ -377,30 +377,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~set_hexahedron~~CallsGraph_edge10" class="edge">
-<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#7fff00" d="M486.42,-54C500.26,-54 515.16,-54 529.51,-54"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="529.85,-57.5 539.85,-54 529.85,-50.5 529.85,-57.5"/>
 </g>
-<!-- proc~set3&#45;&gt;proc~cmp_degree -->
+<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_edge11" class="edge">
-<title>proc~set3&#45;&gt;proc~cmp_degree</title>
+<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#00ffff" d="M486.42,-138C494.64,-138 503.23,-138 511.86,-138"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="511.98,-141.5 521.98,-138 511.98,-134.5 511.98,-141.5"/>
 </g>
-<!-- proc~get_multiplicity -->
+<!-- proc~get_multiplicity~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_node12" class="node">
-<title>proc~get_multiplicity</title>
-<g id="a_proc~~set_hexahedron~~CallsGraph_node12"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
+<title>proc~get_multiplicity~2</title>
+<g id="a_proc~~set_hexahedron~~CallsGraph_node12"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="899,-149 721,-149 721,-125 899,-125 899,-149"/>
 <text text-anchor="middle" x="810" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
+<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="proc~~set_hexahedron~~CallsGraph_edge12" class="edge">
-<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
+<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
 <path fill="none" stroke="#ff0000" d="M685.03,-137.61C693.47,-137.56 702.11,-137.52 710.71,-137.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="710.8,-140.98 720.78,-137.43 710.76,-133.98 710.8,-140.98"/>
 </g>
@@ -413,9 +413,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set_hexahedron~~CallsGraph_edge13" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M673.14,-99.68C743.69,-103.47 853.03,-109.33 924.57,-113.17"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="924.67,-116.68 934.85,-113.72 925.05,-109.69 924.67,-116.68"/>
 </g>
@@ -464,9 +464,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1059.33,-109C1067.69,-107.91 1076.35,-106.78 1084.92,-105.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1085.44,-109.12 1094.9,-104.36 1084.53,-102.18 1085.44,-109.12"/>
 </g>
-<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set_hexahedron~~CallsGraph_edge17" class="edge">
-<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M899.17,-127.47C907.77,-126.54 916.42,-125.6 924.82,-124.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="925.36,-128.16 934.93,-123.6 924.61,-121.2 925.36,-128.16"/>
 </g>
@@ -708,7 +708,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_ring.html b/proc/set_ring.html
index 9f7eff3d7..1774bd9aa 100644
--- a/proc/set_ring.html
+++ b/proc/set_ring.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~58"></span>
+              <span class="anchor" id="variable-this~119"></span>
               class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center"></span>
+              <span class="anchor" id="variable-center~5"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -218,7 +218,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-length"></span>
+              <span class="anchor" id="variable-length~2"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -257,114 +257,114 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="139,-87 0,-87 0,-63 139,-63 139,-87"/>
 <text text-anchor="middle" x="69.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%set_ring</text>
 </g>
-<!-- none~set -->
+<!-- none~set~2 -->
 <g id="proc~~set_ring~~CallsGraph_node2" class="node">
-<title>none~set</title>
-<g id="a_proc~~set_ring~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
+<title>none~set~2</title>
+<g id="a_proc~~set_ring~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="288,-87 175,-87 175,-63 288,-63 288,-87"/>
 <text text-anchor="middle" x="231.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring&#45;&gt;none~set -->
+<!-- proc~set_ring&#45;&gt;none~set~2 -->
 <g id="proc~~set_ring~~CallsGraph_edge1" class="edge">
-<title>proc~set_ring&#45;&gt;none~set</title>
+<title>proc~set_ring&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M139.28,-75C147.71,-75 156.31,-75 164.7,-75"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="164.79,-78.5 174.79,-75 164.79,-71.5 164.79,-78.5"/>
 </g>
-<!-- proc~set1 -->
+<!-- proc~set1~2 -->
 <g id="proc~~set_ring~~CallsGraph_node3" class="node">
-<title>proc~set1</title>
-<g id="a_proc~~set_ring~~CallsGraph_node3"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
+<title>proc~set1~2</title>
+<g id="a_proc~~set_ring~~CallsGraph_node3"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="444,-108 324,-108 324,-84 444,-84 444,-108"/>
 <text text-anchor="middle" x="384" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set1 -->
+<!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="proc~~set_ring~~CallsGraph_edge2" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
+<title>none~set~2&#45;&gt;proc~set1~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M288.11,-82.76C296.48,-83.93 305.19,-85.14 313.8,-86.34"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="313.44,-89.83 323.83,-87.74 314.41,-82.89 313.44,-89.83"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set2~2 -->
 <g id="proc~~set_ring~~CallsGraph_node4" class="node">
-<title>proc~set2</title>
-<g id="a_proc~~set_ring~~CallsGraph_node4"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
+<title>proc~set2~2</title>
+<g id="a_proc~~set_ring~~CallsGraph_node4"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="444,-66 324,-66 324,-42 444,-42 444,-66"/>
 <text text-anchor="middle" x="384" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set2 -->
+<!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="proc~~set_ring~~CallsGraph_edge3" class="edge">
-<title>none~set&#45;&gt;proc~set2</title>
+<title>none~set~2&#45;&gt;proc~set2~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M288.11,-67.24C296.48,-66.07 305.19,-64.86 313.8,-63.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="314.41,-67.11 323.83,-62.26 313.44,-60.17 314.41,-67.11"/>
 </g>
-<!-- proc~set3 -->
+<!-- proc~set3~2 -->
 <g id="proc~~set_ring~~CallsGraph_node5" class="node">
-<title>proc~set3</title>
-<g id="a_proc~~set_ring~~CallsGraph_node5"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
+<title>proc~set3~2</title>
+<g id="a_proc~~set_ring~~CallsGraph_node5"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="444,-150 324,-150 324,-126 444,-126 444,-150"/>
 <text text-anchor="middle" x="384" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set3 -->
+<!-- none~set~2&#45;&gt;proc~set3~2 -->
 <g id="proc~~set_ring~~CallsGraph_edge4" class="edge">
-<title>none~set&#45;&gt;proc~set3</title>
+<title>none~set~2&#45;&gt;proc~set3~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M257.1,-87.01C275.37,-95.75 301.01,-107.65 324,-117 328.49,-118.82 333.2,-120.65 337.92,-122.42"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="336.96,-125.8 347.55,-125.96 339.37,-119.22 336.96,-125.8"/>
 </g>
-<!-- proc~set4 -->
+<!-- proc~set4~2 -->
 <g id="proc~~set_ring~~CallsGraph_node6" class="node">
-<title>proc~set4</title>
-<g id="a_proc~~set_ring~~CallsGraph_node6"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
+<title>proc~set4~2</title>
+<g id="a_proc~~set_ring~~CallsGraph_node6"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="444,-24 324,-24 324,0 444,0 444,-24"/>
 <text text-anchor="middle" x="384" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set4 -->
+<!-- none~set~2&#45;&gt;proc~set4~2 -->
 <g id="proc~~set_ring~~CallsGraph_edge5" class="edge">
-<title>none~set&#45;&gt;proc~set4</title>
+<title>none~set~2&#45;&gt;proc~set4~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M257.1,-62.99C275.37,-54.25 301.01,-42.35 324,-33 328.49,-31.18 333.2,-29.35 337.92,-27.58"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="339.37,-30.78 347.55,-24.04 336.96,-24.2 339.37,-30.78"/>
 </g>
-<!-- proc~cmp_degree -->
+<!-- proc~cmp_degree~2 -->
 <g id="proc~~set_ring~~CallsGraph_node7" class="node">
-<title>proc~cmp_degree</title>
-<g id="a_proc~~set_ring~~CallsGraph_node7"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
+<title>proc~cmp_degree~2</title>
+<g id="a_proc~~set_ring~~CallsGraph_node7"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="643,-150 480,-150 480,-126 643,-126 643,-150"/>
 <text text-anchor="middle" x="561.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_degree -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="proc~~set_ring~~CallsGraph_edge6" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#ff0000" d="M435.29,-108.04C455.58,-112.89 479.15,-118.53 500.34,-123.6"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="499.66,-127.04 510.2,-125.96 501.29,-120.23 499.66,-127.04"/>
 </g>
-<!-- proc~cmp_nc -->
+<!-- proc~cmp_nc~2 -->
 <g id="proc~~set_ring~~CallsGraph_node8" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_proc~~set_ring~~CallsGraph_node8"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
+<title>proc~cmp_nc~2</title>
+<g id="a_proc~~set_ring~~CallsGraph_node8"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="631,-108 492,-108 492,-84 631,-84 631,-108"/>
 <text text-anchor="middle" x="561.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="proc~~set_ring~~CallsGraph_edge7" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#ff0000" d="M444.42,-96C456.3,-96 468.97,-96 481.4,-96"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="481.76,-99.5 491.76,-96 481.76,-92.5 481.76,-99.5"/>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="proc~~set_ring~~CallsGraph_edge8" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
+<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#7fff00" d="M435.29,-66.04C455.58,-70.89 479.15,-76.53 500.34,-81.6"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="499.66,-85.04 510.2,-83.96 501.29,-78.23 499.66,-85.04"/>
 </g>
@@ -377,30 +377,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~set_ring~~CallsGraph_edge9" class="edge">
-<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#7fff00" d="M444.42,-54C458.26,-54 473.16,-54 487.51,-54"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="487.85,-57.5 497.85,-54 487.85,-50.5 487.85,-57.5"/>
 </g>
-<!-- proc~set3&#45;&gt;proc~cmp_degree -->
+<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="proc~~set_ring~~CallsGraph_edge10" class="edge">
-<title>proc~set3&#45;&gt;proc~cmp_degree</title>
+<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#00ffff" d="M444.42,-138C452.64,-138 461.23,-138 469.86,-138"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="469.98,-141.5 479.98,-138 469.98,-134.5 469.98,-141.5"/>
 </g>
-<!-- proc~get_multiplicity -->
+<!-- proc~get_multiplicity~2 -->
 <g id="proc~~set_ring~~CallsGraph_node11" class="node">
-<title>proc~get_multiplicity</title>
-<g id="a_proc~~set_ring~~CallsGraph_node11"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
+<title>proc~get_multiplicity~2</title>
+<g id="a_proc~~set_ring~~CallsGraph_node11"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="857,-149 679,-149 679,-125 857,-125 857,-149"/>
 <text text-anchor="middle" x="768" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
+<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="proc~~set_ring~~CallsGraph_edge11" class="edge">
-<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
+<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
 <path fill="none" stroke="#ff0000" d="M643.03,-137.61C651.47,-137.56 660.11,-137.52 668.71,-137.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="668.8,-140.98 678.78,-137.43 668.76,-133.98 668.8,-140.98"/>
 </g>
@@ -413,9 +413,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set_ring~~CallsGraph_edge12" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M631.14,-99.68C701.69,-103.47 811.03,-109.33 882.57,-113.17"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="882.67,-116.68 892.85,-113.72 883.05,-109.69 882.67,-116.68"/>
 </g>
@@ -464,9 +464,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1017.33,-109C1025.69,-107.91 1034.35,-106.78 1042.92,-105.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1043.44,-109.12 1052.9,-104.36 1042.53,-102.18 1043.44,-109.12"/>
 </g>
-<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set_ring~~CallsGraph_edge16" class="edge">
-<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M857.17,-127.47C865.77,-126.54 874.42,-125.6 882.82,-124.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="883.36,-128.16 892.93,-123.6 882.61,-121.2 883.36,-128.16"/>
 </g>
@@ -708,7 +708,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_ring~2.html b/proc/set_ring~2.html
index ae22d067c..797a28433 100644
--- a/proc/set_ring~2.html
+++ b/proc/set_ring~2.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~125"></span>
+              <span class="anchor" id="variable-this~186"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center~5"></span>
+              <span class="anchor" id="variable-center~8"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -242,114 +242,114 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="139,-87 0,-87 0,-63 139,-63 139,-87"/>
 <text text-anchor="middle" x="69.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set_ring</text>
 </g>
-<!-- none~set~2 -->
+<!-- none~set~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_node2" class="node">
-<title>none~set~2</title>
-<g id="a_proc~~set_ring~2~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<title>none~set~3</title>
+<g id="a_proc~~set_ring~2~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="288,-87 175,-87 175,-63 288,-63 288,-87"/>
 <text text-anchor="middle" x="231.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_ring~2&#45;&gt;none~set~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_edge1" class="edge">
-<title>proc~set_ring~2&#45;&gt;none~set~2</title>
+<title>proc~set_ring~2&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff0000" d="M139.28,-75C147.71,-75 156.31,-75 164.7,-75"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="164.79,-78.5 174.79,-75 164.79,-71.5 164.79,-78.5"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_node3" class="node">
-<title>proc~set1~2</title>
-<g id="a_proc~~set_ring~2~~CallsGraph_node3"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<title>proc~set1~3</title>
+<g id="a_proc~~set_ring~2~~CallsGraph_node3"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="444,-108 324,-108 324,-84 444,-84 444,-108"/>
 <text text-anchor="middle" x="384" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_edge2" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M288.11,-82.76C296.48,-83.93 305.19,-85.14 313.8,-86.34"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="313.44,-89.83 323.83,-87.74 314.41,-82.89 313.44,-89.83"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_node4" class="node">
-<title>proc~set2~2</title>
-<g id="a_proc~~set_ring~2~~CallsGraph_node4"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<title>proc~set2~3</title>
+<g id="a_proc~~set_ring~2~~CallsGraph_node4"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="444,-66 324,-66 324,-42 444,-42 444,-66"/>
 <text text-anchor="middle" x="384" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_edge3" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M288.11,-67.24C296.48,-66.07 305.19,-64.86 313.8,-63.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="314.41,-67.11 323.83,-62.26 313.44,-60.17 314.41,-67.11"/>
 </g>
-<!-- proc~set3~2 -->
+<!-- proc~set3~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_node5" class="node">
-<title>proc~set3~2</title>
-<g id="a_proc~~set_ring~2~~CallsGraph_node5"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<title>proc~set3~3</title>
+<g id="a_proc~~set_ring~2~~CallsGraph_node5"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="444,-150 324,-150 324,-126 444,-126 444,-150"/>
 <text text-anchor="middle" x="384" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_edge4" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
+<title>none~set~3&#45;&gt;proc~set3~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M257.1,-87.01C275.37,-95.75 301.01,-107.65 324,-117 328.49,-118.82 333.2,-120.65 337.92,-122.42"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="336.96,-125.8 347.55,-125.96 339.37,-119.22 336.96,-125.8"/>
 </g>
-<!-- proc~set4~2 -->
+<!-- proc~set4~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_node6" class="node">
-<title>proc~set4~2</title>
-<g id="a_proc~~set_ring~2~~CallsGraph_node6"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<title>proc~set4~3</title>
+<g id="a_proc~~set_ring~2~~CallsGraph_node6"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="444,-24 324,-24 324,0 444,0 444,-24"/>
 <text text-anchor="middle" x="384" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set4~2 -->
+<!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_edge5" class="edge">
-<title>none~set~2&#45;&gt;proc~set4~2</title>
+<title>none~set~3&#45;&gt;proc~set4~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M257.1,-62.99C275.37,-54.25 301.01,-42.35 324,-33 328.49,-31.18 333.2,-29.35 337.92,-27.58"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="339.37,-30.78 347.55,-24.04 336.96,-24.2 339.37,-30.78"/>
 </g>
-<!-- proc~cmp_degree~2 -->
+<!-- proc~cmp_degree~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_node7" class="node">
-<title>proc~cmp_degree~2</title>
-<g id="a_proc~~set_ring~2~~CallsGraph_node7"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<title>proc~cmp_degree~3</title>
+<g id="a_proc~~set_ring~2~~CallsGraph_node7"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="643,-150 480,-150 480,-126 643,-126 643,-150"/>
 <text text-anchor="middle" x="561.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_edge6" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#ff0000" d="M435.29,-108.04C455.58,-112.89 479.15,-118.53 500.34,-123.6"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="499.66,-127.04 510.2,-125.96 501.29,-120.23 499.66,-127.04"/>
 </g>
-<!-- proc~cmp_nc~2 -->
+<!-- proc~cmp_nc~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_node8" class="node">
-<title>proc~cmp_nc~2</title>
-<g id="a_proc~~set_ring~2~~CallsGraph_node8"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<title>proc~cmp_nc~3</title>
+<g id="a_proc~~set_ring~2~~CallsGraph_node8"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="631,-108 492,-108 492,-84 631,-84 631,-108"/>
 <text text-anchor="middle" x="561.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_edge7" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#ff0000" d="M444.42,-96C456.3,-96 468.97,-96 481.4,-96"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="481.76,-99.5 491.76,-96 481.76,-92.5 481.76,-99.5"/>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_edge8" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#7fff00" d="M435.29,-66.04C455.58,-70.89 479.15,-76.53 500.34,-81.6"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="499.66,-85.04 510.2,-83.96 501.29,-78.23 499.66,-85.04"/>
 </g>
@@ -362,30 +362,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~set_ring~2~~CallsGraph_edge9" class="edge">
-<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#7fff00" d="M444.42,-54C458.26,-54 473.16,-54 487.51,-54"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="487.85,-57.5 497.85,-54 487.85,-50.5 487.85,-57.5"/>
 </g>
-<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_edge10" class="edge">
-<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#00ffff" d="M444.42,-138C452.64,-138 461.23,-138 469.86,-138"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="469.98,-141.5 479.98,-138 469.98,-134.5 469.98,-141.5"/>
 </g>
-<!-- proc~get_multiplicity~2 -->
+<!-- proc~get_multiplicity~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_node11" class="node">
-<title>proc~get_multiplicity~2</title>
-<g id="a_proc~~set_ring~2~~CallsGraph_node11"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<title>proc~get_multiplicity~3</title>
+<g id="a_proc~~set_ring~2~~CallsGraph_node11"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="857,-149 679,-149 679,-125 857,-125 857,-149"/>
 <text text-anchor="middle" x="768" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="proc~~set_ring~2~~CallsGraph_edge11" class="edge">
-<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#ff0000" d="M643.03,-137.61C651.47,-137.56 660.11,-137.52 668.71,-137.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="668.8,-140.98 678.78,-137.43 668.76,-133.98 668.8,-140.98"/>
 </g>
@@ -398,9 +398,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set_ring~2~~CallsGraph_edge12" class="edge">
-<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M631.14,-99.68C701.69,-103.47 811.03,-109.33 882.57,-113.17"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="882.67,-116.68 892.85,-113.72 883.05,-109.69 882.67,-116.68"/>
 </g>
@@ -449,9 +449,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1017.33,-109C1025.69,-107.91 1034.35,-106.78 1042.92,-105.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1043.44,-109.12 1052.9,-104.36 1042.53,-102.18 1043.44,-109.12"/>
 </g>
-<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set_ring~2~~CallsGraph_edge16" class="edge">
-<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M857.17,-127.47C865.77,-126.54 874.42,-125.6 882.82,-124.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="883.36,-128.16 892.93,-123.6 882.61,-121.2 883.36,-128.16"/>
 </g>
@@ -708,7 +708,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/set_tetragon.html b/proc/set_tetragon.html
index 3d6324469..d653b001b 100644
--- a/proc/set_tetragon.html
+++ b/proc/set_tetragon.html
@@ -158,7 +158,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~118"></span>
+              <span class="anchor" id="variable-this~179"></span>
               class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
@@ -173,7 +173,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-l~3"></span>
+              <span class="anchor" id="variable-l~7"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -188,7 +188,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~34"></span>
+              <span class="anchor" id="variable-nc~62"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -203,7 +203,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~33"></span>
+              <span class="anchor" id="variable-wc~53"></span>
               real(kind=rk),
             </td>
 <td>intent(in),</td>
@@ -242,18 +242,18 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="164,-66 0,-66 0,-42 164,-42 164,-66"/>
 <text text-anchor="middle" x="82" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%set_tetragon</text>
 </g>
-<!-- none~set~2 -->
+<!-- none~set~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_node2" class="node">
-<title>none~set~2</title>
-<g id="a_proc~~set_tetragon~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<title>none~set~3</title>
+<g id="a_proc~~set_tetragon~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="313,-87 200,-87 200,-63 313,-63 313,-87"/>
 <text text-anchor="middle" x="256.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_edge1" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff0000" d="M164.2,-63.89C172.77,-64.93 181.41,-65.98 189.78,-67"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="189.48,-70.49 199.83,-68.22 190.32,-63.54 189.48,-70.49"/>
 </g>
@@ -272,99 +272,99 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M164.2,-44.11C179.1,-42.3 194.2,-40.46 207.72,-38.82"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="208.22,-42.28 217.72,-37.6 207.37,-35.33 208.22,-42.28"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_node4" class="node">
-<title>proc~set1~2</title>
-<g id="a_proc~~set_tetragon~~CallsGraph_node4"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<title>proc~set1~3</title>
+<g id="a_proc~~set_tetragon~~CallsGraph_node4"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="469,-108 349,-108 349,-84 469,-84 469,-108"/>
 <text text-anchor="middle" x="409" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_edge3" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M313.11,-82.76C321.48,-83.93 330.19,-85.14 338.8,-86.34"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="338.44,-89.83 348.83,-87.74 339.41,-82.89 338.44,-89.83"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_node5" class="node">
-<title>proc~set2~2</title>
-<g id="a_proc~~set_tetragon~~CallsGraph_node5"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<title>proc~set2~3</title>
+<g id="a_proc~~set_tetragon~~CallsGraph_node5"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="469,-66 349,-66 349,-42 469,-42 469,-66"/>
 <text text-anchor="middle" x="409" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_edge4" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M313.11,-67.24C321.48,-66.07 330.19,-64.86 338.8,-63.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="339.41,-67.11 348.83,-62.26 338.44,-60.17 339.41,-67.11"/>
 </g>
-<!-- proc~set3~2 -->
+<!-- proc~set3~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_node6" class="node">
-<title>proc~set3~2</title>
-<g id="a_proc~~set_tetragon~~CallsGraph_node6"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<title>proc~set3~3</title>
+<g id="a_proc~~set_tetragon~~CallsGraph_node6"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="469,-150 349,-150 349,-126 469,-126 469,-150"/>
 <text text-anchor="middle" x="409" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_edge5" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
+<title>none~set~3&#45;&gt;proc~set3~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M282.1,-87.01C300.37,-95.75 326.01,-107.65 349,-117 353.49,-118.82 358.2,-120.65 362.92,-122.42"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="361.96,-125.8 372.55,-125.96 364.37,-119.22 361.96,-125.8"/>
 </g>
-<!-- proc~set4~2 -->
+<!-- proc~set4~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_node7" class="node">
-<title>proc~set4~2</title>
-<g id="a_proc~~set_tetragon~~CallsGraph_node7"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<title>proc~set4~3</title>
+<g id="a_proc~~set_tetragon~~CallsGraph_node7"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="469,-24 349,-24 349,0 469,0 469,-24"/>
 <text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set4~2 -->
+<!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_edge6" class="edge">
-<title>none~set~2&#45;&gt;proc~set4~2</title>
+<title>none~set~3&#45;&gt;proc~set4~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M291.92,-63C298.99,-60.25 306.3,-57.19 313,-54 329.72,-46.03 332.2,-40.81 349,-33 352.88,-31.2 356.97,-29.45 361.1,-27.79"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="362.68,-30.93 370.75,-24.07 360.16,-24.4 362.68,-30.93"/>
 </g>
-<!-- proc~cmp_degree~2 -->
+<!-- proc~cmp_degree~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_node8" class="node">
-<title>proc~cmp_degree~2</title>
-<g id="a_proc~~set_tetragon~~CallsGraph_node8"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<title>proc~cmp_degree~3</title>
+<g id="a_proc~~set_tetragon~~CallsGraph_node8"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="668,-150 505,-150 505,-126 668,-126 668,-150"/>
 <text text-anchor="middle" x="586.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_edge7" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#ff0000" d="M460.29,-108.04C480.58,-112.89 504.15,-118.53 525.34,-123.6"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="524.66,-127.04 535.2,-125.96 526.29,-120.23 524.66,-127.04"/>
 </g>
-<!-- proc~cmp_nc~2 -->
+<!-- proc~cmp_nc~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_node9" class="node">
-<title>proc~cmp_nc~2</title>
-<g id="a_proc~~set_tetragon~~CallsGraph_node9"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<title>proc~cmp_nc~3</title>
+<g id="a_proc~~set_tetragon~~CallsGraph_node9"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="656,-108 517,-108 517,-84 656,-84 656,-108"/>
 <text text-anchor="middle" x="586.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_edge8" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#ff0000" d="M469.42,-96C481.3,-96 493.97,-96 506.4,-96"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="506.76,-99.5 516.76,-96 506.76,-92.5 506.76,-99.5"/>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_edge9" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#7fff00" d="M460.29,-66.04C480.58,-70.89 504.15,-76.53 525.34,-81.6"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="524.66,-85.04 535.2,-83.96 526.29,-78.23 524.66,-85.04"/>
 </g>
@@ -377,30 +377,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="proc~~set_tetragon~~CallsGraph_edge10" class="edge">
-<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#7fff00" d="M469.42,-54C483.26,-54 498.16,-54 512.51,-54"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="512.85,-57.5 522.85,-54 512.85,-50.5 512.85,-57.5"/>
 </g>
-<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_edge11" class="edge">
-<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#00ffff" d="M469.42,-138C477.64,-138 486.23,-138 494.86,-138"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="494.98,-141.5 504.98,-138 494.98,-134.5 494.98,-141.5"/>
 </g>
-<!-- proc~get_multiplicity~2 -->
+<!-- proc~get_multiplicity~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_node12" class="node">
-<title>proc~get_multiplicity~2</title>
-<g id="a_proc~~set_tetragon~~CallsGraph_node12"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<title>proc~get_multiplicity~3</title>
+<g id="a_proc~~set_tetragon~~CallsGraph_node12"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="882,-149 704,-149 704,-125 882,-125 882,-149"/>
 <text text-anchor="middle" x="793" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="proc~~set_tetragon~~CallsGraph_edge12" class="edge">
-<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#ff0000" d="M668.03,-137.61C676.47,-137.56 685.11,-137.52 693.71,-137.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="693.8,-140.98 703.78,-137.43 693.76,-133.98 693.8,-140.98"/>
 </g>
@@ -413,9 +413,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set_tetragon~~CallsGraph_edge13" class="edge">
-<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M656.14,-99.68C726.69,-103.47 836.03,-109.33 907.57,-113.17"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="907.67,-116.68 917.85,-113.72 908.05,-109.69 907.67,-116.68"/>
 </g>
@@ -464,9 +464,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1042.33,-109C1050.69,-107.91 1059.35,-106.78 1067.92,-105.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1068.44,-109.12 1077.9,-104.36 1067.53,-102.18 1068.44,-109.12"/>
 </g>
-<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="proc~~set_tetragon~~CallsGraph_edge17" class="edge">
-<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M882.17,-127.47C890.77,-126.54 899.42,-125.6 907.82,-124.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="908.36,-128.16 917.93,-123.6 907.61,-121.2 908.36,-128.16"/>
 </g>
@@ -768,7 +768,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/show.html b/proc/show.html
index 0edbb2ff9..a4fd9ab75 100644
--- a/proc/show.html
+++ b/proc/show.html
@@ -83,15 +83,15 @@ <h1>show
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">show</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private impure subroutine show(this, vtkfile_Xc, vtkfile_Xg)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~57"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~56"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -216,121 +216,91 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~show~~CalledByGraph Pages: 1 -->
-<svg id="procshowCalledByGraph" width="307pt" height="284pt"
- viewBox="0.00 0.00 307.00 284.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~show~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 280)">
+<svg id="procshowCalledByGraph" width="288pt" height="200pt"
+ viewBox="0.00 0.00 288.00 200.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~show~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 196)">
 <title>proc~~show~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-280 303,-280 303,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-196 284,-196 284,4 -4,4"/>
 <!-- proc~show -->
 <g id="proc~~show~~CalledByGraph_node1" class="node">
 <title>proc~show</title>
-<polygon fill="none" stroke="black" points="299,-150 175,-150 175,-126 299,-126 299,-150"/>
-<text text-anchor="middle" x="237" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%show</text>
+<polygon fill="none" stroke="black" points="280,-108 165,-108 165,-84 280,-84 280,-108"/>
+<text text-anchor="middle" x="222.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%show</text>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example1_curve -->
 <g id="proc~~show~~CalledByGraph_node2" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~show~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-276 14.5,-276 14.5,-252 124.5,-252 124.5,-276"/>
-<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~show~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-192 14.5,-192 14.5,-168 114.5,-168 114.5,-192"/>
+<text text-anchor="middle" x="64.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~show -->
+<!-- program~example1_curve&#45;&gt;proc~show -->
 <g id="proc~~show~~CalledByGraph_edge1" class="edge">
-<title>program~example3_volume&#45;&gt;proc~show</title>
-<path fill="none" stroke="#ff0000" d="M120.88,-251.95C127.21,-249.46 133.42,-246.51 139,-243 174.4,-220.75 205.22,-182.31 222.15,-158.62"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="225.08,-160.54 227.94,-150.33 219.35,-156.53 225.08,-160.54"/>
+<title>program~example1_curve&#45;&gt;proc~show</title>
+<path fill="none" stroke="#ff0000" d="M107.5,-167.95C114.81,-165.34 122.23,-162.34 129,-159 154.15,-146.58 180.36,-128.13 198.42,-114.4"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="200.82,-116.97 206.6,-108.09 196.55,-111.43 200.82,-116.97"/>
 </g>
-<!-- program~example_nurbs_volume -->
+<!-- program~example_nurbs_curve -->
 <g id="proc~~show~~CalledByGraph_node3" class="node">
-<title>program~example_nurbs_volume</title>
-<g id="a_proc~~show~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-234 0,-234 0,-210 139,-210 139,-234"/>
-<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
+<title>program~example_nurbs_curve</title>
+<g id="a_proc~~show~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129,-150 0,-150 0,-126 129,-126 129,-150"/>
+<text text-anchor="middle" x="64.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~show -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~show -->
 <g id="proc~~show~~CalledByGraph_edge2" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~show</title>
-<path fill="none" stroke="#ff0000" d="M116.12,-209.96C123.9,-207.36 131.79,-204.37 139,-201 165.51,-188.63 193.26,-169.93 212.26,-156.12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="214.37,-158.91 220.33,-150.16 210.21,-153.28 214.37,-158.91"/>
+<title>program~example_nurbs_curve&#45;&gt;proc~show</title>
+<path fill="none" stroke="#ff0000" d="M110.2,-125.96C127.91,-121.2 148.43,-115.67 167,-110.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="168.04,-114.02 176.79,-108.04 166.22,-107.26 168.04,-114.02"/>
 </g>
-<!-- program~example_put_to_nurbs -->
+<!-- program~shape_c_1d -->
 <g id="proc~~show~~CalledByGraph_node4" class="node">
-<title>program~example_put_to_nurbs</title>
-<g id="a_proc~~show~~CalledByGraph_node4"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-192 3.5,-192 3.5,-168 135.5,-168 135.5,-192"/>
-<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
+<title>program~shape_c_1d</title>
+<g id="a_proc~~show~~CalledByGraph_node4"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102.5,-108 26.5,-108 26.5,-84 102.5,-84 102.5,-108"/>
+<text text-anchor="middle" x="64.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~show -->
+<!-- program~shape_c_1d&#45;&gt;proc~show -->
 <g id="proc~~show~~CalledByGraph_edge3" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~show</title>
-<path fill="none" stroke="#ff0000" d="M117.93,-167.96C136.88,-163.15 158.89,-157.57 178.72,-152.54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="179.74,-155.89 188.57,-150.04 178.01,-149.1 179.74,-155.89"/>
+<title>program~shape_c_1d&#45;&gt;proc~show</title>
+<path fill="none" stroke="#ff0000" d="M102.87,-96C118.39,-96 136.89,-96 154.61,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="154.92,-99.5 164.92,-96 154.92,-92.5 154.92,-99.5"/>
 </g>
-<!-- program~shape_c_3d -->
+<!-- program~shape_circle -->
 <g id="proc~~show~~CalledByGraph_node5" class="node">
-<title>program~shape_c_3d</title>
-<g id="a_proc~~show~~CalledByGraph_node5"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
-<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
+<title>program~shape_circle</title>
+<g id="a_proc~~show~~CalledByGraph_node5"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="104,-66 25,-66 25,-42 104,-42 104,-66"/>
+<text text-anchor="middle" x="64.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~show -->
+<!-- program~shape_circle&#45;&gt;proc~show -->
 <g id="proc~~show~~CalledByGraph_edge4" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~show</title>
-<path fill="none" stroke="#ff0000" d="M107.64,-138C124.52,-138 145.08,-138 164.76,-138"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="164.95,-141.5 174.95,-138 164.95,-134.5 164.95,-141.5"/>
+<title>program~shape_circle&#45;&gt;proc~show</title>
+<path fill="none" stroke="#ff0000" d="M104.06,-64.38C123.07,-69.5 146.31,-75.76 167.09,-81.35"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="166.18,-84.73 176.75,-83.95 168,-77.97 166.18,-84.73"/>
 </g>
-<!-- program~shape_half_ring_3d -->
+<!-- program~shape_half_circle -->
 <g id="proc~~show~~CalledByGraph_node6" class="node">
-<title>program~shape_half_ring_3d</title>
-<g id="a_proc~~show~~CalledByGraph_node6"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
-<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
+<title>program~shape_half_circle</title>
+<g id="a_proc~~show~~CalledByGraph_node6"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116.5,-24 12.5,-24 12.5,0 116.5,0 116.5,-24"/>
+<text text-anchor="middle" x="64.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~show -->
+<!-- program~shape_half_circle&#45;&gt;proc~show -->
 <g id="proc~~show~~CalledByGraph_edge5" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~show</title>
-<path fill="none" stroke="#ff0000" d="M117.93,-108.04C136.88,-112.85 158.89,-118.43 178.72,-123.46"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="178.01,-126.9 188.57,-125.96 179.74,-120.11 178.01,-126.9"/>
-</g>
-<!-- program~shape_hexahedron -->
-<g id="proc~~show~~CalledByGraph_node7" class="node">
-<title>program~shape_hexahedron</title>
-<g id="a_proc~~show~~CalledByGraph_node7"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-66 13,-66 13,-42 126,-42 126,-66"/>
-<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
-</a>
-</g>
-</g>
-<!-- program~shape_hexahedron&#45;&gt;proc~show -->
-<g id="proc~~show~~CalledByGraph_edge6" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~show</title>
-<path fill="none" stroke="#ff0000" d="M116.12,-66.04C123.9,-68.64 131.79,-71.63 139,-75 165.51,-87.37 193.26,-106.07 212.26,-119.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="210.21,-122.72 220.33,-125.84 214.37,-117.09 210.21,-122.72"/>
-</g>
-<!-- program~shape_ring_3d -->
-<g id="proc~~show~~CalledByGraph_node8" class="node">
-<title>program~shape_ring_3d</title>
-<g id="a_proc~~show~~CalledByGraph_node8"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-24 24.5,-24 24.5,0 114.5,0 114.5,-24"/>
-<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
-</a>
-</g>
-</g>
-<!-- program~shape_ring_3d&#45;&gt;proc~show -->
-<g id="proc~~show~~CalledByGraph_edge7" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~show</title>
-<path fill="none" stroke="#ff0000" d="M114.76,-21.81C123.17,-24.7 131.63,-28.37 139,-33 174.4,-55.25 205.22,-93.69 222.15,-117.38"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="219.35,-119.47 227.94,-125.67 225.08,-115.46 219.35,-119.47"/>
+<title>program~shape_half_circle&#45;&gt;proc~show</title>
+<path fill="none" stroke="#ff0000" d="M107.5,-24.05C114.81,-26.66 122.23,-29.66 129,-33 154.15,-45.42 180.36,-63.87 198.42,-77.6"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="196.55,-80.57 206.6,-83.91 200.82,-75.03 196.55,-80.57"/>
 </g>
 </g>
 </svg>
@@ -446,7 +416,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/show~2.html b/proc/show~2.html
index d194e8d33..8f0a363d0 100644
--- a/proc/show~2.html
+++ b/proc/show~2.html
@@ -83,15 +83,15 @@ <h1>show
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">show</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private impure subroutine show(this, vtkfile_Xc, vtkfile_Xg)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~124"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~118"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -216,106 +216,121 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~show~2~~CalledByGraph Pages: 1 -->
-<svg id="procshow2CalledByGraph" width="307pt" height="242pt"
- viewBox="0.00 0.00 307.00 242.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~show~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 238)">
+<svg id="procshow2CalledByGraph" width="307pt" height="284pt"
+ viewBox="0.00 0.00 307.00 284.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~show~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 280)">
 <title>proc~~show~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-238 303,-238 303,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-280 303,-280 303,4 -4,4"/>
 <!-- proc~show~2 -->
 <g id="proc~~show~2~~CalledByGraph_node1" class="node">
 <title>proc~show~2</title>
-<polygon fill="none" stroke="black" points="299,-129 175,-129 175,-105 299,-105 299,-129"/>
-<text text-anchor="middle" x="237" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%show</text>
+<polygon fill="none" stroke="black" points="299,-150 175,-150 175,-126 299,-126 299,-150"/>
+<text text-anchor="middle" x="237" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%show</text>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~show~2~~CalledByGraph_node2" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~show~2~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-234 14.5,-234 14.5,-210 124.5,-210 124.5,-234"/>
-<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<title>program~example3_volume</title>
+<g id="a_proc~~show~2~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-276 14.5,-276 14.5,-252 124.5,-252 124.5,-276"/>
+<text text-anchor="middle" x="69.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~show~2 -->
+<!-- program~example3_volume&#45;&gt;proc~show~2 -->
 <g id="proc~~show~2~~CalledByGraph_edge1" class="edge">
-<title>program~example3_surface&#45;&gt;proc~show~2</title>
-<path fill="none" stroke="#ff0000" d="M119.08,-209.88C125.96,-207.38 132.8,-204.43 139,-201 170.04,-183.82 200,-155.51 218.21,-136.56"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="220.95,-138.75 225.26,-129.08 215.86,-133.95 220.95,-138.75"/>
+<title>program~example3_volume&#45;&gt;proc~show~2</title>
+<path fill="none" stroke="#ff0000" d="M120.88,-251.95C127.21,-249.46 133.42,-246.51 139,-243 174.4,-220.75 205.22,-182.31 222.15,-158.62"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="225.08,-160.54 227.94,-150.33 219.35,-156.53 225.08,-160.54"/>
 </g>
-<!-- program~example_nurbs_surface -->
+<!-- program~example_nurbs_volume -->
 <g id="proc~~show~2~~CalledByGraph_node3" class="node">
-<title>program~example_nurbs_surface</title>
-<g id="a_proc~~show~2~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-192 0,-192 0,-168 139,-168 139,-192"/>
-<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
+<title>program~example_nurbs_volume</title>
+<g id="a_proc~~show~2~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_volume.html" xlink:title="example_nurbs_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-234 0,-234 0,-210 139,-210 139,-234"/>
+<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~show~2 -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~show~2 -->
 <g id="proc~~show~2~~CalledByGraph_edge2" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~show~2</title>
-<path fill="none" stroke="#ff0000" d="M112.41,-167.96C121.25,-165.2 130.48,-162.14 139,-159 159.97,-151.27 182.94,-141.39 201.26,-133.16"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="202.72,-136.34 210.38,-129.02 199.83,-129.96 202.72,-136.34"/>
+<title>program~example_nurbs_volume&#45;&gt;proc~show~2</title>
+<path fill="none" stroke="#ff0000" d="M116.12,-209.96C123.9,-207.36 131.79,-204.37 139,-201 165.51,-188.63 193.26,-169.93 212.26,-156.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="214.37,-158.91 220.33,-150.16 210.21,-153.28 214.37,-158.91"/>
 </g>
-<!-- program~shape_c_2d -->
+<!-- program~example_put_to_nurbs -->
 <g id="proc~~show~2~~CalledByGraph_node4" class="node">
-<title>program~shape_c_2d</title>
-<g id="a_proc~~show~2~~CalledByGraph_node4"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
-<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
+<title>program~example_put_to_nurbs</title>
+<g id="a_proc~~show~2~~CalledByGraph_node4"><a xlink:href="../program/example_put_to_nurbs.html" xlink:title="example_put_to_nurbs">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135.5,-192 3.5,-192 3.5,-168 135.5,-168 135.5,-192"/>
+<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_put_to_nurbs</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~show~2 -->
+<!-- program~example_put_to_nurbs&#45;&gt;proc~show~2 -->
 <g id="proc~~show~2~~CalledByGraph_edge3" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~show~2</title>
-<path fill="none" stroke="#ff0000" d="M107.64,-133.29C124.52,-131.15 145.08,-128.54 164.76,-126.04"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="165.47,-129.48 174.95,-124.75 164.59,-122.53 165.47,-129.48"/>
+<title>program~example_put_to_nurbs&#45;&gt;proc~show~2</title>
+<path fill="none" stroke="#ff0000" d="M117.93,-167.96C136.88,-163.15 158.89,-157.57 178.72,-152.54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="179.74,-155.89 188.57,-150.04 178.01,-149.1 179.74,-155.89"/>
 </g>
-<!-- program~shape_half_ring_2d -->
+<!-- program~shape_c_3d -->
 <g id="proc~~show~2~~CalledByGraph_node5" class="node">
-<title>program~shape_half_ring_2d</title>
-<g id="a_proc~~show~2~~CalledByGraph_node5"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
-<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
+<title>program~shape_c_3d</title>
+<g id="a_proc~~show~2~~CalledByGraph_node5"><a xlink:href="../program/shape_c_3d.html" xlink:title="shape_C_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
+<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~show~2 -->
+<!-- program~shape_c_3d&#45;&gt;proc~show~2 -->
 <g id="proc~~show~2~~CalledByGraph_edge4" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~show~2</title>
-<path fill="none" stroke="#ff0000" d="M127.46,-103.23C139.56,-104.76 152.47,-106.4 165.02,-107.99"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="164.62,-111.47 174.98,-109.26 165.5,-104.53 164.62,-111.47"/>
+<title>program~shape_c_3d&#45;&gt;proc~show~2</title>
+<path fill="none" stroke="#ff0000" d="M107.64,-138C124.52,-138 145.08,-138 164.76,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="164.95,-141.5 174.95,-138 164.95,-134.5 164.95,-141.5"/>
 </g>
-<!-- program~shape_ring_2d -->
+<!-- program~shape_half_ring_3d -->
 <g id="proc~~show~2~~CalledByGraph_node6" class="node">
-<title>program~shape_ring_2d</title>
-<g id="a_proc~~show~2~~CalledByGraph_node6"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-66 24.5,-66 24.5,-42 114.5,-42 114.5,-66"/>
-<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
+<title>program~shape_half_ring_3d</title>
+<g id="a_proc~~show~2~~CalledByGraph_node6"><a xlink:href="../program/shape_half_ring_3d.html" xlink:title="shape_half_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
+<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_3d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~show~2 -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~show~2 -->
 <g id="proc~~show~2~~CalledByGraph_edge5" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~show~2</title>
-<path fill="none" stroke="#ff0000" d="M112.41,-66.04C121.25,-68.8 130.48,-71.86 139,-75 159.97,-82.73 182.94,-92.61 201.26,-100.84"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="199.83,-104.04 210.38,-104.98 202.72,-97.66 199.83,-104.04"/>
+<title>program~shape_half_ring_3d&#45;&gt;proc~show~2</title>
+<path fill="none" stroke="#ff0000" d="M117.93,-108.04C136.88,-112.85 158.89,-118.43 178.72,-123.46"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="178.01,-126.9 188.57,-125.96 179.74,-120.11 178.01,-126.9"/>
 </g>
-<!-- program~shape_tetragon -->
+<!-- program~shape_hexahedron -->
 <g id="proc~~show~2~~CalledByGraph_node7" class="node">
-<title>program~shape_tetragon</title>
-<g id="a_proc~~show~2~~CalledByGraph_node7"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-24 21.5,-24 21.5,0 117.5,0 117.5,-24"/>
-<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+<title>program~shape_hexahedron</title>
+<g id="a_proc~~show~2~~CalledByGraph_node7"><a xlink:href="../program/shape_hexahedron.html" xlink:title="shape_hexahedron">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-66 13,-66 13,-42 126,-42 126,-66"/>
+<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_hexahedron</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~show~2 -->
+<!-- program~shape_hexahedron&#45;&gt;proc~show~2 -->
 <g id="proc~~show~2~~CalledByGraph_edge6" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~show~2</title>
-<path fill="none" stroke="#ff0000" d="M117.63,-23.59C125,-26.21 132.36,-29.33 139,-33 170.04,-50.18 200,-78.49 218.21,-97.44"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="215.86,-100.05 225.26,-104.92 220.95,-95.25 215.86,-100.05"/>
+<title>program~shape_hexahedron&#45;&gt;proc~show~2</title>
+<path fill="none" stroke="#ff0000" d="M116.12,-66.04C123.9,-68.64 131.79,-71.63 139,-75 165.51,-87.37 193.26,-106.07 212.26,-119.88"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="210.21,-122.72 220.33,-125.84 214.37,-117.09 210.21,-122.72"/>
+</g>
+<!-- program~shape_ring_3d -->
+<g id="proc~~show~2~~CalledByGraph_node8" class="node">
+<title>program~shape_ring_3d</title>
+<g id="a_proc~~show~2~~CalledByGraph_node8"><a xlink:href="../program/shape_ring_3d.html" xlink:title="shape_ring_3d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-24 24.5,-24 24.5,0 114.5,0 114.5,-24"/>
+<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_3d</text>
+</a>
+</g>
+</g>
+<!-- program~shape_ring_3d&#45;&gt;proc~show~2 -->
+<g id="proc~~show~2~~CalledByGraph_edge7" class="edge">
+<title>program~shape_ring_3d&#45;&gt;proc~show~2</title>
+<path fill="none" stroke="#ff0000" d="M114.76,-21.81C123.17,-24.7 131.63,-28.37 139,-33 174.4,-55.25 205.22,-93.69 222.15,-117.38"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="219.35,-119.47 227.94,-125.67 225.08,-115.46 219.35,-119.47"/>
 </g>
 </g>
 </svg>
@@ -431,7 +446,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/show~3.html b/proc/show~3.html
index 7509221a6..a780825e8 100644
--- a/proc/show~3.html
+++ b/proc/show~3.html
@@ -83,15 +83,15 @@ <h1>show
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">show</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private impure subroutine show(this, vtkfile_Xc, vtkfile_Xg)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~187"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~185"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -216,91 +216,106 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~show~3~~CalledByGraph Pages: 1 -->
-<svg id="procshow3CalledByGraph" width="288pt" height="200pt"
- viewBox="0.00 0.00 288.00 200.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~show~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 196)">
+<svg id="procshow3CalledByGraph" width="307pt" height="242pt"
+ viewBox="0.00 0.00 307.00 242.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~show~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 238)">
 <title>proc~~show~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-196 284,-196 284,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-238 303,-238 303,4 -4,4"/>
 <!-- proc~show~3 -->
 <g id="proc~~show~3~~CalledByGraph_node1" class="node">
 <title>proc~show~3</title>
-<polygon fill="none" stroke="black" points="280,-108 165,-108 165,-84 280,-84 280,-108"/>
-<text text-anchor="middle" x="222.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%show</text>
+<polygon fill="none" stroke="black" points="299,-129 175,-129 175,-105 299,-105 299,-129"/>
+<text text-anchor="middle" x="237" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%show</text>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~show~3~~CalledByGraph_node2" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~show~3~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-192 14.5,-192 14.5,-168 114.5,-168 114.5,-192"/>
-<text text-anchor="middle" x="64.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~show~3~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-234 14.5,-234 14.5,-210 124.5,-210 124.5,-234"/>
+<text text-anchor="middle" x="69.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~show~3 -->
+<!-- program~example3_surface&#45;&gt;proc~show~3 -->
 <g id="proc~~show~3~~CalledByGraph_edge1" class="edge">
-<title>program~example1_curve&#45;&gt;proc~show~3</title>
-<path fill="none" stroke="#ff0000" d="M107.5,-167.95C114.81,-165.34 122.23,-162.34 129,-159 154.15,-146.58 180.36,-128.13 198.42,-114.4"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="200.82,-116.97 206.6,-108.09 196.55,-111.43 200.82,-116.97"/>
+<title>program~example3_surface&#45;&gt;proc~show~3</title>
+<path fill="none" stroke="#ff0000" d="M119.08,-209.88C125.96,-207.38 132.8,-204.43 139,-201 170.04,-183.82 200,-155.51 218.21,-136.56"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="220.95,-138.75 225.26,-129.08 215.86,-133.95 220.95,-138.75"/>
 </g>
-<!-- program~example_nurbs_curve -->
+<!-- program~example_nurbs_surface -->
 <g id="proc~~show~3~~CalledByGraph_node3" class="node">
-<title>program~example_nurbs_curve</title>
-<g id="a_proc~~show~3~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_curve.html" xlink:title="example_nurbs_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129,-150 0,-150 0,-126 129,-126 129,-150"/>
-<text text-anchor="middle" x="64.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_curve</text>
+<title>program~example_nurbs_surface</title>
+<g id="a_proc~~show~3~~CalledByGraph_node3"><a xlink:href="../program/example_nurbs_surface.html" xlink:title="example_nurbs_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="139,-192 0,-192 0,-168 139,-168 139,-192"/>
+<text text-anchor="middle" x="69.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_nurbs_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~show~3 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~show~3 -->
 <g id="proc~~show~3~~CalledByGraph_edge2" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~show~3</title>
-<path fill="none" stroke="#ff0000" d="M110.2,-125.96C127.91,-121.2 148.43,-115.67 167,-110.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="168.04,-114.02 176.79,-108.04 166.22,-107.26 168.04,-114.02"/>
+<title>program~example_nurbs_surface&#45;&gt;proc~show~3</title>
+<path fill="none" stroke="#ff0000" d="M112.41,-167.96C121.25,-165.2 130.48,-162.14 139,-159 159.97,-151.27 182.94,-141.39 201.26,-133.16"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="202.72,-136.34 210.38,-129.02 199.83,-129.96 202.72,-136.34"/>
 </g>
-<!-- program~shape_c_1d -->
+<!-- program~shape_c_2d -->
 <g id="proc~~show~3~~CalledByGraph_node4" class="node">
-<title>program~shape_c_1d</title>
-<g id="a_proc~~show~3~~CalledByGraph_node4"><a xlink:href="../program/shape_c_1d.html" xlink:title="shape_C_1d">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102.5,-108 26.5,-108 26.5,-84 102.5,-84 102.5,-108"/>
-<text text-anchor="middle" x="64.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_1d</text>
+<title>program~shape_c_2d</title>
+<g id="a_proc~~show~3~~CalledByGraph_node4"><a xlink:href="../program/shape_c_2d.html" xlink:title="shape_C_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="107.5,-150 31.5,-150 31.5,-126 107.5,-126 107.5,-150"/>
+<text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_C_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~show~3 -->
+<!-- program~shape_c_2d&#45;&gt;proc~show~3 -->
 <g id="proc~~show~3~~CalledByGraph_edge3" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~show~3</title>
-<path fill="none" stroke="#ff0000" d="M102.87,-96C118.39,-96 136.89,-96 154.61,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="154.92,-99.5 164.92,-96 154.92,-92.5 154.92,-99.5"/>
+<title>program~shape_c_2d&#45;&gt;proc~show~3</title>
+<path fill="none" stroke="#ff0000" d="M107.64,-133.29C124.52,-131.15 145.08,-128.54 164.76,-126.04"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="165.47,-129.48 174.95,-124.75 164.59,-122.53 165.47,-129.48"/>
 </g>
-<!-- program~shape_circle -->
+<!-- program~shape_half_ring_2d -->
 <g id="proc~~show~3~~CalledByGraph_node5" class="node">
-<title>program~shape_circle</title>
-<g id="a_proc~~show~3~~CalledByGraph_node5"><a xlink:href="../program/shape_circle.html" xlink:title="shape_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="104,-66 25,-66 25,-42 104,-42 104,-66"/>
-<text text-anchor="middle" x="64.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_circle</text>
+<title>program~shape_half_ring_2d</title>
+<g id="a_proc~~show~3~~CalledByGraph_node5"><a xlink:href="../program/shape_half_ring_2d.html" xlink:title="shape_half_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-108 12,-108 12,-84 127,-84 127,-108"/>
+<text text-anchor="middle" x="69.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~show~3 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~show~3 -->
 <g id="proc~~show~3~~CalledByGraph_edge4" class="edge">
-<title>program~shape_circle&#45;&gt;proc~show~3</title>
-<path fill="none" stroke="#ff0000" d="M104.06,-64.38C123.07,-69.5 146.31,-75.76 167.09,-81.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="166.18,-84.73 176.75,-83.95 168,-77.97 166.18,-84.73"/>
+<title>program~shape_half_ring_2d&#45;&gt;proc~show~3</title>
+<path fill="none" stroke="#ff0000" d="M127.46,-103.23C139.56,-104.76 152.47,-106.4 165.02,-107.99"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="164.62,-111.47 174.98,-109.26 165.5,-104.53 164.62,-111.47"/>
 </g>
-<!-- program~shape_half_circle -->
+<!-- program~shape_ring_2d -->
 <g id="proc~~show~3~~CalledByGraph_node6" class="node">
-<title>program~shape_half_circle</title>
-<g id="a_proc~~show~3~~CalledByGraph_node6"><a xlink:href="../program/shape_half_circle.html" xlink:title="shape_half_circle">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116.5,-24 12.5,-24 12.5,0 116.5,0 116.5,-24"/>
-<text text-anchor="middle" x="64.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_half_circle</text>
+<title>program~shape_ring_2d</title>
+<g id="a_proc~~show~3~~CalledByGraph_node6"><a xlink:href="../program/shape_ring_2d.html" xlink:title="shape_ring_2d">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-66 24.5,-66 24.5,-42 114.5,-42 114.5,-66"/>
+<text text-anchor="middle" x="69.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_ring_2d</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~show~3 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~show~3 -->
 <g id="proc~~show~3~~CalledByGraph_edge5" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~show~3</title>
-<path fill="none" stroke="#ff0000" d="M107.5,-24.05C114.81,-26.66 122.23,-29.66 129,-33 154.15,-45.42 180.36,-63.87 198.42,-77.6"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="196.55,-80.57 206.6,-83.91 200.82,-75.03 196.55,-80.57"/>
+<title>program~shape_ring_2d&#45;&gt;proc~show~3</title>
+<path fill="none" stroke="#ff0000" d="M112.41,-66.04C121.25,-68.8 130.48,-71.86 139,-75 159.97,-82.73 182.94,-92.61 201.26,-100.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="199.83,-104.04 210.38,-104.98 202.72,-97.66 199.83,-104.04"/>
+</g>
+<!-- program~shape_tetragon -->
+<g id="proc~~show~3~~CalledByGraph_node7" class="node">
+<title>program~shape_tetragon</title>
+<g id="a_proc~~show~3~~CalledByGraph_node7"><a xlink:href="../program/shape_tetragon.html" xlink:title="shape_tetragon">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-24 21.5,-24 21.5,0 117.5,0 117.5,-24"/>
+<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">shape_tetragon</text>
+</a>
+</g>
+</g>
+<!-- program~shape_tetragon&#45;&gt;proc~show~3 -->
+<g id="proc~~show~3~~CalledByGraph_edge6" class="edge">
+<title>program~shape_tetragon&#45;&gt;proc~show~3</title>
+<path fill="none" stroke="#ff0000" d="M117.63,-23.59C125,-26.21 132.36,-29.33 139,-33 170.04,-50.18 200,-78.49 218.21,-97.44"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="215.86,-100.05 225.26,-104.92 220.95,-95.25 215.86,-100.05"/>
 </g>
 </g>
 </svg>
@@ -416,7 +431,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/tetragon_xc.html b/proc/tetragon_xc.html
index b8b52ee14..2903610c6 100644
--- a/proc/tetragon_xc.html
+++ b/proc/tetragon_xc.html
@@ -156,7 +156,7 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-l~7"></span>
+              <span class="anchor" id="variable-l~6"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -171,7 +171,7 @@ <h3>Arguments</h3>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~57"></span>
+              <span class="anchor" id="variable-nc~50"></span>
               integer,
             </td>
 <td>intent(in)</td>
@@ -189,7 +189,7 @@ <h3>Arguments</h3>
 
       <h3>Return Value
         <small>
-          <span class="anchor" id="variable-xc~49"></span>
+          <span class="anchor" id="variable-xc~44"></span>
           real(kind=rk), allocatable, (:,:)
         </small>
       </h3>
@@ -421,7 +421,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/translate_xc.html b/proc/translate_xc.html
index ff073f42a..a58df920e 100644
--- a/proc/translate_xc.html
+++ b/proc/translate_xc.html
@@ -83,15 +83,15 @@ <h1>translate_Xc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">translate_Xc</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine translate_Xc(this, vec)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~55"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~54"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -201,31 +201,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~translate_xc~~CalledByGraph Pages: 1 -->
-<svg id="proctranslate_xcCalledByGraph" width="317pt" height="32pt"
- viewBox="0.00 0.00 317.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="proctranslate_xcCalledByGraph" width="298pt" height="32pt"
+ viewBox="0.00 0.00 298.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~translate_xc~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~translate_xc~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 313,-28 313,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 294,-28 294,4 -4,4"/>
 <!-- proc~translate_xc -->
 <g id="proc~~translate_xc~~CalledByGraph_node1" class="node">
 <title>proc~translate_xc</title>
-<polygon fill="none" stroke="black" points="309,-24 146,-24 146,0 309,0 309,-24"/>
-<text text-anchor="middle" x="227.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%translate_Xc</text>
+<polygon fill="none" stroke="black" points="290,-24 136,-24 136,0 290,0 290,-24"/>
+<text text-anchor="middle" x="213" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%translate_Xc</text>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example1_curve -->
 <g id="proc~~translate_xc~~CalledByGraph_node2" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~translate_xc~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~translate_xc~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="100,-24 0,-24 0,0 100,0 100,-24"/>
+<text text-anchor="middle" x="50" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~translate_xc -->
+<!-- program~example1_curve&#45;&gt;proc~translate_xc -->
 <g id="proc~~translate_xc~~CalledByGraph_edge1" class="edge">
-<title>program~example3_volume&#45;&gt;proc~translate_xc</title>
-<path fill="none" stroke="#ff0000" d="M110.42,-12C118.54,-12 127.1,-12 135.73,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.88,-15.5 145.88,-12 135.88,-8.5 135.88,-15.5"/>
+<title>program~example1_curve&#45;&gt;proc~translate_xc</title>
+<path fill="none" stroke="#ff0000" d="M100.18,-12C108.29,-12 116.9,-12 125.6,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="125.84,-15.5 135.84,-12 125.84,-8.5 125.84,-15.5"/>
 </g>
 </g>
 </svg>
@@ -341,7 +341,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/translate_xc~2.html b/proc/translate_xc~2.html
index b2d5ed671..44fb03279 100644
--- a/proc/translate_xc~2.html
+++ b/proc/translate_xc~2.html
@@ -83,15 +83,15 @@ <h1>translate_Xc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">translate_Xc</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine translate_Xc(this, vec)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~122"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~116"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -201,61 +201,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~translate_xc~2~~CalledByGraph Pages: 1 -->
-<svg id="proctranslate_xc2CalledByGraph" width="317pt" height="116pt"
- viewBox="0.00 0.00 317.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~translate_xc~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
+<svg id="proctranslate_xc2CalledByGraph" width="317pt" height="32pt"
+ viewBox="0.00 0.00 317.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~translate_xc~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~translate_xc~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 313,-112 313,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 313,-28 313,4 -4,4"/>
 <!-- proc~translate_xc~2 -->
 <g id="proc~~translate_xc~2~~CalledByGraph_node1" class="node">
 <title>proc~translate_xc~2</title>
-<polygon fill="none" stroke="black" points="309,-66 146,-66 146,-42 309,-42 309,-66"/>
-<text text-anchor="middle" x="227.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%translate_Xc</text>
+<polygon fill="none" stroke="black" points="309,-24 146,-24 146,0 309,0 309,-24"/>
+<text text-anchor="middle" x="227.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%translate_Xc</text>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~translate_xc~2~~CalledByGraph_node2" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~translate_xc~2~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-108 0,-108 0,-84 110,-84 110,-108"/>
-<text text-anchor="middle" x="55" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<title>program~example3_volume</title>
+<g id="a_proc~~translate_xc~2~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~translate_xc~2 -->
+<!-- program~example3_volume&#45;&gt;proc~translate_xc~2 -->
 <g id="proc~~translate_xc~2~~CalledByGraph_edge1" class="edge">
-<title>program~example3_surface&#45;&gt;proc~translate_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M104.86,-83.96C124.48,-79.13 147.26,-73.52 167.77,-68.47"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="168.76,-71.83 177.63,-66.04 167.09,-65.03 168.76,-71.83"/>
-</g>
-<!-- program~example_ppm2 -->
-<g id="proc~~translate_xc~2~~CalledByGraph_node3" class="node">
-<title>program~example_ppm2</title>
-<g id="a_proc~~translate_xc~2~~CalledByGraph_node3"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-66 8,-66 8,-42 102,-42 102,-66"/>
-<text text-anchor="middle" x="55" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm2&#45;&gt;proc~translate_xc~2 -->
-<g id="proc~~translate_xc~2~~CalledByGraph_edge2" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~translate_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M102.14,-54C112.59,-54 124.04,-54 135.63,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.83,-57.5 145.83,-54 135.83,-50.5 135.83,-57.5"/>
-</g>
-<!-- program~example_ppm3 -->
-<g id="proc~~translate_xc~2~~CalledByGraph_node4" class="node">
-<title>program~example_ppm3</title>
-<g id="a_proc~~translate_xc~2~~CalledByGraph_node4"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-24 8,-24 8,0 102,0 102,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
-</a>
-</g>
-</g>
-<!-- program~example_ppm3&#45;&gt;proc~translate_xc~2 -->
-<g id="proc~~translate_xc~2~~CalledByGraph_edge3" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~translate_xc~2</title>
-<path fill="none" stroke="#ff0000" d="M102.14,-23.37C122.32,-28.34 146.23,-34.23 167.66,-39.51"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="167.09,-42.97 177.64,-41.96 168.77,-36.17 167.09,-42.97"/>
+<title>program~example3_volume&#45;&gt;proc~translate_xc~2</title>
+<path fill="none" stroke="#ff0000" d="M110.42,-12C118.54,-12 127.1,-12 135.73,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="135.88,-15.5 145.88,-12 135.88,-8.5 135.88,-15.5"/>
 </g>
 </g>
 </svg>
@@ -371,7 +341,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/translate_xc~3.html b/proc/translate_xc~3.html
index a201ab83c..1393aa884 100644
--- a/proc/translate_xc~3.html
+++ b/proc/translate_xc~3.html
@@ -83,15 +83,15 @@ <h1>translate_Xc
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">translate_Xc</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine translate_Xc(this, vec)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~185"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~183"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -201,31 +201,61 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~translate_xc~3~~CalledByGraph Pages: 1 -->
-<svg id="proctranslate_xc3CalledByGraph" width="298pt" height="32pt"
- viewBox="0.00 0.00 298.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~translate_xc~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<svg id="proctranslate_xc3CalledByGraph" width="317pt" height="116pt"
+ viewBox="0.00 0.00 317.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~translate_xc~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
 <title>proc~~translate_xc~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 294,-28 294,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 313,-112 313,4 -4,4"/>
 <!-- proc~translate_xc~3 -->
 <g id="proc~~translate_xc~3~~CalledByGraph_node1" class="node">
 <title>proc~translate_xc~3</title>
-<polygon fill="none" stroke="black" points="290,-24 136,-24 136,0 290,0 290,-24"/>
-<text text-anchor="middle" x="213" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%translate_Xc</text>
+<polygon fill="none" stroke="black" points="309,-66 146,-66 146,-42 309,-42 309,-66"/>
+<text text-anchor="middle" x="227.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%translate_Xc</text>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~translate_xc~3~~CalledByGraph_node2" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~translate_xc~3~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="100,-24 0,-24 0,0 100,0 100,-24"/>
-<text text-anchor="middle" x="50" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~translate_xc~3~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-108 0,-108 0,-84 110,-84 110,-108"/>
+<text text-anchor="middle" x="55" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~translate_xc~3 -->
+<!-- program~example3_surface&#45;&gt;proc~translate_xc~3 -->
 <g id="proc~~translate_xc~3~~CalledByGraph_edge1" class="edge">
-<title>program~example1_curve&#45;&gt;proc~translate_xc~3</title>
-<path fill="none" stroke="#ff0000" d="M100.18,-12C108.29,-12 116.9,-12 125.6,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="125.84,-15.5 135.84,-12 125.84,-8.5 125.84,-15.5"/>
+<title>program~example3_surface&#45;&gt;proc~translate_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M104.86,-83.96C124.48,-79.13 147.26,-73.52 167.77,-68.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="168.76,-71.83 177.63,-66.04 167.09,-65.03 168.76,-71.83"/>
+</g>
+<!-- program~example_ppm2 -->
+<g id="proc~~translate_xc~3~~CalledByGraph_node3" class="node">
+<title>program~example_ppm2</title>
+<g id="a_proc~~translate_xc~3~~CalledByGraph_node3"><a xlink:href="../program/example_ppm2.html" xlink:title="example_ppm2">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-66 8,-66 8,-42 102,-42 102,-66"/>
+<text text-anchor="middle" x="55" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm2</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm2&#45;&gt;proc~translate_xc~3 -->
+<g id="proc~~translate_xc~3~~CalledByGraph_edge2" class="edge">
+<title>program~example_ppm2&#45;&gt;proc~translate_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M102.14,-54C112.59,-54 124.04,-54 135.63,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="135.83,-57.5 145.83,-54 135.83,-50.5 135.83,-57.5"/>
+</g>
+<!-- program~example_ppm3 -->
+<g id="proc~~translate_xc~3~~CalledByGraph_node4" class="node">
+<title>program~example_ppm3</title>
+<g id="a_proc~~translate_xc~3~~CalledByGraph_node4"><a xlink:href="../program/example_ppm3.html" xlink:title="example_ppm3">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-24 8,-24 8,0 102,0 102,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example_ppm3</text>
+</a>
+</g>
+</g>
+<!-- program~example_ppm3&#45;&gt;proc~translate_xc~3 -->
+<g id="proc~~translate_xc~3~~CalledByGraph_edge3" class="edge">
+<title>program~example_ppm3&#45;&gt;proc~translate_xc~3</title>
+<path fill="none" stroke="#ff0000" d="M102.14,-23.37C122.32,-28.34 146.23,-34.23 167.66,-39.51"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="167.09,-42.97 177.64,-41.96 168.77,-36.17 167.09,-42.97"/>
 </g>
 </g>
 </svg>
@@ -341,7 +371,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/translate_xg.html b/proc/translate_xg.html
index a779b5e47..396bd0126 100644
--- a/proc/translate_xg.html
+++ b/proc/translate_xg.html
@@ -83,15 +83,15 @@ <h1>translate_Xg
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
             <li class="breadcrumb-item active" aria-current="page">translate_Xg</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine translate_Xg(this, vec)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
+    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~56"></span>
-              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
+              <span class="anchor" id="variable-this~55"></span>
+              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -201,31 +201,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~translate_xg~~CalledByGraph Pages: 1 -->
-<svg id="proctranslate_xgCalledByGraph" width="318pt" height="32pt"
- viewBox="0.00 0.00 318.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="proctranslate_xgCalledByGraph" width="298pt" height="32pt"
+ viewBox="0.00 0.00 298.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~translate_xg~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~translate_xg~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 314,-28 314,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 294,-28 294,4 -4,4"/>
 <!-- proc~translate_xg -->
 <g id="proc~~translate_xg~~CalledByGraph_node1" class="node">
 <title>proc~translate_xg</title>
-<polygon fill="none" stroke="black" points="310,-24 146,-24 146,0 310,0 310,-24"/>
-<text text-anchor="middle" x="228" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%translate_Xg</text>
+<polygon fill="none" stroke="black" points="290,-24 136,-24 136,0 290,0 290,-24"/>
+<text text-anchor="middle" x="213" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%translate_Xg</text>
 </g>
-<!-- program~example3_volume -->
+<!-- program~example1_curve -->
 <g id="proc~~translate_xg~~CalledByGraph_node2" class="node">
-<title>program~example3_volume</title>
-<g id="a_proc~~translate_xg~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<title>program~example1_curve</title>
+<g id="a_proc~~translate_xg~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="100,-24 0,-24 0,0 100,0 100,-24"/>
+<text text-anchor="middle" x="50" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~translate_xg -->
+<!-- program~example1_curve&#45;&gt;proc~translate_xg -->
 <g id="proc~~translate_xg~~CalledByGraph_edge1" class="edge">
-<title>program~example3_volume&#45;&gt;proc~translate_xg</title>
-<path fill="none" stroke="#ff0000" d="M110.11,-12C118.26,-12 126.86,-12 135.55,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="135.76,-15.5 145.76,-12 135.76,-8.5 135.76,-15.5"/>
+<title>program~example1_curve&#45;&gt;proc~translate_xg</title>
+<path fill="none" stroke="#ff0000" d="M100.18,-12C108.29,-12 116.9,-12 125.6,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="125.84,-15.5 135.84,-12 125.84,-8.5 125.84,-15.5"/>
 </g>
 </g>
 </svg>
@@ -341,7 +341,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/translate_xg~2.html b/proc/translate_xg~2.html
index 1526b7274..4d38ddc14 100644
--- a/proc/translate_xg~2.html
+++ b/proc/translate_xg~2.html
@@ -83,15 +83,15 @@ <h1>translate_Xg
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_volume.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_volume.f90.html'>forcad_nurbs_volume.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_volume.html'>forcad_nurbs_volume</a></li>
             <li class="breadcrumb-item active" aria-current="page">translate_Xg</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine translate_Xg(this, vec)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
+    <p><a href='../type/nurbs_volume.html'>nurbs_volume</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~123"></span>
-              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
+              <span class="anchor" id="variable-this~117"></span>
+              class(<a href='../type/nurbs_volume.html'>nurbs_volume</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -210,20 +210,20 @@ <h3 class="card-title">Called by</h3>
 <g id="proc~~translate_xg~2~~CalledByGraph_node1" class="node">
 <title>proc~translate_xg~2</title>
 <polygon fill="none" stroke="black" points="310,-24 146,-24 146,0 310,0 310,-24"/>
-<text text-anchor="middle" x="228" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%translate_Xg</text>
+<text text-anchor="middle" x="228" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_volume%translate_Xg</text>
 </g>
-<!-- program~example3_surface -->
+<!-- program~example3_volume -->
 <g id="proc~~translate_xg~2~~CalledByGraph_node2" class="node">
-<title>program~example3_surface</title>
-<g id="a_proc~~translate_xg~2~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<title>program~example3_volume</title>
+<g id="a_proc~~translate_xg~2~~CalledByGraph_node2"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
-<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~translate_xg~2 -->
+<!-- program~example3_volume&#45;&gt;proc~translate_xg~2 -->
 <g id="proc~~translate_xg~2~~CalledByGraph_edge1" class="edge">
-<title>program~example3_surface&#45;&gt;proc~translate_xg~2</title>
+<title>program~example3_volume&#45;&gt;proc~translate_xg~2</title>
 <path fill="none" stroke="#ff0000" d="M110.11,-12C118.26,-12 126.86,-12 135.55,-12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="135.76,-15.5 145.76,-12 135.76,-8.5 135.76,-15.5"/>
 </g>
@@ -341,7 +341,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/translate_xg~3.html b/proc/translate_xg~3.html
index 1557de4fc..294a4851a 100644
--- a/proc/translate_xg~3.html
+++ b/proc/translate_xg~3.html
@@ -83,15 +83,15 @@ <h1>translate_Xg
 
             <li class="list-inline-item" id="source-file">
               <i class="fa fa-code"></i>
-              <a href="../src/forcad_nurbs_curve.f90"> Source File</a>
+              <a href="../src/forcad_nurbs_surface.f90"> Source File</a>
             </li>
         </ul>
       </div>
       <div class="col">
         <nav aria-label="breadcrumb">
           <ol class="breadcrumb justify-content-end mb-0">
-                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_curve.f90.html'>forcad_nurbs_curve.f90</a></li>
-                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_curve.html'>forcad_nurbs_curve</a></li>
+                <li class="breadcrumb-item"><a href='../sourcefile/forcad_nurbs_surface.f90.html'>forcad_nurbs_surface.f90</a></li>
+                <li class="breadcrumb-item"><a href='../module/forcad_nurbs_surface.html'>forcad_nurbs_surface</a></li>
             <li class="breadcrumb-item active" aria-current="page">translate_Xg</li>
           </ol>
         </nav>
@@ -143,7 +143,7 @@ <h2>private pure subroutine translate_Xg(this, vec)
 
 
     <h3>Type Bound</h3>
-    <p><a href='../type/nurbs_curve.html'>nurbs_curve</a></p>
+    <p><a href='../type/nurbs_surface.html'>nurbs_surface</a></p>
 
     <h3>Arguments</h3>
         <table class="table table-striped varlist">
@@ -158,8 +158,8 @@ <h3>Arguments</h3>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-this~186"></span>
-              class(<a href='../type/nurbs_curve.html'>nurbs_curve</a>),
+              <span class="anchor" id="variable-this~184"></span>
+              class(<a href='../type/nurbs_surface.html'>nurbs_surface</a>),
             </td>
 <td>intent(inout)</td>
               <td></td>            <td>
@@ -201,31 +201,31 @@ <h3 class="card-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~translate_xg~3~~CalledByGraph Pages: 1 -->
-<svg id="proctranslate_xg3CalledByGraph" width="298pt" height="32pt"
- viewBox="0.00 0.00 298.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="proctranslate_xg3CalledByGraph" width="318pt" height="32pt"
+ viewBox="0.00 0.00 318.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~translate_xg~3~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~translate_xg~3~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 294,-28 294,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 314,-28 314,4 -4,4"/>
 <!-- proc~translate_xg~3 -->
 <g id="proc~~translate_xg~3~~CalledByGraph_node1" class="node">
 <title>proc~translate_xg~3</title>
-<polygon fill="none" stroke="black" points="290,-24 136,-24 136,0 290,0 290,-24"/>
-<text text-anchor="middle" x="213" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_curve%translate_Xg</text>
+<polygon fill="none" stroke="black" points="310,-24 146,-24 146,0 310,0 310,-24"/>
+<text text-anchor="middle" x="228" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">nurbs_surface%translate_Xg</text>
 </g>
-<!-- program~example1_curve -->
+<!-- program~example3_surface -->
 <g id="proc~~translate_xg~3~~CalledByGraph_node2" class="node">
-<title>program~example1_curve</title>
-<g id="a_proc~~translate_xg~3~~CalledByGraph_node2"><a xlink:href="../program/example1_curve.html" xlink:title="example1_curve">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="100,-24 0,-24 0,0 100,0 100,-24"/>
-<text text-anchor="middle" x="50" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example1_curve</text>
+<title>program~example3_surface</title>
+<g id="a_proc~~translate_xg~3~~CalledByGraph_node2"><a xlink:href="../program/example3_surface.html" xlink:title="example3_surface">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110,-24 0,-24 0,0 110,0 110,-24"/>
+<text text-anchor="middle" x="55" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_surface</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~translate_xg~3 -->
+<!-- program~example3_surface&#45;&gt;proc~translate_xg~3 -->
 <g id="proc~~translate_xg~3~~CalledByGraph_edge1" class="edge">
-<title>program~example1_curve&#45;&gt;proc~translate_xg~3</title>
-<path fill="none" stroke="#ff0000" d="M100.18,-12C108.29,-12 116.9,-12 125.6,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="125.84,-15.5 135.84,-12 125.84,-8.5 125.84,-15.5"/>
+<title>program~example3_surface&#45;&gt;proc~translate_xg~3</title>
+<path fill="none" stroke="#ff0000" d="M110.11,-12C118.26,-12 126.86,-12 135.55,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="135.76,-15.5 145.76,-12 135.76,-8.5 135.76,-15.5"/>
 </g>
 </g>
 </svg>
@@ -341,7 +341,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/unique_integer.html b/proc/unique_integer.html
index 0a153938e..c24a4ec73 100644
--- a/proc/unique_integer.html
+++ b/proc/unique_integer.html
@@ -199,254 +199,254 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~unique_integer -->
 <g id="proc~~unique_integer~~CalledByGraph_node1" class="node">
 <title>proc~unique_integer</title>
-<polygon fill="none" stroke="black" points="883,-124 790,-124 790,-100 883,-100 883,-124"/>
-<text text-anchor="middle" x="836.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50">unique_integer</text>
+<polygon fill="none" stroke="black" points="883,-146 790,-146 790,-122 883,-122 883,-146"/>
+<text text-anchor="middle" x="836.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50">unique_integer</text>
 </g>
 <!-- interface~unique -->
 <g id="proc~~unique_integer~~CalledByGraph_node2" class="node">
 <title>interface~unique</title>
 <g id="a_proc~~unique_integer~~CalledByGraph_node2"><a xlink:href="../interface/unique.html" xlink:title="unique">
-<polygon fill="#a7506f" stroke="#a7506f" points="754,-124 700,-124 700,-100 754,-100 754,-124"/>
-<text text-anchor="middle" x="727" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="754,-146 700,-146 700,-122 754,-122 754,-146"/>
+<text text-anchor="middle" x="727" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique</text>
 </a>
 </g>
 </g>
 <!-- interface~unique&#45;&gt;proc~unique_integer -->
 <g id="proc~~unique_integer~~CalledByGraph_edge1" class="edge">
 <title>interface~unique&#45;&gt;proc~unique_integer</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M754.02,-112C761.88,-112 770.82,-112 779.84,-112"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="779.99,-115.5 789.99,-112 779.99,-108.5 779.99,-115.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M754.02,-134C761.88,-134 770.82,-134 779.84,-134"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="779.99,-137.5 789.99,-134 779.99,-130.5 779.99,-137.5"/>
 </g>
 <!-- proc~ansatz -->
 <g id="proc~~unique_integer~~CalledByGraph_node3" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~unique_integer~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-246 343,-246 343,-222 475,-222 475,-246"/>
-<text text-anchor="middle" x="409" y="-231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~unique_integer~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="470,-246 348,-246 348,-222 470,-222 470,-246"/>
+<text text-anchor="middle" x="409" y="-231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;interface~unique -->
 <g id="proc~~unique_integer~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M475.04,-236.81C529.23,-236.23 606.56,-228.42 664,-194 687.86,-179.71 705.64,-152.43 715.91,-133.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="719.16,-134.6 720.59,-124.11 712.92,-131.42 719.16,-134.6"/>
+<path fill="none" stroke="#ff0000" d="M470.05,-242.77C524.1,-247.71 604.01,-247.47 664,-215 688.38,-201.8 706.13,-174.46 716.24,-155.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="719.38,-156.75 720.7,-146.24 713.11,-153.63 719.38,-156.75"/>
 </g>
 <!-- proc~cmp_elem -->
 <g id="proc~~unique_integer~~CalledByGraph_node6" class="node">
 <title>proc~cmp_elem</title>
-<g id="a_proc~~unique_integer~~CalledByGraph_node6"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_volume%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-185 511,-185 511,-161 664,-161 664,-185"/>
-<text text-anchor="middle" x="587.5" y="-170.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
+<g id="a_proc~~unique_integer~~CalledByGraph_node6"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_curve%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="659,-206 516,-206 516,-182 659,-182 659,-206"/>
+<text text-anchor="middle" x="587.5" y="-191.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
 <g id="proc~~unique_integer~~CalledByGraph_edge11" class="edge">
 <title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#00ffff" d="M444.87,-221.95C472.67,-212.34 511.79,-198.82 541.88,-188.42"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="543.39,-191.6 551.7,-185.03 541.11,-184.99 543.39,-191.6"/>
+<path fill="none" stroke="#00ffff" d="M462.96,-222C481.98,-217.69 503.62,-212.78 523.42,-208.3"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="524.3,-211.69 533.28,-206.06 522.75,-204.86 524.3,-211.69"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~unique_integer~~CalledByGraph_node4" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~unique_integer~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-124 343,-124 343,-100 475,-100 475,-124"/>
-<text text-anchor="middle" x="409" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~unique_integer~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-166 343,-166 343,-142 475,-142 475,-166"/>
+<text text-anchor="middle" x="409" y="-151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;interface~unique -->
 <g id="proc~~unique_integer~~CalledByGraph_edge3" class="edge">
 <title>proc~ansatz~2&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M475.2,-112.74C487.11,-112.85 499.43,-112.94 511,-113 579,-113.34 596,-113.55 664,-113 672.25,-112.93 681.12,-112.82 689.49,-112.69"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="689.81,-116.18 699.76,-112.52 689.7,-109.18 689.81,-116.18"/>
+<path fill="none" stroke="#ff0000" d="M475.09,-149.88C540,-145.77 637.35,-139.61 689.66,-136.3"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="690.05,-139.78 699.8,-135.66 689.6,-132.8 690.05,-139.78"/>
 </g>
 <!-- proc~cmp_elem~2 -->
 <g id="proc~~unique_integer~~CalledByGraph_node7" class="node">
 <title>proc~cmp_elem~2</title>
-<g id="a_proc~~unique_integer~~CalledByGraph_node7"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_surface%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-104 511,-104 511,-80 664,-80 664,-104"/>
-<text text-anchor="middle" x="587.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
+<g id="a_proc~~unique_integer~~CalledByGraph_node7"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_volume%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-126 511,-126 511,-102 664,-102 664,-126"/>
+<text text-anchor="middle" x="587.5" y="-111.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;proc~cmp_elem~2 -->
-<g id="proc~~unique_integer~~CalledByGraph_edge14" class="edge">
+<g id="proc~~unique_integer~~CalledByGraph_edge13" class="edge">
 <title>proc~ansatz~2&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#0000ff" d="M475.22,-104.61C483.55,-103.67 492.17,-102.69 500.76,-101.72"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="501.27,-105.18 510.81,-100.58 500.48,-98.22 501.27,-105.18"/>
+<path fill="none" stroke="#0000ff" d="M462.96,-142C481.98,-137.69 503.62,-132.78 523.42,-128.3"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="524.3,-131.69 533.28,-126.06 522.75,-124.86 524.3,-131.69"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="proc~~unique_integer~~CalledByGraph_node5" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~unique_integer~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="470,-44 348,-44 348,-20 470,-20 470,-44"/>
-<text text-anchor="middle" x="409" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~unique_integer~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-44 343,-44 343,-20 475,-20 475,-44"/>
+<text text-anchor="middle" x="409" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;interface~unique -->
 <g id="proc~~unique_integer~~CalledByGraph_edge4" class="edge">
 <title>proc~ansatz~3&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M470.12,-33.97C522.8,-37.38 600.63,-46.54 664,-71 678.2,-76.48 692.47,-85.61 703.74,-93.87"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="701.64,-96.67 711.72,-99.94 705.88,-91.1 701.64,-96.67"/>
+<path fill="none" stroke="#ff0000" d="M464.43,-44.01C533.47,-59.42 645.78,-85.08 664,-93 677.63,-98.93 691.55,-107.82 702.74,-115.81"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="700.94,-118.84 711.07,-121.96 705.1,-113.2 700.94,-118.84"/>
 </g>
 <!-- proc~cmp_elem~3 -->
 <g id="proc~~unique_integer~~CalledByGraph_node8" class="node">
 <title>proc~cmp_elem~3</title>
-<g id="a_proc~~unique_integer~~CalledByGraph_node8"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_curve%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="659,-24 516,-24 516,0 659,0 659,-24"/>
-<text text-anchor="middle" x="587.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
+<g id="a_proc~~unique_integer~~CalledByGraph_node8"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_surface%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-44 511,-44 511,-20 664,-20 664,-44"/>
+<text text-anchor="middle" x="587.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;proc~cmp_elem~3 -->
 <g id="proc~~unique_integer~~CalledByGraph_edge16" class="edge">
 <title>proc~ansatz~3&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#ff00ff" d="M470.25,-25.17C481.72,-23.87 493.89,-22.49 505.87,-21.14"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="506.33,-24.61 515.88,-20 505.54,-17.65 506.33,-24.61"/>
+<path fill="none" stroke="#ff00ff" d="M475.22,-32C483.55,-32 492.17,-32 500.76,-32"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="500.81,-35.5 510.81,-32 500.81,-28.5 500.81,-35.5"/>
 </g>
 <!-- proc~cmp_elem&#45;&gt;interface~unique -->
 <g id="proc~~unique_integer~~CalledByGraph_edge5" class="edge">
 <title>proc~cmp_elem&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M625.83,-160.96C638.15,-156.65 651.81,-151.48 664,-146 675.06,-141.03 686.81,-134.83 697.08,-129.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="699.07,-131.99 706.03,-124.01 695.6,-125.91 699.07,-131.99"/>
+<path fill="none" stroke="#ff0000" d="M627.79,-181.88C639.59,-177.87 652.46,-173.11 664,-168 675.09,-163.09 686.85,-156.91 697.11,-151.17"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="699.1,-154.06 706.06,-146.07 695.63,-147.98 699.1,-154.06"/>
 </g>
 <!-- proc~cmp_elem~2&#45;&gt;interface~unique -->
 <g id="proc~~unique_integer~~CalledByGraph_edge6" class="edge">
 <title>proc~cmp_elem~2&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M664.09,-102.99C673.03,-104.29 681.81,-105.57 689.82,-106.74"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="689.47,-110.22 699.87,-108.2 690.47,-103.3 689.47,-110.22"/>
+<path fill="none" stroke="#ff0000" d="M664.09,-124.99C673.03,-126.29 681.81,-127.57 689.82,-128.74"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="689.47,-132.22 699.87,-130.2 690.47,-125.3 689.47,-132.22"/>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;interface~unique -->
 <g id="proc~~unique_integer~~CalledByGraph_edge7" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M636.3,-24.07C645.94,-27.69 655.66,-32.26 664,-38 684.51,-52.11 702.08,-74.75 713.23,-91.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="710.35,-93.26 718.74,-99.73 716.22,-89.44 710.35,-93.26"/>
+<path fill="none" stroke="#ff0000" d="M634.75,-44.11C644.9,-47.95 655.22,-52.84 664,-59 684.65,-73.49 702.31,-96.6 713.44,-113.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="710.58,-115.36 718.92,-121.89 716.47,-111.58 710.58,-115.36"/>
 </g>
 <!-- proc~cmp_area -->
 <g id="proc~~unique_integer~~CalledByGraph_node9" class="node">
 <title>proc~cmp_area</title>
 <g id="a_proc~~unique_integer~~CalledByGraph_node9"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-104 149,-104 149,-80 299,-80 299,-104"/>
-<text text-anchor="middle" x="224" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-24 149,-24 149,0 299,0 299,-24"/>
+<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~unique_integer~~CalledByGraph_edge9" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ffff00" d="M299.17,-100.11C310.24,-101.32 321.67,-102.57 332.77,-103.78"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="332.52,-107.27 342.85,-104.88 333.29,-100.31 332.52,-107.27"/>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~unique_integer~~CalledByGraph_edge10" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#00ff00" d="M299.17,-20.11C310.24,-21.32 321.67,-22.57 332.77,-23.78"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="332.52,-27.27 342.85,-24.88 333.29,-20.31 332.52,-27.27"/>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~2 -->
-<g id="proc~~unique_integer~~CalledByGraph_edge15" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#0000ff" d="M299.28,-91.27C313.78,-91.16 328.86,-91.06 343,-91 401.67,-90.75 416.33,-90.74 475,-91 483.35,-91.04 492.05,-91.09 500.74,-91.15"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="500.9,-94.65 510.93,-91.23 500.96,-87.65 500.9,-94.65"/>
+<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~3 -->
+<g id="proc~~unique_integer~~CalledByGraph_edge17" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~cmp_elem~3</title>
+<path fill="none" stroke="#ff00ff" d="M299.01,-7.95C348.85,-6.14 416.01,-5.49 475,-11 490.85,-12.48 507.8,-15.12 523.58,-18.03"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="523.28,-21.54 533.76,-19.98 524.59,-14.66 523.28,-21.54"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="proc~~unique_integer~~CalledByGraph_node10" class="node">
 <title>proc~cmp_length</title>
 <g id="a_proc~~unique_integer~~CalledByGraph_node10"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-24 149,-24 149,0 299,0 299,-24"/>
-<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-216 149,-216 149,-192 299,-192 299,-216"/>
+<text text-anchor="middle" x="224" y="-201.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="proc~~unique_integer~~CalledByGraph_edge10" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#00ff00" d="M299.17,-20.11C311.91,-21.5 325.12,-22.94 337.76,-24.32"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="337.43,-27.81 347.75,-25.42 338.19,-20.85 337.43,-27.81"/>
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
+<g id="proc~~unique_integer~~CalledByGraph_edge8" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M298.38,-216.03C311.32,-218.15 324.78,-220.36 337.64,-222.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="337.37,-225.97 347.8,-224.13 338.5,-219.06 337.37,-225.97"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~cmp_elem~3 -->
-<g id="proc~~unique_integer~~CalledByGraph_edge17" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#ff00ff" d="M299.28,-11.27C313.78,-11.16 328.86,-11.06 343,-11 401.67,-10.75 416.33,-10.74 475,-11 484.87,-11.04 495.24,-11.11 505.51,-11.19"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="505.69,-14.69 515.72,-11.27 505.75,-7.69 505.69,-14.69"/>
+<!-- proc~cmp_length&#45;&gt;proc~cmp_elem -->
+<g id="proc~~unique_integer~~CalledByGraph_edge12" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~cmp_elem</title>
+<path fill="none" stroke="#00ffff" d="M299.03,-201.95C359.2,-200.29 443.95,-197.94 505.84,-196.23"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="506.05,-199.73 515.95,-195.95 505.86,-192.73 506.05,-199.73"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="proc~~unique_integer~~CalledByGraph_node11" class="node">
 <title>proc~cmp_volume</title>
 <g id="a_proc~~unique_integer~~CalledByGraph_node11"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-226 141,-226 141,-202 307,-202 307,-226"/>
-<text text-anchor="middle" x="224" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-155 141,-155 141,-131 307,-131 307,-155"/>
+<text text-anchor="middle" x="224" y="-140.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~unique_integer~~CalledByGraph_edge8" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.13,-222.98C315.64,-223.91 324.26,-224.85 332.7,-225.77"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="332.54,-229.27 342.87,-226.88 333.31,-222.32 332.54,-229.27"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~unique_integer~~CalledByGraph_edge9" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ffff00" d="M307.13,-147.94C315.64,-148.45 324.26,-148.97 332.7,-149.47"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="332.67,-152.98 342.87,-150.08 333.09,-145.99 332.67,-152.98"/>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem -->
-<g id="proc~~unique_integer~~CalledByGraph_edge12" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#00ffff" d="M307.03,-204.7C364.93,-198.13 442.31,-189.35 500.97,-182.7"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="501.42,-186.17 510.96,-181.57 500.63,-179.22 501.42,-186.17"/>
+<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="proc~~unique_integer~~CalledByGraph_edge14" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#0000ff" d="M307.2,-135.96C319.21,-134.96 331.42,-133.94 343,-133 395.37,-128.74 454.09,-124.15 500.74,-120.55"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="501.11,-124.03 510.81,-119.78 500.57,-117.05 501.11,-124.03"/>
 </g>
 <!-- program~example3_volume -->
 <g id="proc~~unique_integer~~CalledByGraph_node12" class="node">
 <title>program~example3_volume</title>
 <g id="a_proc~~unique_integer~~CalledByGraph_node12"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="464,-166 354,-166 354,-142 464,-142 464,-166"/>
-<text text-anchor="middle" x="409" y="-151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="464,-86 354,-86 354,-62 464,-62 464,-86"/>
+<text text-anchor="middle" x="409" y="-71.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~cmp_elem -->
-<g id="proc~~unique_integer~~CalledByGraph_edge13" class="edge">
-<title>program~example3_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#00ffff" d="M464.4,-159.86C475.87,-161.09 488.24,-162.42 500.56,-163.75"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="500.55,-167.27 510.87,-164.86 501.3,-160.31 500.55,-167.27"/>
+<!-- program~example3_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="proc~~unique_integer~~CalledByGraph_edge15" class="edge">
+<title>program~example3_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#0000ff" d="M462.96,-86C481.98,-90.31 503.62,-95.22 523.42,-99.7"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="522.75,-103.14 533.28,-101.94 524.3,-96.31 522.75,-103.14"/>
 </g>
 <!-- program~compute_area -->
 <g id="proc~~unique_integer~~CalledByGraph_node13" class="node">
 <title>program~compute_area</title>
 <g id="a_proc~~unique_integer~~CalledByGraph_node13"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-104 8,-104 8,-80 97,-80 97,-104"/>
-<text text-anchor="middle" x="52.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-24 8,-24 8,0 97,0 97,-24"/>
+<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
 <!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="proc~~unique_integer~~CalledByGraph_edge18" class="edge">
 <title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M97.15,-92C109.86,-92 124.19,-92 138.52,-92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="138.92,-95.5 148.92,-92 138.92,-88.5 138.92,-95.5"/>
+<path fill="none" stroke="#ff0000" d="M97.15,-12C109.86,-12 124.19,-12 138.52,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="138.92,-15.5 148.92,-12 138.92,-8.5 138.92,-15.5"/>
 </g>
 <!-- program~compute_length -->
 <g id="proc~~unique_integer~~CalledByGraph_node14" class="node">
 <title>program~compute_length</title>
 <g id="a_proc~~unique_integer~~CalledByGraph_node14"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-24 3,-24 3,0 102,0 102,-24"/>
-<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-216 3,-216 3,-192 102,-192 102,-216"/>
+<text text-anchor="middle" x="52.5" y="-201.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="proc~~unique_integer~~CalledByGraph_edge19" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#7fff00" d="M102.07,-12C113.57,-12 126.17,-12 138.75,-12"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="138.82,-15.5 148.82,-12 138.82,-8.5 138.82,-15.5"/>
+<path fill="none" stroke="#7fff00" d="M102.07,-204C113.57,-204 126.17,-204 138.75,-204"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="138.82,-207.5 148.82,-204 138.82,-200.5 138.82,-207.5"/>
 </g>
 <!-- program~compute_volume -->
 <g id="proc~~unique_integer~~CalledByGraph_node15" class="node">
 <title>program~compute_volume</title>
 <g id="a_proc~~unique_integer~~CalledByGraph_node15"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-226 0,-226 0,-202 105,-202 105,-226"/>
-<text text-anchor="middle" x="52.5" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-155 0,-155 0,-131 105,-131 105,-155"/>
+<text text-anchor="middle" x="52.5" y="-140.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
 <!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="proc~~unique_integer~~CalledByGraph_edge20" class="edge">
 <title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#00ffff" d="M105.28,-214C113.39,-214 121.99,-214 130.69,-214"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="130.93,-217.5 140.93,-214 130.93,-210.5 130.93,-217.5"/>
+<path fill="none" stroke="#00ffff" d="M105.28,-143C113.39,-143 121.99,-143 130.69,-143"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="130.93,-146.5 140.93,-143 130.93,-139.5 130.93,-146.5"/>
 </g>
 </g>
 </svg>
@@ -566,7 +566,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/proc/unique_real.html b/proc/unique_real.html
index 946e77349..8ea666afd 100644
--- a/proc/unique_real.html
+++ b/proc/unique_real.html
@@ -199,254 +199,254 @@ <h3 class="card-title">Called by</h3>
 <!-- proc~unique_real -->
 <g id="proc~~unique_real~~CalledByGraph_node1" class="node">
 <title>proc~unique_real</title>
-<polygon fill="none" stroke="black" points="865,-124 790,-124 790,-100 865,-100 865,-124"/>
-<text text-anchor="middle" x="827.5" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50">unique_real</text>
+<polygon fill="none" stroke="black" points="865,-146 790,-146 790,-122 865,-122 865,-146"/>
+<text text-anchor="middle" x="827.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50">unique_real</text>
 </g>
 <!-- interface~unique -->
 <g id="proc~~unique_real~~CalledByGraph_node2" class="node">
 <title>interface~unique</title>
 <g id="a_proc~~unique_real~~CalledByGraph_node2"><a xlink:href="../interface/unique.html" xlink:title="unique">
-<polygon fill="#a7506f" stroke="#a7506f" points="754,-124 700,-124 700,-100 754,-100 754,-124"/>
-<text text-anchor="middle" x="727" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="754,-146 700,-146 700,-122 754,-122 754,-146"/>
+<text text-anchor="middle" x="727" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">unique</text>
 </a>
 </g>
 </g>
 <!-- interface~unique&#45;&gt;proc~unique_real -->
 <g id="proc~~unique_real~~CalledByGraph_edge1" class="edge">
 <title>interface~unique&#45;&gt;proc~unique_real</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M754.14,-112C762,-112 770.89,-112 779.66,-112"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="779.86,-115.5 789.86,-112 779.86,-108.5 779.86,-115.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M754.14,-134C762,-134 770.89,-134 779.66,-134"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="779.86,-137.5 789.86,-134 779.86,-130.5 779.86,-137.5"/>
 </g>
 <!-- proc~ansatz -->
 <g id="proc~~unique_real~~CalledByGraph_node3" class="node">
 <title>proc~ansatz</title>
-<g id="a_proc~~unique_real~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-246 343,-246 343,-222 475,-222 475,-246"/>
-<text text-anchor="middle" x="409" y="-231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
+<g id="a_proc~~unique_real~~CalledByGraph_node3"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="470,-246 348,-246 348,-222 470,-222 470,-246"/>
+<text text-anchor="middle" x="409" y="-231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;interface~unique -->
 <g id="proc~~unique_real~~CalledByGraph_edge2" class="edge">
 <title>proc~ansatz&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M475.04,-236.81C529.23,-236.23 606.56,-228.42 664,-194 687.86,-179.71 705.64,-152.43 715.91,-133.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="719.16,-134.6 720.59,-124.11 712.92,-131.42 719.16,-134.6"/>
+<path fill="none" stroke="#ff0000" d="M470.05,-242.77C524.1,-247.71 604.01,-247.47 664,-215 688.38,-201.8 706.13,-174.46 716.24,-155.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="719.38,-156.75 720.7,-146.24 713.11,-153.63 719.38,-156.75"/>
 </g>
 <!-- proc~cmp_elem -->
 <g id="proc~~unique_real~~CalledByGraph_node6" class="node">
 <title>proc~cmp_elem</title>
-<g id="a_proc~~unique_real~~CalledByGraph_node6"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_volume%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-185 511,-185 511,-161 664,-161 664,-185"/>
-<text text-anchor="middle" x="587.5" y="-170.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
+<g id="a_proc~~unique_real~~CalledByGraph_node6"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_curve%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="659,-206 516,-206 516,-182 659,-182 659,-206"/>
+<text text-anchor="middle" x="587.5" y="-191.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
 <g id="proc~~unique_real~~CalledByGraph_edge11" class="edge">
 <title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#00ffff" d="M444.87,-221.95C472.67,-212.34 511.79,-198.82 541.88,-188.42"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="543.39,-191.6 551.7,-185.03 541.11,-184.99 543.39,-191.6"/>
+<path fill="none" stroke="#00ffff" d="M462.96,-222C481.98,-217.69 503.62,-212.78 523.42,-208.3"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="524.3,-211.69 533.28,-206.06 522.75,-204.86 524.3,-211.69"/>
 </g>
 <!-- proc~ansatz~2 -->
 <g id="proc~~unique_real~~CalledByGraph_node4" class="node">
 <title>proc~ansatz~2</title>
-<g id="a_proc~~unique_real~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="475,-124 343,-124 343,-100 475,-100 475,-124"/>
-<text text-anchor="middle" x="409" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
+<g id="a_proc~~unique_real~~CalledByGraph_node4"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-166 343,-166 343,-142 475,-142 475,-166"/>
+<text text-anchor="middle" x="409" y="-151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;interface~unique -->
 <g id="proc~~unique_real~~CalledByGraph_edge3" class="edge">
 <title>proc~ansatz~2&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M475.2,-112.74C487.11,-112.85 499.43,-112.94 511,-113 579,-113.34 596,-113.55 664,-113 672.25,-112.93 681.12,-112.82 689.49,-112.69"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="689.81,-116.18 699.76,-112.52 689.7,-109.18 689.81,-116.18"/>
+<path fill="none" stroke="#ff0000" d="M475.09,-149.88C540,-145.77 637.35,-139.61 689.66,-136.3"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="690.05,-139.78 699.8,-135.66 689.6,-132.8 690.05,-139.78"/>
 </g>
 <!-- proc~cmp_elem~2 -->
 <g id="proc~~unique_real~~CalledByGraph_node7" class="node">
 <title>proc~cmp_elem~2</title>
-<g id="a_proc~~unique_real~~CalledByGraph_node7"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_surface%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-104 511,-104 511,-80 664,-80 664,-104"/>
-<text text-anchor="middle" x="587.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
+<g id="a_proc~~unique_real~~CalledByGraph_node7"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_volume%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-126 511,-126 511,-102 664,-102 664,-126"/>
+<text text-anchor="middle" x="587.5" y="-111.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~2&#45;&gt;proc~cmp_elem~2 -->
-<g id="proc~~unique_real~~CalledByGraph_edge14" class="edge">
+<g id="proc~~unique_real~~CalledByGraph_edge13" class="edge">
 <title>proc~ansatz~2&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#0000ff" d="M475.22,-104.61C483.55,-103.67 492.17,-102.69 500.76,-101.72"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="501.27,-105.18 510.81,-100.58 500.48,-98.22 501.27,-105.18"/>
+<path fill="none" stroke="#0000ff" d="M462.96,-142C481.98,-137.69 503.62,-132.78 523.42,-128.3"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="524.3,-131.69 533.28,-126.06 522.75,-124.86 524.3,-131.69"/>
 </g>
 <!-- proc~ansatz~3 -->
 <g id="proc~~unique_real~~CalledByGraph_node5" class="node">
 <title>proc~ansatz~3</title>
-<g id="a_proc~~unique_real~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
-<polygon fill="#d9534f" stroke="#d9534f" points="470,-44 348,-44 348,-20 470,-20 470,-44"/>
-<text text-anchor="middle" x="409" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
+<g id="a_proc~~unique_real~~CalledByGraph_node5"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
+<polygon fill="#d9534f" stroke="#d9534f" points="475,-44 343,-44 343,-20 475,-20 475,-44"/>
+<text text-anchor="middle" x="409" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;interface~unique -->
 <g id="proc~~unique_real~~CalledByGraph_edge4" class="edge">
 <title>proc~ansatz~3&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M470.12,-33.97C522.8,-37.38 600.63,-46.54 664,-71 678.2,-76.48 692.47,-85.61 703.74,-93.87"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="701.64,-96.67 711.72,-99.94 705.88,-91.1 701.64,-96.67"/>
+<path fill="none" stroke="#ff0000" d="M464.43,-44.01C533.47,-59.42 645.78,-85.08 664,-93 677.63,-98.93 691.55,-107.82 702.74,-115.81"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="700.94,-118.84 711.07,-121.96 705.1,-113.2 700.94,-118.84"/>
 </g>
 <!-- proc~cmp_elem~3 -->
 <g id="proc~~unique_real~~CalledByGraph_node8" class="node">
 <title>proc~cmp_elem~3</title>
-<g id="a_proc~~unique_real~~CalledByGraph_node8"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_curve%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="659,-24 516,-24 516,0 659,0 659,-24"/>
-<text text-anchor="middle" x="587.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
+<g id="a_proc~~unique_real~~CalledByGraph_node8"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_surface%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="664,-44 511,-44 511,-20 664,-20 664,-44"/>
+<text text-anchor="middle" x="587.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
 </a>
 </g>
 </g>
 <!-- proc~ansatz~3&#45;&gt;proc~cmp_elem~3 -->
 <g id="proc~~unique_real~~CalledByGraph_edge16" class="edge">
 <title>proc~ansatz~3&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#ff00ff" d="M470.25,-25.17C481.72,-23.87 493.89,-22.49 505.87,-21.14"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="506.33,-24.61 515.88,-20 505.54,-17.65 506.33,-24.61"/>
+<path fill="none" stroke="#ff00ff" d="M475.22,-32C483.55,-32 492.17,-32 500.76,-32"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="500.81,-35.5 510.81,-32 500.81,-28.5 500.81,-35.5"/>
 </g>
 <!-- proc~cmp_elem&#45;&gt;interface~unique -->
 <g id="proc~~unique_real~~CalledByGraph_edge5" class="edge">
 <title>proc~cmp_elem&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M625.83,-160.96C638.15,-156.65 651.81,-151.48 664,-146 675.06,-141.03 686.81,-134.83 697.08,-129.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="699.07,-131.99 706.03,-124.01 695.6,-125.91 699.07,-131.99"/>
+<path fill="none" stroke="#ff0000" d="M627.79,-181.88C639.59,-177.87 652.46,-173.11 664,-168 675.09,-163.09 686.85,-156.91 697.11,-151.17"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="699.1,-154.06 706.06,-146.07 695.63,-147.98 699.1,-154.06"/>
 </g>
 <!-- proc~cmp_elem~2&#45;&gt;interface~unique -->
 <g id="proc~~unique_real~~CalledByGraph_edge6" class="edge">
 <title>proc~cmp_elem~2&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M664.09,-102.99C673.03,-104.29 681.81,-105.57 689.82,-106.74"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="689.47,-110.22 699.87,-108.2 690.47,-103.3 689.47,-110.22"/>
+<path fill="none" stroke="#ff0000" d="M664.09,-124.99C673.03,-126.29 681.81,-127.57 689.82,-128.74"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="689.47,-132.22 699.87,-130.2 690.47,-125.3 689.47,-132.22"/>
 </g>
 <!-- proc~cmp_elem~3&#45;&gt;interface~unique -->
 <g id="proc~~unique_real~~CalledByGraph_edge7" class="edge">
 <title>proc~cmp_elem~3&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#ff0000" d="M636.3,-24.07C645.94,-27.69 655.66,-32.26 664,-38 684.51,-52.11 702.08,-74.75 713.23,-91.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="710.35,-93.26 718.74,-99.73 716.22,-89.44 710.35,-93.26"/>
+<path fill="none" stroke="#ff0000" d="M634.75,-44.11C644.9,-47.95 655.22,-52.84 664,-59 684.65,-73.49 702.31,-96.6 713.44,-113.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="710.58,-115.36 718.92,-121.89 716.47,-111.58 710.58,-115.36"/>
 </g>
 <!-- proc~cmp_area -->
 <g id="proc~~unique_real~~CalledByGraph_node9" class="node">
 <title>proc~cmp_area</title>
 <g id="a_proc~~unique_real~~CalledByGraph_node9"><a xlink:href="../proc/cmp_area.html" xlink:title="nurbs_surface%cmp_area">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-104 149,-104 149,-80 299,-80 299,-104"/>
-<text text-anchor="middle" x="224" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-24 149,-24 149,0 299,0 299,-24"/>
+<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_area</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
-<g id="proc~~unique_real~~CalledByGraph_edge9" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
-<path fill="none" stroke="#ffff00" d="M299.17,-100.11C310.24,-101.32 321.67,-102.57 332.77,-103.78"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="332.52,-107.27 342.85,-104.88 333.29,-100.31 332.52,-107.27"/>
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
+<g id="proc~~unique_real~~CalledByGraph_edge10" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
+<path fill="none" stroke="#00ff00" d="M299.17,-20.11C310.24,-21.32 321.67,-22.57 332.77,-23.78"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="332.52,-27.27 342.85,-24.88 333.29,-20.31 332.52,-27.27"/>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~2 -->
-<g id="proc~~unique_real~~CalledByGraph_edge15" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~cmp_elem~2</title>
-<path fill="none" stroke="#0000ff" d="M299.28,-91.27C313.78,-91.16 328.86,-91.06 343,-91 401.67,-90.75 416.33,-90.74 475,-91 483.35,-91.04 492.05,-91.09 500.74,-91.15"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="500.9,-94.65 510.93,-91.23 500.96,-87.65 500.9,-94.65"/>
+<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~3 -->
+<g id="proc~~unique_real~~CalledByGraph_edge17" class="edge">
+<title>proc~cmp_area&#45;&gt;proc~cmp_elem~3</title>
+<path fill="none" stroke="#ff00ff" d="M299.01,-7.95C348.85,-6.14 416.01,-5.49 475,-11 490.85,-12.48 507.8,-15.12 523.58,-18.03"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="523.28,-21.54 533.76,-19.98 524.59,-14.66 523.28,-21.54"/>
 </g>
 <!-- proc~cmp_length -->
 <g id="proc~~unique_real~~CalledByGraph_node10" class="node">
 <title>proc~cmp_length</title>
 <g id="a_proc~~unique_real~~CalledByGraph_node10"><a xlink:href="../proc/cmp_length.html" xlink:title="nurbs_curve%cmp_length">
-<polygon fill="#d9534f" stroke="#d9534f" points="299,-24 149,-24 149,0 299,0 299,-24"/>
-<text text-anchor="middle" x="224" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="299,-216 149,-216 149,-192 299,-192 299,-216"/>
+<text text-anchor="middle" x="224" y="-201.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_length</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
-<g id="proc~~unique_real~~CalledByGraph_edge10" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
-<path fill="none" stroke="#00ff00" d="M299.17,-20.11C311.91,-21.5 325.12,-22.94 337.76,-24.32"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="337.43,-27.81 347.75,-25.42 338.19,-20.85 337.43,-27.81"/>
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
+<g id="proc~~unique_real~~CalledByGraph_edge8" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
+<path fill="none" stroke="#ff0000" d="M298.38,-216.03C311.32,-218.15 324.78,-220.36 337.64,-222.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="337.37,-225.97 347.8,-224.13 338.5,-219.06 337.37,-225.97"/>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~cmp_elem~3 -->
-<g id="proc~~unique_real~~CalledByGraph_edge17" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~cmp_elem~3</title>
-<path fill="none" stroke="#ff00ff" d="M299.28,-11.27C313.78,-11.16 328.86,-11.06 343,-11 401.67,-10.75 416.33,-10.74 475,-11 484.87,-11.04 495.24,-11.11 505.51,-11.19"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="505.69,-14.69 515.72,-11.27 505.75,-7.69 505.69,-14.69"/>
+<!-- proc~cmp_length&#45;&gt;proc~cmp_elem -->
+<g id="proc~~unique_real~~CalledByGraph_edge12" class="edge">
+<title>proc~cmp_length&#45;&gt;proc~cmp_elem</title>
+<path fill="none" stroke="#00ffff" d="M299.03,-201.95C359.2,-200.29 443.95,-197.94 505.84,-196.23"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="506.05,-199.73 515.95,-195.95 505.86,-192.73 506.05,-199.73"/>
 </g>
 <!-- proc~cmp_volume -->
 <g id="proc~~unique_real~~CalledByGraph_node11" class="node">
 <title>proc~cmp_volume</title>
 <g id="a_proc~~unique_real~~CalledByGraph_node11"><a xlink:href="../proc/cmp_volume.html" xlink:title="nurbs_volume%cmp_volume">
-<polygon fill="#d9534f" stroke="#d9534f" points="307,-226 141,-226 141,-202 307,-202 307,-226"/>
-<text text-anchor="middle" x="224" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="307,-155 141,-155 141,-131 307,-131 307,-155"/>
+<text text-anchor="middle" x="224" y="-140.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_volume</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
-<g id="proc~~unique_real~~CalledByGraph_edge8" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
-<path fill="none" stroke="#ff0000" d="M307.13,-222.98C315.64,-223.91 324.26,-224.85 332.7,-225.77"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="332.54,-229.27 342.87,-226.88 333.31,-222.32 332.54,-229.27"/>
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
+<g id="proc~~unique_real~~CalledByGraph_edge9" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
+<path fill="none" stroke="#ffff00" d="M307.13,-147.94C315.64,-148.45 324.26,-148.97 332.7,-149.47"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="332.67,-152.98 342.87,-150.08 333.09,-145.99 332.67,-152.98"/>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem -->
-<g id="proc~~unique_real~~CalledByGraph_edge12" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#00ffff" d="M307.03,-204.7C364.93,-198.13 442.31,-189.35 500.97,-182.7"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="501.42,-186.17 510.96,-181.57 500.63,-179.22 501.42,-186.17"/>
+<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="proc~~unique_real~~CalledByGraph_edge14" class="edge">
+<title>proc~cmp_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#0000ff" d="M307.2,-135.96C319.21,-134.96 331.42,-133.94 343,-133 395.37,-128.74 454.09,-124.15 500.74,-120.55"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="501.11,-124.03 510.81,-119.78 500.57,-117.05 501.11,-124.03"/>
 </g>
 <!-- program~example3_volume -->
 <g id="proc~~unique_real~~CalledByGraph_node12" class="node">
 <title>program~example3_volume</title>
 <g id="a_proc~~unique_real~~CalledByGraph_node12"><a xlink:href="../program/example3_volume.html" xlink:title="example3_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="464,-166 354,-166 354,-142 464,-142 464,-166"/>
-<text text-anchor="middle" x="409" y="-151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="464,-86 354,-86 354,-62 464,-62 464,-86"/>
+<text text-anchor="middle" x="409" y="-71.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">example3_volume</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~cmp_elem -->
-<g id="proc~~unique_real~~CalledByGraph_edge13" class="edge">
-<title>program~example3_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#00ffff" d="M464.4,-159.86C475.87,-161.09 488.24,-162.42 500.56,-163.75"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="500.55,-167.27 510.87,-164.86 501.3,-160.31 500.55,-167.27"/>
+<!-- program~example3_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="proc~~unique_real~~CalledByGraph_edge15" class="edge">
+<title>program~example3_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#0000ff" d="M462.96,-86C481.98,-90.31 503.62,-95.22 523.42,-99.7"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="522.75,-103.14 533.28,-101.94 524.3,-96.31 522.75,-103.14"/>
 </g>
 <!-- program~compute_area -->
 <g id="proc~~unique_real~~CalledByGraph_node13" class="node">
 <title>program~compute_area</title>
 <g id="a_proc~~unique_real~~CalledByGraph_node13"><a xlink:href="../program/compute_area.html" xlink:title="compute_area">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-104 8,-104 8,-80 97,-80 97,-104"/>
-<text text-anchor="middle" x="52.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="97,-24 8,-24 8,0 97,0 97,-24"/>
+<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_area</text>
 </a>
 </g>
 </g>
 <!-- program~compute_area&#45;&gt;proc~cmp_area -->
 <g id="proc~~unique_real~~CalledByGraph_edge18" class="edge">
 <title>program~compute_area&#45;&gt;proc~cmp_area</title>
-<path fill="none" stroke="#ff0000" d="M97.15,-92C109.86,-92 124.19,-92 138.52,-92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="138.92,-95.5 148.92,-92 138.92,-88.5 138.92,-95.5"/>
+<path fill="none" stroke="#ff0000" d="M97.15,-12C109.86,-12 124.19,-12 138.52,-12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="138.92,-15.5 148.92,-12 138.92,-8.5 138.92,-15.5"/>
 </g>
 <!-- program~compute_length -->
 <g id="proc~~unique_real~~CalledByGraph_node14" class="node">
 <title>program~compute_length</title>
 <g id="a_proc~~unique_real~~CalledByGraph_node14"><a xlink:href="../program/compute_length.html" xlink:title="compute_length">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-24 3,-24 3,0 102,0 102,-24"/>
-<text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="102,-216 3,-216 3,-192 102,-192 102,-216"/>
+<text text-anchor="middle" x="52.5" y="-201.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_length</text>
 </a>
 </g>
 </g>
 <!-- program~compute_length&#45;&gt;proc~cmp_length -->
 <g id="proc~~unique_real~~CalledByGraph_edge19" class="edge">
 <title>program~compute_length&#45;&gt;proc~cmp_length</title>
-<path fill="none" stroke="#7fff00" d="M102.07,-12C113.57,-12 126.17,-12 138.75,-12"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="138.82,-15.5 148.82,-12 138.82,-8.5 138.82,-15.5"/>
+<path fill="none" stroke="#7fff00" d="M102.07,-204C113.57,-204 126.17,-204 138.75,-204"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="138.82,-207.5 148.82,-204 138.82,-200.5 138.82,-207.5"/>
 </g>
 <!-- program~compute_volume -->
 <g id="proc~~unique_real~~CalledByGraph_node15" class="node">
 <title>program~compute_volume</title>
 <g id="a_proc~~unique_real~~CalledByGraph_node15"><a xlink:href="../program/compute_volume.html" xlink:title="compute_volume">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-226 0,-226 0,-202 105,-202 105,-226"/>
-<text text-anchor="middle" x="52.5" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="105,-155 0,-155 0,-131 105,-131 105,-155"/>
+<text text-anchor="middle" x="52.5" y="-140.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_volume</text>
 </a>
 </g>
 </g>
 <!-- program~compute_volume&#45;&gt;proc~cmp_volume -->
 <g id="proc~~unique_real~~CalledByGraph_edge20" class="edge">
 <title>program~compute_volume&#45;&gt;proc~cmp_volume</title>
-<path fill="none" stroke="#00ffff" d="M105.28,-214C113.39,-214 121.99,-214 130.69,-214"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="130.93,-217.5 140.93,-214 130.93,-210.5 130.93,-217.5"/>
+<path fill="none" stroke="#00ffff" d="M105.28,-143C113.39,-143 121.99,-143 130.69,-143"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="130.93,-146.5 140.93,-143 130.93,-139.5 130.93,-146.5"/>
 </g>
 </g>
 </svg>
@@ -566,7 +566,7 @@ <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/compute_area.html b/program/compute_area.html
index 8e91848c4..b10adf063 100644
--- a/program/compute_area.html
+++ b/program/compute_area.html
@@ -115,9 +115,9 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/compute_area.html#variable-xc~50">Xc</a>
+            <a class="list-group-item" href="../program/compute_area.html#variable-xc~63">Xc</a>
             <a class="list-group-item" href="../program/compute_area.html#variable-area~2">area</a>
-            <a class="list-group-item" href="../program/compute_area.html#variable-shape~18">shape</a>
+            <a class="list-group-item" href="../program/compute_area.html#variable-shape~13">shape</a>
         </div>
       </div>
     </div>
@@ -382,18 +382,18 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="89,-366 0,-366 0,-342 89,-342 89,-366"/>
 <text text-anchor="middle" x="44.5" y="-351.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_area</text>
 </g>
-<!-- none~set~2 -->
+<!-- none~set~3 -->
 <g id="program~~compute_area~~CallsGraph_node2" class="node">
-<title>none~set~2</title>
-<g id="a_program~~compute_area~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<title>none~set~3</title>
+<g id="a_program~~compute_area~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="612,-555 499,-555 499,-531 612,-531 612,-555"/>
 <text text-anchor="middle" x="555.5" y="-540.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- program~compute_area&#45;&gt;none~set~2 -->
+<!-- program~compute_area&#45;&gt;none~set~3 -->
 <g id="program~~compute_area~~CallsGraph_edge1" class="edge">
-<title>program~compute_area&#45;&gt;none~set~2</title>
+<title>program~compute_area&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff0000" d="M78.11,-366.11C167,-399.11 413.44,-490.62 512.49,-527.4"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="511.56,-530.79 522.16,-530.99 514,-524.23 511.56,-530.79"/>
 </g>
@@ -412,105 +412,105 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M89.08,-348.32C97.19,-347.27 105.92,-346.13 114.78,-344.97"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="115.35,-348.43 124.81,-343.67 114.45,-341.49 115.35,-348.43"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="program~~compute_area~~CallsGraph_node6" class="node">
-<title>proc~set1~2</title>
-<g id="a_program~~compute_area~~CallsGraph_node6"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<title>proc~set1~3</title>
+<g id="a_program~~compute_area~~CallsGraph_node6"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="823,-618 703,-618 703,-594 823,-594 823,-618"/>
 <text text-anchor="middle" x="763" y="-603.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="program~~compute_area~~CallsGraph_edge3" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M585,-555C607.3,-564.09 639.26,-576.42 668,-585 676,-587.39 684.46,-589.64 692.9,-591.73"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="692.21,-595.16 702.75,-594.09 693.85,-588.36 692.21,-595.16"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="program~~compute_area~~CallsGraph_node7" class="node">
-<title>proc~set2~2</title>
-<g id="a_program~~compute_area~~CallsGraph_node7"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<title>proc~set2~3</title>
+<g id="a_program~~compute_area~~CallsGraph_node7"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="823,-576 703,-576 703,-552 823,-552 823,-576"/>
 <text text-anchor="middle" x="763" y="-561.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="program~~compute_area~~CallsGraph_edge4" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M612.11,-548.68C636.88,-551.21 666.31,-554.22 692.5,-556.9"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="692.44,-560.41 702.75,-557.94 693.15,-553.45 692.44,-560.41"/>
 </g>
-<!-- proc~set3~2 -->
+<!-- proc~set3~3 -->
 <g id="program~~compute_area~~CallsGraph_node8" class="node">
-<title>proc~set3~2</title>
-<g id="a_program~~compute_area~~CallsGraph_node8"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<title>proc~set3~3</title>
+<g id="a_program~~compute_area~~CallsGraph_node8"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="823,-660 703,-660 703,-636 823,-636 823,-660"/>
 <text text-anchor="middle" x="763" y="-645.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="program~~compute_area~~CallsGraph_edge5" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
+<title>none~set~3&#45;&gt;proc~set3~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M568.71,-555.06C588.06,-573.47 627.74,-608.4 668,-627 675.83,-630.62 684.32,-633.63 692.89,-636.13"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="692,-639.52 702.57,-638.75 693.83,-632.76 692,-639.52"/>
 </g>
-<!-- proc~set4~2 -->
+<!-- proc~set4~3 -->
 <g id="program~~compute_area~~CallsGraph_node9" class="node">
-<title>proc~set4~2</title>
-<g id="a_program~~compute_area~~CallsGraph_node9"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<title>proc~set4~3</title>
+<g id="a_program~~compute_area~~CallsGraph_node9"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="823,-534 703,-534 703,-510 823,-510 823,-534"/>
 <text text-anchor="middle" x="763" y="-519.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set4~2 -->
+<!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="program~~compute_area~~CallsGraph_edge6" class="edge">
-<title>none~set~2&#45;&gt;proc~set4~2</title>
+<title>none~set~3&#45;&gt;proc~set4~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M612.11,-537.32C636.88,-534.79 666.31,-531.78 692.5,-529.1"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="693.15,-532.55 702.75,-528.06 692.44,-525.59 693.15,-532.55"/>
 </g>
-<!-- proc~ansatz~2 -->
+<!-- proc~ansatz~3 -->
 <g id="program~~compute_area~~CallsGraph_node4" class="node">
-<title>proc~ansatz~2</title>
-<g id="a_program~~compute_area~~CallsGraph_node4"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_surface%ansatz">
+<title>proc~ansatz~3</title>
+<g id="a_program~~compute_area~~CallsGraph_node4"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_surface%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="443,-244 311,-244 311,-220 443,-220 443,-244"/>
 <text text-anchor="middle" x="377" y="-229.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~ansatz~2 -->
+<!-- proc~cmp_area&#45;&gt;proc~ansatz~3 -->
 <g id="program~~compute_area~~CallsGraph_edge7" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~ansatz~2</title>
+<title>proc~cmp_area&#45;&gt;proc~ansatz~3</title>
 <path fill="none" stroke="#00ffff" d="M221.76,-321.9C252.68,-303.88 310.97,-269.91 346.36,-249.28"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="348.39,-252.15 355.27,-244.09 344.86,-246.1 348.39,-252.15"/>
 </g>
-<!-- proc~cmp_elem~2 -->
+<!-- proc~cmp_elem~3 -->
 <g id="program~~compute_area~~CallsGraph_node5" class="node">
-<title>proc~cmp_elem~2</title>
-<g id="a_program~~compute_area~~CallsGraph_node5"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_surface%cmp_elem">
+<title>proc~cmp_elem~3</title>
+<g id="a_program~~compute_area~~CallsGraph_node5"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_surface%cmp_elem">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="632,-346 479,-346 479,-322 632,-322 632,-346"/>
 <text text-anchor="middle" x="555.5" y="-331.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~2 -->
+<!-- proc~cmp_area&#45;&gt;proc~cmp_elem~3 -->
 <g id="program~~compute_area~~CallsGraph_edge8" class="edge">
-<title>proc~cmp_area&#45;&gt;proc~cmp_elem~2</title>
+<title>proc~cmp_area&#45;&gt;proc~cmp_elem~3</title>
 <path fill="none" stroke="#00ffff" d="M275.11,-334C331.66,-334 409.67,-334 468.89,-334"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="468.97,-337.5 478.97,-334 468.97,-330.5 468.97,-337.5"/>
 </g>
-<!-- proc~ansatz~2&#45;&gt;none~set~2 -->
+<!-- proc~ansatz~3&#45;&gt;none~set~3 -->
 <g id="program~~compute_area~~CallsGraph_edge13" class="edge">
-<title>proc~ansatz~2&#45;&gt;none~set~2</title>
+<title>proc~ansatz~3&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff0000" d="M384.92,-244.19C411.66,-291.32 508.49,-461.92 542.55,-521.94"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="539.65,-523.92 547.63,-530.89 545.74,-520.47 539.65,-523.92"/>
 </g>
-<!-- proc~ansatz~2&#45;&gt;proc~cmp_elem~2 -->
+<!-- proc~ansatz~3&#45;&gt;proc~cmp_elem~3 -->
 <g id="program~~compute_area~~CallsGraph_edge14" class="edge">
-<title>proc~ansatz~2&#45;&gt;proc~cmp_elem~2</title>
+<title>proc~ansatz~3&#45;&gt;proc~cmp_elem~3</title>
 <path fill="none" stroke="#ff0000" d="M391.49,-244.08C410.08,-260.22 445.1,-288.87 479,-307 486.94,-311.25 495.68,-315.07 504.32,-318.41"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="503.39,-321.8 513.98,-321.98 505.81,-315.23 503.39,-321.8"/>
 </g>
@@ -523,9 +523,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;interface~gauss_leg -->
+<!-- proc~ansatz~3&#45;&gt;interface~gauss_leg -->
 <g id="program~~compute_area~~CallsGraph_edge9" class="edge">
-<title>proc~ansatz~2&#45;&gt;interface~gauss_leg</title>
+<title>proc~ansatz~3&#45;&gt;interface~gauss_leg</title>
 <path fill="none" stroke="#ff0000" d="M443.22,-232C466.41,-232 491.87,-232 512.59,-232"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="512.64,-235.5 522.64,-232 512.64,-228.5 512.64,-235.5"/>
 </g>
@@ -538,9 +538,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;interface~ndgrid -->
+<!-- proc~ansatz~3&#45;&gt;interface~ndgrid -->
 <g id="program~~compute_area~~CallsGraph_edge10" class="edge">
-<title>proc~ansatz~2&#45;&gt;interface~ndgrid</title>
+<title>proc~ansatz~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M422.82,-219.95C479.46,-205.25 580.19,-180.9 668,-169 764.95,-155.87 880.46,-152.83 938.06,-152.16"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="938.16,-155.66 948.13,-152.06 938.09,-148.66 938.16,-155.66"/>
 </g>
@@ -553,24 +553,24 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;interface~unique -->
+<!-- proc~ansatz~3&#45;&gt;interface~unique -->
 <g id="program~~compute_area~~CallsGraph_edge11" class="edge">
-<title>proc~ansatz~2&#45;&gt;interface~unique</title>
+<title>proc~ansatz~3&#45;&gt;interface~unique</title>
 <path fill="none" stroke="#ff0000" d="M415.87,-244.03C490.14,-267.63 653.98,-319.68 726.39,-342.69"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="725.39,-346.04 735.99,-345.73 727.51,-339.37 725.39,-346.04"/>
 </g>
-<!-- none~derivative~2 -->
+<!-- none~derivative~3 -->
 <g id="program~~compute_area~~CallsGraph_node14" class="node">
-<title>none~derivative~2</title>
-<g id="a_program~~compute_area~~CallsGraph_node14"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~2" xlink:title="nurbs_surface%derivative">
+<title>none~derivative~3</title>
+<g id="a_program~~compute_area~~CallsGraph_node14"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative~3" xlink:title="nurbs_surface%derivative">
 <polygon fill="#a7506f" stroke="#a7506f" points="631,-122 480,-122 480,-98 631,-98 631,-122"/>
 <text text-anchor="middle" x="555.5" y="-107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;none~derivative~2 -->
+<!-- proc~ansatz~3&#45;&gt;none~derivative~3 -->
 <g id="program~~compute_area~~CallsGraph_edge12" class="edge">
-<title>proc~ansatz~2&#45;&gt;none~derivative~2</title>
+<title>proc~ansatz~3&#45;&gt;none~derivative~3</title>
 <path fill="none" stroke="#ff0000" d="M387.63,-219.96C404.26,-199.88 440.33,-159.48 479,-136 485.35,-132.14 492.36,-128.76 499.46,-125.82"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="501.08,-128.95 509.16,-122.09 498.57,-122.41 501.08,-128.95"/>
 </g>
@@ -583,9 +583,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;proc~det -->
+<!-- proc~ansatz~3&#45;&gt;proc~det -->
 <g id="program~~compute_area~~CallsGraph_edge15" class="edge">
-<title>proc~ansatz~2&#45;&gt;proc~det</title>
+<title>proc~ansatz~3&#45;&gt;proc~det</title>
 <path fill="none" stroke="#ff0000" d="M383,-219.81C395.06,-191.96 428.55,-123.45 479,-89 479.65,-88.56 649.71,-46.65 725.86,-27.9"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="727.08,-31.2 735.95,-25.41 725.41,-24.4 727.08,-31.2"/>
 </g>
@@ -598,9 +598,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~2&#45;&gt;proc~inv -->
+<!-- proc~ansatz~3&#45;&gt;proc~inv -->
 <g id="program~~compute_area~~CallsGraph_edge16" class="edge">
-<title>proc~ansatz~2&#45;&gt;proc~inv</title>
+<title>proc~ansatz~3&#45;&gt;proc~inv</title>
 <path fill="none" stroke="#ff0000" d="M382.37,-219.93C393.95,-189.28 428.1,-107.24 479,-56 490.47,-44.46 505.58,-34.86 519.27,-27.61"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="521.11,-30.6 528.45,-22.97 517.95,-24.35 521.11,-30.6"/>
 </g>
@@ -613,66 +613,66 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem~2&#45;&gt;interface~elemconn_cn -->
+<!-- proc~cmp_elem~3&#45;&gt;interface~elemconn_cn -->
 <g id="program~~compute_area~~CallsGraph_edge17" class="edge">
-<title>proc~cmp_elem~2&#45;&gt;interface~elemconn_cn</title>
+<title>proc~cmp_elem~3&#45;&gt;interface~elemconn_cn</title>
 <path fill="none" stroke="#ffff00" d="M576.58,-346.21C613.27,-368.53 691.27,-415.97 733.46,-441.64"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="731.78,-444.71 742.14,-446.92 735.42,-438.73 731.78,-444.71"/>
 </g>
-<!-- proc~cmp_elem~2&#45;&gt;interface~unique -->
+<!-- proc~cmp_elem~3&#45;&gt;interface~unique -->
 <g id="program~~compute_area~~CallsGraph_edge18" class="edge">
-<title>proc~cmp_elem~2&#45;&gt;interface~unique</title>
+<title>proc~cmp_elem~3&#45;&gt;interface~unique</title>
 <path fill="none" stroke="#ffff00" d="M632.15,-341.36C664.13,-344.48 699.89,-347.96 725.77,-350.47"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="725.58,-353.97 735.87,-351.46 726.26,-347 725.58,-353.97"/>
 </g>
-<!-- proc~get_multiplicity~2 -->
+<!-- proc~get_multiplicity~3 -->
 <g id="program~~compute_area~~CallsGraph_node19" class="node">
-<title>proc~get_multiplicity~2</title>
-<g id="a_program~~compute_area~~CallsGraph_node19"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<title>proc~get_multiplicity~3</title>
+<g id="a_program~~compute_area~~CallsGraph_node19"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1271,-658 1093,-658 1093,-634 1271,-634 1271,-658"/>
 <text text-anchor="middle" x="1182" y="-643.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="program~~compute_area~~CallsGraph_edge19" class="edge">
-<title>proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#ffff00" d="M632.11,-322.29C756.22,-304.91 995.54,-279.7 1057,-333 1142.47,-407.13 1033.55,-488.74 1093,-585 1104.81,-604.12 1125.1,-618.79 1143.22,-628.95"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="1141.97,-632.25 1152.44,-633.84 1145.25,-626.06 1141.97,-632.25"/>
 </g>
-<!-- proc~cmp_degree~2 -->
+<!-- proc~cmp_degree~3 -->
 <g id="program~~compute_area~~CallsGraph_node15" class="node">
-<title>proc~cmp_degree~2</title>
-<g id="a_program~~compute_area~~CallsGraph_node15"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<title>proc~cmp_degree~3</title>
+<g id="a_program~~compute_area~~CallsGraph_node15"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="1057,-660 894,-660 894,-636 1057,-636 1057,-660"/>
 <text text-anchor="middle" x="975.5" y="-645.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~compute_area~~CallsGraph_edge20" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#00ff00" d="M823.2,-617.81C848.43,-622.85 878.06,-628.76 904.38,-634.01"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="903.8,-637.46 914.29,-635.99 905.17,-630.6 903.8,-637.46"/>
 </g>
-<!-- proc~cmp_nc~2 -->
+<!-- proc~cmp_nc~3 -->
 <g id="program~~compute_area~~CallsGraph_node16" class="node">
-<title>proc~cmp_nc~2</title>
-<g id="a_program~~compute_area~~CallsGraph_node16"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<title>proc~cmp_nc~3</title>
+<g id="a_program~~compute_area~~CallsGraph_node16"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="1045,-618 906,-618 906,-594 1045,-594 1045,-618"/>
 <text text-anchor="middle" x="975.5" y="-603.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~compute_area~~CallsGraph_edge21" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#00ff00" d="M823.2,-606C845.65,-606 871.58,-606 895.57,-606"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="895.71,-609.5 905.71,-606 895.71,-602.5 895.71,-609.5"/>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~compute_area~~CallsGraph_edge22" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#00ffff" d="M823.2,-575.81C848.43,-580.85 878.06,-586.76 904.38,-592.01"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="903.8,-595.46 914.29,-593.99 905.17,-588.6 903.8,-595.46"/>
 </g>
@@ -685,15 +685,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~compute_area~~CallsGraph_edge23" class="edge">
-<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#00ffff" d="M823.2,-564C847.57,-564 876.04,-564 901.67,-564"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="901.71,-567.5 911.71,-564 901.71,-560.5 901.71,-567.5"/>
 </g>
-<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~compute_area~~CallsGraph_edge24" class="edge">
-<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#0000ff" d="M823.2,-648C841.92,-648 863.07,-648 883.49,-648"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="883.76,-651.5 893.76,-648 883.76,-644.5 883.76,-651.5"/>
 </g>
@@ -847,39 +847,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#5cff00" stroke-dasharray="5,2" d="M790.23,-354C824.55,-354 885.26,-354 927.58,-354"/>
 <polygon fill="#5cff00" stroke="#5cff00" points="927.65,-357.5 937.65,-354 927.65,-350.5 927.65,-357.5"/>
 </g>
-<!-- proc~derivative_scalar~2 -->
+<!-- proc~derivative_scalar~3 -->
 <g id="program~~compute_area~~CallsGraph_node25" class="node">
-<title>proc~derivative_scalar~2</title>
-<g id="a_program~~compute_area~~CallsGraph_node25"><a xlink:href="../proc/derivative_scalar~2.html" xlink:title="nurbs_surface%derivative_scalar">
+<title>proc~derivative_scalar~3</title>
+<g id="a_program~~compute_area~~CallsGraph_node25"><a xlink:href="../proc/derivative_scalar~3.html" xlink:title="nurbs_surface%derivative_scalar">
 <polygon fill="#d9534f" stroke="#d9534f" points="857,-80 669,-80 669,-56 857,-56 857,-80"/>
 <text text-anchor="middle" x="763" y="-65.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_scalar</text>
 </a>
 </g>
 </g>
-<!-- none~derivative~2&#45;&gt;proc~derivative_scalar~2 -->
+<!-- none~derivative~3&#45;&gt;proc~derivative_scalar~3 -->
 <g id="program~~compute_area~~CallsGraph_edge35" class="edge">
-<title>none~derivative~2&#45;&gt;proc~derivative_scalar~2</title>
+<title>none~derivative~3&#45;&gt;proc~derivative_scalar~3</title>
 <path fill="none" stroke="#00ff2e" stroke-dasharray="5,2" d="M615.39,-97.96C639.68,-93 668,-87.21 693.23,-82.05"/>
 <polygon fill="#00ff2e" stroke="#00ff2e" points="694.01,-85.47 703.1,-80.04 692.61,-78.61 694.01,-85.47"/>
 </g>
-<!-- proc~derivative_vector~2 -->
+<!-- proc~derivative_vector~3 -->
 <g id="program~~compute_area~~CallsGraph_node26" class="node">
-<title>proc~derivative_vector~2</title>
-<g id="a_program~~compute_area~~CallsGraph_node26"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_surface%derivative_vector">
+<title>proc~derivative_vector~3</title>
+<g id="a_program~~compute_area~~CallsGraph_node26"><a xlink:href="../proc/derivative_vector~3.html" xlink:title="nurbs_surface%derivative_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="858,-122 668,-122 668,-98 858,-98 858,-122"/>
 <text text-anchor="middle" x="763" y="-107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative_vector</text>
 </a>
 </g>
 </g>
-<!-- none~derivative~2&#45;&gt;proc~derivative_vector~2 -->
+<!-- none~derivative~3&#45;&gt;proc~derivative_vector~3 -->
 <g id="program~~compute_area~~CallsGraph_edge36" class="edge">
-<title>none~derivative~2&#45;&gt;proc~derivative_vector~2</title>
+<title>none~derivative~3&#45;&gt;proc~derivative_vector~3</title>
 <path fill="none" stroke="#00ff2e" stroke-dasharray="5,2" d="M631.27,-110C639.94,-110 648.9,-110 657.88,-110"/>
 <polygon fill="#00ff2e" stroke="#00ff2e" points="658,-113.5 668,-110 658,-106.5 658,-113.5"/>
 </g>
-<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="program~~compute_area~~CallsGraph_edge37" class="edge">
-<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#00ffb9" d="M1057.03,-647.21C1065.47,-647.13 1074.11,-647.05 1082.71,-646.96"/>
 <polygon fill="#00ffb9" stroke="#00ffb9" points="1082.82,-650.46 1092.78,-646.86 1082.75,-643.46 1082.82,-650.46"/>
 </g>
@@ -892,9 +892,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~compute_area~~CallsGraph_edge38" class="edge">
-<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00b9ff" d="M1045.14,-609.51C1115.69,-613.11 1225.03,-618.7 1296.57,-622.35"/>
 <polygon fill="#00b9ff" stroke="#00b9ff" points="1296.68,-625.86 1306.85,-622.88 1297.04,-618.87 1296.68,-625.86"/>
 </g>
@@ -913,9 +913,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#002eff" d="M1039.25,-564C1073.23,-564 1114.1,-564 1143.2,-564"/>
 <polygon fill="#002eff" stroke="#002eff" points="1143.36,-567.5 1153.36,-564 1143.35,-560.5 1143.36,-567.5"/>
 </g>
-<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~compute_area~~CallsGraph_edge40" class="edge">
-<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#e700ff" d="M1271.17,-636.47C1279.77,-635.54 1288.42,-634.6 1296.82,-633.7"/>
 <polygon fill="#e700ff" stroke="#e700ff" points="1297.36,-637.16 1306.93,-632.6 1296.61,-630.2 1297.36,-637.16"/>
 </g>
@@ -961,51 +961,51 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1431.33,-618C1439.69,-616.91 1448.35,-615.78 1456.92,-614.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1457.44,-618.12 1466.9,-613.36 1456.53,-611.18 1457.44,-618.12"/>
 </g>
-<!-- interface~compute_dtgc~2 -->
+<!-- interface~compute_dtgc~3 -->
 <g id="program~~compute_area~~CallsGraph_node36" class="node">
-<title>interface~compute_dtgc~2</title>
-<g id="a_program~~compute_area~~CallsGraph_node36"><a xlink:href="../interface/compute_dtgc~2.html" xlink:title="compute_dTgc">
+<title>interface~compute_dtgc~3</title>
+<g id="a_program~~compute_area~~CallsGraph_node36"><a xlink:href="../interface/compute_dtgc~3.html" xlink:title="compute_dTgc">
 <polygon fill="#a7506f" stroke="#a7506f" points="1021,-122 930,-122 930,-98 1021,-98 1021,-122"/>
 <text text-anchor="middle" x="975.5" y="-107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_scalar~2&#45;&gt;interface~compute_dtgc~2 -->
+<!-- proc~derivative_scalar~3&#45;&gt;interface~compute_dtgc~3 -->
 <g id="program~~compute_area~~CallsGraph_edge45" class="edge">
-<title>proc~derivative_scalar~2&#45;&gt;interface~compute_dtgc~2</title>
+<title>proc~derivative_scalar~3&#45;&gt;interface~compute_dtgc~3</title>
 <path fill="none" stroke="#48ff00" d="M824.32,-80.04C854.42,-86.04 890.56,-93.25 919.85,-99.1"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="919.41,-102.58 929.9,-101.1 920.78,-95.71 919.41,-102.58"/>
 </g>
-<!-- proc~is_rational~2 -->
+<!-- proc~is_rational~3 -->
 <g id="program~~compute_area~~CallsGraph_node39" class="node">
-<title>proc~is_rational~2</title>
-<g id="a_program~~compute_area~~CallsGraph_node39"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<title>proc~is_rational~3</title>
+<g id="a_program~~compute_area~~CallsGraph_node39"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1051.5,-80 899.5,-80 899.5,-56 1051.5,-56 1051.5,-80"/>
 <text text-anchor="middle" x="975.5" y="-65.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_scalar~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~derivative_scalar~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~compute_area~~CallsGraph_edge46" class="edge">
-<title>proc~derivative_scalar~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~derivative_scalar~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#48ff00" d="M857.25,-68C867.91,-68 878.75,-68 889.3,-68"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="889.32,-71.5 899.32,-68 889.32,-64.5 889.32,-71.5"/>
 </g>
-<!-- proc~derivative_vector~2&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative_vector~3&#45;&gt;interface~ndgrid -->
 <g id="program~~compute_area~~CallsGraph_edge48" class="edge">
-<title>proc~derivative_vector~2&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative_vector~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#00ff24" d="M824.32,-122.04C861.21,-129.4 907.17,-138.57 938.47,-144.81"/>
 <polygon fill="#00ff24" stroke="#00ff24" points="937.99,-148.28 948.48,-146.81 939.36,-141.42 937.99,-148.28"/>
 </g>
-<!-- proc~derivative_vector~2&#45;&gt;interface~compute_dtgc~2 -->
+<!-- proc~derivative_vector~3&#45;&gt;interface~compute_dtgc~3 -->
 <g id="program~~compute_area~~CallsGraph_edge47" class="edge">
-<title>proc~derivative_vector~2&#45;&gt;interface~compute_dtgc~2</title>
+<title>proc~derivative_vector~3&#45;&gt;interface~compute_dtgc~3</title>
 <path fill="none" stroke="#00ff24" d="M858.17,-110C879.23,-110 900.88,-110 919.72,-110"/>
 <polygon fill="#00ff24" stroke="#00ff24" points="919.87,-113.5 929.87,-110 919.87,-106.5 919.87,-113.5"/>
 </g>
-<!-- proc~derivative_vector~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~derivative_vector~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~compute_area~~CallsGraph_edge49" class="edge">
-<title>proc~derivative_vector~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~derivative_vector~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#00ff24" d="M824.32,-97.96C849.2,-93 878.21,-87.21 904.06,-82.05"/>
 <polygon fill="#00ff24" stroke="#00ff24" points="905.05,-85.43 914.17,-80.04 903.68,-78.56 905.05,-85.43"/>
 </g>
@@ -1169,7 +1169,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~50"></span>
+              <span class="anchor" id="variable-xc~63"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1201,7 +1201,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~18"></span>
+              <span class="anchor" id="variable-shape~13"></span>
               type(<a href='../type/nurbs_surface.html'>nurbs_surface</a>)
             </td>
             <td>
@@ -1248,7 +1248,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/compute_length.html b/program/compute_length.html
index 93deb4872..a7a94bfc8 100644
--- a/program/compute_length.html
+++ b/program/compute_length.html
@@ -115,9 +115,9 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/compute_length.html#variable-xc~25">Xc</a>
-            <a class="list-group-item" href="../program/compute_length.html#variable-length~4">length</a>
-            <a class="list-group-item" href="../program/compute_length.html#variable-shape~11">shape</a>
+            <a class="list-group-item" href="../program/compute_length.html#variable-xc~65">Xc</a>
+            <a class="list-group-item" href="../program/compute_length.html#variable-length~5">length</a>
+            <a class="list-group-item" href="../program/compute_length.html#variable-shape~18">shape</a>
         </div>
       </div>
     </div>
@@ -382,18 +382,18 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="99,-263 0,-263 0,-239 99,-239 99,-263"/>
 <text text-anchor="middle" x="49.5" y="-248.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_length</text>
 </g>
-<!-- none~set~3 -->
+<!-- none~set -->
 <g id="program~~compute_length~~CallsGraph_node2" class="node">
-<title>none~set~3</title>
-<g id="a_program~~compute_length~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
+<title>none~set</title>
+<g id="a_program~~compute_length~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="602,-150 499,-150 499,-126 602,-126 602,-150"/>
 <text text-anchor="middle" x="550.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
-<!-- program~compute_length&#45;&gt;none~set~3 -->
+<!-- program~compute_length&#45;&gt;none~set -->
 <g id="program~~compute_length~~CallsGraph_edge1" class="edge">
-<title>program~compute_length&#45;&gt;none~set~3</title>
+<title>program~compute_length&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M99.25,-239.96C190.89,-219.21 388.59,-174.44 488.73,-151.76"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="489.71,-155.13 498.69,-149.51 488.16,-148.3 489.71,-155.13"/>
 </g>
@@ -412,120 +412,120 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M81.44,-263.1C106.31,-272.83 141.45,-286.58 168.55,-297.18"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="167.55,-300.55 178.14,-300.93 170.1,-294.03 167.55,-300.55"/>
 </g>
-<!-- proc~set1a -->
+<!-- proc~set1 -->
 <g id="program~~compute_length~~CallsGraph_node6" class="node">
-<title>proc~set1a</title>
-<g id="a_program~~compute_length~~CallsGraph_node6"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="806.5,-66 689.5,-66 689.5,-42 806.5,-42 806.5,-66"/>
-<text text-anchor="middle" x="748" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+<title>proc~set1</title>
+<g id="a_program~~compute_length~~CallsGraph_node6"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="803,-66 693,-66 693,-42 803,-42 803,-66"/>
+<text text-anchor="middle" x="748" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
+<!-- none~set&#45;&gt;proc~set1 -->
 <g id="program~~compute_length~~CallsGraph_edge3" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M568.37,-125.82C588.7,-111.68 624.32,-88.57 658,-75 664.78,-72.27 672.01,-69.84 679.29,-67.69"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="680.53,-70.98 689.23,-64.94 678.66,-64.24 680.53,-70.98"/>
+<title>none~set&#45;&gt;proc~set1</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M568.37,-125.82C588.7,-111.68 624.32,-88.57 658,-75 665.83,-71.84 674.25,-69.09 682.68,-66.72"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="683.77,-70.05 692.53,-64.09 681.97,-63.28 683.77,-70.05"/>
 </g>
-<!-- proc~set1~3 -->
+<!-- proc~set1a -->
 <g id="program~~compute_length~~CallsGraph_node7" class="node">
-<title>proc~set1~3</title>
-<g id="a_program~~compute_length~~CallsGraph_node7"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="803,-192 693,-192 693,-168 803,-168 803,-192"/>
-<text text-anchor="middle" x="748" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<title>proc~set1a</title>
+<g id="a_program~~compute_length~~CallsGraph_node7"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="806.5,-192 689.5,-192 689.5,-168 806.5,-168 806.5,-192"/>
+<text text-anchor="middle" x="748" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1~3 -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="program~~compute_length~~CallsGraph_edge4" class="edge">
-<title>none~set~3&#45;&gt;proc~set1~3</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M602.1,-148.87C626.78,-154.17 656.73,-160.61 682.98,-166.25"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="682.33,-169.69 692.84,-168.37 683.8,-162.84 682.33,-169.69"/>
+<title>none~set&#45;&gt;proc~set1a</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M602.1,-148.87C626.17,-154.04 655.26,-160.29 681.03,-165.83"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="680.59,-169.31 691.11,-167.99 682.06,-162.47 680.59,-169.31"/>
 </g>
-<!-- proc~set2~3 -->
+<!-- proc~set2 -->
 <g id="program~~compute_length~~CallsGraph_node8" class="node">
-<title>proc~set2~3</title>
-<g id="a_program~~compute_length~~CallsGraph_node8"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
+<title>proc~set2</title>
+<g id="a_program~~compute_length~~CallsGraph_node8"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="803,-24 693,-24 693,0 803,0 803,-24"/>
 <text text-anchor="middle" x="748" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set2~3 -->
+<!-- none~set&#45;&gt;proc~set2 -->
 <g id="program~~compute_length~~CallsGraph_edge5" class="edge">
-<title>none~set~3&#45;&gt;proc~set2~3</title>
+<title>none~set&#45;&gt;proc~set2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M560.22,-125.77C576.68,-103.63 614.6,-56.99 658,-33 665.67,-28.76 674.18,-25.37 682.79,-22.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="683.88,-25.99 692.54,-19.89 681.96,-19.26 683.88,-25.99"/>
 </g>
-<!-- proc~set3~3 -->
+<!-- proc~set3 -->
 <g id="program~~compute_length~~CallsGraph_node9" class="node">
-<title>proc~set3~3</title>
-<g id="a_program~~compute_length~~CallsGraph_node9"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
+<title>proc~set3</title>
+<g id="a_program~~compute_length~~CallsGraph_node9"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="803,-108 693,-108 693,-84 803,-84 803,-108"/>
 <text text-anchor="middle" x="748" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set3~3 -->
+<!-- none~set&#45;&gt;proc~set3 -->
 <g id="program~~compute_length~~CallsGraph_edge6" class="edge">
-<title>none~set~3&#45;&gt;proc~set3~3</title>
+<title>none~set&#45;&gt;proc~set3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M602.1,-127.13C626.78,-121.83 656.73,-115.39 682.98,-109.75"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="683.8,-113.16 692.84,-107.63 682.33,-106.31 683.8,-113.16"/>
 </g>
-<!-- proc~set4~3 -->
+<!-- proc~set4 -->
 <g id="program~~compute_length~~CallsGraph_node10" class="node">
-<title>proc~set4~3</title>
-<g id="a_program~~compute_length~~CallsGraph_node10"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
+<title>proc~set4</title>
+<g id="a_program~~compute_length~~CallsGraph_node10"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="803,-150 693,-150 693,-126 803,-126 803,-150"/>
 <text text-anchor="middle" x="748" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set4~3 -->
+<!-- none~set&#45;&gt;proc~set4 -->
 <g id="program~~compute_length~~CallsGraph_edge7" class="edge">
-<title>none~set~3&#45;&gt;proc~set4~3</title>
+<title>none~set&#45;&gt;proc~set4</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M602.1,-138C626.67,-138 656.47,-138 682.63,-138"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="682.84,-141.5 692.84,-138 682.84,-134.5 682.84,-141.5"/>
 </g>
-<!-- proc~ansatz~3 -->
+<!-- proc~ansatz -->
 <g id="program~~compute_length~~CallsGraph_node4" class="node">
-<title>proc~ansatz~3</title>
-<g id="a_program~~compute_length~~CallsGraph_node4"><a xlink:href="../proc/ansatz~3.html" xlink:title="nurbs_curve%ansatz">
+<title>proc~ansatz</title>
+<g id="a_program~~compute_length~~CallsGraph_node4"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_curve%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="443,-366 321,-366 321,-342 443,-342 443,-366"/>
 <text text-anchor="middle" x="382" y="-351.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~ansatz~3 -->
+<!-- proc~cmp_length&#45;&gt;proc~ansatz -->
 <g id="program~~compute_length~~CallsGraph_edge8" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~ansatz~3</title>
+<title>proc~cmp_length&#45;&gt;proc~ansatz</title>
 <path fill="none" stroke="#00ffff" d="M261.09,-325.08C279.94,-329.63 301.56,-334.84 321.21,-339.58"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="320.44,-342.99 330.98,-341.94 322.08,-336.19 320.44,-342.99"/>
 </g>
-<!-- proc~cmp_elem~3 -->
+<!-- proc~cmp_elem -->
 <g id="program~~compute_length~~CallsGraph_node5" class="node">
-<title>proc~cmp_elem~3</title>
-<g id="a_program~~compute_length~~CallsGraph_node5"><a xlink:href="../proc/cmp_elem~3.html" xlink:title="nurbs_curve%cmp_elem">
+<title>proc~cmp_elem</title>
+<g id="a_program~~compute_length~~CallsGraph_node5"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_curve%cmp_elem">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="622,-325 479,-325 479,-301 622,-301 622,-325"/>
 <text text-anchor="middle" x="550.5" y="-310.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_length&#45;&gt;proc~cmp_elem~3 -->
+<!-- proc~cmp_length&#45;&gt;proc~cmp_elem -->
 <g id="program~~compute_length~~CallsGraph_edge9" class="edge">
-<title>proc~cmp_length&#45;&gt;proc~cmp_elem~3</title>
+<title>proc~cmp_length&#45;&gt;proc~cmp_elem</title>
 <path fill="none" stroke="#00ffff" d="M285.29,-313C339.52,-313 412.98,-313 468.68,-313"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="468.86,-316.5 478.86,-313 468.86,-309.5 468.86,-316.5"/>
 </g>
-<!-- proc~ansatz~3&#45;&gt;none~set~3 -->
+<!-- proc~ansatz&#45;&gt;none~set -->
 <g id="program~~compute_length~~CallsGraph_edge14" class="edge">
-<title>proc~ansatz~3&#45;&gt;none~set~3</title>
+<title>proc~ansatz&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M392.43,-341.77C419.9,-306.13 500.09,-202.11 534.03,-158.07"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="536.84,-160.15 540.17,-150.1 531.3,-155.88 536.84,-160.15"/>
 </g>
-<!-- proc~ansatz~3&#45;&gt;proc~cmp_elem~3 -->
+<!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
 <g id="program~~compute_length~~CallsGraph_edge15" class="edge">
-<title>proc~ansatz~3&#45;&gt;proc~cmp_elem~3</title>
+<title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
 <path fill="none" stroke="#ff0000" d="M432.05,-341.92C450.43,-337.39 471.5,-332.21 490.68,-327.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="491.64,-330.85 500.51,-325.06 489.96,-324.06 491.64,-330.85"/>
 </g>
@@ -538,9 +538,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;interface~dyad -->
+<!-- proc~ansatz&#45;&gt;interface~dyad -->
 <g id="program~~compute_length~~CallsGraph_edge10" class="edge">
-<title>proc~ansatz~3&#45;&gt;interface~dyad</title>
+<title>proc~ansatz&#45;&gt;interface~dyad</title>
 <path fill="none" stroke="#ff0000" d="M432.05,-366.08C458.13,-372.5 489.61,-380.25 513.42,-386.11"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="512.89,-389.59 523.44,-388.58 514.57,-382.79 512.89,-389.59"/>
 </g>
@@ -553,9 +553,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;interface~gauss_leg -->
+<!-- proc~ansatz&#45;&gt;interface~gauss_leg -->
 <g id="program~~compute_length~~CallsGraph_edge11" class="edge">
-<title>proc~ansatz~3&#45;&gt;interface~gauss_leg</title>
+<title>proc~ansatz&#45;&gt;interface~gauss_leg</title>
 <path fill="none" stroke="#ff0000" d="M393.67,-366.11C421.68,-397.9 497.52,-483.99 532.01,-523.14"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="529.47,-525.56 538.7,-530.75 534.72,-520.93 529.47,-525.56"/>
 </g>
@@ -568,24 +568,24 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;interface~unique -->
+<!-- proc~ansatz&#45;&gt;interface~unique -->
 <g id="program~~compute_length~~CallsGraph_edge12" class="edge">
-<title>proc~ansatz~3&#45;&gt;interface~unique</title>
+<title>proc~ansatz&#45;&gt;interface~unique</title>
 <path fill="none" stroke="#ff0000" d="M443.11,-354C519.27,-354 648.14,-354 710.73,-354"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="710.9,-357.5 720.9,-354 710.9,-350.5 710.9,-357.5"/>
 </g>
-<!-- none~derivative~3 -->
+<!-- none~derivative -->
 <g id="program~~compute_length~~CallsGraph_node15" class="node">
-<title>none~derivative~3</title>
-<g id="a_program~~compute_length~~CallsGraph_node15"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative~3" xlink:title="nurbs_curve%derivative">
+<title>none~derivative</title>
+<g id="a_program~~compute_length~~CallsGraph_node15"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative" xlink:title="nurbs_curve%derivative">
 <polygon fill="#a7506f" stroke="#a7506f" points="621,-450 480,-450 480,-426 621,-426 621,-450"/>
 <text text-anchor="middle" x="550.5" y="-435.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz~3&#45;&gt;none~derivative~3 -->
+<!-- proc~ansatz&#45;&gt;none~derivative -->
 <g id="program~~compute_length~~CallsGraph_edge13" class="edge">
-<title>proc~ansatz~3&#45;&gt;none~derivative~3</title>
+<title>proc~ansatz&#45;&gt;none~derivative</title>
 <path fill="none" stroke="#ff0000" d="M398.86,-366.18C417.28,-379.85 448.99,-401.95 479,-416 484.01,-418.34 489.33,-420.52 494.72,-422.53"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="493.83,-425.93 504.43,-425.94 496.15,-419.32 493.83,-425.93"/>
 </g>
@@ -598,52 +598,52 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem~3&#45;&gt;interface~elemconn_cn -->
+<!-- proc~cmp_elem&#45;&gt;interface~elemconn_cn -->
 <g id="program~~compute_length~~CallsGraph_edge16" class="edge">
-<title>proc~cmp_elem~3&#45;&gt;interface~elemconn_cn</title>
+<title>proc~cmp_elem&#45;&gt;interface~elemconn_cn</title>
 <path fill="none" stroke="#ffda00" d="M622.08,-305.06C645.87,-302.38 672,-299.44 694.18,-296.94"/>
 <polygon fill="#ffda00" stroke="#ffda00" points="694.85,-300.39 704.4,-295.79 694.07,-293.43 694.85,-300.39"/>
 </g>
-<!-- proc~cmp_elem~3&#45;&gt;interface~unique -->
+<!-- proc~cmp_elem&#45;&gt;interface~unique -->
 <g id="program~~compute_length~~CallsGraph_edge17" class="edge">
-<title>proc~cmp_elem~3&#45;&gt;interface~unique</title>
+<title>proc~cmp_elem&#45;&gt;interface~unique</title>
 <path fill="none" stroke="#ffda00" d="M608.84,-325.02C641.85,-331.95 682.33,-340.44 710.91,-346.43"/>
 <polygon fill="#ffda00" stroke="#ffda00" points="710.37,-349.89 720.87,-348.52 711.8,-343.04 710.37,-349.89"/>
 </g>
-<!-- proc~get_multiplicity~3 -->
+<!-- proc~get_multiplicity -->
 <g id="program~~compute_length~~CallsGraph_node18" class="node">
-<title>proc~get_multiplicity~3</title>
-<g id="a_program~~compute_length~~CallsGraph_node18"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
+<title>proc~get_multiplicity</title>
+<g id="a_program~~compute_length~~CallsGraph_node18"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1233,-128 1064,-128 1064,-104 1233,-104 1233,-128"/>
 <text text-anchor="middle" x="1148.5" y="-113.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3 -->
+<!-- proc~cmp_elem&#45;&gt;proc~get_multiplicity -->
 <g id="program~~compute_length~~CallsGraph_edge18" class="edge">
-<title>proc~cmp_elem~3&#45;&gt;proc~get_multiplicity~3</title>
+<title>proc~cmp_elem&#45;&gt;proc~get_multiplicity</title>
 <path fill="none" stroke="#ffda00" d="M579.74,-300.89C601.07,-291.91 631.16,-279.62 658,-270 815.62,-213.48 1005.65,-156.94 1095.54,-130.88"/>
 <polygon fill="#ffda00" stroke="#ffda00" points="1096.59,-134.22 1105.22,-128.08 1094.64,-127.5 1096.59,-134.22"/>
 </g>
-<!-- proc~cmp_degree~3 -->
+<!-- proc~cmp_degree -->
 <g id="program~~compute_length~~CallsGraph_node16" class="node">
-<title>proc~cmp_degree~3</title>
-<g id="a_program~~compute_length~~CallsGraph_node16"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
+<title>proc~cmp_degree</title>
+<g id="a_program~~compute_length~~CallsGraph_node16"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="1028,-108 874,-108 874,-84 1028,-84 1028,-108"/>
 <text text-anchor="middle" x="951" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1&#45;&gt;proc~cmp_degree -->
 <g id="program~~compute_length~~CallsGraph_edge19" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#48ff00" d="M806.6,-66.04C830.25,-70.98 857.81,-76.74 882.41,-81.88"/>
-<polygon fill="#48ff00" stroke="#48ff00" points="881.89,-85.34 892.39,-83.96 883.32,-78.49 881.89,-85.34"/>
+<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#48ff00" d="M803.13,-65.31C827.46,-70.39 856.43,-76.45 882.18,-81.83"/>
+<polygon fill="#48ff00" stroke="#48ff00" points="881.75,-85.31 892.25,-83.93 883.18,-78.46 881.75,-85.31"/>
 </g>
-<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
 <g id="program~~compute_length~~CallsGraph_edge20" class="edge">
-<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#00ff91" d="M803.39,-169.73C815,-166.83 827.06,-163.27 838,-159 868.87,-146.95 901.62,-127.68 923.68,-113.62"/>
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#00ff91" d="M806.7,-168.89C817.27,-166.15 828.09,-162.87 838,-159 868.87,-146.95 901.62,-127.68 923.68,-113.62"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="925.66,-116.5 932.16,-108.13 921.86,-110.63 925.66,-116.5"/>
 </g>
 <!-- proc~compute_knot_vector -->
@@ -655,15 +655,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~compute_length~~CallsGraph_edge21" class="edge">
-<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#0091ff" d="M803.13,-12C825.82,-12 852.54,-12 876.94,-12"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="877.23,-15.5 887.23,-12 877.23,-8.5 877.23,-15.5"/>
 </g>
-<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set3&#45;&gt;proc~cmp_degree -->
 <g id="program~~compute_length~~CallsGraph_edge22" class="edge">
-<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
+<title>proc~set3&#45;&gt;proc~cmp_degree</title>
 <path fill="none" stroke="#4800ff" d="M803.13,-96C821.81,-96 843.24,-96 863.84,-96"/>
 <polygon fill="#4800ff" stroke="#4800ff" points="863.88,-99.5 873.88,-96 863.88,-92.5 863.88,-99.5"/>
 </g>
@@ -802,39 +802,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#00ff3f" stroke-dasharray="5,2" d="M775.28,-354C807.78,-354 863.67,-354 903.49,-354"/>
 <polygon fill="#00ff3f" stroke="#00ff3f" points="903.5,-357.5 913.5,-354 903.5,-350.5 903.5,-357.5"/>
 </g>
-<!-- proc~derivative_scalar~3 -->
+<!-- proc~derivative_scalar -->
 <g id="program~~compute_length~~CallsGraph_node23" class="node">
-<title>proc~derivative_scalar~3</title>
-<g id="a_program~~compute_length~~CallsGraph_node23"><a xlink:href="../proc/derivative_scalar~3.html" xlink:title="nurbs_curve%derivative_scalar">
+<title>proc~derivative_scalar</title>
+<g id="a_program~~compute_length~~CallsGraph_node23"><a xlink:href="../proc/derivative_scalar.html" xlink:title="nurbs_curve%derivative_scalar">
 <polygon fill="#d9534f" stroke="#d9534f" points="837,-492 659,-492 659,-468 837,-468 837,-492"/>
 <text text-anchor="middle" x="748" y="-477.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_scalar</text>
 </a>
 </g>
 </g>
-<!-- none~derivative~3&#45;&gt;proc~derivative_scalar~3 -->
+<!-- none~derivative&#45;&gt;proc~derivative_scalar -->
 <g id="program~~compute_length~~CallsGraph_edge32" class="edge">
-<title>none~derivative~3&#45;&gt;proc~derivative_scalar~3</title>
+<title>none~derivative&#45;&gt;proc~derivative_scalar</title>
 <path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M607.52,-450.04C630.43,-454.96 657.1,-460.69 680.94,-465.81"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="680.46,-469.28 690.97,-467.96 681.93,-462.44 680.46,-469.28"/>
 </g>
-<!-- proc~derivative_vector~3 -->
+<!-- proc~derivative_vector -->
 <g id="program~~compute_length~~CallsGraph_node24" class="node">
-<title>proc~derivative_vector~3</title>
-<g id="a_program~~compute_length~~CallsGraph_node24"><a xlink:href="../proc/derivative_vector~3.html" xlink:title="nurbs_curve%derivative_vector">
+<title>proc~derivative_vector</title>
+<g id="a_program~~compute_length~~CallsGraph_node24"><a xlink:href="../proc/derivative_vector.html" xlink:title="nurbs_curve%derivative_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="838,-450 658,-450 658,-426 838,-426 838,-450"/>
 <text text-anchor="middle" x="748" y="-435.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative_vector</text>
 </a>
 </g>
 </g>
-<!-- none~derivative~3&#45;&gt;proc~derivative_vector~3 -->
+<!-- none~derivative&#45;&gt;proc~derivative_vector -->
 <g id="program~~compute_length~~CallsGraph_edge33" class="edge">
-<title>none~derivative~3&#45;&gt;proc~derivative_vector~3</title>
+<title>none~derivative&#45;&gt;proc~derivative_vector</title>
 <path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M621.25,-438C629.86,-438 638.78,-438 647.72,-438"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="647.8,-441.5 657.8,-438 647.8,-434.5 647.8,-441.5"/>
 </g>
-<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
+<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="program~~compute_length~~CallsGraph_edge34" class="edge">
-<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
+<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
 <path fill="none" stroke="#003fff" d="M1028.15,-103.79C1036.54,-104.65 1045.17,-105.53 1053.75,-106.41"/>
 <polygon fill="#003fff" stroke="#003fff" points="1053.49,-109.9 1063.79,-107.44 1054.2,-102.94 1053.49,-109.9"/>
 </g>
@@ -862,9 +862,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~compute_length~~CallsGraph_edge36" class="edge">
-<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#ff00bf" d="M1233.15,-116C1241.73,-116 1250.4,-116 1258.84,-116"/>
 <polygon fill="#ff00bf" stroke="#ff00bf" points="1258.99,-119.5 1268.99,-116 1258.99,-112.5 1258.99,-119.5"/>
 </g>
@@ -898,45 +898,45 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1393.33,-108C1401.69,-106.91 1410.35,-105.78 1418.92,-104.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1419.44,-108.12 1428.9,-103.36 1418.53,-101.18 1419.44,-108.12"/>
 </g>
-<!-- interface~compute_dtgc~3 -->
+<!-- interface~compute_dtgc -->
 <g id="program~~compute_length~~CallsGraph_node33" class="node">
-<title>interface~compute_dtgc~3</title>
-<g id="a_program~~compute_length~~CallsGraph_node33"><a xlink:href="../interface/compute_dtgc~3.html" xlink:title="compute_dTgc">
+<title>interface~compute_dtgc</title>
+<g id="a_program~~compute_length~~CallsGraph_node33"><a xlink:href="../interface/compute_dtgc.html" xlink:title="compute_dTgc">
 <polygon fill="#a7506f" stroke="#a7506f" points="996.5,-450 905.5,-450 905.5,-426 996.5,-426 996.5,-450"/>
 <text text-anchor="middle" x="951" y="-435.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_scalar~3&#45;&gt;interface~compute_dtgc~3 -->
+<!-- proc~derivative_scalar&#45;&gt;interface~compute_dtgc -->
 <g id="program~~compute_length~~CallsGraph_edge39" class="edge">
-<title>proc~derivative_scalar~3&#45;&gt;interface~compute_dtgc~3</title>
+<title>proc~derivative_scalar&#45;&gt;interface~compute_dtgc</title>
 <path fill="none" stroke="#27ff00" d="M806.6,-467.96C834.6,-462.11 868.07,-455.12 895.63,-449.36"/>
 <polygon fill="#27ff00" stroke="#27ff00" points="896.42,-452.77 905.49,-447.3 894.99,-445.92 896.42,-452.77"/>
 </g>
-<!-- proc~is_rational~3 -->
+<!-- proc~is_rational -->
 <g id="program~~compute_length~~CallsGraph_node37" class="node">
-<title>proc~is_rational~3</title>
-<g id="a_program~~compute_length~~CallsGraph_node37"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
+<title>proc~is_rational</title>
+<g id="a_program~~compute_length~~CallsGraph_node37"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1022,-492 880,-492 880,-468 1022,-468 1022,-492"/>
 <text text-anchor="middle" x="951" y="-477.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_scalar~3&#45;&gt;proc~is_rational~3 -->
+<!-- proc~derivative_scalar&#45;&gt;proc~is_rational -->
 <g id="program~~compute_length~~CallsGraph_edge40" class="edge">
-<title>proc~derivative_scalar~3&#45;&gt;proc~is_rational~3</title>
+<title>proc~derivative_scalar&#45;&gt;proc~is_rational</title>
 <path fill="none" stroke="#27ff00" d="M837.16,-480C847.95,-480 858.94,-480 869.61,-480"/>
 <polygon fill="#27ff00" stroke="#27ff00" points="869.72,-483.5 879.72,-480 869.72,-476.5 869.72,-483.5"/>
 </g>
-<!-- proc~derivative_vector~3&#45;&gt;interface~compute_dtgc~3 -->
+<!-- proc~derivative_vector&#45;&gt;interface~compute_dtgc -->
 <g id="program~~compute_length~~CallsGraph_edge41" class="edge">
-<title>proc~derivative_vector~3&#45;&gt;interface~compute_dtgc~3</title>
+<title>proc~derivative_vector&#45;&gt;interface~compute_dtgc</title>
 <path fill="none" stroke="#00ff4e" d="M838.04,-438C857.53,-438 877.6,-438 895.27,-438"/>
 <polygon fill="#00ff4e" stroke="#00ff4e" points="895.37,-441.5 905.37,-438 895.37,-434.5 895.37,-441.5"/>
 </g>
-<!-- proc~derivative_vector~3&#45;&gt;proc~is_rational~3 -->
+<!-- proc~derivative_vector&#45;&gt;proc~is_rational -->
 <g id="program~~compute_length~~CallsGraph_edge42" class="edge">
-<title>proc~derivative_vector~3&#45;&gt;proc~is_rational~3</title>
+<title>proc~derivative_vector&#45;&gt;proc~is_rational</title>
 <path fill="none" stroke="#00ff4e" d="M806.6,-450.04C830.25,-454.98 857.81,-460.74 882.41,-465.88"/>
 <polygon fill="#00ff4e" stroke="#00ff4e" points="881.89,-469.34 892.39,-467.96 883.32,-462.49 881.89,-469.34"/>
 </g>
@@ -1139,7 +1139,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~25"></span>
+              <span class="anchor" id="variable-xc~65"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1155,7 +1155,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-length~4"></span>
+              <span class="anchor" id="variable-length~5"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1171,7 +1171,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~11"></span>
+              <span class="anchor" id="variable-shape~18"></span>
               type(<a href='../type/nurbs_curve.html'>nurbs_curve</a>)
             </td>
             <td>
@@ -1218,7 +1218,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/compute_volume.html b/program/compute_volume.html
index 41f475b4c..de3321af2 100644
--- a/program/compute_volume.html
+++ b/program/compute_volume.html
@@ -115,9 +115,9 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/compute_volume.html#variable-xc~2">Xc</a>
-            <a class="list-group-item" href="../program/compute_volume.html#variable-shape~2">shape</a>
-            <a class="list-group-item" href="../program/compute_volume.html#variable-volume">volume</a>
+            <a class="list-group-item" href="../program/compute_volume.html#variable-xc~41">Xc</a>
+            <a class="list-group-item" href="../program/compute_volume.html#variable-shape~8">shape</a>
+            <a class="list-group-item" href="../program/compute_volume.html#variable-volume~2">volume</a>
         </div>
       </div>
     </div>
@@ -382,18 +382,18 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="105,-366 0,-366 0,-342 105,-342 105,-366"/>
 <text text-anchor="middle" x="52.5" y="-351.6" font-family="Helvetica,sans-Serif" font-size="10.50">compute_volume</text>
 </g>
-<!-- none~set -->
+<!-- none~set~2 -->
 <g id="program~~compute_volume~~CallsGraph_node2" class="node">
-<title>none~set</title>
-<g id="a_program~~compute_volume~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
+<title>none~set~2</title>
+<g id="a_program~~compute_volume~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="644,-555 531,-555 531,-531 644,-531 644,-555"/>
 <text text-anchor="middle" x="587.5" y="-540.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
-<!-- program~compute_volume&#45;&gt;none~set -->
+<!-- program~compute_volume&#45;&gt;none~set~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge1" class="edge">
-<title>program~compute_volume&#45;&gt;none~set</title>
+<title>program~compute_volume&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M87.65,-366.11C180.91,-399.18 439.83,-490.99 543.13,-527.62"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="542.04,-530.95 552.63,-530.99 544.38,-524.35 542.04,-530.95"/>
 </g>
@@ -412,105 +412,105 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M105.28,-347.89C113.48,-346.92 122.18,-345.9 130.98,-344.86"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="131.41,-348.33 140.93,-343.68 130.59,-341.38 131.41,-348.33"/>
 </g>
-<!-- proc~set1 -->
+<!-- proc~set1~2 -->
 <g id="program~~compute_volume~~CallsGraph_node6" class="node">
-<title>proc~set1</title>
-<g id="a_program~~compute_volume~~CallsGraph_node6"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
+<title>proc~set1~2</title>
+<g id="a_program~~compute_volume~~CallsGraph_node6"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="855,-618 735,-618 735,-594 855,-594 855,-618"/>
 <text text-anchor="middle" x="795" y="-603.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set1 -->
+<!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge3" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
+<title>none~set~2&#45;&gt;proc~set1~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M617,-555C639.3,-564.09 671.26,-576.42 700,-585 708,-587.39 716.46,-589.64 724.9,-591.73"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="724.21,-595.16 734.75,-594.09 725.85,-588.36 724.21,-595.16"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set2~2 -->
 <g id="program~~compute_volume~~CallsGraph_node7" class="node">
-<title>proc~set2</title>
-<g id="a_program~~compute_volume~~CallsGraph_node7"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
+<title>proc~set2~2</title>
+<g id="a_program~~compute_volume~~CallsGraph_node7"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="855,-576 735,-576 735,-552 855,-552 855,-576"/>
 <text text-anchor="middle" x="795" y="-561.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set2 -->
+<!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge4" class="edge">
-<title>none~set&#45;&gt;proc~set2</title>
+<title>none~set~2&#45;&gt;proc~set2~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M644.11,-548.68C668.88,-551.21 698.31,-554.22 724.5,-556.9"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="724.44,-560.41 734.75,-557.94 725.15,-553.45 724.44,-560.41"/>
 </g>
-<!-- proc~set3 -->
+<!-- proc~set3~2 -->
 <g id="program~~compute_volume~~CallsGraph_node8" class="node">
-<title>proc~set3</title>
-<g id="a_program~~compute_volume~~CallsGraph_node8"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
+<title>proc~set3~2</title>
+<g id="a_program~~compute_volume~~CallsGraph_node8"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="855,-660 735,-660 735,-636 855,-636 855,-660"/>
 <text text-anchor="middle" x="795" y="-645.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set3 -->
+<!-- none~set~2&#45;&gt;proc~set3~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge5" class="edge">
-<title>none~set&#45;&gt;proc~set3</title>
+<title>none~set~2&#45;&gt;proc~set3~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M600.71,-555.06C620.06,-573.47 659.74,-608.4 700,-627 707.83,-630.62 716.32,-633.63 724.89,-636.13"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="724,-639.52 734.57,-638.75 725.83,-632.76 724,-639.52"/>
 </g>
-<!-- proc~set4 -->
+<!-- proc~set4~2 -->
 <g id="program~~compute_volume~~CallsGraph_node9" class="node">
-<title>proc~set4</title>
-<g id="a_program~~compute_volume~~CallsGraph_node9"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
+<title>proc~set4~2</title>
+<g id="a_program~~compute_volume~~CallsGraph_node9"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="855,-534 735,-534 735,-510 855,-510 855,-534"/>
 <text text-anchor="middle" x="795" y="-519.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set4 -->
+<!-- none~set~2&#45;&gt;proc~set4~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge6" class="edge">
-<title>none~set&#45;&gt;proc~set4</title>
+<title>none~set~2&#45;&gt;proc~set4~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M644.11,-537.32C668.88,-534.79 698.31,-531.78 724.5,-529.1"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="725.15,-532.55 734.75,-528.06 724.44,-525.59 725.15,-532.55"/>
 </g>
-<!-- proc~ansatz -->
+<!-- proc~ansatz~2 -->
 <g id="program~~compute_volume~~CallsGraph_node4" class="node">
-<title>proc~ansatz</title>
-<g id="a_program~~compute_volume~~CallsGraph_node4"><a xlink:href="../proc/ansatz.html" xlink:title="nurbs_volume%ansatz">
+<title>proc~ansatz~2</title>
+<g id="a_program~~compute_volume~~CallsGraph_node4"><a xlink:href="../proc/ansatz~2.html" xlink:title="nurbs_volume%ansatz">
 <polygon fill="#d9534f" stroke="#d9534f" points="475,-244 343,-244 343,-220 475,-220 475,-244"/>
 <text text-anchor="middle" x="409" y="-229.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%ansatz</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~ansatz -->
+<!-- proc~cmp_volume&#45;&gt;proc~ansatz~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge7" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~ansatz</title>
+<title>proc~cmp_volume&#45;&gt;proc~ansatz~2</title>
 <path fill="none" stroke="#00ffff" d="M246.71,-321.9C279.18,-303.8 340.51,-269.62 377.48,-249.01"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="379.29,-252.01 386.32,-244.09 375.88,-245.9 379.29,-252.01"/>
 </g>
-<!-- proc~cmp_elem -->
+<!-- proc~cmp_elem~2 -->
 <g id="program~~compute_volume~~CallsGraph_node5" class="node">
-<title>proc~cmp_elem</title>
-<g id="a_program~~compute_volume~~CallsGraph_node5"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_volume%cmp_elem">
+<title>proc~cmp_elem~2</title>
+<g id="a_program~~compute_volume~~CallsGraph_node5"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_volume%cmp_elem">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="664,-346 511,-346 511,-322 664,-322 664,-346"/>
 <text text-anchor="middle" x="587.5" y="-331.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem -->
+<!-- proc~cmp_volume&#45;&gt;proc~cmp_elem~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge8" class="edge">
-<title>proc~cmp_volume&#45;&gt;proc~cmp_elem</title>
+<title>proc~cmp_volume&#45;&gt;proc~cmp_elem~2</title>
 <path fill="none" stroke="#00ffff" d="M307.03,-334C364.81,-334 441.99,-334 500.61,-334"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="500.96,-337.5 510.96,-334 500.96,-330.5 500.96,-337.5"/>
 </g>
-<!-- proc~ansatz&#45;&gt;none~set -->
+<!-- proc~ansatz~2&#45;&gt;none~set~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge13" class="edge">
-<title>proc~ansatz&#45;&gt;none~set</title>
+<title>proc~ansatz~2&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M416.92,-244.19C443.66,-291.32 540.49,-461.92 574.55,-521.94"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="571.65,-523.92 579.63,-530.89 577.74,-520.47 571.65,-523.92"/>
 </g>
-<!-- proc~ansatz&#45;&gt;proc~cmp_elem -->
+<!-- proc~ansatz~2&#45;&gt;proc~cmp_elem~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge14" class="edge">
-<title>proc~ansatz&#45;&gt;proc~cmp_elem</title>
+<title>proc~ansatz~2&#45;&gt;proc~cmp_elem~2</title>
 <path fill="none" stroke="#ff0000" d="M423.49,-244.08C442.08,-260.22 477.1,-288.87 511,-307 518.94,-311.25 527.68,-315.07 536.32,-318.41"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="535.39,-321.8 545.98,-321.98 537.81,-315.23 535.39,-321.8"/>
 </g>
@@ -523,9 +523,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;interface~gauss_leg -->
+<!-- proc~ansatz~2&#45;&gt;interface~gauss_leg -->
 <g id="program~~compute_volume~~CallsGraph_edge9" class="edge">
-<title>proc~ansatz&#45;&gt;interface~gauss_leg</title>
+<title>proc~ansatz~2&#45;&gt;interface~gauss_leg</title>
 <path fill="none" stroke="#ff0000" d="M475.22,-232C498.41,-232 523.87,-232 544.59,-232"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="544.64,-235.5 554.64,-232 544.64,-228.5 544.64,-235.5"/>
 </g>
@@ -538,9 +538,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;interface~ndgrid -->
+<!-- proc~ansatz~2&#45;&gt;interface~ndgrid -->
 <g id="program~~compute_volume~~CallsGraph_edge10" class="edge">
-<title>proc~ansatz&#45;&gt;interface~ndgrid</title>
+<title>proc~ansatz~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M454.82,-219.95C511.46,-205.25 612.19,-180.9 700,-169 796.95,-155.87 912.46,-152.83 970.06,-152.16"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="970.16,-155.66 980.13,-152.06 970.09,-148.66 970.16,-155.66"/>
 </g>
@@ -553,24 +553,24 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;interface~unique -->
+<!-- proc~ansatz~2&#45;&gt;interface~unique -->
 <g id="program~~compute_volume~~CallsGraph_edge11" class="edge">
-<title>proc~ansatz&#45;&gt;interface~unique</title>
+<title>proc~ansatz~2&#45;&gt;interface~unique</title>
 <path fill="none" stroke="#ff0000" d="M447.87,-244.03C522.14,-267.63 685.98,-319.68 758.39,-342.69"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="757.39,-346.04 767.99,-345.73 759.51,-339.37 757.39,-346.04"/>
 </g>
-<!-- none~derivative -->
+<!-- none~derivative~2 -->
 <g id="program~~compute_volume~~CallsGraph_node14" class="node">
-<title>none~derivative</title>
-<g id="a_program~~compute_volume~~CallsGraph_node14"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative" xlink:title="nurbs_volume%derivative">
+<title>none~derivative~2</title>
+<g id="a_program~~compute_volume~~CallsGraph_node14"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative~2" xlink:title="nurbs_volume%derivative">
 <polygon fill="#a7506f" stroke="#a7506f" points="663,-122 512,-122 512,-98 663,-98 663,-122"/>
 <text text-anchor="middle" x="587.5" y="-107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative</text>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;none~derivative -->
+<!-- proc~ansatz~2&#45;&gt;none~derivative~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge12" class="edge">
-<title>proc~ansatz&#45;&gt;none~derivative</title>
+<title>proc~ansatz~2&#45;&gt;none~derivative~2</title>
 <path fill="none" stroke="#ff0000" d="M419.63,-219.96C436.26,-199.88 472.33,-159.48 511,-136 517.35,-132.14 524.36,-128.76 531.46,-125.82"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="533.08,-128.95 541.16,-122.09 530.57,-122.41 533.08,-128.95"/>
 </g>
@@ -583,9 +583,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;proc~det -->
+<!-- proc~ansatz~2&#45;&gt;proc~det -->
 <g id="program~~compute_volume~~CallsGraph_edge15" class="edge">
-<title>proc~ansatz&#45;&gt;proc~det</title>
+<title>proc~ansatz~2&#45;&gt;proc~det</title>
 <path fill="none" stroke="#ff0000" d="M415,-219.81C427.06,-191.96 460.55,-123.45 511,-89 511.65,-88.56 681.71,-46.65 757.86,-27.9"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="759.08,-31.2 767.95,-25.41 757.41,-24.4 759.08,-31.2"/>
 </g>
@@ -598,9 +598,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~ansatz&#45;&gt;proc~inv -->
+<!-- proc~ansatz~2&#45;&gt;proc~inv -->
 <g id="program~~compute_volume~~CallsGraph_edge16" class="edge">
-<title>proc~ansatz&#45;&gt;proc~inv</title>
+<title>proc~ansatz~2&#45;&gt;proc~inv</title>
 <path fill="none" stroke="#ff0000" d="M414.37,-219.93C425.95,-189.28 460.1,-107.24 511,-56 522.47,-44.46 537.58,-34.86 551.27,-27.61"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="553.11,-30.6 560.45,-22.97 549.95,-24.35 553.11,-30.6"/>
 </g>
@@ -613,66 +613,66 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem&#45;&gt;interface~elemconn_cn -->
+<!-- proc~cmp_elem~2&#45;&gt;interface~elemconn_cn -->
 <g id="program~~compute_volume~~CallsGraph_edge17" class="edge">
-<title>proc~cmp_elem&#45;&gt;interface~elemconn_cn</title>
+<title>proc~cmp_elem~2&#45;&gt;interface~elemconn_cn</title>
 <path fill="none" stroke="#ffff00" d="M608.58,-346.21C645.27,-368.53 723.27,-415.97 765.46,-441.64"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="763.78,-444.71 774.14,-446.92 767.42,-438.73 763.78,-444.71"/>
 </g>
-<!-- proc~cmp_elem&#45;&gt;interface~unique -->
+<!-- proc~cmp_elem~2&#45;&gt;interface~unique -->
 <g id="program~~compute_volume~~CallsGraph_edge18" class="edge">
-<title>proc~cmp_elem&#45;&gt;interface~unique</title>
+<title>proc~cmp_elem~2&#45;&gt;interface~unique</title>
 <path fill="none" stroke="#ffff00" d="M664.15,-341.36C696.13,-344.48 731.89,-347.96 757.77,-350.47"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="757.58,-353.97 767.87,-351.46 758.26,-347 757.58,-353.97"/>
 </g>
-<!-- proc~get_multiplicity -->
+<!-- proc~get_multiplicity~2 -->
 <g id="program~~compute_volume~~CallsGraph_node19" class="node">
-<title>proc~get_multiplicity</title>
-<g id="a_program~~compute_volume~~CallsGraph_node19"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
+<title>proc~get_multiplicity~2</title>
+<g id="a_program~~compute_volume~~CallsGraph_node19"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1303,-658 1125,-658 1125,-634 1303,-634 1303,-658"/>
 <text text-anchor="middle" x="1214" y="-643.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem&#45;&gt;proc~get_multiplicity -->
+<!-- proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge19" class="edge">
-<title>proc~cmp_elem&#45;&gt;proc~get_multiplicity</title>
+<title>proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2</title>
 <path fill="none" stroke="#ffff00" d="M664.11,-322.29C788.22,-304.91 1027.54,-279.7 1089,-333 1174.47,-407.13 1065.55,-488.74 1125,-585 1136.81,-604.12 1157.1,-618.79 1175.22,-628.95"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="1173.97,-632.25 1184.44,-633.84 1177.25,-626.06 1173.97,-632.25"/>
 </g>
-<!-- proc~cmp_degree -->
+<!-- proc~cmp_degree~2 -->
 <g id="program~~compute_volume~~CallsGraph_node15" class="node">
-<title>proc~cmp_degree</title>
-<g id="a_program~~compute_volume~~CallsGraph_node15"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
+<title>proc~cmp_degree~2</title>
+<g id="a_program~~compute_volume~~CallsGraph_node15"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="1089,-660 926,-660 926,-636 1089,-636 1089,-660"/>
 <text text-anchor="middle" x="1007.5" y="-645.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_degree -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge20" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#00ff00" d="M855.2,-617.81C880.43,-622.85 910.06,-628.76 936.38,-634.01"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="935.8,-637.46 946.29,-635.99 937.17,-630.6 935.8,-637.46"/>
 </g>
-<!-- proc~cmp_nc -->
+<!-- proc~cmp_nc~2 -->
 <g id="program~~compute_volume~~CallsGraph_node16" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_program~~compute_volume~~CallsGraph_node16"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
+<title>proc~cmp_nc~2</title>
+<g id="a_program~~compute_volume~~CallsGraph_node16"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="1077,-618 938,-618 938,-594 1077,-594 1077,-618"/>
 <text text-anchor="middle" x="1007.5" y="-603.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge21" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#00ff00" d="M855.2,-606C877.65,-606 903.58,-606 927.57,-606"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="927.71,-609.5 937.71,-606 927.71,-602.5 927.71,-609.5"/>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge22" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
+<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#00ffff" d="M855.2,-575.81C880.43,-580.85 910.06,-586.76 936.38,-592.01"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="935.8,-595.46 946.29,-593.99 937.17,-588.6 935.8,-595.46"/>
 </g>
@@ -685,15 +685,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~compute_volume~~CallsGraph_edge23" class="edge">
-<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#00ffff" d="M855.2,-564C879.57,-564 908.04,-564 933.67,-564"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="933.71,-567.5 943.71,-564 933.71,-560.5 933.71,-567.5"/>
 </g>
-<!-- proc~set3&#45;&gt;proc~cmp_degree -->
+<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge24" class="edge">
-<title>proc~set3&#45;&gt;proc~cmp_degree</title>
+<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#0000ff" d="M855.2,-648C873.92,-648 895.07,-648 915.49,-648"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="915.76,-651.5 925.76,-648 915.76,-644.5 915.76,-651.5"/>
 </g>
@@ -847,39 +847,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#5cff00" stroke-dasharray="5,2" d="M822.23,-354C856.55,-354 917.26,-354 959.58,-354"/>
 <polygon fill="#5cff00" stroke="#5cff00" points="959.65,-357.5 969.65,-354 959.65,-350.5 959.65,-357.5"/>
 </g>
-<!-- proc~derivative_scalar -->
+<!-- proc~derivative_scalar~2 -->
 <g id="program~~compute_volume~~CallsGraph_node25" class="node">
-<title>proc~derivative_scalar</title>
-<g id="a_program~~compute_volume~~CallsGraph_node25"><a xlink:href="../proc/derivative_scalar.html" xlink:title="nurbs_volume%derivative_scalar">
+<title>proc~derivative_scalar~2</title>
+<g id="a_program~~compute_volume~~CallsGraph_node25"><a xlink:href="../proc/derivative_scalar~2.html" xlink:title="nurbs_volume%derivative_scalar">
 <polygon fill="#d9534f" stroke="#d9534f" points="889,-80 701,-80 701,-56 889,-56 889,-80"/>
 <text text-anchor="middle" x="795" y="-65.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_scalar</text>
 </a>
 </g>
 </g>
-<!-- none~derivative&#45;&gt;proc~derivative_scalar -->
+<!-- none~derivative~2&#45;&gt;proc~derivative_scalar~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge35" class="edge">
-<title>none~derivative&#45;&gt;proc~derivative_scalar</title>
+<title>none~derivative~2&#45;&gt;proc~derivative_scalar~2</title>
 <path fill="none" stroke="#00ff2e" stroke-dasharray="5,2" d="M647.39,-97.96C671.68,-93 700,-87.21 725.23,-82.05"/>
 <polygon fill="#00ff2e" stroke="#00ff2e" points="726.01,-85.47 735.1,-80.04 724.61,-78.61 726.01,-85.47"/>
 </g>
-<!-- proc~derivative_vector -->
+<!-- proc~derivative_vector~2 -->
 <g id="program~~compute_volume~~CallsGraph_node26" class="node">
-<title>proc~derivative_vector</title>
-<g id="a_program~~compute_volume~~CallsGraph_node26"><a xlink:href="../proc/derivative_vector.html" xlink:title="nurbs_volume%derivative_vector">
+<title>proc~derivative_vector~2</title>
+<g id="a_program~~compute_volume~~CallsGraph_node26"><a xlink:href="../proc/derivative_vector~2.html" xlink:title="nurbs_volume%derivative_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="890,-122 700,-122 700,-98 890,-98 890,-122"/>
 <text text-anchor="middle" x="795" y="-107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative_vector</text>
 </a>
 </g>
 </g>
-<!-- none~derivative&#45;&gt;proc~derivative_vector -->
+<!-- none~derivative~2&#45;&gt;proc~derivative_vector~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge36" class="edge">
-<title>none~derivative&#45;&gt;proc~derivative_vector</title>
+<title>none~derivative~2&#45;&gt;proc~derivative_vector~2</title>
 <path fill="none" stroke="#00ff2e" stroke-dasharray="5,2" d="M663.27,-110C671.94,-110 680.9,-110 689.88,-110"/>
 <polygon fill="#00ff2e" stroke="#00ff2e" points="690,-113.5 700,-110 690,-106.5 690,-113.5"/>
 </g>
-<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
+<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge37" class="edge">
-<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
+<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
 <path fill="none" stroke="#00ffb9" d="M1089.03,-647.21C1097.47,-647.13 1106.11,-647.05 1114.71,-646.96"/>
 <polygon fill="#00ffb9" stroke="#00ffb9" points="1114.82,-650.46 1124.78,-646.86 1114.75,-643.46 1114.82,-650.46"/>
 </g>
@@ -892,9 +892,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~compute_volume~~CallsGraph_edge38" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00b9ff" d="M1077.14,-609.51C1147.69,-613.11 1257.03,-618.7 1328.57,-622.35"/>
 <polygon fill="#00b9ff" stroke="#00b9ff" points="1328.68,-625.86 1338.85,-622.88 1329.04,-618.87 1328.68,-625.86"/>
 </g>
@@ -913,9 +913,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#002eff" d="M1071.25,-564C1105.23,-564 1146.1,-564 1175.2,-564"/>
 <polygon fill="#002eff" stroke="#002eff" points="1175.36,-567.5 1185.36,-564 1175.35,-560.5 1175.36,-567.5"/>
 </g>
-<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~compute_volume~~CallsGraph_edge40" class="edge">
-<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#e700ff" d="M1303.17,-636.47C1311.77,-635.54 1320.42,-634.6 1328.82,-633.7"/>
 <polygon fill="#e700ff" stroke="#e700ff" points="1329.36,-637.16 1338.93,-632.6 1328.61,-630.2 1329.36,-637.16"/>
 </g>
@@ -961,51 +961,51 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1463.33,-618C1471.69,-616.91 1480.35,-615.78 1488.92,-614.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1489.44,-618.12 1498.9,-613.36 1488.53,-611.18 1489.44,-618.12"/>
 </g>
-<!-- interface~compute_dtgc -->
+<!-- interface~compute_dtgc~2 -->
 <g id="program~~compute_volume~~CallsGraph_node36" class="node">
-<title>interface~compute_dtgc</title>
-<g id="a_program~~compute_volume~~CallsGraph_node36"><a xlink:href="../interface/compute_dtgc.html" xlink:title="compute_dTgc">
+<title>interface~compute_dtgc~2</title>
+<g id="a_program~~compute_volume~~CallsGraph_node36"><a xlink:href="../interface/compute_dtgc~2.html" xlink:title="compute_dTgc">
 <polygon fill="#a7506f" stroke="#a7506f" points="1053,-122 962,-122 962,-98 1053,-98 1053,-122"/>
 <text text-anchor="middle" x="1007.5" y="-107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_dTgc</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_scalar&#45;&gt;interface~compute_dtgc -->
+<!-- proc~derivative_scalar~2&#45;&gt;interface~compute_dtgc~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge45" class="edge">
-<title>proc~derivative_scalar&#45;&gt;interface~compute_dtgc</title>
+<title>proc~derivative_scalar~2&#45;&gt;interface~compute_dtgc~2</title>
 <path fill="none" stroke="#48ff00" d="M856.32,-80.04C886.42,-86.04 922.56,-93.25 951.85,-99.1"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="951.41,-102.58 961.9,-101.1 952.78,-95.71 951.41,-102.58"/>
 </g>
-<!-- proc~is_rational -->
+<!-- proc~is_rational~2 -->
 <g id="program~~compute_volume~~CallsGraph_node39" class="node">
-<title>proc~is_rational</title>
-<g id="a_program~~compute_volume~~CallsGraph_node39"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
+<title>proc~is_rational~2</title>
+<g id="a_program~~compute_volume~~CallsGraph_node39"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1083.5,-80 931.5,-80 931.5,-56 1083.5,-56 1083.5,-80"/>
 <text text-anchor="middle" x="1007.5" y="-65.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative_scalar&#45;&gt;proc~is_rational -->
+<!-- proc~derivative_scalar~2&#45;&gt;proc~is_rational~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge46" class="edge">
-<title>proc~derivative_scalar&#45;&gt;proc~is_rational</title>
+<title>proc~derivative_scalar~2&#45;&gt;proc~is_rational~2</title>
 <path fill="none" stroke="#48ff00" d="M889.25,-68C899.91,-68 910.75,-68 921.3,-68"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="921.32,-71.5 931.32,-68 921.32,-64.5 921.32,-71.5"/>
 </g>
-<!-- proc~derivative_vector&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative_vector~2&#45;&gt;interface~ndgrid -->
 <g id="program~~compute_volume~~CallsGraph_edge48" class="edge">
-<title>proc~derivative_vector&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative_vector~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#00ff24" d="M856.32,-122.04C893.21,-129.4 939.17,-138.57 970.47,-144.81"/>
 <polygon fill="#00ff24" stroke="#00ff24" points="969.99,-148.28 980.48,-146.81 971.36,-141.42 969.99,-148.28"/>
 </g>
-<!-- proc~derivative_vector&#45;&gt;interface~compute_dtgc -->
+<!-- proc~derivative_vector~2&#45;&gt;interface~compute_dtgc~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge47" class="edge">
-<title>proc~derivative_vector&#45;&gt;interface~compute_dtgc</title>
+<title>proc~derivative_vector~2&#45;&gt;interface~compute_dtgc~2</title>
 <path fill="none" stroke="#00ff24" d="M890.17,-110C911.23,-110 932.88,-110 951.72,-110"/>
 <polygon fill="#00ff24" stroke="#00ff24" points="951.87,-113.5 961.87,-110 951.87,-106.5 951.87,-113.5"/>
 </g>
-<!-- proc~derivative_vector&#45;&gt;proc~is_rational -->
+<!-- proc~derivative_vector~2&#45;&gt;proc~is_rational~2 -->
 <g id="program~~compute_volume~~CallsGraph_edge49" class="edge">
-<title>proc~derivative_vector&#45;&gt;proc~is_rational</title>
+<title>proc~derivative_vector~2&#45;&gt;proc~is_rational~2</title>
 <path fill="none" stroke="#00ff24" d="M856.32,-97.96C881.2,-93 910.21,-87.21 936.06,-82.05"/>
 <polygon fill="#00ff24" stroke="#00ff24" points="937.05,-85.43 946.17,-80.04 935.68,-78.56 937.05,-85.43"/>
 </g>
@@ -1169,7 +1169,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~2"></span>
+              <span class="anchor" id="variable-xc~41"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1185,7 +1185,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~2"></span>
+              <span class="anchor" id="variable-shape~8"></span>
               type(<a href='../type/nurbs_volume.html'>nurbs_volume</a>)
             </td>
             <td>
@@ -1201,7 +1201,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-volume"></span>
+              <span class="anchor" id="variable-volume~2"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1248,7 +1248,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/example1_curve.html b/program/example1_curve.html
index bb4455ee4..621fc334b 100644
--- a/program/example1_curve.html
+++ b/program/example1_curve.html
@@ -115,9 +115,9 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/example1_curve.html#variable-wc~47">Wc</a>
-            <a class="list-group-item" href="../program/example1_curve.html#variable-xc~47">Xc</a>
-            <a class="list-group-item" href="../program/example1_curve.html#variable-knot~6">knot</a>
+            <a class="list-group-item" href="../program/example1_curve.html#variable-wc~66">Wc</a>
+            <a class="list-group-item" href="../program/example1_curve.html#variable-xc~66">Xc</a>
+            <a class="list-group-item" href="../program/example1_curve.html#variable-knot~39">knot</a>
             <a class="list-group-item" href="../program/example1_curve.html#variable-nurbs~6">nurbs</a>
         </div>
       </div>
@@ -421,108 +421,108 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="100,-314 0,-314 0,-290 100,-290 100,-314"/>
 <text text-anchor="middle" x="50" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50">example1_curve</text>
 </g>
-<!-- none~get_knot~3 -->
+<!-- none~get_knot -->
 <g id="program~~example1_curve~~CallsGraph_node2" class="node">
-<title>none~get_knot~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_knot~3" xlink:title="nurbs_curve%get_knot">
+<title>none~get_knot</title>
+<g id="a_program~~example1_curve~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-get_knot" xlink:title="nurbs_curve%get_knot">
 <polygon fill="#a7506f" stroke="#a7506f" points="287.5,-650 154.5,-650 154.5,-626 287.5,-626 287.5,-650"/>
 <text text-anchor="middle" x="221" y="-635.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;none~get_knot~3 -->
+<!-- program~example1_curve&#45;&gt;none~get_knot -->
 <g id="program~~example1_curve~~CallsGraph_edge1" class="edge">
-<title>program~example1_curve&#45;&gt;none~get_knot~3</title>
+<title>program~example1_curve&#45;&gt;none~get_knot</title>
 <path fill="none" stroke="#ff0000" d="M50.74,-314.27C50.45,-359.35 55.47,-517.75 136,-606 141.82,-612.38 149.05,-617.5 156.81,-621.6"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="155.57,-624.88 166.11,-625.96 158.54,-618.54 155.57,-624.88"/>
 </g>
-<!-- none~set~3 -->
+<!-- none~set -->
 <g id="program~~example1_curve~~CallsGraph_node3" class="node">
-<title>none~set~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node3"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
+<title>none~set</title>
+<g id="a_program~~example1_curve~~CallsGraph_node3"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="484.5,-305 381.5,-305 381.5,-281 484.5,-281 484.5,-305"/>
 <text text-anchor="middle" x="433" y="-290.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;none~set~3 -->
+<!-- program~example1_curve&#45;&gt;none~set -->
 <g id="program~~example1_curve~~CallsGraph_edge2" class="edge">
-<title>program~example1_curve&#45;&gt;none~set~3</title>
+<title>program~example1_curve&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M91.27,-289.93C105.29,-286.3 121.21,-282.8 136,-281 216.96,-271.15 311.2,-278.11 371.2,-284.83"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="370.92,-288.32 381.26,-285.99 371.73,-281.37 370.92,-288.32"/>
 </g>
-<!-- proc~create~3 -->
+<!-- proc~create -->
 <g id="program~~example1_curve~~CallsGraph_node4" class="node">
-<title>proc~create~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node4"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_curve%create">
+<title>proc~create</title>
+<g id="a_program~~example1_curve~~CallsGraph_node4"><a xlink:href="../proc/create.html" xlink:title="nurbs_curve%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="281.5,-482 160.5,-482 160.5,-458 281.5,-458 281.5,-482"/>
 <text text-anchor="middle" x="221" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%create</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~create~3 -->
+<!-- program~example1_curve&#45;&gt;proc~create -->
 <g id="program~~example1_curve~~CallsGraph_edge3" class="edge">
-<title>program~example1_curve&#45;&gt;proc~create~3</title>
+<title>program~example1_curve&#45;&gt;proc~create</title>
 <path fill="none" stroke="#ff0000" d="M54.4,-314.08C63.01,-342.36 88.44,-413.16 136,-449 140.5,-452.39 145.49,-455.24 150.72,-457.63"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="149.76,-461.02 160.35,-461.47 152.35,-454.52 149.76,-461.02"/>
 </g>
-<!-- proc~elevate_degree~3 -->
+<!-- proc~elevate_degree -->
 <g id="program~~example1_curve~~CallsGraph_node5" class="node">
-<title>proc~elevate_degree~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node5"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_curve%elevate_degree">
+<title>proc~elevate_degree</title>
+<g id="a_program~~example1_curve~~CallsGraph_node5"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_curve%elevate_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="306,-440 136,-440 136,-416 306,-416 306,-440"/>
 <text text-anchor="middle" x="221" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%elevate_degree</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~elevate_degree~3 -->
+<!-- program~example1_curve&#45;&gt;proc~elevate_degree -->
 <g id="program~~example1_curve~~CallsGraph_edge4" class="edge">
-<title>program~example1_curve&#45;&gt;proc~elevate_degree~3</title>
+<title>program~example1_curve&#45;&gt;proc~elevate_degree</title>
 <path fill="none" stroke="#ff0000" d="M57.35,-314.21C69.5,-336.32 98.23,-382.92 136,-407 138.79,-408.78 141.72,-410.41 144.74,-411.9"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="143.5,-415.17 154.07,-415.96 146.3,-408.76 143.5,-415.17"/>
 </g>
-<!-- proc~export_xc~3 -->
+<!-- proc~export_xc -->
 <g id="program~~example1_curve~~CallsGraph_node6" class="node">
-<title>proc~export_xc~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node6"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_curve%export_Xc">
+<title>proc~export_xc</title>
+<g id="a_program~~example1_curve~~CallsGraph_node6"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_curve%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="291,-545 151,-545 151,-521 291,-521 291,-545"/>
 <text text-anchor="middle" x="221" y="-530.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~export_xc~3 -->
+<!-- program~example1_curve&#45;&gt;proc~export_xc -->
 <g id="program~~example1_curve~~CallsGraph_edge5" class="edge">
-<title>program~example1_curve&#45;&gt;proc~export_xc~3</title>
+<title>program~example1_curve&#45;&gt;proc~export_xc</title>
 <path fill="none" stroke="#ff0000" d="M53.48,-314.22C60.68,-346.86 84.43,-437.27 136,-491 146.46,-501.9 160.34,-510.41 173.81,-516.83"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="172.46,-520.06 183.02,-520.95 175.32,-513.67 172.46,-520.06"/>
 </g>
-<!-- proc~export_xg~3 -->
+<!-- proc~export_xg -->
 <g id="program~~example1_curve~~CallsGraph_node7" class="node">
-<title>proc~export_xg~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node7"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_curve%export_Xg">
+<title>proc~export_xg</title>
+<g id="a_program~~example1_curve~~CallsGraph_node7"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_curve%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="291.5,-597 150.5,-597 150.5,-573 291.5,-573 291.5,-597"/>
 <text text-anchor="middle" x="221" y="-582.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~export_xg~3 -->
+<!-- program~example1_curve&#45;&gt;proc~export_xg -->
 <g id="program~~example1_curve~~CallsGraph_edge6" class="edge">
-<title>program~example1_curve&#45;&gt;proc~export_xg~3</title>
+<title>program~example1_curve&#45;&gt;proc~export_xg</title>
 <path fill="none" stroke="#ff0000" d="M51.53,-314.12C53.94,-354.06 66.96,-482.99 136,-554 141.71,-559.88 148.64,-564.65 156.03,-568.52"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="155.05,-571.92 165.59,-572.96 158,-565.57 155.05,-571.92"/>
 </g>
-<!-- proc~finalize~3 -->
+<!-- proc~finalize -->
 <g id="program~~example1_curve~~CallsGraph_node8" class="node">
-<title>proc~finalize~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node8"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_curve%finalize">
+<title>proc~finalize</title>
+<g id="a_program~~example1_curve~~CallsGraph_node8"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_curve%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="284,-356 158,-356 158,-332 284,-332 284,-356"/>
 <text text-anchor="middle" x="221" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~finalize~3 -->
+<!-- program~example1_curve&#45;&gt;proc~finalize -->
 <g id="program~~example1_curve~~CallsGraph_edge7" class="edge">
-<title>program~example1_curve&#45;&gt;proc~finalize~3</title>
+<title>program~example1_curve&#45;&gt;proc~finalize</title>
 <path fill="none" stroke="#ff0000" d="M99.43,-314.04C118.88,-318.87 141.46,-324.48 161.79,-329.53"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="161.02,-332.95 171.56,-331.96 162.7,-326.15 161.02,-332.95"/>
 </g>
@@ -541,249 +541,249 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M100.34,-302C111.68,-302 124.05,-302 136.39,-302"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="136.73,-305.5 146.73,-302 136.73,-298.5 136.73,-305.5"/>
 </g>
-<!-- proc~insert_knots~3 -->
+<!-- proc~insert_knots -->
 <g id="program~~example1_curve~~CallsGraph_node10" class="node">
-<title>proc~insert_knots~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node10"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_curve%insert_knots">
+<title>proc~insert_knots</title>
+<g id="a_program~~example1_curve~~CallsGraph_node10"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_curve%insert_knots">
 <polygon fill="#d9534f" stroke="#d9534f" points="296.5,-234 145.5,-234 145.5,-210 296.5,-210 296.5,-234"/>
 <text text-anchor="middle" x="221" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%insert_knots</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~insert_knots~3 -->
+<!-- program~example1_curve&#45;&gt;proc~insert_knots -->
 <g id="program~~example1_curve~~CallsGraph_edge9" class="edge">
-<title>program~example1_curve&#45;&gt;proc~insert_knots~3</title>
+<title>program~example1_curve&#45;&gt;proc~insert_knots</title>
 <path fill="none" stroke="#ff0000" d="M67.18,-289.87C83.75,-277.9 110.61,-259.74 136,-248 144.74,-243.96 154.28,-240.33 163.68,-237.16"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="164.96,-240.42 173.4,-234.02 162.81,-233.76 164.96,-240.42"/>
 </g>
-<!-- proc~remove_knots~3 -->
+<!-- proc~remove_knots -->
 <g id="program~~example1_curve~~CallsGraph_node11" class="node">
-<title>proc~remove_knots~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node11"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_curve%remove_knots">
+<title>proc~remove_knots</title>
+<g id="a_program~~example1_curve~~CallsGraph_node11"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_curve%remove_knots">
 <polygon fill="#d9534f" stroke="#d9534f" points="302,-398 140,-398 140,-374 302,-374 302,-398"/>
 <text text-anchor="middle" x="221" y="-383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%remove_knots</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~remove_knots~3 -->
+<!-- program~example1_curve&#45;&gt;proc~remove_knots -->
 <g id="program~~example1_curve~~CallsGraph_edge10" class="edge">
-<title>program~example1_curve&#45;&gt;proc~remove_knots~3</title>
+<title>program~example1_curve&#45;&gt;proc~remove_knots</title>
 <path fill="none" stroke="#ff0000" d="M63.77,-314.04C79.55,-328.26 107.77,-351.66 136,-365 140.36,-367.06 144.94,-368.93 149.63,-370.63"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="148.75,-374.03 159.34,-373.89 150.97,-367.39 148.75,-374.03"/>
 </g>
-<!-- proc~rotate_xc~3 -->
+<!-- proc~rotate_xc -->
 <g id="program~~example1_curve~~CallsGraph_node12" class="node">
-<title>proc~rotate_xc~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node12"><a xlink:href="../proc/rotate_xc~3.html" xlink:title="nurbs_curve%rotate_Xc">
+<title>proc~rotate_xc</title>
+<g id="a_program~~example1_curve~~CallsGraph_node12"><a xlink:href="../proc/rotate_xc.html" xlink:title="nurbs_curve%rotate_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="290,-150 152,-150 152,-126 290,-126 290,-150"/>
 <text text-anchor="middle" x="221" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%rotate_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~rotate_xc~3 -->
+<!-- program~example1_curve&#45;&gt;proc~rotate_xc -->
 <g id="program~~example1_curve~~CallsGraph_edge11" class="edge">
-<title>program~example1_curve&#45;&gt;proc~rotate_xc~3</title>
+<title>program~example1_curve&#45;&gt;proc~rotate_xc</title>
 <path fill="none" stroke="#ff0000" d="M54.64,-289.83C63.59,-262.05 89.43,-193.66 136,-159 138.11,-157.43 140.32,-155.98 142.62,-154.63"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="144.49,-157.61 151.81,-149.96 141.31,-151.37 144.49,-157.61"/>
 </g>
-<!-- proc~rotate_xg~3 -->
+<!-- proc~rotate_xg -->
 <g id="program~~example1_curve~~CallsGraph_node13" class="node">
-<title>proc~rotate_xg~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node13"><a xlink:href="../proc/rotate_xg~3.html" xlink:title="nurbs_curve%rotate_Xg">
+<title>proc~rotate_xg</title>
+<g id="a_program~~example1_curve~~CallsGraph_node13"><a xlink:href="../proc/rotate_xg.html" xlink:title="nurbs_curve%rotate_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="290.5,-192 151.5,-192 151.5,-168 290.5,-168 290.5,-192"/>
 <text text-anchor="middle" x="221" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%rotate_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~rotate_xg~3 -->
+<!-- program~example1_curve&#45;&gt;proc~rotate_xg -->
 <g id="program~~example1_curve~~CallsGraph_edge12" class="edge">
-<title>program~example1_curve&#45;&gt;proc~rotate_xg~3</title>
+<title>program~example1_curve&#45;&gt;proc~rotate_xg</title>
 <path fill="none" stroke="#ff0000" d="M57.67,-289.92C70.13,-268.53 99.06,-224.06 136,-201 138.81,-199.25 141.75,-197.64 144.79,-196.17"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="146.33,-199.32 154.13,-192.15 143.57,-192.89 146.33,-199.32"/>
 </g>
-<!-- proc~show~3 -->
+<!-- proc~show -->
 <g id="program~~example1_curve~~CallsGraph_node14" class="node">
-<title>proc~show~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node14"><a xlink:href="../proc/show~3.html" xlink:title="nurbs_curve%show">
+<title>proc~show</title>
+<g id="a_program~~example1_curve~~CallsGraph_node14"><a xlink:href="../proc/show.html" xlink:title="nurbs_curve%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="278.5,-108 163.5,-108 163.5,-84 278.5,-84 278.5,-108"/>
 <text text-anchor="middle" x="221" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%show</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~show~3 -->
+<!-- program~example1_curve&#45;&gt;proc~show -->
 <g id="program~~example1_curve~~CallsGraph_edge13" class="edge">
-<title>program~example1_curve&#45;&gt;proc~show~3</title>
+<title>program~example1_curve&#45;&gt;proc~show</title>
 <path fill="none" stroke="#ff0000" d="M52.88,-289.88C58.67,-256.73 79.42,-163.94 136,-117 141.29,-112.61 147.36,-109.13 153.77,-106.35"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="155.21,-109.55 163.36,-102.78 152.77,-102.99 155.21,-109.55"/>
 </g>
-<!-- proc~translate_xc~3 -->
+<!-- proc~translate_xc -->
 <g id="program~~example1_curve~~CallsGraph_node15" class="node">
-<title>proc~translate_xc~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node15"><a xlink:href="../proc/translate_xc~3.html" xlink:title="nurbs_curve%translate_Xc">
+<title>proc~translate_xc</title>
+<g id="a_program~~example1_curve~~CallsGraph_node15"><a xlink:href="../proc/translate_xc.html" xlink:title="nurbs_curve%translate_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="298,-66 144,-66 144,-42 298,-42 298,-66"/>
 <text text-anchor="middle" x="221" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%translate_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~translate_xc~3 -->
+<!-- program~example1_curve&#45;&gt;proc~translate_xc -->
 <g id="program~~example1_curve~~CallsGraph_edge14" class="edge">
-<title>program~example1_curve&#45;&gt;proc~translate_xc~3</title>
+<title>program~example1_curve&#45;&gt;proc~translate_xc</title>
 <path fill="none" stroke="#ff0000" d="M51.73,-289.99C54.69,-252.2 69.13,-134.69 136,-75 137.35,-73.8 138.76,-72.66 140.22,-71.58"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="142.41,-74.34 149.06,-66.1 138.71,-68.4 142.41,-74.34"/>
 </g>
-<!-- proc~translate_xg~3 -->
+<!-- proc~translate_xg -->
 <g id="program~~example1_curve~~CallsGraph_node16" class="node">
-<title>proc~translate_xg~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node16"><a xlink:href="../proc/translate_xg~3.html" xlink:title="nurbs_curve%translate_Xg">
+<title>proc~translate_xg</title>
+<g id="a_program~~example1_curve~~CallsGraph_node16"><a xlink:href="../proc/translate_xg.html" xlink:title="nurbs_curve%translate_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="298,-24 144,-24 144,0 298,0 298,-24"/>
 <text text-anchor="middle" x="221" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%translate_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~example1_curve&#45;&gt;proc~translate_xg~3 -->
+<!-- program~example1_curve&#45;&gt;proc~translate_xg -->
 <g id="program~~example1_curve~~CallsGraph_edge15" class="edge">
-<title>program~example1_curve&#45;&gt;proc~translate_xg~3</title>
+<title>program~example1_curve&#45;&gt;proc~translate_xg</title>
 <path fill="none" stroke="#ff0000" d="M50.93,-289.95C51.37,-247.81 58.77,-105.65 136,-33 137.28,-31.8 138.62,-30.66 140.01,-29.58"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="141.98,-32.48 148.45,-24.09 138.16,-26.61 141.98,-32.48"/>
 </g>
-<!-- proc~get_knot_all~3 -->
+<!-- proc~get_knot_all -->
 <g id="program~~example1_curve~~CallsGraph_node23" class="node">
-<title>proc~get_knot_all~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node23"><a xlink:href="../proc/get_knot_all~3.html" xlink:title="nurbs_curve%get_knot_all">
+<title>proc~get_knot_all</title>
+<g id="a_program~~example1_curve~~CallsGraph_node23"><a xlink:href="../proc/get_knot_all.html" xlink:title="nurbs_curve%get_knot_all">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="508.5,-692 357.5,-692 357.5,-668 508.5,-668 508.5,-692"/>
 <text text-anchor="middle" x="433" y="-677.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knot_all</text>
 </a>
 </g>
 </g>
-<!-- none~get_knot~3&#45;&gt;proc~get_knot_all~3 -->
+<!-- none~get_knot&#45;&gt;proc~get_knot_all -->
 <g id="program~~example1_curve~~CallsGraph_edge16" class="edge">
-<title>none~get_knot~3&#45;&gt;proc~get_knot_all~3</title>
+<title>none~get_knot&#45;&gt;proc~get_knot_all</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M282.18,-650.04C307,-655 335.94,-660.79 361.73,-665.95"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="361.32,-669.43 371.81,-667.96 362.69,-662.57 361.32,-669.43"/>
 </g>
-<!-- proc~get_knoti~3 -->
+<!-- proc~get_knoti -->
 <g id="program~~example1_curve~~CallsGraph_node24" class="node">
-<title>proc~get_knoti~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node24"><a xlink:href="../proc/get_knoti~3.html" xlink:title="nurbs_curve%get_knoti">
+<title>proc~get_knoti</title>
+<g id="a_program~~example1_curve~~CallsGraph_node24"><a xlink:href="../proc/get_knoti.html" xlink:title="nurbs_curve%get_knoti">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="501,-650 365,-650 365,-626 501,-626 501,-650"/>
 <text text-anchor="middle" x="433" y="-635.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_knoti</text>
 </a>
 </g>
 </g>
-<!-- none~get_knot~3&#45;&gt;proc~get_knoti~3 -->
+<!-- none~get_knot&#45;&gt;proc~get_knoti -->
 <g id="program~~example1_curve~~CallsGraph_edge17" class="edge">
-<title>none~get_knot~3&#45;&gt;proc~get_knoti~3</title>
+<title>none~get_knot&#45;&gt;proc~get_knoti</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M287.58,-638C308.78,-638 332.48,-638 354.45,-638"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="354.74,-641.5 364.74,-638 354.74,-634.5 354.74,-641.5"/>
 </g>
-<!-- proc~set1a -->
+<!-- proc~set1 -->
 <g id="program~~example1_curve~~CallsGraph_node29" class="node">
-<title>proc~set1a</title>
-<g id="a_program~~example1_curve~~CallsGraph_node29"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="677,-263 560,-263 560,-239 677,-239 677,-263"/>
-<text text-anchor="middle" x="618.5" y="-248.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+<title>proc~set1</title>
+<g id="a_program~~example1_curve~~CallsGraph_node29"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="673.5,-263 563.5,-263 563.5,-239 673.5,-239 673.5,-263"/>
+<text text-anchor="middle" x="618.5" y="-248.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
+<!-- none~set&#45;&gt;proc~set1 -->
 <g id="program~~example1_curve~~CallsGraph_edge18" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
+<title>none~set&#45;&gt;proc~set1</title>
 <path fill="none" stroke="#ff6600" stroke-dasharray="5,2" d="M484.63,-281.41C506.34,-276.44 531.94,-270.58 554.83,-265.34"/>
 <polygon fill="#ff6600" stroke="#ff6600" points="555.83,-268.71 564.8,-263.06 554.27,-261.88 555.83,-268.71"/>
 </g>
-<!-- proc~set1~3 -->
+<!-- proc~set1a -->
 <g id="program~~example1_curve~~CallsGraph_node30" class="node">
-<title>proc~set1~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node30"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="673.5,-389 563.5,-389 563.5,-365 673.5,-365 673.5,-389"/>
-<text text-anchor="middle" x="618.5" y="-374.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<title>proc~set1a</title>
+<g id="a_program~~example1_curve~~CallsGraph_node30"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="677,-389 560,-389 560,-365 677,-365 677,-389"/>
+<text text-anchor="middle" x="618.5" y="-374.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1~3 -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="program~~example1_curve~~CallsGraph_edge19" class="edge">
-<title>none~set~3&#45;&gt;proc~set1~3</title>
+<title>none~set&#45;&gt;proc~set1a</title>
 <path fill="none" stroke="#ff6600" stroke-dasharray="5,2" d="M465.48,-305.02C483.06,-312.13 505.15,-321.74 524,-332 540.89,-341.19 542.85,-347.31 560,-356 563.53,-357.79 567.24,-359.5 571.01,-361.12"/>
 <polygon fill="#ff6600" stroke="#ff6600" points="569.86,-364.43 580.45,-364.94 572.5,-357.94 569.86,-364.43"/>
 </g>
-<!-- proc~set2~3 -->
+<!-- proc~set2 -->
 <g id="program~~example1_curve~~CallsGraph_node31" class="node">
-<title>proc~set2~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node31"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
+<title>proc~set2</title>
+<g id="a_program~~example1_curve~~CallsGraph_node31"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="673.5,-221 563.5,-221 563.5,-197 673.5,-197 673.5,-221"/>
 <text text-anchor="middle" x="618.5" y="-206.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set2~3 -->
+<!-- none~set&#45;&gt;proc~set2 -->
 <g id="program~~example1_curve~~CallsGraph_edge20" class="edge">
-<title>none~set~3&#45;&gt;proc~set2~3</title>
+<title>none~set&#45;&gt;proc~set2</title>
 <path fill="none" stroke="#ff6600" stroke-dasharray="5,2" d="M468.64,-280.95C485.75,-274.46 506.43,-265.77 524,-256 541.25,-246.4 542.57,-239.25 560,-230 563.29,-228.25 566.76,-226.59 570.3,-225.02"/>
 <polygon fill="#ff6600" stroke="#ff6600" points="571.84,-228.17 579.73,-221.1 569.16,-221.71 571.84,-228.17"/>
 </g>
-<!-- proc~set3~3 -->
+<!-- proc~set3 -->
 <g id="program~~example1_curve~~CallsGraph_node32" class="node">
-<title>proc~set3~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node32"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
+<title>proc~set3</title>
+<g id="a_program~~example1_curve~~CallsGraph_node32"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="673.5,-347 563.5,-347 563.5,-323 673.5,-323 673.5,-347"/>
 <text text-anchor="middle" x="618.5" y="-332.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set3~3 -->
+<!-- none~set&#45;&gt;proc~set3 -->
 <g id="program~~example1_curve~~CallsGraph_edge21" class="edge">
-<title>none~set~3&#45;&gt;proc~set3~3</title>
+<title>none~set&#45;&gt;proc~set3</title>
 <path fill="none" stroke="#ff6600" stroke-dasharray="5,2" d="M484.63,-304.59C506.34,-309.56 531.94,-315.42 554.83,-320.66"/>
 <polygon fill="#ff6600" stroke="#ff6600" points="554.27,-324.12 564.8,-322.94 555.83,-317.29 554.27,-324.12"/>
 </g>
-<!-- proc~set4~3 -->
+<!-- proc~set4 -->
 <g id="program~~example1_curve~~CallsGraph_node33" class="node">
-<title>proc~set4~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node33"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
+<title>proc~set4</title>
+<g id="a_program~~example1_curve~~CallsGraph_node33"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="673.5,-305 563.5,-305 563.5,-281 673.5,-281 673.5,-305"/>
 <text text-anchor="middle" x="618.5" y="-290.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set4~3 -->
+<!-- none~set&#45;&gt;proc~set4 -->
 <g id="program~~example1_curve~~CallsGraph_edge22" class="edge">
-<title>none~set~3&#45;&gt;proc~set4~3</title>
+<title>none~set&#45;&gt;proc~set4</title>
 <path fill="none" stroke="#ff6600" stroke-dasharray="5,2" d="M484.63,-293C505.79,-293 530.62,-293 553.06,-293"/>
 <polygon fill="#ff6600" stroke="#ff6600" points="553.18,-296.5 563.18,-293 553.18,-289.5 553.18,-296.5"/>
 </g>
-<!-- interface~compute_xg~3 -->
+<!-- interface~compute_xg -->
 <g id="program~~example1_curve~~CallsGraph_node18" class="node">
-<title>interface~compute_xg~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node18"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
+<title>interface~compute_xg</title>
+<g id="a_program~~example1_curve~~CallsGraph_node18"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="472.5,-524 393.5,-524 393.5,-500 472.5,-500 472.5,-524"/>
 <text text-anchor="middle" x="433" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
+<!-- proc~create&#45;&gt;interface~compute_xg -->
 <g id="program~~example1_curve~~CallsGraph_edge23" class="edge">
-<title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
+<title>proc~create&#45;&gt;interface~compute_xg</title>
 <path fill="none" stroke="#ffcc00" d="M281.62,-481.92C313.86,-488.37 353.18,-496.24 383.53,-502.31"/>
 <polygon fill="#ffcc00" stroke="#ffcc00" points="382.96,-505.76 393.45,-504.29 384.33,-498.9 382.96,-505.76"/>
 </g>
-<!-- proc~is_rational~3 -->
+<!-- proc~is_rational -->
 <g id="program~~example1_curve~~CallsGraph_node26" class="node">
-<title>proc~is_rational~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node26"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
+<title>proc~is_rational</title>
+<g id="a_program~~example1_curve~~CallsGraph_node26"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="504,-440 362,-440 362,-416 504,-416 504,-440"/>
 <text text-anchor="middle" x="433" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
+<!-- proc~create&#45;&gt;proc~is_rational -->
 <g id="program~~example1_curve~~CallsGraph_edge24" class="edge">
-<title>proc~create~3&#45;&gt;proc~is_rational~3</title>
+<title>proc~create&#45;&gt;proc~is_rational</title>
 <path fill="none" stroke="#ffcc00" d="M281.62,-458.08C306.67,-453.07 335.99,-447.2 362.06,-441.99"/>
 <polygon fill="#ffcc00" stroke="#ffcc00" points="362.75,-445.42 371.87,-440.03 361.38,-438.56 362.75,-445.42"/>
 </g>
-<!-- proc~elevate_degree~3&#45;&gt;none~set~3 -->
+<!-- proc~elevate_degree&#45;&gt;none~set -->
 <g id="program~~example1_curve~~CallsGraph_edge25" class="edge">
-<title>proc~elevate_degree~3&#45;&gt;none~set~3</title>
+<title>proc~elevate_degree&#45;&gt;none~set</title>
 <path fill="none" stroke="#cbff00" d="M287.4,-415.97C293.92,-413.51 300.25,-410.56 306,-407 326.91,-394.07 324.32,-382.09 342,-365 362.49,-345.19 388.04,-325.13 406.68,-311.24"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="409,-313.88 414.97,-305.13 404.84,-308.25 409,-313.88"/>
 </g>
@@ -796,51 +796,51 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~elevate_degree~3&#45;&gt;proc~elevate_degree_a_5_9 -->
+<!-- proc~elevate_degree&#45;&gt;proc~elevate_degree_a_5_9 -->
 <g id="program~~example1_curve~~CallsGraph_edge26" class="edge">
-<title>proc~elevate_degree~3&#45;&gt;proc~elevate_degree_a_5_9</title>
+<title>proc~elevate_degree&#45;&gt;proc~elevate_degree_a_5_9</title>
 <path fill="none" stroke="#cbff00" d="M282.18,-440.04C307,-445 335.94,-450.79 361.73,-455.95"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="361.32,-459.43 371.81,-457.96 362.69,-452.57 361.32,-459.43"/>
 </g>
-<!-- proc~elevate_degree~3&#45;&gt;proc~is_rational~3 -->
+<!-- proc~elevate_degree&#45;&gt;proc~is_rational -->
 <g id="program~~example1_curve~~CallsGraph_edge27" class="edge">
-<title>proc~elevate_degree~3&#45;&gt;proc~is_rational~3</title>
+<title>proc~elevate_degree&#45;&gt;proc~is_rational</title>
 <path fill="none" stroke="#cbff00" d="M306.21,-428C321.22,-428 336.84,-428 351.74,-428"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="351.93,-431.5 361.93,-428 351.93,-424.5 351.93,-431.5"/>
 </g>
-<!-- proc~cmp_elem_xc_vis~3 -->
+<!-- proc~cmp_elem_xc_vis -->
 <g id="program~~example1_curve~~CallsGraph_node19" class="node">
-<title>proc~cmp_elem_xc_vis~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node19"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis</title>
+<g id="a_program~~example1_curve~~CallsGraph_node19"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="523.5,-566 342.5,-566 342.5,-542 523.5,-542 523.5,-566"/>
 <text text-anchor="middle" x="433" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
+<!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
 <g id="program~~example1_curve~~CallsGraph_edge28" class="edge">
-<title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
+<title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
 <path fill="none" stroke="#65ff00" d="M291.05,-539.91C304.23,-541.22 318.27,-542.63 332.19,-544.02"/>
 <polygon fill="#65ff00" stroke="#65ff00" points="331.99,-547.52 342.28,-545.03 332.68,-540.55 331.99,-547.52"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~3 -->
+<!-- proc~cmp_elem_xg_vis -->
 <g id="program~~example1_curve~~CallsGraph_node20" class="node">
-<title>proc~cmp_elem_xg_vis~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node20"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis</title>
+<g id="a_program~~example1_curve~~CallsGraph_node20"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="524,-608 342,-608 342,-584 524,-584 524,-608"/>
 <text text-anchor="middle" x="433" y="-593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
+<!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
 <g id="program~~example1_curve~~CallsGraph_edge29" class="edge">
-<title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
+<title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
 <path fill="none" stroke="#00ff00" d="M291.64,-588.65C304.48,-589.32 318.12,-590.03 331.66,-590.74"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="331.81,-594.26 341.98,-591.28 332.18,-587.27 331.81,-594.26"/>
 </g>
-<!-- proc~insert_knots~3&#45;&gt;none~set~3 -->
+<!-- proc~insert_knots&#45;&gt;none~set -->
 <g id="program~~example1_curve~~CallsGraph_edge31" class="edge">
-<title>proc~insert_knots~3&#45;&gt;none~set~3</title>
+<title>proc~insert_knots&#45;&gt;none~set</title>
 <path fill="none" stroke="#00cbff" d="M262.28,-234.08C276.17,-238.35 291.81,-243.27 306,-248 334.08,-257.36 365.43,-268.55 389.84,-277.43"/>
 <polygon fill="#00cbff" stroke="#00cbff" points="388.91,-280.82 399.5,-280.96 391.31,-274.24 388.91,-280.82"/>
 </g>
@@ -853,9 +853,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~insert_knots~3&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~insert_knots&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example1_curve~~CallsGraph_edge30" class="edge">
-<title>proc~insert_knots~3&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~insert_knots&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00cbff" d="M287.17,-209.98C463.14,-178.98 943.27,-104.38 1072,-188 1140.52,-232.51 1161.04,-337.84 1166.84,-383.85"/>
 <polygon fill="#00cbff" stroke="#00cbff" points="1163.39,-384.42 1168,-393.95 1170.34,-383.62 1163.39,-384.42"/>
 </g>
@@ -868,9 +868,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~insert_knots~3&#45;&gt;proc~findspan -->
+<!-- proc~insert_knots&#45;&gt;proc~findspan -->
 <g id="program~~example1_curve~~CallsGraph_edge32" class="edge">
-<title>proc~insert_knots~3&#45;&gt;proc~findspan</title>
+<title>proc~insert_knots&#45;&gt;proc~findspan</title>
 <path fill="none" stroke="#00cbff" d="M296.63,-226.62C329.41,-228.65 366.52,-230.95 393.58,-232.62"/>
 <polygon fill="#00cbff" stroke="#00cbff" points="393.6,-236.13 403.79,-233.25 394.03,-229.14 393.6,-236.13"/>
 </g>
@@ -883,39 +883,39 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~insert_knots~3&#45;&gt;proc~insert_knot_a_5_1 -->
+<!-- proc~insert_knots&#45;&gt;proc~insert_knot_a_5_1 -->
 <g id="program~~example1_curve~~CallsGraph_edge33" class="edge">
-<title>proc~insert_knots~3&#45;&gt;proc~insert_knot_a_5_1</title>
+<title>proc~insert_knots&#45;&gt;proc~insert_knot_a_5_1</title>
 <path fill="none" stroke="#00cbff" d="M285.81,-209.98C292.84,-207.52 299.72,-204.56 306,-201 325.69,-189.85 322.51,-176.5 342,-165 350.32,-160.09 359.62,-156.06 369,-152.76"/>
 <polygon fill="#00cbff" stroke="#00cbff" points="370.33,-156.01 378.76,-149.59 368.17,-149.35 370.33,-156.01"/>
 </g>
-<!-- proc~insert_knots~3&#45;&gt;proc~is_rational~3 -->
+<!-- proc~insert_knots&#45;&gt;proc~is_rational -->
 <g id="program~~example1_curve~~CallsGraph_edge34" class="edge">
-<title>proc~insert_knots~3&#45;&gt;proc~is_rational~3</title>
+<title>proc~insert_knots&#45;&gt;proc~is_rational</title>
 <path fill="none" stroke="#00cbff" d="M248.02,-234.2C266.75,-244.26 291.23,-260.24 306,-281 339.76,-328.46 299.82,-366.84 342,-407 345.2,-410.05 348.76,-412.69 352.56,-414.96"/>
 <polygon fill="#00cbff" stroke="#00cbff" points="351.3,-418.25 361.8,-419.65 354.46,-412 351.3,-418.25"/>
 </g>
-<!-- proc~remove_knots~3&#45;&gt;none~set~3 -->
+<!-- proc~remove_knots&#45;&gt;none~set -->
 <g id="program~~example1_curve~~CallsGraph_edge36" class="edge">
-<title>proc~remove_knots~3&#45;&gt;none~set~3</title>
+<title>proc~remove_knots&#45;&gt;none~set</title>
 <path fill="none" stroke="#0066ff" d="M285.22,-373.86C292.43,-371.41 299.51,-368.49 306,-365 325.12,-354.72 323.79,-343.81 342,-332 355.95,-322.95 372.34,-315.14 387.29,-308.92"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="388.89,-312.05 396.87,-305.08 386.28,-305.56 388.89,-312.05"/>
 </g>
-<!-- proc~remove_knots~3&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~remove_knots&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example1_curve~~CallsGraph_edge35" class="edge">
-<title>proc~remove_knots~3&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~remove_knots&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0066ff" d="M278.81,-373.98C298.7,-370.33 321.25,-366.8 342,-365 422.59,-358 448.61,-335.68 524,-365 544.23,-372.87 539.82,-390 560,-398 655.77,-435.98 958.63,-420.77 1097.8,-411.35"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="1098.2,-414.83 1107.93,-410.65 1097.72,-407.84 1098.2,-414.83"/>
 </g>
-<!-- proc~remove_knots~3&#45;&gt;proc~findspan -->
+<!-- proc~remove_knots&#45;&gt;proc~findspan -->
 <g id="program~~example1_curve~~CallsGraph_edge37" class="edge">
-<title>proc~remove_knots~3&#45;&gt;proc~findspan</title>
+<title>proc~remove_knots&#45;&gt;proc~findspan</title>
 <path fill="none" stroke="#0066ff" d="M292.9,-373.85C297.62,-371.4 302.06,-368.48 306,-365 339.23,-335.67 310.99,-303.66 342,-272 355.93,-257.77 376.12,-248.81 393.84,-243.27"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="395.27,-246.5 403.92,-240.39 393.35,-239.77 395.27,-246.5"/>
 </g>
-<!-- proc~remove_knots~3&#45;&gt;proc~is_rational~3 -->
+<!-- proc~remove_knots&#45;&gt;proc~is_rational -->
 <g id="program~~example1_curve~~CallsGraph_edge38" class="edge">
-<title>proc~remove_knots~3&#45;&gt;proc~is_rational~3</title>
+<title>proc~remove_knots&#45;&gt;proc~is_rational</title>
 <path fill="none" stroke="#0066ff" d="M282.18,-398.04C307,-403 335.94,-408.79 361.73,-413.95"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="361.32,-417.43 371.81,-415.96 362.69,-410.57 361.32,-417.43"/>
 </g>
@@ -928,9 +928,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~remove_knots~3&#45;&gt;proc~remove_knots_a_5_8 -->
+<!-- proc~remove_knots&#45;&gt;proc~remove_knots_a_5_8 -->
 <g id="program~~example1_curve~~CallsGraph_edge39" class="edge">
-<title>proc~remove_knots~3&#45;&gt;proc~remove_knots_a_5_8</title>
+<title>proc~remove_knots&#45;&gt;proc~remove_knots_a_5_8</title>
 <path fill="none" stroke="#0066ff" d="M302.29,-386C321.44,-386 341.75,-386 360.48,-386"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="360.7,-389.5 370.7,-386 360.7,-382.5 360.7,-389.5"/>
 </g>
@@ -943,15 +943,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~rotate_xc~3&#45;&gt;proc~rotation -->
+<!-- proc~rotate_xc&#45;&gt;proc~rotation -->
 <g id="program~~example1_curve~~CallsGraph_edge40" class="edge">
-<title>proc~rotate_xc~3&#45;&gt;proc~rotation</title>
+<title>proc~rotate_xc&#45;&gt;proc~rotation</title>
 <path fill="none" stroke="#0000ff" d="M283.59,-125.98C320.12,-118.84 365.17,-110.05 395.99,-104.03"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="396.72,-107.45 405.86,-102.1 395.38,-100.58 396.72,-107.45"/>
 </g>
-<!-- proc~rotate_xg~3&#45;&gt;proc~rotation -->
+<!-- proc~rotate_xg&#45;&gt;proc~rotation -->
 <g id="program~~example1_curve~~CallsGraph_edge41" class="edge">
-<title>proc~rotate_xg~3&#45;&gt;proc~rotation</title>
+<title>proc~rotate_xg&#45;&gt;proc~rotation</title>
 <path fill="none" stroke="#6500ff" d="M287.36,-167.9C293.88,-165.45 300.22,-162.52 306,-159 326.7,-146.37 321.2,-130.46 342,-118 358.19,-108.3 378.49,-103.08 395.72,-100.27"/>
 <polygon fill="#6500ff" stroke="#6500ff" points="396.57,-103.69 405.98,-98.82 395.59,-96.76 396.57,-103.69"/>
 </g>
@@ -994,15 +994,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~example1_curve~~CallsGraph_edge44" class="edge">
-<title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#ffb300" d="M498.95,-566.03C520.47,-570.02 544.15,-574.41 564.65,-578.21"/>
 <polygon fill="#ffb300" stroke="#ffb300" points="564.27,-581.7 574.74,-580.08 565.54,-574.81 564.27,-581.7"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~example1_curve~~CallsGraph_edge45" class="edge">
-<title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#f0ff00" d="M524.14,-592.07C537.87,-591.47 551.66,-590.87 564.26,-590.32"/>
 <polygon fill="#f0ff00" stroke="#f0ff00" points="564.7,-593.81 574.54,-589.87 564.4,-586.81 564.7,-593.81"/>
 </g>
@@ -1051,26 +1051,26 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#001dff" d="M460.29,-92.56C492.04,-87.19 545.61,-78.14 581.26,-72.12"/>
 <polygon fill="#001dff" stroke="#001dff" points="581.98,-75.55 591.26,-70.43 580.81,-68.65 581.98,-75.55"/>
 </g>
-<!-- proc~cmp_degree~3 -->
+<!-- proc~cmp_degree -->
 <g id="program~~example1_curve~~CallsGraph_node37" class="node">
-<title>proc~cmp_degree~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node37"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
+<title>proc~cmp_degree</title>
+<g id="a_program~~example1_curve~~CallsGraph_node37"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="867,-357 713,-357 713,-333 867,-333 867,-357"/>
 <text text-anchor="middle" x="790" y="-342.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1&#45;&gt;proc~cmp_degree -->
 <g id="program~~example1_curve~~CallsGraph_edge50" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
+<title>proc~set1&#45;&gt;proc~cmp_degree</title>
 <path fill="none" stroke="#3c00ff" d="M656.53,-263.11C663.45,-265.77 670.54,-268.77 677,-272 708.88,-287.95 742.83,-311.04 764.88,-326.96"/>
 <polygon fill="#3c00ff" stroke="#3c00ff" points="762.86,-329.82 773,-332.89 766.99,-324.17 762.86,-329.82"/>
 </g>
-<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
 <g id="program~~example1_curve~~CallsGraph_edge51" class="edge">
-<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#9500ff" d="M673.6,-366.79C686.85,-364.28 701.26,-361.56 715.26,-358.92"/>
-<polygon fill="#9500ff" stroke="#9500ff" points="716.19,-362.31 725.36,-357.01 714.89,-355.43 716.19,-362.31"/>
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#9500ff" d="M677.36,-366.08C689.54,-363.78 702.55,-361.32 715.23,-358.93"/>
+<polygon fill="#9500ff" stroke="#9500ff" points="716.13,-362.32 725.3,-357.03 714.83,-355.44 716.13,-362.32"/>
 </g>
 <!-- proc~compute_knot_vector -->
 <g id="program~~example1_curve~~CallsGraph_node38" class="node">
@@ -1081,15 +1081,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~example1_curve~~CallsGraph_edge52" class="edge">
-<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#f000ff" d="M673.6,-209C687.08,-209 701.77,-209 716,-209"/>
 <polygon fill="#f000ff" stroke="#f000ff" points="716.26,-212.5 726.26,-209 716.26,-205.5 716.26,-212.5"/>
 </g>
-<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set3&#45;&gt;proc~cmp_degree -->
 <g id="program~~example1_curve~~CallsGraph_edge53" class="edge">
-<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
+<title>proc~set3&#45;&gt;proc~cmp_degree</title>
 <path fill="none" stroke="#ff00b4" d="M673.6,-338.19C682.87,-338.74 692.72,-339.32 702.59,-339.9"/>
 <polygon fill="#ff00b4" stroke="#ff00b4" points="702.68,-343.41 712.86,-340.51 703.09,-336.43 702.68,-343.41"/>
 </g>
@@ -1153,18 +1153,18 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#7fff00" d="M646.73,-495C675.49,-495 720.97,-495 752.74,-495"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="752.95,-498.5 762.95,-495 752.95,-491.5 752.95,-498.5"/>
 </g>
-<!-- proc~get_multiplicity~3 -->
+<!-- proc~get_multiplicity -->
 <g id="program~~example1_curve~~CallsGraph_node46" class="node">
-<title>proc~get_multiplicity~3</title>
-<g id="a_program~~example1_curve~~CallsGraph_node46"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
+<title>proc~get_multiplicity</title>
+<g id="a_program~~example1_curve~~CallsGraph_node46"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1072,-377 903,-377 903,-353 1072,-353 1072,-377"/>
 <text text-anchor="middle" x="987.5" y="-362.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
+<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="program~~example1_curve~~CallsGraph_edge58" class="edge">
-<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
+<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
 <path fill="none" stroke="#00ff3f" d="M867.15,-352.79C875.54,-353.65 884.17,-354.53 892.75,-355.41"/>
 <polygon fill="#00ff3f" stroke="#00ff3f" points="892.49,-358.9 902.79,-356.44 893.2,-351.94 892.49,-358.9"/>
 </g>
@@ -1183,9 +1183,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#00ffff" d="M853.66,-209C884.92,-209 921.69,-209 948.61,-209"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="948.78,-212.5 958.78,-209 948.78,-205.5 948.78,-212.5"/>
 </g>
-<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example1_curve~~CallsGraph_edge60" class="edge">
-<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0000ff" d="M1041.68,-377.08C1061.88,-381.67 1085.08,-386.94 1106.09,-391.71"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="1105.36,-395.13 1115.89,-393.94 1106.91,-388.31 1105.36,-395.13"/>
 </g>
@@ -1292,7 +1292,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~47"></span>
+              <span class="anchor" id="variable-wc~66"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1308,7 +1308,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~47"></span>
+              <span class="anchor" id="variable-xc~66"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1324,7 +1324,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~6"></span>
+              <span class="anchor" id="variable-knot~39"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1533,7 +1533,7 @@ <h2 id="src">Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/example3_surface.html b/program/example3_surface.html
index a3367dd2f..45f975969 100644
--- a/program/example3_surface.html
+++ b/program/example3_surface.html
@@ -115,10 +115,10 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/example3_surface.html#variable-wc~24">Wc</a>
-            <a class="list-group-item" href="../program/example3_surface.html#variable-xc~24">Xc</a>
-            <a class="list-group-item" href="../program/example3_surface.html#variable-knot1~22">knot1</a>
-            <a class="list-group-item" href="../program/example3_surface.html#variable-knot2~22">knot2</a>
+            <a class="list-group-item" href="../program/example3_surface.html#variable-wc~2">Wc</a>
+            <a class="list-group-item" href="../program/example3_surface.html#variable-xc~2">Xc</a>
+            <a class="list-group-item" href="../program/example3_surface.html#variable-knot1">knot1</a>
+            <a class="list-group-item" href="../program/example3_surface.html#variable-knot2">knot2</a>
             <a class="list-group-item" href="../program/example3_surface.html#variable-nurbs~2">nurbs</a>
         </div>
       </div>
@@ -432,123 +432,123 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="110,-339 0,-339 0,-315 110,-315 110,-339"/>
 <text text-anchor="middle" x="55" y="-324.6" font-family="Helvetica,sans-Serif" font-size="10.50">example3_surface</text>
 </g>
-<!-- none~get_degree~2 -->
+<!-- none~get_degree~3 -->
 <g id="program~~example3_surface~~CallsGraph_node2" class="node">
-<title>none~get_degree~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_degree~2" xlink:title="nurbs_surface%get_degree">
+<title>none~get_degree~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_degree~3" xlink:title="nurbs_surface%get_degree">
 <polygon fill="#a7506f" stroke="#a7506f" points="314.5,-752 157.5,-752 157.5,-728 314.5,-728 314.5,-752"/>
 <text text-anchor="middle" x="236" y="-737.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_degree</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;none~get_degree~2 -->
+<!-- program~example3_surface&#45;&gt;none~get_degree~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge1" class="edge">
-<title>program~example3_surface&#45;&gt;none~get_degree~2</title>
+<title>program~example3_surface&#45;&gt;none~get_degree~3</title>
 <path fill="none" stroke="#ff0000" d="M57.91,-339.1C64.89,-381.07 91.49,-523.56 146,-628 164.65,-663.73 195.41,-699.16 215.44,-720.32"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="213.09,-722.92 222.55,-727.7 218.13,-718.07 213.09,-722.92"/>
 </g>
-<!-- none~get_knot~2 -->
+<!-- none~get_knot~3 -->
 <g id="program~~example3_surface~~CallsGraph_node3" class="node">
-<title>none~get_knot~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node3"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~2" xlink:title="nurbs_surface%get_knot">
+<title>none~get_knot~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node3"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~3" xlink:title="nurbs_surface%get_knot">
 <polygon fill="#a7506f" stroke="#a7506f" points="529.5,-627 386.5,-627 386.5,-603 529.5,-603 529.5,-627"/>
 <text text-anchor="middle" x="458" y="-612.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;none~get_knot~2 -->
+<!-- program~example3_surface&#45;&gt;none~get_knot~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge2" class="edge">
-<title>program~example3_surface&#45;&gt;none~get_knot~2</title>
+<title>program~example3_surface&#45;&gt;none~get_knot~3</title>
 <path fill="none" stroke="#ff0000" d="M55.78,-339.19C55.71,-382.41 61.92,-529.21 146,-594 217.96,-649.45 329.29,-641.21 397.4,-628.96"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="398.36,-632.34 407.54,-627.05 397.06,-625.46 398.36,-632.34"/>
 </g>
-<!-- none~set~2 -->
+<!-- none~set~3 -->
 <g id="program~~example3_surface~~CallsGraph_node4" class="node">
-<title>none~set~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<title>none~set~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node4"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="514.5,-585 401.5,-585 401.5,-561 514.5,-561 514.5,-585"/>
 <text text-anchor="middle" x="458" y="-570.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;none~set~2 -->
+<!-- program~example3_surface&#45;&gt;none~set~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge3" class="edge">
-<title>program~example3_surface&#45;&gt;none~set~2</title>
+<title>program~example3_surface&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff0000" d="M58.04,-339.44C64.3,-373.43 86.56,-468.36 146,-514 155.72,-521.46 302.88,-547.17 391.24,-562.07"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="390.74,-565.54 401.18,-563.75 391.9,-558.64 390.74,-565.54"/>
 </g>
-<!-- proc~create~2 -->
+<!-- proc~create~3 -->
 <g id="program~~example3_surface~~CallsGraph_node5" class="node">
-<title>proc~create~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node5"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
+<title>proc~create~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node5"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="301.5,-402 170.5,-402 170.5,-378 301.5,-378 301.5,-402"/>
 <text text-anchor="middle" x="236" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~create~2 -->
+<!-- program~example3_surface&#45;&gt;proc~create~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge4" class="edge">
-<title>program~example3_surface&#45;&gt;proc~create~2</title>
+<title>program~example3_surface&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#ff0000" d="M78.4,-339.03C96.29,-348.24 122.22,-360.74 146,-369 152.45,-371.24 159.24,-373.32 166.08,-375.23"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="165.54,-378.71 176.1,-377.9 167.35,-371.94 165.54,-378.71"/>
 </g>
-<!-- proc~elevate_degree~2 -->
+<!-- proc~elevate_degree~3 -->
 <g id="program~~example3_surface~~CallsGraph_node6" class="node">
-<title>proc~elevate_degree~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node6"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_surface%elevate_degree">
+<title>proc~elevate_degree~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node6"><a xlink:href="../proc/elevate_degree~3.html" xlink:title="nurbs_surface%elevate_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="326,-585 146,-585 146,-561 326,-561 326,-585"/>
 <text text-anchor="middle" x="236" y="-570.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%elevate_degree</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~elevate_degree~2 -->
+<!-- program~example3_surface&#45;&gt;proc~elevate_degree~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge5" class="edge">
-<title>program~example3_surface&#45;&gt;proc~elevate_degree~2</title>
+<title>program~example3_surface&#45;&gt;proc~elevate_degree~3</title>
 <path fill="none" stroke="#ff0000" d="M57.3,-339.07C61.94,-376 81,-488.44 146,-547 149.94,-550.55 154.33,-553.61 159,-556.26"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="157.76,-559.55 168.27,-560.85 160.87,-553.27 157.76,-559.55"/>
 </g>
-<!-- proc~export_xc~2 -->
+<!-- proc~export_xc~3 -->
 <g id="program~~example3_surface~~CallsGraph_node7" class="node">
-<title>proc~export_xc~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node7"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_surface%export_Xc">
+<title>proc~export_xc~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node7"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_surface%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="311,-360 161,-360 161,-336 311,-336 311,-360"/>
 <text text-anchor="middle" x="236" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~export_xc~2 -->
+<!-- program~example3_surface&#45;&gt;proc~export_xc~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge6" class="edge">
-<title>program~example3_surface&#45;&gt;proc~export_xc~2</title>
+<title>program~example3_surface&#45;&gt;proc~export_xc~3</title>
 <path fill="none" stroke="#ff0000" d="M110.19,-333.36C123.03,-334.86 137.01,-336.5 150.83,-338.13"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="150.5,-341.61 160.84,-339.3 151.32,-334.66 150.5,-341.61"/>
 </g>
-<!-- proc~export_xg~2 -->
+<!-- proc~export_xg~3 -->
 <g id="program~~example3_surface~~CallsGraph_node8" class="node">
-<title>proc~export_xg~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node8"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_surface%export_Xg">
+<title>proc~export_xg~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node8"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_surface%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="311.5,-318 160.5,-318 160.5,-294 311.5,-294 311.5,-318"/>
 <text text-anchor="middle" x="236" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~export_xg~2 -->
+<!-- program~example3_surface&#45;&gt;proc~export_xg~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge7" class="edge">
-<title>program~example3_surface&#45;&gt;proc~export_xg~2</title>
+<title>program~example3_surface&#45;&gt;proc~export_xg~3</title>
 <path fill="none" stroke="#ff0000" d="M110.19,-320.64C122.74,-319.17 136.39,-317.57 149.9,-315.98"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="150.66,-319.42 160.19,-314.78 149.85,-312.47 150.66,-319.42"/>
 </g>
-<!-- proc~finalize~2 -->
+<!-- proc~finalize~3 -->
 <g id="program~~example3_surface~~CallsGraph_node9" class="node">
-<title>proc~finalize~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node9"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_surface%finalize">
+<title>proc~finalize~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node9"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_surface%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="304,-276 168,-276 168,-252 304,-252 304,-276"/>
 <text text-anchor="middle" x="236" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~finalize~2 -->
+<!-- program~example3_surface&#45;&gt;proc~finalize~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge8" class="edge">
-<title>program~example3_surface&#45;&gt;proc~finalize~2</title>
+<title>program~example3_surface&#45;&gt;proc~finalize~3</title>
 <path fill="none" stroke="#ff0000" d="M78.4,-314.97C96.29,-305.76 122.22,-293.26 146,-285 152.45,-282.76 159.24,-280.68 166.08,-278.77"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="167.35,-282.06 176.1,-276.1 165.54,-275.29 167.35,-282.06"/>
 </g>
@@ -567,108 +567,108 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M65.37,-314.91C80.34,-296.45 111.51,-261.45 146,-243 158.16,-236.49 172.31,-231.99 185.71,-228.87"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="186.7,-232.24 195.76,-226.74 185.25,-225.39 186.7,-232.24"/>
 </g>
-<!-- proc~insert_knots~2 -->
+<!-- proc~insert_knots~3 -->
 <g id="program~~example3_surface~~CallsGraph_node11" class="node">
-<title>proc~insert_knots~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node11"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_surface%insert_knots">
+<title>proc~insert_knots~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node11"><a xlink:href="../proc/insert_knots~3.html" xlink:title="nurbs_surface%insert_knots">
 <polygon fill="#d9534f" stroke="#d9534f" points="316.5,-444 155.5,-444 155.5,-420 316.5,-420 316.5,-444"/>
 <text text-anchor="middle" x="236" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%insert_knots</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~insert_knots~2 -->
+<!-- program~example3_surface&#45;&gt;proc~insert_knots~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge10" class="edge">
-<title>program~example3_surface&#45;&gt;proc~insert_knots~2</title>
+<title>program~example3_surface&#45;&gt;proc~insert_knots~3</title>
 <path fill="none" stroke="#ff0000" d="M65.37,-339.09C80.34,-357.55 111.51,-392.55 146,-411 149.7,-412.98 153.59,-414.78 157.58,-416.4"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="156.46,-419.72 167.05,-419.9 158.89,-413.15 156.46,-419.72"/>
 </g>
-<!-- proc~remove_knots~2 -->
+<!-- proc~remove_knots~3 -->
 <g id="program~~example3_surface~~CallsGraph_node12" class="node">
-<title>proc~remove_knots~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node12"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_surface%remove_knots">
+<title>proc~remove_knots~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node12"><a xlink:href="../proc/remove_knots~3.html" xlink:title="nurbs_surface%remove_knots">
 <polygon fill="#d9534f" stroke="#d9534f" points="322,-505 150,-505 150,-481 322,-481 322,-505"/>
 <text text-anchor="middle" x="236" y="-490.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%remove_knots</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~remove_knots~2 -->
+<!-- program~example3_surface&#45;&gt;proc~remove_knots~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge11" class="edge">
-<title>program~example3_surface&#45;&gt;proc~remove_knots~2</title>
+<title>program~example3_surface&#45;&gt;proc~remove_knots~3</title>
 <path fill="none" stroke="#ff0000" d="M61.8,-339.02C74.14,-363.49 105.25,-419.61 146,-453 158.03,-462.86 172.88,-470.79 186.98,-476.91"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="185.99,-480.29 196.57,-480.86 188.66,-473.82 185.99,-480.29"/>
 </g>
-<!-- proc~rotate_xc~2 -->
+<!-- proc~rotate_xc~3 -->
 <g id="program~~example3_surface~~CallsGraph_node13" class="node">
-<title>proc~rotate_xc~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node13"><a xlink:href="../proc/rotate_xc~2.html" xlink:title="nurbs_surface%rotate_Xc">
+<title>proc~rotate_xc~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node13"><a xlink:href="../proc/rotate_xc~3.html" xlink:title="nurbs_surface%rotate_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="310,-192 162,-192 162,-168 310,-168 310,-192"/>
 <text text-anchor="middle" x="236" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%rotate_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~rotate_xc~2 -->
+<!-- program~example3_surface&#45;&gt;proc~rotate_xc~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge12" class="edge">
-<title>program~example3_surface&#45;&gt;proc~rotate_xc~2</title>
+<title>program~example3_surface&#45;&gt;proc~rotate_xc~3</title>
 <path fill="none" stroke="#ff0000" d="M61.13,-314.71C72.44,-289.22 102.03,-230.51 146,-201 148.55,-199.29 151.23,-197.71 154,-196.26"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="155.49,-199.43 163.1,-192.06 152.55,-193.08 155.49,-199.43"/>
 </g>
-<!-- proc~rotate_xg~2 -->
+<!-- proc~rotate_xg~3 -->
 <g id="program~~example3_surface~~CallsGraph_node14" class="node">
-<title>proc~rotate_xg~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node14"><a xlink:href="../proc/rotate_xg~2.html" xlink:title="nurbs_surface%rotate_Xg">
+<title>proc~rotate_xg~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node14"><a xlink:href="../proc/rotate_xg~3.html" xlink:title="nurbs_surface%rotate_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="310,-150 162,-150 162,-126 310,-126 310,-150"/>
 <text text-anchor="middle" x="236" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%rotate_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~rotate_xg~2 -->
+<!-- program~example3_surface&#45;&gt;proc~rotate_xg~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge13" class="edge">
-<title>program~example3_surface&#45;&gt;proc~rotate_xg~2</title>
+<title>program~example3_surface&#45;&gt;proc~rotate_xg~3</title>
 <path fill="none" stroke="#ff0000" d="M58.89,-314.58C66.86,-283.2 92.22,-200.34 146,-159 148.09,-157.39 150.29,-155.9 152.57,-154.53"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="154.46,-157.48 161.71,-149.75 151.22,-151.28 154.46,-157.48"/>
 </g>
-<!-- proc~show~2 -->
+<!-- proc~show~3 -->
 <g id="program~~example3_surface~~CallsGraph_node15" class="node">
-<title>proc~show~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node15"><a xlink:href="../proc/show~2.html" xlink:title="nurbs_surface%show">
+<title>proc~show~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node15"><a xlink:href="../proc/show~3.html" xlink:title="nurbs_surface%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="298,-108 174,-108 174,-84 298,-84 298,-108"/>
 <text text-anchor="middle" x="236" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%show</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~show~2 -->
+<!-- program~example3_surface&#45;&gt;proc~show~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge14" class="edge">
-<title>program~example3_surface&#45;&gt;proc~show~2</title>
+<title>program~example3_surface&#45;&gt;proc~show~3</title>
 <path fill="none" stroke="#ff0000" d="M57.43,-314.81C62.33,-278.59 81.92,-170.84 146,-117 151.39,-112.47 157.58,-108.88 164.14,-106.04"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="165.8,-109.16 173.95,-102.39 163.36,-102.6 165.8,-109.16"/>
 </g>
-<!-- proc~translate_xc~2 -->
+<!-- proc~translate_xc~3 -->
 <g id="program~~example3_surface~~CallsGraph_node16" class="node">
-<title>proc~translate_xc~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node16"><a xlink:href="../proc/translate_xc~2.html" xlink:title="nurbs_surface%translate_Xc">
+<title>proc~translate_xc~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node16"><a xlink:href="../proc/translate_xc~3.html" xlink:title="nurbs_surface%translate_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="317.5,-66 154.5,-66 154.5,-42 317.5,-42 317.5,-66"/>
 <text text-anchor="middle" x="236" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%translate_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~translate_xc~2 -->
+<!-- program~example3_surface&#45;&gt;proc~translate_xc~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge15" class="edge">
-<title>program~example3_surface&#45;&gt;proc~translate_xc~2</title>
+<title>program~example3_surface&#45;&gt;proc~translate_xc~3</title>
 <path fill="none" stroke="#ff0000" d="M56.46,-314.8C58.67,-274.07 71.55,-141.59 146,-75 147.34,-73.8 148.74,-72.66 150.19,-71.59"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="152.34,-74.37 158.94,-66.09 148.61,-68.44 152.34,-74.37"/>
 </g>
-<!-- proc~translate_xg~2 -->
+<!-- proc~translate_xg~3 -->
 <g id="program~~example3_surface~~CallsGraph_node17" class="node">
-<title>proc~translate_xg~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node17"><a xlink:href="../proc/translate_xg~2.html" xlink:title="nurbs_surface%translate_Xg">
+<title>proc~translate_xg~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node17"><a xlink:href="../proc/translate_xg~3.html" xlink:title="nurbs_surface%translate_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="318,-24 154,-24 154,0 318,0 318,-24"/>
 <text text-anchor="middle" x="236" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%translate_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~example3_surface&#45;&gt;proc~translate_xg~2 -->
+<!-- program~example3_surface&#45;&gt;proc~translate_xg~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge16" class="edge">
-<title>program~example3_surface&#45;&gt;proc~translate_xg~2</title>
+<title>program~example3_surface&#45;&gt;proc~translate_xg~3</title>
 <path fill="none" stroke="#ff0000" d="M55.75,-314.75C55.52,-269.81 61.07,-112.55 146,-33 147.16,-31.91 148.36,-30.88 149.61,-29.9"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="151.93,-32.56 158.34,-24.12 148.07,-26.72 151.93,-32.56"/>
 </g>
@@ -681,9 +681,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- none~get_degree~2&#45;&gt;proc~get_degree_all~2 -->
+<!-- none~get_degree~3&#45;&gt;proc~get_degree_all~2 -->
 <g id="program~~example3_surface~~CallsGraph_edge17" class="edge">
-<title>none~get_degree~2&#45;&gt;proc~get_degree_all~2</title>
+<title>none~get_degree~3&#45;&gt;proc~get_degree_all~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M300.04,-752.04C326.28,-757.04 356.9,-762.89 384.1,-768.08"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="383.47,-771.53 393.95,-769.96 384.78,-764.65 383.47,-771.53"/>
 </g>
@@ -696,114 +696,114 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- none~get_degree~2&#45;&gt;proc~get_degree_dir~2 -->
+<!-- none~get_degree~3&#45;&gt;proc~get_degree_dir~2 -->
 <g id="program~~example3_surface~~CallsGraph_edge18" class="edge">
-<title>none~get_degree~2&#45;&gt;proc~get_degree_dir~2</title>
+<title>none~get_degree~3&#45;&gt;proc~get_degree_dir~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M314.56,-740C328.94,-740 344.12,-740 359.01,-740"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="359.26,-743.5 369.26,-740 359.26,-736.5 359.26,-743.5"/>
 </g>
-<!-- proc~get_knot_all~2 -->
+<!-- proc~get_knot_all~3 -->
 <g id="program~~example3_surface~~CallsGraph_node27" class="node">
-<title>proc~get_knot_all~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node27"><a xlink:href="../proc/get_knot_all~2.html" xlink:title="nurbs_surface%get_knot_all">
+<title>proc~get_knot_all~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node27"><a xlink:href="../proc/get_knot_all~3.html" xlink:title="nurbs_surface%get_knot_all">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="751,-669 590,-669 590,-645 751,-645 751,-669"/>
 <text text-anchor="middle" x="670.5" y="-654.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot_all</text>
 </a>
 </g>
 </g>
-<!-- none~get_knot~2&#45;&gt;proc~get_knot_all~2 -->
+<!-- none~get_knot~3&#45;&gt;proc~get_knot_all~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge19" class="edge">
-<title>none~get_knot~2&#45;&gt;proc~get_knot_all~2</title>
+<title>none~get_knot~3&#45;&gt;proc~get_knot_all~3</title>
 <path fill="none" stroke="#ff5f00" stroke-dasharray="5,2" d="M519.32,-627.04C544.2,-632 573.21,-637.79 599.06,-642.95"/>
 <polygon fill="#ff5f00" stroke="#ff5f00" points="598.68,-646.44 609.17,-644.96 600.05,-639.57 598.68,-646.44"/>
 </g>
-<!-- proc~get_knoti~2 -->
+<!-- proc~get_knoti~3 -->
 <g id="program~~example3_surface~~CallsGraph_node28" class="node">
-<title>proc~get_knoti~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node28"><a xlink:href="../proc/get_knoti~2.html" xlink:title="nurbs_surface%get_knoti">
+<title>proc~get_knoti~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node28"><a xlink:href="../proc/get_knoti~3.html" xlink:title="nurbs_surface%get_knoti">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="743.5,-711 597.5,-711 597.5,-687 743.5,-687 743.5,-711"/>
 <text text-anchor="middle" x="670.5" y="-696.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knoti</text>
 </a>
 </g>
 </g>
-<!-- none~get_knot~2&#45;&gt;proc~get_knoti~2 -->
+<!-- none~get_knot~3&#45;&gt;proc~get_knoti~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge20" class="edge">
-<title>none~get_knot~2&#45;&gt;proc~get_knoti~2</title>
+<title>none~get_knot~3&#45;&gt;proc~get_knoti~3</title>
 <path fill="none" stroke="#ff5f00" stroke-dasharray="5,2" d="M480.69,-627.02C506.23,-640.78 550.22,-663.33 590,-678 595.89,-680.17 602.1,-682.22 608.35,-684.11"/>
 <polygon fill="#ff5f00" stroke="#ff5f00" points="607.58,-687.54 618.16,-686.97 609.54,-680.82 607.58,-687.54"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="program~~example3_surface~~CallsGraph_node33" class="node">
-<title>proc~set1~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node33"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<title>proc~set1~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node33"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="730.5,-543 610.5,-543 610.5,-519 730.5,-519 730.5,-543"/>
 <text text-anchor="middle" x="670.5" y="-528.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge21" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
 <path fill="none" stroke="#ffbf00" stroke-dasharray="5,2" d="M514.58,-561.91C540.83,-556.67 572.44,-550.37 600.23,-544.82"/>
 <polygon fill="#ffbf00" stroke="#ffbf00" points="601.16,-548.2 610.29,-542.81 599.79,-541.34 601.16,-548.2"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="program~~example3_surface~~CallsGraph_node34" class="node">
-<title>proc~set2~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node34"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<title>proc~set2~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node34"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="730.5,-585 610.5,-585 610.5,-561 730.5,-561 730.5,-585"/>
 <text text-anchor="middle" x="670.5" y="-570.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge22" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
 <path fill="none" stroke="#ffbf00" stroke-dasharray="5,2" d="M514.58,-573C540.83,-573 572.44,-573 600.23,-573"/>
 <polygon fill="#ffbf00" stroke="#ffbf00" points="600.29,-576.5 610.29,-573 600.29,-569.5 600.29,-576.5"/>
 </g>
-<!-- proc~set3~2 -->
+<!-- proc~set3~3 -->
 <g id="program~~example3_surface~~CallsGraph_node35" class="node">
-<title>proc~set3~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node35"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<title>proc~set3~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node35"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="730.5,-501 610.5,-501 610.5,-477 730.5,-477 730.5,-501"/>
 <text text-anchor="middle" x="670.5" y="-486.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge23" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
+<title>none~set~3&#45;&gt;proc~set3~3</title>
 <path fill="none" stroke="#ffbf00" stroke-dasharray="5,2" d="M514.76,-563.03C528.18,-559.23 542.07,-554.04 554,-547 573.76,-535.34 570.19,-521.57 590,-510 593.44,-507.99 597.07,-506.17 600.81,-504.52"/>
 <polygon fill="#ffbf00" stroke="#ffbf00" points="602.29,-507.7 610.3,-500.77 599.72,-501.19 602.29,-507.7"/>
 </g>
-<!-- proc~set4~2 -->
+<!-- proc~set4~3 -->
 <g id="program~~example3_surface~~CallsGraph_node36" class="node">
-<title>proc~set4~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node36"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<title>proc~set4~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node36"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="730.5,-627 610.5,-627 610.5,-603 730.5,-603 730.5,-627"/>
 <text text-anchor="middle" x="670.5" y="-612.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set4~2 -->
+<!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge24" class="edge">
-<title>none~set~2&#45;&gt;proc~set4~2</title>
+<title>none~set~3&#45;&gt;proc~set4~3</title>
 <path fill="none" stroke="#ffbf00" stroke-dasharray="5,2" d="M514.58,-584.09C540.83,-589.33 572.44,-595.63 600.23,-601.18"/>
 <polygon fill="#ffbf00" stroke="#ffbf00" points="599.79,-604.66 610.29,-603.19 601.16,-597.8 599.79,-604.66"/>
 </g>
-<!-- interface~compute_xg~2 -->
+<!-- interface~compute_xg~3 -->
 <g id="program~~example3_surface~~CallsGraph_node19" class="node">
-<title>interface~compute_xg~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node19"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node19"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="497.5,-299 418.5,-299 418.5,-275 497.5,-275 497.5,-299"/>
 <text text-anchor="middle" x="458" y="-284.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
+<!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge25" class="edge">
-<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
+<title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
 <path fill="none" stroke="#dfff00" d="M301.8,-380.98C310.4,-378.03 318.74,-374.13 326,-369 350.16,-351.91 338.15,-330.51 362,-313 375.34,-303.2 392.18,-297.1 407.96,-293.29"/>
 <polygon fill="#dfff00" stroke="#dfff00" points="409.08,-296.63 418.12,-291.11 407.61,-289.79 409.08,-296.63"/>
 </g>
@@ -816,36 +816,36 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~ndgrid -->
+<!-- proc~create~3&#45;&gt;interface~ndgrid -->
 <g id="program~~example3_surface~~CallsGraph_edge26" class="edge">
-<title>proc~create~2&#45;&gt;interface~ndgrid</title>
+<title>proc~create~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#dfff00" d="M301.63,-382.97C310.56,-379.76 319.04,-375.27 326,-369 362.03,-336.55 325.74,-298.2 362,-266 377.95,-251.84 401.29,-246.54 420.84,-244.8"/>
 <polygon fill="#dfff00" stroke="#dfff00" points="421.18,-248.29 430.95,-244.18 420.75,-241.3 421.18,-248.29"/>
 </g>
-<!-- proc~is_rational~2 -->
+<!-- proc~is_rational~3 -->
 <g id="program~~example3_surface~~CallsGraph_node30" class="node">
-<title>proc~is_rational~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node30"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<title>proc~is_rational~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node30"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="534,-421 382,-421 382,-397 534,-397 534,-421"/>
 <text text-anchor="middle" x="458" y="-406.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge27" class="edge">
-<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~create~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#dfff00" d="M301.52,-395.57C323.39,-397.46 348.17,-399.6 371.41,-401.61"/>
 <polygon fill="#dfff00" stroke="#dfff00" points="371.36,-405.12 381.62,-402.49 371.96,-398.14 371.36,-405.12"/>
 </g>
-<!-- proc~elevate_degree~2&#45;&gt;none~get_knot~2 -->
+<!-- proc~elevate_degree~3&#45;&gt;none~get_knot~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge28" class="edge">
-<title>proc~elevate_degree~2&#45;&gt;none~get_knot~2</title>
+<title>proc~elevate_degree~3&#45;&gt;none~get_knot~3</title>
 <path fill="none" stroke="#7fff00" d="M300.04,-585.04C326.28,-590.04 356.9,-595.89 384.1,-601.08"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="383.47,-604.53 393.95,-602.96 384.78,-597.65 383.47,-604.53"/>
 </g>
-<!-- proc~elevate_degree~2&#45;&gt;none~set~2 -->
+<!-- proc~elevate_degree~3&#45;&gt;none~set~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge29" class="edge">
-<title>proc~elevate_degree~2&#45;&gt;none~set~2</title>
+<title>proc~elevate_degree~3&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#7fff00" d="M326.17,-573C347.87,-573 370.7,-573 391.1,-573"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="391.21,-576.5 401.21,-573 391.21,-569.5 391.21,-576.5"/>
 </g>
@@ -858,57 +858,57 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~elevate_degree~2&#45;&gt;proc~elevate_degree_a_5_9 -->
+<!-- proc~elevate_degree~3&#45;&gt;proc~elevate_degree_a_5_9 -->
 <g id="program~~example3_surface~~CallsGraph_edge30" class="edge">
-<title>proc~elevate_degree~2&#45;&gt;proc~elevate_degree_a_5_9</title>
+<title>proc~elevate_degree~3&#45;&gt;proc~elevate_degree_a_5_9</title>
 <path fill="none" stroke="#7fff00" d="M258.5,-585.21C297.94,-607.63 381.98,-655.37 427.02,-680.96"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="425.32,-684.02 435.74,-685.92 428.78,-677.94 425.32,-684.02"/>
 </g>
-<!-- proc~elevate_degree~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~elevate_degree~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge31" class="edge">
-<title>proc~elevate_degree~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~elevate_degree~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#7fff00" d="M262.98,-560.99C282.52,-550.83 308.78,-534.64 326,-514 352.02,-482.81 330.72,-455.91 362,-430 365.29,-427.27 368.86,-424.88 372.62,-422.78"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="374.22,-425.9 381.7,-418.4 371.18,-419.59 374.22,-425.9"/>
 </g>
-<!-- proc~cmp_elem_xc_vis~2 -->
+<!-- proc~cmp_elem_xc_vis~3 -->
 <g id="program~~example3_surface~~CallsGraph_node21" class="node">
-<title>proc~cmp_elem_xc_vis~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node21"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node21"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-215 362.5,-215 362.5,-191 553.5,-191 553.5,-215"/>
 <text text-anchor="middle" x="458" y="-200.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
+<!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge32" class="edge">
-<title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
+<title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
 <path fill="none" stroke="#1fff00" d="M311.38,-336.82C316.67,-334.16 321.64,-330.93 326,-327 362.03,-294.55 325.74,-256.2 362,-224 363.35,-222.8 364.74,-221.67 366.19,-220.6"/>
 <polygon fill="#1fff00" stroke="#1fff00" points="368.33,-223.39 374.92,-215.09 364.59,-217.47 368.33,-223.39"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~2 -->
+<!-- proc~cmp_elem_xg_vis~3 -->
 <g id="program~~example3_surface~~CallsGraph_node22" class="node">
-<title>proc~cmp_elem_xg_vis~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node22"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node22"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="554,-173 362,-173 362,-149 554,-149 554,-173"/>
 <text text-anchor="middle" x="458" y="-158.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
+<!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge33" class="edge">
-<title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
+<title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
 <path fill="none" stroke="#00ff3f" d="M311.81,-294.6C316.94,-291.99 321.75,-288.82 326,-285 362.03,-252.55 325.74,-214.2 362,-182 363.35,-180.8 364.74,-179.67 366.19,-178.6"/>
 <polygon fill="#00ff3f" stroke="#00ff3f" points="368.33,-181.39 374.92,-173.09 364.59,-175.47 368.33,-181.39"/>
 </g>
-<!-- proc~insert_knots~2&#45;&gt;none~get_knot~2 -->
+<!-- proc~insert_knots~3&#45;&gt;none~get_knot~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge35" class="edge">
-<title>proc~insert_knots~2&#45;&gt;none~get_knot~2</title>
+<title>proc~insert_knots~3&#45;&gt;none~get_knot~3</title>
 <path fill="none" stroke="#009fff" d="M283,-444.06C298.52,-450.17 314.75,-459.11 326,-472 363.18,-514.59 320.66,-555.44 362,-594 366.43,-598.13 371.49,-601.52 376.9,-604.29"/>
 <polygon fill="#009fff" stroke="#009fff" points="375.75,-607.61 386.31,-608.39 378.54,-601.19 375.75,-607.61"/>
 </g>
-<!-- proc~insert_knots~2&#45;&gt;none~set~2 -->
+<!-- proc~insert_knots~3&#45;&gt;none~set~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge36" class="edge">
-<title>proc~insert_knots~2&#45;&gt;none~set~2</title>
+<title>proc~insert_knots~3&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#009fff" d="M273.19,-444.07C290.18,-450.75 310.13,-460.13 326,-472 345.69,-486.73 343.34,-497.99 362,-514 381.12,-530.4 405.27,-545.34 424.43,-556.08"/>
 <polygon fill="#009fff" stroke="#009fff" points="422.95,-559.25 433.4,-561 426.32,-553.12 422.95,-559.25"/>
 </g>
@@ -921,9 +921,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~insert_knots~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~insert_knots~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example3_surface~~CallsGraph_edge34" class="edge">
-<title>proc~insert_knots~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~insert_knots~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#009fff" d="M310.68,-419.98C316.13,-417.51 321.32,-414.55 326,-411 352.32,-391.06 334.08,-363.64 362,-346 419.88,-309.44 601.04,-327 669.5,-327 669.5,-327 669.5,-327 869.5,-327 1018.53,-327 1176.88,-428.46 1236.46,-470.79"/>
 <polygon fill="#009fff" stroke="#009fff" points="1234.67,-473.82 1244.84,-476.82 1238.76,-468.14 1234.67,-473.82"/>
 </g>
@@ -936,9 +936,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~insert_knots~2&#45;&gt;proc~findspan -->
+<!-- proc~insert_knots~3&#45;&gt;proc~findspan -->
 <g id="program~~example3_surface~~CallsGraph_edge37" class="edge">
-<title>proc~insert_knots~2&#45;&gt;proc~findspan</title>
+<title>proc~insert_knots~3&#45;&gt;proc~findspan</title>
 <path fill="none" stroke="#009fff" d="M316.74,-438.89C351.52,-441.89 390.68,-445.27 418.77,-447.7"/>
 <polygon fill="#009fff" stroke="#009fff" points="418.69,-451.2 428.96,-448.58 419.29,-444.23 418.69,-451.2"/>
 </g>
@@ -951,45 +951,45 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~insert_knots~2&#45;&gt;proc~insert_knot_a_5_1 -->
+<!-- proc~insert_knots~3&#45;&gt;proc~insert_knot_a_5_1 -->
 <g id="program~~example3_surface~~CallsGraph_edge38" class="edge">
-<title>proc~insert_knots~2&#45;&gt;proc~insert_knot_a_5_1</title>
+<title>proc~insert_knots~3&#45;&gt;proc~insert_knot_a_5_1</title>
 <path fill="none" stroke="#009fff" d="M300.09,-419.92C308.95,-417.42 317.81,-414.46 326,-411 343.49,-403.6 344.46,-395.27 362,-388 372.03,-383.84 383.02,-380.44 393.85,-377.69"/>
 <polygon fill="#009fff" stroke="#009fff" points="394.81,-381.06 403.72,-375.34 393.18,-374.25 394.81,-381.06"/>
 </g>
-<!-- proc~insert_knots~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~insert_knots~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge39" class="edge">
-<title>proc~insert_knots~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~insert_knots~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#009fff" d="M316.74,-423.66C334.69,-421.79 353.8,-419.79 371.96,-417.89"/>
 <polygon fill="#009fff" stroke="#009fff" points="372.35,-421.37 381.93,-416.85 371.62,-414.41 372.35,-421.37"/>
 </g>
-<!-- proc~remove_knots~2&#45;&gt;none~get_knot~2 -->
+<!-- proc~remove_knots~3&#45;&gt;none~get_knot~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge41" class="edge">
-<title>proc~remove_knots~2&#45;&gt;none~get_knot~2</title>
+<title>proc~remove_knots~3&#45;&gt;none~get_knot~3</title>
 <path fill="none" stroke="#003fff" d="M258.68,-505.06C277.47,-516.04 304.89,-533.34 326,-552 344.42,-568.28 340.91,-581.36 362,-594 366.5,-596.7 371.31,-599.05 376.29,-601.1"/>
 <polygon fill="#003fff" stroke="#003fff" points="375.43,-604.52 386.02,-604.69 377.85,-597.95 375.43,-604.52"/>
 </g>
-<!-- proc~remove_knots~2&#45;&gt;none~set~2 -->
+<!-- proc~remove_knots~3&#45;&gt;none~set~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge42" class="edge">
-<title>proc~remove_knots~2&#45;&gt;none~set~2</title>
+<title>proc~remove_knots~3&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#003fff" d="M290.5,-505.08C302.52,-508.76 314.96,-513.36 326,-519 344.05,-528.23 343.87,-537.93 362,-547 371.27,-551.64 381.48,-555.54 391.66,-558.79"/>
 <polygon fill="#003fff" stroke="#003fff" points="390.8,-562.19 401.38,-561.71 392.81,-555.48 390.8,-562.19"/>
 </g>
-<!-- proc~remove_knots~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~remove_knots~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example3_surface~~CallsGraph_edge40" class="edge">
-<title>proc~remove_knots~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~remove_knots~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#003fff" d="M296.2,-505.02C316.92,-508.67 340.4,-512.2 362,-514 447.04,-521.09 477.29,-551.38 554,-514 577.34,-502.63 566.66,-479.37 590,-468 819.34,-356.26 910.34,-440.86 1164,-468 1177.38,-469.43 1191.62,-471.94 1204.96,-474.74"/>
 <polygon fill="#003fff" stroke="#003fff" points="1204.43,-478.21 1214.95,-476.93 1205.93,-471.37 1204.43,-478.21"/>
 </g>
-<!-- proc~remove_knots~2&#45;&gt;proc~findspan -->
+<!-- proc~remove_knots~3&#45;&gt;proc~findspan -->
 <g id="program~~example3_surface~~CallsGraph_edge43" class="edge">
-<title>proc~remove_knots~2&#45;&gt;proc~findspan</title>
+<title>proc~remove_knots~3&#45;&gt;proc~findspan</title>
 <path fill="none" stroke="#003fff" d="M300.04,-480.96C338.42,-473.64 386.2,-464.52 418.89,-458.28"/>
 <polygon fill="#003fff" stroke="#003fff" points="419.78,-461.67 428.95,-456.36 418.47,-454.79 419.78,-461.67"/>
 </g>
-<!-- proc~remove_knots~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~remove_knots~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge44" class="edge">
-<title>proc~remove_knots~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~remove_knots~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#003fff" d="M266.78,-480.91C284.33,-473.47 306.77,-463.39 326,-453 342.7,-443.97 344.46,-437.27 362,-430 367.4,-427.76 373.07,-425.75 378.85,-423.93"/>
 <polygon fill="#003fff" stroke="#003fff" points="380.02,-427.23 388.64,-421.07 378.06,-420.52 380.02,-427.23"/>
 </g>
@@ -1002,9 +1002,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~remove_knots~2&#45;&gt;proc~remove_knots_a_5_8 -->
+<!-- proc~remove_knots~3&#45;&gt;proc~remove_knots_a_5_8 -->
 <g id="program~~example3_surface~~CallsGraph_edge45" class="edge">
-<title>proc~remove_knots~2&#45;&gt;proc~remove_knots_a_5_8</title>
+<title>proc~remove_knots~3&#45;&gt;proc~remove_knots_a_5_8</title>
 <path fill="none" stroke="#003fff" d="M322.06,-493C343.06,-493 365.33,-493 385.61,-493"/>
 <polygon fill="#003fff" stroke="#003fff" points="385.7,-496.5 395.7,-493 385.7,-489.5 385.7,-496.5"/>
 </g>
@@ -1017,15 +1017,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~rotate_xc~2&#45;&gt;proc~rotation -->
+<!-- proc~rotate_xc~3&#45;&gt;proc~rotation -->
 <g id="program~~example3_surface~~CallsGraph_edge46" class="edge">
-<title>proc~rotate_xc~2&#45;&gt;proc~rotation</title>
+<title>proc~rotate_xc~3&#45;&gt;proc~rotation</title>
 <path fill="none" stroke="#1f00ff" d="M297.46,-167.93C307.13,-165.37 316.93,-162.4 326,-159 342.94,-152.65 345.02,-146.23 362,-140 380.82,-133.09 402.62,-128.08 420.58,-124.68"/>
 <polygon fill="#1f00ff" stroke="#1f00ff" points="421.44,-128.09 430.66,-122.87 420.2,-121.2 421.44,-128.09"/>
 </g>
-<!-- proc~rotate_xg~2&#45;&gt;proc~rotation -->
+<!-- proc~rotate_xg~3&#45;&gt;proc~rotation -->
 <g id="program~~example3_surface~~CallsGraph_edge47" class="edge">
-<title>proc~rotate_xg~2&#45;&gt;proc~rotation</title>
+<title>proc~rotate_xg~3&#45;&gt;proc~rotation</title>
 <path fill="none" stroke="#7f00ff" d="M310.26,-131.67C347.49,-128.46 391.07,-124.69 421.01,-122.11"/>
 <polygon fill="#7f00ff" stroke="#7f00ff" points="421.33,-125.59 431,-121.25 420.73,-118.62 421.33,-125.59"/>
 </g>
@@ -1098,15 +1098,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~example3_surface~~CallsGraph_edge52" class="edge">
-<title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#fff100" d="M553.78,-196.25C575.43,-194.7 597.67,-193.12 616.8,-191.76"/>
 <polygon fill="#fff100" stroke="#fff100" points="617.06,-195.25 626.79,-191.04 616.56,-188.26 617.06,-195.25"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~example3_surface~~CallsGraph_edge53" class="edge">
-<title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#bbff00" d="M552.86,-173.04C574.79,-175.85 597.39,-178.75 616.79,-181.24"/>
 <polygon fill="#bbff00" stroke="#bbff00" points="616.55,-184.74 626.92,-182.54 617.44,-177.79 616.55,-184.74"/>
 </g>
@@ -1155,39 +1155,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#6b00ff" d="M485.23,-119.75C522.52,-120.81 590.99,-122.76 633.15,-123.96"/>
 <polygon fill="#6b00ff" stroke="#6b00ff" points="633.17,-127.47 643.27,-124.25 633.37,-120.47 633.17,-127.47"/>
 </g>
-<!-- proc~cmp_degree~2 -->
+<!-- proc~cmp_degree~3 -->
 <g id="program~~example3_surface~~CallsGraph_node40" class="node">
-<title>proc~cmp_degree~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node40"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<title>proc~cmp_degree~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node40"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="950,-501 787,-501 787,-477 950,-477 950,-501"/>
 <text text-anchor="middle" x="868.5" y="-486.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge58" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#bb00ff" d="M727.67,-518.96C750.63,-514.04 777.37,-508.31 801.27,-503.19"/>
 <polygon fill="#bb00ff" stroke="#bb00ff" points="802.28,-506.55 811.33,-501.04 800.81,-499.71 802.28,-506.55"/>
 </g>
-<!-- proc~cmp_nc~2 -->
+<!-- proc~cmp_nc~3 -->
 <g id="program~~example3_surface~~CallsGraph_node41" class="node">
-<title>proc~cmp_nc~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node41"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<title>proc~cmp_nc~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node41"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="938,-543 799,-543 799,-519 938,-519 938,-543"/>
 <text text-anchor="middle" x="868.5" y="-528.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge59" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#bb00ff" d="M730.57,-531C748.91,-531 769.41,-531 788.85,-531"/>
 <polygon fill="#bb00ff" stroke="#bb00ff" points="788.91,-534.5 798.91,-531 788.91,-527.5 788.91,-534.5"/>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge60" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#ff00f1" d="M727.67,-560.96C750.63,-556.04 777.37,-550.31 801.27,-545.19"/>
 <polygon fill="#ff00f1" stroke="#ff00f1" points="802.28,-548.55 811.33,-543.04 800.81,-541.71 802.28,-548.55"/>
 </g>
@@ -1200,15 +1200,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~example3_surface~~CallsGraph_edge61" class="edge">
-<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#ff00f1" d="M730.57,-573C750.72,-573 773.49,-573 794.59,-573"/>
 <polygon fill="#ff00f1" stroke="#ff00f1" points="794.8,-576.5 804.8,-573 794.8,-569.5 794.8,-576.5"/>
 </g>
-<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge62" class="edge">
-<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#ff00a1" d="M730.57,-489C745.09,-489 760.97,-489 776.6,-489"/>
 <polygon fill="#ff00a1" stroke="#ff00a1" points="776.82,-492.5 786.82,-489 776.82,-485.5 776.82,-492.5"/>
 </g>
@@ -1272,24 +1272,24 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#e7ff00" d="M698.75,-779C733.27,-779 792.86,-779 831.2,-779"/>
 <polygon fill="#e7ff00" stroke="#e7ff00" points="831.42,-782.5 841.42,-779 831.42,-775.5 831.42,-782.5"/>
 </g>
-<!-- proc~get_multiplicity~2 -->
+<!-- proc~get_multiplicity~3 -->
 <g id="program~~example3_surface~~CallsGraph_node52" class="node">
-<title>proc~get_multiplicity~2</title>
-<g id="a_program~~example3_surface~~CallsGraph_node52"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<title>proc~get_multiplicity~3</title>
+<g id="a_program~~example3_surface~~CallsGraph_node52"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1164,-501 986,-501 986,-477 1164,-477 1164,-501"/>
 <text text-anchor="middle" x="1075" y="-486.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="program~~example3_surface~~CallsGraph_edge67" class="edge">
-<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#5cff00" d="M950.03,-489C958.47,-489 967.11,-489 975.71,-489"/>
 <polygon fill="#5cff00" stroke="#5cff00" points="975.78,-492.5 985.78,-489 975.78,-485.5 975.78,-492.5"/>
 </g>
-<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example3_surface~~CallsGraph_edge68" class="edge">
-<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff2e" d="M938.23,-528.86C998.1,-526.34 1087.13,-521.01 1164,-510 1176.38,-508.23 1189.54,-505.77 1202.04,-503.16"/>
 <polygon fill="#00ff2e" stroke="#00ff2e" points="1202.86,-506.57 1211.9,-501.05 1201.39,-499.72 1202.86,-506.57"/>
 </g>
@@ -1308,9 +1308,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#00ffb9" d="M932.25,-573C966.23,-573 1007.1,-573 1036.2,-573"/>
 <polygon fill="#00ffb9" stroke="#00ffb9" points="1036.36,-576.5 1046.36,-573 1036.35,-569.5 1036.36,-576.5"/>
 </g>
-<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example3_surface~~CallsGraph_edge70" class="edge">
-<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0000ff" d="M1164.17,-489C1172.77,-489 1181.42,-489 1189.82,-489"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="1189.93,-492.5 1199.93,-489 1189.93,-485.5 1189.93,-492.5"/>
 </g>
@@ -1417,7 +1417,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~24"></span>
+              <span class="anchor" id="variable-wc~2"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1433,7 +1433,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~24"></span>
+              <span class="anchor" id="variable-xc~2"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1449,7 +1449,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~22"></span>
+              <span class="anchor" id="variable-knot1"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1465,7 +1465,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~22"></span>
+              <span class="anchor" id="variable-knot2"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1785,7 +1785,7 @@ <h2 id="src">Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/example3_volume.html b/program/example3_volume.html
index cbd02fb4f..cc6a1884f 100644
--- a/program/example3_volume.html
+++ b/program/example3_volume.html
@@ -115,12 +115,12 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/example3_volume.html#variable-wc~46">Wc</a>
-            <a class="list-group-item" href="../program/example3_volume.html#variable-xc~46">Xc</a>
-            <a class="list-group-item" href="../program/example3_volume.html#variable-knot1~44">knot1</a>
-            <a class="list-group-item" href="../program/example3_volume.html#variable-knot2~44">knot2</a>
-            <a class="list-group-item" href="../program/example3_volume.html#variable-knot3~22">knot3</a>
-            <a class="list-group-item" href="../program/example3_volume.html#variable-nurbs~5">nurbs</a>
+            <a class="list-group-item" href="../program/example3_volume.html#variable-wc~5">Wc</a>
+            <a class="list-group-item" href="../program/example3_volume.html#variable-xc~5">Xc</a>
+            <a class="list-group-item" href="../program/example3_volume.html#variable-knot1~2">knot1</a>
+            <a class="list-group-item" href="../program/example3_volume.html#variable-knot2~2">knot2</a>
+            <a class="list-group-item" href="../program/example3_volume.html#variable-knot3">knot3</a>
+            <a class="list-group-item" href="../program/example3_volume.html#variable-nurbs~4">nurbs</a>
         </div>
       </div>
     </div>
@@ -141,7 +141,7 @@ <h4 class="card-header bg-primary text-white">Functions</h4>
       </a>
       <div id="funcs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/example3_volume.html#proc-generate_xc~5">generate_Xc</a>
+            <a class="list-group-item" href="../program/example3_volume.html#proc-generate_xc~4">generate_Xc</a>
         </div>
       </div>
     </div>
@@ -436,48 +436,48 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="110,-423 0,-423 0,-399 110,-399 110,-423"/>
 <text text-anchor="middle" x="55" y="-408.6" font-family="Helvetica,sans-Serif" font-size="10.50">example3_volume</text>
 </g>
-<!-- none~get_degree -->
+<!-- none~get_degree~2 -->
 <g id="program~~example3_volume~~CallsGraph_node2" class="node">
-<title>none~get_degree</title>
-<g id="a_program~~example3_volume~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_degree" xlink:title="nurbs_volume%get_degree">
+<title>none~get_degree~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_degree~2" xlink:title="nurbs_volume%get_degree">
 <polygon fill="#a7506f" stroke="#a7506f" points="318.5,-960 161.5,-960 161.5,-936 318.5,-936 318.5,-960"/>
 <text text-anchor="middle" x="240" y="-945.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_degree</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;none~get_degree -->
+<!-- program~example3_volume&#45;&gt;none~get_degree~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge1" class="edge">
-<title>program~example3_volume&#45;&gt;none~get_degree</title>
+<title>program~example3_volume&#45;&gt;none~get_degree~2</title>
 <path fill="none" stroke="#ff0000" d="M56.04,-423.05C56.71,-476.64 64.51,-697.53 146,-852 162.63,-883.53 192.79,-911.78 214.25,-929.34"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="212.29,-932.25 222.29,-935.75 216.65,-926.78 212.29,-932.25"/>
 </g>
-<!-- none~get_knot -->
+<!-- none~get_knot~2 -->
 <g id="program~~example3_volume~~CallsGraph_node3" class="node">
-<title>none~get_knot</title>
-<g id="a_program~~example3_volume~~CallsGraph_node3"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot" xlink:title="nurbs_volume%get_knot">
+<title>none~get_knot~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node3"><a xlink:href="../type/nurbs_volume.html#boundprocedure-get_knot~2" xlink:title="nurbs_volume%get_knot">
 <polygon fill="#a7506f" stroke="#a7506f" points="537.5,-856 394.5,-856 394.5,-832 537.5,-832 537.5,-856"/>
 <text text-anchor="middle" x="466" y="-841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;none~get_knot -->
+<!-- program~example3_volume&#45;&gt;none~get_knot~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge2" class="edge">
-<title>program~example3_volume&#45;&gt;none~get_knot</title>
+<title>program~example3_volume&#45;&gt;none~get_knot~2</title>
 <path fill="none" stroke="#ff0000" d="M56.85,-423.27C61.41,-484.94 84.96,-760.2 146,-814 216,-875.7 331.24,-869.42 402.37,-857.76"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="403.27,-861.15 412.53,-856.01 402.08,-854.26 403.27,-861.15"/>
 </g>
-<!-- none~set -->
+<!-- none~set~2 -->
 <g id="program~~example3_volume~~CallsGraph_node4" class="node">
-<title>none~set</title>
-<g id="a_program~~example3_volume~~CallsGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
+<title>none~set~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node4"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="522.5,-734 409.5,-734 409.5,-710 522.5,-710 522.5,-734"/>
 <text text-anchor="middle" x="466" y="-719.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;none~set -->
+<!-- program~example3_volume&#45;&gt;none~set~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge3" class="edge">
-<title>program~example3_volume&#45;&gt;none~set</title>
+<title>program~example3_volume&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M56.27,-423.16C57.9,-464.37 69.12,-599.78 146,-665 183.32,-696.66 317.27,-711.62 399.26,-717.95"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="399,-721.44 409.23,-718.7 399.52,-714.46 399,-721.44"/>
 </g>
@@ -496,243 +496,243 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M65.35,-423.13C80.29,-441.65 111.43,-476.71 146,-495 149.79,-497 153.76,-498.81 157.84,-500.45"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="156.92,-503.85 167.52,-503.98 159.32,-497.27 156.92,-503.85"/>
 </g>
-<!-- proc~cmp_elem -->
-<g id="program~~example3_volume~~CallsGraph_node6" class="node">
-<title>proc~cmp_elem</title>
-<g id="a_program~~example3_volume~~CallsGraph_node6"><a xlink:href="../proc/cmp_elem.html" xlink:title="nurbs_volume%cmp_elem">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="316.5,-570 163.5,-570 163.5,-546 316.5,-546 316.5,-570"/>
-<text text-anchor="middle" x="240" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
-</a>
-</g>
-</g>
-<!-- program~example3_volume&#45;&gt;proc~cmp_elem -->
-<g id="program~~example3_volume~~CallsGraph_edge5" class="edge">
-<title>program~example3_volume&#45;&gt;proc~cmp_elem</title>
-<path fill="none" stroke="#ff0000" d="M61.11,-423.32C72.37,-448.88 101.89,-507.7 146,-537 148.6,-538.73 151.33,-540.32 154.15,-541.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="152.86,-545.04 163.41,-546.01 155.77,-538.67 152.86,-545.04"/>
-</g>
 <!-- proc~cmp_elemface -->
-<g id="program~~example3_volume~~CallsGraph_node7" class="node">
+<g id="program~~example3_volume~~CallsGraph_node6" class="node">
 <title>proc~cmp_elemface</title>
-<g id="a_program~~example3_volume~~CallsGraph_node7"><a xlink:href="../proc/cmp_elemface.html" xlink:title="nurbs_volume%cmp_elemFace">
+<g id="a_program~~example3_volume~~CallsGraph_node6"><a xlink:href="../proc/cmp_elemface.html" xlink:title="nurbs_volume%cmp_elemFace">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="329,-486 151,-486 151,-462 329,-462 329,-486"/>
 <text text-anchor="middle" x="240" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elemFace</text>
 </a>
 </g>
 </g>
 <!-- program~example3_volume&#45;&gt;proc~cmp_elemface -->
-<g id="program~~example3_volume~~CallsGraph_edge6" class="edge">
+<g id="program~~example3_volume~~CallsGraph_edge5" class="edge">
 <title>program~example3_volume&#45;&gt;proc~cmp_elemface</title>
 <path fill="none" stroke="#ff0000" d="M78.38,-423.09C96.26,-432.34 122.18,-444.86 146,-453 152.78,-455.32 159.93,-457.45 167.13,-459.4"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="166.39,-462.82 176.95,-461.94 168.14,-456.05 166.39,-462.82"/>
 </g>
-<!-- proc~create -->
+<!-- proc~cmp_elem~2 -->
+<g id="program~~example3_volume~~CallsGraph_node7" class="node">
+<title>proc~cmp_elem~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node7"><a xlink:href="../proc/cmp_elem~2.html" xlink:title="nurbs_volume%cmp_elem">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="316.5,-570 163.5,-570 163.5,-546 316.5,-546 316.5,-570"/>
+<text text-anchor="middle" x="240" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem</text>
+</a>
+</g>
+</g>
+<!-- program~example3_volume&#45;&gt;proc~cmp_elem~2 -->
+<g id="program~~example3_volume~~CallsGraph_edge6" class="edge">
+<title>program~example3_volume&#45;&gt;proc~cmp_elem~2</title>
+<path fill="none" stroke="#ff0000" d="M61.11,-423.32C72.37,-448.88 101.89,-507.7 146,-537 148.6,-538.73 151.33,-540.32 154.15,-541.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="152.86,-545.04 163.41,-546.01 155.77,-538.67 152.86,-545.04"/>
+</g>
+<!-- proc~create~2 -->
 <g id="program~~example3_volume~~CallsGraph_node8" class="node">
-<title>proc~create</title>
-<g id="a_program~~example3_volume~~CallsGraph_node8"><a xlink:href="../proc/create.html" xlink:title="nurbs_volume%create">
+<title>proc~create~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node8"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_volume%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="305.5,-444 174.5,-444 174.5,-420 305.5,-420 305.5,-444"/>
 <text text-anchor="middle" x="240" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~create -->
+<!-- program~example3_volume&#45;&gt;proc~create~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge7" class="edge">
-<title>program~example3_volume&#45;&gt;proc~create</title>
+<title>program~example3_volume&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#ff0000" d="M110.41,-417.24C127.39,-419.19 146.42,-421.38 164.53,-423.45"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="164.14,-426.93 174.47,-424.6 164.94,-419.98 164.14,-426.93"/>
 </g>
-<!-- proc~elevate_degree -->
+<!-- proc~elevate_degree~2 -->
 <g id="program~~example3_volume~~CallsGraph_node9" class="node">
-<title>proc~elevate_degree</title>
-<g id="a_program~~example3_volume~~CallsGraph_node9"><a xlink:href="../proc/elevate_degree.html" xlink:title="nurbs_volume%elevate_degree">
+<title>proc~elevate_degree~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node9"><a xlink:href="../proc/elevate_degree~2.html" xlink:title="nurbs_volume%elevate_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="330,-805 150,-805 150,-781 330,-781 330,-805"/>
 <text text-anchor="middle" x="240" y="-790.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%elevate_degree</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~elevate_degree -->
+<!-- program~example3_volume&#45;&gt;proc~elevate_degree~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge8" class="edge">
-<title>program~example3_volume&#45;&gt;proc~elevate_degree</title>
+<title>program~example3_volume&#45;&gt;proc~elevate_degree~2</title>
 <path fill="none" stroke="#ff0000" d="M57.57,-423.29C64.94,-479.35 97.86,-710.33 146,-762 151.47,-767.87 158.07,-772.62 165.21,-776.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="163.95,-779.76 174.49,-780.9 166.96,-773.44 163.95,-779.76"/>
 </g>
-<!-- proc~export_xc -->
+<!-- proc~export_xc~2 -->
 <g id="program~~example3_volume~~CallsGraph_node10" class="node">
-<title>proc~export_xc</title>
-<g id="a_program~~example3_volume~~CallsGraph_node10"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_volume%export_Xc">
+<title>proc~export_xc~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node10"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_volume%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="315,-360 165,-360 165,-336 315,-336 315,-360"/>
 <text text-anchor="middle" x="240" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~export_xc -->
+<!-- program~example3_volume&#45;&gt;proc~export_xc~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge9" class="edge">
-<title>program~example3_volume&#45;&gt;proc~export_xc</title>
+<title>program~example3_volume&#45;&gt;proc~export_xc~2</title>
 <path fill="none" stroke="#ff0000" d="M78.38,-398.91C96.26,-389.66 122.18,-377.14 146,-369 152.78,-366.68 159.93,-364.55 167.13,-362.6"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="168.14,-365.95 176.95,-360.06 166.39,-359.18 168.14,-365.95"/>
 </g>
-<!-- proc~export_xg -->
+<!-- proc~export_xg~2 -->
 <g id="program~~example3_volume~~CallsGraph_node11" class="node">
-<title>proc~export_xg</title>
-<g id="a_program~~example3_volume~~CallsGraph_node11"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_volume%export_Xg">
+<title>proc~export_xg~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node11"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_volume%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="315.5,-402 164.5,-402 164.5,-378 315.5,-378 315.5,-402"/>
 <text text-anchor="middle" x="240" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~export_xg -->
+<!-- program~example3_volume&#45;&gt;proc~export_xg~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge10" class="edge">
-<title>program~example3_volume&#45;&gt;proc~export_xg</title>
+<title>program~example3_volume&#45;&gt;proc~export_xg~2</title>
 <path fill="none" stroke="#ff0000" d="M110.41,-404.76C124.19,-403.17 139.33,-401.44 154.22,-399.73"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="154.94,-403.17 164.48,-398.55 154.14,-396.21 154.94,-403.17"/>
 </g>
-<!-- proc~finalize -->
+<!-- proc~finalize~2 -->
 <g id="program~~example3_volume~~CallsGraph_node12" class="node">
-<title>proc~finalize</title>
-<g id="a_program~~example3_volume~~CallsGraph_node12"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_volume%finalize">
+<title>proc~finalize~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node12"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_volume%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="308,-318 172,-318 172,-294 308,-294 308,-318"/>
 <text text-anchor="middle" x="240" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~finalize -->
+<!-- program~example3_volume&#45;&gt;proc~finalize~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge11" class="edge">
-<title>program~example3_volume&#45;&gt;proc~finalize</title>
+<title>program~example3_volume&#45;&gt;proc~finalize~2</title>
 <path fill="none" stroke="#ff0000" d="M65.35,-398.87C80.29,-380.35 111.43,-345.29 146,-327 151.16,-324.27 156.65,-321.9 162.3,-319.83"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="163.53,-323.11 171.92,-316.64 161.32,-316.47 163.53,-323.11"/>
 </g>
-<!-- proc~generate_xc~5 -->
+<!-- proc~generate_xc~4 -->
 <g id="program~~example3_volume~~CallsGraph_node13" class="node">
-<title>proc~generate_xc~5</title>
-<g id="a_program~~example3_volume~~CallsGraph_node13"><a xlink:href="../proc/generate_xc~5.html" xlink:title="generate_Xc">
+<title>proc~generate_xc~4</title>
+<g id="a_program~~example3_volume~~CallsGraph_node13"><a xlink:href="../proc/generate_xc~4.html" xlink:title="generate_Xc">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="280,-276 200,-276 200,-252 280,-252 280,-276"/>
 <text text-anchor="middle" x="240" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">generate_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~generate_xc~5 -->
+<!-- program~example3_volume&#45;&gt;proc~generate_xc~4 -->
 <g id="program~~example3_volume~~CallsGraph_edge12" class="edge">
-<title>program~example3_volume&#45;&gt;proc~generate_xc~5</title>
+<title>program~example3_volume&#45;&gt;proc~generate_xc~4</title>
 <path fill="none" stroke="#ff0000" d="M61.11,-398.68C72.37,-373.12 101.89,-314.3 146,-285 158.88,-276.44 174.75,-271.33 189.71,-268.3"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="190.63,-271.69 199.87,-266.51 189.42,-264.8 190.63,-271.69"/>
 </g>
-<!-- proc~insert_knots -->
+<!-- proc~insert_knots~2 -->
 <g id="program~~example3_volume~~CallsGraph_node14" class="node">
-<title>proc~insert_knots</title>
-<g id="a_program~~example3_volume~~CallsGraph_node14"><a xlink:href="../proc/insert_knots.html" xlink:title="nurbs_volume%insert_knots">
+<title>proc~insert_knots~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node14"><a xlink:href="../proc/insert_knots~2.html" xlink:title="nurbs_volume%insert_knots">
 <polygon fill="#d9534f" stroke="#d9534f" points="320.5,-656 159.5,-656 159.5,-632 320.5,-632 320.5,-656"/>
 <text text-anchor="middle" x="240" y="-641.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%insert_knots</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~insert_knots -->
+<!-- program~example3_volume&#45;&gt;proc~insert_knots~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge13" class="edge">
-<title>program~example3_volume&#45;&gt;proc~insert_knots</title>
+<title>program~example3_volume&#45;&gt;proc~insert_knots~2</title>
 <path fill="none" stroke="#ff0000" d="M60.24,-423.16C70.94,-452.57 101.39,-528.78 146,-579 163.28,-598.45 187.48,-615.13 206.87,-626.73"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="205.27,-629.84 215.67,-631.84 208.78,-623.79 205.27,-629.84"/>
 </g>
-<!-- proc~remove_knots -->
+<!-- proc~remove_knots~2 -->
 <g id="program~~example3_volume~~CallsGraph_node15" class="node">
-<title>proc~remove_knots</title>
-<g id="a_program~~example3_volume~~CallsGraph_node15"><a xlink:href="../proc/remove_knots.html" xlink:title="nurbs_volume%remove_knots">
+<title>proc~remove_knots~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node15"><a xlink:href="../proc/remove_knots~2.html" xlink:title="nurbs_volume%remove_knots">
 <polygon fill="#d9534f" stroke="#d9534f" points="326,-753 154,-753 154,-729 326,-729 326,-753"/>
 <text text-anchor="middle" x="240" y="-738.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%remove_knots</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~remove_knots -->
+<!-- program~example3_volume&#45;&gt;proc~remove_knots~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge14" class="edge">
-<title>program~example3_volume&#45;&gt;proc~remove_knots</title>
+<title>program~example3_volume&#45;&gt;proc~remove_knots~2</title>
 <path fill="none" stroke="#ff0000" d="M55.96,-423.14C56.48,-467.7 64.29,-624.12 146,-709 152.19,-715.44 159.74,-720.58 167.83,-724.68"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="166.59,-727.97 177.14,-728.9 169.47,-721.59 166.59,-727.97"/>
 </g>
-<!-- proc~rotate_xc -->
+<!-- proc~rotate_xc~2 -->
 <g id="program~~example3_volume~~CallsGraph_node16" class="node">
-<title>proc~rotate_xc</title>
-<g id="a_program~~example3_volume~~CallsGraph_node16"><a xlink:href="../proc/rotate_xc.html" xlink:title="nurbs_volume%rotate_Xc">
+<title>proc~rotate_xc~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node16"><a xlink:href="../proc/rotate_xc~2.html" xlink:title="nurbs_volume%rotate_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="314,-234 166,-234 166,-210 314,-210 314,-234"/>
 <text text-anchor="middle" x="240" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%rotate_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~rotate_xc -->
+<!-- program~example3_volume&#45;&gt;proc~rotate_xc~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge15" class="edge">
-<title>program~example3_volume&#45;&gt;proc~rotate_xc</title>
+<title>program~example3_volume&#45;&gt;proc~rotate_xc~2</title>
 <path fill="none" stroke="#ff0000" d="M58.87,-398.54C66.78,-367.1 92.02,-284.08 146,-243 149.24,-240.53 152.72,-238.35 156.36,-236.41"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="158.09,-239.47 165.69,-232.09 155.15,-233.11 158.09,-239.47"/>
 </g>
-<!-- proc~rotate_xg -->
+<!-- proc~rotate_xg~2 -->
 <g id="program~~example3_volume~~CallsGraph_node17" class="node">
-<title>proc~rotate_xg</title>
-<g id="a_program~~example3_volume~~CallsGraph_node17"><a xlink:href="../proc/rotate_xg.html" xlink:title="nurbs_volume%rotate_Xg">
+<title>proc~rotate_xg~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node17"><a xlink:href="../proc/rotate_xg~2.html" xlink:title="nurbs_volume%rotate_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="314,-192 166,-192 166,-168 314,-168 314,-192"/>
 <text text-anchor="middle" x="240" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%rotate_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~rotate_xg -->
+<!-- program~example3_volume&#45;&gt;proc~rotate_xg~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge16" class="edge">
-<title>program~example3_volume&#45;&gt;proc~rotate_xg</title>
+<title>program~example3_volume&#45;&gt;proc~rotate_xg~2</title>
 <path fill="none" stroke="#ff0000" d="M57.4,-398.78C62.24,-362.48 81.66,-254.53 146,-201 149.29,-198.26 152.87,-195.86 156.64,-193.76"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="158.25,-196.87 165.74,-189.38 155.22,-190.56 158.25,-196.87"/>
 </g>
-<!-- proc~set_elem -->
+<!-- proc~set_elem~2 -->
 <g id="program~~example3_volume~~CallsGraph_node18" class="node">
-<title>proc~set_elem</title>
-<g id="a_program~~example3_volume~~CallsGraph_node18"><a xlink:href="../proc/set_elem.html" xlink:title="nurbs_volume%set_elem">
+<title>proc~set_elem~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node18"><a xlink:href="../proc/set_elem~2.html" xlink:title="nurbs_volume%set_elem">
 <polygon fill="#d9534f" stroke="#d9534f" points="312.5,-150 167.5,-150 167.5,-126 312.5,-126 312.5,-150"/>
 <text text-anchor="middle" x="240" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_elem</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~set_elem -->
+<!-- program~example3_volume&#45;&gt;proc~set_elem~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge17" class="edge">
-<title>program~example3_volume&#45;&gt;proc~set_elem</title>
+<title>program~example3_volume&#45;&gt;proc~set_elem~2</title>
 <path fill="none" stroke="#ff0000" d="M56.43,-398.78C58.57,-357.96 71.23,-225.23 146,-159 149.68,-155.74 153.75,-152.96 158.09,-150.58"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="159.73,-153.67 167.29,-146.25 156.75,-147.34 159.73,-153.67"/>
 </g>
-<!-- proc~show -->
+<!-- proc~show~2 -->
 <g id="program~~example3_volume~~CallsGraph_node19" class="node">
-<title>proc~show</title>
-<g id="a_program~~example3_volume~~CallsGraph_node19"><a xlink:href="../proc/show.html" xlink:title="nurbs_volume%show">
+<title>proc~show~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node19"><a xlink:href="../proc/show~2.html" xlink:title="nurbs_volume%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="302,-108 178,-108 178,-84 302,-84 302,-108"/>
 <text text-anchor="middle" x="240" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%show</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~show -->
+<!-- program~example3_volume&#45;&gt;proc~show~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge18" class="edge">
-<title>program~example3_volume&#45;&gt;proc~show</title>
+<title>program~example3_volume&#45;&gt;proc~show~2</title>
 <path fill="none" stroke="#ff0000" d="M55.72,-398.72C55.41,-353.69 60.69,-196.14 146,-117 152.44,-111.03 160.2,-106.63 168.46,-103.41"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="169.57,-106.73 177.95,-100.25 167.36,-100.09 169.57,-106.73"/>
 </g>
-<!-- proc~translate_xc -->
+<!-- proc~translate_xc~2 -->
 <g id="program~~example3_volume~~CallsGraph_node20" class="node">
-<title>proc~translate_xc</title>
-<g id="a_program~~example3_volume~~CallsGraph_node20"><a xlink:href="../proc/translate_xc.html" xlink:title="nurbs_volume%translate_Xc">
+<title>proc~translate_xc~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node20"><a xlink:href="../proc/translate_xc~2.html" xlink:title="nurbs_volume%translate_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="321.5,-66 158.5,-66 158.5,-42 321.5,-42 321.5,-66"/>
 <text text-anchor="middle" x="240" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%translate_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~translate_xc -->
+<!-- program~example3_volume&#45;&gt;proc~translate_xc~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge19" class="edge">
-<title>program~example3_volume&#45;&gt;proc~translate_xc</title>
+<title>program~example3_volume&#45;&gt;proc~translate_xc~2</title>
 <path fill="none" stroke="#ff0000" d="M57.58,-398.76C64.9,-343.97 97.24,-121.87 146,-75 147.27,-73.78 148.6,-72.62 149.97,-71.53"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="151.98,-74.39 158.33,-65.91 148.08,-68.58 151.98,-74.39"/>
 </g>
-<!-- proc~translate_xg -->
+<!-- proc~translate_xg~2 -->
 <g id="program~~example3_volume~~CallsGraph_node21" class="node">
-<title>proc~translate_xg</title>
-<g id="a_program~~example3_volume~~CallsGraph_node21"><a xlink:href="../proc/translate_xg.html" xlink:title="nurbs_volume%translate_Xg">
+<title>proc~translate_xg~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node21"><a xlink:href="../proc/translate_xg~2.html" xlink:title="nurbs_volume%translate_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="322,-24 158,-24 158,0 322,0 322,-24"/>
 <text text-anchor="middle" x="240" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%translate_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~example3_volume&#45;&gt;proc~translate_xg -->
+<!-- program~example3_volume&#45;&gt;proc~translate_xg~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge20" class="edge">
-<title>program~example3_volume&#45;&gt;proc~translate_xg</title>
+<title>program~example3_volume&#45;&gt;proc~translate_xg~2</title>
 <path fill="none" stroke="#ff0000" d="M57.18,-398.85C63.15,-340.16 91.78,-86.59 146,-33 147.1,-31.91 148.25,-30.87 149.44,-29.88"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="151.6,-32.64 157.79,-24.04 147.59,-26.9 151.6,-32.64"/>
 </g>
@@ -745,9 +745,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- none~get_degree&#45;&gt;proc~get_degree_all -->
+<!-- none~get_degree~2&#45;&gt;proc~get_degree_all -->
 <g id="program~~example3_volume~~CallsGraph_edge21" class="edge">
-<title>none~get_degree&#45;&gt;proc~get_degree_all</title>
+<title>none~get_degree~2&#45;&gt;proc~get_degree_all</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M318.72,-948C334.62,-948 351.55,-948 368.03,-948"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="368.23,-951.5 378.23,-948 368.23,-944.5 368.23,-951.5"/>
 </g>
@@ -760,99 +760,99 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- none~get_degree&#45;&gt;proc~get_degree_dir -->
+<!-- none~get_degree~2&#45;&gt;proc~get_degree_dir -->
 <g id="program~~example3_volume~~CallsGraph_edge22" class="edge">
-<title>none~get_degree&#45;&gt;proc~get_degree_dir</title>
+<title>none~get_degree~2&#45;&gt;proc~get_degree_dir</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M305.19,-960.04C331.9,-965.04 363.08,-970.89 390.77,-976.08"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="390.33,-979.56 400.8,-977.96 391.62,-972.68 390.33,-979.56"/>
 </g>
-<!-- proc~get_knot_all -->
+<!-- proc~get_knot_all~2 -->
 <g id="program~~example3_volume~~CallsGraph_node33" class="node">
-<title>proc~get_knot_all</title>
-<g id="a_program~~example3_volume~~CallsGraph_node33"><a xlink:href="../proc/get_knot_all.html" xlink:title="nurbs_volume%get_knot_all">
+<title>proc~get_knot_all~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node33"><a xlink:href="../proc/get_knot_all~2.html" xlink:title="nurbs_volume%get_knot_all">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="759,-856 598,-856 598,-832 759,-832 759,-856"/>
 <text text-anchor="middle" x="678.5" y="-841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knot_all</text>
 </a>
 </g>
 </g>
-<!-- none~get_knot&#45;&gt;proc~get_knot_all -->
+<!-- none~get_knot~2&#45;&gt;proc~get_knot_all~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge23" class="edge">
-<title>none~get_knot&#45;&gt;proc~get_knot_all</title>
+<title>none~get_knot~2&#45;&gt;proc~get_knot_all~2</title>
 <path fill="none" stroke="#ff4c00" stroke-dasharray="5,2" d="M537.68,-844C553.7,-844 570.93,-844 587.63,-844"/>
 <polygon fill="#ff4c00" stroke="#ff4c00" points="587.94,-847.5 597.94,-844 587.94,-840.5 587.94,-847.5"/>
 </g>
-<!-- proc~get_knoti -->
+<!-- proc~get_knoti~2 -->
 <g id="program~~example3_volume~~CallsGraph_node34" class="node">
-<title>proc~get_knoti</title>
-<g id="a_program~~example3_volume~~CallsGraph_node34"><a xlink:href="../proc/get_knoti.html" xlink:title="nurbs_volume%get_knoti">
+<title>proc~get_knoti~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node34"><a xlink:href="../proc/get_knoti~2.html" xlink:title="nurbs_volume%get_knoti">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="751.5,-898 605.5,-898 605.5,-874 751.5,-874 751.5,-898"/>
 <text text-anchor="middle" x="678.5" y="-883.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_knoti</text>
 </a>
 </g>
 </g>
-<!-- none~get_knot&#45;&gt;proc~get_knoti -->
+<!-- none~get_knot~2&#45;&gt;proc~get_knoti~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge24" class="edge">
-<title>none~get_knot&#45;&gt;proc~get_knoti</title>
+<title>none~get_knot~2&#45;&gt;proc~get_knoti~2</title>
 <path fill="none" stroke="#ff4c00" stroke-dasharray="5,2" d="M527.32,-856.04C552.2,-861 581.21,-866.79 607.06,-871.95"/>
 <polygon fill="#ff4c00" stroke="#ff4c00" points="606.68,-875.44 617.17,-873.96 608.05,-868.57 606.68,-875.44"/>
 </g>
-<!-- proc~set1 -->
+<!-- proc~set1~2 -->
 <g id="program~~example3_volume~~CallsGraph_node40" class="node">
-<title>proc~set1</title>
-<g id="a_program~~example3_volume~~CallsGraph_node40"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
+<title>proc~set1~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node40"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="738.5,-692 618.5,-692 618.5,-668 738.5,-668 738.5,-692"/>
 <text text-anchor="middle" x="678.5" y="-677.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set1 -->
+<!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge25" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
+<title>none~set~2&#45;&gt;proc~set1~2</title>
 <path fill="none" stroke="#ff9900" stroke-dasharray="5,2" d="M522.58,-710.91C548.83,-705.67 580.44,-699.37 608.23,-693.82"/>
 <polygon fill="#ff9900" stroke="#ff9900" points="609.16,-697.2 618.29,-691.81 607.79,-690.34 609.16,-697.2"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set2~2 -->
 <g id="program~~example3_volume~~CallsGraph_node41" class="node">
-<title>proc~set2</title>
-<g id="a_program~~example3_volume~~CallsGraph_node41"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
+<title>proc~set2~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node41"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="738.5,-776 618.5,-776 618.5,-752 738.5,-752 738.5,-776"/>
 <text text-anchor="middle" x="678.5" y="-761.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set2 -->
+<!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge26" class="edge">
-<title>none~set&#45;&gt;proc~set2</title>
+<title>none~set~2&#45;&gt;proc~set2~2</title>
 <path fill="none" stroke="#ff9900" stroke-dasharray="5,2" d="M522.58,-733.09C548.83,-738.33 580.44,-744.63 608.23,-750.18"/>
 <polygon fill="#ff9900" stroke="#ff9900" points="607.79,-753.66 618.29,-752.19 609.16,-746.8 607.79,-753.66"/>
 </g>
-<!-- proc~set3 -->
+<!-- proc~set3~2 -->
 <g id="program~~example3_volume~~CallsGraph_node42" class="node">
-<title>proc~set3</title>
-<g id="a_program~~example3_volume~~CallsGraph_node42"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
+<title>proc~set3~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node42"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="738.5,-650 618.5,-650 618.5,-626 738.5,-626 738.5,-650"/>
 <text text-anchor="middle" x="678.5" y="-635.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set3 -->
+<!-- none~set~2&#45;&gt;proc~set3~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge27" class="edge">
-<title>none~set&#45;&gt;proc~set3</title>
+<title>none~set~2&#45;&gt;proc~set3~2</title>
 <path fill="none" stroke="#ff9900" stroke-dasharray="5,2" d="M522.54,-715.95C536.1,-712.83 550.12,-708.12 562,-701 583.09,-688.36 577.17,-672.06 598,-659 601.54,-656.78 605.3,-654.8 609.2,-653.02"/>
 <polygon fill="#ff9900" stroke="#ff9900" points="610.55,-656.25 618.49,-649.24 607.91,-649.77 610.55,-656.25"/>
 </g>
-<!-- proc~set4 -->
+<!-- proc~set4~2 -->
 <g id="program~~example3_volume~~CallsGraph_node43" class="node">
-<title>proc~set4</title>
-<g id="a_program~~example3_volume~~CallsGraph_node43"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
+<title>proc~set4~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node43"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="738.5,-734 618.5,-734 618.5,-710 738.5,-710 738.5,-734"/>
 <text text-anchor="middle" x="678.5" y="-719.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set4 -->
+<!-- none~set~2&#45;&gt;proc~set4~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge28" class="edge">
-<title>none~set&#45;&gt;proc~set4</title>
+<title>none~set~2&#45;&gt;proc~set4~2</title>
 <path fill="none" stroke="#ff9900" stroke-dasharray="5,2" d="M522.58,-722C548.83,-722 580.44,-722 608.23,-722"/>
 <polygon fill="#ff9900" stroke="#ff9900" points="608.29,-725.5 618.29,-722 608.29,-718.5 608.29,-725.5"/>
 </g>
@@ -865,11 +865,11 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem&#45;&gt;interface~elemconn_cn -->
+<!-- proc~cmp_elem~2&#45;&gt;interface~elemconn_cn -->
 <g id="program~~example3_volume~~CallsGraph_edge29" class="edge">
-<title>proc~cmp_elem&#45;&gt;interface~elemconn_cn</title>
-<path fill="none" stroke="#cbff00" d="M305.19,-545.96C339.14,-539.6 380.3,-531.88 412.34,-525.87"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="413.22,-529.27 422.41,-523.99 411.93,-522.39 413.22,-529.27"/>
+<title>proc~cmp_elem~2&#45;&gt;interface~elemconn_cn</title>
+<path fill="none" stroke="#7fff00" d="M305.19,-545.96C339.14,-539.6 380.3,-531.88 412.34,-525.87"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="413.22,-529.27 422.41,-523.99 411.93,-522.39 413.22,-529.27"/>
 </g>
 <!-- interface~unique -->
 <g id="program~~example3_volume~~CallsGraph_node26" class="node">
@@ -880,39 +880,39 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem&#45;&gt;interface~unique -->
+<!-- proc~cmp_elem~2&#45;&gt;interface~unique -->
 <g id="program~~example3_volume~~CallsGraph_edge30" class="edge">
-<title>proc~cmp_elem&#45;&gt;interface~unique</title>
-<path fill="none" stroke="#cbff00" d="M315.31,-545.85C321.85,-543.42 328.19,-540.5 334,-537 355.06,-524.31 349.1,-507.95 370,-495 387.69,-484.04 410.17,-478.07 428.82,-474.83"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="429.39,-478.28 438.73,-473.29 428.31,-471.37 429.39,-478.28"/>
+<title>proc~cmp_elem~2&#45;&gt;interface~unique</title>
+<path fill="none" stroke="#7fff00" d="M315.31,-545.85C321.85,-543.42 328.19,-540.5 334,-537 355.06,-524.31 349.1,-507.95 370,-495 387.69,-484.04 410.17,-478.07 428.82,-474.83"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="429.39,-478.28 438.73,-473.29 428.31,-471.37 429.39,-478.28"/>
 </g>
-<!-- proc~get_multiplicity -->
+<!-- proc~get_multiplicity~2 -->
 <g id="program~~example3_volume~~CallsGraph_node35" class="node">
-<title>proc~get_multiplicity</title>
-<g id="a_program~~example3_volume~~CallsGraph_node35"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
+<title>proc~get_multiplicity~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node35"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1172,-571 994,-571 994,-547 1172,-547 1172,-571"/>
 <text text-anchor="middle" x="1083" y="-556.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem&#45;&gt;proc~get_multiplicity -->
+<!-- proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge31" class="edge">
-<title>proc~cmp_elem&#45;&gt;proc~get_multiplicity</title>
-<path fill="none" stroke="#cbff00" d="M316.74,-558.09C469.37,-558.27 813.79,-558.68 983.58,-558.88"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="983.76,-562.38 993.77,-558.9 983.77,-555.38 983.76,-562.38"/>
+<title>proc~cmp_elem~2&#45;&gt;proc~get_multiplicity~2</title>
+<path fill="none" stroke="#7fff00" d="M316.74,-558.09C469.37,-558.27 813.79,-558.68 983.58,-558.88"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="983.76,-562.38 993.77,-558.9 983.77,-555.38 983.76,-562.38"/>
 </g>
-<!-- interface~compute_xg -->
+<!-- interface~compute_xg~2 -->
 <g id="program~~example3_volume~~CallsGraph_node23" class="node">
-<title>interface~compute_xg</title>
-<g id="a_program~~example3_volume~~CallsGraph_node23"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node23"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="505.5,-441 426.5,-441 426.5,-417 505.5,-417 505.5,-441"/>
 <text text-anchor="middle" x="466" y="-426.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;interface~compute_xg -->
+<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge32" class="edge">
-<title>proc~create&#45;&gt;interface~compute_xg</title>
+<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
 <path fill="none" stroke="#33ff00" d="M305.79,-431.13C341,-430.66 383.83,-430.09 416.2,-429.65"/>
 <polygon fill="#33ff00" stroke="#33ff00" points="416.36,-433.15 426.31,-429.52 416.27,-426.15 416.36,-433.15"/>
 </g>
@@ -925,36 +925,36 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;interface~ndgrid -->
+<!-- proc~create~2&#45;&gt;interface~ndgrid -->
 <g id="program~~example3_volume~~CallsGraph_edge33" class="edge">
-<title>proc~create&#45;&gt;interface~ndgrid</title>
+<title>proc~create~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#33ff00" d="M298.78,-419.92C310.49,-417.2 322.68,-414.17 334,-411 366.57,-401.88 403,-389.46 429.16,-380.14"/>
 <polygon fill="#33ff00" stroke="#33ff00" points="430.42,-383.4 438.65,-376.73 428.06,-376.82 430.42,-383.4"/>
 </g>
-<!-- proc~is_rational -->
+<!-- proc~is_rational~2 -->
 <g id="program~~example3_volume~~CallsGraph_node37" class="node">
-<title>proc~is_rational</title>
-<g id="a_program~~example3_volume~~CallsGraph_node37"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
+<title>proc~is_rational~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node37"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="542,-337 390,-337 390,-313 542,-313 542,-337"/>
 <text text-anchor="middle" x="466" y="-322.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;proc~is_rational -->
+<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge34" class="edge">
-<title>proc~create&#45;&gt;proc~is_rational</title>
+<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
 <path fill="none" stroke="#33ff00" d="M305.65,-424.86C315.79,-421.71 325.66,-417.26 334,-411 360.42,-391.18 343.54,-365.76 370,-346 373.26,-343.57 376.74,-341.41 380.38,-339.49"/>
 <polygon fill="#33ff00" stroke="#33ff00" points="382.08,-342.56 389.71,-335.2 379.16,-336.2 382.08,-342.56"/>
 </g>
-<!-- proc~elevate_degree&#45;&gt;none~get_knot -->
+<!-- proc~elevate_degree~2&#45;&gt;none~get_knot~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge35" class="edge">
-<title>proc~elevate_degree&#45;&gt;none~get_knot</title>
+<title>proc~elevate_degree~2&#45;&gt;none~get_knot~2</title>
 <path fill="none" stroke="#00ff19" d="M292.13,-805.03C315.81,-810.56 344.32,-817.18 370,-823 379.76,-825.21 390.09,-827.53 400.21,-829.78"/>
 <polygon fill="#00ff19" stroke="#00ff19" points="399.7,-833.25 410.22,-832 401.22,-826.42 399.7,-833.25"/>
 </g>
-<!-- proc~elevate_degree&#45;&gt;none~set -->
+<!-- proc~elevate_degree~2&#45;&gt;none~set~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge36" class="edge">
-<title>proc~elevate_degree&#45;&gt;none~set</title>
+<title>proc~elevate_degree~2&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#00ff19" d="M279,-780.96C317.13,-768.87 375.98,-750.22 417.25,-737.14"/>
 <polygon fill="#00ff19" stroke="#00ff19" points="418.34,-740.46 426.82,-734.1 416.22,-733.79 418.34,-740.46"/>
 </g>
@@ -967,51 +967,51 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~elevate_degree&#45;&gt;proc~elevate_degree_a_5_9 -->
+<!-- proc~elevate_degree~2&#45;&gt;proc~elevate_degree_a_5_9 -->
 <g id="program~~example3_volume~~CallsGraph_edge37" class="edge">
-<title>proc~elevate_degree&#45;&gt;proc~elevate_degree_a_5_9</title>
+<title>proc~elevate_degree~2&#45;&gt;proc~elevate_degree_a_5_9</title>
 <path fill="none" stroke="#00ff19" d="M261.21,-805.12C286.32,-819.99 330.67,-845.6 370,-865 387.78,-873.77 407.88,-882.6 425,-889.8"/>
 <polygon fill="#00ff19" stroke="#00ff19" points="424.12,-893.23 434.69,-893.84 426.81,-886.76 424.12,-893.23"/>
 </g>
-<!-- proc~cmp_elem_xc_vis -->
+<!-- proc~cmp_elem_xc_vis~2 -->
 <g id="program~~example3_volume~~CallsGraph_node27" class="node">
-<title>proc~cmp_elem_xc_vis</title>
-<g id="a_program~~example3_volume~~CallsGraph_node27"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node27"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="561.5,-238 370.5,-238 370.5,-214 561.5,-214 561.5,-238"/>
 <text text-anchor="middle" x="466" y="-223.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
+<!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge38" class="edge">
-<title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
+<title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
 <path fill="none" stroke="#00ff66" d="M315.32,-337.63C322.01,-334.84 328.37,-331.36 334,-327 361.66,-305.58 343.37,-279.69 370,-257 377.25,-250.82 385.77,-245.87 394.67,-241.9"/>
 <polygon fill="#00ff66" stroke="#00ff66" points="396.08,-245.1 404.04,-238.1 393.46,-238.61 396.08,-245.1"/>
 </g>
-<!-- proc~cmp_elem_xg_vis -->
+<!-- proc~cmp_elem_xg_vis~2 -->
 <g id="program~~example3_volume~~CallsGraph_node28" class="node">
-<title>proc~cmp_elem_xg_vis</title>
-<g id="a_program~~example3_volume~~CallsGraph_node28"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node28"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="562,-290 370,-290 370,-266 562,-266 562,-290"/>
 <text text-anchor="middle" x="466" y="-275.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
+<!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge39" class="edge">
-<title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
+<title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
 <path fill="none" stroke="#00ffb2" d="M315.65,-379.26C322.2,-376.54 328.44,-373.17 334,-369 360.42,-349.18 344.03,-324.41 370,-304 374.74,-300.28 379.97,-297.09 385.47,-294.35"/>
 <polygon fill="#00ffb2" stroke="#00ffb2" points="387.21,-297.41 394.95,-290.17 384.38,-291.01 387.21,-297.41"/>
 </g>
-<!-- proc~insert_knots&#45;&gt;none~get_knot -->
+<!-- proc~insert_knots~2&#45;&gt;none~get_knot~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge41" class="edge">
-<title>proc~insert_knots&#45;&gt;none~get_knot</title>
+<title>proc~insert_knots~2&#45;&gt;none~get_knot~2</title>
 <path fill="none" stroke="#0066ff" d="M261.57,-656.02C282.53,-669.25 314.62,-692.33 334,-720 361.82,-759.72 333.74,-790.8 370,-823 374.45,-826.95 379.48,-830.21 384.83,-832.9"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="383.55,-836.16 394.12,-836.9 386.32,-829.73 383.55,-836.16"/>
 </g>
-<!-- proc~insert_knots&#45;&gt;none~set -->
+<!-- proc~insert_knots~2&#45;&gt;none~set~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge42" class="edge">
-<title>proc~insert_knots&#45;&gt;none~set</title>
+<title>proc~insert_knots~2&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#0066ff" d="M274.15,-656C292.1,-662.8 314.53,-671.77 334,-681 350.54,-688.84 352.89,-694.51 370,-701 379.36,-704.55 389.47,-707.58 399.49,-710.14"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="398.91,-713.6 409.45,-712.55 400.55,-706.8 398.91,-713.6"/>
 </g>
@@ -1024,9 +1024,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~insert_knots&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~insert_knots~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example3_volume~~CallsGraph_edge40" class="edge">
-<title>proc~insert_knots&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~insert_knots~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0066ff" d="M286.91,-631.99C311.38,-626.19 342.12,-619.89 370,-617 629.94,-590.09 698.94,-582.63 958,-617 1056.01,-630 1166.95,-665.1 1226.24,-685.58"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="1225.4,-688.99 1235.99,-688.98 1227.7,-682.38 1225.4,-688.99"/>
 </g>
@@ -1039,9 +1039,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~insert_knots&#45;&gt;proc~findspan -->
+<!-- proc~insert_knots~2&#45;&gt;proc~findspan -->
 <g id="program~~example3_volume~~CallsGraph_edge43" class="edge">
-<title>proc~insert_knots&#45;&gt;proc~findspan</title>
+<title>proc~insert_knots~2&#45;&gt;proc~findspan</title>
 <path fill="none" stroke="#0066ff" d="M315.9,-656.04C353.1,-662.02 396.46,-668.99 426.8,-673.86"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="426.53,-677.36 436.96,-675.49 427.64,-670.45 426.53,-677.36"/>
 </g>
@@ -1054,33 +1054,33 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~insert_knots&#45;&gt;proc~insert_knot_a_5_1 -->
+<!-- proc~insert_knots~2&#45;&gt;proc~insert_knot_a_5_1 -->
 <g id="program~~example3_volume~~CallsGraph_edge44" class="edge">
-<title>proc~insert_knots&#45;&gt;proc~insert_knot_a_5_1</title>
+<title>proc~insert_knots~2&#45;&gt;proc~insert_knot_a_5_1</title>
 <path fill="none" stroke="#0066ff" d="M320.6,-641.87C347.24,-641.15 376.55,-640.37 401.76,-639.69"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="402.03,-643.19 411.94,-639.42 401.84,-636.19 402.03,-643.19"/>
 </g>
-<!-- proc~remove_knots&#45;&gt;none~get_knot -->
+<!-- proc~remove_knots~2&#45;&gt;none~get_knot~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge46" class="edge">
-<title>proc~remove_knots&#45;&gt;none~get_knot</title>
+<title>proc~remove_knots~2&#45;&gt;none~get_knot~2</title>
 <path fill="none" stroke="#0019ff" d="M296.45,-753.13C309.56,-757.66 322.93,-763.78 334,-772 356.27,-788.55 346.9,-807.64 370,-823 374.57,-826.04 379.51,-828.65 384.66,-830.88"/>
 <polygon fill="#0019ff" stroke="#0019ff" points="383.51,-834.19 394.1,-834.51 386.02,-827.66 383.51,-834.19"/>
 </g>
-<!-- proc~remove_knots&#45;&gt;none~set -->
+<!-- proc~remove_knots~2&#45;&gt;none~set~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge47" class="edge">
-<title>proc~remove_knots&#45;&gt;none~set</title>
+<title>proc~remove_knots~2&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#0019ff" d="M326,-733.79C350.15,-731.74 376.08,-729.54 398.93,-727.6"/>
 <polygon fill="#0019ff" stroke="#0019ff" points="399.52,-731.07 409.19,-726.73 398.93,-724.09 399.52,-731.07"/>
 </g>
-<!-- proc~remove_knots&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~remove_knots~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example3_volume~~CallsGraph_edge45" class="edge">
-<title>proc~remove_knots&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~remove_knots~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0019ff" d="M326.32,-751.78C427.59,-764.54 584.58,-784.18 598,-785 725.32,-792.82 1052.48,-829.56 1172,-785 1206.12,-772.28 1236.22,-741.55 1253.52,-721"/>
 <polygon fill="#0019ff" stroke="#0019ff" points="1256.31,-723.12 1259.92,-713.16 1250.88,-718.7 1256.31,-723.12"/>
 </g>
-<!-- proc~remove_knots&#45;&gt;proc~findspan -->
+<!-- proc~remove_knots~2&#45;&gt;proc~findspan -->
 <g id="program~~example3_volume~~CallsGraph_edge48" class="edge">
-<title>proc~remove_knots&#45;&gt;proc~findspan</title>
+<title>proc~remove_knots~2&#45;&gt;proc~findspan</title>
 <path fill="none" stroke="#0019ff" d="M276.91,-728.99C302.66,-720.59 338.27,-709.41 370,-701 388.56,-696.08 409.37,-691.39 426.78,-687.69"/>
 <polygon fill="#0019ff" stroke="#0019ff" points="427.51,-691.11 436.58,-685.64 426.08,-684.26 427.51,-691.11"/>
 </g>
@@ -1093,9 +1093,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~remove_knots&#45;&gt;proc~remove_knots_a_5_8 -->
+<!-- proc~remove_knots~2&#45;&gt;proc~remove_knots_a_5_8 -->
 <g id="program~~example3_volume~~CallsGraph_edge49" class="edge">
-<title>proc~remove_knots&#45;&gt;proc~remove_knots_a_5_8</title>
+<title>proc~remove_knots~2&#45;&gt;proc~remove_knots_a_5_8</title>
 <path fill="none" stroke="#0019ff" d="M285.26,-753.05C321.3,-762.87 372.35,-776.77 410.84,-787.25"/>
 <polygon fill="#0019ff" stroke="#0019ff" points="410.27,-790.72 420.84,-789.97 412.11,-783.97 410.27,-790.72"/>
 </g>
@@ -1108,15 +1108,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~rotate_xc&#45;&gt;proc~rotation -->
+<!-- proc~rotate_xc~2&#45;&gt;proc~rotation -->
 <g id="program~~example3_volume~~CallsGraph_edge50" class="edge">
-<title>proc~rotate_xc&#45;&gt;proc~rotation</title>
+<title>proc~rotate_xc~2&#45;&gt;proc~rotation</title>
 <path fill="none" stroke="#3200ff" d="M310.04,-209.98C349.19,-203.16 396.6,-194.91 428.58,-189.34"/>
 <polygon fill="#3200ff" stroke="#3200ff" points="429.55,-192.72 438.8,-187.56 428.35,-185.83 429.55,-192.72"/>
 </g>
-<!-- proc~rotate_xg&#45;&gt;proc~rotation -->
+<!-- proc~rotate_xg~2&#45;&gt;proc~rotation -->
 <g id="program~~example3_volume~~CallsGraph_edge51" class="edge">
-<title>proc~rotate_xg&#45;&gt;proc~rotation</title>
+<title>proc~rotate_xg~2&#45;&gt;proc~rotation</title>
 <path fill="none" stroke="#7f00ff" d="M314.04,-180.98C352.41,-181.49 397.75,-182.1 428.66,-182.51"/>
 <polygon fill="#7f00ff" stroke="#7f00ff" points="428.91,-186.02 438.96,-182.65 429,-179.02 428.91,-186.02"/>
 </g>
@@ -1264,15 +1264,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~example3_volume~~CallsGraph_edge61" class="edge">
-<title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#a2ff00" d="M561.78,-226C583.33,-226 605.46,-226 624.53,-226"/>
 <polygon fill="#a2ff00" stroke="#a2ff00" points="624.79,-229.5 634.79,-226 624.79,-222.5 624.79,-229.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~example3_volume~~CallsGraph_edge62" class="edge">
-<title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#5cff00" d="M515.82,-265.94C548.51,-257.86 591.51,-247.24 624.95,-238.98"/>
 <polygon fill="#5cff00" stroke="#5cff00" points="626.13,-242.3 635,-236.5 624.45,-235.5 626.13,-242.3"/>
 </g>
@@ -1297,9 +1297,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#17ff00" d="M527.1,-918.05C538.74,-920.74 550.81,-923.76 562,-927 578.34,-931.73 581.91,-934.47 598,-940 611.79,-944.74 626.99,-949.76 640.37,-954.12"/>
 <polygon fill="#17ff00" stroke="#17ff00" points="639.61,-957.55 650.2,-957.3 641.77,-950.89 639.61,-957.55"/>
 </g>
-<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example3_volume~~CallsGraph_edge65" class="edge">
-<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0073ff" d="M1142.48,-571.01C1152.8,-574.57 1163.08,-579.14 1172,-585 1209.92,-609.89 1240.84,-654.02 1256.93,-680.09"/>
 <polygon fill="#0073ff" stroke="#0073ff" points="1254.02,-682.04 1262.18,-688.8 1260.02,-678.43 1254.02,-682.04"/>
 </g>
@@ -1327,39 +1327,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#a200ff" d="M493.23,-183.12C530.52,-183.3 598.99,-183.63 641.15,-183.83"/>
 <polygon fill="#a200ff" stroke="#a200ff" points="641.25,-187.33 651.27,-183.88 641.28,-180.33 641.25,-187.33"/>
 </g>
-<!-- proc~cmp_degree -->
+<!-- proc~cmp_degree~2 -->
 <g id="program~~example3_volume~~CallsGraph_node47" class="node">
-<title>proc~cmp_degree</title>
-<g id="a_program~~example3_volume~~CallsGraph_node47"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
+<title>proc~cmp_degree~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node47"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="958,-650 795,-650 795,-626 958,-626 958,-650"/>
 <text text-anchor="middle" x="876.5" y="-635.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_degree -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge68" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#e700ff" d="M735.67,-667.96C758.63,-663.04 785.37,-657.31 809.27,-652.19"/>
 <polygon fill="#e700ff" stroke="#e700ff" points="810.28,-655.55 819.33,-650.04 808.81,-648.71 810.28,-655.55"/>
 </g>
-<!-- proc~cmp_nc -->
+<!-- proc~cmp_nc~2 -->
 <g id="program~~example3_volume~~CallsGraph_node51" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_program~~example3_volume~~CallsGraph_node51"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
+<title>proc~cmp_nc~2</title>
+<g id="a_program~~example3_volume~~CallsGraph_node51"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="946,-713 807,-713 807,-689 946,-689 946,-713"/>
 <text text-anchor="middle" x="876.5" y="-698.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge69" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#e700ff" d="M738.57,-686.33C756.91,-688.29 777.41,-690.49 796.85,-692.57"/>
 <polygon fill="#e700ff" stroke="#e700ff" points="796.59,-696.07 806.91,-693.65 797.34,-689.11 796.59,-696.07"/>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge70" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
+<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#ff00d0" d="M728.04,-751.9C738.31,-749.14 749.05,-746.1 759,-743 784.39,-735.09 812.44,-725.01 834.66,-716.72"/>
 <polygon fill="#ff00d0" stroke="#ff00d0" points="835.98,-719.96 844.11,-713.16 833.52,-713.41 835.98,-719.96"/>
 </g>
@@ -1372,15 +1372,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~example3_volume~~CallsGraph_edge71" class="edge">
-<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#ff00d0" d="M738.57,-764C758.72,-764 781.49,-764 802.59,-764"/>
 <polygon fill="#ff00d0" stroke="#ff00d0" points="802.8,-767.5 812.8,-764 802.8,-760.5 802.8,-767.5"/>
 </g>
-<!-- proc~set3&#45;&gt;proc~cmp_degree -->
+<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge72" class="edge">
-<title>proc~set3&#45;&gt;proc~cmp_degree</title>
+<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#ff008b" d="M738.57,-638C753.09,-638 768.97,-638 784.6,-638"/>
 <polygon fill="#ff008b" stroke="#ff008b" points="784.82,-641.5 794.82,-638 784.82,-634.5 784.82,-641.5"/>
 </g>
@@ -1444,15 +1444,15 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ffbf00" d="M706.75,-966C741.27,-966 800.86,-966 839.2,-966"/>
 <polygon fill="#ffbf00" stroke="#ffbf00" points="839.42,-969.5 849.42,-966 839.42,-962.5 839.42,-969.5"/>
 </g>
-<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
+<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="program~~example3_volume~~CallsGraph_edge77" class="edge">
-<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
+<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
 <path fill="none" stroke="#dfff00" d="M909,-625.83C944.54,-612.1 1002.42,-589.74 1041.33,-574.71"/>
 <polygon fill="#dfff00" stroke="#dfff00" points="1042.73,-577.92 1050.79,-571.05 1040.21,-571.39 1042.73,-577.92"/>
 </g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example3_volume~~CallsGraph_edge78" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff9f" d="M946.14,-701C1016.69,-701 1126.03,-701 1197.57,-701"/>
 <polygon fill="#00ff9f" stroke="#00ff9f" points="1197.85,-704.5 1207.85,-701 1197.85,-697.5 1197.85,-704.5"/>
 </g>
@@ -1574,7 +1574,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~46"></span>
+              <span class="anchor" id="variable-wc~5"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1590,7 +1590,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~46"></span>
+              <span class="anchor" id="variable-xc~5"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1606,7 +1606,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~44"></span>
+              <span class="anchor" id="variable-knot1~2"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1622,7 +1622,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~44"></span>
+              <span class="anchor" id="variable-knot2~2"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1638,7 +1638,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3~22"></span>
+              <span class="anchor" id="variable-knot3"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1654,7 +1654,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nurbs~5"></span>
+              <span class="anchor" id="variable-nurbs~4"></span>
               type(<a href='../type/nurbs_volume.html'>nurbs_volume</a>)
             </td>
             <td>
@@ -1682,7 +1682,7 @@ <h2>Variables</h2>
     <section>
     <h2>Functions</h2>
       <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-generate_xc~5"></span> <h3> function <a href='../proc/generate_xc~5.html'>generate_Xc</a>(L) result(control_points)  
+    <div class="card-header codesum"><span class="anchor" id="proc-generate_xc~4"></span> <h3> function <a href='../proc/generate_xc~4.html'>generate_Xc</a>(L) result(control_points)  
 </h3></div>
     <div class="card-body">
           
@@ -1701,7 +1701,7 @@ <h4>Arguments</h4>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-l~4"></span>
+              <span class="anchor" id="variable-l"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -1952,7 +1952,7 @@ <h2 id="src">Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/example_nurbs_curve.html b/program/example_nurbs_curve.html
index c1a851b23..a63102266 100644
--- a/program/example_nurbs_curve.html
+++ b/program/example_nurbs_curve.html
@@ -115,9 +115,9 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/example_nurbs_curve.html#variable-wc~25">Wc</a>
-            <a class="list-group-item" href="../program/example_nurbs_curve.html#variable-xc~26">Xc</a>
-            <a class="list-group-item" href="../program/example_nurbs_curve.html#variable-nurbs~3">nurbs</a>
+            <a class="list-group-item" href="../program/example_nurbs_curve.html#variable-wc">Wc</a>
+            <a class="list-group-item" href="../program/example_nurbs_curve.html#variable-xc">Xc</a>
+            <a class="list-group-item" href="../program/example_nurbs_curve.html#variable-nurbs">nurbs</a>
         </div>
       </div>
     </div>
@@ -138,7 +138,7 @@ <h4 class="card-header bg-primary text-white">Functions</h4>
       </a>
       <div id="funcs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/example_nurbs_curve.html#proc-generate_xc~3">generate_Xc</a>
+            <a class="list-group-item" href="../program/example_nurbs_curve.html#proc-generate_xc">generate_Xc</a>
         </div>
       </div>
     </div>
@@ -414,243 +414,243 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="129,-150 0,-150 0,-126 129,-126 129,-150"/>
 <text text-anchor="middle" x="64.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">example_nurbs_curve</text>
 </g>
-<!-- none~set~3 -->
+<!-- none~set -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node2" class="node">
-<title>none~set~3</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
+<title>none~set</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="287,-381 184,-381 184,-357 287,-357 287,-381"/>
 <text text-anchor="middle" x="235.5" y="-366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;none~set~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;none~set -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge1" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;none~set~3</title>
+<title>program~example_nurbs_curve&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M74.35,-150.09C101.72,-187.51 185.23,-301.66 219.54,-348.56"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="216.81,-350.74 225.54,-356.75 222.46,-346.61 216.81,-350.74"/>
 </g>
-<!-- proc~create~3 -->
+<!-- proc~create -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node3" class="node">
-<title>proc~create~3</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node3"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_curve%create">
+<title>proc~create</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node3"><a xlink:href="../proc/create.html" xlink:title="nurbs_curve%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="296,-234 175,-234 175,-210 296,-210 296,-234"/>
 <text text-anchor="middle" x="235.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%create</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~create~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~create -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge2" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~create~3</title>
+<title>program~example_nurbs_curve&#45;&gt;proc~create</title>
 <path fill="none" stroke="#ff0000" d="M81.62,-150.15C100.67,-164.05 133.76,-186.71 165,-201 169.36,-202.99 173.95,-204.86 178.62,-206.58"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="177.64,-209.95 188.24,-209.94 179.95,-203.34 177.64,-209.95"/>
 </g>
-<!-- proc~export_xc~3 -->
+<!-- proc~export_xc -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node4" class="node">
-<title>proc~export_xc~3</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node4"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_curve%export_Xc">
+<title>proc~export_xc</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node4"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_curve%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="305.5,-192 165.5,-192 165.5,-168 305.5,-168 305.5,-192"/>
 <text text-anchor="middle" x="235.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~export_xc~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~export_xc -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge3" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~export_xc~3</title>
+<title>program~example_nurbs_curve&#45;&gt;proc~export_xc</title>
 <path fill="none" stroke="#ff0000" d="M113.93,-150.04C133.38,-154.87 155.96,-160.48 176.29,-165.53"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="175.52,-168.95 186.06,-167.96 177.2,-162.15 175.52,-168.95"/>
 </g>
-<!-- proc~export_xg~3 -->
+<!-- proc~export_xg -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node5" class="node">
-<title>proc~export_xg~3</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node5"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_curve%export_Xg">
+<title>proc~export_xg</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node5"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_curve%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="306,-150 165,-150 165,-126 306,-126 306,-150"/>
 <text text-anchor="middle" x="235.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~export_xg~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~export_xg -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge4" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~export_xg~3</title>
+<title>program~example_nurbs_curve&#45;&gt;proc~export_xg</title>
 <path fill="none" stroke="#ff0000" d="M129.39,-138C137.63,-138 146.15,-138 154.61,-138"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="154.87,-141.5 164.87,-138 154.87,-134.5 154.87,-141.5"/>
 </g>
-<!-- proc~finalize~3 -->
+<!-- proc~finalize -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node6" class="node">
-<title>proc~finalize~3</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node6"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_curve%finalize">
+<title>proc~finalize</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node6"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_curve%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="298.5,-108 172.5,-108 172.5,-84 298.5,-84 298.5,-108"/>
 <text text-anchor="middle" x="235.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~finalize~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~finalize -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge5" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~finalize~3</title>
+<title>program~example_nurbs_curve&#45;&gt;proc~finalize</title>
 <path fill="none" stroke="#ff0000" d="M113.93,-125.96C133.38,-121.13 155.96,-115.52 176.29,-110.47"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="177.2,-113.85 186.06,-108.04 175.52,-107.05 177.2,-113.85"/>
 </g>
-<!-- proc~generate_xc~3 -->
+<!-- proc~generate_xc -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node7" class="node">
-<title>proc~generate_xc~3</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node7"><a xlink:href="../proc/generate_xc~3.html" xlink:title="generate_Xc">
+<title>proc~generate_xc</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node7"><a xlink:href="../proc/generate_xc.html" xlink:title="generate_Xc">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="275.5,-66 195.5,-66 195.5,-42 275.5,-42 275.5,-66"/>
 <text text-anchor="middle" x="235.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">generate_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~generate_xc~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~generate_xc -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge6" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~generate_xc~3</title>
+<title>program~example_nurbs_curve&#45;&gt;proc~generate_xc</title>
 <path fill="none" stroke="#ff0000" d="M81.62,-125.85C100.67,-111.95 133.76,-89.29 165,-75 171.54,-72.01 178.62,-69.31 185.67,-66.92"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="186.77,-70.24 195.21,-63.85 184.62,-63.58 186.77,-70.24"/>
 </g>
-<!-- proc~show~3 -->
+<!-- proc~show -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node8" class="node">
-<title>proc~show~3</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node8"><a xlink:href="../proc/show~3.html" xlink:title="nurbs_curve%show">
+<title>proc~show</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node8"><a xlink:href="../proc/show.html" xlink:title="nurbs_curve%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="293,-24 178,-24 178,0 293,0 293,-24"/>
 <text text-anchor="middle" x="235.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%show</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_curve&#45;&gt;proc~show~3 -->
+<!-- program~example_nurbs_curve&#45;&gt;proc~show -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge7" class="edge">
-<title>program~example_nurbs_curve&#45;&gt;proc~show~3</title>
+<title>program~example_nurbs_curve&#45;&gt;proc~show</title>
 <path fill="none" stroke="#ff0000" d="M73.83,-125.66C89.25,-103.76 124.39,-58.06 165,-33 167.93,-31.19 171.03,-29.53 174.22,-28"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="175.62,-31.21 183.43,-24.05 172.86,-24.78 175.62,-31.21"/>
 </g>
-<!-- proc~set1a -->
+<!-- proc~set1 -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node13" class="node">
-<title>proc~set1a</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node13"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="491.5,-486 374.5,-486 374.5,-462 491.5,-462 491.5,-486"/>
-<text text-anchor="middle" x="433" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+<title>proc~set1</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node13"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="488,-486 378,-486 378,-462 488,-462 488,-486"/>
+<text text-anchor="middle" x="433" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
+<!-- none~set&#45;&gt;proc~set1 -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge8" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M247.94,-381.04C266.1,-399.43 303.44,-434.33 342,-453 349.01,-456.39 356.59,-459.25 364.28,-461.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="363.46,-465.07 374.04,-464.48 365.4,-458.34 363.46,-465.07"/>
+<title>none~set&#45;&gt;proc~set1</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M247.94,-381.04C266.1,-399.43 303.44,-434.33 342,-453 350.17,-456.95 359.12,-460.18 368.1,-462.82"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="367.27,-466.22 377.84,-465.45 369.1,-459.46 367.27,-466.22"/>
 </g>
-<!-- proc~set1~3 -->
+<!-- proc~set1a -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node14" class="node">
-<title>proc~set1~3</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node14"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="488,-444 378,-444 378,-420 488,-420 488,-444"/>
-<text text-anchor="middle" x="433" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<title>proc~set1a</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node14"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="491.5,-444 374.5,-444 374.5,-420 491.5,-420 491.5,-444"/>
+<text text-anchor="middle" x="433" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1~3 -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge9" class="edge">
-<title>none~set~3&#45;&gt;proc~set1~3</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M263.42,-381.01C284.5,-390.1 314.73,-402.44 342,-411 350.34,-413.62 359.21,-416.07 368,-418.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="367.32,-421.75 377.87,-420.75 369,-414.96 367.32,-421.75"/>
+<title>none~set&#45;&gt;proc~set1a</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M263.42,-381.01C284.5,-390.1 314.73,-402.44 342,-411 349.32,-413.3 357.04,-415.47 364.77,-417.48"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="363.97,-420.89 374.52,-419.94 365.68,-414.1 363.97,-420.89"/>
 </g>
-<!-- proc~set2~3 -->
+<!-- proc~set2 -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node15" class="node">
-<title>proc~set2~3</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node15"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
+<title>proc~set2</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node15"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="488,-360 378,-360 378,-336 488,-336 488,-360"/>
 <text text-anchor="middle" x="433" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set2~3 -->
+<!-- none~set&#45;&gt;proc~set2 -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge10" class="edge">
-<title>none~set~3&#45;&gt;proc~set2~3</title>
+<title>none~set&#45;&gt;proc~set2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M287.1,-363.56C311.67,-360.93 341.47,-357.72 367.63,-354.91"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="368.27,-358.37 377.84,-353.82 367.53,-351.41 368.27,-358.37"/>
 </g>
-<!-- proc~set3~3 -->
+<!-- proc~set3 -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node16" class="node">
-<title>proc~set3~3</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node16"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
+<title>proc~set3</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node16"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="488,-402 378,-402 378,-378 488,-378 488,-402"/>
 <text text-anchor="middle" x="433" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set3~3 -->
+<!-- none~set&#45;&gt;proc~set3 -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge11" class="edge">
-<title>none~set~3&#45;&gt;proc~set3~3</title>
+<title>none~set&#45;&gt;proc~set3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M287.1,-374.44C311.67,-377.07 341.47,-380.28 367.63,-383.09"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="367.53,-386.59 377.84,-384.18 368.27,-379.63 367.53,-386.59"/>
 </g>
-<!-- proc~set4~3 -->
+<!-- proc~set4 -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node17" class="node">
-<title>proc~set4~3</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node17"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
+<title>proc~set4</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node17"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="488,-318 378,-318 378,-294 488,-294 488,-318"/>
 <text text-anchor="middle" x="433" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set4~3 -->
+<!-- none~set&#45;&gt;proc~set4 -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge12" class="edge">
-<title>none~set~3&#45;&gt;proc~set4~3</title>
+<title>none~set&#45;&gt;proc~set4</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M263.42,-356.99C284.5,-347.9 314.73,-335.56 342,-327 350.34,-324.38 359.21,-321.93 368,-319.69"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="369,-323.04 377.87,-317.25 367.32,-316.25 369,-323.04"/>
 </g>
-<!-- interface~compute_xg~3 -->
+<!-- interface~compute_xg -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node9" class="node">
-<title>interface~compute_xg~3</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node9"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
+<title>interface~compute_xg</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node9"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="472.5,-276 393.5,-276 393.5,-252 472.5,-252 472.5,-276"/>
 <text text-anchor="middle" x="433" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
+<!-- proc~create&#45;&gt;interface~compute_xg -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge13" class="edge">
-<title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
+<title>proc~create&#45;&gt;interface~compute_xg</title>
 <path fill="none" stroke="#ffda00" d="M292.52,-234.04C321.26,-240.21 355.93,-247.66 383.51,-253.58"/>
 <polygon fill="#ffda00" stroke="#ffda00" points="382.81,-257.01 393.33,-255.69 384.28,-250.17 382.81,-257.01"/>
 </g>
-<!-- proc~is_rational~3 -->
+<!-- proc~is_rational -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node12" class="node">
-<title>proc~is_rational~3</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node12"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
+<title>proc~is_rational</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node12"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="504,-234 362,-234 362,-210 504,-210 504,-234"/>
 <text text-anchor="middle" x="433" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
+<!-- proc~create&#45;&gt;proc~is_rational -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge14" class="edge">
-<title>proc~create~3&#45;&gt;proc~is_rational~3</title>
+<title>proc~create&#45;&gt;proc~is_rational</title>
 <path fill="none" stroke="#ffda00" d="M296.22,-222C313.65,-222 333,-222 351.49,-222"/>
 <polygon fill="#ffda00" stroke="#ffda00" points="351.66,-225.5 361.66,-222 351.66,-218.5 351.66,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xc_vis~3 -->
+<!-- proc~cmp_elem_xc_vis -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node10" class="node">
-<title>proc~cmp_elem_xc_vis~3</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node10"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node10"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="523.5,-192 342.5,-192 342.5,-168 523.5,-168 523.5,-192"/>
 <text text-anchor="middle" x="433" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
+<!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge15" class="edge">
-<title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
+<title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
 <path fill="none" stroke="#48ff00" d="M305.7,-180C314.32,-180 323.26,-180 332.23,-180"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="332.35,-183.5 342.35,-180 332.35,-176.5 332.35,-183.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~3 -->
+<!-- proc~cmp_elem_xg_vis -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node11" class="node">
-<title>proc~cmp_elem_xg_vis~3</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="524,-150 342,-150 342,-126 524,-126 524,-150"/>
 <text text-anchor="middle" x="433" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
+<!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge16" class="edge">
-<title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
+<title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
 <path fill="none" stroke="#00ff91" d="M306.25,-138C314.53,-138 323.1,-138 331.69,-138"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="331.78,-141.5 341.78,-138 331.78,-134.5 331.78,-141.5"/>
 </g>
@@ -663,38 +663,38 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge17" class="edge">
-<title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#ffaa00" d="M523.78,-170.67C544.13,-168.55 565.1,-166.37 583.32,-164.48"/>
 <polygon fill="#ffaa00" stroke="#ffaa00" points="583.84,-167.94 593.43,-163.43 583.12,-160.98 583.84,-167.94"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge18" class="edge">
-<title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#aaff00" d="M524.07,-147.36C544.3,-149.47 565.13,-151.63 583.25,-153.52"/>
 <polygon fill="#aaff00" stroke="#aaff00" points="582.99,-157.01 593.3,-154.56 583.71,-150.05 582.99,-157.01"/>
 </g>
-<!-- proc~cmp_degree~3 -->
+<!-- proc~cmp_degree -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node19" class="node">
-<title>proc~cmp_degree~3</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node19"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
+<title>proc~cmp_degree</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node19"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="714,-444 560,-444 560,-420 714,-420 714,-444"/>
 <text text-anchor="middle" x="637" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1&#45;&gt;proc~cmp_degree -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge19" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#00ffa9" d="M491.61,-462.02C515.39,-457.08 543.13,-451.31 567.91,-446.16"/>
-<polygon fill="#00ffa9" stroke="#00ffa9" points="568.88,-449.53 577.96,-444.07 567.46,-442.68 568.88,-449.53"/>
+<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#00ffa9" d="M488.13,-462.74C512.8,-457.62 542.25,-451.49 568.35,-446.06"/>
+<polygon fill="#00ffa9" stroke="#00ffa9" points="569.1,-449.48 578.18,-444.02 567.68,-442.63 569.1,-449.48"/>
 </g>
-<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge20" class="edge">
-<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#00a9ff" d="M488.13,-432C507.01,-432 528.7,-432 549.55,-432"/>
-<polygon fill="#00a9ff" stroke="#00a9ff" points="549.7,-435.5 559.7,-432 549.7,-428.5 549.7,-435.5"/>
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#00a9ff" d="M491.61,-432C509.69,-432 530.05,-432 549.66,-432"/>
+<polygon fill="#00a9ff" stroke="#00a9ff" points="549.83,-435.5 559.83,-432 549.83,-428.5 549.83,-435.5"/>
 </g>
 <!-- proc~compute_knot_vector -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node20" class="node">
@@ -705,15 +705,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge21" class="edge">
-<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#0000ff" d="M488.13,-348C511.24,-348 538.56,-348 563.39,-348"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="563.49,-351.5 573.49,-348 563.49,-344.5 563.49,-351.5"/>
 </g>
-<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set3&#45;&gt;proc~cmp_degree -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge22" class="edge">
-<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
+<title>proc~set3&#45;&gt;proc~cmp_degree</title>
 <path fill="none" stroke="#aa00ff" d="M488.13,-401.26C512.8,-406.38 542.25,-412.51 568.35,-417.94"/>
 <polygon fill="#aa00ff" stroke="#aa00ff" points="567.68,-421.37 578.18,-419.98 569.1,-414.52 567.68,-421.37"/>
 </g>
@@ -762,18 +762,18 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M680.9,-149.78C706.24,-144.34 738.85,-137.33 767.41,-131.2"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="768.28,-134.59 777.33,-129.07 766.81,-127.75 768.28,-134.59"/>
 </g>
-<!-- proc~get_multiplicity~3 -->
+<!-- proc~get_multiplicity -->
 <g id="program~~example_nurbs_curve~~CallsGraph_node24" class="node">
-<title>proc~get_multiplicity~3</title>
-<g id="a_program~~example_nurbs_curve~~CallsGraph_node24"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
+<title>proc~get_multiplicity</title>
+<g id="a_program~~example_nurbs_curve~~CallsGraph_node24"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="919,-444 750,-444 750,-420 919,-420 919,-444"/>
 <text text-anchor="middle" x="834.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
+<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge26" class="edge">
-<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
+<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M714.15,-432C722.54,-432 731.17,-432 739.75,-432"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="739.79,-435.5 749.79,-432 739.79,-428.5 739.79,-435.5"/>
 </g>
@@ -801,9 +801,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example_nurbs_curve~~CallsGraph_edge28" class="edge">
-<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0066ff" d="M919.15,-432C927.73,-432 936.4,-432 944.84,-432"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="944.99,-435.5 954.99,-432 944.99,-428.5 944.99,-435.5"/>
 </g>
@@ -940,7 +940,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~25"></span>
+              <span class="anchor" id="variable-wc"></span>
               real(kind=rk),
             </td>
             <td>
@@ -956,7 +956,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~26"></span>
+              <span class="anchor" id="variable-xc"></span>
               real(kind=rk),
             </td>
             <td>
@@ -972,7 +972,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nurbs~3"></span>
+              <span class="anchor" id="variable-nurbs"></span>
               type(<a href='../type/nurbs_curve.html'>nurbs_curve</a>)
             </td>
             <td>
@@ -1000,7 +1000,7 @@ <h2>Variables</h2>
     <section>
     <h2>Functions</h2>
       <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-generate_xc~3"></span> <h3> function <a href='../proc/generate_xc~3.html'>generate_Xc</a>(num_coils, radius, height, num_points_per_coil) result(control_points)  
+    <div class="card-header codesum"><span class="anchor" id="proc-generate_xc"></span> <h3> function <a href='../proc/generate_xc.html'>generate_Xc</a>(num_coils, radius, height, num_points_per_coil) result(control_points)  
 </h3></div>
     <div class="card-body">
           
@@ -1049,7 +1049,7 @@ <h4>Arguments</h4>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-height~2"></span>
+              <span class="anchor" id="variable-height"></span>
               real(kind=rk),
             </td>
 <td>intent(in)</td>
@@ -1195,7 +1195,7 @@ <h2 id="src">Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/example_nurbs_surface.html b/program/example_nurbs_surface.html
index 9420a0d56..f7534fb7e 100644
--- a/program/example_nurbs_surface.html
+++ b/program/example_nurbs_surface.html
@@ -115,9 +115,9 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/example_nurbs_surface.html#variable-wc~45">Wc</a>
-            <a class="list-group-item" href="../program/example_nurbs_surface.html#variable-xc~45">Xc</a>
-            <a class="list-group-item" href="../program/example_nurbs_surface.html#variable-nurbs~4">nurbs</a>
+            <a class="list-group-item" href="../program/example_nurbs_surface.html#variable-wc~4">Wc</a>
+            <a class="list-group-item" href="../program/example_nurbs_surface.html#variable-xc~4">Xc</a>
+            <a class="list-group-item" href="../program/example_nurbs_surface.html#variable-nurbs~3">nurbs</a>
         </div>
       </div>
     </div>
@@ -138,7 +138,7 @@ <h4 class="card-header bg-primary text-white">Functions</h4>
       </a>
       <div id="funcs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/example_nurbs_surface.html#proc-generate_xc~4">generate_Xc</a>
+            <a class="list-group-item" href="../program/example_nurbs_surface.html#proc-generate_xc~3">generate_Xc</a>
         </div>
       </div>
     </div>
@@ -414,183 +414,183 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="139,-150 0,-150 0,-126 139,-126 139,-150"/>
 <text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">example_nurbs_surface</text>
 </g>
-<!-- none~set~2 -->
+<!-- none~set~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node2" class="node">
-<title>none~set~2</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<title>none~set~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="307,-391 194,-391 194,-367 307,-367 307,-391"/>
 <text text-anchor="middle" x="250.5" y="-376.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;none~set~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;none~set~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge1" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;none~set~2</title>
+<title>program~example_nurbs_surface&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff0000" d="M79.62,-150.28C108.53,-189.2 198.31,-310.07 234.32,-358.57"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="231.62,-360.8 240.4,-366.74 237.24,-356.63 231.62,-360.8"/>
 </g>
-<!-- proc~create~2 -->
+<!-- proc~create~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node3" class="node">
-<title>proc~create~2</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node3"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
+<title>proc~create~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node3"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="316,-244 185,-244 185,-220 316,-220 316,-244"/>
 <text text-anchor="middle" x="250.5" y="-229.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~create~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~create~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge2" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~create~2</title>
+<title>program~example_nurbs_surface&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#ff0000" d="M88.9,-150.24C109.42,-163.61 143.81,-185.22 175,-201 185.54,-206.33 197.21,-211.51 208.14,-216.07"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="206.91,-219.35 217.49,-219.89 209.56,-212.87 206.91,-219.35"/>
 </g>
-<!-- proc~export_xc~2 -->
+<!-- proc~export_xc~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node4" class="node">
-<title>proc~export_xc~2</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node4"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_surface%export_Xc">
+<title>proc~export_xc~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node4"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_surface%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="325.5,-192 175.5,-192 175.5,-168 325.5,-168 325.5,-192"/>
 <text text-anchor="middle" x="250.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~export_xc~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~export_xc~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge3" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~export_xc~2</title>
+<title>program~example_nurbs_surface&#45;&gt;proc~export_xc~3</title>
 <path fill="none" stroke="#ff0000" d="M121.79,-150.04C142.58,-154.91 166.75,-160.58 188.43,-165.67"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="187.66,-169.09 198.2,-167.96 189.26,-162.27 187.66,-169.09"/>
 </g>
-<!-- proc~export_xg~2 -->
+<!-- proc~export_xg~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node5" class="node">
-<title>proc~export_xg~2</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node5"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_surface%export_Xg">
+<title>proc~export_xg~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node5"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_surface%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="326,-150 175,-150 175,-126 326,-126 326,-150"/>
 <text text-anchor="middle" x="250.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~export_xg~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~export_xg~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge4" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~export_xg~2</title>
+<title>program~example_nurbs_surface&#45;&gt;proc~export_xg~3</title>
 <path fill="none" stroke="#ff0000" d="M139.19,-138C147.56,-138 156.17,-138 164.73,-138"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="164.74,-141.5 174.74,-138 164.74,-134.5 164.74,-141.5"/>
 </g>
-<!-- proc~finalize~2 -->
+<!-- proc~finalize~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node6" class="node">
-<title>proc~finalize~2</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node6"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_surface%finalize">
+<title>proc~finalize~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node6"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_surface%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="318.5,-108 182.5,-108 182.5,-84 318.5,-84 318.5,-108"/>
 <text text-anchor="middle" x="250.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~finalize~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~finalize~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge5" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~finalize~2</title>
+<title>program~example_nurbs_surface&#45;&gt;proc~finalize~3</title>
 <path fill="none" stroke="#ff0000" d="M121.79,-125.96C142.58,-121.09 166.75,-115.42 188.43,-110.33"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="189.26,-113.73 198.2,-108.04 187.66,-106.91 189.26,-113.73"/>
 </g>
-<!-- proc~generate_xc~4 -->
+<!-- proc~generate_xc~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node7" class="node">
-<title>proc~generate_xc~4</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node7"><a xlink:href="../proc/generate_xc~4.html" xlink:title="generate_Xc">
+<title>proc~generate_xc~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node7"><a xlink:href="../proc/generate_xc~3.html" xlink:title="generate_Xc">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="290.5,-66 210.5,-66 210.5,-42 290.5,-42 290.5,-66"/>
 <text text-anchor="middle" x="250.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">generate_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~generate_xc~4 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~generate_xc~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge6" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~generate_xc~4</title>
+<title>program~example_nurbs_surface&#45;&gt;proc~generate_xc~3</title>
 <path fill="none" stroke="#ff0000" d="M87.48,-125.8C107.54,-111.85 142.34,-89.14 175,-75 183.06,-71.51 191.87,-68.43 200.51,-65.78"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="201.53,-69.13 210.15,-62.98 199.57,-62.41 201.53,-69.13"/>
 </g>
-<!-- proc~show~2 -->
+<!-- proc~show~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node8" class="node">
-<title>proc~show~2</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node8"><a xlink:href="../proc/show~2.html" xlink:title="nurbs_surface%show">
+<title>proc~show~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node8"><a xlink:href="../proc/show~3.html" xlink:title="nurbs_surface%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="312.5,-24 188.5,-24 188.5,0 312.5,0 312.5,-24"/>
 <text text-anchor="middle" x="250.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%show</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_surface&#45;&gt;proc~show~2 -->
+<!-- program~example_nurbs_surface&#45;&gt;proc~show~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge7" class="edge">
-<title>program~example_nurbs_surface&#45;&gt;proc~show~2</title>
+<title>program~example_nurbs_surface&#45;&gt;proc~show~3</title>
 <path fill="none" stroke="#ff0000" d="M79.1,-125.94C95.32,-104.09 132.65,-57.89 175,-33 178.2,-31.12 181.58,-29.4 185.06,-27.83"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="186.51,-31.02 194.45,-24.01 183.87,-24.53 186.51,-31.02"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node14" class="node">
-<title>proc~set1~2</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node14"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<title>proc~set1~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node14"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="518,-433 398,-433 398,-409 518,-409 518,-433"/>
 <text text-anchor="middle" x="458" y="-418.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge8" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M307.11,-390.37C332.09,-395.47 361.82,-401.55 388.18,-406.94"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="387.61,-410.39 398.11,-408.96 389.01,-403.53 387.61,-410.39"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node15" class="node">
-<title>proc~set2~2</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node15"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<title>proc~set2~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node15"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="518,-391 398,-391 398,-367 518,-367 518,-391"/>
 <text text-anchor="middle" x="458" y="-376.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge9" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M307.11,-379C331.88,-379 361.31,-379 387.5,-379"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="387.75,-382.5 397.75,-379 387.75,-375.5 387.75,-382.5"/>
 </g>
-<!-- proc~set3~2 -->
+<!-- proc~set3~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node16" class="node">
-<title>proc~set3~2</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node16"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<title>proc~set3~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node16"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="518,-475 398,-475 398,-451 518,-451 518,-475"/>
 <text text-anchor="middle" x="458" y="-460.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge10" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
+<title>none~set~3&#45;&gt;proc~set3~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M269.05,-391.23C290.17,-405.42 327.18,-428.58 362,-442 370.25,-445.18 379.09,-447.93 387.94,-450.31"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="387.35,-453.77 397.9,-452.83 389.07,-446.98 387.35,-453.77"/>
 </g>
-<!-- proc~set4~2 -->
+<!-- proc~set4~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node17" class="node">
-<title>proc~set4~2</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node17"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<title>proc~set4~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node17"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="518,-349 398,-349 398,-325 518,-325 518,-349"/>
 <text text-anchor="middle" x="458" y="-334.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set4~2 -->
+<!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge11" class="edge">
-<title>none~set~2&#45;&gt;proc~set4~2</title>
+<title>none~set~3&#45;&gt;proc~set4~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M307.11,-367.63C332.09,-362.53 361.82,-356.45 388.18,-351.06"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="389.01,-354.47 398.11,-349.04 387.61,-347.61 389.01,-354.47"/>
 </g>
-<!-- interface~compute_xg~2 -->
+<!-- interface~compute_xg~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node9" class="node">
-<title>interface~compute_xg~2</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node9"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node9"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="497.5,-307 418.5,-307 418.5,-283 497.5,-283 497.5,-307"/>
 <text text-anchor="middle" x="458" y="-292.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
+<!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge12" class="edge">
-<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
+<title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
 <path fill="none" stroke="#ffda00" d="M279.73,-244.04C301.82,-253.14 333.49,-265.48 362,-274 376.86,-278.44 393.28,-282.4 408.23,-285.65"/>
 <polygon fill="#ffda00" stroke="#ffda00" points="407.8,-289.13 418.31,-287.78 409.25,-282.28 407.8,-289.13"/>
 </g>
@@ -603,54 +603,54 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~ndgrid -->
+<!-- proc~create~3&#45;&gt;interface~ndgrid -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge13" class="edge">
-<title>proc~create~2&#45;&gt;interface~ndgrid</title>
+<title>proc~create~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ffda00" d="M316.24,-238.62C350.71,-242.14 391.83,-246.34 420.7,-249.29"/>
 <polygon fill="#ffda00" stroke="#ffda00" points="420.44,-252.78 430.74,-250.32 421.15,-245.82 420.44,-252.78"/>
 </g>
-<!-- proc~is_rational~2 -->
+<!-- proc~is_rational~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node13" class="node">
-<title>proc~is_rational~2</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node13"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<title>proc~is_rational~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node13"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="534,-223 382,-223 382,-199 534,-199 534,-223"/>
 <text text-anchor="middle" x="458" y="-208.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge14" class="edge">
-<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~create~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#ffda00" d="M316.24,-225.38C333.81,-223.59 353.11,-221.62 371.63,-219.72"/>
 <polygon fill="#ffda00" stroke="#ffda00" points="372.23,-223.18 381.82,-218.68 371.52,-216.22 372.23,-223.18"/>
 </g>
-<!-- proc~cmp_elem_xc_vis~2 -->
+<!-- proc~cmp_elem_xc_vis~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node11" class="node">
-<title>proc~cmp_elem_xc_vis~2</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-181 362.5,-181 362.5,-157 553.5,-157 553.5,-181"/>
 <text text-anchor="middle" x="458" y="-166.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
+<!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge15" class="edge">
-<title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
+<title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
 <path fill="none" stroke="#48ff00" d="M325.69,-176.03C334.29,-175.57 343.19,-175.09 352.1,-174.61"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="352.37,-178.11 362.16,-174.08 351.99,-171.12 352.37,-178.11"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~2 -->
+<!-- proc~cmp_elem_xg_vis~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node12" class="node">
-<title>proc~cmp_elem_xg_vis~2</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="554,-139 362,-139 362,-115 554,-115 554,-139"/>
 <text text-anchor="middle" x="458" y="-124.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
+<!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge16" class="edge">
-<title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
+<title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
 <path fill="none" stroke="#00ff91" d="M326.27,-134C334.6,-133.55 343.2,-133.09 351.82,-132.63"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="352.13,-136.12 361.93,-132.09 351.76,-129.13 352.13,-136.12"/>
 </g>
@@ -693,51 +693,51 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge19" class="edge">
-<title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#aaff00" d="M553.62,-159.61C575.62,-157.42 598.27,-155.17 617.71,-153.24"/>
 <polygon fill="#aaff00" stroke="#aaff00" points="618.25,-156.71 627.85,-152.23 617.55,-149.74 618.25,-156.71"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge20" class="edge">
-<title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#00ff00" d="M554.23,-136.46C576.07,-138.62 598.52,-140.85 617.79,-142.77"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="617.56,-146.26 627.85,-143.77 618.25,-139.29 617.56,-146.26"/>
 </g>
-<!-- proc~cmp_degree~2 -->
+<!-- proc~cmp_degree~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node19" class="node">
-<title>proc~cmp_degree~2</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node19"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<title>proc~cmp_degree~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node19"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="753,-475 590,-475 590,-451 753,-451 753,-475"/>
 <text text-anchor="middle" x="671.5" y="-460.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge21" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#00a9ff" d="M518.2,-432.76C543.55,-437.79 573.37,-443.71 599.87,-448.97"/>
 <polygon fill="#00a9ff" stroke="#00a9ff" points="599.36,-452.44 609.85,-450.96 600.72,-445.57 599.36,-452.44"/>
 </g>
-<!-- proc~cmp_nc~2 -->
+<!-- proc~cmp_nc~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node20" class="node">
-<title>proc~cmp_nc~2</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node20"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<title>proc~cmp_nc~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node20"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="741,-433 602,-433 602,-409 741,-409 741,-433"/>
 <text text-anchor="middle" x="671.5" y="-418.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge22" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#00a9ff" d="M518.2,-421C540.97,-421 567.35,-421 591.68,-421"/>
 <polygon fill="#00a9ff" stroke="#00a9ff" points="591.97,-424.5 601.97,-421 591.97,-417.5 591.97,-424.5"/>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge23" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#0000ff" d="M518.2,-390.76C543.55,-395.79 573.37,-401.71 599.87,-406.97"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="599.36,-410.44 609.85,-408.96 600.72,-403.57 599.36,-410.44"/>
 </g>
@@ -750,15 +750,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge24" class="edge">
-<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#0000ff" d="M518.2,-379C542.9,-379 571.84,-379 597.82,-379"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="597.99,-382.5 607.99,-379 597.99,-375.5 597.99,-382.5"/>
 </g>
-<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge25" class="edge">
-<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#aa00ff" d="M518.2,-463C537.31,-463 558.96,-463 579.81,-463"/>
 <polygon fill="#aa00ff" stroke="#aa00ff" points="579.97,-466.5 589.97,-463 579.97,-459.5 579.97,-466.5"/>
 </g>
@@ -807,18 +807,18 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M715.37,-139.2C742.32,-133.66 777.69,-126.4 808.47,-120.07"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="809.19,-123.5 818.29,-118.06 807.79,-116.64 809.19,-123.5"/>
 </g>
-<!-- proc~get_multiplicity~2 -->
+<!-- proc~get_multiplicity~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_node28" class="node">
-<title>proc~get_multiplicity~2</title>
-<g id="a_program~~example_nurbs_surface~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<title>proc~get_multiplicity~3</title>
+<g id="a_program~~example_nurbs_surface~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="967,-474 789,-474 789,-450 967,-450 967,-474"/>
 <text text-anchor="middle" x="878" y="-459.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge29" class="edge">
-<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#ffff00" d="M753.03,-462.61C761.47,-462.56 770.11,-462.52 778.71,-462.48"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="778.8,-465.98 788.78,-462.43 778.76,-458.98 778.8,-465.98"/>
 </g>
@@ -831,9 +831,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge30" class="edge">
-<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M741.14,-424.68C811.69,-428.47 921.03,-434.33 992.57,-438.17"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="992.67,-441.68 1002.85,-438.72 993.05,-434.69 992.67,-441.68"/>
 </g>
@@ -882,9 +882,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1127.33,-434C1135.69,-432.91 1144.35,-431.78 1152.92,-430.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1153.44,-434.12 1162.9,-429.36 1152.53,-427.18 1153.44,-434.12"/>
 </g>
-<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example_nurbs_surface~~CallsGraph_edge34" class="edge">
-<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0000ff" d="M967.17,-452.47C975.77,-451.54 984.42,-450.6 992.82,-449.7"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="993.36,-453.16 1002.93,-448.6 992.61,-446.2 993.36,-453.16"/>
 </g>
@@ -991,7 +991,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~45"></span>
+              <span class="anchor" id="variable-wc~4"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1007,7 +1007,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~45"></span>
+              <span class="anchor" id="variable-xc~4"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1023,7 +1023,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nurbs~4"></span>
+              <span class="anchor" id="variable-nurbs~3"></span>
               type(<a href='../type/nurbs_surface.html'>nurbs_surface</a>)
             </td>
             <td>
@@ -1051,7 +1051,7 @@ <h2>Variables</h2>
     <section>
     <h2>Functions</h2>
       <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-generate_xc~4"></span> <h3> function <a href='../proc/generate_xc~4.html'>generate_Xc</a>(num_rows, num_cols, peak_height) result(control_points)  
+    <div class="card-header codesum"><span class="anchor" id="proc-generate_xc~3"></span> <h3> function <a href='../proc/generate_xc~3.html'>generate_Xc</a>(num_rows, num_cols, peak_height) result(control_points)  
 </h3></div>
     <div class="card-body">
           
@@ -1234,7 +1234,7 @@ <h2 id="src">Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/example_nurbs_volume.html b/program/example_nurbs_volume.html
index c81d6c7ee..67ae4a38d 100644
--- a/program/example_nurbs_volume.html
+++ b/program/example_nurbs_volume.html
@@ -115,9 +115,9 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/example_nurbs_volume.html#variable-wc~22">Wc</a>
-            <a class="list-group-item" href="../program/example_nurbs_volume.html#variable-xc~22">Xc</a>
-            <a class="list-group-item" href="../program/example_nurbs_volume.html#variable-nurbs">nurbs</a>
+            <a class="list-group-item" href="../program/example_nurbs_volume.html#variable-wc~6">Wc</a>
+            <a class="list-group-item" href="../program/example_nurbs_volume.html#variable-xc~6">Xc</a>
+            <a class="list-group-item" href="../program/example_nurbs_volume.html#variable-nurbs~5">nurbs</a>
         </div>
       </div>
     </div>
@@ -138,7 +138,7 @@ <h4 class="card-header bg-primary text-white">Functions</h4>
       </a>
       <div id="funcs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/example_nurbs_volume.html#proc-generate_xc">generate_Xc</a>
+            <a class="list-group-item" href="../program/example_nurbs_volume.html#proc-generate_xc~5">generate_Xc</a>
         </div>
       </div>
     </div>
@@ -414,183 +414,183 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="139,-150 0,-150 0,-126 139,-126 139,-150"/>
 <text text-anchor="middle" x="69.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">example_nurbs_volume</text>
 </g>
-<!-- none~set -->
+<!-- none~set~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node2" class="node">
-<title>none~set</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
+<title>none~set~2</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="307,-391 194,-391 194,-367 307,-367 307,-391"/>
 <text text-anchor="middle" x="250.5" y="-376.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;none~set -->
+<!-- program~example_nurbs_volume&#45;&gt;none~set~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge1" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;none~set</title>
+<title>program~example_nurbs_volume&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M79.62,-150.28C108.53,-189.2 198.31,-310.07 234.32,-358.57"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="231.62,-360.8 240.4,-366.74 237.24,-356.63 231.62,-360.8"/>
 </g>
-<!-- proc~create -->
+<!-- proc~create~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node3" class="node">
-<title>proc~create</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node3"><a xlink:href="../proc/create.html" xlink:title="nurbs_volume%create">
+<title>proc~create~2</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node3"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_volume%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="316,-244 185,-244 185,-220 316,-220 316,-244"/>
 <text text-anchor="middle" x="250.5" y="-229.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~create -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~create~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge2" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~create</title>
+<title>program~example_nurbs_volume&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#ff0000" d="M88.9,-150.24C109.42,-163.61 143.81,-185.22 175,-201 185.54,-206.33 197.21,-211.51 208.14,-216.07"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="206.91,-219.35 217.49,-219.89 209.56,-212.87 206.91,-219.35"/>
 </g>
-<!-- proc~export_xc -->
+<!-- proc~export_xc~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node4" class="node">
-<title>proc~export_xc</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node4"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_volume%export_Xc">
+<title>proc~export_xc~2</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node4"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_volume%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="325.5,-192 175.5,-192 175.5,-168 325.5,-168 325.5,-192"/>
 <text text-anchor="middle" x="250.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~export_xc -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~export_xc~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge3" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~export_xc</title>
+<title>program~example_nurbs_volume&#45;&gt;proc~export_xc~2</title>
 <path fill="none" stroke="#ff0000" d="M121.79,-150.04C142.58,-154.91 166.75,-160.58 188.43,-165.67"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="187.66,-169.09 198.2,-167.96 189.26,-162.27 187.66,-169.09"/>
 </g>
-<!-- proc~export_xg -->
+<!-- proc~export_xg~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node5" class="node">
-<title>proc~export_xg</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node5"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_volume%export_Xg">
+<title>proc~export_xg~2</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node5"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_volume%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="326,-150 175,-150 175,-126 326,-126 326,-150"/>
 <text text-anchor="middle" x="250.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~export_xg -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~export_xg~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge4" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~export_xg</title>
+<title>program~example_nurbs_volume&#45;&gt;proc~export_xg~2</title>
 <path fill="none" stroke="#ff0000" d="M139.19,-138C147.56,-138 156.17,-138 164.73,-138"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="164.74,-141.5 174.74,-138 164.74,-134.5 164.74,-141.5"/>
 </g>
-<!-- proc~finalize -->
+<!-- proc~finalize~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node6" class="node">
-<title>proc~finalize</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node6"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_volume%finalize">
+<title>proc~finalize~2</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node6"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_volume%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="318.5,-108 182.5,-108 182.5,-84 318.5,-84 318.5,-108"/>
 <text text-anchor="middle" x="250.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~finalize -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~finalize~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge5" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~finalize</title>
+<title>program~example_nurbs_volume&#45;&gt;proc~finalize~2</title>
 <path fill="none" stroke="#ff0000" d="M121.79,-125.96C142.58,-121.09 166.75,-115.42 188.43,-110.33"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="189.26,-113.73 198.2,-108.04 187.66,-106.91 189.26,-113.73"/>
 </g>
-<!-- proc~generate_xc -->
+<!-- proc~generate_xc~5 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node7" class="node">
-<title>proc~generate_xc</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node7"><a xlink:href="../proc/generate_xc.html" xlink:title="generate_Xc">
+<title>proc~generate_xc~5</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node7"><a xlink:href="../proc/generate_xc~5.html" xlink:title="generate_Xc">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="290.5,-66 210.5,-66 210.5,-42 290.5,-42 290.5,-66"/>
 <text text-anchor="middle" x="250.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">generate_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~generate_xc -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~generate_xc~5 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge6" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~generate_xc</title>
+<title>program~example_nurbs_volume&#45;&gt;proc~generate_xc~5</title>
 <path fill="none" stroke="#ff0000" d="M87.48,-125.8C107.54,-111.85 142.34,-89.14 175,-75 183.06,-71.51 191.87,-68.43 200.51,-65.78"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="201.53,-69.13 210.15,-62.98 199.57,-62.41 201.53,-69.13"/>
 </g>
-<!-- proc~show -->
+<!-- proc~show~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node8" class="node">
-<title>proc~show</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node8"><a xlink:href="../proc/show.html" xlink:title="nurbs_volume%show">
+<title>proc~show~2</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node8"><a xlink:href="../proc/show~2.html" xlink:title="nurbs_volume%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="312.5,-24 188.5,-24 188.5,0 312.5,0 312.5,-24"/>
 <text text-anchor="middle" x="250.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%show</text>
 </a>
 </g>
 </g>
-<!-- program~example_nurbs_volume&#45;&gt;proc~show -->
+<!-- program~example_nurbs_volume&#45;&gt;proc~show~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge7" class="edge">
-<title>program~example_nurbs_volume&#45;&gt;proc~show</title>
+<title>program~example_nurbs_volume&#45;&gt;proc~show~2</title>
 <path fill="none" stroke="#ff0000" d="M79.1,-125.94C95.32,-104.09 132.65,-57.89 175,-33 178.2,-31.12 181.58,-29.4 185.06,-27.83"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="186.51,-31.02 194.45,-24.01 183.87,-24.53 186.51,-31.02"/>
 </g>
-<!-- proc~set1 -->
+<!-- proc~set1~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node14" class="node">
-<title>proc~set1</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node14"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
+<title>proc~set1~2</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node14"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="518,-433 398,-433 398,-409 518,-409 518,-433"/>
 <text text-anchor="middle" x="458" y="-418.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set1 -->
+<!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge8" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
+<title>none~set~2&#45;&gt;proc~set1~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M307.11,-390.37C332.09,-395.47 361.82,-401.55 388.18,-406.94"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="387.61,-410.39 398.11,-408.96 389.01,-403.53 387.61,-410.39"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set2~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node15" class="node">
-<title>proc~set2</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node15"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
+<title>proc~set2~2</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node15"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="518,-391 398,-391 398,-367 518,-367 518,-391"/>
 <text text-anchor="middle" x="458" y="-376.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set2 -->
+<!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge9" class="edge">
-<title>none~set&#45;&gt;proc~set2</title>
+<title>none~set~2&#45;&gt;proc~set2~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M307.11,-379C331.88,-379 361.31,-379 387.5,-379"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="387.75,-382.5 397.75,-379 387.75,-375.5 387.75,-382.5"/>
 </g>
-<!-- proc~set3 -->
+<!-- proc~set3~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node16" class="node">
-<title>proc~set3</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node16"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
+<title>proc~set3~2</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node16"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="518,-475 398,-475 398,-451 518,-451 518,-475"/>
 <text text-anchor="middle" x="458" y="-460.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set3 -->
+<!-- none~set~2&#45;&gt;proc~set3~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge10" class="edge">
-<title>none~set&#45;&gt;proc~set3</title>
+<title>none~set~2&#45;&gt;proc~set3~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M269.05,-391.23C290.17,-405.42 327.18,-428.58 362,-442 370.25,-445.18 379.09,-447.93 387.94,-450.31"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="387.35,-453.77 397.9,-452.83 389.07,-446.98 387.35,-453.77"/>
 </g>
-<!-- proc~set4 -->
+<!-- proc~set4~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node17" class="node">
-<title>proc~set4</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node17"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
+<title>proc~set4~2</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node17"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="518,-349 398,-349 398,-325 518,-325 518,-349"/>
 <text text-anchor="middle" x="458" y="-334.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set4 -->
+<!-- none~set~2&#45;&gt;proc~set4~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge11" class="edge">
-<title>none~set&#45;&gt;proc~set4</title>
+<title>none~set~2&#45;&gt;proc~set4~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M307.11,-367.63C332.09,-362.53 361.82,-356.45 388.18,-351.06"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="389.01,-354.47 398.11,-349.04 387.61,-347.61 389.01,-354.47"/>
 </g>
-<!-- interface~compute_xg -->
+<!-- interface~compute_xg~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node9" class="node">
-<title>interface~compute_xg</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node9"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~2</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node9"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="497.5,-307 418.5,-307 418.5,-283 497.5,-283 497.5,-307"/>
 <text text-anchor="middle" x="458" y="-292.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;interface~compute_xg -->
+<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge12" class="edge">
-<title>proc~create&#45;&gt;interface~compute_xg</title>
+<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
 <path fill="none" stroke="#ffda00" d="M279.73,-244.04C301.82,-253.14 333.49,-265.48 362,-274 376.86,-278.44 393.28,-282.4 408.23,-285.65"/>
 <polygon fill="#ffda00" stroke="#ffda00" points="407.8,-289.13 418.31,-287.78 409.25,-282.28 407.8,-289.13"/>
 </g>
@@ -603,54 +603,54 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;interface~ndgrid -->
+<!-- proc~create~2&#45;&gt;interface~ndgrid -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge13" class="edge">
-<title>proc~create&#45;&gt;interface~ndgrid</title>
+<title>proc~create~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ffda00" d="M316.24,-238.62C350.71,-242.14 391.83,-246.34 420.7,-249.29"/>
 <polygon fill="#ffda00" stroke="#ffda00" points="420.44,-252.78 430.74,-250.32 421.15,-245.82 420.44,-252.78"/>
 </g>
-<!-- proc~is_rational -->
+<!-- proc~is_rational~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node13" class="node">
-<title>proc~is_rational</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node13"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
+<title>proc~is_rational~2</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node13"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="534,-223 382,-223 382,-199 534,-199 534,-223"/>
 <text text-anchor="middle" x="458" y="-208.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;proc~is_rational -->
+<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge14" class="edge">
-<title>proc~create&#45;&gt;proc~is_rational</title>
+<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
 <path fill="none" stroke="#ffda00" d="M316.24,-225.38C333.81,-223.59 353.11,-221.62 371.63,-219.72"/>
 <polygon fill="#ffda00" stroke="#ffda00" points="372.23,-223.18 381.82,-218.68 371.52,-216.22 372.23,-223.18"/>
 </g>
-<!-- proc~cmp_elem_xc_vis -->
+<!-- proc~cmp_elem_xc_vis~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node11" class="node">
-<title>proc~cmp_elem_xc_vis</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis~2</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-181 362.5,-181 362.5,-157 553.5,-157 553.5,-181"/>
 <text text-anchor="middle" x="458" y="-166.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
+<!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge15" class="edge">
-<title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
+<title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
 <path fill="none" stroke="#48ff00" d="M325.69,-176.03C334.29,-175.57 343.19,-175.09 352.1,-174.61"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="352.37,-178.11 362.16,-174.08 351.99,-171.12 352.37,-178.11"/>
 </g>
-<!-- proc~cmp_elem_xg_vis -->
+<!-- proc~cmp_elem_xg_vis~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node12" class="node">
-<title>proc~cmp_elem_xg_vis</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis~2</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="554,-139 362,-139 362,-115 554,-115 554,-139"/>
 <text text-anchor="middle" x="458" y="-124.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
+<!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge16" class="edge">
-<title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
+<title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
 <path fill="none" stroke="#00ff91" d="M326.27,-134C334.6,-133.55 343.2,-133.09 351.82,-132.63"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="352.13,-136.12 361.93,-132.09 351.76,-129.13 352.13,-136.12"/>
 </g>
@@ -693,51 +693,51 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge19" class="edge">
-<title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#aaff00" d="M553.62,-159.61C575.62,-157.42 598.27,-155.17 617.71,-153.24"/>
 <polygon fill="#aaff00" stroke="#aaff00" points="618.25,-156.71 627.85,-152.23 617.55,-149.74 618.25,-156.71"/>
 </g>
-<!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge20" class="edge">
-<title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#00ff00" d="M554.23,-136.46C576.07,-138.62 598.52,-140.85 617.79,-142.77"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="617.56,-146.26 627.85,-143.77 618.25,-139.29 617.56,-146.26"/>
 </g>
-<!-- proc~cmp_degree -->
+<!-- proc~cmp_degree~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node19" class="node">
-<title>proc~cmp_degree</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node19"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
+<title>proc~cmp_degree~2</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node19"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="753,-475 590,-475 590,-451 753,-451 753,-475"/>
 <text text-anchor="middle" x="671.5" y="-460.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_degree -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge21" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#00a9ff" d="M518.2,-432.76C543.55,-437.79 573.37,-443.71 599.87,-448.97"/>
 <polygon fill="#00a9ff" stroke="#00a9ff" points="599.36,-452.44 609.85,-450.96 600.72,-445.57 599.36,-452.44"/>
 </g>
-<!-- proc~cmp_nc -->
+<!-- proc~cmp_nc~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node20" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node20"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
+<title>proc~cmp_nc~2</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node20"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="741,-433 602,-433 602,-409 741,-409 741,-433"/>
 <text text-anchor="middle" x="671.5" y="-418.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge22" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#00a9ff" d="M518.2,-421C540.97,-421 567.35,-421 591.68,-421"/>
 <polygon fill="#00a9ff" stroke="#00a9ff" points="591.97,-424.5 601.97,-421 591.97,-417.5 591.97,-424.5"/>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge23" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
+<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#0000ff" d="M518.2,-390.76C543.55,-395.79 573.37,-401.71 599.87,-406.97"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="599.36,-410.44 609.85,-408.96 600.72,-403.57 599.36,-410.44"/>
 </g>
@@ -750,15 +750,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge24" class="edge">
-<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#0000ff" d="M518.2,-379C542.9,-379 571.84,-379 597.82,-379"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="597.99,-382.5 607.99,-379 597.99,-375.5 597.99,-382.5"/>
 </g>
-<!-- proc~set3&#45;&gt;proc~cmp_degree -->
+<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge25" class="edge">
-<title>proc~set3&#45;&gt;proc~cmp_degree</title>
+<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#aa00ff" d="M518.2,-463C537.31,-463 558.96,-463 579.81,-463"/>
 <polygon fill="#aa00ff" stroke="#aa00ff" points="579.97,-466.5 589.97,-463 579.97,-459.5 579.97,-466.5"/>
 </g>
@@ -807,18 +807,18 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M715.37,-139.2C742.32,-133.66 777.69,-126.4 808.47,-120.07"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="809.19,-123.5 818.29,-118.06 807.79,-116.64 809.19,-123.5"/>
 </g>
-<!-- proc~get_multiplicity -->
+<!-- proc~get_multiplicity~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_node28" class="node">
-<title>proc~get_multiplicity</title>
-<g id="a_program~~example_nurbs_volume~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
+<title>proc~get_multiplicity~2</title>
+<g id="a_program~~example_nurbs_volume~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="967,-474 789,-474 789,-450 967,-450 967,-474"/>
 <text text-anchor="middle" x="878" y="-459.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
+<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge29" class="edge">
-<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
+<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
 <path fill="none" stroke="#ffff00" d="M753.03,-462.61C761.47,-462.56 770.11,-462.52 778.71,-462.48"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="778.8,-465.98 788.78,-462.43 778.76,-458.98 778.8,-465.98"/>
 </g>
@@ -831,9 +831,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge30" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M741.14,-424.68C811.69,-428.47 921.03,-434.33 992.57,-438.17"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="992.67,-441.68 1002.85,-438.72 993.05,-434.69 992.67,-441.68"/>
 </g>
@@ -882,9 +882,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1127.33,-434C1135.69,-432.91 1144.35,-431.78 1152.92,-430.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1153.44,-434.12 1162.9,-429.36 1152.53,-427.18 1153.44,-434.12"/>
 </g>
-<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example_nurbs_volume~~CallsGraph_edge34" class="edge">
-<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0000ff" d="M967.17,-452.47C975.77,-451.54 984.42,-450.6 992.82,-449.7"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="993.36,-453.16 1002.93,-448.6 992.61,-446.2 993.36,-453.16"/>
 </g>
@@ -991,7 +991,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~22"></span>
+              <span class="anchor" id="variable-wc~6"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1007,7 +1007,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~22"></span>
+              <span class="anchor" id="variable-xc~6"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1023,7 +1023,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nurbs"></span>
+              <span class="anchor" id="variable-nurbs~5"></span>
               type(<a href='../type/nurbs_volume.html'>nurbs_volume</a>)
             </td>
             <td>
@@ -1051,7 +1051,7 @@ <h2>Variables</h2>
     <section>
     <h2>Functions</h2>
       <div class="card">
-    <div class="card-header codesum"><span class="anchor" id="proc-generate_xc"></span> <h3> function <a href='../proc/generate_xc.html'>generate_Xc</a>(L) result(control_points)  
+    <div class="card-header codesum"><span class="anchor" id="proc-generate_xc~5"></span> <h3> function <a href='../proc/generate_xc~5.html'>generate_Xc</a>(L) result(control_points)  
 </h3></div>
     <div class="card-body">
           
@@ -1199,7 +1199,7 @@ <h2 id="src">Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/example_ppm1.html b/program/example_ppm1.html
index 7b270e4e2..666e1cf4f 100644
--- a/program/example_ppm1.html
+++ b/program/example_ppm1.html
@@ -115,28 +115,28 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-xg~12">Xg</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-aspect_ratio">aspect_ratio</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-background_color">background_color</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-blue">blue</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-center~4">center</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-cmap">cmap</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-green">green</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-height">height</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-i~28">i</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-idx">idx</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-image">image</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-inner_radius">inner_radius</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-ng~13">ng</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-outer_radius">outer_radius</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-px">px</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-red">red</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-res1~5">res1</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-res2~5">res2</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-shape~6">shape</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-t~3">t</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-width">width</a>
-            <a class="list-group-item" href="../program/example_ppm1.html#variable-z_values">z_values</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-xg~36">Xg</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-aspect_ratio~3">aspect_ratio</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-background_color~3">background_color</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-blue~3">blue</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-center~11">center</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-cmap~3">cmap</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-green~3">green</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-height~4">height</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-i~110">i</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-idx~3">idx</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-image~3">image</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-inner_radius~2">inner_radius</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-ng~39">ng</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-outer_radius~2">outer_radius</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-px~3">px</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-red~3">red</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-res1~11">res1</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-res2~11">res2</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-shape~21">shape</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-t~12">t</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-width~3">width</a>
+            <a class="list-group-item" href="../program/example_ppm1.html#variable-z_values~3">z_values</a>
         </div>
       </div>
     </div>
@@ -172,9 +172,9 @@ <h3 class="card-header card-title bg-light">Uses</h3>
         <ul class="list-group list-group-flush">
             <li class="list-group-item">
               <ul class="list-inline">
-                  <li class="list-inline-item">forimage</li>
-                  <li class="list-inline-item"><a href='../module/forcad.html'>forcad</a></li>
                   <li class="list-inline-item">fortime</li>
+                  <li class="list-inline-item"><a href='../module/forcad.html'>forcad</a></li>
+                  <li class="list-inline-item">forimage</li>
                   <li class="list-inline-item">forcolormap</li>
               </ul>
             </li>
@@ -506,63 +506,63 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M54.03,-318.18C65.6,-340.24 93.07,-386.76 130,-411 143.32,-419.74 160.1,-424.85 174.92,-427.83"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="174.35,-431.28 184.81,-429.57 175.57,-424.39 174.35,-431.28"/>
 </g>
-<!-- none~get_xg~2 -->
+<!-- none~get_xg~3 -->
 <g id="program~~example_ppm1~~CallsGraph_node7" class="node">
-<title>none~get_xg~2</title>
-<g id="a_program~~example_ppm1~~CallsGraph_node7"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xg~2" xlink:title="nurbs_surface%get_Xg">
+<title>none~get_xg~3</title>
+<g id="a_program~~example_ppm1~~CallsGraph_node7"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xg~3" xlink:title="nurbs_surface%get_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="279,-402 145,-402 145,-378 279,-378 279,-402"/>
 <text text-anchor="middle" x="212" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;none~get_xg~2 -->
+<!-- program~example_ppm1&#45;&gt;none~get_xg~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge6" class="edge">
-<title>program~example_ppm1&#45;&gt;none~get_xg~2</title>
+<title>program~example_ppm1&#45;&gt;none~get_xg~3</title>
 <path fill="none" stroke="#ff0000" d="M60.26,-318.02C75.42,-332.22 102.58,-355.6 130,-369 134.26,-371.08 138.76,-372.97 143.35,-374.69"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="142.29,-378.03 152.89,-377.98 144.57,-371.41 142.29,-378.03"/>
 </g>
-<!-- proc~create~2 -->
+<!-- proc~create~3 -->
 <g id="program~~example_ppm1~~CallsGraph_node8" class="node">
-<title>proc~create~2</title>
-<g id="a_program~~example_ppm1~~CallsGraph_node8"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
+<title>proc~create~3</title>
+<g id="a_program~~example_ppm1~~CallsGraph_node8"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="277.5,-360 146.5,-360 146.5,-336 277.5,-336 277.5,-360"/>
 <text text-anchor="middle" x="212" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~create~2 -->
+<!-- program~example_ppm1&#45;&gt;proc~create~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge7" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~create~2</title>
+<title>program~example_ppm1&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#ff0000" d="M94.27,-317.92C113.03,-322.76 134.88,-328.39 154.56,-333.46"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="153.77,-336.87 164.33,-335.97 155.52,-330.09 153.77,-336.87"/>
 </g>
-<!-- proc~finalize~2 -->
+<!-- proc~finalize~3 -->
 <g id="program~~example_ppm1~~CallsGraph_node9" class="node">
-<title>proc~finalize~2</title>
-<g id="a_program~~example_ppm1~~CallsGraph_node9"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_surface%finalize">
+<title>proc~finalize~3</title>
+<g id="a_program~~example_ppm1~~CallsGraph_node9"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_surface%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="280,-318 144,-318 144,-294 280,-294 280,-318"/>
 <text text-anchor="middle" x="212" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~finalize~2 -->
+<!-- program~example_ppm1&#45;&gt;proc~finalize~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge8" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~finalize~2</title>
+<title>program~example_ppm1&#45;&gt;proc~finalize~3</title>
 <path fill="none" stroke="#ff0000" d="M94.27,-306C106.57,-306 120.2,-306 133.67,-306"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="133.92,-309.5 143.92,-306 133.92,-302.5 133.92,-309.5"/>
 </g>
-<!-- proc~get_ng~2 -->
+<!-- proc~get_ng~3 -->
 <g id="program~~example_ppm1~~CallsGraph_node10" class="node">
-<title>proc~get_ng~2</title>
-<g id="a_program~~example_ppm1~~CallsGraph_node10"><a xlink:href="../proc/get_ng~2.html" xlink:title="nurbs_surface%get_ng">
+<title>proc~get_ng~3</title>
+<g id="a_program~~example_ppm1~~CallsGraph_node10"><a xlink:href="../proc/get_ng~3.html" xlink:title="nurbs_surface%get_ng">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="278.5,-276 145.5,-276 145.5,-252 278.5,-252 278.5,-276"/>
 <text text-anchor="middle" x="212" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_ng</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm1&#45;&gt;proc~get_ng~2 -->
+<!-- program~example_ppm1&#45;&gt;proc~get_ng~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge9" class="edge">
-<title>program~example_ppm1&#45;&gt;proc~get_ng~2</title>
+<title>program~example_ppm1&#45;&gt;proc~get_ng~3</title>
 <path fill="none" stroke="#ff0000" d="M94.27,-294.08C113.03,-289.24 134.88,-283.61 154.56,-278.54"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="155.52,-281.91 164.33,-276.03 153.77,-275.13 155.52,-281.91"/>
 </g>
@@ -644,63 +644,63 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M47.74,-293.81C47.53,-251.18 52.81,-107.3 130,-33 140.01,-23.37 153.84,-18 167.25,-15.06"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="168.12,-18.46 177.34,-13.25 166.88,-11.57 168.12,-18.46"/>
 </g>
-<!-- proc~get_xg_all~2 -->
+<!-- proc~get_xg_all~3 -->
 <g id="program~~example_ppm1~~CallsGraph_node20" class="node">
-<title>proc~get_xg_all~2</title>
-<g id="a_program~~example_ppm1~~CallsGraph_node20"><a xlink:href="../proc/get_xg_all~2.html" xlink:title="nurbs_surface%get_Xg_all">
+<title>proc~get_xg_all~3</title>
+<g id="a_program~~example_ppm1~~CallsGraph_node20"><a xlink:href="../proc/get_xg_all~3.html" xlink:title="nurbs_surface%get_Xg_all">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="482,-486 330,-486 330,-462 482,-462 482,-486"/>
 <text text-anchor="middle" x="406" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xg_all</text>
 </a>
 </g>
 </g>
-<!-- none~get_xg~2&#45;&gt;proc~get_xg_all~2 -->
+<!-- none~get_xg~3&#45;&gt;proc~get_xg_all~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge16" class="edge">
-<title>none~get_xg~2&#45;&gt;proc~get_xg_all~2</title>
+<title>none~get_xg~3&#45;&gt;proc~get_xg_all~3</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M275.65,-402.07C282.08,-404.52 288.33,-407.46 294,-411 314.86,-424.02 309.27,-439.78 330,-453 332.74,-454.74 335.62,-456.35 338.6,-457.82"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="337.2,-461.03 347.76,-461.85 340.02,-454.62 337.2,-461.03"/>
 </g>
-<!-- proc~get_xgid~2 -->
+<!-- proc~get_xgid~3 -->
 <g id="program~~example_ppm1~~CallsGraph_node21" class="node">
-<title>proc~get_xgid~2</title>
-<g id="a_program~~example_ppm1~~CallsGraph_node21"><a xlink:href="../proc/get_xgid~2.html" xlink:title="nurbs_surface%get_Xgid">
+<title>proc~get_xgid~3</title>
+<g id="a_program~~example_ppm1~~CallsGraph_node21"><a xlink:href="../proc/get_xgid~3.html" xlink:title="nurbs_surface%get_Xgid">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="478,-444 334,-444 334,-420 478,-420 478,-444"/>
 <text text-anchor="middle" x="406" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xgid</text>
 </a>
 </g>
 </g>
-<!-- none~get_xg~2&#45;&gt;proc~get_xgid~2 -->
+<!-- none~get_xg~3&#45;&gt;proc~get_xgid~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge17" class="edge">
-<title>none~get_xg~2&#45;&gt;proc~get_xgid~2</title>
+<title>none~get_xg~3&#45;&gt;proc~get_xgid~3</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M268.02,-402.04C290.51,-406.96 316.7,-412.69 340.12,-417.81"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="339.46,-421.24 349.97,-419.96 340.95,-414.41 339.46,-421.24"/>
 </g>
-<!-- proc~get_xgi~2 -->
+<!-- proc~get_xgi~3 -->
 <g id="program~~example_ppm1~~CallsGraph_node22" class="node">
-<title>proc~get_xgi~2</title>
-<g id="a_program~~example_ppm1~~CallsGraph_node22"><a xlink:href="../proc/get_xgi~2.html" xlink:title="nurbs_surface%get_Xgi">
+<title>proc~get_xgi~3</title>
+<g id="a_program~~example_ppm1~~CallsGraph_node22"><a xlink:href="../proc/get_xgi~3.html" xlink:title="nurbs_surface%get_Xgi">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="474.5,-402 337.5,-402 337.5,-378 474.5,-378 474.5,-402"/>
 <text text-anchor="middle" x="406" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xgi</text>
 </a>
 </g>
 </g>
-<!-- none~get_xg~2&#45;&gt;proc~get_xgi~2 -->
+<!-- none~get_xg~3&#45;&gt;proc~get_xgi~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge18" class="edge">
-<title>none~get_xg~2&#45;&gt;proc~get_xgi~2</title>
+<title>none~get_xg~3&#45;&gt;proc~get_xgi~3</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M279.08,-390C294.56,-390 311.2,-390 327.14,-390"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="327.5,-393.5 337.5,-390 327.5,-386.5 327.5,-393.5"/>
 </g>
-<!-- interface~compute_xg~2 -->
+<!-- interface~compute_xg~3 -->
 <g id="program~~example_ppm1~~CallsGraph_node17" class="node">
-<title>interface~compute_xg~2</title>
-<g id="a_program~~example_ppm1~~CallsGraph_node17"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~3</title>
+<g id="a_program~~example_ppm1~~CallsGraph_node17"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="445.5,-360 366.5,-360 366.5,-336 445.5,-336 445.5,-360"/>
 <text text-anchor="middle" x="406" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
+<!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge19" class="edge">
-<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
+<title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
 <path fill="none" stroke="#00ff66" d="M277.73,-348C303.34,-348 332.28,-348 356.08,-348"/>
 <polygon fill="#00ff66" stroke="#00ff66" points="356.28,-351.5 366.28,-348 356.28,-344.5 356.28,-351.5"/>
 </g>
@@ -713,45 +713,45 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~ndgrid -->
+<!-- proc~create~3&#45;&gt;interface~ndgrid -->
 <g id="program~~example_ppm1~~CallsGraph_edge20" class="edge">
-<title>proc~create~2&#45;&gt;interface~ndgrid</title>
+<title>proc~create~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#00ff66" d="M268.02,-335.96C300.49,-328.86 340.66,-320.07 369.08,-313.86"/>
 <polygon fill="#00ff66" stroke="#00ff66" points="369.96,-317.25 378.98,-311.69 368.47,-310.41 369.96,-317.25"/>
 </g>
-<!-- proc~is_rational~2 -->
+<!-- proc~is_rational~3 -->
 <g id="program~~example_ppm1~~CallsGraph_node23" class="node">
-<title>proc~is_rational~2</title>
-<g id="a_program~~example_ppm1~~CallsGraph_node23"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<title>proc~is_rational~3</title>
+<g id="a_program~~example_ppm1~~CallsGraph_node23"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="482,-276 330,-276 330,-252 482,-252 482,-276"/>
 <text text-anchor="middle" x="406" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge21" class="edge">
-<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~create~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#00ff66" d="M275.65,-335.93C282.08,-333.48 288.33,-330.54 294,-327 314.86,-313.98 309.27,-298.22 330,-285 332.74,-283.26 335.62,-281.65 338.6,-280.18"/>
 <polygon fill="#00ff66" stroke="#00ff66" points="340.02,-283.38 347.76,-276.15 337.2,-276.97 340.02,-283.38"/>
 </g>
-<!-- none~set~2 -->
+<!-- none~set~3 -->
 <g id="program~~example_ppm1~~CallsGraph_node19" class="node">
-<title>none~set~2</title>
-<g id="a_program~~example_ppm1~~CallsGraph_node19"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<title>none~set~3</title>
+<g id="a_program~~example_ppm1~~CallsGraph_node19"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="462.5,-234 349.5,-234 349.5,-210 462.5,-210 462.5,-234"/>
 <text text-anchor="middle" x="406" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_ring~2&#45;&gt;none~set~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge22" class="edge">
-<title>proc~set_ring~2&#45;&gt;none~set~2</title>
+<title>proc~set_ring~2&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#0066ff" d="M281.5,-222C300.31,-222 320.66,-222 339.31,-222"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="339.47,-225.5 349.47,-222 339.47,-218.5 339.47,-225.5"/>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge23" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#0000ff" d="M268.02,-192.04C290.51,-196.96 316.7,-202.69 340.12,-207.81"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="339.46,-211.24 349.97,-209.96 340.95,-204.41 339.46,-211.24"/>
 </g>
@@ -800,99 +800,99 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ffbf00" stroke-dasharray="5,2" d="M433.19,-306C461.89,-306 508.14,-306 540.42,-306"/>
 <polygon fill="#ffbf00" stroke="#ffbf00" points="540.78,-309.5 550.78,-306 540.78,-302.5 540.78,-309.5"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="program~~example_ppm1~~CallsGraph_node27" class="node">
-<title>proc~set1~2</title>
-<g id="a_program~~example_ppm1~~CallsGraph_node27"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<title>proc~set1~3</title>
+<g id="a_program~~example_ppm1~~CallsGraph_node27"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="638,-234 518,-234 518,-210 638,-210 638,-234"/>
 <text text-anchor="middle" x="578" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge27" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
 <path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M462.66,-222C477.06,-222 492.74,-222 507.74,-222"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="507.99,-225.5 517.99,-222 507.99,-218.5 507.99,-225.5"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="program~~example_ppm1~~CallsGraph_node28" class="node">
-<title>proc~set2~2</title>
-<g id="a_program~~example_ppm1~~CallsGraph_node28"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<title>proc~set2~3</title>
+<g id="a_program~~example_ppm1~~CallsGraph_node28"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="638,-192 518,-192 518,-168 638,-168 638,-192"/>
 <text text-anchor="middle" x="578" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge28" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
 <path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M455.72,-209.96C475.28,-205.13 497.99,-199.52 518.44,-194.47"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="519.41,-197.83 528.28,-192.04 517.73,-191.04 519.41,-197.83"/>
 </g>
-<!-- proc~set3~2 -->
+<!-- proc~set3~3 -->
 <g id="program~~example_ppm1~~CallsGraph_node29" class="node">
-<title>proc~set3~2</title>
-<g id="a_program~~example_ppm1~~CallsGraph_node29"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<title>proc~set3~3</title>
+<g id="a_program~~example_ppm1~~CallsGraph_node29"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="638,-276 518,-276 518,-252 638,-252 638,-276"/>
 <text text-anchor="middle" x="578" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge29" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
+<title>none~set~3&#45;&gt;proc~set3~3</title>
 <path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M455.72,-234.04C475.28,-238.87 497.99,-244.48 518.44,-249.53"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="517.73,-252.96 528.28,-251.96 519.41,-246.17 517.73,-252.96"/>
 </g>
-<!-- proc~set4~2 -->
+<!-- proc~set4~3 -->
 <g id="program~~example_ppm1~~CallsGraph_node30" class="node">
-<title>proc~set4~2</title>
-<g id="a_program~~example_ppm1~~CallsGraph_node30"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<title>proc~set4~3</title>
+<g id="a_program~~example_ppm1~~CallsGraph_node30"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="638,-150 518,-150 518,-126 638,-126 638,-150"/>
 <text text-anchor="middle" x="578" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set4~2 -->
+<!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge30" class="edge">
-<title>none~set~2&#45;&gt;proc~set4~2</title>
+<title>none~set~3&#45;&gt;proc~set4~3</title>
 <path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M462.68,-210.45C469.46,-207.89 476.07,-204.78 482,-201 502.73,-187.78 497.74,-172.92 518,-159 520.35,-157.38 522.84,-155.88 525.42,-154.48"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="526.95,-157.62 534.42,-150.11 523.9,-151.32 526.95,-157.62"/>
 </g>
-<!-- proc~cmp_degree~2 -->
+<!-- proc~cmp_degree~3 -->
 <g id="program~~example_ppm1~~CallsGraph_node31" class="node">
-<title>proc~cmp_degree~2</title>
-<g id="a_program~~example_ppm1~~CallsGraph_node31"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<title>proc~cmp_degree~3</title>
+<g id="a_program~~example_ppm1~~CallsGraph_node31"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="837,-276 674,-276 674,-252 837,-252 837,-276"/>
 <text text-anchor="middle" x="755.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge31" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#00ff00" d="M629.29,-234.04C649.58,-238.89 673.15,-244.53 694.34,-249.6"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="693.66,-253.04 704.2,-251.96 695.29,-246.23 693.66,-253.04"/>
 </g>
-<!-- proc~cmp_nc~2 -->
+<!-- proc~cmp_nc~3 -->
 <g id="program~~example_ppm1~~CallsGraph_node32" class="node">
-<title>proc~cmp_nc~2</title>
-<g id="a_program~~example_ppm1~~CallsGraph_node32"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<title>proc~cmp_nc~3</title>
+<g id="a_program~~example_ppm1~~CallsGraph_node32"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="825,-234 686,-234 686,-210 825,-210 825,-234"/>
 <text text-anchor="middle" x="755.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge32" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#00ff00" d="M638.42,-222C650.3,-222 662.97,-222 675.4,-222"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="675.76,-225.5 685.76,-222 675.76,-218.5 675.76,-225.5"/>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge33" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#00ffff" d="M629.29,-192.04C649.58,-196.89 673.15,-202.53 694.34,-207.6"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="693.66,-211.04 704.2,-209.96 695.29,-204.23 693.66,-211.04"/>
 </g>
@@ -905,30 +905,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~example_ppm1~~CallsGraph_edge34" class="edge">
-<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#00ffff" d="M638.42,-180C652.26,-180 667.16,-180 681.51,-180"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="681.85,-183.5 691.85,-180 681.85,-176.5 681.85,-183.5"/>
 </g>
-<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge35" class="edge">
-<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#0000ff" d="M638.42,-264C646.64,-264 655.23,-264 663.86,-264"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="663.98,-267.5 673.98,-264 663.98,-260.5 663.98,-267.5"/>
 </g>
-<!-- proc~get_multiplicity~2 -->
+<!-- proc~get_multiplicity~3 -->
 <g id="program~~example_ppm1~~CallsGraph_node35" class="node">
-<title>proc~get_multiplicity~2</title>
-<g id="a_program~~example_ppm1~~CallsGraph_node35"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<title>proc~get_multiplicity~3</title>
+<g id="a_program~~example_ppm1~~CallsGraph_node35"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1051,-275 873,-275 873,-251 1051,-251 1051,-275"/>
 <text text-anchor="middle" x="962" y="-260.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="program~~example_ppm1~~CallsGraph_edge36" class="edge">
-<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#ff0000" d="M837.03,-263.61C845.47,-263.56 854.11,-263.52 862.71,-263.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="862.8,-266.98 872.78,-263.43 862.76,-259.98 862.8,-266.98"/>
 </g>
@@ -941,9 +941,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example_ppm1~~CallsGraph_edge37" class="edge">
-<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M825.14,-225.68C895.69,-229.47 1005.03,-235.33 1076.57,-239.17"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1076.67,-242.68 1086.85,-239.72 1077.05,-235.69 1076.67,-242.68"/>
 </g>
@@ -992,9 +992,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1211.33,-235C1219.69,-233.91 1228.35,-232.78 1236.92,-231.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1237.44,-235.12 1246.9,-230.36 1236.53,-228.18 1237.44,-235.12"/>
 </g>
-<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example_ppm1~~CallsGraph_edge41" class="edge">
-<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M1051.17,-253.47C1059.77,-252.54 1068.42,-251.6 1076.82,-250.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1077.36,-254.16 1086.93,-249.6 1076.61,-247.2 1077.36,-254.16"/>
 </g>
@@ -1101,7 +1101,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xg~12"></span>
+              <span class="anchor" id="variable-xg~36"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1117,7 +1117,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-aspect_ratio"></span>
+              <span class="anchor" id="variable-aspect_ratio~3"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1133,7 +1133,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-background_color"></span>
+              <span class="anchor" id="variable-background_color~3"></span>
               type(color)
             </td>
             <td>
@@ -1149,7 +1149,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-blue"></span>
+              <span class="anchor" id="variable-blue~3"></span>
               integer
             </td>
             <td>
@@ -1165,7 +1165,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center~4"></span>
+              <span class="anchor" id="variable-center~11"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1181,7 +1181,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-cmap"></span>
+              <span class="anchor" id="variable-cmap~3"></span>
               type(colormap)
             </td>
             <td>
@@ -1197,7 +1197,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-green"></span>
+              <span class="anchor" id="variable-green~3"></span>
               integer
             </td>
             <td>
@@ -1213,7 +1213,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-height"></span>
+              <span class="anchor" id="variable-height~4"></span>
               integer
             </td>
             <td>
@@ -1229,7 +1229,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-i~28"></span>
+              <span class="anchor" id="variable-i~110"></span>
               integer
             </td>
             <td>
@@ -1245,7 +1245,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-idx"></span>
+              <span class="anchor" id="variable-idx~3"></span>
               integer,
             </td>
             <td>
@@ -1261,7 +1261,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-image"></span>
+              <span class="anchor" id="variable-image~3"></span>
               type(format_pnm)
             </td>
             <td>
@@ -1277,7 +1277,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-inner_radius"></span>
+              <span class="anchor" id="variable-inner_radius~2"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1293,7 +1293,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~13"></span>
+              <span class="anchor" id="variable-ng~39"></span>
               integer
             </td>
             <td>
@@ -1309,7 +1309,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-outer_radius"></span>
+              <span class="anchor" id="variable-outer_radius~2"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1325,7 +1325,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-px"></span>
+              <span class="anchor" id="variable-px~3"></span>
               integer(kind=ik),
             </td>
             <td>
@@ -1341,7 +1341,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-red"></span>
+              <span class="anchor" id="variable-red~3"></span>
               integer
             </td>
             <td>
@@ -1357,7 +1357,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1~5"></span>
+              <span class="anchor" id="variable-res1~11"></span>
               integer
             </td>
             <td>
@@ -1373,7 +1373,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2~5"></span>
+              <span class="anchor" id="variable-res2~11"></span>
               integer
             </td>
             <td>
@@ -1389,7 +1389,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~6"></span>
+              <span class="anchor" id="variable-shape~21"></span>
               type(<a href='../type/nurbs_surface.html'>nurbs_surface</a>)
             </td>
             <td>
@@ -1405,7 +1405,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-t~3"></span>
+              <span class="anchor" id="variable-t~12"></span>
               type(timer)
             </td>
             <td>
@@ -1421,7 +1421,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-width"></span>
+              <span class="anchor" id="variable-width~3"></span>
               integer
             </td>
             <td>
@@ -1437,7 +1437,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-z_values"></span>
+              <span class="anchor" id="variable-z_values~3"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1484,7 +1484,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/example_ppm2.html b/program/example_ppm2.html
index 54b13a9fc..22af2167a 100644
--- a/program/example_ppm2.html
+++ b/program/example_ppm2.html
@@ -115,28 +115,28 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-xg~25">Xg</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-aspect_ratio~3">aspect_ratio</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-background_color~3">background_color</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-blue~3">blue</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-center~8">center</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-cmap~3">cmap</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-green~3">green</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-height~4">height</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-i~60">i</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-idx~3">idx</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-image~3">image</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-inner_radius~2">inner_radius</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-ng~27">ng</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-outer_radius~2">outer_radius</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-px~3">px</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-red~3">red</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-res1~11">res1</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-res2~11">res2</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-shape~15">shape</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-t~7">t</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-width~3">width</a>
-            <a class="list-group-item" href="../program/example_ppm2.html#variable-z_values~3">z_values</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-xg~13">Xg</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-aspect_ratio~2">aspect_ratio</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-background_color~2">background_color</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-blue~2">blue</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-center~4">center</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-cmap~2">cmap</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-green~2">green</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-height~3">height</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-i~32">i</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-idx~2">idx</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-image~2">image</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-inner_radius">inner_radius</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-ng~14">ng</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-outer_radius">outer_radius</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-px~2">px</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-red~2">red</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-res1~2">res1</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-res2~2">res2</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-shape~5">shape</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-t~4">t</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-width~2">width</a>
+            <a class="list-group-item" href="../program/example_ppm2.html#variable-z_values~2">z_values</a>
         </div>
       </div>
     </div>
@@ -172,9 +172,9 @@ <h3 class="card-header card-title bg-light">Uses</h3>
         <ul class="list-group list-group-flush">
             <li class="list-group-item">
               <ul class="list-inline">
-                  <li class="list-inline-item">forimage</li>
-                  <li class="list-inline-item"><a href='../module/forcad.html'>forcad</a></li>
                   <li class="list-inline-item">fortime</li>
+                  <li class="list-inline-item"><a href='../module/forcad.html'>forcad</a></li>
+                  <li class="list-inline-item">forimage</li>
                   <li class="list-inline-item">forcolormap</li>
               </ul>
             </li>
@@ -506,78 +506,78 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M51.17,-360.05C59.23,-388.26 83.26,-458.94 130,-495 142.88,-504.93 159.97,-510.2 175.17,-512.98"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="174.9,-516.48 185.32,-514.53 175.96,-509.56 174.9,-516.48"/>
 </g>
-<!-- none~get_xg~2 -->
+<!-- none~get_xg~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node7" class="node">
-<title>none~get_xg~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node7"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xg~2" xlink:title="nurbs_surface%get_Xg">
+<title>none~get_xg~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node7"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xg~3" xlink:title="nurbs_surface%get_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="279.5,-486 145.5,-486 145.5,-462 279.5,-462 279.5,-486"/>
 <text text-anchor="middle" x="212.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;none~get_xg~2 -->
+<!-- program~example_ppm2&#45;&gt;none~get_xg~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge6" class="edge">
-<title>program~example_ppm2&#45;&gt;none~get_xg~2</title>
+<title>program~example_ppm2&#45;&gt;none~get_xg~3</title>
 <path fill="none" stroke="#ff0000" d="M54.03,-360.19C65.59,-382.26 93.05,-428.79 130,-453 132.6,-454.71 135.34,-456.27 138.17,-457.72"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="136.9,-460.98 147.46,-461.9 139.78,-454.6 136.9,-460.98"/>
 </g>
-<!-- proc~create~2 -->
+<!-- proc~create~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node8" class="node">
-<title>proc~create~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node8"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
+<title>proc~create~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node8"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="278,-444 147,-444 147,-420 278,-420 278,-444"/>
 <text text-anchor="middle" x="212.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~create~2 -->
+<!-- program~example_ppm2&#45;&gt;proc~create~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge7" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~create~2</title>
+<title>program~example_ppm2&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#ff0000" d="M60.26,-360.02C75.41,-374.23 102.57,-397.63 130,-411 134.1,-413 138.41,-414.82 142.82,-416.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="142,-419.9 152.6,-419.87 144.29,-413.29 142,-419.9"/>
 </g>
-<!-- proc~finalize~2 -->
+<!-- proc~finalize~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node9" class="node">
-<title>proc~finalize~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node9"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_surface%finalize">
+<title>proc~finalize~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node9"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_surface%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="280.5,-402 144.5,-402 144.5,-378 280.5,-378 280.5,-402"/>
 <text text-anchor="middle" x="212.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~finalize~2 -->
+<!-- program~example_ppm2&#45;&gt;proc~finalize~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge8" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~finalize~2</title>
+<title>program~example_ppm2&#45;&gt;proc~finalize~3</title>
 <path fill="none" stroke="#ff0000" d="M94.42,-359.92C113.23,-364.76 135.14,-370.39 154.89,-375.46"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="154.13,-378.88 164.69,-377.97 155.87,-372.1 154.13,-378.88"/>
 </g>
-<!-- proc~get_ng~2 -->
+<!-- proc~get_ng~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node10" class="node">
-<title>proc~get_ng~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node10"><a xlink:href="../proc/get_ng~2.html" xlink:title="nurbs_surface%get_ng">
+<title>proc~get_ng~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node10"><a xlink:href="../proc/get_ng~3.html" xlink:title="nurbs_surface%get_ng">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="279,-360 146,-360 146,-336 279,-336 279,-360"/>
 <text text-anchor="middle" x="212.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_ng</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~get_ng~2 -->
+<!-- program~example_ppm2&#45;&gt;proc~get_ng~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge9" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~get_ng~2</title>
+<title>program~example_ppm2&#45;&gt;proc~get_ng~3</title>
 <path fill="none" stroke="#ff0000" d="M94.42,-348C107.25,-348 121.53,-348 135.58,-348"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="135.75,-351.5 145.75,-348 135.75,-344.5 135.75,-351.5"/>
 </g>
-<!-- proc~rotate_xc~2 -->
+<!-- proc~rotate_xc~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node11" class="node">
-<title>proc~rotate_xc~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node11"><a xlink:href="../proc/rotate_xc~2.html" xlink:title="nurbs_surface%rotate_Xc">
+<title>proc~rotate_xc~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node11"><a xlink:href="../proc/rotate_xc~3.html" xlink:title="nurbs_surface%rotate_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="286.5,-318 138.5,-318 138.5,-294 286.5,-294 286.5,-318"/>
 <text text-anchor="middle" x="212.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%rotate_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~rotate_xc~2 -->
+<!-- program~example_ppm2&#45;&gt;proc~rotate_xc~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge10" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~rotate_xc~2</title>
+<title>program~example_ppm2&#45;&gt;proc~rotate_xc~3</title>
 <path fill="none" stroke="#ff0000" d="M94.42,-336.08C113.23,-331.24 135.14,-325.61 154.89,-320.54"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="155.87,-323.9 164.69,-318.03 154.13,-317.12 155.87,-323.9"/>
 </g>
@@ -611,18 +611,18 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M54.03,-335.81C65.59,-313.74 93.05,-267.21 130,-243 132.6,-241.29 135.34,-239.73 138.17,-238.28"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="139.78,-241.4 147.46,-234.1 136.9,-235.02 139.78,-241.4"/>
 </g>
-<!-- proc~translate_xc~2 -->
+<!-- proc~translate_xc~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node14" class="node">
-<title>proc~translate_xc~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node14"><a xlink:href="../proc/translate_xc~2.html" xlink:title="nurbs_surface%translate_Xc">
+<title>proc~translate_xc~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node14"><a xlink:href="../proc/translate_xc~3.html" xlink:title="nurbs_surface%translate_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="294,-192 131,-192 131,-168 294,-168 294,-192"/>
 <text text-anchor="middle" x="212.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%translate_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm2&#45;&gt;proc~translate_xc~2 -->
+<!-- program~example_ppm2&#45;&gt;proc~translate_xc~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge13" class="edge">
-<title>program~example_ppm2&#45;&gt;proc~translate_xc~2</title>
+<title>program~example_ppm2&#45;&gt;proc~translate_xc~3</title>
 <path fill="none" stroke="#ff0000" d="M51.17,-335.95C59.23,-307.74 83.26,-237.06 130,-201 131.83,-199.59 133.75,-198.27 135.74,-197.04"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="137.65,-199.98 144.82,-192.18 134.35,-193.81 137.65,-199.98"/>
 </g>
@@ -674,63 +674,63 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M49.51,-335.86C56.28,-283.5 85.39,-77.5 130,-33 139.97,-23.05 154,-17.62 167.6,-14.71"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="168.59,-18.09 177.85,-12.94 167.4,-11.19 168.59,-18.09"/>
 </g>
-<!-- proc~get_xg_all~2 -->
+<!-- proc~get_xg_all~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node22" class="node">
-<title>proc~get_xg_all~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node22"><a xlink:href="../proc/get_xg_all~2.html" xlink:title="nurbs_surface%get_Xg_all">
+<title>proc~get_xg_all~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node22"><a xlink:href="../proc/get_xg_all~3.html" xlink:title="nurbs_surface%get_Xg_all">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="483,-570 331,-570 331,-546 483,-546 483,-570"/>
 <text text-anchor="middle" x="407" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xg_all</text>
 </a>
 </g>
 </g>
-<!-- none~get_xg~2&#45;&gt;proc~get_xg_all~2 -->
+<!-- none~get_xg~3&#45;&gt;proc~get_xg_all~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge18" class="edge">
-<title>none~get_xg~2&#45;&gt;proc~get_xg_all~2</title>
+<title>none~get_xg~3&#45;&gt;proc~get_xg_all~3</title>
 <path fill="none" stroke="#3cff00" stroke-dasharray="5,2" d="M276.54,-486.03C283.01,-488.49 289.3,-491.45 295,-495 315.87,-508 310.27,-523.78 331,-537 333.74,-538.74 336.62,-540.35 339.6,-541.82"/>
 <polygon fill="#3cff00" stroke="#3cff00" points="338.2,-545.03 348.76,-545.85 341.02,-538.62 338.2,-545.03"/>
 </g>
-<!-- proc~get_xgid~2 -->
+<!-- proc~get_xgid~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node23" class="node">
-<title>proc~get_xgid~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node23"><a xlink:href="../proc/get_xgid~2.html" xlink:title="nurbs_surface%get_Xgid">
+<title>proc~get_xgid~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node23"><a xlink:href="../proc/get_xgid~3.html" xlink:title="nurbs_surface%get_Xgid">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="479,-528 335,-528 335,-504 479,-504 479,-528"/>
 <text text-anchor="middle" x="407" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xgid</text>
 </a>
 </g>
 </g>
-<!-- none~get_xg~2&#45;&gt;proc~get_xgid~2 -->
+<!-- none~get_xg~3&#45;&gt;proc~get_xgid~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge19" class="edge">
-<title>none~get_xg~2&#45;&gt;proc~get_xgid~2</title>
+<title>none~get_xg~3&#45;&gt;proc~get_xgid~3</title>
 <path fill="none" stroke="#3cff00" stroke-dasharray="5,2" d="M268.66,-486.04C291.22,-490.96 317.47,-496.69 340.96,-501.81"/>
 <polygon fill="#3cff00" stroke="#3cff00" points="340.31,-505.25 350.83,-503.96 341.81,-498.41 340.31,-505.25"/>
 </g>
-<!-- proc~get_xgi~2 -->
+<!-- proc~get_xgi~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node24" class="node">
-<title>proc~get_xgi~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node24"><a xlink:href="../proc/get_xgi~2.html" xlink:title="nurbs_surface%get_Xgi">
+<title>proc~get_xgi~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node24"><a xlink:href="../proc/get_xgi~3.html" xlink:title="nurbs_surface%get_Xgi">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="475.5,-486 338.5,-486 338.5,-462 475.5,-462 475.5,-486"/>
 <text text-anchor="middle" x="407" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xgi</text>
 </a>
 </g>
 </g>
-<!-- none~get_xg~2&#45;&gt;proc~get_xgi~2 -->
+<!-- none~get_xg~3&#45;&gt;proc~get_xgi~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge20" class="edge">
-<title>none~get_xg~2&#45;&gt;proc~get_xgi~2</title>
+<title>none~get_xg~3&#45;&gt;proc~get_xgi~3</title>
 <path fill="none" stroke="#3cff00" stroke-dasharray="5,2" d="M279.75,-474C295.27,-474 311.95,-474 327.94,-474"/>
 <polygon fill="#3cff00" stroke="#3cff00" points="328.32,-477.5 338.32,-474 328.32,-470.5 328.32,-477.5"/>
 </g>
-<!-- interface~compute_xg~2 -->
+<!-- interface~compute_xg~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node19" class="node">
-<title>interface~compute_xg~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node19"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node19"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="446.5,-444 367.5,-444 367.5,-420 446.5,-420 446.5,-444"/>
 <text text-anchor="middle" x="407" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
+<!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge21" class="edge">
-<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
+<title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
 <path fill="none" stroke="#00ff1e" d="M278.14,-432C303.92,-432 333.11,-432 357.08,-432"/>
 <polygon fill="#00ff1e" stroke="#00ff1e" points="357.35,-435.5 367.35,-432 357.35,-428.5 357.35,-435.5"/>
 </g>
@@ -743,24 +743,24 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~ndgrid -->
+<!-- proc~create~3&#45;&gt;interface~ndgrid -->
 <g id="program~~example_ppm2~~CallsGraph_edge22" class="edge">
-<title>proc~create~2&#45;&gt;interface~ndgrid</title>
+<title>proc~create~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#00ff1e" d="M268.66,-419.96C301.22,-412.86 341.49,-404.07 369.99,-397.86"/>
 <polygon fill="#00ff1e" stroke="#00ff1e" points="370.89,-401.24 379.92,-395.69 369.4,-394.4 370.89,-401.24"/>
 </g>
-<!-- proc~is_rational~2 -->
+<!-- proc~is_rational~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node25" class="node">
-<title>proc~is_rational~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node25"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<title>proc~is_rational~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node25"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="483,-360 331,-360 331,-336 483,-336 483,-360"/>
 <text text-anchor="middle" x="407" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge23" class="edge">
-<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~create~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#00ff1e" d="M276.54,-419.97C283.01,-417.51 289.3,-414.55 295,-411 315.87,-398 310.27,-382.22 331,-369 333.74,-367.26 336.62,-365.65 339.6,-364.18"/>
 <polygon fill="#00ff1e" stroke="#00ff1e" points="341.02,-367.38 348.76,-360.15 338.2,-360.97 341.02,-367.38"/>
 </g>
@@ -773,30 +773,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~rotate_xc~2&#45;&gt;proc~rotation -->
+<!-- proc~rotate_xc~3&#45;&gt;proc~rotation -->
 <g id="program~~example_ppm2~~CallsGraph_edge24" class="edge">
-<title>proc~rotate_xc~2&#45;&gt;proc~rotation</title>
+<title>proc~rotate_xc~3&#45;&gt;proc~rotation</title>
 <path fill="none" stroke="#00d1ff" d="M286.55,-306C314.96,-306 346.23,-306 369.65,-306"/>
 <polygon fill="#00d1ff" stroke="#00d1ff" points="369.82,-309.5 379.82,-306 369.82,-302.5 369.82,-309.5"/>
 </g>
-<!-- none~set~2 -->
+<!-- none~set~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node21" class="node">
-<title>none~set~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node21"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<title>none~set~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node21"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="463.5,-234 350.5,-234 350.5,-210 463.5,-210 463.5,-234"/>
 <text text-anchor="middle" x="407" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_half_ring~2&#45;&gt;none~set~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge25" class="edge">
-<title>proc~set_half_ring~2&#45;&gt;none~set~2</title>
+<title>proc~set_half_ring~2&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#0078ff" d="M268.66,-251.96C291.22,-247.04 317.47,-241.31 340.96,-236.19"/>
 <polygon fill="#0078ff" stroke="#0078ff" points="341.81,-239.59 350.83,-234.04 340.31,-232.75 341.81,-239.59"/>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge26" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#001dff" d="M294.58,-222C309.86,-222 325.66,-222 340.39,-222"/>
 <polygon fill="#001dff" stroke="#001dff" points="340.4,-225.5 350.4,-222 340.4,-218.5 340.4,-225.5"/>
 </g>
@@ -845,63 +845,63 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ffaa00" stroke-dasharray="5,2" d="M434.19,-390C462.89,-390 509.14,-390 541.42,-390"/>
 <polygon fill="#ffaa00" stroke="#ffaa00" points="541.78,-393.5 551.78,-390 541.78,-386.5 541.78,-393.5"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node31" class="node">
-<title>proc~set1~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node31"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<title>proc~set1~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node31"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="639,-234 519,-234 519,-210 639,-210 639,-234"/>
 <text text-anchor="middle" x="579" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge30" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
 <path fill="none" stroke="#aaff00" stroke-dasharray="5,2" d="M463.66,-222C478.06,-222 493.74,-222 508.74,-222"/>
 <polygon fill="#aaff00" stroke="#aaff00" points="508.99,-225.5 518.99,-222 508.99,-218.5 508.99,-225.5"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node32" class="node">
-<title>proc~set2~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node32"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<title>proc~set2~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node32"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="639,-192 519,-192 519,-168 639,-168 639,-192"/>
 <text text-anchor="middle" x="579" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge31" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
 <path fill="none" stroke="#aaff00" stroke-dasharray="5,2" d="M456.72,-209.96C476.28,-205.13 498.99,-199.52 519.44,-194.47"/>
 <polygon fill="#aaff00" stroke="#aaff00" points="520.41,-197.83 529.28,-192.04 518.73,-191.04 520.41,-197.83"/>
 </g>
-<!-- proc~set3~2 -->
+<!-- proc~set3~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node33" class="node">
-<title>proc~set3~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node33"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<title>proc~set3~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node33"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="639,-276 519,-276 519,-252 639,-252 639,-276"/>
 <text text-anchor="middle" x="579" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge32" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
+<title>none~set~3&#45;&gt;proc~set3~3</title>
 <path fill="none" stroke="#aaff00" stroke-dasharray="5,2" d="M456.72,-234.04C476.28,-238.87 498.99,-244.48 519.44,-249.53"/>
 <polygon fill="#aaff00" stroke="#aaff00" points="518.73,-252.96 529.28,-251.96 520.41,-246.17 518.73,-252.96"/>
 </g>
-<!-- proc~set4~2 -->
+<!-- proc~set4~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node34" class="node">
-<title>proc~set4~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node34"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<title>proc~set4~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node34"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="639,-150 519,-150 519,-126 639,-126 639,-150"/>
 <text text-anchor="middle" x="579" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set4~2 -->
+<!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge33" class="edge">
-<title>none~set~2&#45;&gt;proc~set4~2</title>
+<title>none~set~3&#45;&gt;proc~set4~3</title>
 <path fill="none" stroke="#aaff00" stroke-dasharray="5,2" d="M463.68,-210.45C470.46,-207.89 477.07,-204.78 483,-201 503.73,-187.78 498.74,-172.92 519,-159 521.35,-157.38 523.84,-155.88 526.42,-154.48"/>
 <polygon fill="#aaff00" stroke="#aaff00" points="527.95,-157.62 535.42,-150.11 524.9,-151.32 527.95,-157.62"/>
 </g>
@@ -929,39 +929,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#aa00ff" d="M434.19,-306C462.89,-306 509.14,-306 541.42,-306"/>
 <polygon fill="#aa00ff" stroke="#aa00ff" points="541.78,-309.5 551.78,-306 541.78,-302.5 541.78,-309.5"/>
 </g>
-<!-- proc~cmp_degree~2 -->
+<!-- proc~cmp_degree~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node36" class="node">
-<title>proc~cmp_degree~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node36"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<title>proc~cmp_degree~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node36"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="838,-276 675,-276 675,-252 838,-252 838,-276"/>
 <text text-anchor="middle" x="756.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge36" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#00ff3f" d="M630.29,-234.04C650.58,-238.89 674.15,-244.53 695.34,-249.6"/>
 <polygon fill="#00ff3f" stroke="#00ff3f" points="694.66,-253.04 705.2,-251.96 696.29,-246.23 694.66,-253.04"/>
 </g>
-<!-- proc~cmp_nc~2 -->
+<!-- proc~cmp_nc~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node37" class="node">
-<title>proc~cmp_nc~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node37"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<title>proc~cmp_nc~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node37"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="826,-234 687,-234 687,-210 826,-210 826,-234"/>
 <text text-anchor="middle" x="756.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge37" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#00ff3f" d="M639.42,-222C651.3,-222 663.97,-222 676.4,-222"/>
 <polygon fill="#00ff3f" stroke="#00ff3f" points="676.76,-225.5 686.76,-222 676.76,-218.5 676.76,-225.5"/>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge38" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#00ffff" d="M630.29,-192.04C650.58,-196.89 674.15,-202.53 695.34,-207.6"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="694.66,-211.04 705.2,-209.96 696.29,-204.23 694.66,-211.04"/>
 </g>
@@ -974,30 +974,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~example_ppm2~~CallsGraph_edge39" class="edge">
-<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#00ffff" d="M639.42,-180C653.26,-180 668.16,-180 682.51,-180"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="682.85,-183.5 692.85,-180 682.85,-176.5 682.85,-183.5"/>
 </g>
-<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge40" class="edge">
-<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#003fff" d="M639.42,-264C647.64,-264 656.23,-264 664.86,-264"/>
 <polygon fill="#003fff" stroke="#003fff" points="664.98,-267.5 674.98,-264 664.98,-260.5 664.98,-267.5"/>
 </g>
-<!-- proc~get_multiplicity~2 -->
+<!-- proc~get_multiplicity~3 -->
 <g id="program~~example_ppm2~~CallsGraph_node40" class="node">
-<title>proc~get_multiplicity~2</title>
-<g id="a_program~~example_ppm2~~CallsGraph_node40"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<title>proc~get_multiplicity~3</title>
+<g id="a_program~~example_ppm2~~CallsGraph_node40"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1052,-275 874,-275 874,-251 1052,-251 1052,-275"/>
 <text text-anchor="middle" x="963" y="-260.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="program~~example_ppm2~~CallsGraph_edge41" class="edge">
-<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#ff0000" d="M838.03,-263.61C846.47,-263.56 855.11,-263.52 863.71,-263.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="863.8,-266.98 873.78,-263.43 863.76,-259.98 863.8,-266.98"/>
 </g>
@@ -1010,9 +1010,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example_ppm2~~CallsGraph_edge42" class="edge">
-<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M826.14,-225.68C896.69,-229.47 1006.03,-235.33 1077.57,-239.17"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1077.67,-242.68 1087.85,-239.72 1078.05,-235.69 1077.67,-242.68"/>
 </g>
@@ -1061,9 +1061,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1212.33,-235C1220.69,-233.91 1229.35,-232.78 1237.92,-231.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1238.44,-235.12 1247.9,-230.36 1237.53,-228.18 1238.44,-235.12"/>
 </g>
-<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example_ppm2~~CallsGraph_edge46" class="edge">
-<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M1052.17,-253.47C1060.77,-252.54 1069.42,-251.6 1077.82,-250.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1078.36,-254.16 1087.93,-249.6 1077.61,-247.2 1078.36,-254.16"/>
 </g>
@@ -1170,7 +1170,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xg~25"></span>
+              <span class="anchor" id="variable-xg~13"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1186,7 +1186,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-aspect_ratio~3"></span>
+              <span class="anchor" id="variable-aspect_ratio~2"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1202,7 +1202,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-background_color~3"></span>
+              <span class="anchor" id="variable-background_color~2"></span>
               type(color)
             </td>
             <td>
@@ -1218,7 +1218,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-blue~3"></span>
+              <span class="anchor" id="variable-blue~2"></span>
               integer
             </td>
             <td>
@@ -1234,7 +1234,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-center~8"></span>
+              <span class="anchor" id="variable-center~4"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1250,7 +1250,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-cmap~3"></span>
+              <span class="anchor" id="variable-cmap~2"></span>
               type(colormap)
             </td>
             <td>
@@ -1266,7 +1266,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-green~3"></span>
+              <span class="anchor" id="variable-green~2"></span>
               integer
             </td>
             <td>
@@ -1282,7 +1282,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-height~4"></span>
+              <span class="anchor" id="variable-height~3"></span>
               integer
             </td>
             <td>
@@ -1298,7 +1298,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-i~60"></span>
+              <span class="anchor" id="variable-i~32"></span>
               integer
             </td>
             <td>
@@ -1314,7 +1314,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-idx~3"></span>
+              <span class="anchor" id="variable-idx~2"></span>
               integer,
             </td>
             <td>
@@ -1330,7 +1330,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-image~3"></span>
+              <span class="anchor" id="variable-image~2"></span>
               type(format_pnm)
             </td>
             <td>
@@ -1346,7 +1346,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-inner_radius~2"></span>
+              <span class="anchor" id="variable-inner_radius"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1362,7 +1362,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~27"></span>
+              <span class="anchor" id="variable-ng~14"></span>
               integer
             </td>
             <td>
@@ -1378,7 +1378,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-outer_radius~2"></span>
+              <span class="anchor" id="variable-outer_radius"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1394,7 +1394,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-px~3"></span>
+              <span class="anchor" id="variable-px~2"></span>
               integer(kind=ik),
             </td>
             <td>
@@ -1410,7 +1410,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-red~3"></span>
+              <span class="anchor" id="variable-red~2"></span>
               integer
             </td>
             <td>
@@ -1426,7 +1426,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1~11"></span>
+              <span class="anchor" id="variable-res1~2"></span>
               integer
             </td>
             <td>
@@ -1442,7 +1442,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2~11"></span>
+              <span class="anchor" id="variable-res2~2"></span>
               integer
             </td>
             <td>
@@ -1458,7 +1458,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~15"></span>
+              <span class="anchor" id="variable-shape~5"></span>
               type(<a href='../type/nurbs_surface.html'>nurbs_surface</a>)
             </td>
             <td>
@@ -1474,7 +1474,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-t~7"></span>
+              <span class="anchor" id="variable-t~4"></span>
               type(timer)
             </td>
             <td>
@@ -1490,7 +1490,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-width~3"></span>
+              <span class="anchor" id="variable-width~2"></span>
               integer
             </td>
             <td>
@@ -1506,7 +1506,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-z_values~3"></span>
+              <span class="anchor" id="variable-z_values~2"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1553,7 +1553,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/example_ppm3.html b/program/example_ppm3.html
index 5d016d0fe..af5f547fc 100644
--- a/program/example_ppm3.html
+++ b/program/example_ppm3.html
@@ -115,25 +115,25 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-xg~24">Xg</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-aspect_ratio~2">aspect_ratio</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-background_color~2">background_color</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-blue~2">blue</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-cmap~2">cmap</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-green~2">green</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-height~3">height</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-i~59">i</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-idx~2">idx</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-image~2">image</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-ng~26">ng</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-px~2">px</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-red~2">red</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-res1~10">res1</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-res2~10">res2</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-shape~14">shape</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-t~6">t</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-width~2">width</a>
-            <a class="list-group-item" href="../program/example_ppm3.html#variable-z_values~2">z_values</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-xg~12">Xg</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-aspect_ratio">aspect_ratio</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-background_color">background_color</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-blue">blue</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-cmap">cmap</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-green">green</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-height~2">height</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-i~31">i</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-idx">idx</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-image">image</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-ng~13">ng</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-px">px</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-red">red</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-res1">res1</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-res2">res2</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-shape~4">shape</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-t~3">t</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-width">width</a>
+            <a class="list-group-item" href="../program/example_ppm3.html#variable-z_values">z_values</a>
         </div>
       </div>
     </div>
@@ -169,9 +169,9 @@ <h3 class="card-header card-title bg-light">Uses</h3>
         <ul class="list-group list-group-flush">
             <li class="list-group-item">
               <ul class="list-inline">
-                  <li class="list-inline-item">forimage</li>
-                  <li class="list-inline-item"><a href='../module/forcad.html'>forcad</a></li>
                   <li class="list-inline-item">fortime</li>
+                  <li class="list-inline-item"><a href='../module/forcad.html'>forcad</a></li>
+                  <li class="list-inline-item">forimage</li>
                   <li class="list-inline-item">forcolormap</li>
               </ul>
             </li>
@@ -499,78 +499,78 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M52.41,-391.21C62.2,-416.54 88.27,-474.97 130,-505 143.03,-514.38 159.9,-519.57 174.87,-522.45"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="174.43,-525.92 184.86,-524.09 175.56,-519.01 174.43,-525.92"/>
 </g>
-<!-- none~get_xg~2 -->
+<!-- none~get_xg~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node7" class="node">
-<title>none~get_xg~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node7"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xg~2" xlink:title="nurbs_surface%get_Xg">
+<title>none~get_xg~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node7"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xg~3" xlink:title="nurbs_surface%get_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="279,-496 145,-496 145,-472 279,-472 279,-496"/>
 <text text-anchor="middle" x="212" y="-481.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;none~get_xg~2 -->
+<!-- program~example_ppm3&#45;&gt;none~get_xg~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge6" class="edge">
-<title>program~example_ppm3&#45;&gt;none~get_xg~2</title>
+<title>program~example_ppm3&#45;&gt;none~get_xg~3</title>
 <path fill="none" stroke="#ff0000" d="M56.33,-391.03C69.7,-409.4 97.74,-444.29 130,-463 133.2,-464.86 136.57,-466.56 140.04,-468.1"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="138.84,-471.39 149.42,-471.87 141.44,-464.89 138.84,-471.39"/>
 </g>
-<!-- proc~create~2 -->
+<!-- proc~create~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node8" class="node">
-<title>proc~create~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node8"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
+<title>proc~create~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node8"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="277.5,-454 146.5,-454 146.5,-430 277.5,-430 277.5,-454"/>
 <text text-anchor="middle" x="212" y="-439.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~create~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~create~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge7" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~create~2</title>
+<title>program~example_ppm3&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#ff0000" d="M68.32,-391C84.57,-400.2 108.17,-412.7 130,-421 135.79,-423.2 141.9,-425.26 148.06,-427.15"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="147.17,-430.53 157.75,-429.98 149.14,-423.81 147.17,-430.53"/>
 </g>
-<!-- proc~finalize~2 -->
+<!-- proc~finalize~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node9" class="node">
-<title>proc~finalize~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node9"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_surface%finalize">
+<title>proc~finalize~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node9"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_surface%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="280,-412 144,-412 144,-388 280,-388 280,-412"/>
 <text text-anchor="middle" x="212" y="-397.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~finalize~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~finalize~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge8" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~finalize~2</title>
+<title>program~example_ppm3&#45;&gt;proc~finalize~3</title>
 <path fill="none" stroke="#ff0000" d="M94.27,-384.96C106.57,-386.55 120.2,-388.3 133.67,-390.04"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="133.56,-393.55 143.92,-391.36 134.45,-386.61 133.56,-393.55"/>
 </g>
-<!-- proc~get_ng~2 -->
+<!-- proc~get_ng~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node10" class="node">
-<title>proc~get_ng~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node10"><a xlink:href="../proc/get_ng~2.html" xlink:title="nurbs_surface%get_ng">
+<title>proc~get_ng~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node10"><a xlink:href="../proc/get_ng~3.html" xlink:title="nurbs_surface%get_ng">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="278.5,-370 145.5,-370 145.5,-346 278.5,-346 278.5,-370"/>
 <text text-anchor="middle" x="212" y="-355.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_ng</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~get_ng~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~get_ng~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge9" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~get_ng~2</title>
+<title>program~example_ppm3&#45;&gt;proc~get_ng~3</title>
 <path fill="none" stroke="#ff0000" d="M94.27,-373.04C107.07,-371.39 121.31,-369.56 135.31,-367.75"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="135.98,-371.19 145.45,-366.45 135.08,-364.25 135.98,-371.19"/>
 </g>
-<!-- proc~modify_xc~2 -->
+<!-- proc~modify_xc~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node11" class="node">
-<title>proc~modify_xc~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node11"><a xlink:href="../proc/modify_xc~2.html" xlink:title="nurbs_surface%modify_Xc">
+<title>proc~modify_xc~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node11"><a xlink:href="../proc/modify_xc~3.html" xlink:title="nurbs_surface%modify_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="288.5,-328 135.5,-328 135.5,-304 288.5,-304 288.5,-328"/>
 <text text-anchor="middle" x="212" y="-313.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%modify_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~modify_xc~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~modify_xc~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge10" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~modify_xc~2</title>
+<title>program~example_ppm3&#45;&gt;proc~modify_xc~3</title>
 <path fill="none" stroke="#ff0000" d="M68.32,-367C84.57,-357.8 108.17,-345.3 130,-337 135.79,-334.8 141.9,-332.74 148.06,-330.85"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="149.14,-334.19 157.75,-328.02 147.17,-327.47 149.14,-334.19"/>
 </g>
@@ -589,18 +589,18 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M56.33,-366.97C69.7,-348.6 97.74,-313.71 130,-295 133.2,-293.14 136.57,-291.44 140.04,-289.9"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="141.44,-293.11 149.42,-286.13 138.84,-286.61 141.44,-293.11"/>
 </g>
-<!-- proc~translate_xc~2 -->
+<!-- proc~translate_xc~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node13" class="node">
-<title>proc~translate_xc~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node13"><a xlink:href="../proc/translate_xc~2.html" xlink:title="nurbs_surface%translate_Xc">
+<title>proc~translate_xc~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node13"><a xlink:href="../proc/translate_xc~3.html" xlink:title="nurbs_surface%translate_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="293.5,-244 130.5,-244 130.5,-220 293.5,-220 293.5,-244"/>
 <text text-anchor="middle" x="212" y="-229.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%translate_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example_ppm3&#45;&gt;proc~translate_xc~2 -->
+<!-- program~example_ppm3&#45;&gt;proc~translate_xc~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge12" class="edge">
-<title>program~example_ppm3&#45;&gt;proc~translate_xc~2</title>
+<title>program~example_ppm3&#45;&gt;proc~translate_xc~3</title>
 <path fill="none" stroke="#ff0000" d="M52.41,-366.79C62.2,-341.46 88.27,-283.03 130,-253 132.24,-251.39 134.6,-249.89 137.04,-248.52"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="138.77,-251.57 146.21,-244.02 135.69,-245.28 138.77,-251.57"/>
 </g>
@@ -652,63 +652,63 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M47.44,-366.84C46.07,-322.22 47.57,-165.93 130,-85 139.91,-75.27 153.72,-69.88 167.13,-66.94"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="168.01,-70.34 177.24,-65.14 166.78,-63.45 168.01,-70.34"/>
 </g>
-<!-- proc~get_xg_all~2 -->
+<!-- proc~get_xg_all~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node24" class="node">
-<title>proc~get_xg_all~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node24"><a xlink:href="../proc/get_xg_all~2.html" xlink:title="nurbs_surface%get_Xg_all">
+<title>proc~get_xg_all~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node24"><a xlink:href="../proc/get_xg_all~3.html" xlink:title="nurbs_surface%get_Xg_all">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="482,-622 330,-622 330,-598 482,-598 482,-622"/>
 <text text-anchor="middle" x="406" y="-607.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xg_all</text>
 </a>
 </g>
 </g>
-<!-- none~get_xg~2&#45;&gt;proc~get_xg_all~2 -->
+<!-- none~get_xg~3&#45;&gt;proc~get_xg_all~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge17" class="edge">
-<title>none~get_xg~2&#45;&gt;proc~get_xg_all~2</title>
+<title>none~get_xg~3&#45;&gt;proc~get_xg_all~3</title>
 <path fill="none" stroke="#1fff00" stroke-dasharray="5,2" d="M279.27,-495.53C284.58,-498.1 289.59,-501.21 294,-505 324.81,-531.47 299.45,-562.23 330,-589 331.53,-590.34 333.13,-591.59 334.8,-592.76"/>
 <polygon fill="#1fff00" stroke="#1fff00" points="333.22,-595.9 343.61,-597.99 336.8,-589.88 333.22,-595.9"/>
 </g>
-<!-- proc~get_xgid~2 -->
+<!-- proc~get_xgid~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node25" class="node">
-<title>proc~get_xgid~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node25"><a xlink:href="../proc/get_xgid~2.html" xlink:title="nurbs_surface%get_Xgid">
+<title>proc~get_xgid~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node25"><a xlink:href="../proc/get_xgid~3.html" xlink:title="nurbs_surface%get_Xgid">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="478,-580 334,-580 334,-556 478,-556 478,-580"/>
 <text text-anchor="middle" x="406" y="-565.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xgid</text>
 </a>
 </g>
 </g>
-<!-- none~get_xg~2&#45;&gt;proc~get_xgid~2 -->
+<!-- none~get_xg~3&#45;&gt;proc~get_xgid~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge18" class="edge">
-<title>none~get_xg~2&#45;&gt;proc~get_xgid~2</title>
+<title>none~get_xg~3&#45;&gt;proc~get_xgid~3</title>
 <path fill="none" stroke="#1fff00" stroke-dasharray="5,2" d="M275.65,-496.07C282.08,-498.52 288.33,-501.46 294,-505 314.86,-518.02 309.27,-533.78 330,-547 332.74,-548.74 335.62,-550.35 338.6,-551.82"/>
 <polygon fill="#1fff00" stroke="#1fff00" points="337.2,-555.03 347.76,-555.85 340.02,-548.62 337.2,-555.03"/>
 </g>
-<!-- proc~get_xgi~2 -->
+<!-- proc~get_xgi~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node26" class="node">
-<title>proc~get_xgi~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node26"><a xlink:href="../proc/get_xgi~2.html" xlink:title="nurbs_surface%get_Xgi">
+<title>proc~get_xgi~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node26"><a xlink:href="../proc/get_xgi~3.html" xlink:title="nurbs_surface%get_Xgi">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="474.5,-538 337.5,-538 337.5,-514 474.5,-514 474.5,-538"/>
 <text text-anchor="middle" x="406" y="-523.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xgi</text>
 </a>
 </g>
 </g>
-<!-- none~get_xg~2&#45;&gt;proc~get_xgi~2 -->
+<!-- none~get_xg~3&#45;&gt;proc~get_xgi~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge19" class="edge">
-<title>none~get_xg~2&#45;&gt;proc~get_xgi~2</title>
+<title>none~get_xg~3&#45;&gt;proc~get_xgi~3</title>
 <path fill="none" stroke="#1fff00" stroke-dasharray="5,2" d="M268.02,-496.04C290.51,-500.96 316.7,-506.69 340.12,-511.81"/>
 <polygon fill="#1fff00" stroke="#1fff00" points="339.46,-515.24 349.97,-513.96 340.95,-508.41 339.46,-515.24"/>
 </g>
-<!-- interface~compute_xg~2 -->
+<!-- interface~compute_xg~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node18" class="node">
-<title>interface~compute_xg~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node18"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node18"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="445.5,-496 366.5,-496 366.5,-472 445.5,-472 445.5,-496"/>
 <text text-anchor="middle" x="406" y="-481.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
+<!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge20" class="edge">
-<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
+<title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
 <path fill="none" stroke="#00ff3f" d="M268.02,-454.04C295.93,-460.14 329.52,-467.49 356.45,-473.38"/>
 <polygon fill="#00ff3f" stroke="#00ff3f" points="355.91,-476.84 366.42,-475.56 357.4,-470.01 355.91,-476.84"/>
 </g>
@@ -721,90 +721,90 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~ndgrid -->
+<!-- proc~create~3&#45;&gt;interface~ndgrid -->
 <g id="program~~example_ppm3~~CallsGraph_edge21" class="edge">
-<title>proc~create~2&#45;&gt;interface~ndgrid</title>
+<title>proc~create~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#00ff3f" d="M277.73,-442C308.16,-442 343.29,-442 368.93,-442"/>
 <polygon fill="#00ff3f" stroke="#00ff3f" points="368.94,-445.5 378.94,-442 368.94,-438.5 368.94,-445.5"/>
 </g>
-<!-- proc~is_rational~2 -->
+<!-- proc~is_rational~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node27" class="node">
-<title>proc~is_rational~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node27"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<title>proc~is_rational~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node27"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="482,-412 330,-412 330,-388 482,-388 482,-412"/>
 <text text-anchor="middle" x="406" y="-397.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge22" class="edge">
-<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~create~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#00ff3f" d="M268.02,-429.96C290.51,-425.04 316.7,-419.31 340.12,-414.19"/>
 <polygon fill="#00ff3f" stroke="#00ff3f" points="340.95,-417.59 349.97,-412.04 339.46,-410.76 340.95,-417.59"/>
 </g>
-<!-- none~get_knot~2 -->
+<!-- none~get_knot~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node20" class="node">
-<title>none~get_knot~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node20"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~2" xlink:title="nurbs_surface%get_knot">
+<title>none~get_knot~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node20"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_knot~3" xlink:title="nurbs_surface%get_knot">
 <polygon fill="#a7506f" stroke="#a7506f" points="477.5,-370 334.5,-370 334.5,-346 477.5,-346 477.5,-370"/>
 <text text-anchor="middle" x="406" y="-355.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_xc~2&#45;&gt;none~get_knot~2 -->
+<!-- proc~modify_xc~3&#45;&gt;none~get_knot~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge23" class="edge">
-<title>proc~modify_xc~2&#45;&gt;none~get_knot~2</title>
+<title>proc~modify_xc~3&#45;&gt;none~get_knot~3</title>
 <path fill="none" stroke="#009fff" d="M268.02,-328.04C290.51,-332.96 316.7,-338.69 340.12,-343.81"/>
 <polygon fill="#009fff" stroke="#009fff" points="339.46,-347.24 349.97,-345.96 340.95,-340.41 339.46,-347.24"/>
 </g>
-<!-- none~get_wc~2 -->
+<!-- none~get_wc~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node21" class="node">
-<title>none~get_wc~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node21"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_wc~2" xlink:title="nurbs_surface%get_Wc">
+<title>none~get_wc~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node21"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_wc~3" xlink:title="nurbs_surface%get_Wc">
 <polygon fill="#a7506f" stroke="#a7506f" points="474,-328 338,-328 338,-304 474,-304 474,-328"/>
 <text text-anchor="middle" x="406" y="-313.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_xc~2&#45;&gt;none~get_wc~2 -->
+<!-- proc~modify_xc~3&#45;&gt;none~get_wc~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge24" class="edge">
-<title>proc~modify_xc~2&#45;&gt;none~get_wc~2</title>
+<title>proc~modify_xc~3&#45;&gt;none~get_wc~3</title>
 <path fill="none" stroke="#009fff" d="M288.61,-316C301.44,-316 314.79,-316 327.67,-316"/>
 <polygon fill="#009fff" stroke="#009fff" points="327.87,-319.5 337.87,-316 327.87,-312.5 327.87,-319.5"/>
 </g>
-<!-- none~get_xc~2 -->
+<!-- none~get_xc~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node22" class="node">
-<title>none~get_xc~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node22"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xc~2" xlink:title="nurbs_surface%get_Xc">
+<title>none~get_xc~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node22"><a xlink:href="../type/nurbs_surface.html#boundprocedure-get_xc~3" xlink:title="nurbs_surface%get_Xc">
 <polygon fill="#a7506f" stroke="#a7506f" points="472.5,-265 339.5,-265 339.5,-241 472.5,-241 472.5,-265"/>
 <text text-anchor="middle" x="406" y="-250.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_xc~2&#45;&gt;none~get_xc~2 -->
+<!-- proc~modify_xc~3&#45;&gt;none~get_xc~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge25" class="edge">
-<title>proc~modify_xc~2&#45;&gt;none~get_xc~2</title>
+<title>proc~modify_xc~3&#45;&gt;none~get_xc~3</title>
 <path fill="none" stroke="#009fff" d="M262.93,-303.96C273.26,-301.22 284.03,-298.17 294,-295 318.35,-287.26 345.16,-277.16 366.32,-268.81"/>
 <polygon fill="#009fff" stroke="#009fff" points="367.63,-272.06 375.62,-265.11 365.04,-265.56 367.63,-272.06"/>
 </g>
-<!-- none~set~2 -->
+<!-- none~set~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node23" class="node">
-<title>none~set~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node23"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<title>none~set~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node23"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="462.5,-150 349.5,-150 349.5,-126 462.5,-126 462.5,-150"/>
 <text text-anchor="middle" x="406" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- proc~modify_xc~2&#45;&gt;none~set~2 -->
+<!-- proc~modify_xc~3&#45;&gt;none~set~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge26" class="edge">
-<title>proc~modify_xc~2&#45;&gt;none~set~2</title>
+<title>proc~modify_xc~3&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#009fff" d="M278.83,-303.91C284.23,-301.47 289.38,-298.53 294,-295 319.62,-275.42 311.89,-258.68 330,-232 348.2,-205.19 371.9,-176.33 387.74,-157.76"/>
 <polygon fill="#009fff" stroke="#009fff" points="390.55,-159.87 394.42,-150 385.25,-155.3 390.55,-159.87"/>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge27" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#003fff" d="M274.6,-261.9C281.37,-259.45 287.98,-256.52 294,-253 335.59,-228.72 371.8,-184.51 390.81,-158.55"/>
 <polygon fill="#003fff" stroke="#003fff" points="393.82,-160.36 396.8,-150.19 388.13,-156.28 393.82,-160.36"/>
 </g>
@@ -853,204 +853,204 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff8b00" stroke-dasharray="5,2" d="M433.09,-446.38C466.34,-451.97 523.99,-461.65 561.43,-467.94"/>
 <polygon fill="#ff8b00" stroke="#ff8b00" points="560.98,-471.41 571.42,-469.62 562.14,-464.51 560.98,-471.41"/>
 </g>
-<!-- proc~get_knot_all~2 -->
+<!-- proc~get_knot_all~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node29" class="node">
-<title>proc~get_knot_all~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node29"><a xlink:href="../proc/get_knot_all~2.html" xlink:title="nurbs_surface%get_knot_all">
+<title>proc~get_knot_all~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node29"><a xlink:href="../proc/get_knot_all~3.html" xlink:title="nurbs_surface%get_knot_all">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="679,-444 518,-444 518,-420 679,-420 679,-444"/>
 <text text-anchor="middle" x="598.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knot_all</text>
 </a>
 </g>
 </g>
-<!-- none~get_knot~2&#45;&gt;proc~get_knot_all~2 -->
+<!-- none~get_knot~3&#45;&gt;proc~get_knot_all~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge31" class="edge">
-<title>none~get_knot~2&#45;&gt;proc~get_knot_all~2</title>
+<title>none~get_knot~3&#45;&gt;proc~get_knot_all~3</title>
 <path fill="none" stroke="#e7ff00" stroke-dasharray="5,2" d="M461.43,-370.05C468.55,-372.54 475.59,-375.5 482,-379 500.79,-389.26 499.14,-400.88 518,-411 521.68,-412.97 525.56,-414.77 529.54,-416.41"/>
 <polygon fill="#e7ff00" stroke="#e7ff00" points="528.38,-419.71 538.97,-419.93 530.83,-413.15 528.38,-419.71"/>
 </g>
-<!-- proc~get_knoti~2 -->
+<!-- proc~get_knoti~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node30" class="node">
-<title>proc~get_knoti~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node30"><a xlink:href="../proc/get_knoti~2.html" xlink:title="nurbs_surface%get_knoti">
+<title>proc~get_knoti~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node30"><a xlink:href="../proc/get_knoti~3.html" xlink:title="nurbs_surface%get_knoti">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="671.5,-402 525.5,-402 525.5,-378 671.5,-378 671.5,-402"/>
 <text text-anchor="middle" x="598.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_knoti</text>
 </a>
 </g>
 </g>
-<!-- none~get_knot~2&#45;&gt;proc~get_knoti~2 -->
+<!-- none~get_knot~3&#45;&gt;proc~get_knoti~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge32" class="edge">
-<title>none~get_knot~2&#45;&gt;proc~get_knoti~2</title>
+<title>none~get_knot~3&#45;&gt;proc~get_knoti~3</title>
 <path fill="none" stroke="#e7ff00" stroke-dasharray="5,2" d="M477.66,-369.87C490.11,-371.96 503.16,-374.15 515.88,-376.29"/>
 <polygon fill="#e7ff00" stroke="#e7ff00" points="515.55,-379.78 526,-377.99 516.71,-372.88 515.55,-379.78"/>
 </g>
-<!-- proc~get_wc_all~2 -->
+<!-- proc~get_wc_all~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node31" class="node">
-<title>proc~get_wc_all~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node31"><a xlink:href="../proc/get_wc_all~2.html" xlink:title="nurbs_surface%get_Wc_all">
+<title>proc~get_wc_all~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node31"><a xlink:href="../proc/get_wc_all~3.html" xlink:title="nurbs_surface%get_Wc_all">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="675.5,-360 521.5,-360 521.5,-336 675.5,-336 675.5,-360"/>
 <text text-anchor="middle" x="598.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wc_all</text>
 </a>
 </g>
 </g>
-<!-- none~get_wc~2&#45;&gt;proc~get_wc_all~2 -->
+<!-- none~get_wc~3&#45;&gt;proc~get_wc_all~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge33" class="edge">
-<title>none~get_wc~2&#45;&gt;proc~get_wc_all~2</title>
+<title>none~get_wc~3&#45;&gt;proc~get_wc_all~3</title>
 <path fill="none" stroke="#5cff00" stroke-dasharray="5,2" d="M474.16,-327.28C487.61,-329.54 501.88,-331.94 515.75,-334.27"/>
 <polygon fill="#5cff00" stroke="#5cff00" points="515.33,-337.75 525.77,-335.95 516.49,-330.84 515.33,-337.75"/>
 </g>
-<!-- proc~get_wci~2 -->
+<!-- proc~get_wci~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node32" class="node">
-<title>proc~get_wci~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node32"><a xlink:href="../proc/get_wci~2.html" xlink:title="nurbs_surface%get_Wci">
+<title>proc~get_wci~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node32"><a xlink:href="../proc/get_wci~3.html" xlink:title="nurbs_surface%get_Wci">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="668,-318 529,-318 529,-294 668,-294 668,-318"/>
 <text text-anchor="middle" x="598.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Wci</text>
 </a>
 </g>
 </g>
-<!-- none~get_wc~2&#45;&gt;proc~get_wci~2 -->
+<!-- none~get_wc~3&#45;&gt;proc~get_wci~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge34" class="edge">
-<title>none~get_wc~2&#45;&gt;proc~get_wci~2</title>
+<title>none~get_wc~3&#45;&gt;proc~get_wci~3</title>
 <path fill="none" stroke="#5cff00" stroke-dasharray="5,2" d="M474.16,-312.47C488.52,-311.72 503.82,-310.92 518.58,-310.14"/>
 <polygon fill="#5cff00" stroke="#5cff00" points="518.89,-313.63 528.69,-309.61 518.52,-306.64 518.89,-313.63"/>
 </g>
-<!-- proc~get_xc_all~2 -->
+<!-- proc~get_xc_all~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node33" class="node">
-<title>proc~get_xc_all~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node33"><a xlink:href="../proc/get_xc_all~2.html" xlink:title="nurbs_surface%get_Xc_all">
+<title>proc~get_xc_all~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node33"><a xlink:href="../proc/get_xc_all~3.html" xlink:title="nurbs_surface%get_Xc_all">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="674,-276 523,-276 523,-252 674,-252 674,-276"/>
 <text text-anchor="middle" x="598.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xc_all</text>
 </a>
 </g>
 </g>
-<!-- none~get_xc~2&#45;&gt;proc~get_xc_all~2 -->
+<!-- none~get_xc~3&#45;&gt;proc~get_xc_all~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge35" class="edge">
-<title>none~get_xc~2&#45;&gt;proc~get_xc_all~2</title>
+<title>none~get_xc~3&#45;&gt;proc~get_xc_all~3</title>
 <path fill="none" stroke="#00ff2e" stroke-dasharray="5,2" d="M472.56,-256.79C485.51,-257.53 499.27,-258.33 512.75,-259.11"/>
 <polygon fill="#00ff2e" stroke="#00ff2e" points="512.8,-262.62 522.99,-259.7 513.21,-255.63 512.8,-262.62"/>
 </g>
-<!-- proc~get_xcid~2 -->
+<!-- proc~get_xcid~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node34" class="node">
-<title>proc~get_xcid~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node34"><a xlink:href="../proc/get_xcid~2.html" xlink:title="nurbs_surface%get_Xcid">
+<title>proc~get_xcid~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node34"><a xlink:href="../proc/get_xcid~3.html" xlink:title="nurbs_surface%get_Xcid">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="670,-234 527,-234 527,-210 670,-210 670,-234"/>
 <text text-anchor="middle" x="598.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xcid</text>
 </a>
 </g>
 </g>
-<!-- none~get_xc~2&#45;&gt;proc~get_xcid~2 -->
+<!-- none~get_xc~3&#45;&gt;proc~get_xcid~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge36" class="edge">
-<title>none~get_xc~2&#45;&gt;proc~get_xcid~2</title>
+<title>none~get_xc~3&#45;&gt;proc~get_xcid~3</title>
 <path fill="none" stroke="#00ff2e" stroke-dasharray="5,2" d="M472.56,-242.33C486.81,-240.01 502.05,-237.53 516.81,-235.13"/>
 <polygon fill="#00ff2e" stroke="#00ff2e" points="517.63,-238.54 526.94,-233.48 516.51,-231.63 517.63,-238.54"/>
 </g>
-<!-- proc~get_xci~2 -->
+<!-- proc~get_xci~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node35" class="node">
-<title>proc~get_xci~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node35"><a xlink:href="../proc/get_xci~2.html" xlink:title="nurbs_surface%get_Xci">
+<title>proc~get_xci~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node35"><a xlink:href="../proc/get_xci~3.html" xlink:title="nurbs_surface%get_Xci">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="666.5,-192 530.5,-192 530.5,-168 666.5,-168 666.5,-192"/>
 <text text-anchor="middle" x="598.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_Xci</text>
 </a>
 </g>
 </g>
-<!-- none~get_xc~2&#45;&gt;proc~get_xci~2 -->
+<!-- none~get_xc~3&#45;&gt;proc~get_xci~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge37" class="edge">
-<title>none~get_xc~2&#45;&gt;proc~get_xci~2</title>
+<title>none~get_xc~3&#45;&gt;proc~get_xci~3</title>
 <path fill="none" stroke="#00ff2e" stroke-dasharray="5,2" d="M429.87,-240.8C451.96,-229.37 486.59,-212.4 518,-201 523.9,-198.86 530.12,-196.83 536.37,-194.95"/>
 <polygon fill="#00ff2e" stroke="#00ff2e" points="537.56,-198.25 546.19,-192.1 535.61,-191.52 537.56,-198.25"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node38" class="node">
-<title>proc~set1~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node38"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<title>proc~set1~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node38"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="658.5,-108 538.5,-108 538.5,-84 658.5,-84 658.5,-108"/>
 <text text-anchor="middle" x="598.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge38" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
 <path fill="none" stroke="#00ffb9" stroke-dasharray="5,2" d="M461.59,-125.96C483.91,-121.04 509.89,-115.31 533.13,-110.19"/>
 <polygon fill="#00ffb9" stroke="#00ffb9" points="533.89,-113.61 542.9,-108.04 532.38,-106.77 533.89,-113.61"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node39" class="node">
-<title>proc~set2~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node39"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<title>proc~set2~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node39"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="658.5,-66 538.5,-66 538.5,-42 658.5,-42 658.5,-66"/>
 <text text-anchor="middle" x="598.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge39" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
 <path fill="none" stroke="#00ffb9" stroke-dasharray="5,2" d="M462.68,-126.45C469.46,-123.89 476.07,-120.78 482,-117 502.73,-103.78 497.17,-88.06 518,-75 521.54,-72.78 525.3,-70.8 529.2,-69.02"/>
 <polygon fill="#00ffb9" stroke="#00ffb9" points="530.55,-72.25 538.49,-65.24 527.91,-65.77 530.55,-72.25"/>
 </g>
-<!-- proc~set3~2 -->
+<!-- proc~set3~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node40" class="node">
-<title>proc~set3~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node40"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<title>proc~set3~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node40"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="658.5,-150 538.5,-150 538.5,-126 658.5,-126 658.5,-150"/>
 <text text-anchor="middle" x="598.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge40" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
+<title>none~set~3&#45;&gt;proc~set3~3</title>
 <path fill="none" stroke="#00ffb9" stroke-dasharray="5,2" d="M462.61,-138C483.19,-138 506.76,-138 528.39,-138"/>
 <polygon fill="#00ffb9" stroke="#00ffb9" points="528.5,-141.5 538.5,-138 528.5,-134.5 528.5,-141.5"/>
 </g>
-<!-- proc~set4~2 -->
+<!-- proc~set4~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node41" class="node">
-<title>proc~set4~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node41"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<title>proc~set4~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node41"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="658.5,-24 538.5,-24 538.5,0 658.5,0 658.5,-24"/>
 <text text-anchor="middle" x="598.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set4~2 -->
+<!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge41" class="edge">
-<title>none~set~2&#45;&gt;proc~set4~2</title>
+<title>none~set~3&#45;&gt;proc~set4~3</title>
 <path fill="none" stroke="#00ffb9" stroke-dasharray="5,2" d="M462.76,-128.55C469.75,-125.66 476.41,-121.9 482,-117 512.55,-90.23 487.25,-59.54 518,-33 521.44,-30.03 525.25,-27.48 529.28,-25.28"/>
 <polygon fill="#00ffb9" stroke="#00ffb9" points="530.84,-28.42 538.42,-21.02 527.88,-22.07 530.84,-28.42"/>
 </g>
-<!-- proc~cmp_degree~2 -->
+<!-- proc~cmp_degree~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node42" class="node">
-<title>proc~cmp_degree~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node42"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<title>proc~cmp_degree~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node42"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="878,-150 715,-150 715,-126 878,-126 878,-150"/>
 <text text-anchor="middle" x="796.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge42" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#2700ff" d="M655.67,-108.04C678.63,-112.96 705.37,-118.69 729.27,-123.81"/>
 <polygon fill="#2700ff" stroke="#2700ff" points="728.81,-127.29 739.33,-125.96 730.28,-120.45 728.81,-127.29"/>
 </g>
-<!-- proc~cmp_nc~2 -->
+<!-- proc~cmp_nc~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node43" class="node">
-<title>proc~cmp_nc~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node43"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<title>proc~cmp_nc~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node43"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="866,-108 727,-108 727,-84 866,-84 866,-108"/>
 <text text-anchor="middle" x="796.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge43" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#2700ff" d="M658.57,-96C676.91,-96 697.41,-96 716.85,-96"/>
 <polygon fill="#2700ff" stroke="#2700ff" points="716.91,-99.5 726.91,-96 716.91,-92.5 716.91,-99.5"/>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge44" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#9c00ff" d="M655.67,-66.04C678.63,-70.96 705.37,-76.69 729.27,-81.81"/>
 <polygon fill="#9c00ff" stroke="#9c00ff" points="728.81,-85.29 739.33,-83.96 730.28,-78.45 728.81,-85.29"/>
 </g>
@@ -1063,30 +1063,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~example_ppm3~~CallsGraph_edge45" class="edge">
-<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#9c00ff" d="M658.57,-54C678.72,-54 701.49,-54 722.59,-54"/>
 <polygon fill="#9c00ff" stroke="#9c00ff" points="722.8,-57.5 732.8,-54 722.8,-50.5 722.8,-57.5"/>
 </g>
-<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge46" class="edge">
-<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#ff00eb" d="M658.57,-138C673.09,-138 688.97,-138 704.6,-138"/>
 <polygon fill="#ff00eb" stroke="#ff00eb" points="704.82,-141.5 714.82,-138 704.82,-134.5 704.82,-141.5"/>
 </g>
-<!-- proc~get_multiplicity~2 -->
+<!-- proc~get_multiplicity~3 -->
 <g id="program~~example_ppm3~~CallsGraph_node46" class="node">
-<title>proc~get_multiplicity~2</title>
-<g id="a_program~~example_ppm3~~CallsGraph_node46"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<title>proc~get_multiplicity~3</title>
+<g id="a_program~~example_ppm3~~CallsGraph_node46"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1092,-149 914,-149 914,-125 1092,-125 1092,-149"/>
 <text text-anchor="middle" x="1003" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="program~~example_ppm3~~CallsGraph_edge47" class="edge">
-<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#ff0000" d="M878.03,-137.61C886.47,-137.56 895.11,-137.52 903.71,-137.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="903.8,-140.98 913.78,-137.43 903.76,-133.98 903.8,-140.98"/>
 </g>
@@ -1099,9 +1099,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example_ppm3~~CallsGraph_edge48" class="edge">
-<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M866.14,-99.68C936.69,-103.47 1046.03,-109.33 1117.57,-113.17"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1117.67,-116.68 1127.85,-113.72 1118.05,-109.69 1117.67,-116.68"/>
 </g>
@@ -1150,9 +1150,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1252.33,-109C1260.69,-107.91 1269.35,-106.78 1277.92,-105.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1278.44,-109.12 1287.9,-104.36 1277.53,-102.18 1278.44,-109.12"/>
 </g>
-<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example_ppm3~~CallsGraph_edge52" class="edge">
-<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M1092.17,-127.47C1100.77,-126.54 1109.42,-125.6 1117.82,-124.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1118.36,-128.16 1127.93,-123.6 1117.61,-121.2 1118.36,-128.16"/>
 </g>
@@ -1259,7 +1259,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-xg~24"></span>
+              <span class="anchor" id="variable-xg~12"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1275,7 +1275,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-aspect_ratio~2"></span>
+              <span class="anchor" id="variable-aspect_ratio"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1291,7 +1291,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-background_color~2"></span>
+              <span class="anchor" id="variable-background_color"></span>
               type(color)
             </td>
             <td>
@@ -1307,7 +1307,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-blue~2"></span>
+              <span class="anchor" id="variable-blue"></span>
               integer
             </td>
             <td>
@@ -1323,7 +1323,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-cmap~2"></span>
+              <span class="anchor" id="variable-cmap"></span>
               type(colormap)
             </td>
             <td>
@@ -1339,7 +1339,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-green~2"></span>
+              <span class="anchor" id="variable-green"></span>
               integer
             </td>
             <td>
@@ -1355,7 +1355,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-height~3"></span>
+              <span class="anchor" id="variable-height~2"></span>
               integer
             </td>
             <td>
@@ -1371,7 +1371,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-i~59"></span>
+              <span class="anchor" id="variable-i~31"></span>
               integer
             </td>
             <td>
@@ -1387,7 +1387,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-idx~2"></span>
+              <span class="anchor" id="variable-idx"></span>
               integer,
             </td>
             <td>
@@ -1403,7 +1403,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-image~2"></span>
+              <span class="anchor" id="variable-image"></span>
               type(format_pnm)
             </td>
             <td>
@@ -1419,7 +1419,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~26"></span>
+              <span class="anchor" id="variable-ng~13"></span>
               integer
             </td>
             <td>
@@ -1435,7 +1435,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-px~2"></span>
+              <span class="anchor" id="variable-px"></span>
               integer(kind=ik),
             </td>
             <td>
@@ -1451,7 +1451,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-red~2"></span>
+              <span class="anchor" id="variable-red"></span>
               integer
             </td>
             <td>
@@ -1467,7 +1467,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res1~10"></span>
+              <span class="anchor" id="variable-res1"></span>
               integer
             </td>
             <td>
@@ -1483,7 +1483,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-res2~10"></span>
+              <span class="anchor" id="variable-res2"></span>
               integer
             </td>
             <td>
@@ -1499,7 +1499,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~14"></span>
+              <span class="anchor" id="variable-shape~4"></span>
               type(<a href='../type/nurbs_surface.html'>nurbs_surface</a>)
             </td>
             <td>
@@ -1515,7 +1515,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-t~6"></span>
+              <span class="anchor" id="variable-t~3"></span>
               type(timer)
             </td>
             <td>
@@ -1531,7 +1531,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-width~2"></span>
+              <span class="anchor" id="variable-width"></span>
               integer
             </td>
             <td>
@@ -1547,7 +1547,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-z_values~2"></span>
+              <span class="anchor" id="variable-z_values"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1594,7 +1594,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/example_put_to_nurbs.html b/program/example_put_to_nurbs.html
index 03b833224..3a7699e13 100644
--- a/program/example_put_to_nurbs.html
+++ b/program/example_put_to_nurbs.html
@@ -115,11 +115,11 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/example_put_to_nurbs.html#variable-x~3">X</a>
+            <a class="list-group-item" href="../program/example_put_to_nurbs.html#variable-x">X</a>
             <a class="list-group-item" href="../program/example_put_to_nurbs.html#variable-control_shape">control_shape</a>
-            <a class="list-group-item" href="../program/example_put_to_nurbs.html#variable-elem~7">elem</a>
-            <a class="list-group-item" href="../program/example_put_to_nurbs.html#variable-i~29">i</a>
-            <a class="list-group-item" href="../program/example_put_to_nurbs.html#variable-nunit~3">nunit</a>
+            <a class="list-group-item" href="../program/example_put_to_nurbs.html#variable-elem">elem</a>
+            <a class="list-group-item" href="../program/example_put_to_nurbs.html#variable-i">i</a>
+            <a class="list-group-item" href="../program/example_put_to_nurbs.html#variable-nunit">nunit</a>
         </div>
       </div>
     </div>
@@ -155,8 +155,8 @@ <h3 class="card-header card-title bg-light">Uses</h3>
         <ul class="list-group list-group-flush">
             <li class="list-group-item">
               <ul class="list-inline">
-                  <li class="list-inline-item"><a href='../module/forcad.html'>forcad</a></li>
                   <li class="list-inline-item"><a href='../module/forcad_utils.html'>forcad_utils</a></li>
+                  <li class="list-inline-item"><a href='../module/forcad.html'>forcad</a></li>
               </ul>
             </li>
             <li class="list-group-item">
@@ -405,63 +405,63 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="132,-150 0,-150 0,-126 132,-126 132,-150"/>
 <text text-anchor="middle" x="66" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">example_put_to_nurbs</text>
 </g>
-<!-- none~set -->
+<!-- none~set~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_node2" class="node">
-<title>none~set</title>
-<g id="a_program~~example_put_to_nurbs~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
+<title>none~set~2</title>
+<g id="a_program~~example_put_to_nurbs~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="307.5,-318 194.5,-318 194.5,-294 307.5,-294 307.5,-318"/>
 <text text-anchor="middle" x="251" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;none~set -->
+<!-- program~example_put_to_nurbs&#45;&gt;none~set~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge1" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;none~set</title>
+<title>program~example_put_to_nurbs&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M77.66,-150.22C95.51,-170.41 132.94,-211.63 168,-243 186.11,-259.21 208.01,-275.9 224.61,-288.02"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="222.61,-290.89 232.77,-293.92 226.71,-285.22 222.61,-290.89"/>
 </g>
-<!-- proc~export_xc -->
+<!-- proc~export_xc~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_node3" class="node">
-<title>proc~export_xc</title>
-<g id="a_program~~example_put_to_nurbs~~CallsGraph_node3"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_volume%export_Xc">
+<title>proc~export_xc~2</title>
+<g id="a_program~~example_put_to_nurbs~~CallsGraph_node3"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_volume%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="326,-234 176,-234 176,-210 326,-210 326,-234"/>
 <text text-anchor="middle" x="251" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xc -->
+<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xc~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge2" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~export_xc</title>
+<title>program~example_put_to_nurbs&#45;&gt;proc~export_xc~2</title>
 <path fill="none" stroke="#ff0000" d="M82.94,-150.12C102.16,-164.21 135.89,-187.26 168,-201 172.98,-203.13 178.23,-205.08 183.56,-206.87"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="182.63,-210.24 193.22,-209.89 184.72,-203.56 182.63,-210.24"/>
 </g>
-<!-- proc~export_xg -->
+<!-- proc~export_xg~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_node4" class="node">
-<title>proc~export_xg</title>
-<g id="a_program~~example_put_to_nurbs~~CallsGraph_node4"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_volume%export_Xg">
+<title>proc~export_xg~2</title>
+<g id="a_program~~example_put_to_nurbs~~CallsGraph_node4"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_volume%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="326.5,-192 175.5,-192 175.5,-168 326.5,-168 326.5,-192"/>
 <text text-anchor="middle" x="251" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xg -->
+<!-- program~example_put_to_nurbs&#45;&gt;proc~export_xg~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge3" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~export_xg</title>
+<title>program~example_put_to_nurbs&#45;&gt;proc~export_xg~2</title>
 <path fill="none" stroke="#ff0000" d="M119.44,-150.04C140.69,-154.91 165.4,-160.58 187.57,-165.67"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="187.02,-169.14 197.55,-167.96 188.59,-162.31 187.02,-169.14"/>
 </g>
-<!-- proc~finalize -->
+<!-- proc~finalize~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_node5" class="node">
-<title>proc~finalize</title>
-<g id="a_program~~example_put_to_nurbs~~CallsGraph_node5"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_volume%finalize">
+<title>proc~finalize~2</title>
+<g id="a_program~~example_put_to_nurbs~~CallsGraph_node5"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_volume%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="319,-150 183,-150 183,-126 319,-126 319,-150"/>
 <text text-anchor="middle" x="251" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~finalize -->
+<!-- program~example_put_to_nurbs&#45;&gt;proc~finalize~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge4" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~finalize</title>
+<title>program~example_put_to_nurbs&#45;&gt;proc~finalize~2</title>
 <path fill="none" stroke="#ff0000" d="M132.03,-138C145.13,-138 159.02,-138 172.5,-138"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="172.7,-141.5 182.7,-138 172.7,-134.5 172.7,-141.5"/>
 </g>
@@ -495,108 +495,108 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M82.94,-125.88C102.16,-111.79 135.89,-88.74 168,-75 172.98,-72.87 178.23,-70.92 183.56,-69.13"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="184.72,-72.44 193.22,-66.11 182.63,-65.76 184.72,-72.44"/>
 </g>
-<!-- proc~show -->
+<!-- proc~show~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_node8" class="node">
-<title>proc~show</title>
-<g id="a_program~~example_put_to_nurbs~~CallsGraph_node8"><a xlink:href="../proc/show.html" xlink:title="nurbs_volume%show">
+<title>proc~show~2</title>
+<g id="a_program~~example_put_to_nurbs~~CallsGraph_node8"><a xlink:href="../proc/show~2.html" xlink:title="nurbs_volume%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="313,-24 189,-24 189,0 313,0 313,-24"/>
 <text text-anchor="middle" x="251" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%show</text>
 </a>
 </g>
 </g>
-<!-- program~example_put_to_nurbs&#45;&gt;proc~show -->
+<!-- program~example_put_to_nurbs&#45;&gt;proc~show~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge7" class="edge">
-<title>program~example_put_to_nurbs&#45;&gt;proc~show</title>
+<title>program~example_put_to_nurbs&#45;&gt;proc~show~2</title>
 <path fill="none" stroke="#ff0000" d="M75.16,-125.84C90.58,-103.8 126.26,-57.33 168,-33 171.64,-30.88 175.5,-28.97 179.47,-27.25"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="180.87,-30.46 188.92,-23.57 178.33,-23.93 180.87,-30.46"/>
 </g>
-<!-- proc~set1 -->
+<!-- proc~set1~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_node13" class="node">
-<title>proc~set1</title>
-<g id="a_program~~example_put_to_nurbs~~CallsGraph_node13"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
+<title>proc~set1~2</title>
+<g id="a_program~~example_put_to_nurbs~~CallsGraph_node13"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="526,-360 406,-360 406,-336 526,-336 526,-360"/>
 <text text-anchor="middle" x="466" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set1 -->
+<!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge8" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
+<title>none~set~2&#45;&gt;proc~set1~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M307.69,-316.98C334.7,-322.31 367.41,-328.76 395.99,-334.39"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="395.43,-337.85 405.91,-336.35 396.78,-330.98 395.43,-337.85"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set2~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_node14" class="node">
-<title>proc~set2</title>
-<g id="a_program~~example_put_to_nurbs~~CallsGraph_node14"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
+<title>proc~set2~2</title>
+<g id="a_program~~example_put_to_nurbs~~CallsGraph_node14"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="526,-318 406,-318 406,-294 526,-294 526,-318"/>
 <text text-anchor="middle" x="466" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set2 -->
+<!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge9" class="edge">
-<title>none~set&#45;&gt;proc~set2</title>
+<title>none~set~2&#45;&gt;proc~set2~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M307.69,-306C334.58,-306 367.12,-306 395.62,-306"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="395.91,-309.5 405.91,-306 395.91,-302.5 395.91,-309.5"/>
 </g>
-<!-- proc~set3 -->
+<!-- proc~set3~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_node15" class="node">
-<title>proc~set3</title>
-<g id="a_program~~example_put_to_nurbs~~CallsGraph_node15"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
+<title>proc~set3~2</title>
+<g id="a_program~~example_put_to_nurbs~~CallsGraph_node15"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="526,-402 406,-402 406,-378 526,-378 526,-402"/>
 <text text-anchor="middle" x="466" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set3 -->
+<!-- none~set~2&#45;&gt;proc~set3~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge10" class="edge">
-<title>none~set&#45;&gt;proc~set3</title>
+<title>none~set~2&#45;&gt;proc~set3~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M270.87,-318.17C293.55,-332.3 333.19,-355.4 370,-369 378.29,-372.06 387.16,-374.75 396.02,-377.09"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="395.45,-380.55 406,-379.58 397.14,-373.76 395.45,-380.55"/>
 </g>
-<!-- proc~set4 -->
+<!-- proc~set4~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_node16" class="node">
-<title>proc~set4</title>
-<g id="a_program~~example_put_to_nurbs~~CallsGraph_node16"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
+<title>proc~set4~2</title>
+<g id="a_program~~example_put_to_nurbs~~CallsGraph_node16"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="526,-276 406,-276 406,-252 526,-252 526,-276"/>
 <text text-anchor="middle" x="466" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set4 -->
+<!-- none~set~2&#45;&gt;proc~set4~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge11" class="edge">
-<title>none~set&#45;&gt;proc~set4</title>
+<title>none~set~2&#45;&gt;proc~set4~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M307.69,-295.02C334.7,-289.69 367.41,-283.24 395.99,-277.61"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="396.78,-281.02 405.91,-275.65 395.43,-274.15 396.78,-281.02"/>
 </g>
-<!-- proc~cmp_elem_xc_vis -->
+<!-- proc~cmp_elem_xc_vis~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_node10" class="node">
-<title>proc~cmp_elem_xc_vis</title>
-<g id="a_program~~example_put_to_nurbs~~CallsGraph_node10"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis~2</title>
+<g id="a_program~~example_put_to_nurbs~~CallsGraph_node10"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="561.5,-234 370.5,-234 370.5,-210 561.5,-210 561.5,-234"/>
 <text text-anchor="middle" x="466" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
+<!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge12" class="edge">
-<title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
+<title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
 <path fill="none" stroke="#ffda00" d="M326.2,-222C337.25,-222 348.81,-222 360.35,-222"/>
 <polygon fill="#ffda00" stroke="#ffda00" points="360.46,-225.5 370.46,-222 360.46,-218.5 360.46,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis -->
+<!-- proc~cmp_elem_xg_vis~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_node11" class="node">
-<title>proc~cmp_elem_xg_vis</title>
-<g id="a_program~~example_put_to_nurbs~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis~2</title>
+<g id="a_program~~example_put_to_nurbs~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="562,-192 370,-192 370,-168 562,-168 562,-192"/>
 <text text-anchor="middle" x="466" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
+<!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge13" class="edge">
-<title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
+<title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
 <path fill="none" stroke="#48ff00" d="M326.8,-180C337.44,-180 348.55,-180 359.65,-180"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="359.82,-183.5 369.82,-180 359.82,-176.5 359.82,-183.5"/>
 </g>
@@ -630,18 +630,18 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#4800ff" d="M334.05,-54C366.8,-54 402.82,-54 428.78,-54"/>
 <polygon fill="#4800ff" stroke="#4800ff" points="428.9,-57.5 438.9,-54 428.9,-50.5 428.9,-57.5"/>
 </g>
-<!-- proc~set_elem_xg_vis -->
+<!-- proc~set_elem_xg_vis~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_node17" class="node">
-<title>proc~set_elem_xg_vis</title>
-<g id="a_program~~example_put_to_nurbs~~CallsGraph_node17"><a xlink:href="../proc/set_elem_xg_vis.html" xlink:title="nurbs_volume%set_elem_Xg_vis">
+<title>proc~set_elem_xg_vis~2</title>
+<g id="a_program~~example_put_to_nurbs~~CallsGraph_node17"><a xlink:href="../proc/set_elem_xg_vis~2.html" xlink:title="nurbs_volume%set_elem_Xg_vis">
 <polygon fill="#d9534f" stroke="#d9534f" points="558,-24 374,-24 374,0 558,0 558,-24"/>
 <text text-anchor="middle" x="466" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~put_to_nurbs&#45;&gt;proc~set_elem_xg_vis -->
+<!-- proc~put_to_nurbs&#45;&gt;proc~set_elem_xg_vis~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge16" class="edge">
-<title>proc~put_to_nurbs&#45;&gt;proc~set_elem_xg_vis</title>
+<title>proc~put_to_nurbs&#45;&gt;proc~set_elem_xg_vis~2</title>
 <path fill="none" stroke="#4800ff" d="M313.04,-41.96C338.33,-36.98 367.83,-31.16 394.07,-25.99"/>
 <polygon fill="#4800ff" stroke="#4800ff" points="394.82,-29.41 403.95,-24.04 393.47,-22.54 394.82,-29.41"/>
 </g>
@@ -654,51 +654,51 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge17" class="edge">
-<title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#ffaa00" d="M561.62,-212.61C583.62,-210.42 606.27,-208.17 625.71,-206.24"/>
 <polygon fill="#ffaa00" stroke="#ffaa00" points="626.25,-209.71 635.85,-205.23 625.55,-202.74 626.25,-209.71"/>
 </g>
-<!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge18" class="edge">
-<title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#aaff00" d="M562.23,-189.46C584.07,-191.62 606.52,-193.85 625.79,-195.77"/>
 <polygon fill="#aaff00" stroke="#aaff00" points="625.56,-199.26 635.85,-196.77 626.25,-192.29 625.56,-199.26"/>
 </g>
-<!-- proc~cmp_degree -->
+<!-- proc~cmp_degree~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_node19" class="node">
-<title>proc~cmp_degree</title>
-<g id="a_program~~example_put_to_nurbs~~CallsGraph_node19"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
+<title>proc~cmp_degree~2</title>
+<g id="a_program~~example_put_to_nurbs~~CallsGraph_node19"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="761,-402 598,-402 598,-378 761,-378 761,-402"/>
 <text text-anchor="middle" x="679.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_degree -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge19" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#00ffa9" d="M526.2,-359.76C551.55,-364.79 581.37,-370.71 607.87,-375.97"/>
 <polygon fill="#00ffa9" stroke="#00ffa9" points="607.36,-379.44 617.85,-377.96 608.72,-372.57 607.36,-379.44"/>
 </g>
-<!-- proc~cmp_nc -->
+<!-- proc~cmp_nc~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_node20" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_program~~example_put_to_nurbs~~CallsGraph_node20"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
+<title>proc~cmp_nc~2</title>
+<g id="a_program~~example_put_to_nurbs~~CallsGraph_node20"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="749,-360 610,-360 610,-336 749,-336 749,-360"/>
 <text text-anchor="middle" x="679.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge20" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#00ffa9" d="M526.2,-348C548.97,-348 575.35,-348 599.68,-348"/>
 <polygon fill="#00ffa9" stroke="#00ffa9" points="599.97,-351.5 609.97,-348 599.97,-344.5 599.97,-351.5"/>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge21" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
+<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#00a9ff" d="M526.2,-317.76C551.55,-322.79 581.37,-328.71 607.87,-333.97"/>
 <polygon fill="#00a9ff" stroke="#00a9ff" points="607.36,-337.44 617.85,-335.96 608.72,-330.57 607.36,-337.44"/>
 </g>
@@ -711,15 +711,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge22" class="edge">
-<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#00a9ff" d="M526.2,-306C550.9,-306 579.84,-306 605.82,-306"/>
 <polygon fill="#00a9ff" stroke="#00a9ff" points="605.99,-309.5 615.99,-306 605.99,-302.5 605.99,-309.5"/>
 </g>
-<!-- proc~set3&#45;&gt;proc~cmp_degree -->
+<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge23" class="edge">
-<title>proc~set3&#45;&gt;proc~cmp_degree</title>
+<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#0000ff" d="M526.2,-390C545.31,-390 566.96,-390 587.81,-390"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="587.97,-393.5 597.97,-390 587.97,-386.5 587.97,-393.5"/>
 </g>
@@ -768,18 +768,18 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M723.37,-192.2C750.32,-186.66 785.69,-179.4 816.47,-173.07"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="817.19,-176.5 826.29,-171.06 815.79,-169.64 817.19,-176.5"/>
 </g>
-<!-- proc~get_multiplicity -->
+<!-- proc~get_multiplicity~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_node26" class="node">
-<title>proc~get_multiplicity</title>
-<g id="a_program~~example_put_to_nurbs~~CallsGraph_node26"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
+<title>proc~get_multiplicity~2</title>
+<g id="a_program~~example_put_to_nurbs~~CallsGraph_node26"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="975,-402 797,-402 797,-378 975,-378 975,-402"/>
 <text text-anchor="middle" x="886" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
+<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge27" class="edge">
-<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
+<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
 <path fill="none" stroke="#7fff00" d="M761.03,-390C769.47,-390 778.11,-390 786.71,-390"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="786.78,-393.5 796.78,-390 786.78,-386.5 786.78,-393.5"/>
 </g>
@@ -792,9 +792,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge28" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ffff" d="M749.14,-351.68C819.69,-355.47 929.03,-361.33 1000.57,-365.17"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="1000.67,-368.68 1010.85,-365.72 1001.05,-361.69 1000.67,-368.68"/>
 </g>
@@ -843,9 +843,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1135.33,-361C1143.69,-359.91 1152.35,-358.78 1160.92,-357.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1161.44,-361.12 1170.9,-356.36 1160.53,-354.18 1161.44,-361.12"/>
 </g>
-<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~example_put_to_nurbs~~CallsGraph_edge32" class="edge">
-<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0000ff" d="M975.17,-379.99C983.77,-379.02 992.42,-378.03 1000.82,-377.08"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="1001.39,-380.54 1010.93,-375.93 1000.6,-373.58 1001.39,-380.54"/>
 </g>
@@ -952,7 +952,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-x~3"></span>
+              <span class="anchor" id="variable-x"></span>
               real(kind=rk),
             </td>
             <td>
@@ -984,7 +984,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elem~7"></span>
+              <span class="anchor" id="variable-elem"></span>
               integer,
             </td>
             <td>
@@ -1000,7 +1000,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-i~29"></span>
+              <span class="anchor" id="variable-i"></span>
               integer
             </td>
             <td>
@@ -1016,7 +1016,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nunit~3"></span>
+              <span class="anchor" id="variable-nunit"></span>
               integer
             </td>
             <td>
@@ -1063,7 +1063,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/nearest_point_1d.html b/program/nearest_point_1d.html
index 836f8876b..018f63e4f 100644
--- a/program/nearest_point_1d.html
+++ b/program/nearest_point_1d.html
@@ -115,13 +115,13 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/nearest_point_1d.html#variable-wc~21">Wc</a>
-            <a class="list-group-item" href="../program/nearest_point_1d.html#variable-xc~21">Xc</a>
-            <a class="list-group-item" href="../program/nearest_point_1d.html#variable-id~3">id</a>
-            <a class="list-group-item" href="../program/nearest_point_1d.html#variable-knot~3">knot</a>
-            <a class="list-group-item" href="../program/nearest_point_1d.html#variable-nearest_xg~4">nearest_Xg</a>
-            <a class="list-group-item" href="../program/nearest_point_1d.html#variable-nearest_xt~4">nearest_Xt</a>
-            <a class="list-group-item" href="../program/nearest_point_1d.html#variable-shape~4">shape</a>
+            <a class="list-group-item" href="../program/nearest_point_1d.html#variable-wc~3">Wc</a>
+            <a class="list-group-item" href="../program/nearest_point_1d.html#variable-xc~3">Xc</a>
+            <a class="list-group-item" href="../program/nearest_point_1d.html#variable-id">id</a>
+            <a class="list-group-item" href="../program/nearest_point_1d.html#variable-knot">knot</a>
+            <a class="list-group-item" href="../program/nearest_point_1d.html#variable-nearest_xg">nearest_Xg</a>
+            <a class="list-group-item" href="../program/nearest_point_1d.html#variable-nearest_xt">nearest_Xt</a>
+            <a class="list-group-item" href="../program/nearest_point_1d.html#variable-shape~2">shape</a>
         </div>
       </div>
     </div>
@@ -396,311 +396,311 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="103,-108 0,-108 0,-84 103,-84 103,-108"/>
 <text text-anchor="middle" x="51.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">nearest_point_1d</text>
 </g>
-<!-- none~set~3 -->
+<!-- none~set -->
 <g id="program~~nearest_point_1d~~CallsGraph_node2" class="node">
-<title>none~set~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
+<title>none~set</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node2"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="273.5,-297 170.5,-297 170.5,-273 273.5,-273 273.5,-297"/>
 <text text-anchor="middle" x="222" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;none~set~3 -->
+<!-- program~nearest_point_1d&#45;&gt;none~set -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge1" class="edge">
-<title>program~nearest_point_1d&#45;&gt;none~set~3</title>
+<title>program~nearest_point_1d&#45;&gt;none~set</title>
 <path fill="none" stroke="#ff0000" d="M63.3,-108.11C91.64,-139.9 168.39,-225.99 203.3,-265.14"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="200.81,-267.61 210.08,-272.75 206.03,-262.95 200.81,-267.61"/>
 </g>
-<!-- proc~create~3 -->
+<!-- proc~create -->
 <g id="program~~nearest_point_1d~~CallsGraph_node3" class="node">
-<title>proc~create~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node3"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_curve%create">
+<title>proc~create</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node3"><a xlink:href="../proc/create.html" xlink:title="nurbs_curve%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="481.5,-192 360.5,-192 360.5,-168 481.5,-168 481.5,-192"/>
 <text text-anchor="middle" x="421" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%create</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~create~3 -->
+<!-- program~nearest_point_1d&#45;&gt;proc~create -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge2" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~create~3</title>
+<title>program~nearest_point_1d&#45;&gt;proc~create</title>
 <path fill="none" stroke="#ff0000" d="M101.41,-108.03C113.67,-111.01 126.81,-114.15 139,-117 212.95,-134.26 298.06,-153.22 355.06,-165.78"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="354.49,-169.24 365.01,-167.97 356,-162.4 354.49,-169.24"/>
 </g>
-<!-- proc~finalize~3 -->
+<!-- proc~finalize -->
 <g id="program~~nearest_point_1d~~CallsGraph_node4" class="node">
-<title>proc~finalize~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node4"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_curve%finalize">
+<title>proc~finalize</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node4"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_curve%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="484,-66 358,-66 358,-42 484,-42 484,-66"/>
 <text text-anchor="middle" x="421" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~finalize~3 -->
+<!-- program~nearest_point_1d&#45;&gt;proc~finalize -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge3" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~finalize~3</title>
+<title>program~nearest_point_1d&#45;&gt;proc~finalize</title>
 <path fill="none" stroke="#ff0000" d="M96.22,-83.91C109.83,-80.55 124.96,-77.21 139,-75 209.55,-63.88 291.01,-58.61 348,-56.14"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="348.15,-59.64 358,-55.72 347.86,-52.64 348.15,-59.64"/>
 </g>
-<!-- proc~nearest_point2~3 -->
+<!-- proc~nearest_point -->
 <g id="program~~nearest_point_1d~~CallsGraph_node5" class="node">
-<title>proc~nearest_point2~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node5"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_curve%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="305,-108 139,-108 139,-84 305,-84 305,-108"/>
-<text text-anchor="middle" x="222" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
+<title>proc~nearest_point</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node5"><a xlink:href="../proc/nearest_point.html" xlink:title="nurbs_curve%nearest_point">
+<polygon fill="#d9534f" stroke="#d9534f" points="501,-24 341,-24 341,0 501,0 501,-24"/>
+<text text-anchor="middle" x="421" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2~3 -->
+<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge4" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2~3</title>
-<path fill="none" stroke="#ff0000" d="M103.06,-96C111.3,-96 120.05,-96 128.92,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="128.97,-99.5 138.97,-96 128.97,-92.5 128.97,-99.5"/>
+<title>program~nearest_point_1d&#45;&gt;proc~nearest_point</title>
+<path fill="none" stroke="#ff0000" d="M73.49,-83.92C90.59,-74.61 115.64,-62.15 139,-55 201.53,-35.85 274.61,-25 330.56,-18.99"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="331.22,-22.44 340.81,-17.93 330.5,-15.48 331.22,-22.44"/>
 </g>
-<!-- proc~nearest_point~3 -->
+<!-- proc~nearest_point2 -->
 <g id="program~~nearest_point_1d~~CallsGraph_node6" class="node">
-<title>proc~nearest_point~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node6"><a xlink:href="../proc/nearest_point~3.html" xlink:title="nurbs_curve%nearest_point">
-<polygon fill="#d9534f" stroke="#d9534f" points="501,-24 341,-24 341,0 501,0 501,-24"/>
-<text text-anchor="middle" x="421" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point</text>
+<title>proc~nearest_point2</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node6"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_curve%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="305,-108 139,-108 139,-84 305,-84 305,-108"/>
+<text text-anchor="middle" x="222" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%nearest_point2</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point~3 -->
+<!-- program~nearest_point_1d&#45;&gt;proc~nearest_point2 -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge5" class="edge">
-<title>program~nearest_point_1d&#45;&gt;proc~nearest_point~3</title>
-<path fill="none" stroke="#ff0000" d="M73.49,-83.92C90.59,-74.61 115.64,-62.15 139,-55 201.53,-35.85 274.61,-25 330.56,-18.99"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="331.22,-22.44 340.81,-17.93 330.5,-15.48 331.22,-22.44"/>
+<title>program~nearest_point_1d&#45;&gt;proc~nearest_point2</title>
+<path fill="none" stroke="#ff0000" d="M103.06,-96C111.3,-96 120.05,-96 128.92,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="128.97,-99.5 138.97,-96 128.97,-92.5 128.97,-99.5"/>
 </g>
-<!-- proc~set1a -->
+<!-- proc~set1 -->
 <g id="program~~nearest_point_1d~~CallsGraph_node12" class="node">
-<title>proc~set1a</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node12"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="479.5,-402 362.5,-402 362.5,-378 479.5,-378 479.5,-402"/>
-<text text-anchor="middle" x="421" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+<title>proc~set1</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node12"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="476,-402 366,-402 366,-378 476,-378 476,-402"/>
+<text text-anchor="middle" x="421" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
+<!-- none~set&#45;&gt;proc~set1 -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge6" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M236.5,-297.12C257.41,-315.29 299.58,-349.54 341,-369 345.35,-371.04 349.93,-372.91 354.6,-374.62"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="353.68,-378 364.28,-377.9 355.93,-371.37 353.68,-378"/>
+<title>none~set&#45;&gt;proc~set1</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M236.5,-297.12C257.41,-315.29 299.58,-349.54 341,-369 345.9,-371.3 351.09,-373.38 356.38,-375.26"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="355.36,-378.61 365.96,-378.42 357.56,-371.96 355.36,-378.61"/>
 </g>
-<!-- proc~set1~3 -->
+<!-- proc~set1a -->
 <g id="program~~nearest_point_1d~~CallsGraph_node13" class="node">
-<title>proc~set1~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node13"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="476,-360 366,-360 366,-336 476,-336 476,-360"/>
-<text text-anchor="middle" x="421" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<title>proc~set1a</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node13"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="479.5,-360 362.5,-360 362.5,-336 479.5,-336 479.5,-360"/>
+<text text-anchor="middle" x="421" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1~3 -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge7" class="edge">
-<title>none~set~3&#45;&gt;proc~set1~3</title>
+<title>none~set&#45;&gt;proc~set1a</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M254.81,-297.12C278.43,-305.93 311.51,-317.85 341,-327 347.9,-329.14 355.17,-331.26 362.4,-333.28"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="361.63,-336.7 372.2,-335.97 363.48,-329.95 361.63,-336.7"/>
 </g>
-<!-- proc~set2~3 -->
+<!-- proc~set2 -->
 <g id="program~~nearest_point_1d~~CallsGraph_node14" class="node">
-<title>proc~set2~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node14"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
+<title>proc~set2</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node14"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="476,-276 366,-276 366,-252 476,-252 476,-276"/>
 <text text-anchor="middle" x="421" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set2~3 -->
+<!-- none~set&#45;&gt;proc~set2 -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge8" class="edge">
-<title>none~set~3&#45;&gt;proc~set2~3</title>
+<title>none~set&#45;&gt;proc~set2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M273.73,-279.59C298.8,-276.92 329.32,-273.67 355.98,-270.82"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="356.42,-274.3 365.99,-269.76 355.68,-267.34 356.42,-274.3"/>
 </g>
-<!-- proc~set3~3 -->
+<!-- proc~set3 -->
 <g id="program~~nearest_point_1d~~CallsGraph_node15" class="node">
-<title>proc~set3~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node15"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
+<title>proc~set3</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node15"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="476,-318 366,-318 366,-294 476,-294 476,-318"/>
 <text text-anchor="middle" x="421" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set3~3 -->
+<!-- none~set&#45;&gt;proc~set3 -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge9" class="edge">
-<title>none~set~3&#45;&gt;proc~set3~3</title>
+<title>none~set&#45;&gt;proc~set3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M273.73,-290.41C298.8,-293.08 329.32,-296.33 355.98,-299.18"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="355.68,-302.66 365.99,-300.24 356.42,-295.7 355.68,-302.66"/>
 </g>
-<!-- proc~set4~3 -->
+<!-- proc~set4 -->
 <g id="program~~nearest_point_1d~~CallsGraph_node16" class="node">
-<title>proc~set4~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node16"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
+<title>proc~set4</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node16"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="476,-234 366,-234 366,-210 476,-210 476,-234"/>
 <text text-anchor="middle" x="421" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set4~3 -->
+<!-- none~set&#45;&gt;proc~set4 -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge10" class="edge">
-<title>none~set~3&#45;&gt;proc~set4~3</title>
+<title>none~set&#45;&gt;proc~set4</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M254.81,-272.88C278.43,-264.07 311.51,-252.15 341,-243 347.9,-240.86 355.17,-238.74 362.4,-236.72"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="363.48,-240.05 372.2,-234.03 361.63,-233.3 363.48,-240.05"/>
 </g>
-<!-- interface~compute_xg~3 -->
+<!-- interface~compute_xg -->
 <g id="program~~nearest_point_1d~~CallsGraph_node7" class="node">
-<title>interface~compute_xg~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node7"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
+<title>interface~compute_xg</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node7"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="670,-189 591,-189 591,-165 670,-165 670,-189"/>
 <text text-anchor="middle" x="630.5" y="-174.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
+<!-- proc~create&#45;&gt;interface~compute_xg -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge11" class="edge">
-<title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
+<title>proc~create&#45;&gt;interface~compute_xg</title>
 <path fill="none" stroke="#cbff00" d="M481.74,-179.14C513.12,-178.68 551.09,-178.13 580.69,-177.71"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="580.83,-181.2 590.78,-177.56 580.73,-174.2 580.83,-181.2"/>
 </g>
-<!-- proc~is_rational~3 -->
+<!-- proc~is_rational -->
 <g id="program~~nearest_point_1d~~CallsGraph_node11" class="node">
-<title>proc~is_rational~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node11"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
+<title>proc~is_rational</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node11"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="915.5,-139 773.5,-139 773.5,-115 915.5,-115 915.5,-139"/>
 <text text-anchor="middle" x="844.5" y="-124.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
+<!-- proc~create&#45;&gt;proc~is_rational -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge12" class="edge">
-<title>proc~create~3&#45;&gt;proc~is_rational~3</title>
+<title>proc~create&#45;&gt;proc~is_rational</title>
 <path fill="none" stroke="#cbff00" d="M469.02,-192.04C529.27,-205.39 636.38,-222.07 724,-198 761.14,-187.8 798.42,-162.72 821.23,-145.28"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="823.51,-147.93 829.23,-139.02 819.2,-142.42 823.51,-147.93"/>
 </g>
-<!-- proc~nearest_point2~3&#45;&gt;proc~create~3 -->
-<g id="program~~nearest_point_1d~~CallsGraph_edge15" class="edge">
-<title>proc~nearest_point2~3&#45;&gt;proc~create~3</title>
-<path fill="none" stroke="#0066ff" d="M242.38,-108.15C265.22,-122.04 304.7,-144.71 341,-159 346.41,-161.13 352.12,-163.12 357.89,-164.95"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="357.02,-168.35 367.6,-167.9 359.05,-161.65 357.02,-168.35"/>
+<!-- interface~nearest_point_help_1d -->
+<g id="program~~nearest_point_1d~~CallsGraph_node8" class="node">
+<title>interface~nearest_point_help_1d</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node8"><a xlink:href="../interface/nearest_point_help_1d.html" xlink:title="nearest_point_help_1d">
+<polygon fill="#a7506f" stroke="#a7506f" points="696.5,-24 564.5,-24 564.5,0 696.5,0 696.5,-24"/>
+<text text-anchor="middle" x="630.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_1d</text>
+</a>
+</g>
+</g>
+<!-- proc~nearest_point&#45;&gt;interface~nearest_point_help_1d -->
+<g id="program~~nearest_point_1d~~CallsGraph_edge13" class="edge">
+<title>proc~nearest_point&#45;&gt;interface~nearest_point_help_1d</title>
+<path fill="none" stroke="#0066ff" d="M501.04,-12C518.46,-12 536.88,-12 554.15,-12"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="554.17,-15.5 564.17,-12 554.17,-8.5 554.17,-15.5"/>
 </g>
-<!-- proc~nearest_point2~3&#45;&gt;proc~finalize~3 -->
+<!-- proc~nearest_point2&#45;&gt;proc~create -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge16" class="edge">
-<title>proc~nearest_point2~3&#45;&gt;proc~finalize~3</title>
-<path fill="none" stroke="#0066ff" d="M279.45,-83.96C302.64,-79.02 329.65,-73.26 353.76,-68.12"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="354.49,-71.55 363.54,-66.04 353.03,-64.7 354.49,-71.55"/>
+<title>proc~nearest_point2&#45;&gt;proc~create</title>
+<path fill="none" stroke="#cc00ff" d="M242.38,-108.15C265.22,-122.04 304.7,-144.71 341,-159 346.41,-161.13 352.12,-163.12 357.89,-164.95"/>
+<polygon fill="#cc00ff" stroke="#cc00ff" points="357.02,-168.35 367.6,-167.9 359.05,-161.65 357.02,-168.35"/>
 </g>
-<!-- proc~nearest_point2~3&#45;&gt;proc~nearest_point~3 -->
+<!-- proc~nearest_point2&#45;&gt;proc~finalize -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge17" class="edge">
-<title>proc~nearest_point2~3&#45;&gt;proc~nearest_point~3</title>
-<path fill="none" stroke="#0066ff" d="M242.38,-83.85C265.22,-69.96 304.7,-47.29 341,-33 346.41,-30.87 352.12,-28.88 357.89,-27.05"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="359.05,-30.35 367.6,-24.1 357.02,-23.65 359.05,-30.35"/>
+<title>proc~nearest_point2&#45;&gt;proc~finalize</title>
+<path fill="none" stroke="#cc00ff" d="M279.45,-83.96C302.64,-79.02 329.65,-73.26 353.76,-68.12"/>
+<polygon fill="#cc00ff" stroke="#cc00ff" points="354.49,-71.55 363.54,-66.04 353.03,-64.7 354.49,-71.55"/>
+</g>
+<!-- proc~nearest_point2&#45;&gt;proc~nearest_point -->
+<g id="program~~nearest_point_1d~~CallsGraph_edge18" class="edge">
+<title>proc~nearest_point2&#45;&gt;proc~nearest_point</title>
+<path fill="none" stroke="#cc00ff" d="M242.38,-83.85C265.22,-69.96 304.7,-47.29 341,-33 346.41,-30.87 352.12,-28.88 357.89,-27.05"/>
+<polygon fill="#cc00ff" stroke="#cc00ff" points="359.05,-30.35 367.6,-24.1 357.02,-23.65 359.05,-30.35"/>
 </g>
-<!-- none~derivative2~3 -->
+<!-- none~derivative2 -->
 <g id="program~~nearest_point_1d~~CallsGraph_node9" class="node">
-<title>none~derivative2~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node9"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative2~3" xlink:title="nurbs_curve%derivative2">
+<title>none~derivative2</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node9"><a xlink:href="../type/nurbs_curve.html#boundprocedure-derivative2" xlink:title="nurbs_curve%derivative2">
 <polygon fill="#a7506f" stroke="#a7506f" points="495,-108 347,-108 347,-84 495,-84 495,-108"/>
 <text text-anchor="middle" x="421" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2~3&#45;&gt;none~derivative2~3 -->
-<g id="program~~nearest_point_1d~~CallsGraph_edge13" class="edge">
-<title>proc~nearest_point2~3&#45;&gt;none~derivative2~3</title>
-<path fill="none" stroke="#0066ff" d="M305.12,-96C315.49,-96 326.11,-96 336.51,-96"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="336.81,-99.5 346.81,-96 336.81,-92.5 336.81,-99.5"/>
+<!-- proc~nearest_point2&#45;&gt;none~derivative2 -->
+<g id="program~~nearest_point_1d~~CallsGraph_edge14" class="edge">
+<title>proc~nearest_point2&#45;&gt;none~derivative2</title>
+<path fill="none" stroke="#cc00ff" d="M305.12,-96C315.49,-96 326.11,-96 336.51,-96"/>
+<polygon fill="#cc00ff" stroke="#cc00ff" points="336.81,-99.5 346.81,-96 336.81,-92.5 336.81,-99.5"/>
 </g>
-<!-- proc~cmp_xg~3 -->
+<!-- proc~cmp_xg -->
 <g id="program~~nearest_point_1d~~CallsGraph_node10" class="node">
-<title>proc~cmp_xg~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node10"><a xlink:href="../proc/cmp_xg~3.html" xlink:title="nurbs_curve%cmp_Xg">
+<title>proc~cmp_xg</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node10"><a xlink:href="../proc/cmp_xg.html" xlink:title="nurbs_curve%cmp_Xg">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="486,-150 356,-150 356,-126 486,-126 486,-150"/>
 <text text-anchor="middle" x="421" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2~3&#45;&gt;proc~cmp_xg~3 -->
-<g id="program~~nearest_point_1d~~CallsGraph_edge14" class="edge">
-<title>proc~nearest_point2~3&#45;&gt;proc~cmp_xg~3</title>
-<path fill="none" stroke="#0066ff" d="M279.45,-108.04C302.64,-112.98 329.65,-118.74 353.76,-123.88"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="353.03,-127.3 363.54,-125.96 354.49,-120.45 353.03,-127.3"/>
-</g>
-<!-- interface~nearest_point_help_1d -->
-<g id="program~~nearest_point_1d~~CallsGraph_node8" class="node">
-<title>interface~nearest_point_help_1d</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node8"><a xlink:href="../interface/nearest_point_help_1d.html" xlink:title="nearest_point_help_1d">
-<polygon fill="#a7506f" stroke="#a7506f" points="696.5,-24 564.5,-24 564.5,0 696.5,0 696.5,-24"/>
-<text text-anchor="middle" x="630.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_1d</text>
-</a>
-</g>
-</g>
-<!-- proc~nearest_point~3&#45;&gt;interface~nearest_point_help_1d -->
-<g id="program~~nearest_point_1d~~CallsGraph_edge18" class="edge">
-<title>proc~nearest_point~3&#45;&gt;interface~nearest_point_help_1d</title>
-<path fill="none" stroke="#cc00ff" d="M501.04,-12C518.46,-12 536.88,-12 554.15,-12"/>
-<polygon fill="#cc00ff" stroke="#cc00ff" points="554.17,-15.5 564.17,-12 554.17,-8.5 554.17,-15.5"/>
+<!-- proc~nearest_point2&#45;&gt;proc~cmp_xg -->
+<g id="program~~nearest_point_1d~~CallsGraph_edge15" class="edge">
+<title>proc~nearest_point2&#45;&gt;proc~cmp_xg</title>
+<path fill="none" stroke="#cc00ff" d="M279.45,-108.04C302.64,-112.98 329.65,-118.74 353.76,-123.88"/>
+<polygon fill="#cc00ff" stroke="#cc00ff" points="353.03,-127.3 363.54,-125.96 354.49,-120.45 353.03,-127.3"/>
 </g>
-<!-- proc~derivative2_scalar~3 -->
+<!-- proc~derivative2_scalar -->
 <g id="program~~nearest_point_1d~~CallsGraph_node19" class="node">
-<title>proc~derivative2_scalar~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node19"><a xlink:href="../proc/derivative2_scalar~3.html" xlink:title="nurbs_curve%derivative2_scalar">
+<title>proc~derivative2_scalar</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node19"><a xlink:href="../proc/derivative2_scalar.html" xlink:title="nurbs_curve%derivative2_scalar">
 <polygon fill="#d9534f" stroke="#d9534f" points="723,-109 538,-109 538,-85 723,-85 723,-109"/>
 <text text-anchor="middle" x="630.5" y="-94.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_scalar</text>
 </a>
 </g>
 </g>
-<!-- none~derivative2~3&#45;&gt;proc~derivative2_scalar~3 -->
+<!-- none~derivative2&#45;&gt;proc~derivative2_scalar -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge19" class="edge">
-<title>none~derivative2~3&#45;&gt;proc~derivative2_scalar~3</title>
+<title>none~derivative2&#45;&gt;proc~derivative2_scalar</title>
 <path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M495.16,-96.35C505.7,-96.4 516.7,-96.46 527.68,-96.51"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="527.72,-100.01 537.73,-96.56 527.75,-93.01 527.72,-100.01"/>
 </g>
-<!-- proc~derivative2_vector~3 -->
+<!-- proc~derivative2_vector -->
 <g id="program~~nearest_point_1d~~CallsGraph_node20" class="node">
-<title>proc~derivative2_vector~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node20"><a xlink:href="../proc/derivative2_vector~3.html" xlink:title="nurbs_curve%derivative2_vector">
+<title>proc~derivative2_vector</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node20"><a xlink:href="../proc/derivative2_vector.html" xlink:title="nurbs_curve%derivative2_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="724,-67 537,-67 537,-43 724,-43 724,-67"/>
 <text text-anchor="middle" x="630.5" y="-52.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%derivative2_vector</text>
 </a>
 </g>
 </g>
-<!-- none~derivative2~3&#45;&gt;proc~derivative2_vector~3 -->
+<!-- none~derivative2&#45;&gt;proc~derivative2_vector -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge20" class="edge">
-<title>none~derivative2~3&#45;&gt;proc~derivative2_vector~3</title>
+<title>none~derivative2&#45;&gt;proc~derivative2_vector</title>
 <path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M482.85,-83.98C506.61,-79.28 534,-73.87 558.64,-69"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="559.51,-72.4 568.65,-67.02 558.16,-65.53 559.51,-72.4"/>
 </g>
-<!-- proc~cmp_xg~3&#45;&gt;interface~compute_xg~3 -->
+<!-- proc~cmp_xg&#45;&gt;interface~compute_xg -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge21" class="edge">
-<title>proc~cmp_xg~3&#45;&gt;interface~compute_xg~3</title>
+<title>proc~cmp_xg&#45;&gt;interface~compute_xg</title>
 <path fill="none" stroke="#33ff00" d="M485.95,-150.02C516.49,-155.76 552.46,-162.52 580.75,-167.84"/>
 <polygon fill="#33ff00" stroke="#33ff00" points="580.33,-171.32 590.81,-169.73 581.62,-164.44 580.33,-171.32"/>
 </g>
-<!-- proc~cmp_xg~3&#45;&gt;proc~is_rational~3 -->
+<!-- proc~cmp_xg&#45;&gt;proc~is_rational -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge22" class="edge">
-<title>proc~cmp_xg~3&#45;&gt;proc~is_rational~3</title>
+<title>proc~cmp_xg&#45;&gt;proc~is_rational</title>
 <path fill="none" stroke="#33ff00" d="M486.02,-136.33C560.22,-134.39 682.61,-131.2 763.15,-129.1"/>
 <polygon fill="#33ff00" stroke="#33ff00" points="763.34,-132.59 773.25,-128.83 763.16,-125.6 763.34,-132.59"/>
 </g>
-<!-- proc~cmp_degree~3 -->
+<!-- proc~cmp_degree -->
 <g id="program~~nearest_point_1d~~CallsGraph_node17" class="node">
-<title>proc~cmp_degree~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node17"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
+<title>proc~cmp_degree</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node17"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="707.5,-360 553.5,-360 553.5,-336 707.5,-336 707.5,-360"/>
 <text text-anchor="middle" x="630.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1&#45;&gt;proc~cmp_degree -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge23" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#00ffff" d="M479.52,-378.36C504.52,-373.3 534.01,-367.33 560.2,-362.03"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="560.95,-365.45 570.06,-360.03 559.56,-358.59 560.95,-365.45"/>
+<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#00ffff" d="M476.25,-379.02C501.91,-373.82 532.86,-367.56 560.2,-362.03"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="560.99,-365.44 570.1,-360.02 559.6,-358.58 560.99,-365.44"/>
 </g>
-<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge24" class="edge">
-<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#0066ff" d="M476.25,-348C496.66,-348 520.4,-348 543.03,-348"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="543.32,-351.5 553.32,-348 543.32,-344.5 543.32,-351.5"/>
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#0066ff" d="M479.52,-348C499.2,-348 521.66,-348 543.1,-348"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="543.2,-351.5 553.2,-348 543.2,-344.5 543.2,-351.5"/>
 </g>
 <!-- proc~compute_knot_vector -->
 <g id="program~~nearest_point_1d~~CallsGraph_node18" class="node">
@@ -711,30 +711,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge25" class="edge">
-<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#3200ff" d="M476.25,-264C500.73,-264 530.03,-264 556.41,-264"/>
 <polygon fill="#3200ff" stroke="#3200ff" points="556.75,-267.5 566.75,-264 556.75,-260.5 556.75,-267.5"/>
 </g>
-<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set3&#45;&gt;proc~cmp_degree -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge26" class="edge">
-<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
+<title>proc~set3&#45;&gt;proc~cmp_degree</title>
 <path fill="none" stroke="#cc00ff" d="M476.25,-316.98C501.91,-322.18 532.86,-328.44 560.2,-333.97"/>
 <polygon fill="#cc00ff" stroke="#cc00ff" points="559.6,-337.42 570.1,-335.98 560.99,-330.56 559.6,-337.42"/>
 </g>
-<!-- proc~get_multiplicity~3 -->
+<!-- proc~get_multiplicity -->
 <g id="program~~nearest_point_1d~~CallsGraph_node22" class="node">
-<title>proc~get_multiplicity~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node22"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
+<title>proc~get_multiplicity</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node22"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="929,-360 760,-360 760,-336 929,-336 929,-360"/>
 <text text-anchor="middle" x="844.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
+<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge27" class="edge">
-<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
+<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
 <path fill="none" stroke="#ff0000" d="M707.74,-348C721.3,-348 735.57,-348 749.56,-348"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="749.68,-351.5 759.68,-348 749.68,-344.5 749.68,-351.5"/>
 </g>
@@ -753,36 +753,36 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#7fff00" d="M694.25,-264C730.4,-264 774.65,-264 805.55,-264"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="805.88,-267.5 815.88,-264 805.88,-260.5 805.88,-267.5"/>
 </g>
-<!-- proc~derivative2_scalar~3&#45;&gt;proc~is_rational~3 -->
+<!-- proc~derivative2_scalar&#45;&gt;proc~is_rational -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge30" class="edge">
-<title>proc~derivative2_scalar~3&#45;&gt;proc~is_rational~3</title>
+<title>proc~derivative2_scalar&#45;&gt;proc~is_rational</title>
 <path fill="none" stroke="#00ffff" d="M716.51,-109.03C732,-111.22 748.13,-113.5 763.47,-115.68"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="763.04,-119.15 773.43,-117.08 764.02,-112.22 763.04,-119.15"/>
 </g>
-<!-- interface~compute_d2tgc~3 -->
+<!-- interface~compute_d2tgc -->
 <g id="program~~nearest_point_1d~~CallsGraph_node21" class="node">
-<title>interface~compute_d2tgc~3</title>
-<g id="a_program~~nearest_point_1d~~CallsGraph_node21"><a xlink:href="../interface/compute_d2tgc~3.html" xlink:title="compute_d2Tgc">
+<title>interface~compute_d2tgc</title>
+<g id="a_program~~nearest_point_1d~~CallsGraph_node21"><a xlink:href="../interface/compute_d2tgc.html" xlink:title="compute_d2Tgc">
 <polygon fill="#a7506f" stroke="#a7506f" points="893.5,-87 795.5,-87 795.5,-63 893.5,-63 893.5,-87"/>
 <text text-anchor="middle" x="844.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative2_scalar~3&#45;&gt;interface~compute_d2tgc~3 -->
+<!-- proc~derivative2_scalar&#45;&gt;interface~compute_d2tgc -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge29" class="edge">
-<title>proc~derivative2_scalar~3&#45;&gt;interface~compute_d2tgc~3</title>
+<title>proc~derivative2_scalar&#45;&gt;interface~compute_d2tgc</title>
 <path fill="none" stroke="#00ffff" d="M723.25,-87.48C744.31,-85.29 766.13,-83.03 785.31,-81.04"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="785.79,-84.51 795.38,-79.99 785.07,-77.54 785.79,-84.51"/>
 </g>
-<!-- proc~derivative2_vector~3&#45;&gt;proc~is_rational~3 -->
+<!-- proc~derivative2_vector&#45;&gt;proc~is_rational -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge32" class="edge">
-<title>proc~derivative2_vector~3&#45;&gt;proc~is_rational~3</title>
+<title>proc~derivative2_vector&#45;&gt;proc~is_rational</title>
 <path fill="none" stroke="#7f00ff" d="M695.4,-67C705.12,-69.54 714.92,-72.53 724,-76 741.1,-82.54 743.37,-88.35 760,-96 771.97,-101.51 785.22,-106.79 797.58,-111.37"/>
 <polygon fill="#7f00ff" stroke="#7f00ff" points="796.66,-114.76 807.26,-114.9 799.06,-108.19 796.66,-114.76"/>
 </g>
-<!-- proc~derivative2_vector~3&#45;&gt;interface~compute_d2tgc~3 -->
+<!-- proc~derivative2_vector&#45;&gt;interface~compute_d2tgc -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge31" class="edge">
-<title>proc~derivative2_vector~3&#45;&gt;interface~compute_d2tgc~3</title>
+<title>proc~derivative2_vector&#45;&gt;interface~compute_d2tgc</title>
 <path fill="none" stroke="#7f00ff" d="M724.18,-63.74C744.86,-65.69 766.23,-67.71 785.07,-69.49"/>
 <polygon fill="#7f00ff" stroke="#7f00ff" points="784.97,-72.99 795.26,-70.45 785.63,-66.02 784.97,-72.99"/>
 </g>
@@ -795,9 +795,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~nearest_point_1d~~CallsGraph_edge33" class="edge">
-<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M929.15,-348C937.73,-348 946.4,-348 954.84,-348"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="954.99,-351.5 964.99,-348 954.99,-344.5 954.99,-351.5"/>
 </g>
@@ -934,7 +934,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~21"></span>
+              <span class="anchor" id="variable-wc~3"></span>
               real(kind=rk),
             </td>
             <td>
@@ -950,7 +950,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~21"></span>
+              <span class="anchor" id="variable-xc~3"></span>
               real(kind=rk),
             </td>
             <td>
@@ -966,7 +966,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-id~3"></span>
+              <span class="anchor" id="variable-id"></span>
               integer
             </td>
             <td>
@@ -982,7 +982,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~3"></span>
+              <span class="anchor" id="variable-knot"></span>
               real(kind=rk)
             </td>
             <td>
@@ -998,7 +998,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xg~4"></span>
+              <span class="anchor" id="variable-nearest_xg"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1014,7 +1014,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xt~4"></span>
+              <span class="anchor" id="variable-nearest_xt"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1030,7 +1030,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~4"></span>
+              <span class="anchor" id="variable-shape~2"></span>
               type(<a href='../type/nurbs_curve.html'>nurbs_curve</a>)
             </td>
             <td>
@@ -1077,7 +1077,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/nearest_point_2d.html b/program/nearest_point_2d.html
index e5d6572df..ea8f03d18 100644
--- a/program/nearest_point_2d.html
+++ b/program/nearest_point_2d.html
@@ -115,12 +115,12 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/nearest_point_2d.html#variable-wc~23">Wc</a>
-            <a class="list-group-item" href="../program/nearest_point_2d.html#variable-xc~23">Xc</a>
-            <a class="list-group-item" href="../program/nearest_point_2d.html#variable-id~4">id</a>
-            <a class="list-group-item" href="../program/nearest_point_2d.html#variable-nearest_xg~5">nearest_Xg</a>
-            <a class="list-group-item" href="../program/nearest_point_2d.html#variable-nearest_xt~5">nearest_Xt</a>
-            <a class="list-group-item" href="../program/nearest_point_2d.html#variable-shape~9">shape</a>
+            <a class="list-group-item" href="../program/nearest_point_2d.html#variable-wc~65">Wc</a>
+            <a class="list-group-item" href="../program/nearest_point_2d.html#variable-xc~64">Xc</a>
+            <a class="list-group-item" href="../program/nearest_point_2d.html#variable-id~7">id</a>
+            <a class="list-group-item" href="../program/nearest_point_2d.html#variable-nearest_xg~10">nearest_Xg</a>
+            <a class="list-group-item" href="../program/nearest_point_2d.html#variable-nearest_xt~10">nearest_Xt</a>
+            <a class="list-group-item" href="../program/nearest_point_2d.html#variable-shape~17">shape</a>
         </div>
       </div>
     </div>
@@ -392,153 +392,153 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="103,-144 0,-144 0,-120 103,-120 103,-144"/>
 <text text-anchor="middle" x="51.5" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50">nearest_point_2d</text>
 </g>
-<!-- none~set~2 -->
+<!-- none~set~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node2" class="node">
-<title>none~set~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<title>none~set~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node2"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="283.5,-348 170.5,-348 170.5,-324 283.5,-324 283.5,-348"/>
 <text text-anchor="middle" x="227" y="-333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;none~set~2 -->
+<!-- program~nearest_point_2d&#45;&gt;none~set~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge1" class="edge">
-<title>program~nearest_point_2d&#45;&gt;none~set~2</title>
+<title>program~nearest_point_2d&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#ff0000" d="M62.83,-144.15C91.7,-178.09 173.42,-274.18 209.05,-316.07"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="206.58,-318.56 215.72,-323.91 211.91,-314.03 206.58,-318.56"/>
 </g>
-<!-- proc~create~2 -->
+<!-- proc~create~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node3" class="node">
-<title>proc~create~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node3"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
+<title>proc~create~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node3"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="501,-252 370,-252 370,-228 501,-228 501,-252"/>
 <text text-anchor="middle" x="435.5" y="-237.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~create~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~create~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge2" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~create~2</title>
+<title>program~nearest_point_2d&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#ff0000" d="M91.96,-144.01C148.97,-161.24 257.75,-193.69 351,-219 358.9,-221.14 367.24,-223.33 375.46,-225.44"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="374.86,-228.9 385.41,-227.98 376.58,-222.12 374.86,-228.9"/>
 </g>
-<!-- proc~finalize~2 -->
+<!-- proc~finalize~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node4" class="node">
-<title>proc~finalize~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node4"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_surface%finalize">
+<title>proc~finalize~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node4"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_surface%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="503.5,-66 367.5,-66 367.5,-42 503.5,-42 503.5,-66"/>
 <text text-anchor="middle" x="435.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~finalize~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~finalize~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge3" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~finalize~2</title>
+<title>program~nearest_point_2d&#45;&gt;proc~finalize~3</title>
 <path fill="none" stroke="#ff0000" d="M100.45,-119.93C112.97,-116.9 126.47,-113.73 139,-111 212.84,-94.93 297.56,-78.82 357.31,-67.85"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="358.21,-71.24 367.42,-66 356.95,-64.36 358.21,-71.24"/>
 </g>
-<!-- proc~nearest_point2~2 -->
+<!-- proc~nearest_point2~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node5" class="node">
-<title>proc~nearest_point2~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node5"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_surface%nearest_point2">
+<title>proc~nearest_point2~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node5"><a xlink:href="../proc/nearest_point2~3.html" xlink:title="nurbs_surface%nearest_point2">
 <polygon fill="#d9534f" stroke="#d9534f" points="315,-144 139,-144 139,-120 315,-120 315,-144"/>
 <text text-anchor="middle" x="227" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point2</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point2~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge4" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~2</title>
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point2~3</title>
 <path fill="none" stroke="#ff0000" d="M103.15,-132C111.2,-132 119.76,-132 128.46,-132"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="128.73,-135.5 138.73,-132 128.73,-128.5 128.73,-135.5"/>
 </g>
-<!-- proc~nearest_point~2 -->
+<!-- proc~nearest_point~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node6" class="node">
-<title>proc~nearest_point~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node6"><a xlink:href="../proc/nearest_point~2.html" xlink:title="nurbs_surface%nearest_point">
+<title>proc~nearest_point~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node6"><a xlink:href="../proc/nearest_point~3.html" xlink:title="nurbs_surface%nearest_point">
 <polygon fill="#d9534f" stroke="#d9534f" points="520,-24 351,-24 351,0 520,0 520,-24"/>
 <text text-anchor="middle" x="435.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point~2 -->
+<!-- program~nearest_point_2d&#45;&gt;proc~nearest_point~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge5" class="edge">
-<title>program~nearest_point_2d&#45;&gt;proc~nearest_point~2</title>
+<title>program~nearest_point_2d&#45;&gt;proc~nearest_point~3</title>
 <path fill="none" stroke="#ff0000" d="M65.79,-119.9C81.91,-105.91 110.46,-83.25 139,-71 203.3,-43.39 281.08,-28.52 340.7,-20.62"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="341.38,-24.06 350.86,-19.32 340.49,-17.12 341.38,-24.06"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node14" class="node">
-<title>proc~set1~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node14"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<title>proc~set1~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node14"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="495.5,-348 375.5,-348 375.5,-324 495.5,-324 495.5,-348"/>
 <text text-anchor="middle" x="435.5" y="-333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge6" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M283.61,-336C308.6,-336 338.37,-336 364.83,-336"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="365.17,-339.5 375.17,-336 365.17,-332.5 365.17,-339.5"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node15" class="node">
-<title>proc~set2~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node15"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<title>proc~set2~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node15"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="495.5,-432 375.5,-432 375.5,-408 495.5,-408 495.5,-432"/>
 <text text-anchor="middle" x="435.5" y="-417.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge7" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M248.24,-348.18C272.09,-362.11 313.27,-384.81 351,-399 356.88,-401.21 363.07,-403.26 369.32,-405.15"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="368.58,-408.57 379.16,-407.97 370.51,-401.84 368.58,-408.57"/>
 </g>
-<!-- proc~set3~2 -->
+<!-- proc~set3~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node16" class="node">
-<title>proc~set3~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node16"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<title>proc~set3~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node16"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="495.5,-306 375.5,-306 375.5,-282 495.5,-282 495.5,-306"/>
 <text text-anchor="middle" x="435.5" y="-291.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge8" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
+<title>none~set~3&#45;&gt;proc~set3~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M283.61,-324.69C308.71,-319.58 338.63,-313.5 365.18,-308.1"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="366.07,-311.49 375.17,-306.07 364.68,-304.63 366.07,-311.49"/>
 </g>
-<!-- proc~set4~2 -->
+<!-- proc~set4~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node17" class="node">
-<title>proc~set4~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node17"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<title>proc~set4~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node17"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="495.5,-390 375.5,-390 375.5,-366 495.5,-366 495.5,-390"/>
 <text text-anchor="middle" x="435.5" y="-375.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set4~2 -->
+<!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge9" class="edge">
-<title>none~set~2&#45;&gt;proc~set4~2</title>
+<title>none~set~3&#45;&gt;proc~set4~3</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M283.61,-347.31C308.71,-352.42 338.63,-358.5 365.18,-363.9"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="364.68,-367.37 375.17,-365.93 366.07,-360.51 364.68,-367.37"/>
 </g>
-<!-- interface~compute_xg~2 -->
+<!-- interface~compute_xg~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node7" class="node">
-<title>interface~compute_xg~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node7"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node7"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="693.5,-230 614.5,-230 614.5,-206 693.5,-206 693.5,-230"/>
 <text text-anchor="middle" x="654" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
+<!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge10" class="edge">
-<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
+<title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
 <path fill="none" stroke="#cbff00" d="M501.16,-233.43C534.3,-230.06 573.98,-226.03 604.46,-222.93"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="604.83,-226.41 614.42,-221.92 604.12,-219.45 604.83,-226.41"/>
 </g>
@@ -551,72 +551,72 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~ndgrid -->
+<!-- proc~create~3&#45;&gt;interface~ndgrid -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge11" class="edge">
-<title>proc~create~2&#45;&gt;interface~ndgrid</title>
+<title>proc~create~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#cbff00" d="M471.83,-252.07C495.36,-259.46 527.15,-268.2 556,-272 642.37,-283.36 665.17,-278.96 752,-272 781.67,-269.62 814.95,-264.09 839.56,-259.45"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="840.38,-262.86 849.54,-257.53 839.06,-255.98 840.38,-262.86"/>
 </g>
-<!-- proc~is_rational~2 -->
+<!-- proc~is_rational~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node13" class="node">
-<title>proc~is_rational~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node13"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<title>proc~is_rational~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node13"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="953,-160 801,-160 801,-136 953,-136 953,-160"/>
 <text text-anchor="middle" x="877" y="-145.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge12" class="edge">
-<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~create~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#cbff00" d="M501.21,-251.25C566.33,-259.95 668.76,-266.41 752,-239 794.88,-224.88 835.21,-189.72 857.65,-167.47"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="860.29,-169.77 864.82,-160.19 855.3,-164.86 860.29,-169.77"/>
 </g>
-<!-- proc~nearest_point2~2&#45;&gt;proc~create~2 -->
+<!-- proc~nearest_point2~3&#45;&gt;proc~create~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge15" class="edge">
-<title>proc~nearest_point2~2&#45;&gt;proc~create~2</title>
+<title>proc~nearest_point2~3&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#0066ff" d="M246.14,-144.2C263.84,-156.18 291.47,-175.07 315,-192 331.24,-203.68 332.95,-210.39 351,-219 355.33,-221.06 359.88,-222.94 364.53,-224.64"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="363.59,-228.02 374.19,-227.9 365.83,-221.39 363.59,-228.02"/>
 </g>
-<!-- proc~nearest_point2~2&#45;&gt;proc~finalize~2 -->
+<!-- proc~nearest_point2~3&#45;&gt;proc~finalize~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge16" class="edge">
-<title>proc~nearest_point2~2&#45;&gt;proc~finalize~2</title>
+<title>proc~nearest_point2~3&#45;&gt;proc~finalize~3</title>
 <path fill="none" stroke="#0066ff" d="M257.24,-119.86C274.24,-112.65 295.99,-103.15 315,-94 331.3,-86.15 334.11,-81.47 351,-75 356.77,-72.79 362.86,-70.74 369,-68.87"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="370.05,-72.21 378.68,-66.06 368.1,-65.49 370.05,-72.21"/>
 </g>
-<!-- proc~nearest_point2~2&#45;&gt;proc~nearest_point~2 -->
+<!-- proc~nearest_point2~3&#45;&gt;proc~nearest_point~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge18" class="edge">
-<title>proc~nearest_point2~2&#45;&gt;proc~nearest_point~2</title>
+<title>proc~nearest_point2~3&#45;&gt;proc~nearest_point~3</title>
 <path fill="none" stroke="#0066ff" d="M239.34,-119.95C259.68,-99.05 304.62,-56.1 351,-33 355.1,-30.96 359.41,-29.1 363.83,-27.42"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="365.34,-30.6 373.63,-24.01 363.04,-23.99 365.34,-30.6"/>
 </g>
-<!-- none~derivative2~2 -->
+<!-- none~derivative2~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node10" class="node">
-<title>none~derivative2~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node10"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~2" xlink:title="nurbs_surface%derivative2">
+<title>none~derivative2~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node10"><a xlink:href="../type/nurbs_surface.html#boundprocedure-derivative2~3" xlink:title="nurbs_surface%derivative2">
 <polygon fill="#a7506f" stroke="#a7506f" points="514,-108 357,-108 357,-84 514,-84 514,-108"/>
 <text text-anchor="middle" x="435.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2~2&#45;&gt;none~derivative2~2 -->
+<!-- proc~nearest_point2~3&#45;&gt;none~derivative2~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge13" class="edge">
-<title>proc~nearest_point2~2&#45;&gt;none~derivative2~2</title>
+<title>proc~nearest_point2~3&#45;&gt;none~derivative2~3</title>
 <path fill="none" stroke="#0066ff" d="M297.05,-119.96C315.82,-116.69 336.29,-113.12 355.56,-109.76"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="356.27,-113.19 365.52,-108.03 355.06,-106.3 356.27,-113.19"/>
 </g>
-<!-- proc~cmp_xg~2 -->
+<!-- proc~cmp_xg~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node11" class="node">
-<title>proc~cmp_xg~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node11"><a xlink:href="../proc/cmp_xg~2.html" xlink:title="nurbs_surface%cmp_Xg">
+<title>proc~cmp_xg~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node11"><a xlink:href="../proc/cmp_xg~3.html" xlink:title="nurbs_surface%cmp_Xg">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="505.5,-210 365.5,-210 365.5,-186 505.5,-186 505.5,-210"/>
 <text text-anchor="middle" x="435.5" y="-195.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2~2&#45;&gt;proc~cmp_xg~2 -->
+<!-- proc~nearest_point2~3&#45;&gt;proc~cmp_xg~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge14" class="edge">
-<title>proc~nearest_point2~2&#45;&gt;proc~cmp_xg~2</title>
+<title>proc~nearest_point2~3&#45;&gt;proc~cmp_xg~3</title>
 <path fill="none" stroke="#0066ff" d="M258.28,-144.08C283,-153.7 318.94,-167.13 351,-177 358.15,-179.2 365.7,-181.34 373.22,-183.37"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="372.48,-186.79 383.04,-185.96 374.26,-180.02 372.48,-186.79"/>
 </g>
@@ -629,9 +629,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2~2&#45;&gt;proc~inv -->
+<!-- proc~nearest_point2~3&#45;&gt;proc~inv -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge17" class="edge">
-<title>proc~nearest_point2~2&#45;&gt;proc~inv</title>
+<title>proc~nearest_point2~3&#45;&gt;proc~inv</title>
 <path fill="none" stroke="#0066ff" d="M315.28,-134.54C344.48,-135.38 375.44,-136.28 398.49,-136.95"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="398.39,-140.45 408.49,-137.24 398.59,-133.46 398.39,-140.45"/>
 </g>
@@ -644,9 +644,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point~2&#45;&gt;interface~nearest_point_help_2d -->
+<!-- proc~nearest_point~3&#45;&gt;interface~nearest_point_help_2d -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge19" class="edge">
-<title>proc~nearest_point~2&#45;&gt;interface~nearest_point_help_2d</title>
+<title>proc~nearest_point~3&#45;&gt;interface~nearest_point_help_2d</title>
 <path fill="none" stroke="#cc00ff" d="M520.2,-12C539.18,-12 559.22,-12 577.81,-12"/>
 <polygon fill="#cc00ff" stroke="#cc00ff" points="577.98,-15.5 587.98,-12 577.98,-8.5 577.98,-15.5"/>
 </g>
@@ -680,45 +680,45 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff8b00" stroke-dasharray="5,2" d="M904.11,-254.96C936.11,-258.6 990.52,-264.77 1026.61,-268.87"/>
 <polygon fill="#ff8b00" stroke="#ff8b00" points="1026.39,-272.37 1036.72,-270.02 1027.18,-265.41 1026.39,-272.37"/>
 </g>
-<!-- proc~derivative2_scalar~2 -->
+<!-- proc~derivative2_scalar~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node21" class="node">
-<title>proc~derivative2_scalar~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node21"><a xlink:href="../proc/derivative2_scalar~2.html" xlink:title="nurbs_surface%derivative2_scalar">
+<title>proc~derivative2_scalar~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node21"><a xlink:href="../proc/derivative2_scalar~3.html" xlink:title="nurbs_surface%derivative2_scalar">
 <polygon fill="#d9534f" stroke="#d9534f" points="751.5,-66 556.5,-66 556.5,-42 751.5,-42 751.5,-66"/>
 <text text-anchor="middle" x="654" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_scalar</text>
 </a>
 </g>
 </g>
-<!-- none~derivative2~2&#45;&gt;proc~derivative2_scalar~2 -->
+<!-- none~derivative2~3&#45;&gt;proc~derivative2_scalar~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge22" class="edge">
-<title>none~derivative2~2&#45;&gt;proc~derivative2_scalar~2</title>
+<title>none~derivative2~3&#45;&gt;proc~derivative2_scalar~3</title>
 <path fill="none" stroke="#5cff00" stroke-dasharray="5,2" d="M498.54,-83.96C524.25,-78.98 554.23,-73.16 580.9,-67.99"/>
 <polygon fill="#5cff00" stroke="#5cff00" points="581.8,-71.38 590.95,-66.04 580.47,-64.51 581.8,-71.38"/>
 </g>
-<!-- proc~derivative2_vector~2 -->
+<!-- proc~derivative2_vector~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node22" class="node">
-<title>proc~derivative2_vector~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node22"><a xlink:href="../proc/derivative2_vector~2.html" xlink:title="nurbs_surface%derivative2_vector">
+<title>proc~derivative2_vector~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node22"><a xlink:href="../proc/derivative2_vector~3.html" xlink:title="nurbs_surface%derivative2_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="752,-108 556,-108 556,-84 752,-84 752,-108"/>
 <text text-anchor="middle" x="654" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%derivative2_vector</text>
 </a>
 </g>
 </g>
-<!-- none~derivative2~2&#45;&gt;proc~derivative2_vector~2 -->
+<!-- none~derivative2~3&#45;&gt;proc~derivative2_vector~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge23" class="edge">
-<title>none~derivative2~2&#45;&gt;proc~derivative2_vector~2</title>
+<title>none~derivative2~3&#45;&gt;proc~derivative2_vector~3</title>
 <path fill="none" stroke="#5cff00" stroke-dasharray="5,2" d="M514.05,-96C524.35,-96 535.05,-96 545.74,-96"/>
 <polygon fill="#5cff00" stroke="#5cff00" points="545.97,-99.5 555.97,-96 545.97,-92.5 545.97,-99.5"/>
 </g>
-<!-- proc~cmp_xg~2&#45;&gt;interface~compute_xg~2 -->
+<!-- proc~cmp_xg~3&#45;&gt;interface~compute_xg~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge24" class="edge">
-<title>proc~cmp_xg~2&#45;&gt;interface~compute_xg~2</title>
+<title>proc~cmp_xg~3&#45;&gt;interface~compute_xg~3</title>
 <path fill="none" stroke="#00ff2e" d="M505.6,-204.38C537.67,-207.35 575.04,-210.8 604.13,-213.49"/>
 <polygon fill="#00ff2e" stroke="#00ff2e" points="604.17,-217 614.45,-214.44 604.81,-210.03 604.17,-217"/>
 </g>
-<!-- proc~cmp_xg~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~cmp_xg~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge25" class="edge">
-<title>proc~cmp_xg~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~cmp_xg~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#00ff2e" d="M505.66,-190.13C582.81,-181.35 707.7,-167.15 790.82,-157.69"/>
 <polygon fill="#00ff2e" stroke="#00ff2e" points="791.46,-161.14 801,-156.53 790.67,-154.19 791.46,-161.14"/>
 </g>
@@ -743,39 +743,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#00ffb9" d="M462.61,-138C501.06,-138 573.03,-138 616.62,-138"/>
 <polygon fill="#00ffb9" stroke="#00ffb9" points="616.79,-141.5 626.79,-138 616.79,-134.5 616.79,-141.5"/>
 </g>
-<!-- proc~cmp_degree~2 -->
+<!-- proc~cmp_degree~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node18" class="node">
-<title>proc~cmp_degree~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node18"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<title>proc~cmp_degree~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node18"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="735.5,-348 572.5,-348 572.5,-324 735.5,-324 735.5,-348"/>
 <text text-anchor="middle" x="654" y="-333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge28" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#002eff" d="M495.66,-336C516.18,-336 539.69,-336 562.16,-336"/>
 <polygon fill="#002eff" stroke="#002eff" points="562.4,-339.5 572.4,-336 562.4,-332.5 562.4,-339.5"/>
 </g>
-<!-- proc~cmp_nc~2 -->
+<!-- proc~cmp_nc~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node19" class="node">
-<title>proc~cmp_nc~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node19"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<title>proc~cmp_nc~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node19"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="723.5,-390 584.5,-390 584.5,-366 723.5,-366 723.5,-390"/>
 <text text-anchor="middle" x="654" y="-375.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge29" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#002eff" d="M495.66,-347.48C521.97,-352.58 553.2,-358.64 580.87,-364.01"/>
 <polygon fill="#002eff" stroke="#002eff" points="580.4,-367.48 590.89,-365.95 581.74,-360.61 580.4,-367.48"/>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge30" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#5c00ff" d="M495.66,-408.52C521.97,-403.42 553.2,-397.36 580.87,-391.99"/>
 <polygon fill="#5c00ff" stroke="#5c00ff" points="581.74,-395.39 590.89,-390.05 580.4,-388.52 581.74,-395.39"/>
 </g>
@@ -788,30 +788,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge31" class="edge">
-<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#5c00ff" d="M495.66,-420C521.64,-420 552.4,-420 579.8,-420"/>
 <polygon fill="#5c00ff" stroke="#5c00ff" points="580.12,-423.5 590.12,-420 580.12,-416.5 580.12,-423.5"/>
 </g>
-<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge32" class="edge">
-<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#e700ff" d="M495.66,-305.48C521.97,-310.58 553.2,-316.64 580.87,-322.01"/>
 <polygon fill="#e700ff" stroke="#e700ff" points="580.4,-325.48 590.89,-323.95 581.74,-318.61 580.4,-325.48"/>
 </g>
-<!-- proc~get_multiplicity~2 -->
+<!-- proc~get_multiplicity~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node28" class="node">
-<title>proc~get_multiplicity~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<title>proc~get_multiplicity~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="966,-349 788,-349 788,-325 966,-325 966,-349"/>
 <text text-anchor="middle" x="877" y="-334.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge33" class="edge">
-<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#ff0000" d="M735.72,-336.37C749.32,-336.43 763.56,-336.49 777.54,-336.55"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="777.65,-340.05 787.67,-336.6 777.68,-333.05 777.65,-340.05"/>
 </g>
@@ -824,9 +824,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge34" class="edge">
-<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#ffbf00" d="M723.75,-374.46C798.15,-370.63 916.22,-364.55 991.63,-360.67"/>
 <polygon fill="#ffbf00" stroke="#ffbf00" points="992.17,-364.15 1001.98,-360.14 991.81,-357.16 992.17,-364.15"/>
 </g>
@@ -845,42 +845,42 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#7fff00" d="M717.74,-420C756.54,-420 805.08,-420 838.1,-420"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="838.24,-423.5 848.24,-420 838.24,-416.5 838.24,-423.5"/>
 </g>
-<!-- proc~derivative2_scalar~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~derivative2_scalar~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge37" class="edge">
-<title>proc~derivative2_scalar~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~derivative2_scalar~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#00ff3f" d="M723.91,-66.06C733.49,-68.56 743.09,-71.52 752,-75 753.27,-75.5 810.55,-109.31 846.81,-130.74"/>
 <polygon fill="#00ff3f" stroke="#00ff3f" points="845.13,-133.81 855.52,-135.89 848.7,-127.79 845.13,-133.81"/>
 </g>
-<!-- interface~compute_d2tgc~2 -->
+<!-- interface~compute_d2tgc~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_node26" class="node">
-<title>interface~compute_d2tgc~2</title>
-<g id="a_program~~nearest_point_2d~~CallsGraph_node26"><a xlink:href="../interface/compute_d2tgc~2.html" xlink:title="compute_d2Tgc">
+<title>interface~compute_d2tgc~3</title>
+<g id="a_program~~nearest_point_2d~~CallsGraph_node26"><a xlink:href="../interface/compute_d2tgc~3.html" xlink:title="compute_d2Tgc">
 <polygon fill="#a7506f" stroke="#a7506f" points="926,-87 828,-87 828,-63 926,-63 926,-87"/>
 <text text-anchor="middle" x="877" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative2_scalar~2&#45;&gt;interface~compute_d2tgc~2 -->
+<!-- proc~derivative2_scalar~3&#45;&gt;interface~compute_d2tgc~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge36" class="edge">
-<title>proc~derivative2_scalar~2&#45;&gt;interface~compute_d2tgc~2</title>
+<title>proc~derivative2_scalar~3&#45;&gt;interface~compute_d2tgc~3</title>
 <path fill="none" stroke="#00ff3f" d="M751.61,-63.18C774.17,-65.32 797.51,-67.54 817.79,-69.47"/>
 <polygon fill="#00ff3f" stroke="#00ff3f" points="817.51,-72.96 827.79,-70.42 818.17,-65.99 817.51,-72.96"/>
 </g>
-<!-- proc~derivative2_vector~2&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative2_vector~3&#45;&gt;interface~ndgrid -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge39" class="edge">
-<title>proc~derivative2_vector~2&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative2_vector~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#00ffff" d="M734.87,-108.03C740.91,-110.5 746.7,-113.46 752,-117 775.37,-132.62 769.68,-147.68 788,-169 808.51,-192.86 835.16,-217.22 853.73,-233.33"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="851.53,-236.05 861.4,-239.9 856.09,-230.74 851.53,-236.05"/>
 </g>
-<!-- proc~derivative2_vector~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~derivative2_vector~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge40" class="edge">
-<title>proc~derivative2_vector~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~derivative2_vector~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#00ffff" d="M712,-108.02C725.16,-110.89 739.08,-113.99 752,-117 774.11,-122.16 798.35,-128.14 819.48,-133.47"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="818.72,-136.89 829.27,-135.95 820.44,-130.1 818.72,-136.89"/>
 </g>
-<!-- proc~derivative2_vector~2&#45;&gt;interface~compute_d2tgc~2 -->
+<!-- proc~derivative2_vector~3&#45;&gt;interface~compute_d2tgc~3 -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge38" class="edge">
-<title>proc~derivative2_vector~2&#45;&gt;interface~compute_d2tgc~2</title>
+<title>proc~derivative2_vector~3&#45;&gt;interface~compute_d2tgc~3</title>
 <path fill="none" stroke="#00ffff" d="M752.26,-86.76C774.54,-84.64 797.56,-82.45 817.61,-80.55"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="818.18,-84.01 827.8,-79.58 817.51,-77.04 818.18,-84.01"/>
 </g>
@@ -914,9 +914,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M1126.33,-349C1134.69,-347.91 1143.35,-346.78 1151.92,-345.66"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="1152.44,-349.12 1161.9,-344.36 1151.53,-342.18 1152.44,-349.12"/>
 </g>
-<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~nearest_point_2d~~CallsGraph_edge43" class="edge">
-<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ffff" d="M966.17,-346.53C974.77,-347.46 983.42,-348.4 991.82,-349.3"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="991.61,-352.8 1001.93,-350.4 992.36,-345.84 991.61,-352.8"/>
 </g>
@@ -1023,7 +1023,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~23"></span>
+              <span class="anchor" id="variable-wc~65"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1039,7 +1039,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~23"></span>
+              <span class="anchor" id="variable-xc~64"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1055,7 +1055,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-id~4"></span>
+              <span class="anchor" id="variable-id~7"></span>
               integer
             </td>
             <td>
@@ -1071,7 +1071,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xg~5"></span>
+              <span class="anchor" id="variable-nearest_xg~10"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1087,7 +1087,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xt~5"></span>
+              <span class="anchor" id="variable-nearest_xt~10"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1103,7 +1103,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~9"></span>
+              <span class="anchor" id="variable-shape~17"></span>
               type(<a href='../type/nurbs_surface.html'>nurbs_surface</a>)
             </td>
             <td>
@@ -1150,7 +1150,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/nearest_point_2d_bench.html b/program/nearest_point_2d_bench.html
index e7c237208..6fd02537d 100644
--- a/program/nearest_point_2d_bench.html
+++ b/program/nearest_point_2d_bench.html
@@ -115,14 +115,14 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/nearest_point_2d_bench.html#variable-i~61">i</a>
-            <a class="list-group-item" href="../program/nearest_point_2d_bench.html#variable-id~6">id</a>
+            <a class="list-group-item" href="../program/nearest_point_2d_bench.html#variable-i~60">i</a>
+            <a class="list-group-item" href="../program/nearest_point_2d_bench.html#variable-id~4">id</a>
             <a class="list-group-item" href="../program/nearest_point_2d_bench.html#variable-j~9">j</a>
-            <a class="list-group-item" href="../program/nearest_point_2d_bench.html#variable-nearest_xg~8">nearest_Xg</a>
-            <a class="list-group-item" href="../program/nearest_point_2d_bench.html#variable-nearest_xt~8">nearest_Xt</a>
+            <a class="list-group-item" href="../program/nearest_point_2d_bench.html#variable-nearest_xg~6">nearest_Xg</a>
+            <a class="list-group-item" href="../program/nearest_point_2d_bench.html#variable-nearest_xt~6">nearest_Xt</a>
             <a class="list-group-item" href="../program/nearest_point_2d_bench.html#variable-points">points</a>
-            <a class="list-group-item" href="../program/nearest_point_2d_bench.html#variable-shape~17">shape</a>
-            <a class="list-group-item" href="../program/nearest_point_2d_bench.html#variable-t~8">t</a>
+            <a class="list-group-item" href="../program/nearest_point_2d_bench.html#variable-shape~7">shape</a>
+            <a class="list-group-item" href="../program/nearest_point_2d_bench.html#variable-t~7">t</a>
         </div>
       </div>
     </div>
@@ -158,8 +158,8 @@ <h3 class="card-header card-title bg-light">Uses</h3>
         <ul class="list-group list-group-flush">
             <li class="list-group-item">
               <ul class="list-inline">
-                  <li class="list-inline-item"><a href='../module/forcad.html'>forcad</a></li>
                   <li class="list-inline-item">fortime</li>
+                  <li class="list-inline-item"><a href='../module/forcad.html'>forcad</a></li>
               </ul>
             </li>
             <li class="list-group-item">
@@ -408,48 +408,48 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="142,-129 0,-129 0,-105 142,-105 142,-129"/>
 <text text-anchor="middle" x="71" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">nearest_point_2d_bench</text>
 </g>
-<!-- proc~create~2 -->
+<!-- proc~create~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_node2" class="node">
-<title>proc~create~2</title>
-<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node2"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
+<title>proc~create~3</title>
+<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node2"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="328,-234 197,-234 197,-210 328,-210 328,-234"/>
 <text text-anchor="middle" x="262.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~create~2 -->
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~create~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge1" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~create~2</title>
+<title>program~nearest_point_2d_bench&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#ff0000" d="M83.84,-129.26C102.27,-147.61 139.67,-182.09 178,-201 182.11,-203.03 186.43,-204.87 190.85,-206.54"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="190.06,-209.97 200.66,-209.94 192.36,-203.36 190.06,-209.97"/>
 </g>
-<!-- proc~finalize~2 -->
+<!-- proc~finalize~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_node3" class="node">
-<title>proc~finalize~2</title>
-<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node3"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_surface%finalize">
+<title>proc~finalize~3</title>
+<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node3"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_surface%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="330.5,-192 194.5,-192 194.5,-168 330.5,-168 330.5,-192"/>
 <text text-anchor="middle" x="262.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~finalize~2 -->
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~finalize~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge2" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~finalize~2</title>
+<title>program~nearest_point_2d_bench&#45;&gt;proc~finalize~3</title>
 <path fill="none" stroke="#ff0000" d="M99.54,-129.06C120.72,-138.06 150.87,-150.26 178,-159 184.85,-161.21 192.07,-163.33 199.29,-165.31"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="198.52,-168.73 209.09,-167.94 200.33,-161.97 198.52,-168.73"/>
 </g>
-<!-- proc~nearest_point~2 -->
+<!-- proc~nearest_point~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_node4" class="node">
-<title>proc~nearest_point~2</title>
-<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node4"><a xlink:href="../proc/nearest_point~2.html" xlink:title="nurbs_surface%nearest_point">
+<title>proc~nearest_point~3</title>
+<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node4"><a xlink:href="../proc/nearest_point~3.html" xlink:title="nurbs_surface%nearest_point">
 <polygon fill="#d9534f" stroke="#d9534f" points="347,-150 178,-150 178,-126 347,-126 347,-150"/>
 <text text-anchor="middle" x="262.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%nearest_point</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_2d_bench&#45;&gt;proc~nearest_point~2 -->
+<!-- program~nearest_point_2d_bench&#45;&gt;proc~nearest_point~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge3" class="edge">
-<title>program~nearest_point_2d_bench&#45;&gt;proc~nearest_point~2</title>
+<title>program~nearest_point_2d_bench&#45;&gt;proc~nearest_point~3</title>
 <path fill="none" stroke="#ff0000" d="M142.02,-124.76C150.44,-125.69 159.13,-126.66 167.81,-127.62"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="167.65,-131.12 177.97,-128.74 168.42,-124.16 167.65,-131.12"/>
 </g>
@@ -492,18 +492,18 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M83.84,-104.74C102.27,-86.39 139.67,-51.91 178,-33 190.39,-26.89 204.72,-22.45 217.97,-19.28"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="218.84,-22.67 227.85,-17.09 217.33,-15.84 218.84,-22.67"/>
 </g>
-<!-- interface~compute_xg~2 -->
+<!-- interface~compute_xg~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_node8" class="node">
-<title>interface~compute_xg~2</title>
-<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~3</title>
+<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="498.5,-276 419.5,-276 419.5,-252 498.5,-252 498.5,-276"/>
 <text text-anchor="middle" x="459" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
+<!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge7" class="edge">
-<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
+<title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
 <path fill="none" stroke="#ff0000" d="M319.24,-234.04C347.6,-240.16 381.77,-247.54 409.11,-253.44"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="408.71,-256.94 419.22,-255.63 410.19,-250.09 408.71,-256.94"/>
 </g>
@@ -516,24 +516,24 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~ndgrid -->
+<!-- proc~create~3&#45;&gt;interface~ndgrid -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge8" class="edge">
-<title>proc~create~2&#45;&gt;interface~ndgrid</title>
+<title>proc~create~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M328.27,-222C359.35,-222 395.43,-222 421.64,-222"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="421.87,-225.5 431.87,-222 421.87,-218.5 421.87,-225.5"/>
 </g>
-<!-- proc~is_rational~2 -->
+<!-- proc~is_rational~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_node12" class="node">
-<title>proc~is_rational~2</title>
-<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node12"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<title>proc~is_rational~3</title>
+<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node12"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="535,-192 383,-192 383,-168 535,-168 535,-192"/>
 <text text-anchor="middle" x="459" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge9" class="edge">
-<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~create~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#ff0000" d="M319.24,-209.96C342.02,-205.04 368.56,-199.31 392.28,-194.19"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="393.22,-197.57 402.26,-192.04 391.74,-190.73 393.22,-197.57"/>
 </g>
@@ -546,24 +546,24 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point~2&#45;&gt;interface~nearest_point_help_2d -->
+<!-- proc~nearest_point~3&#45;&gt;interface~nearest_point_help_2d -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge10" class="edge">
-<title>proc~nearest_point~2&#45;&gt;interface~nearest_point_help_2d</title>
+<title>proc~nearest_point~3&#45;&gt;interface~nearest_point_help_2d</title>
 <path fill="none" stroke="#00ff00" d="M347.11,-138C358.98,-138 371.12,-138 382.81,-138"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="382.96,-141.5 392.96,-138 382.96,-134.5 382.96,-141.5"/>
 </g>
-<!-- none~set~2 -->
+<!-- none~set~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_node11" class="node">
-<title>none~set~2</title>
-<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node11"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<title>none~set~3</title>
+<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node11"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="515.5,-108 402.5,-108 402.5,-84 515.5,-84 515.5,-108"/>
 <text text-anchor="middle" x="459" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge11" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#00ffff" d="M344.58,-96C360.41,-96 376.84,-96 392.11,-96"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="392.48,-99.5 402.48,-96 392.48,-92.5 392.48,-99.5"/>
 </g>
@@ -612,99 +612,99 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M486.19,-220.31C514.89,-218.45 561.14,-215.46 593.42,-213.37"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="594.03,-216.84 603.78,-212.7 593.58,-209.85 594.03,-216.84"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_node16" class="node">
-<title>proc~set1~2</title>
-<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node16"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<title>proc~set1~3</title>
+<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node16"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="691,-129 571,-129 571,-105 691,-105 691,-129"/>
 <text text-anchor="middle" x="631" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge15" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
 <path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M515.66,-102.88C530.06,-104.65 545.74,-106.59 560.74,-108.44"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="560.64,-111.96 570.99,-109.71 561.5,-105.01 560.64,-111.96"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_node17" class="node">
-<title>proc~set2~2</title>
-<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node17"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<title>proc~set2~3</title>
+<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node17"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="691,-87 571,-87 571,-63 691,-63 691,-87"/>
 <text text-anchor="middle" x="631" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge16" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
 <path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M515.66,-89.12C530.06,-87.35 545.74,-85.41 560.74,-83.56"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="561.5,-86.99 570.99,-82.29 560.64,-80.04 561.5,-86.99"/>
 </g>
-<!-- proc~set3~2 -->
+<!-- proc~set3~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_node18" class="node">
-<title>proc~set3~2</title>
-<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node18"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<title>proc~set3~3</title>
+<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node18"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="691,-171 571,-171 571,-147 691,-147 691,-171"/>
 <text text-anchor="middle" x="631" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge17" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
+<title>none~set~3&#45;&gt;proc~set3~3</title>
 <path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M509.83,-108.02C518.36,-110.63 527.03,-113.63 535,-117 552.06,-124.22 554.2,-130.19 571,-138 574.88,-139.8 578.97,-141.55 583.1,-143.21"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="582.16,-146.6 592.75,-146.93 584.68,-140.07 582.16,-146.6"/>
 </g>
-<!-- proc~set4~2 -->
+<!-- proc~set4~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_node19" class="node">
-<title>proc~set4~2</title>
-<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node19"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<title>proc~set4~3</title>
+<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node19"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="691,-45 571,-45 571,-21 691,-21 691,-45"/>
 <text text-anchor="middle" x="631" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set4~2 -->
+<!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge18" class="edge">
-<title>none~set~2&#45;&gt;proc~set4~2</title>
+<title>none~set~3&#45;&gt;proc~set4~3</title>
 <path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M509.83,-83.98C518.36,-81.37 527.03,-78.37 535,-75 552.06,-67.78 554.2,-61.81 571,-54 574.88,-52.2 578.97,-50.45 583.1,-48.79"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="584.68,-51.93 592.75,-45.07 582.16,-45.4 584.68,-51.93"/>
 </g>
-<!-- proc~cmp_degree~2 -->
+<!-- proc~cmp_degree~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_node20" class="node">
-<title>proc~cmp_degree~2</title>
-<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node20"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<title>proc~cmp_degree~3</title>
+<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node20"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="890,-171 727,-171 727,-147 890,-147 890,-171"/>
 <text text-anchor="middle" x="808.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge19" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#00ff00" d="M682.29,-129.04C702.58,-133.89 726.15,-139.53 747.34,-144.6"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="746.66,-148.04 757.2,-146.96 748.29,-141.23 746.66,-148.04"/>
 </g>
-<!-- proc~cmp_nc~2 -->
+<!-- proc~cmp_nc~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_node21" class="node">
-<title>proc~cmp_nc~2</title>
-<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node21"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<title>proc~cmp_nc~3</title>
+<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node21"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="878,-129 739,-129 739,-105 878,-105 878,-129"/>
 <text text-anchor="middle" x="808.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge20" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#00ff00" d="M691.42,-117C703.3,-117 715.97,-117 728.4,-117"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="728.76,-120.5 738.76,-117 728.76,-113.5 728.76,-120.5"/>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge21" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#00ffff" d="M682.29,-87.04C702.58,-91.89 726.15,-97.53 747.34,-102.6"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="746.66,-106.04 757.2,-104.96 748.29,-99.23 746.66,-106.04"/>
 </g>
@@ -717,30 +717,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge22" class="edge">
-<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#00ffff" d="M691.42,-75C705.26,-75 720.16,-75 734.51,-75"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="734.85,-78.5 744.85,-75 734.85,-71.5 734.85,-78.5"/>
 </g>
-<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge23" class="edge">
-<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#0000ff" d="M691.42,-159C699.64,-159 708.23,-159 716.86,-159"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="716.98,-162.5 726.98,-159 716.98,-155.5 716.98,-162.5"/>
 </g>
-<!-- proc~get_multiplicity~2 -->
+<!-- proc~get_multiplicity~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_node24" class="node">
-<title>proc~get_multiplicity~2</title>
-<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node24"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<title>proc~get_multiplicity~3</title>
+<g id="a_program~~nearest_point_2d_bench~~CallsGraph_node24"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1104,-170 926,-170 926,-146 1104,-146 1104,-170"/>
 <text text-anchor="middle" x="1015" y="-155.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge24" class="edge">
-<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#ff0000" d="M890.03,-158.61C898.47,-158.56 907.11,-158.52 915.71,-158.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="915.8,-161.98 925.78,-158.43 915.76,-154.98 915.8,-161.98"/>
 </g>
@@ -753,9 +753,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge25" class="edge">
-<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M878.14,-120.68C948.69,-124.47 1058.03,-130.33 1129.57,-134.17"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1129.67,-137.68 1139.85,-134.72 1130.05,-130.69 1129.67,-137.68"/>
 </g>
@@ -804,9 +804,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1264.33,-130C1272.69,-128.91 1281.35,-127.78 1289.92,-126.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1290.44,-130.12 1299.9,-125.36 1289.53,-123.18 1290.44,-130.12"/>
 </g>
-<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~nearest_point_2d_bench~~CallsGraph_edge29" class="edge">
-<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M1104.17,-148.47C1112.77,-147.54 1121.42,-146.6 1129.82,-145.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1130.36,-149.16 1139.93,-144.6 1129.61,-142.2 1130.36,-149.16"/>
 </g>
@@ -913,7 +913,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-i~61"></span>
+              <span class="anchor" id="variable-i~60"></span>
               integer
             </td>
             <td>
@@ -929,7 +929,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-id~6"></span>
+              <span class="anchor" id="variable-id~4"></span>
               integer
             </td>
             <td>
@@ -961,7 +961,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xg~8"></span>
+              <span class="anchor" id="variable-nearest_xg~6"></span>
               real(kind=rk),
             </td>
             <td>
@@ -977,7 +977,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xt~8"></span>
+              <span class="anchor" id="variable-nearest_xt~6"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1009,7 +1009,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~17"></span>
+              <span class="anchor" id="variable-shape~7"></span>
               type(<a href='../type/nurbs_surface.html'>nurbs_surface</a>)
             </td>
             <td>
@@ -1025,7 +1025,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-t~8"></span>
+              <span class="anchor" id="variable-t~7"></span>
               type(timer)
             </td>
             <td>
@@ -1072,7 +1072,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/nearest_point_3d.html b/program/nearest_point_3d.html
index a1b4bb777..5066155ab 100644
--- a/program/nearest_point_3d.html
+++ b/program/nearest_point_3d.html
@@ -115,12 +115,12 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/nearest_point_3d.html#variable-wc">Wc</a>
-            <a class="list-group-item" href="../program/nearest_point_3d.html#variable-xc">Xc</a>
-            <a class="list-group-item" href="../program/nearest_point_3d.html#variable-id">id</a>
-            <a class="list-group-item" href="../program/nearest_point_3d.html#variable-nearest_xg">nearest_Xg</a>
-            <a class="list-group-item" href="../program/nearest_point_3d.html#variable-nearest_xt">nearest_Xt</a>
-            <a class="list-group-item" href="../program/nearest_point_3d.html#variable-shape">shape</a>
+            <a class="list-group-item" href="../program/nearest_point_3d.html#variable-wc~45">Wc</a>
+            <a class="list-group-item" href="../program/nearest_point_3d.html#variable-xc~42">Xc</a>
+            <a class="list-group-item" href="../program/nearest_point_3d.html#variable-id~5">id</a>
+            <a class="list-group-item" href="../program/nearest_point_3d.html#variable-nearest_xg~7">nearest_Xg</a>
+            <a class="list-group-item" href="../program/nearest_point_3d.html#variable-nearest_xt~7">nearest_Xt</a>
+            <a class="list-group-item" href="../program/nearest_point_3d.html#variable-shape~9">shape</a>
         </div>
       </div>
     </div>
@@ -391,153 +391,153 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="103,-144 0,-144 0,-120 103,-120 103,-144"/>
 <text text-anchor="middle" x="51.5" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50">nearest_point_3d</text>
 </g>
-<!-- none~set -->
+<!-- none~set~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node2" class="node">
-<title>none~set</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
+<title>none~set~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node2"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="283.5,-348 170.5,-348 170.5,-324 283.5,-324 283.5,-348"/>
 <text text-anchor="middle" x="227" y="-333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;none~set -->
+<!-- program~nearest_point_3d&#45;&gt;none~set~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge1" class="edge">
-<title>program~nearest_point_3d&#45;&gt;none~set</title>
+<title>program~nearest_point_3d&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#ff0000" d="M62.83,-144.15C91.7,-178.09 173.42,-274.18 209.05,-316.07"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="206.58,-318.56 215.72,-323.91 211.91,-314.03 206.58,-318.56"/>
 </g>
-<!-- proc~create -->
+<!-- proc~create~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node3" class="node">
-<title>proc~create</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node3"><a xlink:href="../proc/create.html" xlink:title="nurbs_volume%create">
+<title>proc~create~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node3"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_volume%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="501,-252 370,-252 370,-228 501,-228 501,-252"/>
 <text text-anchor="middle" x="435.5" y="-237.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~create -->
+<!-- program~nearest_point_3d&#45;&gt;proc~create~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge2" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~create</title>
+<title>program~nearest_point_3d&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#ff0000" d="M91.96,-144.01C148.97,-161.24 257.75,-193.69 351,-219 358.9,-221.14 367.24,-223.33 375.46,-225.44"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="374.86,-228.9 385.41,-227.98 376.58,-222.12 374.86,-228.9"/>
 </g>
-<!-- proc~finalize -->
+<!-- proc~finalize~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node4" class="node">
-<title>proc~finalize</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node4"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_volume%finalize">
+<title>proc~finalize~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node4"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_volume%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="503.5,-66 367.5,-66 367.5,-42 503.5,-42 503.5,-66"/>
 <text text-anchor="middle" x="435.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~finalize -->
+<!-- program~nearest_point_3d&#45;&gt;proc~finalize~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge3" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~finalize</title>
+<title>program~nearest_point_3d&#45;&gt;proc~finalize~2</title>
 <path fill="none" stroke="#ff0000" d="M100.45,-119.93C112.97,-116.9 126.47,-113.73 139,-111 212.84,-94.93 297.56,-78.82 357.31,-67.85"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="358.21,-71.24 367.42,-66 356.95,-64.36 358.21,-71.24"/>
 </g>
-<!-- proc~nearest_point -->
+<!-- proc~nearest_point2~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node5" class="node">
-<title>proc~nearest_point</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node5"><a xlink:href="../proc/nearest_point.html" xlink:title="nurbs_volume%nearest_point">
-<polygon fill="#d9534f" stroke="#d9534f" points="520,-24 351,-24 351,0 520,0 520,-24"/>
-<text text-anchor="middle" x="435.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point</text>
+<title>proc~nearest_point2~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node5"><a xlink:href="../proc/nearest_point2~2.html" xlink:title="nurbs_volume%nearest_point2">
+<polygon fill="#d9534f" stroke="#d9534f" points="315,-144 139,-144 139,-120 315,-120 315,-144"/>
+<text text-anchor="middle" x="227" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge4" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point</title>
-<path fill="none" stroke="#ff0000" d="M65.79,-119.9C81.91,-105.91 110.46,-83.25 139,-71 203.3,-43.39 281.08,-28.52 340.7,-20.62"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="341.38,-24.06 350.86,-19.32 340.49,-17.12 341.38,-24.06"/>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2~2</title>
+<path fill="none" stroke="#ff0000" d="M103.15,-132C111.2,-132 119.76,-132 128.46,-132"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="128.73,-135.5 138.73,-132 128.73,-128.5 128.73,-135.5"/>
 </g>
-<!-- proc~nearest_point2 -->
+<!-- proc~nearest_point~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node6" class="node">
-<title>proc~nearest_point2</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node6"><a xlink:href="../proc/nearest_point2.html" xlink:title="nurbs_volume%nearest_point2">
-<polygon fill="#d9534f" stroke="#d9534f" points="315,-144 139,-144 139,-120 315,-120 315,-144"/>
-<text text-anchor="middle" x="227" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point2</text>
+<title>proc~nearest_point~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node6"><a xlink:href="../proc/nearest_point~2.html" xlink:title="nurbs_volume%nearest_point">
+<polygon fill="#d9534f" stroke="#d9534f" points="520,-24 351,-24 351,0 520,0 520,-24"/>
+<text text-anchor="middle" x="435.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%nearest_point</text>
 </a>
 </g>
 </g>
-<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point2 -->
+<!-- program~nearest_point_3d&#45;&gt;proc~nearest_point~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge5" class="edge">
-<title>program~nearest_point_3d&#45;&gt;proc~nearest_point2</title>
-<path fill="none" stroke="#ff0000" d="M103.15,-132C111.2,-132 119.76,-132 128.46,-132"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="128.73,-135.5 138.73,-132 128.73,-128.5 128.73,-135.5"/>
+<title>program~nearest_point_3d&#45;&gt;proc~nearest_point~2</title>
+<path fill="none" stroke="#ff0000" d="M65.79,-119.9C81.91,-105.91 110.46,-83.25 139,-71 203.3,-43.39 281.08,-28.52 340.7,-20.62"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="341.38,-24.06 350.86,-19.32 340.49,-17.12 341.38,-24.06"/>
 </g>
-<!-- proc~set1 -->
+<!-- proc~set1~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node14" class="node">
-<title>proc~set1</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node14"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
+<title>proc~set1~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node14"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="495.5,-348 375.5,-348 375.5,-324 495.5,-324 495.5,-348"/>
 <text text-anchor="middle" x="435.5" y="-333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set1 -->
+<!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge6" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
+<title>none~set~2&#45;&gt;proc~set1~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M283.61,-336C308.6,-336 338.37,-336 364.83,-336"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="365.17,-339.5 375.17,-336 365.17,-332.5 365.17,-339.5"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set2~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node15" class="node">
-<title>proc~set2</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node15"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
+<title>proc~set2~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node15"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="495.5,-432 375.5,-432 375.5,-408 495.5,-408 495.5,-432"/>
 <text text-anchor="middle" x="435.5" y="-417.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set2 -->
+<!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge7" class="edge">
-<title>none~set&#45;&gt;proc~set2</title>
+<title>none~set~2&#45;&gt;proc~set2~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M248.24,-348.18C272.09,-362.11 313.27,-384.81 351,-399 356.88,-401.21 363.07,-403.26 369.32,-405.15"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="368.58,-408.57 379.16,-407.97 370.51,-401.84 368.58,-408.57"/>
 </g>
-<!-- proc~set3 -->
+<!-- proc~set3~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node16" class="node">
-<title>proc~set3</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node16"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
+<title>proc~set3~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node16"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="495.5,-306 375.5,-306 375.5,-282 495.5,-282 495.5,-306"/>
 <text text-anchor="middle" x="435.5" y="-291.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set3 -->
+<!-- none~set~2&#45;&gt;proc~set3~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge8" class="edge">
-<title>none~set&#45;&gt;proc~set3</title>
+<title>none~set~2&#45;&gt;proc~set3~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M283.61,-324.69C308.71,-319.58 338.63,-313.5 365.18,-308.1"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="366.07,-311.49 375.17,-306.07 364.68,-304.63 366.07,-311.49"/>
 </g>
-<!-- proc~set4 -->
+<!-- proc~set4~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node17" class="node">
-<title>proc~set4</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node17"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
+<title>proc~set4~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node17"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="495.5,-390 375.5,-390 375.5,-366 495.5,-366 495.5,-390"/>
 <text text-anchor="middle" x="435.5" y="-375.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set4 -->
+<!-- none~set~2&#45;&gt;proc~set4~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge9" class="edge">
-<title>none~set&#45;&gt;proc~set4</title>
+<title>none~set~2&#45;&gt;proc~set4~2</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M283.61,-347.31C308.71,-352.42 338.63,-358.5 365.18,-363.9"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="364.68,-367.37 375.17,-365.93 366.07,-360.51 364.68,-367.37"/>
 </g>
-<!-- interface~compute_xg -->
+<!-- interface~compute_xg~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node7" class="node">
-<title>interface~compute_xg</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node7"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node7"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="693.5,-230 614.5,-230 614.5,-206 693.5,-206 693.5,-230"/>
 <text text-anchor="middle" x="654" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;interface~compute_xg -->
+<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge10" class="edge">
-<title>proc~create&#45;&gt;interface~compute_xg</title>
+<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
 <path fill="none" stroke="#cbff00" d="M501.16,-233.43C534.3,-230.06 573.98,-226.03 604.46,-222.93"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="604.83,-226.41 614.42,-221.92 604.12,-219.45 604.83,-226.41"/>
 </g>
@@ -550,89 +550,74 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;interface~ndgrid -->
+<!-- proc~create~2&#45;&gt;interface~ndgrid -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge11" class="edge">
-<title>proc~create&#45;&gt;interface~ndgrid</title>
+<title>proc~create~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#cbff00" d="M471.83,-252.07C495.36,-259.46 527.15,-268.2 556,-272 642.37,-283.36 665.17,-278.96 752,-272 781.67,-269.62 814.95,-264.09 839.56,-259.45"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="840.38,-262.86 849.54,-257.53 839.06,-255.98 840.38,-262.86"/>
 </g>
-<!-- proc~is_rational -->
+<!-- proc~is_rational~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node13" class="node">
-<title>proc~is_rational</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node13"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
+<title>proc~is_rational~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node13"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="953,-160 801,-160 801,-136 953,-136 953,-160"/>
 <text text-anchor="middle" x="877" y="-145.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;proc~is_rational -->
+<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge12" class="edge">
-<title>proc~create&#45;&gt;proc~is_rational</title>
+<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
 <path fill="none" stroke="#cbff00" d="M501.21,-251.25C566.33,-259.95 668.76,-266.41 752,-239 794.88,-224.88 835.21,-189.72 857.65,-167.47"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="860.29,-169.77 864.82,-160.19 855.3,-164.86 860.29,-169.77"/>
 </g>
-<!-- interface~nearest_point_help_3d -->
-<g id="program~~nearest_point_3d~~CallsGraph_node9" class="node">
-<title>interface~nearest_point_help_3d</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node9"><a xlink:href="../interface/nearest_point_help_3d.html" xlink:title="nearest_point_help_3d">
-<polygon fill="#a7506f" stroke="#a7506f" points="720,-24 588,-24 588,0 720,0 720,-24"/>
-<text text-anchor="middle" x="654" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_3d</text>
-</a>
-</g>
-</g>
-<!-- proc~nearest_point&#45;&gt;interface~nearest_point_help_3d -->
-<g id="program~~nearest_point_3d~~CallsGraph_edge13" class="edge">
-<title>proc~nearest_point&#45;&gt;interface~nearest_point_help_3d</title>
-<path fill="none" stroke="#0066ff" d="M520.2,-12C539.18,-12 559.22,-12 577.81,-12"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="577.98,-15.5 587.98,-12 577.98,-8.5 577.98,-15.5"/>
+<!-- proc~nearest_point2~2&#45;&gt;proc~create~2 -->
+<g id="program~~nearest_point_3d~~CallsGraph_edge15" class="edge">
+<title>proc~nearest_point2~2&#45;&gt;proc~create~2</title>
+<path fill="none" stroke="#0066ff" d="M246.14,-144.2C263.84,-156.18 291.47,-175.07 315,-192 331.24,-203.68 332.95,-210.39 351,-219 355.33,-221.06 359.88,-222.94 364.53,-224.64"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="363.59,-228.02 374.19,-227.9 365.83,-221.39 363.59,-228.02"/>
 </g>
-<!-- proc~nearest_point2&#45;&gt;proc~create -->
+<!-- proc~nearest_point2~2&#45;&gt;proc~finalize~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge16" class="edge">
-<title>proc~nearest_point2&#45;&gt;proc~create</title>
-<path fill="none" stroke="#cc00ff" d="M246.14,-144.2C263.84,-156.18 291.47,-175.07 315,-192 331.24,-203.68 332.95,-210.39 351,-219 355.33,-221.06 359.88,-222.94 364.53,-224.64"/>
-<polygon fill="#cc00ff" stroke="#cc00ff" points="363.59,-228.02 374.19,-227.9 365.83,-221.39 363.59,-228.02"/>
+<title>proc~nearest_point2~2&#45;&gt;proc~finalize~2</title>
+<path fill="none" stroke="#0066ff" d="M257.24,-119.86C274.24,-112.65 295.99,-103.15 315,-94 331.3,-86.15 334.11,-81.47 351,-75 356.77,-72.79 362.86,-70.74 369,-68.87"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="370.05,-72.21 378.68,-66.06 368.1,-65.49 370.05,-72.21"/>
 </g>
-<!-- proc~nearest_point2&#45;&gt;proc~finalize -->
-<g id="program~~nearest_point_3d~~CallsGraph_edge17" class="edge">
-<title>proc~nearest_point2&#45;&gt;proc~finalize</title>
-<path fill="none" stroke="#cc00ff" d="M257.24,-119.86C274.24,-112.65 295.99,-103.15 315,-94 331.3,-86.15 334.11,-81.47 351,-75 356.77,-72.79 362.86,-70.74 369,-68.87"/>
-<polygon fill="#cc00ff" stroke="#cc00ff" points="370.05,-72.21 378.68,-66.06 368.1,-65.49 370.05,-72.21"/>
-</g>
-<!-- proc~nearest_point2&#45;&gt;proc~nearest_point -->
-<g id="program~~nearest_point_3d~~CallsGraph_edge19" class="edge">
-<title>proc~nearest_point2&#45;&gt;proc~nearest_point</title>
-<path fill="none" stroke="#cc00ff" d="M239.34,-119.95C259.68,-99.05 304.62,-56.1 351,-33 355.1,-30.96 359.41,-29.1 363.83,-27.42"/>
-<polygon fill="#cc00ff" stroke="#cc00ff" points="365.34,-30.6 373.63,-24.01 363.04,-23.99 365.34,-30.6"/>
+<!-- proc~nearest_point2~2&#45;&gt;proc~nearest_point~2 -->
+<g id="program~~nearest_point_3d~~CallsGraph_edge18" class="edge">
+<title>proc~nearest_point2~2&#45;&gt;proc~nearest_point~2</title>
+<path fill="none" stroke="#0066ff" d="M239.34,-119.95C259.68,-99.05 304.62,-56.1 351,-33 355.1,-30.96 359.41,-29.1 363.83,-27.42"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="365.34,-30.6 373.63,-24.01 363.04,-23.99 365.34,-30.6"/>
 </g>
-<!-- none~derivative2 -->
+<!-- none~derivative2~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node10" class="node">
-<title>none~derivative2</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node10"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2" xlink:title="nurbs_volume%derivative2">
+<title>none~derivative2~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node10"><a xlink:href="../type/nurbs_volume.html#boundprocedure-derivative2~2" xlink:title="nurbs_volume%derivative2">
 <polygon fill="#a7506f" stroke="#a7506f" points="514,-108 357,-108 357,-84 514,-84 514,-108"/>
 <text text-anchor="middle" x="435.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2&#45;&gt;none~derivative2 -->
-<g id="program~~nearest_point_3d~~CallsGraph_edge14" class="edge">
-<title>proc~nearest_point2&#45;&gt;none~derivative2</title>
-<path fill="none" stroke="#cc00ff" d="M297.05,-119.96C315.82,-116.69 336.29,-113.12 355.56,-109.76"/>
-<polygon fill="#cc00ff" stroke="#cc00ff" points="356.27,-113.19 365.52,-108.03 355.06,-106.3 356.27,-113.19"/>
+<!-- proc~nearest_point2~2&#45;&gt;none~derivative2~2 -->
+<g id="program~~nearest_point_3d~~CallsGraph_edge13" class="edge">
+<title>proc~nearest_point2~2&#45;&gt;none~derivative2~2</title>
+<path fill="none" stroke="#0066ff" d="M297.05,-119.96C315.82,-116.69 336.29,-113.12 355.56,-109.76"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="356.27,-113.19 365.52,-108.03 355.06,-106.3 356.27,-113.19"/>
 </g>
-<!-- proc~cmp_xg -->
+<!-- proc~cmp_xg~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node11" class="node">
-<title>proc~cmp_xg</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node11"><a xlink:href="../proc/cmp_xg.html" xlink:title="nurbs_volume%cmp_Xg">
+<title>proc~cmp_xg~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node11"><a xlink:href="../proc/cmp_xg~2.html" xlink:title="nurbs_volume%cmp_Xg">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="505.5,-210 365.5,-210 365.5,-186 505.5,-186 505.5,-210"/>
 <text text-anchor="middle" x="435.5" y="-195.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2&#45;&gt;proc~cmp_xg -->
-<g id="program~~nearest_point_3d~~CallsGraph_edge15" class="edge">
-<title>proc~nearest_point2&#45;&gt;proc~cmp_xg</title>
-<path fill="none" stroke="#cc00ff" d="M258.28,-144.08C283,-153.7 318.94,-167.13 351,-177 358.15,-179.2 365.7,-181.34 373.22,-183.37"/>
-<polygon fill="#cc00ff" stroke="#cc00ff" points="372.48,-186.79 383.04,-185.96 374.26,-180.02 372.48,-186.79"/>
+<!-- proc~nearest_point2~2&#45;&gt;proc~cmp_xg~2 -->
+<g id="program~~nearest_point_3d~~CallsGraph_edge14" class="edge">
+<title>proc~nearest_point2~2&#45;&gt;proc~cmp_xg~2</title>
+<path fill="none" stroke="#0066ff" d="M258.28,-144.08C283,-153.7 318.94,-167.13 351,-177 358.15,-179.2 365.7,-181.34 373.22,-183.37"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="372.48,-186.79 383.04,-185.96 374.26,-180.02 372.48,-186.79"/>
 </g>
 <!-- proc~inv -->
 <g id="program~~nearest_point_3d~~CallsGraph_node12" class="node">
@@ -643,11 +628,26 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~nearest_point2&#45;&gt;proc~inv -->
-<g id="program~~nearest_point_3d~~CallsGraph_edge18" class="edge">
-<title>proc~nearest_point2&#45;&gt;proc~inv</title>
-<path fill="none" stroke="#cc00ff" d="M315.28,-134.54C344.48,-135.38 375.44,-136.28 398.49,-136.95"/>
-<polygon fill="#cc00ff" stroke="#cc00ff" points="398.39,-140.45 408.49,-137.24 398.59,-133.46 398.39,-140.45"/>
+<!-- proc~nearest_point2~2&#45;&gt;proc~inv -->
+<g id="program~~nearest_point_3d~~CallsGraph_edge17" class="edge">
+<title>proc~nearest_point2~2&#45;&gt;proc~inv</title>
+<path fill="none" stroke="#0066ff" d="M315.28,-134.54C344.48,-135.38 375.44,-136.28 398.49,-136.95"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="398.39,-140.45 408.49,-137.24 398.59,-133.46 398.39,-140.45"/>
+</g>
+<!-- interface~nearest_point_help_3d -->
+<g id="program~~nearest_point_3d~~CallsGraph_node9" class="node">
+<title>interface~nearest_point_help_3d</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node9"><a xlink:href="../interface/nearest_point_help_3d.html" xlink:title="nearest_point_help_3d">
+<polygon fill="#a7506f" stroke="#a7506f" points="720,-24 588,-24 588,0 720,0 720,-24"/>
+<text text-anchor="middle" x="654" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nearest_point_help_3d</text>
+</a>
+</g>
+</g>
+<!-- proc~nearest_point~2&#45;&gt;interface~nearest_point_help_3d -->
+<g id="program~~nearest_point_3d~~CallsGraph_edge19" class="edge">
+<title>proc~nearest_point~2&#45;&gt;interface~nearest_point_help_3d</title>
+<path fill="none" stroke="#cc00ff" d="M520.2,-12C539.18,-12 559.22,-12 577.81,-12"/>
+<polygon fill="#cc00ff" stroke="#cc00ff" points="577.98,-15.5 587.98,-12 577.98,-8.5 577.98,-15.5"/>
 </g>
 <!-- proc~ndgrid2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node24" class="node">
@@ -679,45 +679,45 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff8b00" stroke-dasharray="5,2" d="M904.11,-254.96C936.11,-258.6 990.52,-264.77 1026.61,-268.87"/>
 <polygon fill="#ff8b00" stroke="#ff8b00" points="1026.39,-272.37 1036.72,-270.02 1027.18,-265.41 1026.39,-272.37"/>
 </g>
-<!-- proc~derivative2_scalar -->
+<!-- proc~derivative2_scalar~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node21" class="node">
-<title>proc~derivative2_scalar</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node21"><a xlink:href="../proc/derivative2_scalar.html" xlink:title="nurbs_volume%derivative2_scalar">
+<title>proc~derivative2_scalar~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node21"><a xlink:href="../proc/derivative2_scalar~2.html" xlink:title="nurbs_volume%derivative2_scalar">
 <polygon fill="#d9534f" stroke="#d9534f" points="751.5,-66 556.5,-66 556.5,-42 751.5,-42 751.5,-66"/>
 <text text-anchor="middle" x="654" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_scalar</text>
 </a>
 </g>
 </g>
-<!-- none~derivative2&#45;&gt;proc~derivative2_scalar -->
+<!-- none~derivative2~2&#45;&gt;proc~derivative2_scalar~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge22" class="edge">
-<title>none~derivative2&#45;&gt;proc~derivative2_scalar</title>
+<title>none~derivative2~2&#45;&gt;proc~derivative2_scalar~2</title>
 <path fill="none" stroke="#5cff00" stroke-dasharray="5,2" d="M498.54,-83.96C524.25,-78.98 554.23,-73.16 580.9,-67.99"/>
 <polygon fill="#5cff00" stroke="#5cff00" points="581.8,-71.38 590.95,-66.04 580.47,-64.51 581.8,-71.38"/>
 </g>
-<!-- proc~derivative2_vector -->
+<!-- proc~derivative2_vector~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node22" class="node">
-<title>proc~derivative2_vector</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node22"><a xlink:href="../proc/derivative2_vector.html" xlink:title="nurbs_volume%derivative2_vector">
+<title>proc~derivative2_vector~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node22"><a xlink:href="../proc/derivative2_vector~2.html" xlink:title="nurbs_volume%derivative2_vector">
 <polygon fill="#d9534f" stroke="#d9534f" points="752,-108 556,-108 556,-84 752,-84 752,-108"/>
 <text text-anchor="middle" x="654" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%derivative2_vector</text>
 </a>
 </g>
 </g>
-<!-- none~derivative2&#45;&gt;proc~derivative2_vector -->
+<!-- none~derivative2~2&#45;&gt;proc~derivative2_vector~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge23" class="edge">
-<title>none~derivative2&#45;&gt;proc~derivative2_vector</title>
+<title>none~derivative2~2&#45;&gt;proc~derivative2_vector~2</title>
 <path fill="none" stroke="#5cff00" stroke-dasharray="5,2" d="M514.05,-96C524.35,-96 535.05,-96 545.74,-96"/>
 <polygon fill="#5cff00" stroke="#5cff00" points="545.97,-99.5 555.97,-96 545.97,-92.5 545.97,-99.5"/>
 </g>
-<!-- proc~cmp_xg&#45;&gt;interface~compute_xg -->
+<!-- proc~cmp_xg~2&#45;&gt;interface~compute_xg~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge24" class="edge">
-<title>proc~cmp_xg&#45;&gt;interface~compute_xg</title>
+<title>proc~cmp_xg~2&#45;&gt;interface~compute_xg~2</title>
 <path fill="none" stroke="#00ff2e" d="M505.6,-204.38C537.67,-207.35 575.04,-210.8 604.13,-213.49"/>
 <polygon fill="#00ff2e" stroke="#00ff2e" points="604.17,-217 614.45,-214.44 604.81,-210.03 604.17,-217"/>
 </g>
-<!-- proc~cmp_xg&#45;&gt;proc~is_rational -->
+<!-- proc~cmp_xg~2&#45;&gt;proc~is_rational~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge25" class="edge">
-<title>proc~cmp_xg&#45;&gt;proc~is_rational</title>
+<title>proc~cmp_xg~2&#45;&gt;proc~is_rational~2</title>
 <path fill="none" stroke="#00ff2e" d="M505.66,-190.13C582.81,-181.35 707.7,-167.15 790.82,-157.69"/>
 <polygon fill="#00ff2e" stroke="#00ff2e" points="791.46,-161.14 801,-156.53 790.67,-154.19 791.46,-161.14"/>
 </g>
@@ -742,39 +742,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#00ffb9" d="M462.61,-138C501.06,-138 573.03,-138 616.62,-138"/>
 <polygon fill="#00ffb9" stroke="#00ffb9" points="616.79,-141.5 626.79,-138 616.79,-134.5 616.79,-141.5"/>
 </g>
-<!-- proc~cmp_degree -->
+<!-- proc~cmp_degree~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node18" class="node">
-<title>proc~cmp_degree</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node18"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
+<title>proc~cmp_degree~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node18"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="735.5,-348 572.5,-348 572.5,-324 735.5,-324 735.5,-348"/>
 <text text-anchor="middle" x="654" y="-333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_degree -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge28" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#002eff" d="M495.66,-336C516.18,-336 539.69,-336 562.16,-336"/>
 <polygon fill="#002eff" stroke="#002eff" points="562.4,-339.5 572.4,-336 562.4,-332.5 562.4,-339.5"/>
 </g>
-<!-- proc~cmp_nc -->
+<!-- proc~cmp_nc~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node19" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node19"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
+<title>proc~cmp_nc~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node19"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="723.5,-390 584.5,-390 584.5,-366 723.5,-366 723.5,-390"/>
 <text text-anchor="middle" x="654" y="-375.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge29" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#002eff" d="M495.66,-347.48C521.97,-352.58 553.2,-358.64 580.87,-364.01"/>
 <polygon fill="#002eff" stroke="#002eff" points="580.4,-367.48 590.89,-365.95 581.74,-360.61 580.4,-367.48"/>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge30" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
+<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#5c00ff" d="M495.66,-408.52C521.97,-403.42 553.2,-397.36 580.87,-391.99"/>
 <polygon fill="#5c00ff" stroke="#5c00ff" points="581.74,-395.39 590.89,-390.05 580.4,-388.52 581.74,-395.39"/>
 </g>
@@ -787,30 +787,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge31" class="edge">
-<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#5c00ff" d="M495.66,-420C521.64,-420 552.4,-420 579.8,-420"/>
 <polygon fill="#5c00ff" stroke="#5c00ff" points="580.12,-423.5 590.12,-420 580.12,-416.5 580.12,-423.5"/>
 </g>
-<!-- proc~set3&#45;&gt;proc~cmp_degree -->
+<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge32" class="edge">
-<title>proc~set3&#45;&gt;proc~cmp_degree</title>
+<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#e700ff" d="M495.66,-305.48C521.97,-310.58 553.2,-316.64 580.87,-322.01"/>
 <polygon fill="#e700ff" stroke="#e700ff" points="580.4,-325.48 590.89,-323.95 581.74,-318.61 580.4,-325.48"/>
 </g>
-<!-- proc~get_multiplicity -->
+<!-- proc~get_multiplicity~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node28" class="node">
-<title>proc~get_multiplicity</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
+<title>proc~get_multiplicity~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="966,-349 788,-349 788,-325 966,-325 966,-349"/>
 <text text-anchor="middle" x="877" y="-334.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
+<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge33" class="edge">
-<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
+<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
 <path fill="none" stroke="#ff0000" d="M735.72,-336.37C749.32,-336.43 763.56,-336.49 777.54,-336.55"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="777.65,-340.05 787.67,-336.6 777.68,-333.05 777.65,-340.05"/>
 </g>
@@ -823,9 +823,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge34" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#ffbf00" d="M723.75,-374.46C798.15,-370.63 916.22,-364.55 991.63,-360.67"/>
 <polygon fill="#ffbf00" stroke="#ffbf00" points="992.17,-364.15 1001.98,-360.14 991.81,-357.16 992.17,-364.15"/>
 </g>
@@ -844,42 +844,42 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#7fff00" d="M717.74,-420C756.54,-420 805.08,-420 838.1,-420"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="838.24,-423.5 848.24,-420 838.24,-416.5 838.24,-423.5"/>
 </g>
-<!-- proc~derivative2_scalar&#45;&gt;proc~is_rational -->
+<!-- proc~derivative2_scalar~2&#45;&gt;proc~is_rational~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge37" class="edge">
-<title>proc~derivative2_scalar&#45;&gt;proc~is_rational</title>
+<title>proc~derivative2_scalar~2&#45;&gt;proc~is_rational~2</title>
 <path fill="none" stroke="#00ff3f" d="M723.91,-66.06C733.49,-68.56 743.09,-71.52 752,-75 753.27,-75.5 810.55,-109.31 846.81,-130.74"/>
 <polygon fill="#00ff3f" stroke="#00ff3f" points="845.13,-133.81 855.52,-135.89 848.7,-127.79 845.13,-133.81"/>
 </g>
-<!-- interface~compute_d2tgc -->
+<!-- interface~compute_d2tgc~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_node26" class="node">
-<title>interface~compute_d2tgc</title>
-<g id="a_program~~nearest_point_3d~~CallsGraph_node26"><a xlink:href="../interface/compute_d2tgc.html" xlink:title="compute_d2Tgc">
+<title>interface~compute_d2tgc~2</title>
+<g id="a_program~~nearest_point_3d~~CallsGraph_node26"><a xlink:href="../interface/compute_d2tgc~2.html" xlink:title="compute_d2Tgc">
 <polygon fill="#a7506f" stroke="#a7506f" points="926,-87 828,-87 828,-63 926,-63 926,-87"/>
 <text text-anchor="middle" x="877" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_d2Tgc</text>
 </a>
 </g>
 </g>
-<!-- proc~derivative2_scalar&#45;&gt;interface~compute_d2tgc -->
+<!-- proc~derivative2_scalar~2&#45;&gt;interface~compute_d2tgc~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge36" class="edge">
-<title>proc~derivative2_scalar&#45;&gt;interface~compute_d2tgc</title>
+<title>proc~derivative2_scalar~2&#45;&gt;interface~compute_d2tgc~2</title>
 <path fill="none" stroke="#00ff3f" d="M751.61,-63.18C774.17,-65.32 797.51,-67.54 817.79,-69.47"/>
 <polygon fill="#00ff3f" stroke="#00ff3f" points="817.51,-72.96 827.79,-70.42 818.17,-65.99 817.51,-72.96"/>
 </g>
-<!-- proc~derivative2_vector&#45;&gt;interface~ndgrid -->
+<!-- proc~derivative2_vector~2&#45;&gt;interface~ndgrid -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge39" class="edge">
-<title>proc~derivative2_vector&#45;&gt;interface~ndgrid</title>
+<title>proc~derivative2_vector~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#00ffff" d="M734.87,-108.03C740.91,-110.5 746.7,-113.46 752,-117 775.37,-132.62 769.68,-147.68 788,-169 808.51,-192.86 835.16,-217.22 853.73,-233.33"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="851.53,-236.05 861.4,-239.9 856.09,-230.74 851.53,-236.05"/>
 </g>
-<!-- proc~derivative2_vector&#45;&gt;proc~is_rational -->
+<!-- proc~derivative2_vector~2&#45;&gt;proc~is_rational~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge40" class="edge">
-<title>proc~derivative2_vector&#45;&gt;proc~is_rational</title>
+<title>proc~derivative2_vector~2&#45;&gt;proc~is_rational~2</title>
 <path fill="none" stroke="#00ffff" d="M712,-108.02C725.16,-110.89 739.08,-113.99 752,-117 774.11,-122.16 798.35,-128.14 819.48,-133.47"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="818.72,-136.89 829.27,-135.95 820.44,-130.1 818.72,-136.89"/>
 </g>
-<!-- proc~derivative2_vector&#45;&gt;interface~compute_d2tgc -->
+<!-- proc~derivative2_vector~2&#45;&gt;interface~compute_d2tgc~2 -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge38" class="edge">
-<title>proc~derivative2_vector&#45;&gt;interface~compute_d2tgc</title>
+<title>proc~derivative2_vector~2&#45;&gt;interface~compute_d2tgc~2</title>
 <path fill="none" stroke="#00ffff" d="M752.26,-86.76C774.54,-84.64 797.56,-82.45 817.61,-80.55"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="818.18,-84.01 827.8,-79.58 817.51,-77.04 818.18,-84.01"/>
 </g>
@@ -913,9 +913,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M1126.33,-349C1134.69,-347.91 1143.35,-346.78 1151.92,-345.66"/>
 <polygon fill="#7fff00" stroke="#7fff00" points="1152.44,-349.12 1161.9,-344.36 1151.53,-342.18 1152.44,-349.12"/>
 </g>
-<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~nearest_point_3d~~CallsGraph_edge43" class="edge">
-<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ffff" d="M966.17,-346.53C974.77,-347.46 983.42,-348.4 991.82,-349.3"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="991.61,-352.8 1001.93,-350.4 992.36,-345.84 991.61,-352.8"/>
 </g>
@@ -1022,7 +1022,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc"></span>
+              <span class="anchor" id="variable-wc~45"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1038,7 +1038,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc"></span>
+              <span class="anchor" id="variable-xc~42"></span>
               real(kind=rk)
             </td>
             <td>
@@ -1054,7 +1054,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-id"></span>
+              <span class="anchor" id="variable-id~5"></span>
               integer
             </td>
             <td>
@@ -1070,7 +1070,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xg"></span>
+              <span class="anchor" id="variable-nearest_xg~7"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1086,7 +1086,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nearest_xt"></span>
+              <span class="anchor" id="variable-nearest_xt~7"></span>
               real(kind=rk),
             </td>
             <td>
@@ -1102,7 +1102,7 @@ <h2>Variables</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape"></span>
+              <span class="anchor" id="variable-shape~9"></span>
               type(<a href='../type/nurbs_volume.html'>nurbs_volume</a>)
             </td>
             <td>
@@ -1149,7 +1149,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/shape_c_1d.html b/program/shape_c_1d.html
index 1a78a6f60..38fcac5b1 100644
--- a/program/shape_c_1d.html
+++ b/program/shape_c_1d.html
@@ -115,7 +115,7 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/shape_c_1d.html#variable-shape~3">shape</a>
+            <a class="list-group-item" href="../program/shape_c_1d.html#variable-shape~19">shape</a>
         </div>
       </div>
     </div>
@@ -385,243 +385,243 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="76,-171 0,-171 0,-147 76,-147 76,-171"/>
 <text text-anchor="middle" x="38" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50">shape_C_1d</text>
 </g>
-<!-- proc~create~3 -->
+<!-- proc~create -->
 <g id="program~~shape_c_1d~~CallsGraph_node2" class="node">
-<title>proc~create~3</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node2"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_curve%create">
+<title>proc~create</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node2"><a xlink:href="../proc/create.html" xlink:title="nurbs_curve%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="243,-276 122,-276 122,-252 243,-252 243,-276"/>
 <text text-anchor="middle" x="182.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%create</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~create~3 -->
+<!-- program~shape_c_1d&#45;&gt;proc~create -->
 <g id="program~~shape_c_1d~~CallsGraph_edge1" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~create~3</title>
+<title>program~shape_c_1d&#45;&gt;proc~create</title>
 <path fill="none" stroke="#ff0000" d="M46.37,-171.21C58.04,-189.5 82.48,-223.89 112,-243 114.61,-244.69 117.37,-246.25 120.22,-247.69"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="119,-250.98 129.56,-251.89 121.87,-244.6 119,-250.98"/>
 </g>
-<!-- proc~export_xc~3 -->
+<!-- proc~export_xc -->
 <g id="program~~shape_c_1d~~CallsGraph_node3" class="node">
-<title>proc~export_xc~3</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node3"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_curve%export_Xc">
+<title>proc~export_xc</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node3"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_curve%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="252.5,-234 112.5,-234 112.5,-210 252.5,-210 252.5,-234"/>
 <text text-anchor="middle" x="182.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~export_xc~3 -->
+<!-- program~shape_c_1d&#45;&gt;proc~export_xc -->
 <g id="program~~shape_c_1d~~CallsGraph_edge2" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~export_xc~3</title>
+<title>program~shape_c_1d&#45;&gt;proc~export_xc</title>
 <path fill="none" stroke="#ff0000" d="M57.29,-171.1C71.7,-180.23 92.54,-192.59 112,-201 116.65,-203.01 121.56,-204.91 126.53,-206.68"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="125.5,-210.03 136.1,-209.92 127.75,-203.4 125.5,-210.03"/>
 </g>
-<!-- proc~export_xg~3 -->
+<!-- proc~export_xg -->
 <g id="program~~shape_c_1d~~CallsGraph_node4" class="node">
-<title>proc~export_xg~3</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node4"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_curve%export_Xg">
+<title>proc~export_xg</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node4"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_curve%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="253,-192 112,-192 112,-168 253,-168 253,-192"/>
 <text text-anchor="middle" x="182.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~export_xg~3 -->
+<!-- program~shape_c_1d&#45;&gt;proc~export_xg -->
 <g id="program~~shape_c_1d~~CallsGraph_edge3" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~export_xg~3</title>
+<title>program~shape_c_1d&#45;&gt;proc~export_xg</title>
 <path fill="none" stroke="#ff0000" d="M76.07,-164.46C84.04,-165.64 92.75,-166.92 101.65,-168.23"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="101.34,-171.72 111.74,-169.72 102.36,-164.8 101.34,-171.72"/>
 </g>
-<!-- proc~finalize~3 -->
+<!-- proc~finalize -->
 <g id="program~~shape_c_1d~~CallsGraph_node5" class="node">
-<title>proc~finalize~3</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node5"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_curve%finalize">
+<title>proc~finalize</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node5"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_curve%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="245.5,-150 119.5,-150 119.5,-126 245.5,-126 245.5,-150"/>
 <text text-anchor="middle" x="182.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~finalize~3 -->
+<!-- program~shape_c_1d&#45;&gt;proc~finalize -->
 <g id="program~~shape_c_1d~~CallsGraph_edge4" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~finalize~3</title>
+<title>program~shape_c_1d&#45;&gt;proc~finalize</title>
 <path fill="none" stroke="#ff0000" d="M76.07,-153.54C86.27,-152.03 97.7,-150.35 109.17,-148.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="109.85,-152.1 119.23,-147.18 108.83,-145.17 109.85,-152.1"/>
 </g>
-<!-- proc~set_c~3 -->
+<!-- proc~set_c -->
 <g id="program~~shape_c_1d~~CallsGraph_node6" class="node">
-<title>proc~set_c~3</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node6"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_curve%set_C">
+<title>proc~set_c</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node6"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_curve%set_C">
 <polygon fill="#d9534f" stroke="#d9534f" points="240.5,-108 124.5,-108 124.5,-84 240.5,-84 240.5,-108"/>
 <text text-anchor="middle" x="182.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set_C</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~set_c~3 -->
+<!-- program~shape_c_1d&#45;&gt;proc~set_c -->
 <g id="program~~shape_c_1d~~CallsGraph_edge5" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~set_c~3</title>
+<title>program~shape_c_1d&#45;&gt;proc~set_c</title>
 <path fill="none" stroke="#ff0000" d="M57.29,-146.9C71.7,-137.77 92.54,-125.41 112,-117 116.65,-114.99 121.56,-113.09 126.53,-111.32"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="127.75,-114.6 136.1,-108.08 125.5,-107.97 127.75,-114.6"/>
 </g>
-<!-- proc~show~3 -->
+<!-- proc~show -->
 <g id="program~~shape_c_1d~~CallsGraph_node7" class="node">
-<title>proc~show~3</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node7"><a xlink:href="../proc/show~3.html" xlink:title="nurbs_curve%show">
+<title>proc~show</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node7"><a xlink:href="../proc/show.html" xlink:title="nurbs_curve%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="240,-66 125,-66 125,-42 240,-42 240,-66"/>
 <text text-anchor="middle" x="182.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%show</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_1d&#45;&gt;proc~show~3 -->
+<!-- program~shape_c_1d&#45;&gt;proc~show -->
 <g id="program~~shape_c_1d~~CallsGraph_edge6" class="edge">
-<title>program~shape_c_1d&#45;&gt;proc~show~3</title>
+<title>program~shape_c_1d&#45;&gt;proc~show</title>
 <path fill="none" stroke="#ff0000" d="M46.37,-146.79C58.04,-128.5 82.48,-94.11 112,-75 114.61,-73.31 117.37,-71.75 120.22,-70.31"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="121.87,-73.4 129.56,-66.11 119,-67.02 121.87,-73.4"/>
 </g>
-<!-- interface~compute_xg~3 -->
+<!-- interface~compute_xg -->
 <g id="program~~shape_c_1d~~CallsGraph_node8" class="node">
-<title>interface~compute_xg~3</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
+<title>interface~compute_xg</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node8"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="419.5,-318 340.5,-318 340.5,-294 419.5,-294 419.5,-318"/>
 <text text-anchor="middle" x="380" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
+<!-- proc~create&#45;&gt;interface~compute_xg -->
 <g id="program~~shape_c_1d~~CallsGraph_edge7" class="edge">
-<title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
+<title>proc~create&#45;&gt;interface~compute_xg</title>
 <path fill="none" stroke="#ff0000" d="M239.52,-276.04C268.26,-282.21 302.93,-289.66 330.51,-295.58"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="329.81,-299.01 340.33,-297.69 331.28,-292.17 329.81,-299.01"/>
 </g>
-<!-- proc~is_rational~3 -->
+<!-- proc~is_rational -->
 <g id="program~~shape_c_1d~~CallsGraph_node12" class="node">
-<title>proc~is_rational~3</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node12"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
+<title>proc~is_rational</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node12"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="451,-276 309,-276 309,-252 451,-252 451,-276"/>
 <text text-anchor="middle" x="380" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
+<!-- proc~create&#45;&gt;proc~is_rational -->
 <g id="program~~shape_c_1d~~CallsGraph_edge8" class="edge">
-<title>proc~create~3&#45;&gt;proc~is_rational~3</title>
+<title>proc~create&#45;&gt;proc~is_rational</title>
 <path fill="none" stroke="#ff0000" d="M243.22,-264C260.65,-264 280,-264 298.49,-264"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="298.66,-267.5 308.66,-264 298.66,-260.5 298.66,-267.5"/>
 </g>
-<!-- proc~cmp_elem_xc_vis~3 -->
+<!-- proc~cmp_elem_xc_vis -->
 <g id="program~~shape_c_1d~~CallsGraph_node10" class="node">
-<title>proc~cmp_elem_xc_vis~3</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node10"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node10"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="470.5,-234 289.5,-234 289.5,-210 470.5,-210 470.5,-234"/>
 <text text-anchor="middle" x="380" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
+<!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
 <g id="program~~shape_c_1d~~CallsGraph_edge9" class="edge">
-<title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
+<title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
 <path fill="none" stroke="#ffff00" d="M252.7,-222C261.32,-222 270.26,-222 279.23,-222"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="279.35,-225.5 289.35,-222 279.35,-218.5 279.35,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~3 -->
+<!-- proc~cmp_elem_xg_vis -->
 <g id="program~~shape_c_1d~~CallsGraph_node11" class="node">
-<title>proc~cmp_elem_xg_vis~3</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="471,-192 289,-192 289,-168 471,-168 471,-192"/>
 <text text-anchor="middle" x="380" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
+<!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
 <g id="program~~shape_c_1d~~CallsGraph_edge10" class="edge">
-<title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
+<title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
 <path fill="none" stroke="#00ff00" d="M253.25,-180C261.53,-180 270.1,-180 278.69,-180"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="278.78,-183.5 288.78,-180 278.78,-176.5 278.78,-183.5"/>
 </g>
-<!-- none~set~3 -->
+<!-- none~set -->
 <g id="program~~shape_c_1d~~CallsGraph_node9" class="node">
-<title>none~set~3</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node9"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
+<title>none~set</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node9"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="431.5,-108 328.5,-108 328.5,-84 431.5,-84 431.5,-108"/>
 <text text-anchor="middle" x="380" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c~3&#45;&gt;none~set~3 -->
+<!-- proc~set_c&#45;&gt;none~set -->
 <g id="program~~shape_c_1d~~CallsGraph_edge11" class="edge">
-<title>proc~set_c~3&#45;&gt;none~set~3</title>
+<title>proc~set_c&#45;&gt;none~set</title>
 <path fill="none" stroke="#0000ff" d="M240.57,-96C264.94,-96 293.41,-96 318.18,-96"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="318.18,-99.5 328.18,-96 318.18,-92.5 318.18,-99.5"/>
 </g>
-<!-- proc~set1a -->
+<!-- proc~set1 -->
 <g id="program~~shape_c_1d~~CallsGraph_node14" class="node">
-<title>proc~set1a</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node14"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="624,-192 507,-192 507,-168 624,-168 624,-192"/>
-<text text-anchor="middle" x="565.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+<title>proc~set1</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node14"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="620.5,-192 510.5,-192 510.5,-168 620.5,-168 620.5,-192"/>
+<text text-anchor="middle" x="565.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
+<!-- none~set&#45;&gt;proc~set1 -->
 <g id="program~~shape_c_1d~~CallsGraph_edge12" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
+<title>none~set&#45;&gt;proc~set1</title>
 <path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M403.4,-108.17C428.31,-121.47 469.94,-143.03 507,-159 511.18,-160.8 515.56,-162.58 519.97,-164.31"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="519,-167.68 529.59,-167.97 521.49,-161.14 519,-167.68"/>
 </g>
-<!-- proc~set1~3 -->
+<!-- proc~set1a -->
 <g id="program~~shape_c_1d~~CallsGraph_node15" class="node">
-<title>proc~set1~3</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node15"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="620.5,-150 510.5,-150 510.5,-126 620.5,-126 620.5,-150"/>
-<text text-anchor="middle" x="565.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<title>proc~set1a</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node15"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="624,-150 507,-150 507,-126 624,-126 624,-150"/>
+<text text-anchor="middle" x="565.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1~3 -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="program~~shape_c_1d~~CallsGraph_edge13" class="edge">
-<title>none~set~3&#45;&gt;proc~set1~3</title>
+<title>none~set&#45;&gt;proc~set1a</title>
 <path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M431.63,-107.59C453.34,-112.56 478.94,-118.42 501.83,-123.66"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="501.27,-127.12 511.8,-125.94 502.83,-120.29 501.27,-127.12"/>
 </g>
-<!-- proc~set2~3 -->
+<!-- proc~set2 -->
 <g id="program~~shape_c_1d~~CallsGraph_node16" class="node">
-<title>proc~set2~3</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node16"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
+<title>proc~set2</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node16"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="620.5,-66 510.5,-66 510.5,-42 620.5,-42 620.5,-66"/>
 <text text-anchor="middle" x="565.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set2~3 -->
+<!-- none~set&#45;&gt;proc~set2 -->
 <g id="program~~shape_c_1d~~CallsGraph_edge14" class="edge">
-<title>none~set~3&#45;&gt;proc~set2~3</title>
+<title>none~set&#45;&gt;proc~set2</title>
 <path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M431.63,-84.41C453.34,-79.44 478.94,-73.58 501.83,-68.34"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="502.83,-71.71 511.8,-66.06 501.27,-64.88 502.83,-71.71"/>
 </g>
-<!-- proc~set3~3 -->
+<!-- proc~set3 -->
 <g id="program~~shape_c_1d~~CallsGraph_node17" class="node">
-<title>proc~set3~3</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node17"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
+<title>proc~set3</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node17"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="620.5,-108 510.5,-108 510.5,-84 620.5,-84 620.5,-108"/>
 <text text-anchor="middle" x="565.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set3~3 -->
+<!-- none~set&#45;&gt;proc~set3 -->
 <g id="program~~shape_c_1d~~CallsGraph_edge15" class="edge">
-<title>none~set~3&#45;&gt;proc~set3~3</title>
+<title>none~set&#45;&gt;proc~set3</title>
 <path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M431.63,-96C452.79,-96 477.62,-96 500.06,-96"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="500.18,-99.5 510.18,-96 500.18,-92.5 500.18,-99.5"/>
 </g>
-<!-- proc~set4~3 -->
+<!-- proc~set4 -->
 <g id="program~~shape_c_1d~~CallsGraph_node18" class="node">
-<title>proc~set4~3</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node18"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
+<title>proc~set4</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node18"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="620.5,-24 510.5,-24 510.5,0 620.5,0 620.5,-24"/>
 <text text-anchor="middle" x="565.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set4~3 -->
+<!-- none~set&#45;&gt;proc~set4 -->
 <g id="program~~shape_c_1d~~CallsGraph_edge16" class="edge">
-<title>none~set~3&#45;&gt;proc~set4~3</title>
+<title>none~set&#45;&gt;proc~set4</title>
 <path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M403.4,-83.83C428.31,-70.53 469.94,-48.97 507,-33 511.18,-31.2 515.56,-29.42 519.97,-27.69"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="521.49,-30.86 529.59,-24.03 519,-24.32 521.49,-30.86"/>
 </g>
@@ -634,15 +634,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_c_1d~~CallsGraph_edge17" class="edge">
-<title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#00ff66" d="M470.6,-222C484.67,-222 498.81,-222 511.69,-222"/>
 <polygon fill="#00ff66" stroke="#00ff66" points="511.72,-225.5 521.72,-222 511.72,-218.5 511.72,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_c_1d~~CallsGraph_edge18" class="edge">
-<title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#0066ff" d="M433.58,-192.04C458.16,-197.66 487.35,-204.34 511.92,-209.97"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="511.26,-213.4 521.79,-212.22 512.82,-206.58 511.26,-213.4"/>
 </g>
@@ -691,26 +691,26 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M609.27,-211.4C630.03,-206.26 655.29,-200 677.77,-194.43"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="678.68,-197.81 687.55,-192.01 677,-191.01 678.68,-197.81"/>
 </g>
-<!-- proc~cmp_degree~3 -->
+<!-- proc~cmp_degree -->
 <g id="program~~shape_c_1d~~CallsGraph_node19" class="node">
-<title>proc~cmp_degree~3</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node19"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
+<title>proc~cmp_degree</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node19"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="814,-150 660,-150 660,-126 814,-126 814,-150"/>
 <text text-anchor="middle" x="737" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1&#45;&gt;proc~cmp_degree -->
 <g id="program~~shape_c_1d~~CallsGraph_edge22" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
+<title>proc~set1&#45;&gt;proc~cmp_degree</title>
 <path fill="none" stroke="#ffff00" d="M615.07,-167.96C634.58,-163.13 657.23,-157.52 677.62,-152.47"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="678.56,-155.84 687.42,-150.04 676.87,-149.05 678.56,-155.84"/>
 </g>
-<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
 <g id="program~~shape_c_1d~~CallsGraph_edge23" class="edge">
-<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#00ff00" d="M620.6,-138C629.87,-138 639.72,-138 649.59,-138"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="649.86,-141.5 659.86,-138 649.86,-134.5 649.86,-141.5"/>
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#00ff00" d="M624.36,-138C632.56,-138 641.14,-138 649.74,-138"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="649.82,-141.5 659.82,-138 649.82,-134.5 649.82,-141.5"/>
 </g>
 <!-- proc~compute_knot_vector -->
 <g id="program~~shape_c_1d~~CallsGraph_node23" class="node">
@@ -721,30 +721,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~shape_c_1d~~CallsGraph_edge24" class="edge">
-<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#00ffff" d="M620.6,-54C634.08,-54 648.77,-54 663,-54"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="663.26,-57.5 673.26,-54 663.26,-50.5 663.26,-57.5"/>
 </g>
-<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set3&#45;&gt;proc~cmp_degree -->
 <g id="program~~shape_c_1d~~CallsGraph_edge25" class="edge">
-<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
+<title>proc~set3&#45;&gt;proc~cmp_degree</title>
 <path fill="none" stroke="#0000ff" d="M615.07,-108.04C634.58,-112.87 657.23,-118.48 677.62,-123.53"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="676.87,-126.95 687.42,-125.96 678.56,-120.16 676.87,-126.95"/>
 </g>
-<!-- proc~get_multiplicity~3 -->
+<!-- proc~get_multiplicity -->
 <g id="program~~shape_c_1d~~CallsGraph_node24" class="node">
-<title>proc~get_multiplicity~3</title>
-<g id="a_program~~shape_c_1d~~CallsGraph_node24"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
+<title>proc~get_multiplicity</title>
+<g id="a_program~~shape_c_1d~~CallsGraph_node24"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1019,-150 850,-150 850,-126 1019,-126 1019,-150"/>
 <text text-anchor="middle" x="934.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
+<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="program~~shape_c_1d~~CallsGraph_edge26" class="edge">
-<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
+<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
 <path fill="none" stroke="#ff0000" d="M814.15,-138C822.54,-138 831.17,-138 839.75,-138"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="839.79,-141.5 849.79,-138 839.79,-134.5 839.79,-141.5"/>
 </g>
@@ -772,9 +772,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_c_1d~~CallsGraph_edge28" class="edge">
-<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#ff0000" d="M1019.15,-138C1027.73,-138 1036.4,-138 1044.84,-138"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1044.99,-141.5 1054.99,-138 1044.99,-134.5 1044.99,-141.5"/>
 </g>
@@ -911,7 +911,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~3"></span>
+              <span class="anchor" id="variable-shape~19"></span>
               type(<a href='../type/nurbs_curve.html'>nurbs_curve</a>)
             </td>
             <td>
@@ -958,7 +958,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/shape_c_2d.html b/program/shape_c_2d.html
index 35abce81f..775c83e50 100644
--- a/program/shape_c_2d.html
+++ b/program/shape_c_2d.html
@@ -115,7 +115,7 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/shape_c_2d.html#variable-shape~16">shape</a>
+            <a class="list-group-item" href="../program/shape_c_2d.html#variable-shape~14">shape</a>
         </div>
       </div>
     </div>
@@ -385,108 +385,108 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="76,-171 0,-171 0,-147 76,-147 76,-171"/>
 <text text-anchor="middle" x="38" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50">shape_C_2d</text>
 </g>
-<!-- proc~create~2 -->
+<!-- proc~create~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node2" class="node">
-<title>proc~create~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node2"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
+<title>proc~create~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node2"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="253,-297 122,-297 122,-273 253,-273 253,-297"/>
 <text text-anchor="middle" x="187.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~create~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~create~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge1" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~create~2</title>
+<title>program~shape_c_2d&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#ff0000" d="M47.36,-171C59.91,-188.42 85.05,-221.01 112,-243 123.76,-252.59 138,-261.22 150.87,-268.12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="149.46,-271.33 159.94,-272.83 152.68,-265.12 149.46,-271.33"/>
 </g>
-<!-- proc~export_xc~2 -->
+<!-- proc~export_xc~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node3" class="node">
-<title>proc~export_xc~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node3"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_surface%export_Xc">
+<title>proc~export_xc~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node3"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_surface%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="262.5,-234 112.5,-234 112.5,-210 262.5,-210 262.5,-234"/>
 <text text-anchor="middle" x="187.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~export_xc~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~export_xc~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge2" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~export_xc~2</title>
+<title>program~shape_c_2d&#45;&gt;proc~export_xc~3</title>
 <path fill="none" stroke="#ff0000" d="M56.95,-171.01C71.35,-180.22 92.32,-192.72 112,-201 116.95,-203.09 122.18,-205.03 127.47,-206.83"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="126.43,-210.17 137.02,-209.91 128.57,-203.51 126.43,-210.17"/>
 </g>
-<!-- proc~export_xg~2 -->
+<!-- proc~export_xg~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node4" class="node">
-<title>proc~export_xg~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node4"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_surface%export_Xg">
+<title>proc~export_xg~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node4"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_surface%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="263,-192 112,-192 112,-168 263,-168 263,-192"/>
 <text text-anchor="middle" x="187.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~export_xg~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~export_xg~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge3" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~export_xg~2</title>
+<title>program~shape_c_2d&#45;&gt;proc~export_xg~3</title>
 <path fill="none" stroke="#ff0000" d="M76.22,-164.3C84.16,-165.43 92.85,-166.67 101.76,-167.94"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="101.49,-171.43 111.89,-169.38 102.48,-164.5 101.49,-171.43"/>
 </g>
-<!-- proc~finalize~2 -->
+<!-- proc~finalize~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node5" class="node">
-<title>proc~finalize~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node5"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_surface%finalize">
+<title>proc~finalize~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node5"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_surface%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="255.5,-150 119.5,-150 119.5,-126 255.5,-126 255.5,-150"/>
 <text text-anchor="middle" x="187.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~finalize~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~finalize~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge4" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~finalize~2</title>
+<title>program~shape_c_2d&#45;&gt;proc~finalize~3</title>
 <path fill="none" stroke="#ff0000" d="M76.22,-153.7C86.39,-152.25 97.79,-150.63 109.31,-148.99"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="110.02,-152.42 119.43,-147.55 109.03,-145.49 110.02,-152.42"/>
 </g>
-<!-- proc~set_c~2 -->
+<!-- proc~set_c~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node6" class="node">
-<title>proc~set_c~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node6"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_surface%set_C">
+<title>proc~set_c~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node6"><a xlink:href="../proc/set_c~3.html" xlink:title="nurbs_surface%set_C">
 <polygon fill="#d9534f" stroke="#d9534f" points="250.5,-108 124.5,-108 124.5,-84 250.5,-84 250.5,-108"/>
 <text text-anchor="middle" x="187.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set_C</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~set_c~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~set_c~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge5" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~set_c~2</title>
+<title>program~shape_c_2d&#45;&gt;proc~set_c~3</title>
 <path fill="none" stroke="#ff0000" d="M56.95,-146.99C71.35,-137.78 92.32,-125.28 112,-117 116.95,-114.91 122.18,-112.97 127.47,-111.17"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="128.57,-114.49 137.02,-108.09 126.43,-107.83 128.57,-114.49"/>
 </g>
-<!-- proc~show~2 -->
+<!-- proc~show~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node7" class="node">
-<title>proc~show~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node7"><a xlink:href="../proc/show~2.html" xlink:title="nurbs_surface%show">
+<title>proc~show~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node7"><a xlink:href="../proc/show~3.html" xlink:title="nurbs_surface%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="249.5,-66 125.5,-66 125.5,-42 249.5,-42 249.5,-66"/>
 <text text-anchor="middle" x="187.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%show</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_2d&#45;&gt;proc~show~2 -->
+<!-- program~shape_c_2d&#45;&gt;proc~show~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge6" class="edge">
-<title>program~shape_c_2d&#45;&gt;proc~show~2</title>
+<title>program~shape_c_2d&#45;&gt;proc~show~3</title>
 <path fill="none" stroke="#ff0000" d="M46.33,-146.72C57.93,-128.34 82.3,-93.83 112,-75 114.78,-73.24 117.71,-71.62 120.74,-70.13"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="122.29,-73.28 130.05,-66.07 119.49,-66.86 122.29,-73.28"/>
 </g>
-<!-- interface~compute_xg~2 -->
+<!-- interface~compute_xg~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node8" class="node">
-<title>interface~compute_xg~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="434.5,-360 355.5,-360 355.5,-336 434.5,-336 434.5,-360"/>
 <text text-anchor="middle" x="395" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
+<!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge7" class="edge">
-<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
+<title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
 <path fill="none" stroke="#ff0000" d="M216.73,-297.04C238.82,-306.14 270.49,-318.48 299,-327 313.86,-331.44 330.28,-335.4 345.23,-338.65"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="344.8,-342.13 355.31,-340.78 346.25,-335.28 344.8,-342.13"/>
 </g>
@@ -499,69 +499,69 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~ndgrid -->
+<!-- proc~create~3&#45;&gt;interface~ndgrid -->
 <g id="program~~shape_c_2d~~CallsGraph_edge8" class="edge">
-<title>proc~create~2&#45;&gt;interface~ndgrid</title>
+<title>proc~create~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M253.24,-291.62C287.71,-295.14 328.83,-299.34 357.7,-302.29"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="357.44,-305.78 367.74,-303.32 358.15,-298.82 357.44,-305.78"/>
 </g>
-<!-- proc~is_rational~2 -->
+<!-- proc~is_rational~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node13" class="node">
-<title>proc~is_rational~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node13"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<title>proc~is_rational~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node13"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="471,-276 319,-276 319,-252 471,-252 471,-276"/>
 <text text-anchor="middle" x="395" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge9" class="edge">
-<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~create~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#ff0000" d="M253.24,-278.38C270.81,-276.59 290.11,-274.62 308.63,-272.72"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="309.23,-276.18 318.82,-271.68 308.52,-269.22 309.23,-276.18"/>
 </g>
-<!-- proc~cmp_elem_xc_vis~2 -->
+<!-- proc~cmp_elem_xc_vis~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node11" class="node">
-<title>proc~cmp_elem_xc_vis~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="490.5,-234 299.5,-234 299.5,-210 490.5,-210 490.5,-234"/>
 <text text-anchor="middle" x="395" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
+<!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge10" class="edge">
-<title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
+<title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
 <path fill="none" stroke="#ffff00" d="M262.69,-222C271.29,-222 280.19,-222 289.1,-222"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="289.16,-225.5 299.16,-222 289.16,-218.5 289.16,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~2 -->
+<!-- proc~cmp_elem_xg_vis~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node12" class="node">
-<title>proc~cmp_elem_xg_vis~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="491,-192 299,-192 299,-168 491,-168 491,-192"/>
 <text text-anchor="middle" x="395" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
+<!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge11" class="edge">
-<title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
+<title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
 <path fill="none" stroke="#00ff00" d="M263.27,-180C271.6,-180 280.2,-180 288.82,-180"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="288.93,-183.5 298.93,-180 288.93,-176.5 288.93,-183.5"/>
 </g>
-<!-- none~set~2 -->
+<!-- none~set~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node10" class="node">
-<title>none~set~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node10"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<title>none~set~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node10"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="451.5,-108 338.5,-108 338.5,-84 451.5,-84 451.5,-108"/>
 <text text-anchor="middle" x="395" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c~2&#45;&gt;none~set~2 -->
+<!-- proc~set_c~3&#45;&gt;none~set~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge12" class="edge">
-<title>proc~set_c~2&#45;&gt;none~set~2</title>
+<title>proc~set_c~3&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#0000ff" d="M250.71,-96C275.22,-96 303.38,-96 328.22,-96"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="328.28,-99.5 338.28,-96 328.28,-92.5 328.28,-99.5"/>
 </g>
@@ -595,63 +595,63 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M422.02,-303.12C455.19,-299.46 512.69,-293.1 550.03,-288.98"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="550.43,-292.45 559.99,-287.87 549.67,-285.49 550.43,-292.45"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node17" class="node">
-<title>proc~set1~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node17"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<title>proc~set1~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node17"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="647,-108 527,-108 527,-84 647,-84 647,-108"/>
 <text text-anchor="middle" x="587" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge15" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M451.72,-96C472.14,-96 495.5,-96 516.94,-96"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="516.97,-99.5 526.97,-96 516.97,-92.5 516.97,-99.5"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node18" class="node">
-<title>proc~set2~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node18"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<title>proc~set2~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node18"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="647,-66 527,-66 527,-42 647,-42 647,-66"/>
 <text text-anchor="middle" x="587" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge16" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M450.45,-83.96C472.61,-79.07 498.39,-73.37 521.49,-68.26"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="522.54,-71.61 531.55,-66.04 521.03,-64.78 522.54,-71.61"/>
 </g>
-<!-- proc~set3~2 -->
+<!-- proc~set3~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node19" class="node">
-<title>proc~set3~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node19"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<title>proc~set3~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node19"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="647,-150 527,-150 527,-126 647,-126 647,-150"/>
 <text text-anchor="middle" x="587" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge17" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
+<title>none~set~3&#45;&gt;proc~set3~3</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M450.45,-108.04C472.61,-112.93 498.39,-118.63 521.49,-123.74"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="521.03,-127.22 531.55,-125.96 522.54,-120.39 521.03,-127.22"/>
 </g>
-<!-- proc~set4~2 -->
+<!-- proc~set4~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node20" class="node">
-<title>proc~set4~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node20"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<title>proc~set4~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node20"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="647,-24 527,-24 527,0 647,0 647,-24"/>
 <text text-anchor="middle" x="587" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set4~2 -->
+<!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge18" class="edge">
-<title>none~set~2&#45;&gt;proc~set4~2</title>
+<title>none~set~3&#45;&gt;proc~set4~3</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M419.32,-83.85C445.26,-70.57 488.57,-49.03 527,-33 531.41,-31.16 536.04,-29.34 540.69,-27.57"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="542.03,-30.81 550.2,-24.05 539.61,-24.24 542.03,-30.81"/>
 </g>
@@ -664,15 +664,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge19" class="edge">
-<title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#00ffff" d="M490.72,-222C505.24,-222 519.78,-222 532.96,-222"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="533.22,-225.5 543.22,-222 533.22,-218.5 533.22,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge20" class="edge">
-<title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#0000ff" d="M450.45,-192.04C476.49,-197.79 507.53,-204.65 533.34,-210.36"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="532.8,-213.82 543.31,-212.56 534.31,-206.99 532.8,-213.82"/>
 </g>
@@ -721,39 +721,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M630.93,-211.73C652.69,-206.52 679.46,-200.11 703.24,-194.42"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="704.32,-197.76 713.23,-192.03 702.69,-190.95 704.32,-197.76"/>
 </g>
-<!-- proc~cmp_degree~2 -->
+<!-- proc~cmp_degree~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node21" class="node">
-<title>proc~cmp_degree~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node21"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<title>proc~cmp_degree~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node21"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="846,-150 683,-150 683,-126 846,-126 846,-150"/>
 <text text-anchor="middle" x="764.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge24" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#00ff91" d="M638.29,-108.04C658.58,-112.89 682.15,-118.53 703.34,-123.6"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="702.66,-127.04 713.2,-125.96 704.29,-120.23 702.66,-127.04"/>
 </g>
-<!-- proc~cmp_nc~2 -->
+<!-- proc~cmp_nc~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node25" class="node">
-<title>proc~cmp_nc~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node25"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<title>proc~cmp_nc~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node25"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="834,-108 695,-108 695,-84 834,-84 834,-108"/>
 <text text-anchor="middle" x="764.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge25" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#00ff91" d="M647.42,-96C659.3,-96 671.97,-96 684.4,-96"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="684.76,-99.5 694.76,-96 684.76,-92.5 684.76,-99.5"/>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge26" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#0091ff" d="M638.29,-66.04C658.58,-70.89 682.15,-76.53 703.34,-81.6"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="702.66,-85.04 713.2,-83.96 704.29,-78.23 702.66,-85.04"/>
 </g>
@@ -766,30 +766,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~shape_c_2d~~CallsGraph_edge27" class="edge">
-<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#0091ff" d="M647.42,-54C661.26,-54 676.16,-54 690.51,-54"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="690.85,-57.5 700.85,-54 690.85,-50.5 690.85,-57.5"/>
 </g>
-<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge28" class="edge">
-<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#4800ff" d="M647.42,-138C655.64,-138 664.23,-138 672.86,-138"/>
 <polygon fill="#4800ff" stroke="#4800ff" points="672.98,-141.5 682.98,-138 672.98,-134.5 672.98,-141.5"/>
 </g>
-<!-- proc~get_multiplicity~2 -->
+<!-- proc~get_multiplicity~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_node28" class="node">
-<title>proc~get_multiplicity~2</title>
-<g id="a_program~~shape_c_2d~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<title>proc~get_multiplicity~3</title>
+<g id="a_program~~shape_c_2d~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1060,-149 882,-149 882,-125 1060,-125 1060,-149"/>
 <text text-anchor="middle" x="971" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="program~~shape_c_2d~~CallsGraph_edge29" class="edge">
-<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#ff0000" d="M846.03,-137.61C854.47,-137.56 863.11,-137.52 871.71,-137.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="871.8,-140.98 881.78,-137.43 871.76,-133.98 871.8,-140.98"/>
 </g>
@@ -802,9 +802,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_c_2d~~CallsGraph_edge30" class="edge">
-<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0000ff" d="M834.14,-99.68C904.69,-103.47 1014.03,-109.33 1085.57,-113.17"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="1085.67,-116.68 1095.85,-113.72 1086.05,-109.69 1085.67,-116.68"/>
 </g>
@@ -853,9 +853,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1220.33,-109C1228.69,-107.91 1237.35,-106.78 1245.92,-105.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1246.44,-109.12 1255.9,-104.36 1245.53,-102.18 1246.44,-109.12"/>
 </g>
-<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_c_2d~~CallsGraph_edge34" class="edge">
-<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M1060.17,-127.47C1068.77,-126.54 1077.42,-125.6 1085.82,-124.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1086.36,-128.16 1095.93,-123.6 1085.61,-121.2 1086.36,-128.16"/>
 </g>
@@ -962,7 +962,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~16"></span>
+              <span class="anchor" id="variable-shape~14"></span>
               type(<a href='../type/nurbs_surface.html'>nurbs_surface</a>)
             </td>
             <td>
@@ -1009,7 +1009,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/shape_c_3d.html b/program/shape_c_3d.html
index df741394a..c630f3f59 100644
--- a/program/shape_c_3d.html
+++ b/program/shape_c_3d.html
@@ -115,7 +115,7 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/shape_c_3d.html#variable-shape~19">shape</a>
+            <a class="list-group-item" href="../program/shape_c_3d.html#variable-shape~12">shape</a>
         </div>
       </div>
     </div>
@@ -385,108 +385,108 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="76,-171 0,-171 0,-147 76,-147 76,-171"/>
 <text text-anchor="middle" x="38" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50">shape_C_3d</text>
 </g>
-<!-- proc~create -->
+<!-- proc~create~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node2" class="node">
-<title>proc~create</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node2"><a xlink:href="../proc/create.html" xlink:title="nurbs_volume%create">
+<title>proc~create~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node2"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_volume%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="253,-297 122,-297 122,-273 253,-273 253,-297"/>
 <text text-anchor="middle" x="187.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~create -->
+<!-- program~shape_c_3d&#45;&gt;proc~create~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge1" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~create</title>
+<title>program~shape_c_3d&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#ff0000" d="M47.36,-171C59.91,-188.42 85.05,-221.01 112,-243 123.76,-252.59 138,-261.22 150.87,-268.12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="149.46,-271.33 159.94,-272.83 152.68,-265.12 149.46,-271.33"/>
 </g>
-<!-- proc~export_xc -->
+<!-- proc~export_xc~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node3" class="node">
-<title>proc~export_xc</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node3"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_volume%export_Xc">
+<title>proc~export_xc~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node3"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_volume%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="262.5,-234 112.5,-234 112.5,-210 262.5,-210 262.5,-234"/>
 <text text-anchor="middle" x="187.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~export_xc -->
+<!-- program~shape_c_3d&#45;&gt;proc~export_xc~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge2" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~export_xc</title>
+<title>program~shape_c_3d&#45;&gt;proc~export_xc~2</title>
 <path fill="none" stroke="#ff0000" d="M56.95,-171.01C71.35,-180.22 92.32,-192.72 112,-201 116.95,-203.09 122.18,-205.03 127.47,-206.83"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="126.43,-210.17 137.02,-209.91 128.57,-203.51 126.43,-210.17"/>
 </g>
-<!-- proc~export_xg -->
+<!-- proc~export_xg~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node4" class="node">
-<title>proc~export_xg</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node4"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_volume%export_Xg">
+<title>proc~export_xg~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node4"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_volume%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="263,-192 112,-192 112,-168 263,-168 263,-192"/>
 <text text-anchor="middle" x="187.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~export_xg -->
+<!-- program~shape_c_3d&#45;&gt;proc~export_xg~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge3" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~export_xg</title>
+<title>program~shape_c_3d&#45;&gt;proc~export_xg~2</title>
 <path fill="none" stroke="#ff0000" d="M76.22,-164.3C84.16,-165.43 92.85,-166.67 101.76,-167.94"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="101.49,-171.43 111.89,-169.38 102.48,-164.5 101.49,-171.43"/>
 </g>
-<!-- proc~finalize -->
+<!-- proc~finalize~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node5" class="node">
-<title>proc~finalize</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node5"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_volume%finalize">
+<title>proc~finalize~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node5"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_volume%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="255.5,-150 119.5,-150 119.5,-126 255.5,-126 255.5,-150"/>
 <text text-anchor="middle" x="187.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~finalize -->
+<!-- program~shape_c_3d&#45;&gt;proc~finalize~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge4" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~finalize</title>
+<title>program~shape_c_3d&#45;&gt;proc~finalize~2</title>
 <path fill="none" stroke="#ff0000" d="M76.22,-153.7C86.39,-152.25 97.79,-150.63 109.31,-148.99"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="110.02,-152.42 119.43,-147.55 109.03,-145.49 110.02,-152.42"/>
 </g>
-<!-- proc~set_c -->
+<!-- proc~set_c~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node6" class="node">
-<title>proc~set_c</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node6"><a xlink:href="../proc/set_c.html" xlink:title="nurbs_volume%set_C">
+<title>proc~set_c~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node6"><a xlink:href="../proc/set_c~2.html" xlink:title="nurbs_volume%set_C">
 <polygon fill="#d9534f" stroke="#d9534f" points="250.5,-108 124.5,-108 124.5,-84 250.5,-84 250.5,-108"/>
 <text text-anchor="middle" x="187.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set_C</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~set_c -->
+<!-- program~shape_c_3d&#45;&gt;proc~set_c~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge5" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~set_c</title>
+<title>program~shape_c_3d&#45;&gt;proc~set_c~2</title>
 <path fill="none" stroke="#ff0000" d="M56.95,-146.99C71.35,-137.78 92.32,-125.28 112,-117 116.95,-114.91 122.18,-112.97 127.47,-111.17"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="128.57,-114.49 137.02,-108.09 126.43,-107.83 128.57,-114.49"/>
 </g>
-<!-- proc~show -->
+<!-- proc~show~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node7" class="node">
-<title>proc~show</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node7"><a xlink:href="../proc/show.html" xlink:title="nurbs_volume%show">
+<title>proc~show~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node7"><a xlink:href="../proc/show~2.html" xlink:title="nurbs_volume%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="249.5,-66 125.5,-66 125.5,-42 249.5,-42 249.5,-66"/>
 <text text-anchor="middle" x="187.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%show</text>
 </a>
 </g>
 </g>
-<!-- program~shape_c_3d&#45;&gt;proc~show -->
+<!-- program~shape_c_3d&#45;&gt;proc~show~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge6" class="edge">
-<title>program~shape_c_3d&#45;&gt;proc~show</title>
+<title>program~shape_c_3d&#45;&gt;proc~show~2</title>
 <path fill="none" stroke="#ff0000" d="M46.33,-146.72C57.93,-128.34 82.3,-93.83 112,-75 114.78,-73.24 117.71,-71.62 120.74,-70.13"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="122.29,-73.28 130.05,-66.07 119.49,-66.86 122.29,-73.28"/>
 </g>
-<!-- interface~compute_xg -->
+<!-- interface~compute_xg~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node8" class="node">
-<title>interface~compute_xg</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node8"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="434.5,-360 355.5,-360 355.5,-336 434.5,-336 434.5,-360"/>
 <text text-anchor="middle" x="395" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;interface~compute_xg -->
+<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge7" class="edge">
-<title>proc~create&#45;&gt;interface~compute_xg</title>
+<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
 <path fill="none" stroke="#ff0000" d="M216.73,-297.04C238.82,-306.14 270.49,-318.48 299,-327 313.86,-331.44 330.28,-335.4 345.23,-338.65"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="344.8,-342.13 355.31,-340.78 346.25,-335.28 344.8,-342.13"/>
 </g>
@@ -499,69 +499,69 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;interface~ndgrid -->
+<!-- proc~create~2&#45;&gt;interface~ndgrid -->
 <g id="program~~shape_c_3d~~CallsGraph_edge8" class="edge">
-<title>proc~create&#45;&gt;interface~ndgrid</title>
+<title>proc~create~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M253.24,-291.62C287.71,-295.14 328.83,-299.34 357.7,-302.29"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="357.44,-305.78 367.74,-303.32 358.15,-298.82 357.44,-305.78"/>
 </g>
-<!-- proc~is_rational -->
+<!-- proc~is_rational~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node13" class="node">
-<title>proc~is_rational</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node13"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
+<title>proc~is_rational~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node13"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="471,-276 319,-276 319,-252 471,-252 471,-276"/>
 <text text-anchor="middle" x="395" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;proc~is_rational -->
+<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge9" class="edge">
-<title>proc~create&#45;&gt;proc~is_rational</title>
+<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
 <path fill="none" stroke="#ff0000" d="M253.24,-278.38C270.81,-276.59 290.11,-274.62 308.63,-272.72"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="309.23,-276.18 318.82,-271.68 308.52,-269.22 309.23,-276.18"/>
 </g>
-<!-- proc~cmp_elem_xc_vis -->
+<!-- proc~cmp_elem_xc_vis~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node11" class="node">
-<title>proc~cmp_elem_xc_vis</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="490.5,-234 299.5,-234 299.5,-210 490.5,-210 490.5,-234"/>
 <text text-anchor="middle" x="395" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
+<!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge10" class="edge">
-<title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
+<title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
 <path fill="none" stroke="#ffff00" d="M262.69,-222C271.29,-222 280.19,-222 289.1,-222"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="289.16,-225.5 299.16,-222 289.16,-218.5 289.16,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis -->
+<!-- proc~cmp_elem_xg_vis~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node12" class="node">
-<title>proc~cmp_elem_xg_vis</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="491,-192 299,-192 299,-168 491,-168 491,-192"/>
 <text text-anchor="middle" x="395" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
+<!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge11" class="edge">
-<title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
+<title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
 <path fill="none" stroke="#00ff00" d="M263.27,-180C271.6,-180 280.2,-180 288.82,-180"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="288.93,-183.5 298.93,-180 288.93,-176.5 288.93,-183.5"/>
 </g>
-<!-- none~set -->
+<!-- none~set~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node10" class="node">
-<title>none~set</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node10"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
+<title>none~set~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node10"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="451.5,-108 338.5,-108 338.5,-84 451.5,-84 451.5,-108"/>
 <text text-anchor="middle" x="395" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_c&#45;&gt;none~set -->
+<!-- proc~set_c~2&#45;&gt;none~set~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge12" class="edge">
-<title>proc~set_c&#45;&gt;none~set</title>
+<title>proc~set_c~2&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#0000ff" d="M250.71,-96C275.22,-96 303.38,-96 328.22,-96"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="328.28,-99.5 338.28,-96 328.28,-92.5 328.28,-99.5"/>
 </g>
@@ -595,63 +595,63 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M422.02,-303.12C455.19,-299.46 512.69,-293.1 550.03,-288.98"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="550.43,-292.45 559.99,-287.87 549.67,-285.49 550.43,-292.45"/>
 </g>
-<!-- proc~set1 -->
+<!-- proc~set1~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node17" class="node">
-<title>proc~set1</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node17"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
+<title>proc~set1~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node17"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="647,-108 527,-108 527,-84 647,-84 647,-108"/>
 <text text-anchor="middle" x="587" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set1 -->
+<!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge15" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
+<title>none~set~2&#45;&gt;proc~set1~2</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M451.72,-96C472.14,-96 495.5,-96 516.94,-96"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="516.97,-99.5 526.97,-96 516.97,-92.5 516.97,-99.5"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set2~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node18" class="node">
-<title>proc~set2</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node18"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
+<title>proc~set2~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node18"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="647,-66 527,-66 527,-42 647,-42 647,-66"/>
 <text text-anchor="middle" x="587" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set2 -->
+<!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge16" class="edge">
-<title>none~set&#45;&gt;proc~set2</title>
+<title>none~set~2&#45;&gt;proc~set2~2</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M450.45,-83.96C472.61,-79.07 498.39,-73.37 521.49,-68.26"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="522.54,-71.61 531.55,-66.04 521.03,-64.78 522.54,-71.61"/>
 </g>
-<!-- proc~set3 -->
+<!-- proc~set3~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node19" class="node">
-<title>proc~set3</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node19"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
+<title>proc~set3~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node19"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="647,-150 527,-150 527,-126 647,-126 647,-150"/>
 <text text-anchor="middle" x="587" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set3 -->
+<!-- none~set~2&#45;&gt;proc~set3~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge17" class="edge">
-<title>none~set&#45;&gt;proc~set3</title>
+<title>none~set~2&#45;&gt;proc~set3~2</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M450.45,-108.04C472.61,-112.93 498.39,-118.63 521.49,-123.74"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="521.03,-127.22 531.55,-125.96 522.54,-120.39 521.03,-127.22"/>
 </g>
-<!-- proc~set4 -->
+<!-- proc~set4~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node20" class="node">
-<title>proc~set4</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node20"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
+<title>proc~set4~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node20"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="647,-24 527,-24 527,0 647,0 647,-24"/>
 <text text-anchor="middle" x="587" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set4 -->
+<!-- none~set~2&#45;&gt;proc~set4~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge18" class="edge">
-<title>none~set&#45;&gt;proc~set4</title>
+<title>none~set~2&#45;&gt;proc~set4~2</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M419.32,-83.85C445.26,-70.57 488.57,-49.03 527,-33 531.41,-31.16 536.04,-29.34 540.69,-27.57"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="542.03,-30.81 550.2,-24.05 539.61,-24.24 542.03,-30.81"/>
 </g>
@@ -664,15 +664,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge19" class="edge">
-<title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#00ffff" d="M490.72,-222C505.24,-222 519.78,-222 532.96,-222"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="533.22,-225.5 543.22,-222 533.22,-218.5 533.22,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge20" class="edge">
-<title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#0000ff" d="M450.45,-192.04C476.49,-197.79 507.53,-204.65 533.34,-210.36"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="532.8,-213.82 543.31,-212.56 534.31,-206.99 532.8,-213.82"/>
 </g>
@@ -721,39 +721,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M630.93,-211.73C652.69,-206.52 679.46,-200.11 703.24,-194.42"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="704.32,-197.76 713.23,-192.03 702.69,-190.95 704.32,-197.76"/>
 </g>
-<!-- proc~cmp_degree -->
+<!-- proc~cmp_degree~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node21" class="node">
-<title>proc~cmp_degree</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node21"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
+<title>proc~cmp_degree~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node21"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="846,-150 683,-150 683,-126 846,-126 846,-150"/>
 <text text-anchor="middle" x="764.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_degree -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge24" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#00ff91" d="M638.29,-108.04C658.58,-112.89 682.15,-118.53 703.34,-123.6"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="702.66,-127.04 713.2,-125.96 704.29,-120.23 702.66,-127.04"/>
 </g>
-<!-- proc~cmp_nc -->
+<!-- proc~cmp_nc~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node25" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node25"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
+<title>proc~cmp_nc~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node25"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="834,-108 695,-108 695,-84 834,-84 834,-108"/>
 <text text-anchor="middle" x="764.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge25" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#00ff91" d="M647.42,-96C659.3,-96 671.97,-96 684.4,-96"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="684.76,-99.5 694.76,-96 684.76,-92.5 684.76,-99.5"/>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge26" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
+<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#0091ff" d="M638.29,-66.04C658.58,-70.89 682.15,-76.53 703.34,-81.6"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="702.66,-85.04 713.2,-83.96 704.29,-78.23 702.66,-85.04"/>
 </g>
@@ -766,30 +766,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~shape_c_3d~~CallsGraph_edge27" class="edge">
-<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#0091ff" d="M647.42,-54C661.26,-54 676.16,-54 690.51,-54"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="690.85,-57.5 700.85,-54 690.85,-50.5 690.85,-57.5"/>
 </g>
-<!-- proc~set3&#45;&gt;proc~cmp_degree -->
+<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge28" class="edge">
-<title>proc~set3&#45;&gt;proc~cmp_degree</title>
+<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#4800ff" d="M647.42,-138C655.64,-138 664.23,-138 672.86,-138"/>
 <polygon fill="#4800ff" stroke="#4800ff" points="672.98,-141.5 682.98,-138 672.98,-134.5 672.98,-141.5"/>
 </g>
-<!-- proc~get_multiplicity -->
+<!-- proc~get_multiplicity~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_node28" class="node">
-<title>proc~get_multiplicity</title>
-<g id="a_program~~shape_c_3d~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
+<title>proc~get_multiplicity~2</title>
+<g id="a_program~~shape_c_3d~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1060,-149 882,-149 882,-125 1060,-125 1060,-149"/>
 <text text-anchor="middle" x="971" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
+<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="program~~shape_c_3d~~CallsGraph_edge29" class="edge">
-<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
+<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
 <path fill="none" stroke="#ff0000" d="M846.03,-137.61C854.47,-137.56 863.11,-137.52 871.71,-137.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="871.8,-140.98 881.78,-137.43 871.76,-133.98 871.8,-140.98"/>
 </g>
@@ -802,9 +802,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_c_3d~~CallsGraph_edge30" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0000ff" d="M834.14,-99.68C904.69,-103.47 1014.03,-109.33 1085.57,-113.17"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="1085.67,-116.68 1095.85,-113.72 1086.05,-109.69 1085.67,-116.68"/>
 </g>
@@ -853,9 +853,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1220.33,-109C1228.69,-107.91 1237.35,-106.78 1245.92,-105.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1246.44,-109.12 1255.9,-104.36 1245.53,-102.18 1246.44,-109.12"/>
 </g>
-<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_c_3d~~CallsGraph_edge34" class="edge">
-<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M1060.17,-127.47C1068.77,-126.54 1077.42,-125.6 1085.82,-124.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1086.36,-128.16 1095.93,-123.6 1085.61,-121.2 1086.36,-128.16"/>
 </g>
@@ -962,7 +962,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~19"></span>
+              <span class="anchor" id="variable-shape~12"></span>
               type(<a href='../type/nurbs_volume.html'>nurbs_volume</a>)
             </td>
             <td>
@@ -1009,7 +1009,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/shape_circle.html b/program/shape_circle.html
index 832089837..49d127237 100644
--- a/program/shape_circle.html
+++ b/program/shape_circle.html
@@ -115,7 +115,7 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/shape_circle.html#variable-shape~12">shape</a>
+            <a class="list-group-item" href="../program/shape_circle.html#variable-shape~15">shape</a>
         </div>
       </div>
     </div>
@@ -385,63 +385,63 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="79,-171 0,-171 0,-147 79,-147 79,-171"/>
 <text text-anchor="middle" x="39.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50">shape_circle</text>
 </g>
-<!-- proc~create~3 -->
+<!-- proc~create -->
 <g id="program~~shape_circle~~CallsGraph_node2" class="node">
-<title>proc~create~3</title>
-<g id="a_program~~shape_circle~~CallsGraph_node2"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_curve%create">
+<title>proc~create</title>
+<g id="a_program~~shape_circle~~CallsGraph_node2"><a xlink:href="../proc/create.html" xlink:title="nurbs_curve%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="246,-276 125,-276 125,-252 246,-252 246,-276"/>
 <text text-anchor="middle" x="185.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%create</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~create~3 -->
+<!-- program~shape_circle&#45;&gt;proc~create -->
 <g id="program~~shape_circle~~CallsGraph_edge1" class="edge">
-<title>program~shape_circle&#45;&gt;proc~create~3</title>
+<title>program~shape_circle&#45;&gt;proc~create</title>
 <path fill="none" stroke="#ff0000" d="M48.09,-171.2C60.07,-189.49 85.12,-223.88 115,-243 117.76,-244.77 120.68,-246.39 123.69,-247.88"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="122.39,-251.14 132.95,-251.98 125.22,-244.74 122.39,-251.14"/>
 </g>
-<!-- proc~export_xc~3 -->
+<!-- proc~export_xc -->
 <g id="program~~shape_circle~~CallsGraph_node3" class="node">
-<title>proc~export_xc~3</title>
-<g id="a_program~~shape_circle~~CallsGraph_node3"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_curve%export_Xc">
+<title>proc~export_xc</title>
+<g id="a_program~~shape_circle~~CallsGraph_node3"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_curve%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="255.5,-234 115.5,-234 115.5,-210 255.5,-210 255.5,-234"/>
 <text text-anchor="middle" x="185.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~export_xc~3 -->
+<!-- program~shape_circle&#45;&gt;proc~export_xc -->
 <g id="program~~shape_circle~~CallsGraph_edge2" class="edge">
-<title>program~shape_circle&#45;&gt;proc~export_xc~3</title>
+<title>program~shape_circle&#45;&gt;proc~export_xc</title>
 <path fill="none" stroke="#ff0000" d="M59.2,-171.07C73.93,-180.2 95.2,-192.55 115,-201 119.73,-203.02 124.72,-204.93 129.77,-206.71"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="128.9,-210.11 139.49,-209.98 131.13,-203.48 128.9,-210.11"/>
 </g>
-<!-- proc~export_xg~3 -->
+<!-- proc~export_xg -->
 <g id="program~~shape_circle~~CallsGraph_node4" class="node">
-<title>proc~export_xg~3</title>
-<g id="a_program~~shape_circle~~CallsGraph_node4"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_curve%export_Xg">
+<title>proc~export_xg</title>
+<g id="a_program~~shape_circle~~CallsGraph_node4"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_curve%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="256,-192 115,-192 115,-168 256,-168 256,-192"/>
 <text text-anchor="middle" x="185.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~export_xg~3 -->
+<!-- program~shape_circle&#45;&gt;proc~export_xg -->
 <g id="program~~shape_circle~~CallsGraph_edge3" class="edge">
-<title>program~shape_circle&#45;&gt;proc~export_xg~3</title>
+<title>program~shape_circle&#45;&gt;proc~export_xg</title>
 <path fill="none" stroke="#ff0000" d="M79.09,-164.63C87.14,-165.8 95.91,-167.08 104.83,-168.38"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="104.55,-171.88 114.95,-169.86 105.56,-164.95 104.55,-171.88"/>
 </g>
-<!-- proc~finalize~3 -->
+<!-- proc~finalize -->
 <g id="program~~shape_circle~~CallsGraph_node5" class="node">
-<title>proc~finalize~3</title>
-<g id="a_program~~shape_circle~~CallsGraph_node5"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_curve%finalize">
+<title>proc~finalize</title>
+<g id="a_program~~shape_circle~~CallsGraph_node5"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_curve%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="248.5,-150 122.5,-150 122.5,-126 248.5,-126 248.5,-150"/>
 <text text-anchor="middle" x="185.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~finalize~3 -->
+<!-- program~shape_circle&#45;&gt;proc~finalize -->
 <g id="program~~shape_circle~~CallsGraph_edge4" class="edge">
-<title>program~shape_circle&#45;&gt;proc~finalize~3</title>
+<title>program~shape_circle&#45;&gt;proc~finalize</title>
 <path fill="none" stroke="#ff0000" d="M79.09,-153.37C89.4,-151.87 100.88,-150.19 112.37,-148.52"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="113.05,-151.96 122.44,-147.05 112.04,-145.03 113.05,-151.96"/>
 </g>
@@ -460,168 +460,168 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M59.2,-146.93C73.93,-137.8 95.2,-125.45 115,-117 119.73,-114.98 124.72,-113.07 129.77,-111.29"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="131.13,-114.52 139.49,-108.02 128.9,-107.89 131.13,-114.52"/>
 </g>
-<!-- proc~show~3 -->
+<!-- proc~show -->
 <g id="program~~shape_circle~~CallsGraph_node7" class="node">
-<title>proc~show~3</title>
-<g id="a_program~~shape_circle~~CallsGraph_node7"><a xlink:href="../proc/show~3.html" xlink:title="nurbs_curve%show">
+<title>proc~show</title>
+<g id="a_program~~shape_circle~~CallsGraph_node7"><a xlink:href="../proc/show.html" xlink:title="nurbs_curve%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="243,-66 128,-66 128,-42 243,-42 243,-66"/>
 <text text-anchor="middle" x="185.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%show</text>
 </a>
 </g>
 </g>
-<!-- program~shape_circle&#45;&gt;proc~show~3 -->
+<!-- program~shape_circle&#45;&gt;proc~show -->
 <g id="program~~shape_circle~~CallsGraph_edge6" class="edge">
-<title>program~shape_circle&#45;&gt;proc~show~3</title>
+<title>program~shape_circle&#45;&gt;proc~show</title>
 <path fill="none" stroke="#ff0000" d="M48.09,-146.8C60.07,-128.51 85.12,-94.12 115,-75 117.76,-73.23 120.68,-71.61 123.69,-70.12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="125.22,-73.26 132.95,-66.02 122.39,-66.86 125.22,-73.26"/>
 </g>
-<!-- interface~compute_xg~3 -->
+<!-- interface~compute_xg -->
 <g id="program~~shape_circle~~CallsGraph_node8" class="node">
-<title>interface~compute_xg~3</title>
-<g id="a_program~~shape_circle~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
+<title>interface~compute_xg</title>
+<g id="a_program~~shape_circle~~CallsGraph_node8"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="422.5,-318 343.5,-318 343.5,-294 422.5,-294 422.5,-318"/>
 <text text-anchor="middle" x="383" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
+<!-- proc~create&#45;&gt;interface~compute_xg -->
 <g id="program~~shape_circle~~CallsGraph_edge7" class="edge">
-<title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
+<title>proc~create&#45;&gt;interface~compute_xg</title>
 <path fill="none" stroke="#ff0000" d="M242.52,-276.04C271.26,-282.21 305.93,-289.66 333.51,-295.58"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="332.81,-299.01 343.33,-297.69 334.28,-292.17 332.81,-299.01"/>
 </g>
-<!-- proc~is_rational~3 -->
+<!-- proc~is_rational -->
 <g id="program~~shape_circle~~CallsGraph_node12" class="node">
-<title>proc~is_rational~3</title>
-<g id="a_program~~shape_circle~~CallsGraph_node12"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
+<title>proc~is_rational</title>
+<g id="a_program~~shape_circle~~CallsGraph_node12"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="454,-276 312,-276 312,-252 454,-252 454,-276"/>
 <text text-anchor="middle" x="383" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
+<!-- proc~create&#45;&gt;proc~is_rational -->
 <g id="program~~shape_circle~~CallsGraph_edge8" class="edge">
-<title>proc~create~3&#45;&gt;proc~is_rational~3</title>
+<title>proc~create&#45;&gt;proc~is_rational</title>
 <path fill="none" stroke="#ff0000" d="M246.22,-264C263.65,-264 283,-264 301.49,-264"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="301.66,-267.5 311.66,-264 301.66,-260.5 301.66,-267.5"/>
 </g>
-<!-- proc~cmp_elem_xc_vis~3 -->
+<!-- proc~cmp_elem_xc_vis -->
 <g id="program~~shape_circle~~CallsGraph_node10" class="node">
-<title>proc~cmp_elem_xc_vis~3</title>
-<g id="a_program~~shape_circle~~CallsGraph_node10"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis</title>
+<g id="a_program~~shape_circle~~CallsGraph_node10"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="473.5,-234 292.5,-234 292.5,-210 473.5,-210 473.5,-234"/>
 <text text-anchor="middle" x="383" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
+<!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
 <g id="program~~shape_circle~~CallsGraph_edge9" class="edge">
-<title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
+<title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
 <path fill="none" stroke="#ffff00" d="M255.7,-222C264.32,-222 273.26,-222 282.23,-222"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="282.35,-225.5 292.35,-222 282.35,-218.5 282.35,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~3 -->
+<!-- proc~cmp_elem_xg_vis -->
 <g id="program~~shape_circle~~CallsGraph_node11" class="node">
-<title>proc~cmp_elem_xg_vis~3</title>
-<g id="a_program~~shape_circle~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis</title>
+<g id="a_program~~shape_circle~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="474,-192 292,-192 292,-168 474,-168 474,-192"/>
 <text text-anchor="middle" x="383" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
+<!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
 <g id="program~~shape_circle~~CallsGraph_edge10" class="edge">
-<title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
+<title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
 <path fill="none" stroke="#00ff00" d="M256.25,-180C264.53,-180 273.1,-180 281.69,-180"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="281.78,-183.5 291.78,-180 281.78,-176.5 281.78,-183.5"/>
 </g>
-<!-- none~set~3 -->
+<!-- none~set -->
 <g id="program~~shape_circle~~CallsGraph_node9" class="node">
-<title>none~set~3</title>
-<g id="a_program~~shape_circle~~CallsGraph_node9"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
+<title>none~set</title>
+<g id="a_program~~shape_circle~~CallsGraph_node9"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="434.5,-108 331.5,-108 331.5,-84 434.5,-84 434.5,-108"/>
 <text text-anchor="middle" x="383" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_circle&#45;&gt;none~set -->
 <g id="program~~shape_circle~~CallsGraph_edge11" class="edge">
-<title>proc~set_circle&#45;&gt;none~set~3</title>
+<title>proc~set_circle&#45;&gt;none~set</title>
 <path fill="none" stroke="#0000ff" d="M254.05,-96C275.87,-96 299.91,-96 321.2,-96"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="321.42,-99.5 331.42,-96 321.42,-92.5 321.42,-99.5"/>
 </g>
-<!-- proc~set1a -->
+<!-- proc~set1 -->
 <g id="program~~shape_circle~~CallsGraph_node14" class="node">
-<title>proc~set1a</title>
-<g id="a_program~~shape_circle~~CallsGraph_node14"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="627,-192 510,-192 510,-168 627,-168 627,-192"/>
-<text text-anchor="middle" x="568.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+<title>proc~set1</title>
+<g id="a_program~~shape_circle~~CallsGraph_node14"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="623.5,-192 513.5,-192 513.5,-168 623.5,-168 623.5,-192"/>
+<text text-anchor="middle" x="568.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
+<!-- none~set&#45;&gt;proc~set1 -->
 <g id="program~~shape_circle~~CallsGraph_edge12" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
+<title>none~set&#45;&gt;proc~set1</title>
 <path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M406.4,-108.17C431.31,-121.47 472.94,-143.03 510,-159 514.18,-160.8 518.56,-162.58 522.97,-164.31"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="522,-167.68 532.59,-167.97 524.49,-161.14 522,-167.68"/>
 </g>
-<!-- proc~set1~3 -->
+<!-- proc~set1a -->
 <g id="program~~shape_circle~~CallsGraph_node15" class="node">
-<title>proc~set1~3</title>
-<g id="a_program~~shape_circle~~CallsGraph_node15"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="623.5,-150 513.5,-150 513.5,-126 623.5,-126 623.5,-150"/>
-<text text-anchor="middle" x="568.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<title>proc~set1a</title>
+<g id="a_program~~shape_circle~~CallsGraph_node15"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="627,-150 510,-150 510,-126 627,-126 627,-150"/>
+<text text-anchor="middle" x="568.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1~3 -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="program~~shape_circle~~CallsGraph_edge13" class="edge">
-<title>none~set~3&#45;&gt;proc~set1~3</title>
+<title>none~set&#45;&gt;proc~set1a</title>
 <path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M434.63,-107.59C456.34,-112.56 481.94,-118.42 504.83,-123.66"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="504.27,-127.12 514.8,-125.94 505.83,-120.29 504.27,-127.12"/>
 </g>
-<!-- proc~set2~3 -->
+<!-- proc~set2 -->
 <g id="program~~shape_circle~~CallsGraph_node16" class="node">
-<title>proc~set2~3</title>
-<g id="a_program~~shape_circle~~CallsGraph_node16"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
+<title>proc~set2</title>
+<g id="a_program~~shape_circle~~CallsGraph_node16"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="623.5,-66 513.5,-66 513.5,-42 623.5,-42 623.5,-66"/>
 <text text-anchor="middle" x="568.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set2~3 -->
+<!-- none~set&#45;&gt;proc~set2 -->
 <g id="program~~shape_circle~~CallsGraph_edge14" class="edge">
-<title>none~set~3&#45;&gt;proc~set2~3</title>
+<title>none~set&#45;&gt;proc~set2</title>
 <path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M434.63,-84.41C456.34,-79.44 481.94,-73.58 504.83,-68.34"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="505.83,-71.71 514.8,-66.06 504.27,-64.88 505.83,-71.71"/>
 </g>
-<!-- proc~set3~3 -->
+<!-- proc~set3 -->
 <g id="program~~shape_circle~~CallsGraph_node17" class="node">
-<title>proc~set3~3</title>
-<g id="a_program~~shape_circle~~CallsGraph_node17"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
+<title>proc~set3</title>
+<g id="a_program~~shape_circle~~CallsGraph_node17"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="623.5,-108 513.5,-108 513.5,-84 623.5,-84 623.5,-108"/>
 <text text-anchor="middle" x="568.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set3~3 -->
+<!-- none~set&#45;&gt;proc~set3 -->
 <g id="program~~shape_circle~~CallsGraph_edge15" class="edge">
-<title>none~set~3&#45;&gt;proc~set3~3</title>
+<title>none~set&#45;&gt;proc~set3</title>
 <path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M434.63,-96C455.79,-96 480.62,-96 503.06,-96"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="503.18,-99.5 513.18,-96 503.18,-92.5 503.18,-99.5"/>
 </g>
-<!-- proc~set4~3 -->
+<!-- proc~set4 -->
 <g id="program~~shape_circle~~CallsGraph_node18" class="node">
-<title>proc~set4~3</title>
-<g id="a_program~~shape_circle~~CallsGraph_node18"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
+<title>proc~set4</title>
+<g id="a_program~~shape_circle~~CallsGraph_node18"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="623.5,-24 513.5,-24 513.5,0 623.5,0 623.5,-24"/>
 <text text-anchor="middle" x="568.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set4~3 -->
+<!-- none~set&#45;&gt;proc~set4 -->
 <g id="program~~shape_circle~~CallsGraph_edge16" class="edge">
-<title>none~set~3&#45;&gt;proc~set4~3</title>
+<title>none~set&#45;&gt;proc~set4</title>
 <path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M406.4,-83.83C431.31,-70.53 472.94,-48.97 510,-33 514.18,-31.2 518.56,-29.42 522.97,-27.69"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="524.49,-30.86 532.59,-24.03 522,-24.32 524.49,-30.86"/>
 </g>
@@ -634,15 +634,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_circle~~CallsGraph_edge17" class="edge">
-<title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#00ff66" d="M473.6,-222C487.67,-222 501.81,-222 514.69,-222"/>
 <polygon fill="#00ff66" stroke="#00ff66" points="514.72,-225.5 524.72,-222 514.72,-218.5 514.72,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_circle~~CallsGraph_edge18" class="edge">
-<title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#0066ff" d="M436.58,-192.04C461.16,-197.66 490.35,-204.34 514.92,-209.97"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="514.26,-213.4 524.79,-212.22 515.82,-206.58 514.26,-213.4"/>
 </g>
@@ -691,26 +691,26 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M612.27,-211.4C633.03,-206.26 658.29,-200 680.77,-194.43"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="681.68,-197.81 690.55,-192.01 680,-191.01 681.68,-197.81"/>
 </g>
-<!-- proc~cmp_degree~3 -->
+<!-- proc~cmp_degree -->
 <g id="program~~shape_circle~~CallsGraph_node19" class="node">
-<title>proc~cmp_degree~3</title>
-<g id="a_program~~shape_circle~~CallsGraph_node19"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
+<title>proc~cmp_degree</title>
+<g id="a_program~~shape_circle~~CallsGraph_node19"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="817,-150 663,-150 663,-126 817,-126 817,-150"/>
 <text text-anchor="middle" x="740" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1&#45;&gt;proc~cmp_degree -->
 <g id="program~~shape_circle~~CallsGraph_edge22" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
+<title>proc~set1&#45;&gt;proc~cmp_degree</title>
 <path fill="none" stroke="#ffff00" d="M618.07,-167.96C637.58,-163.13 660.23,-157.52 680.62,-152.47"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="681.56,-155.84 690.42,-150.04 679.87,-149.05 681.56,-155.84"/>
 </g>
-<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
 <g id="program~~shape_circle~~CallsGraph_edge23" class="edge">
-<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#00ff00" d="M623.6,-138C632.87,-138 642.72,-138 652.59,-138"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="652.86,-141.5 662.86,-138 652.86,-134.5 652.86,-141.5"/>
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#00ff00" d="M627.36,-138C635.56,-138 644.14,-138 652.74,-138"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="652.82,-141.5 662.82,-138 652.82,-134.5 652.82,-141.5"/>
 </g>
 <!-- proc~compute_knot_vector -->
 <g id="program~~shape_circle~~CallsGraph_node23" class="node">
@@ -721,30 +721,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~shape_circle~~CallsGraph_edge24" class="edge">
-<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#00ffff" d="M623.6,-54C637.08,-54 651.77,-54 666,-54"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="666.26,-57.5 676.26,-54 666.26,-50.5 666.26,-57.5"/>
 </g>
-<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set3&#45;&gt;proc~cmp_degree -->
 <g id="program~~shape_circle~~CallsGraph_edge25" class="edge">
-<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
+<title>proc~set3&#45;&gt;proc~cmp_degree</title>
 <path fill="none" stroke="#0000ff" d="M618.07,-108.04C637.58,-112.87 660.23,-118.48 680.62,-123.53"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="679.87,-126.95 690.42,-125.96 681.56,-120.16 679.87,-126.95"/>
 </g>
-<!-- proc~get_multiplicity~3 -->
+<!-- proc~get_multiplicity -->
 <g id="program~~shape_circle~~CallsGraph_node24" class="node">
-<title>proc~get_multiplicity~3</title>
-<g id="a_program~~shape_circle~~CallsGraph_node24"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
+<title>proc~get_multiplicity</title>
+<g id="a_program~~shape_circle~~CallsGraph_node24"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1022,-150 853,-150 853,-126 1022,-126 1022,-150"/>
 <text text-anchor="middle" x="937.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
+<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="program~~shape_circle~~CallsGraph_edge26" class="edge">
-<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
+<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
 <path fill="none" stroke="#ff0000" d="M817.15,-138C825.54,-138 834.17,-138 842.75,-138"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="842.79,-141.5 852.79,-138 842.79,-134.5 842.79,-141.5"/>
 </g>
@@ -772,9 +772,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_circle~~CallsGraph_edge28" class="edge">
-<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#ff0000" d="M1022.15,-138C1030.73,-138 1039.4,-138 1047.84,-138"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1047.99,-141.5 1057.99,-138 1047.99,-134.5 1047.99,-141.5"/>
 </g>
@@ -911,7 +911,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~12"></span>
+              <span class="anchor" id="variable-shape~15"></span>
               type(<a href='../type/nurbs_curve.html'>nurbs_curve</a>)
             </td>
             <td>
@@ -958,7 +958,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/shape_half_circle.html b/program/shape_half_circle.html
index 998f6ced0..c529be0ac 100644
--- a/program/shape_half_circle.html
+++ b/program/shape_half_circle.html
@@ -115,7 +115,7 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/shape_half_circle.html#variable-shape~7">shape</a>
+            <a class="list-group-item" href="../program/shape_half_circle.html#variable-shape~10">shape</a>
         </div>
       </div>
     </div>
@@ -385,63 +385,63 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="104,-171 0,-171 0,-147 104,-147 104,-171"/>
 <text text-anchor="middle" x="52" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50">shape_half_circle</text>
 </g>
-<!-- proc~create~3 -->
+<!-- proc~create -->
 <g id="program~~shape_half_circle~~CallsGraph_node2" class="node">
-<title>proc~create~3</title>
-<g id="a_program~~shape_half_circle~~CallsGraph_node2"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_curve%create">
+<title>proc~create</title>
+<g id="a_program~~shape_half_circle~~CallsGraph_node2"><a xlink:href="../proc/create.html" xlink:title="nurbs_curve%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="282,-276 161,-276 161,-252 282,-252 282,-276"/>
 <text text-anchor="middle" x="221.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%create</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~create~3 -->
+<!-- program~shape_half_circle&#45;&gt;proc~create -->
 <g id="program~~shape_half_circle~~CallsGraph_edge1" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~create~3</title>
+<title>program~shape_half_circle&#45;&gt;proc~create</title>
 <path fill="none" stroke="#ff0000" d="M62.02,-171.01C76.44,-189.35 106.5,-224.19 140,-243 143.51,-244.97 147.22,-246.76 151.03,-248.39"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="150.08,-251.78 160.67,-252.1 152.59,-245.24 150.08,-251.78"/>
 </g>
-<!-- proc~export_xc~3 -->
+<!-- proc~export_xc -->
 <g id="program~~shape_half_circle~~CallsGraph_node3" class="node">
-<title>proc~export_xc~3</title>
-<g id="a_program~~shape_half_circle~~CallsGraph_node3"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_curve%export_Xc">
+<title>proc~export_xc</title>
+<g id="a_program~~shape_half_circle~~CallsGraph_node3"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_curve%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="291.5,-234 151.5,-234 151.5,-210 291.5,-210 291.5,-234"/>
 <text text-anchor="middle" x="221.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~export_xc~3 -->
+<!-- program~shape_half_circle&#45;&gt;proc~export_xc -->
 <g id="program~~shape_half_circle~~CallsGraph_edge2" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~export_xc~3</title>
+<title>program~shape_half_circle&#45;&gt;proc~export_xc</title>
 <path fill="none" stroke="#ff0000" d="M75.01,-171.11C92.3,-180.25 117.18,-192.6 140,-201 145.87,-203.16 152.06,-205.19 158.29,-207.07"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="157.5,-210.49 168.08,-209.91 159.45,-203.76 157.5,-210.49"/>
 </g>
-<!-- proc~export_xg~3 -->
+<!-- proc~export_xg -->
 <g id="program~~shape_half_circle~~CallsGraph_node4" class="node">
-<title>proc~export_xg~3</title>
-<g id="a_program~~shape_half_circle~~CallsGraph_node4"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_curve%export_Xg">
+<title>proc~export_xg</title>
+<g id="a_program~~shape_half_circle~~CallsGraph_node4"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_curve%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="292,-192 151,-192 151,-168 292,-168 292,-192"/>
 <text text-anchor="middle" x="221.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~export_xg~3 -->
+<!-- program~shape_half_circle&#45;&gt;proc~export_xg -->
 <g id="program~~shape_half_circle~~CallsGraph_edge3" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~export_xg~3</title>
+<title>program~shape_half_circle&#45;&gt;proc~export_xg</title>
 <path fill="none" stroke="#ff0000" d="M104.17,-165.41C115.78,-166.87 128.39,-168.45 140.87,-170.02"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="140.48,-173.49 150.83,-171.27 141.35,-166.55 140.48,-173.49"/>
 </g>
-<!-- proc~finalize~3 -->
+<!-- proc~finalize -->
 <g id="program~~shape_half_circle~~CallsGraph_node5" class="node">
-<title>proc~finalize~3</title>
-<g id="a_program~~shape_half_circle~~CallsGraph_node5"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_curve%finalize">
+<title>proc~finalize</title>
+<g id="a_program~~shape_half_circle~~CallsGraph_node5"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_curve%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="284.5,-150 158.5,-150 158.5,-126 284.5,-126 284.5,-150"/>
 <text text-anchor="middle" x="221.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~finalize~3 -->
+<!-- program~shape_half_circle&#45;&gt;proc~finalize -->
 <g id="program~~shape_half_circle~~CallsGraph_edge4" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~finalize~3</title>
+<title>program~shape_half_circle&#45;&gt;proc~finalize</title>
 <path fill="none" stroke="#ff0000" d="M104.17,-152.59C118.08,-150.84 133.42,-148.92 148.26,-147.06"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="148.95,-150.5 158.43,-145.78 148.08,-143.55 148.95,-150.5"/>
 </g>
@@ -460,168 +460,168 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M75.01,-146.89C92.3,-137.75 117.18,-125.4 140,-117 145.87,-114.84 152.06,-112.81 158.29,-110.93"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="159.45,-114.24 168.08,-108.09 157.5,-107.51 159.45,-114.24"/>
 </g>
-<!-- proc~show~3 -->
+<!-- proc~show -->
 <g id="program~~shape_half_circle~~CallsGraph_node7" class="node">
-<title>proc~show~3</title>
-<g id="a_program~~shape_half_circle~~CallsGraph_node7"><a xlink:href="../proc/show~3.html" xlink:title="nurbs_curve%show">
+<title>proc~show</title>
+<g id="a_program~~shape_half_circle~~CallsGraph_node7"><a xlink:href="../proc/show.html" xlink:title="nurbs_curve%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="279,-66 164,-66 164,-42 279,-42 279,-66"/>
 <text text-anchor="middle" x="221.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%show</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_circle&#45;&gt;proc~show~3 -->
+<!-- program~shape_half_circle&#45;&gt;proc~show -->
 <g id="program~~shape_half_circle~~CallsGraph_edge6" class="edge">
-<title>program~shape_half_circle&#45;&gt;proc~show~3</title>
+<title>program~shape_half_circle&#45;&gt;proc~show</title>
 <path fill="none" stroke="#ff0000" d="M62.02,-146.99C76.44,-128.65 106.5,-93.81 140,-75 144.45,-72.5 149.21,-70.29 154.1,-68.34"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="155.42,-71.59 163.63,-64.9 153.04,-65 155.42,-71.59"/>
 </g>
-<!-- interface~compute_xg~3 -->
+<!-- interface~compute_xg -->
 <g id="program~~shape_half_circle~~CallsGraph_node8" class="node">
-<title>interface~compute_xg~3</title>
-<g id="a_program~~shape_half_circle~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
+<title>interface~compute_xg</title>
+<g id="a_program~~shape_half_circle~~CallsGraph_node8"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="469.5,-318 390.5,-318 390.5,-294 469.5,-294 469.5,-318"/>
 <text text-anchor="middle" x="430" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
+<!-- proc~create&#45;&gt;interface~compute_xg -->
 <g id="program~~shape_half_circle~~CallsGraph_edge7" class="edge">
-<title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
+<title>proc~create&#45;&gt;interface~compute_xg</title>
 <path fill="none" stroke="#ff0000" d="M281.67,-276.04C312.91,-282.39 350.77,-290.09 380.29,-296.09"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="379.87,-299.58 390.36,-298.14 381.26,-292.72 379.87,-299.58"/>
 </g>
-<!-- proc~is_rational~3 -->
+<!-- proc~is_rational -->
 <g id="program~~shape_half_circle~~CallsGraph_node12" class="node">
-<title>proc~is_rational~3</title>
-<g id="a_program~~shape_half_circle~~CallsGraph_node12"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_curve%is_rational">
+<title>proc~is_rational</title>
+<g id="a_program~~shape_half_circle~~CallsGraph_node12"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_curve%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="501,-276 359,-276 359,-252 501,-252 501,-276"/>
 <text text-anchor="middle" x="430" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
+<!-- proc~create&#45;&gt;proc~is_rational -->
 <g id="program~~shape_half_circle~~CallsGraph_edge8" class="edge">
-<title>proc~create~3&#45;&gt;proc~is_rational~3</title>
+<title>proc~create&#45;&gt;proc~is_rational</title>
 <path fill="none" stroke="#ff0000" d="M282.23,-264C302.99,-264 326.63,-264 348.77,-264"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="348.83,-267.5 358.83,-264 348.83,-260.5 348.83,-267.5"/>
 </g>
-<!-- proc~cmp_elem_xc_vis~3 -->
+<!-- proc~cmp_elem_xc_vis -->
 <g id="program~~shape_half_circle~~CallsGraph_node10" class="node">
-<title>proc~cmp_elem_xc_vis~3</title>
-<g id="a_program~~shape_half_circle~~CallsGraph_node10"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis</title>
+<g id="a_program~~shape_half_circle~~CallsGraph_node10"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_curve%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="520.5,-234 339.5,-234 339.5,-210 520.5,-210 520.5,-234"/>
 <text text-anchor="middle" x="430" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
+<!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
 <g id="program~~shape_half_circle~~CallsGraph_edge9" class="edge">
-<title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
+<title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
 <path fill="none" stroke="#ffff00" d="M291.55,-222C303.67,-222 316.5,-222 329.25,-222"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="329.45,-225.5 339.45,-222 329.45,-218.5 329.45,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~3 -->
+<!-- proc~cmp_elem_xg_vis -->
 <g id="program~~shape_half_circle~~CallsGraph_node11" class="node">
-<title>proc~cmp_elem_xg_vis~3</title>
-<g id="a_program~~shape_half_circle~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis</title>
+<g id="a_program~~shape_half_circle~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_curve%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="521,-192 339,-192 339,-168 521,-168 521,-192"/>
 <text text-anchor="middle" x="430" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
+<!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
 <g id="program~~shape_half_circle~~CallsGraph_edge10" class="edge">
-<title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
+<title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
 <path fill="none" stroke="#00ff00" d="M292.12,-180C303.83,-180 316.19,-180 328.49,-180"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="328.8,-183.5 338.8,-180 328.8,-176.5 328.8,-183.5"/>
 </g>
-<!-- none~set~3 -->
+<!-- none~set -->
 <g id="program~~shape_half_circle~~CallsGraph_node9" class="node">
-<title>none~set~3</title>
-<g id="a_program~~shape_half_circle~~CallsGraph_node9"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set~3" xlink:title="nurbs_curve%set">
+<title>none~set</title>
+<g id="a_program~~shape_half_circle~~CallsGraph_node9"><a xlink:href="../type/nurbs_curve.html#boundprocedure-set" xlink:title="nurbs_curve%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="481.5,-108 378.5,-108 378.5,-84 481.5,-84 481.5,-108"/>
 <text text-anchor="middle" x="430" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_circle&#45;&gt;none~set~3 -->
+<!-- proc~set_half_circle&#45;&gt;none~set -->
 <g id="program~~shape_half_circle~~CallsGraph_edge11" class="edge">
-<title>proc~set_half_circle&#45;&gt;none~set~3</title>
+<title>proc~set_half_circle&#45;&gt;none~set</title>
 <path fill="none" stroke="#0000ff" d="M303.23,-96C324.9,-96 347.97,-96 368.35,-96"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="368.43,-99.5 378.43,-96 368.43,-92.5 368.43,-99.5"/>
 </g>
-<!-- proc~set1a -->
+<!-- proc~set1 -->
 <g id="program~~shape_half_circle~~CallsGraph_node14" class="node">
-<title>proc~set1a</title>
-<g id="a_program~~shape_half_circle~~CallsGraph_node14"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
-<polygon fill="#d9534f" stroke="#d9534f" points="674,-192 557,-192 557,-168 674,-168 674,-192"/>
-<text text-anchor="middle" x="615.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
+<title>proc~set1</title>
+<g id="a_program~~shape_half_circle~~CallsGraph_node14"><a xlink:href="../proc/set1.html" xlink:title="nurbs_curve%set1">
+<polygon fill="#d9534f" stroke="#d9534f" points="670.5,-192 560.5,-192 560.5,-168 670.5,-168 670.5,-192"/>
+<text text-anchor="middle" x="615.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1a -->
+<!-- none~set&#45;&gt;proc~set1 -->
 <g id="program~~shape_half_circle~~CallsGraph_edge12" class="edge">
-<title>none~set~3&#45;&gt;proc~set1a</title>
+<title>none~set&#45;&gt;proc~set1</title>
 <path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M453.4,-108.17C478.31,-121.47 519.94,-143.03 557,-159 561.18,-160.8 565.56,-162.58 569.97,-164.31"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="569,-167.68 579.59,-167.97 571.49,-161.14 569,-167.68"/>
 </g>
-<!-- proc~set1~3 -->
+<!-- proc~set1a -->
 <g id="program~~shape_half_circle~~CallsGraph_node15" class="node">
-<title>proc~set1~3</title>
-<g id="a_program~~shape_half_circle~~CallsGraph_node15"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_curve%set1">
-<polygon fill="#d9534f" stroke="#d9534f" points="670.5,-150 560.5,-150 560.5,-126 670.5,-126 670.5,-150"/>
-<text text-anchor="middle" x="615.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1</text>
+<title>proc~set1a</title>
+<g id="a_program~~shape_half_circle~~CallsGraph_node15"><a xlink:href="../proc/set1a.html" xlink:title="nurbs_curve%set1a">
+<polygon fill="#d9534f" stroke="#d9534f" points="674,-150 557,-150 557,-126 674,-126 674,-150"/>
+<text text-anchor="middle" x="615.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set1a</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set1~3 -->
+<!-- none~set&#45;&gt;proc~set1a -->
 <g id="program~~shape_half_circle~~CallsGraph_edge13" class="edge">
-<title>none~set~3&#45;&gt;proc~set1~3</title>
+<title>none~set&#45;&gt;proc~set1a</title>
 <path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M481.63,-107.59C503.34,-112.56 528.94,-118.42 551.83,-123.66"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="551.27,-127.12 561.8,-125.94 552.83,-120.29 551.27,-127.12"/>
 </g>
-<!-- proc~set2~3 -->
+<!-- proc~set2 -->
 <g id="program~~shape_half_circle~~CallsGraph_node16" class="node">
-<title>proc~set2~3</title>
-<g id="a_program~~shape_half_circle~~CallsGraph_node16"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_curve%set2">
+<title>proc~set2</title>
+<g id="a_program~~shape_half_circle~~CallsGraph_node16"><a xlink:href="../proc/set2.html" xlink:title="nurbs_curve%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="670.5,-66 560.5,-66 560.5,-42 670.5,-42 670.5,-66"/>
 <text text-anchor="middle" x="615.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set2~3 -->
+<!-- none~set&#45;&gt;proc~set2 -->
 <g id="program~~shape_half_circle~~CallsGraph_edge14" class="edge">
-<title>none~set~3&#45;&gt;proc~set2~3</title>
+<title>none~set&#45;&gt;proc~set2</title>
 <path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M481.63,-84.41C503.34,-79.44 528.94,-73.58 551.83,-68.34"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="552.83,-71.71 561.8,-66.06 551.27,-64.88 552.83,-71.71"/>
 </g>
-<!-- proc~set3~3 -->
+<!-- proc~set3 -->
 <g id="program~~shape_half_circle~~CallsGraph_node17" class="node">
-<title>proc~set3~3</title>
-<g id="a_program~~shape_half_circle~~CallsGraph_node17"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_curve%set3">
+<title>proc~set3</title>
+<g id="a_program~~shape_half_circle~~CallsGraph_node17"><a xlink:href="../proc/set3.html" xlink:title="nurbs_curve%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="670.5,-108 560.5,-108 560.5,-84 670.5,-84 670.5,-108"/>
 <text text-anchor="middle" x="615.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set3~3 -->
+<!-- none~set&#45;&gt;proc~set3 -->
 <g id="program~~shape_half_circle~~CallsGraph_edge15" class="edge">
-<title>none~set~3&#45;&gt;proc~set3~3</title>
+<title>none~set&#45;&gt;proc~set3</title>
 <path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M481.63,-96C502.79,-96 527.62,-96 550.06,-96"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="550.18,-99.5 560.18,-96 550.18,-92.5 550.18,-99.5"/>
 </g>
-<!-- proc~set4~3 -->
+<!-- proc~set4 -->
 <g id="program~~shape_half_circle~~CallsGraph_node18" class="node">
-<title>proc~set4~3</title>
-<g id="a_program~~shape_half_circle~~CallsGraph_node18"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_curve%set4">
+<title>proc~set4</title>
+<g id="a_program~~shape_half_circle~~CallsGraph_node18"><a xlink:href="../proc/set4.html" xlink:title="nurbs_curve%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="670.5,-24 560.5,-24 560.5,0 670.5,0 670.5,-24"/>
 <text text-anchor="middle" x="615.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~3&#45;&gt;proc~set4~3 -->
+<!-- none~set&#45;&gt;proc~set4 -->
 <g id="program~~shape_half_circle~~CallsGraph_edge16" class="edge">
-<title>none~set~3&#45;&gt;proc~set4~3</title>
+<title>none~set&#45;&gt;proc~set4</title>
 <path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M453.4,-83.83C478.31,-70.53 519.94,-48.97 557,-33 561.18,-31.2 565.56,-29.42 569.97,-27.69"/>
 <polygon fill="#cbff00" stroke="#cbff00" points="571.49,-30.86 579.59,-24.03 569,-24.32 571.49,-30.86"/>
 </g>
@@ -634,15 +634,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_half_circle~~CallsGraph_edge17" class="edge">
-<title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#00ff66" d="M520.6,-222C534.67,-222 548.81,-222 561.69,-222"/>
 <polygon fill="#00ff66" stroke="#00ff66" points="561.72,-225.5 571.72,-222 561.72,-218.5 561.72,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_half_circle~~CallsGraph_edge18" class="edge">
-<title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#0066ff" d="M483.58,-192.04C508.16,-197.66 537.35,-204.34 561.92,-209.97"/>
 <polygon fill="#0066ff" stroke="#0066ff" points="561.26,-213.4 571.79,-212.22 562.82,-206.58 561.26,-213.4"/>
 </g>
@@ -691,26 +691,26 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M659.27,-211.4C680.03,-206.26 705.29,-200 727.77,-194.43"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="728.68,-197.81 737.55,-192.01 727,-191.01 728.68,-197.81"/>
 </g>
-<!-- proc~cmp_degree~3 -->
+<!-- proc~cmp_degree -->
 <g id="program~~shape_half_circle~~CallsGraph_node19" class="node">
-<title>proc~cmp_degree~3</title>
-<g id="a_program~~shape_half_circle~~CallsGraph_node19"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_curve%cmp_degree">
+<title>proc~cmp_degree</title>
+<g id="a_program~~shape_half_circle~~CallsGraph_node19"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_curve%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="864,-150 710,-150 710,-126 864,-126 864,-150"/>
 <text text-anchor="middle" x="787" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1a&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1&#45;&gt;proc~cmp_degree -->
 <g id="program~~shape_half_circle~~CallsGraph_edge22" class="edge">
-<title>proc~set1a&#45;&gt;proc~cmp_degree~3</title>
+<title>proc~set1&#45;&gt;proc~cmp_degree</title>
 <path fill="none" stroke="#ffff00" d="M665.07,-167.96C684.58,-163.13 707.23,-157.52 727.62,-152.47"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="728.56,-155.84 737.42,-150.04 726.87,-149.05 728.56,-155.84"/>
 </g>
-<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set1a&#45;&gt;proc~cmp_degree -->
 <g id="program~~shape_half_circle~~CallsGraph_edge23" class="edge">
-<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
-<path fill="none" stroke="#00ff00" d="M670.6,-138C679.87,-138 689.72,-138 699.59,-138"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="699.86,-141.5 709.86,-138 699.86,-134.5 699.86,-141.5"/>
+<title>proc~set1a&#45;&gt;proc~cmp_degree</title>
+<path fill="none" stroke="#00ff00" d="M674.36,-138C682.56,-138 691.14,-138 699.74,-138"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="699.82,-141.5 709.82,-138 699.82,-134.5 699.82,-141.5"/>
 </g>
 <!-- proc~compute_knot_vector -->
 <g id="program~~shape_half_circle~~CallsGraph_node23" class="node">
@@ -721,30 +721,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~shape_half_circle~~CallsGraph_edge24" class="edge">
-<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#00ffff" d="M670.6,-54C684.08,-54 698.77,-54 713,-54"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="713.26,-57.5 723.26,-54 713.26,-50.5 713.26,-57.5"/>
 </g>
-<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
+<!-- proc~set3&#45;&gt;proc~cmp_degree -->
 <g id="program~~shape_half_circle~~CallsGraph_edge25" class="edge">
-<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
+<title>proc~set3&#45;&gt;proc~cmp_degree</title>
 <path fill="none" stroke="#0000ff" d="M665.07,-108.04C684.58,-112.87 707.23,-118.48 727.62,-123.53"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="726.87,-126.95 737.42,-125.96 728.56,-120.16 726.87,-126.95"/>
 </g>
-<!-- proc~get_multiplicity~3 -->
+<!-- proc~get_multiplicity -->
 <g id="program~~shape_half_circle~~CallsGraph_node24" class="node">
-<title>proc~get_multiplicity~3</title>
-<g id="a_program~~shape_half_circle~~CallsGraph_node24"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_curve%get_multiplicity">
+<title>proc~get_multiplicity</title>
+<g id="a_program~~shape_half_circle~~CallsGraph_node24"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_curve%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1069,-150 900,-150 900,-126 1069,-126 1069,-150"/>
 <text text-anchor="middle" x="984.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_curve%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
+<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
 <g id="program~~shape_half_circle~~CallsGraph_edge26" class="edge">
-<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
+<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
 <path fill="none" stroke="#ff0000" d="M864.15,-138C872.54,-138 881.17,-138 889.75,-138"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="889.79,-141.5 899.79,-138 889.79,-134.5 889.79,-141.5"/>
 </g>
@@ -772,9 +772,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_half_circle~~CallsGraph_edge28" class="edge">
-<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#ff0000" d="M1069.15,-138C1077.73,-138 1086.4,-138 1094.84,-138"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1094.99,-141.5 1104.99,-138 1094.99,-134.5 1094.99,-141.5"/>
 </g>
@@ -911,7 +911,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~7"></span>
+              <span class="anchor" id="variable-shape~10"></span>
               type(<a href='../type/nurbs_curve.html'>nurbs_curve</a>)
             </td>
             <td>
@@ -958,7 +958,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/shape_half_ring_2d.html b/program/shape_half_ring_2d.html
index 59d0ce0a8..e3202f8ed 100644
--- a/program/shape_half_ring_2d.html
+++ b/program/shape_half_ring_2d.html
@@ -115,7 +115,7 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/shape_half_ring_2d.html#variable-shape~8">shape</a>
+            <a class="list-group-item" href="../program/shape_half_ring_2d.html#variable-shape~16">shape</a>
         </div>
       </div>
     </div>
@@ -385,63 +385,63 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="115,-171 0,-171 0,-147 115,-147 115,-171"/>
 <text text-anchor="middle" x="57.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50">shape_half_ring_2d</text>
 </g>
-<!-- proc~create~2 -->
+<!-- proc~create~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_node2" class="node">
-<title>proc~create~2</title>
-<g id="a_program~~shape_half_ring_2d~~CallsGraph_node2"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
+<title>proc~create~3</title>
+<g id="a_program~~shape_half_ring_2d~~CallsGraph_node2"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="299,-297 168,-297 168,-273 299,-273 299,-297"/>
 <text text-anchor="middle" x="233.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~create~2 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~create~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge1" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~create~2</title>
+<title>program~shape_half_ring_2d&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#ff0000" d="M69.91,-171.22C86.58,-188.62 119.1,-220.87 151,-243 164.84,-252.6 181.16,-261.44 195.55,-268.51"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="194.15,-271.72 204.68,-272.89 197.18,-265.41 194.15,-271.72"/>
 </g>
-<!-- proc~export_xc~2 -->
+<!-- proc~export_xc~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_node3" class="node">
-<title>proc~export_xc~2</title>
-<g id="a_program~~shape_half_ring_2d~~CallsGraph_node3"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_surface%export_Xc">
+<title>proc~export_xc~3</title>
+<g id="a_program~~shape_half_ring_2d~~CallsGraph_node3"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_surface%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="308.5,-234 158.5,-234 158.5,-210 308.5,-210 308.5,-234"/>
 <text text-anchor="middle" x="233.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xc~2 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xc~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge2" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~export_xc~2</title>
+<title>program~shape_half_ring_2d&#45;&gt;proc~export_xc~3</title>
 <path fill="none" stroke="#ff0000" d="M81.99,-171.04C100.41,-180.15 126.88,-192.49 151,-201 157.06,-203.14 163.44,-205.16 169.85,-207.04"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="169.35,-210.54 179.92,-209.89 171.25,-203.8 169.35,-210.54"/>
 </g>
-<!-- proc~export_xg~2 -->
+<!-- proc~export_xg~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_node4" class="node">
-<title>proc~export_xg~2</title>
-<g id="a_program~~shape_half_ring_2d~~CallsGraph_node4"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_surface%export_Xg">
+<title>proc~export_xg~3</title>
+<g id="a_program~~shape_half_ring_2d~~CallsGraph_node4"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_surface%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="309,-192 158,-192 158,-168 309,-168 309,-192"/>
 <text text-anchor="middle" x="233.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xg~2 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~export_xg~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge3" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~export_xg~2</title>
+<title>program~shape_half_ring_2d&#45;&gt;proc~export_xg~3</title>
 <path fill="none" stroke="#ff0000" d="M115.47,-165.88C125.87,-167.13 136.92,-168.46 147.91,-169.79"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="147.63,-173.28 157.98,-171.01 148.47,-166.33 147.63,-173.28"/>
 </g>
-<!-- proc~finalize~2 -->
+<!-- proc~finalize~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_node5" class="node">
-<title>proc~finalize~2</title>
-<g id="a_program~~shape_half_ring_2d~~CallsGraph_node5"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_surface%finalize">
+<title>proc~finalize~3</title>
+<g id="a_program~~shape_half_ring_2d~~CallsGraph_node5"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_surface%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="301.5,-150 165.5,-150 165.5,-126 301.5,-126 301.5,-150"/>
 <text text-anchor="middle" x="233.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~finalize~2 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~finalize~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge4" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~finalize~2</title>
+<title>program~shape_half_ring_2d&#45;&gt;proc~finalize~3</title>
 <path fill="none" stroke="#ff0000" d="M115.47,-152.12C128.19,-150.59 141.88,-148.94 155.26,-147.32"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="155.9,-150.77 165.41,-146.1 155.06,-143.82 155.9,-150.77"/>
 </g>
@@ -460,33 +460,33 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M81.99,-146.96C100.41,-137.85 126.88,-125.51 151,-117 157.06,-114.86 163.44,-112.84 169.85,-110.96"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="171.25,-114.2 179.92,-108.11 169.35,-107.46 171.25,-114.2"/>
 </g>
-<!-- proc~show~2 -->
+<!-- proc~show~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_node7" class="node">
-<title>proc~show~2</title>
-<g id="a_program~~shape_half_ring_2d~~CallsGraph_node7"><a xlink:href="../proc/show~2.html" xlink:title="nurbs_surface%show">
+<title>proc~show~3</title>
+<g id="a_program~~shape_half_ring_2d~~CallsGraph_node7"><a xlink:href="../proc/show~3.html" xlink:title="nurbs_surface%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="295.5,-66 171.5,-66 171.5,-42 295.5,-42 295.5,-66"/>
 <text text-anchor="middle" x="233.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%show</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_2d&#45;&gt;proc~show~2 -->
+<!-- program~shape_half_ring_2d&#45;&gt;proc~show~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge6" class="edge">
-<title>program~shape_half_ring_2d&#45;&gt;proc~show~2</title>
+<title>program~shape_half_ring_2d&#45;&gt;proc~show~3</title>
 <path fill="none" stroke="#ff0000" d="M68.51,-146.7C84.16,-128.29 116.25,-93.75 151,-75 154.69,-73.01 158.57,-71.2 162.57,-69.56"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="163.89,-72.8 172.03,-66.03 161.44,-66.25 163.89,-72.8"/>
 </g>
-<!-- interface~compute_xg~2 -->
+<!-- interface~compute_xg~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_node8" class="node">
-<title>interface~compute_xg~2</title>
-<g id="a_program~~shape_half_ring_2d~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~3</title>
+<g id="a_program~~shape_half_ring_2d~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="487.5,-360 408.5,-360 408.5,-336 487.5,-336 487.5,-360"/>
 <text text-anchor="middle" x="448" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
+<!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge7" class="edge">
-<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
+<title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
 <path fill="none" stroke="#ff0000" d="M265.08,-297.13C288.59,-306.16 322.02,-318.37 352,-327 366.9,-331.29 383.33,-335.21 398.28,-338.46"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="397.85,-341.95 408.36,-340.61 399.31,-335.1 397.85,-341.95"/>
 </g>
@@ -499,69 +499,69 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~ndgrid -->
+<!-- proc~create~3&#45;&gt;interface~ndgrid -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge8" class="edge">
-<title>proc~create~2&#45;&gt;interface~ndgrid</title>
+<title>proc~create~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M299.12,-291.39C335.71,-295 380.13,-299.39 410.68,-302.41"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="410.57,-305.92 420.87,-303.42 411.26,-298.95 410.57,-305.92"/>
 </g>
-<!-- proc~is_rational~2 -->
+<!-- proc~is_rational~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_node13" class="node">
-<title>proc~is_rational~2</title>
-<g id="a_program~~shape_half_ring_2d~~CallsGraph_node13"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<title>proc~is_rational~3</title>
+<g id="a_program~~shape_half_ring_2d~~CallsGraph_node13"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="524,-276 372,-276 372,-252 524,-252 524,-276"/>
 <text text-anchor="middle" x="448" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge9" class="edge">
-<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~create~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#ff0000" d="M299.12,-278.61C318.85,-276.66 340.85,-274.49 361.73,-272.43"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="362.27,-275.89 371.87,-271.42 361.58,-268.92 362.27,-275.89"/>
 </g>
-<!-- proc~cmp_elem_xc_vis~2 -->
+<!-- proc~cmp_elem_xc_vis~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_node11" class="node">
-<title>proc~cmp_elem_xc_vis~2</title>
-<g id="a_program~~shape_half_ring_2d~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis~3</title>
+<g id="a_program~~shape_half_ring_2d~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="543.5,-234 352.5,-234 352.5,-210 543.5,-210 543.5,-234"/>
 <text text-anchor="middle" x="448" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
+<!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge10" class="edge">
-<title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
+<title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
 <path fill="none" stroke="#ffff00" d="M308.52,-222C319.46,-222 330.89,-222 342.3,-222"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="342.31,-225.5 352.31,-222 342.31,-218.5 342.31,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~2 -->
+<!-- proc~cmp_elem_xg_vis~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_node12" class="node">
-<title>proc~cmp_elem_xg_vis~2</title>
-<g id="a_program~~shape_half_ring_2d~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis~3</title>
+<g id="a_program~~shape_half_ring_2d~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="544,-192 352,-192 352,-168 544,-168 544,-192"/>
 <text text-anchor="middle" x="448" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
+<!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge11" class="edge">
-<title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
+<title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
 <path fill="none" stroke="#00ff00" d="M309.12,-180C319.65,-180 330.64,-180 341.61,-180"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="341.67,-183.5 351.67,-180 341.67,-176.5 341.67,-183.5"/>
 </g>
-<!-- none~set~2 -->
+<!-- none~set~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_node10" class="node">
-<title>none~set~2</title>
-<g id="a_program~~shape_half_ring_2d~~CallsGraph_node10"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<title>none~set~3</title>
+<g id="a_program~~shape_half_ring_2d~~CallsGraph_node10"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="504.5,-108 391.5,-108 391.5,-84 504.5,-84 504.5,-108"/>
 <text text-anchor="middle" x="448" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_half_ring~2&#45;&gt;none~set~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge12" class="edge">
-<title>proc~set_half_ring~2&#45;&gt;none~set~2</title>
+<title>proc~set_half_ring~2&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#0000ff" d="M316.05,-96C337.58,-96 360.54,-96 381.12,-96"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="381.33,-99.5 391.33,-96 381.33,-92.5 381.33,-99.5"/>
 </g>
@@ -595,63 +595,63 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M475.02,-303.12C508.19,-299.46 565.69,-293.1 603.03,-288.98"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="603.43,-292.45 612.99,-287.87 602.67,-285.49 603.43,-292.45"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_node17" class="node">
-<title>proc~set1~2</title>
-<g id="a_program~~shape_half_ring_2d~~CallsGraph_node17"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<title>proc~set1~3</title>
+<g id="a_program~~shape_half_ring_2d~~CallsGraph_node17"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="700,-108 580,-108 580,-84 700,-84 700,-108"/>
 <text text-anchor="middle" x="640" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge15" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M504.72,-96C525.14,-96 548.5,-96 569.94,-96"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="569.97,-99.5 579.97,-96 569.97,-92.5 569.97,-99.5"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_node18" class="node">
-<title>proc~set2~2</title>
-<g id="a_program~~shape_half_ring_2d~~CallsGraph_node18"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<title>proc~set2~3</title>
+<g id="a_program~~shape_half_ring_2d~~CallsGraph_node18"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="700,-66 580,-66 580,-42 700,-42 700,-66"/>
 <text text-anchor="middle" x="640" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge16" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M503.45,-83.96C525.61,-79.07 551.39,-73.37 574.49,-68.26"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="575.54,-71.61 584.55,-66.04 574.03,-64.78 575.54,-71.61"/>
 </g>
-<!-- proc~set3~2 -->
+<!-- proc~set3~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_node19" class="node">
-<title>proc~set3~2</title>
-<g id="a_program~~shape_half_ring_2d~~CallsGraph_node19"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<title>proc~set3~3</title>
+<g id="a_program~~shape_half_ring_2d~~CallsGraph_node19"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="700,-150 580,-150 580,-126 700,-126 700,-150"/>
 <text text-anchor="middle" x="640" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge17" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
+<title>none~set~3&#45;&gt;proc~set3~3</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M503.45,-108.04C525.61,-112.93 551.39,-118.63 574.49,-123.74"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="574.03,-127.22 584.55,-125.96 575.54,-120.39 574.03,-127.22"/>
 </g>
-<!-- proc~set4~2 -->
+<!-- proc~set4~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_node20" class="node">
-<title>proc~set4~2</title>
-<g id="a_program~~shape_half_ring_2d~~CallsGraph_node20"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<title>proc~set4~3</title>
+<g id="a_program~~shape_half_ring_2d~~CallsGraph_node20"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="700,-24 580,-24 580,0 700,0 700,-24"/>
 <text text-anchor="middle" x="640" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set4~2 -->
+<!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge18" class="edge">
-<title>none~set~2&#45;&gt;proc~set4~2</title>
+<title>none~set~3&#45;&gt;proc~set4~3</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M472.32,-83.85C498.26,-70.57 541.57,-49.03 580,-33 584.41,-31.16 589.04,-29.34 593.69,-27.57"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="595.03,-30.81 603.2,-24.05 592.61,-24.24 595.03,-30.81"/>
 </g>
@@ -664,15 +664,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge19" class="edge">
-<title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#00ffff" d="M543.72,-222C558.24,-222 572.78,-222 585.96,-222"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="586.22,-225.5 596.22,-222 586.22,-218.5 586.22,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge20" class="edge">
-<title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#0000ff" d="M503.45,-192.04C529.49,-197.79 560.53,-204.65 586.34,-210.36"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="585.8,-213.82 596.31,-212.56 587.31,-206.99 585.8,-213.82"/>
 </g>
@@ -721,39 +721,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M683.93,-211.73C705.69,-206.52 732.46,-200.11 756.24,-194.42"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="757.32,-197.76 766.23,-192.03 755.69,-190.95 757.32,-197.76"/>
 </g>
-<!-- proc~cmp_degree~2 -->
+<!-- proc~cmp_degree~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_node21" class="node">
-<title>proc~cmp_degree~2</title>
-<g id="a_program~~shape_half_ring_2d~~CallsGraph_node21"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<title>proc~cmp_degree~3</title>
+<g id="a_program~~shape_half_ring_2d~~CallsGraph_node21"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="899,-150 736,-150 736,-126 899,-126 899,-150"/>
 <text text-anchor="middle" x="817.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge24" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#00ff91" d="M691.29,-108.04C711.58,-112.89 735.15,-118.53 756.34,-123.6"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="755.66,-127.04 766.2,-125.96 757.29,-120.23 755.66,-127.04"/>
 </g>
-<!-- proc~cmp_nc~2 -->
+<!-- proc~cmp_nc~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_node25" class="node">
-<title>proc~cmp_nc~2</title>
-<g id="a_program~~shape_half_ring_2d~~CallsGraph_node25"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<title>proc~cmp_nc~3</title>
+<g id="a_program~~shape_half_ring_2d~~CallsGraph_node25"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="887,-108 748,-108 748,-84 887,-84 887,-108"/>
 <text text-anchor="middle" x="817.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge25" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#00ff91" d="M700.42,-96C712.3,-96 724.97,-96 737.4,-96"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="737.76,-99.5 747.76,-96 737.76,-92.5 737.76,-99.5"/>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge26" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#0091ff" d="M691.29,-66.04C711.58,-70.89 735.15,-76.53 756.34,-81.6"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="755.66,-85.04 766.2,-83.96 757.29,-78.23 755.66,-85.04"/>
 </g>
@@ -766,30 +766,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge27" class="edge">
-<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#0091ff" d="M700.42,-54C714.26,-54 729.16,-54 743.51,-54"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="743.85,-57.5 753.85,-54 743.85,-50.5 743.85,-57.5"/>
 </g>
-<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge28" class="edge">
-<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#4800ff" d="M700.42,-138C708.64,-138 717.23,-138 725.86,-138"/>
 <polygon fill="#4800ff" stroke="#4800ff" points="725.98,-141.5 735.98,-138 725.98,-134.5 725.98,-141.5"/>
 </g>
-<!-- proc~get_multiplicity~2 -->
+<!-- proc~get_multiplicity~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_node28" class="node">
-<title>proc~get_multiplicity~2</title>
-<g id="a_program~~shape_half_ring_2d~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<title>proc~get_multiplicity~3</title>
+<g id="a_program~~shape_half_ring_2d~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1113,-149 935,-149 935,-125 1113,-125 1113,-149"/>
 <text text-anchor="middle" x="1024" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge29" class="edge">
-<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#ff0000" d="M899.03,-137.61C907.47,-137.56 916.11,-137.52 924.71,-137.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="924.8,-140.98 934.78,-137.43 924.76,-133.98 924.8,-140.98"/>
 </g>
@@ -802,9 +802,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge30" class="edge">
-<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0000ff" d="M887.14,-99.68C957.69,-103.47 1067.03,-109.33 1138.57,-113.17"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="1138.67,-116.68 1148.85,-113.72 1139.05,-109.69 1138.67,-116.68"/>
 </g>
@@ -853,9 +853,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1273.33,-109C1281.69,-107.91 1290.35,-106.78 1298.92,-105.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1299.44,-109.12 1308.9,-104.36 1298.53,-102.18 1299.44,-109.12"/>
 </g>
-<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_half_ring_2d~~CallsGraph_edge34" class="edge">
-<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M1113.17,-127.47C1121.77,-126.54 1130.42,-125.6 1138.82,-124.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1139.36,-128.16 1148.93,-123.6 1138.61,-121.2 1139.36,-128.16"/>
 </g>
@@ -962,7 +962,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~8"></span>
+              <span class="anchor" id="variable-shape~16"></span>
               type(<a href='../type/nurbs_surface.html'>nurbs_surface</a>)
             </td>
             <td>
@@ -1009,7 +1009,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/shape_half_ring_3d.html b/program/shape_half_ring_3d.html
index 1b25e6d49..90f73dc4a 100644
--- a/program/shape_half_ring_3d.html
+++ b/program/shape_half_ring_3d.html
@@ -115,7 +115,7 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/shape_half_ring_3d.html#variable-shape~20">shape</a>
+            <a class="list-group-item" href="../program/shape_half_ring_3d.html#variable-shape">shape</a>
         </div>
       </div>
     </div>
@@ -385,63 +385,63 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="115,-171 0,-171 0,-147 115,-147 115,-171"/>
 <text text-anchor="middle" x="57.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50">shape_half_ring_3d</text>
 </g>
-<!-- proc~create -->
+<!-- proc~create~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_node2" class="node">
-<title>proc~create</title>
-<g id="a_program~~shape_half_ring_3d~~CallsGraph_node2"><a xlink:href="../proc/create.html" xlink:title="nurbs_volume%create">
+<title>proc~create~2</title>
+<g id="a_program~~shape_half_ring_3d~~CallsGraph_node2"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_volume%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="299,-297 168,-297 168,-273 299,-273 299,-297"/>
 <text text-anchor="middle" x="233.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~create -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~create~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge1" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~create</title>
+<title>program~shape_half_ring_3d&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#ff0000" d="M69.91,-171.22C86.58,-188.62 119.1,-220.87 151,-243 164.84,-252.6 181.16,-261.44 195.55,-268.51"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="194.15,-271.72 204.68,-272.89 197.18,-265.41 194.15,-271.72"/>
 </g>
-<!-- proc~export_xc -->
+<!-- proc~export_xc~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_node3" class="node">
-<title>proc~export_xc</title>
-<g id="a_program~~shape_half_ring_3d~~CallsGraph_node3"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_volume%export_Xc">
+<title>proc~export_xc~2</title>
+<g id="a_program~~shape_half_ring_3d~~CallsGraph_node3"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_volume%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="308.5,-234 158.5,-234 158.5,-210 308.5,-210 308.5,-234"/>
 <text text-anchor="middle" x="233.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xc -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xc~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge2" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~export_xc</title>
+<title>program~shape_half_ring_3d&#45;&gt;proc~export_xc~2</title>
 <path fill="none" stroke="#ff0000" d="M81.99,-171.04C100.41,-180.15 126.88,-192.49 151,-201 157.06,-203.14 163.44,-205.16 169.85,-207.04"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="169.35,-210.54 179.92,-209.89 171.25,-203.8 169.35,-210.54"/>
 </g>
-<!-- proc~export_xg -->
+<!-- proc~export_xg~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_node4" class="node">
-<title>proc~export_xg</title>
-<g id="a_program~~shape_half_ring_3d~~CallsGraph_node4"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_volume%export_Xg">
+<title>proc~export_xg~2</title>
+<g id="a_program~~shape_half_ring_3d~~CallsGraph_node4"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_volume%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="309,-192 158,-192 158,-168 309,-168 309,-192"/>
 <text text-anchor="middle" x="233.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xg -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~export_xg~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge3" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~export_xg</title>
+<title>program~shape_half_ring_3d&#45;&gt;proc~export_xg~2</title>
 <path fill="none" stroke="#ff0000" d="M115.47,-165.88C125.87,-167.13 136.92,-168.46 147.91,-169.79"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="147.63,-173.28 157.98,-171.01 148.47,-166.33 147.63,-173.28"/>
 </g>
-<!-- proc~finalize -->
+<!-- proc~finalize~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_node5" class="node">
-<title>proc~finalize</title>
-<g id="a_program~~shape_half_ring_3d~~CallsGraph_node5"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_volume%finalize">
+<title>proc~finalize~2</title>
+<g id="a_program~~shape_half_ring_3d~~CallsGraph_node5"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_volume%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="301.5,-150 165.5,-150 165.5,-126 301.5,-126 301.5,-150"/>
 <text text-anchor="middle" x="233.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~finalize -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~finalize~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge4" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~finalize</title>
+<title>program~shape_half_ring_3d&#45;&gt;proc~finalize~2</title>
 <path fill="none" stroke="#ff0000" d="M115.47,-152.12C128.19,-150.59 141.88,-148.94 155.26,-147.32"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="155.9,-150.77 165.41,-146.1 155.06,-143.82 155.9,-150.77"/>
 </g>
@@ -460,33 +460,33 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M81.99,-146.96C100.41,-137.85 126.88,-125.51 151,-117 157.06,-114.86 163.44,-112.84 169.85,-110.96"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="171.25,-114.2 179.92,-108.11 169.35,-107.46 171.25,-114.2"/>
 </g>
-<!-- proc~show -->
+<!-- proc~show~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_node7" class="node">
-<title>proc~show</title>
-<g id="a_program~~shape_half_ring_3d~~CallsGraph_node7"><a xlink:href="../proc/show.html" xlink:title="nurbs_volume%show">
+<title>proc~show~2</title>
+<g id="a_program~~shape_half_ring_3d~~CallsGraph_node7"><a xlink:href="../proc/show~2.html" xlink:title="nurbs_volume%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="295.5,-66 171.5,-66 171.5,-42 295.5,-42 295.5,-66"/>
 <text text-anchor="middle" x="233.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%show</text>
 </a>
 </g>
 </g>
-<!-- program~shape_half_ring_3d&#45;&gt;proc~show -->
+<!-- program~shape_half_ring_3d&#45;&gt;proc~show~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge6" class="edge">
-<title>program~shape_half_ring_3d&#45;&gt;proc~show</title>
+<title>program~shape_half_ring_3d&#45;&gt;proc~show~2</title>
 <path fill="none" stroke="#ff0000" d="M68.51,-146.7C84.16,-128.29 116.25,-93.75 151,-75 154.69,-73.01 158.57,-71.2 162.57,-69.56"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="163.89,-72.8 172.03,-66.03 161.44,-66.25 163.89,-72.8"/>
 </g>
-<!-- interface~compute_xg -->
+<!-- interface~compute_xg~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_node8" class="node">
-<title>interface~compute_xg</title>
-<g id="a_program~~shape_half_ring_3d~~CallsGraph_node8"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~2</title>
+<g id="a_program~~shape_half_ring_3d~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="487.5,-360 408.5,-360 408.5,-336 487.5,-336 487.5,-360"/>
 <text text-anchor="middle" x="448" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;interface~compute_xg -->
+<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge7" class="edge">
-<title>proc~create&#45;&gt;interface~compute_xg</title>
+<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
 <path fill="none" stroke="#ff0000" d="M265.08,-297.13C288.59,-306.16 322.02,-318.37 352,-327 366.9,-331.29 383.33,-335.21 398.28,-338.46"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="397.85,-341.95 408.36,-340.61 399.31,-335.1 397.85,-341.95"/>
 </g>
@@ -499,69 +499,69 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;interface~ndgrid -->
+<!-- proc~create~2&#45;&gt;interface~ndgrid -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge8" class="edge">
-<title>proc~create&#45;&gt;interface~ndgrid</title>
+<title>proc~create~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M299.12,-291.39C335.71,-295 380.13,-299.39 410.68,-302.41"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="410.57,-305.92 420.87,-303.42 411.26,-298.95 410.57,-305.92"/>
 </g>
-<!-- proc~is_rational -->
+<!-- proc~is_rational~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_node13" class="node">
-<title>proc~is_rational</title>
-<g id="a_program~~shape_half_ring_3d~~CallsGraph_node13"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
+<title>proc~is_rational~2</title>
+<g id="a_program~~shape_half_ring_3d~~CallsGraph_node13"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="524,-276 372,-276 372,-252 524,-252 524,-276"/>
 <text text-anchor="middle" x="448" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;proc~is_rational -->
+<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge9" class="edge">
-<title>proc~create&#45;&gt;proc~is_rational</title>
+<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
 <path fill="none" stroke="#ff0000" d="M299.12,-278.61C318.85,-276.66 340.85,-274.49 361.73,-272.43"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="362.27,-275.89 371.87,-271.42 361.58,-268.92 362.27,-275.89"/>
 </g>
-<!-- proc~cmp_elem_xc_vis -->
+<!-- proc~cmp_elem_xc_vis~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_node11" class="node">
-<title>proc~cmp_elem_xc_vis</title>
-<g id="a_program~~shape_half_ring_3d~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis~2</title>
+<g id="a_program~~shape_half_ring_3d~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="543.5,-234 352.5,-234 352.5,-210 543.5,-210 543.5,-234"/>
 <text text-anchor="middle" x="448" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
+<!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge10" class="edge">
-<title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
+<title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
 <path fill="none" stroke="#ffff00" d="M308.52,-222C319.46,-222 330.89,-222 342.3,-222"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="342.31,-225.5 352.31,-222 342.31,-218.5 342.31,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis -->
+<!-- proc~cmp_elem_xg_vis~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_node12" class="node">
-<title>proc~cmp_elem_xg_vis</title>
-<g id="a_program~~shape_half_ring_3d~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis~2</title>
+<g id="a_program~~shape_half_ring_3d~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="544,-192 352,-192 352,-168 544,-168 544,-192"/>
 <text text-anchor="middle" x="448" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
+<!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge11" class="edge">
-<title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
+<title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
 <path fill="none" stroke="#00ff00" d="M309.12,-180C319.65,-180 330.64,-180 341.61,-180"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="341.67,-183.5 351.67,-180 341.67,-176.5 341.67,-183.5"/>
 </g>
-<!-- none~set -->
+<!-- none~set~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_node10" class="node">
-<title>none~set</title>
-<g id="a_program~~shape_half_ring_3d~~CallsGraph_node10"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
+<title>none~set~2</title>
+<g id="a_program~~shape_half_ring_3d~~CallsGraph_node10"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="504.5,-108 391.5,-108 391.5,-84 504.5,-84 504.5,-108"/>
 <text text-anchor="middle" x="448" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_half_ring&#45;&gt;none~set -->
+<!-- proc~set_half_ring&#45;&gt;none~set~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge12" class="edge">
-<title>proc~set_half_ring&#45;&gt;none~set</title>
+<title>proc~set_half_ring&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#0000ff" d="M316.05,-96C337.58,-96 360.54,-96 381.12,-96"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="381.33,-99.5 391.33,-96 381.33,-92.5 381.33,-99.5"/>
 </g>
@@ -595,63 +595,63 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M475.02,-303.12C508.19,-299.46 565.69,-293.1 603.03,-288.98"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="603.43,-292.45 612.99,-287.87 602.67,-285.49 603.43,-292.45"/>
 </g>
-<!-- proc~set1 -->
+<!-- proc~set1~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_node17" class="node">
-<title>proc~set1</title>
-<g id="a_program~~shape_half_ring_3d~~CallsGraph_node17"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
+<title>proc~set1~2</title>
+<g id="a_program~~shape_half_ring_3d~~CallsGraph_node17"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="700,-108 580,-108 580,-84 700,-84 700,-108"/>
 <text text-anchor="middle" x="640" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set1 -->
+<!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge15" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
+<title>none~set~2&#45;&gt;proc~set1~2</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M504.72,-96C525.14,-96 548.5,-96 569.94,-96"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="569.97,-99.5 579.97,-96 569.97,-92.5 569.97,-99.5"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set2~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_node18" class="node">
-<title>proc~set2</title>
-<g id="a_program~~shape_half_ring_3d~~CallsGraph_node18"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
+<title>proc~set2~2</title>
+<g id="a_program~~shape_half_ring_3d~~CallsGraph_node18"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="700,-66 580,-66 580,-42 700,-42 700,-66"/>
 <text text-anchor="middle" x="640" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set2 -->
+<!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge16" class="edge">
-<title>none~set&#45;&gt;proc~set2</title>
+<title>none~set~2&#45;&gt;proc~set2~2</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M503.45,-83.96C525.61,-79.07 551.39,-73.37 574.49,-68.26"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="575.54,-71.61 584.55,-66.04 574.03,-64.78 575.54,-71.61"/>
 </g>
-<!-- proc~set3 -->
+<!-- proc~set3~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_node19" class="node">
-<title>proc~set3</title>
-<g id="a_program~~shape_half_ring_3d~~CallsGraph_node19"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
+<title>proc~set3~2</title>
+<g id="a_program~~shape_half_ring_3d~~CallsGraph_node19"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="700,-150 580,-150 580,-126 700,-126 700,-150"/>
 <text text-anchor="middle" x="640" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set3 -->
+<!-- none~set~2&#45;&gt;proc~set3~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge17" class="edge">
-<title>none~set&#45;&gt;proc~set3</title>
+<title>none~set~2&#45;&gt;proc~set3~2</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M503.45,-108.04C525.61,-112.93 551.39,-118.63 574.49,-123.74"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="574.03,-127.22 584.55,-125.96 575.54,-120.39 574.03,-127.22"/>
 </g>
-<!-- proc~set4 -->
+<!-- proc~set4~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_node20" class="node">
-<title>proc~set4</title>
-<g id="a_program~~shape_half_ring_3d~~CallsGraph_node20"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
+<title>proc~set4~2</title>
+<g id="a_program~~shape_half_ring_3d~~CallsGraph_node20"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="700,-24 580,-24 580,0 700,0 700,-24"/>
 <text text-anchor="middle" x="640" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set4 -->
+<!-- none~set~2&#45;&gt;proc~set4~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge18" class="edge">
-<title>none~set&#45;&gt;proc~set4</title>
+<title>none~set~2&#45;&gt;proc~set4~2</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M472.32,-83.85C498.26,-70.57 541.57,-49.03 580,-33 584.41,-31.16 589.04,-29.34 593.69,-27.57"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="595.03,-30.81 603.2,-24.05 592.61,-24.24 595.03,-30.81"/>
 </g>
@@ -664,15 +664,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge19" class="edge">
-<title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#00ffff" d="M543.72,-222C558.24,-222 572.78,-222 585.96,-222"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="586.22,-225.5 596.22,-222 586.22,-218.5 586.22,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge20" class="edge">
-<title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#0000ff" d="M503.45,-192.04C529.49,-197.79 560.53,-204.65 586.34,-210.36"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="585.8,-213.82 596.31,-212.56 587.31,-206.99 585.8,-213.82"/>
 </g>
@@ -721,39 +721,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M683.93,-211.73C705.69,-206.52 732.46,-200.11 756.24,-194.42"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="757.32,-197.76 766.23,-192.03 755.69,-190.95 757.32,-197.76"/>
 </g>
-<!-- proc~cmp_degree -->
+<!-- proc~cmp_degree~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_node21" class="node">
-<title>proc~cmp_degree</title>
-<g id="a_program~~shape_half_ring_3d~~CallsGraph_node21"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
+<title>proc~cmp_degree~2</title>
+<g id="a_program~~shape_half_ring_3d~~CallsGraph_node21"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="899,-150 736,-150 736,-126 899,-126 899,-150"/>
 <text text-anchor="middle" x="817.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_degree -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge24" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#00ff91" d="M691.29,-108.04C711.58,-112.89 735.15,-118.53 756.34,-123.6"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="755.66,-127.04 766.2,-125.96 757.29,-120.23 755.66,-127.04"/>
 </g>
-<!-- proc~cmp_nc -->
+<!-- proc~cmp_nc~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_node25" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_program~~shape_half_ring_3d~~CallsGraph_node25"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
+<title>proc~cmp_nc~2</title>
+<g id="a_program~~shape_half_ring_3d~~CallsGraph_node25"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="887,-108 748,-108 748,-84 887,-84 887,-108"/>
 <text text-anchor="middle" x="817.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge25" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#00ff91" d="M700.42,-96C712.3,-96 724.97,-96 737.4,-96"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="737.76,-99.5 747.76,-96 737.76,-92.5 737.76,-99.5"/>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge26" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
+<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#0091ff" d="M691.29,-66.04C711.58,-70.89 735.15,-76.53 756.34,-81.6"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="755.66,-85.04 766.2,-83.96 757.29,-78.23 755.66,-85.04"/>
 </g>
@@ -766,30 +766,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge27" class="edge">
-<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#0091ff" d="M700.42,-54C714.26,-54 729.16,-54 743.51,-54"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="743.85,-57.5 753.85,-54 743.85,-50.5 743.85,-57.5"/>
 </g>
-<!-- proc~set3&#45;&gt;proc~cmp_degree -->
+<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge28" class="edge">
-<title>proc~set3&#45;&gt;proc~cmp_degree</title>
+<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#4800ff" d="M700.42,-138C708.64,-138 717.23,-138 725.86,-138"/>
 <polygon fill="#4800ff" stroke="#4800ff" points="725.98,-141.5 735.98,-138 725.98,-134.5 725.98,-141.5"/>
 </g>
-<!-- proc~get_multiplicity -->
+<!-- proc~get_multiplicity~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_node28" class="node">
-<title>proc~get_multiplicity</title>
-<g id="a_program~~shape_half_ring_3d~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
+<title>proc~get_multiplicity~2</title>
+<g id="a_program~~shape_half_ring_3d~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1113,-149 935,-149 935,-125 1113,-125 1113,-149"/>
 <text text-anchor="middle" x="1024" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
+<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge29" class="edge">
-<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
+<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
 <path fill="none" stroke="#ff0000" d="M899.03,-137.61C907.47,-137.56 916.11,-137.52 924.71,-137.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="924.8,-140.98 934.78,-137.43 924.76,-133.98 924.8,-140.98"/>
 </g>
@@ -802,9 +802,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge30" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0000ff" d="M887.14,-99.68C957.69,-103.47 1067.03,-109.33 1138.57,-113.17"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="1138.67,-116.68 1148.85,-113.72 1139.05,-109.69 1138.67,-116.68"/>
 </g>
@@ -853,9 +853,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1273.33,-109C1281.69,-107.91 1290.35,-106.78 1298.92,-105.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1299.44,-109.12 1308.9,-104.36 1298.53,-102.18 1299.44,-109.12"/>
 </g>
-<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_half_ring_3d~~CallsGraph_edge34" class="edge">
-<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M1113.17,-127.47C1121.77,-126.54 1130.42,-125.6 1138.82,-124.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1139.36,-128.16 1148.93,-123.6 1138.61,-121.2 1139.36,-128.16"/>
 </g>
@@ -962,7 +962,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~20"></span>
+              <span class="anchor" id="variable-shape"></span>
               type(<a href='../type/nurbs_volume.html'>nurbs_volume</a>)
             </td>
             <td>
@@ -1009,7 +1009,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/shape_hexahedron.html b/program/shape_hexahedron.html
index f175f2237..7ab36e147 100644
--- a/program/shape_hexahedron.html
+++ b/program/shape_hexahedron.html
@@ -115,7 +115,7 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/shape_hexahedron.html#variable-shape~21">shape</a>
+            <a class="list-group-item" href="../program/shape_hexahedron.html#variable-shape~3">shape</a>
         </div>
       </div>
     </div>
@@ -386,63 +386,63 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="113,-171 0,-171 0,-147 113,-147 113,-171"/>
 <text text-anchor="middle" x="56.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50">shape_hexahedron</text>
 </g>
-<!-- proc~create -->
+<!-- proc~create~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_node2" class="node">
-<title>proc~create</title>
-<g id="a_program~~shape_hexahedron~~CallsGraph_node2"><a xlink:href="../proc/create.html" xlink:title="nurbs_volume%create">
+<title>proc~create~2</title>
+<g id="a_program~~shape_hexahedron~~CallsGraph_node2"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_volume%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="305,-297 174,-297 174,-273 305,-273 305,-297"/>
 <text text-anchor="middle" x="239.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~create -->
+<!-- program~shape_hexahedron&#45;&gt;proc~create~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge1" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~create</title>
+<title>program~shape_hexahedron&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#ff0000" d="M68.38,-171.1C84.62,-188.64 116.76,-221.38 149,-243 163.87,-252.98 181.49,-261.8 197.15,-268.75"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="196.03,-272.08 206.6,-272.83 198.8,-265.65 196.03,-272.08"/>
 </g>
-<!-- proc~export_xc -->
+<!-- proc~export_xc~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_node3" class="node">
-<title>proc~export_xc</title>
-<g id="a_program~~shape_hexahedron~~CallsGraph_node3"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_volume%export_Xc">
+<title>proc~export_xc~2</title>
+<g id="a_program~~shape_hexahedron~~CallsGraph_node3"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_volume%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="314.5,-234 164.5,-234 164.5,-210 314.5,-210 314.5,-234"/>
 <text text-anchor="middle" x="239.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~export_xc -->
+<!-- program~shape_hexahedron&#45;&gt;proc~export_xc~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge2" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~export_xc</title>
+<title>program~shape_hexahedron&#45;&gt;proc~export_xc~2</title>
 <path fill="none" stroke="#ff0000" d="M80.29,-171.01C98.49,-180.22 124.86,-192.72 149,-201 155.75,-203.31 162.86,-205.46 170.02,-207.43"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="169.21,-210.83 179.77,-209.99 170.99,-204.06 169.21,-210.83"/>
 </g>
-<!-- proc~export_xg -->
+<!-- proc~export_xg~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_node4" class="node">
-<title>proc~export_xg</title>
-<g id="a_program~~shape_hexahedron~~CallsGraph_node4"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_volume%export_Xg">
+<title>proc~export_xg~2</title>
+<g id="a_program~~shape_hexahedron~~CallsGraph_node4"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_volume%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="315,-192 164,-192 164,-168 315,-168 315,-192"/>
 <text text-anchor="middle" x="239.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~export_xg -->
+<!-- program~shape_hexahedron&#45;&gt;proc~export_xg~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge3" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~export_xg</title>
+<title>program~shape_hexahedron&#45;&gt;proc~export_xg~2</title>
 <path fill="none" stroke="#ff0000" d="M113.28,-165.47C126.15,-166.97 140.13,-168.59 153.92,-170.19"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="153.58,-173.67 163.92,-171.35 154.39,-166.72 153.58,-173.67"/>
 </g>
-<!-- proc~finalize -->
+<!-- proc~finalize~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_node5" class="node">
-<title>proc~finalize</title>
-<g id="a_program~~shape_hexahedron~~CallsGraph_node5"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_volume%finalize">
+<title>proc~finalize~2</title>
+<g id="a_program~~shape_hexahedron~~CallsGraph_node5"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_volume%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="307.5,-150 171.5,-150 171.5,-126 307.5,-126 307.5,-150"/>
 <text text-anchor="middle" x="239.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~finalize -->
+<!-- program~shape_hexahedron&#45;&gt;proc~finalize~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge4" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~finalize</title>
+<title>program~shape_hexahedron&#45;&gt;proc~finalize~2</title>
 <path fill="none" stroke="#ff0000" d="M113.28,-152.53C128.51,-150.76 145.28,-148.82 161.46,-146.94"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="161.91,-150.41 171.44,-145.78 161.11,-143.46 161.91,-150.41"/>
 </g>
@@ -461,33 +461,33 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M80.29,-146.99C98.49,-137.78 124.86,-125.28 149,-117 155.75,-114.69 162.86,-112.54 170.02,-110.57"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="170.99,-113.94 179.77,-108.01 169.21,-107.17 170.99,-113.94"/>
 </g>
-<!-- proc~show -->
+<!-- proc~show~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_node7" class="node">
-<title>proc~show</title>
-<g id="a_program~~shape_hexahedron~~CallsGraph_node7"><a xlink:href="../proc/show.html" xlink:title="nurbs_volume%show">
+<title>proc~show~2</title>
+<g id="a_program~~shape_hexahedron~~CallsGraph_node7"><a xlink:href="../proc/show~2.html" xlink:title="nurbs_volume%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="301.5,-66 177.5,-66 177.5,-42 301.5,-42 301.5,-66"/>
 <text text-anchor="middle" x="239.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%show</text>
 </a>
 </g>
 </g>
-<!-- program~shape_hexahedron&#45;&gt;proc~show -->
+<!-- program~shape_hexahedron&#45;&gt;proc~show~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge6" class="edge">
-<title>program~shape_hexahedron&#45;&gt;proc~show</title>
+<title>program~shape_hexahedron&#45;&gt;proc~show~2</title>
 <path fill="none" stroke="#ff0000" d="M67.07,-146.91C82.35,-128.45 114.12,-93.45 149,-75 154.88,-71.89 161.21,-69.24 167.7,-66.97"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="168.81,-70.29 177.28,-63.93 166.69,-63.62 168.81,-70.29"/>
 </g>
-<!-- interface~compute_xg -->
+<!-- interface~compute_xg~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_node8" class="node">
-<title>interface~compute_xg</title>
-<g id="a_program~~shape_hexahedron~~CallsGraph_node8"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~2</title>
+<g id="a_program~~shape_hexahedron~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="501.5,-360 422.5,-360 422.5,-336 501.5,-336 501.5,-360"/>
 <text text-anchor="middle" x="462" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;interface~compute_xg -->
+<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge7" class="edge">
-<title>proc~create&#45;&gt;interface~compute_xg</title>
+<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
 <path fill="none" stroke="#ff0000" d="M273.24,-297.01C298.39,-305.98 334.12,-318.17 366,-327 380.95,-331.14 397.39,-335.01 412.34,-338.28"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="411.9,-341.76 422.41,-340.43 413.36,-334.92 411.9,-341.76"/>
 </g>
@@ -500,69 +500,69 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;interface~ndgrid -->
+<!-- proc~create~2&#45;&gt;interface~ndgrid -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge8" class="edge">
-<title>proc~create&#45;&gt;interface~ndgrid</title>
+<title>proc~create~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M305.17,-291.16C344.1,-294.87 392.24,-299.45 424.62,-302.54"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="424.68,-306.06 434.96,-303.52 425.34,-299.09 424.68,-306.06"/>
 </g>
-<!-- proc~is_rational -->
+<!-- proc~is_rational~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_node14" class="node">
-<title>proc~is_rational</title>
-<g id="a_program~~shape_hexahedron~~CallsGraph_node14"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
+<title>proc~is_rational~2</title>
+<g id="a_program~~shape_hexahedron~~CallsGraph_node14"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="538,-276 386,-276 386,-252 538,-252 538,-276"/>
 <text text-anchor="middle" x="462" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;proc~is_rational -->
+<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge9" class="edge">
-<title>proc~create&#45;&gt;proc~is_rational</title>
+<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
 <path fill="none" stroke="#ff0000" d="M305.17,-278.84C327.29,-276.73 352.39,-274.34 375.89,-272.11"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="376.22,-275.59 385.84,-271.16 375.56,-268.62 376.22,-275.59"/>
 </g>
-<!-- proc~cmp_elem_xc_vis -->
+<!-- proc~cmp_elem_xc_vis~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_node11" class="node">
-<title>proc~cmp_elem_xc_vis</title>
-<g id="a_program~~shape_hexahedron~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis~2</title>
+<g id="a_program~~shape_hexahedron~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="557.5,-234 366.5,-234 366.5,-210 557.5,-210 557.5,-234"/>
 <text text-anchor="middle" x="462" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
+<!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge10" class="edge">
-<title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
+<title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
 <path fill="none" stroke="#ffff00" d="M314.54,-222C327.93,-222 342.12,-222 356.19,-222"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="356.4,-225.5 366.4,-222 356.4,-218.5 356.4,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis -->
+<!-- proc~cmp_elem_xg_vis~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_node12" class="node">
-<title>proc~cmp_elem_xg_vis</title>
-<g id="a_program~~shape_hexahedron~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis~2</title>
+<g id="a_program~~shape_hexahedron~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="558,-192 366,-192 366,-168 558,-168 558,-192"/>
 <text text-anchor="middle" x="462" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
+<!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge11" class="edge">
-<title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
+<title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
 <path fill="none" stroke="#00ff00" d="M315.15,-180C328.09,-180 341.77,-180 355.35,-180"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="355.71,-183.5 365.71,-180 355.71,-176.5 355.71,-183.5"/>
 </g>
-<!-- none~set -->
+<!-- none~set~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_node10" class="node">
-<title>none~set</title>
-<g id="a_program~~shape_hexahedron~~CallsGraph_node10"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
+<title>none~set~2</title>
+<g id="a_program~~shape_hexahedron~~CallsGraph_node10"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="518.5,-108 405.5,-108 405.5,-84 518.5,-84 518.5,-108"/>
 <text text-anchor="middle" x="462" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_hexahedron&#45;&gt;none~set -->
+<!-- proc~set_hexahedron&#45;&gt;none~set~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge12" class="edge">
-<title>proc~set_hexahedron&#45;&gt;none~set</title>
+<title>proc~set_hexahedron&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#0000ff" d="M330.19,-96C351.91,-96 374.74,-96 395.14,-96"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="395.25,-99.5 405.25,-96 395.25,-92.5 395.25,-99.5"/>
 </g>
@@ -611,63 +611,63 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ffda00" stroke-dasharray="5,2" d="M489.02,-303.12C522.19,-299.46 579.69,-293.1 617.03,-288.98"/>
 <polygon fill="#ffda00" stroke="#ffda00" points="617.43,-292.45 626.99,-287.87 616.67,-285.49 617.43,-292.45"/>
 </g>
-<!-- proc~set1 -->
+<!-- proc~set1~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_node18" class="node">
-<title>proc~set1</title>
-<g id="a_program~~shape_hexahedron~~CallsGraph_node18"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
+<title>proc~set1~2</title>
+<g id="a_program~~shape_hexahedron~~CallsGraph_node18"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="714,-108 594,-108 594,-84 714,-84 714,-108"/>
 <text text-anchor="middle" x="654" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set1 -->
+<!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge16" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
+<title>none~set~2&#45;&gt;proc~set1~2</title>
 <path fill="none" stroke="#48ff00" stroke-dasharray="5,2" d="M518.72,-96C539.14,-96 562.5,-96 583.94,-96"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="583.97,-99.5 593.97,-96 583.97,-92.5 583.97,-99.5"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set2~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_node19" class="node">
-<title>proc~set2</title>
-<g id="a_program~~shape_hexahedron~~CallsGraph_node19"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
+<title>proc~set2~2</title>
+<g id="a_program~~shape_hexahedron~~CallsGraph_node19"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="714,-66 594,-66 594,-42 714,-42 714,-66"/>
 <text text-anchor="middle" x="654" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set2 -->
+<!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge17" class="edge">
-<title>none~set&#45;&gt;proc~set2</title>
+<title>none~set~2&#45;&gt;proc~set2~2</title>
 <path fill="none" stroke="#48ff00" stroke-dasharray="5,2" d="M517.45,-83.96C539.61,-79.07 565.39,-73.37 588.49,-68.26"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="589.54,-71.61 598.55,-66.04 588.03,-64.78 589.54,-71.61"/>
 </g>
-<!-- proc~set3 -->
+<!-- proc~set3~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_node20" class="node">
-<title>proc~set3</title>
-<g id="a_program~~shape_hexahedron~~CallsGraph_node20"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
+<title>proc~set3~2</title>
+<g id="a_program~~shape_hexahedron~~CallsGraph_node20"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="714,-150 594,-150 594,-126 714,-126 714,-150"/>
 <text text-anchor="middle" x="654" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set3 -->
+<!-- none~set~2&#45;&gt;proc~set3~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge18" class="edge">
-<title>none~set&#45;&gt;proc~set3</title>
+<title>none~set~2&#45;&gt;proc~set3~2</title>
 <path fill="none" stroke="#48ff00" stroke-dasharray="5,2" d="M517.45,-108.04C539.61,-112.93 565.39,-118.63 588.49,-123.74"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="588.03,-127.22 598.55,-125.96 589.54,-120.39 588.03,-127.22"/>
 </g>
-<!-- proc~set4 -->
+<!-- proc~set4~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_node21" class="node">
-<title>proc~set4</title>
-<g id="a_program~~shape_hexahedron~~CallsGraph_node21"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
+<title>proc~set4~2</title>
+<g id="a_program~~shape_hexahedron~~CallsGraph_node21"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="714,-24 594,-24 594,0 714,0 714,-24"/>
 <text text-anchor="middle" x="654" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set4 -->
+<!-- none~set~2&#45;&gt;proc~set4~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge19" class="edge">
-<title>none~set&#45;&gt;proc~set4</title>
+<title>none~set~2&#45;&gt;proc~set4~2</title>
 <path fill="none" stroke="#48ff00" stroke-dasharray="5,2" d="M518.54,-89.95C532.1,-86.83 546.12,-82.12 558,-75 579.09,-62.36 573.74,-46.92 594,-33 596.35,-31.38 598.84,-29.88 601.42,-28.48"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="602.95,-31.62 610.42,-24.11 599.9,-25.32 602.95,-31.62"/>
 </g>
@@ -680,15 +680,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge20" class="edge">
-<title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#00ff91" d="M557.72,-222C572.24,-222 586.78,-222 599.96,-222"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="600.22,-225.5 610.22,-222 600.22,-218.5 600.22,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge21" class="edge">
-<title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#0091ff" d="M517.45,-192.04C543.49,-197.79 574.53,-204.65 600.34,-210.36"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="599.8,-213.82 610.31,-212.56 601.31,-206.99 599.8,-213.82"/>
 </g>
@@ -737,39 +737,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M697.93,-211.73C719.69,-206.52 746.46,-200.11 770.24,-194.42"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="771.32,-197.76 780.23,-192.03 769.69,-190.95 771.32,-197.76"/>
 </g>
-<!-- proc~cmp_degree -->
+<!-- proc~cmp_degree~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_node22" class="node">
-<title>proc~cmp_degree</title>
-<g id="a_program~~shape_hexahedron~~CallsGraph_node22"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
+<title>proc~cmp_degree~2</title>
+<g id="a_program~~shape_hexahedron~~CallsGraph_node22"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="913,-150 750,-150 750,-126 913,-126 913,-150"/>
 <text text-anchor="middle" x="831.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_degree -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge25" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#00ff91" d="M705.29,-108.04C725.58,-112.89 749.15,-118.53 770.34,-123.6"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="769.66,-127.04 780.2,-125.96 771.29,-120.23 769.66,-127.04"/>
 </g>
-<!-- proc~cmp_nc -->
+<!-- proc~cmp_nc~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_node26" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_program~~shape_hexahedron~~CallsGraph_node26"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
+<title>proc~cmp_nc~2</title>
+<g id="a_program~~shape_hexahedron~~CallsGraph_node26"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="901,-108 762,-108 762,-84 901,-84 901,-108"/>
 <text text-anchor="middle" x="831.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge26" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#00ff91" d="M714.42,-96C726.3,-96 738.97,-96 751.4,-96"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="751.76,-99.5 761.76,-96 751.76,-92.5 751.76,-99.5"/>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge27" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
+<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#0091ff" d="M705.29,-66.04C725.58,-70.89 749.15,-76.53 770.34,-81.6"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="769.66,-85.04 780.2,-83.96 771.29,-78.23 769.66,-85.04"/>
 </g>
@@ -782,30 +782,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge28" class="edge">
-<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#0091ff" d="M714.42,-54C728.26,-54 743.16,-54 757.51,-54"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="757.85,-57.5 767.85,-54 757.85,-50.5 757.85,-57.5"/>
 </g>
-<!-- proc~set3&#45;&gt;proc~cmp_degree -->
+<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge29" class="edge">
-<title>proc~set3&#45;&gt;proc~cmp_degree</title>
+<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#4800ff" d="M714.42,-138C722.64,-138 731.23,-138 739.86,-138"/>
 <polygon fill="#4800ff" stroke="#4800ff" points="739.98,-141.5 749.98,-138 739.98,-134.5 739.98,-141.5"/>
 </g>
-<!-- proc~get_multiplicity -->
+<!-- proc~get_multiplicity~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_node29" class="node">
-<title>proc~get_multiplicity</title>
-<g id="a_program~~shape_hexahedron~~CallsGraph_node29"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
+<title>proc~get_multiplicity~2</title>
+<g id="a_program~~shape_hexahedron~~CallsGraph_node29"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1127,-149 949,-149 949,-125 1127,-125 1127,-149"/>
 <text text-anchor="middle" x="1038" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
+<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge30" class="edge">
-<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
+<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
 <path fill="none" stroke="#ff0000" d="M913.03,-137.61C921.47,-137.56 930.11,-137.52 938.71,-137.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="938.8,-140.98 948.78,-137.43 938.76,-133.98 938.8,-140.98"/>
 </g>
@@ -818,9 +818,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge31" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0000ff" d="M901.14,-99.68C971.69,-103.47 1081.03,-109.33 1152.57,-113.17"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="1152.67,-116.68 1162.85,-113.72 1153.05,-109.69 1152.67,-116.68"/>
 </g>
@@ -869,9 +869,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1287.33,-109C1295.69,-107.91 1304.35,-106.78 1312.92,-105.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1313.44,-109.12 1322.9,-104.36 1312.53,-102.18 1313.44,-109.12"/>
 </g>
-<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_hexahedron~~CallsGraph_edge35" class="edge">
-<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M1127.17,-127.47C1135.77,-126.54 1144.42,-125.6 1152.82,-124.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1153.36,-128.16 1162.93,-123.6 1152.61,-121.2 1153.36,-128.16"/>
 </g>
@@ -978,7 +978,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~21"></span>
+              <span class="anchor" id="variable-shape~3"></span>
               type(<a href='../type/nurbs_volume.html'>nurbs_volume</a>)
             </td>
             <td>
@@ -1025,7 +1025,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/shape_ring_2d.html b/program/shape_ring_2d.html
index 2c9459bda..fef0270d4 100644
--- a/program/shape_ring_2d.html
+++ b/program/shape_ring_2d.html
@@ -115,7 +115,7 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/shape_ring_2d.html#variable-shape~13">shape</a>
+            <a class="list-group-item" href="../program/shape_ring_2d.html#variable-shape~6">shape</a>
         </div>
       </div>
     </div>
@@ -385,63 +385,63 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="90,-171 0,-171 0,-147 90,-147 90,-171"/>
 <text text-anchor="middle" x="45" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50">shape_ring_2d</text>
 </g>
-<!-- proc~create~2 -->
+<!-- proc~create~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_node2" class="node">
-<title>proc~create~2</title>
-<g id="a_program~~shape_ring_2d~~CallsGraph_node2"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
+<title>proc~create~3</title>
+<g id="a_program~~shape_ring_2d~~CallsGraph_node2"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="267,-297 136,-297 136,-273 267,-273 267,-297"/>
 <text text-anchor="middle" x="201.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~create~2 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~create~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge1" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~create~2</title>
+<title>program~shape_ring_2d&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#ff0000" d="M55.64,-171.22C69.78,-188.61 97.56,-220.85 126,-243 138.16,-252.47 152.71,-261.16 165.71,-268.16"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="164.36,-271.4 174.84,-272.93 167.61,-265.2 164.36,-271.4"/>
 </g>
-<!-- proc~export_xc~2 -->
+<!-- proc~export_xc~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_node3" class="node">
-<title>proc~export_xc~2</title>
-<g id="a_program~~shape_ring_2d~~CallsGraph_node3"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_surface%export_Xc">
+<title>proc~export_xc~3</title>
+<g id="a_program~~shape_ring_2d~~CallsGraph_node3"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_surface%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="276.5,-234 126.5,-234 126.5,-210 276.5,-210 276.5,-234"/>
 <text text-anchor="middle" x="201.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~export_xc~2 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~export_xc~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge2" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~export_xc~2</title>
+<title>program~shape_ring_2d&#45;&gt;proc~export_xc~3</title>
 <path fill="none" stroke="#ff0000" d="M66.16,-171.09C82.01,-180.23 104.87,-192.58 126,-201 131.15,-203.05 136.57,-204.99 142.05,-206.79"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="141.33,-210.23 151.92,-209.89 143.43,-203.55 141.33,-210.23"/>
 </g>
-<!-- proc~export_xg~2 -->
+<!-- proc~export_xg~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_node4" class="node">
-<title>proc~export_xg~2</title>
-<g id="a_program~~shape_ring_2d~~CallsGraph_node4"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_surface%export_Xg">
+<title>proc~export_xg~3</title>
+<g id="a_program~~shape_ring_2d~~CallsGraph_node4"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_surface%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="277,-192 126,-192 126,-168 277,-168 277,-192"/>
 <text text-anchor="middle" x="201.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~export_xg~2 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~export_xg~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge3" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~export_xg~2</title>
+<title>program~shape_ring_2d&#45;&gt;proc~export_xg~3</title>
 <path fill="none" stroke="#ff0000" d="M90.27,-165.02C98.37,-166.12 107.07,-167.3 115.89,-168.5"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="115.5,-171.98 125.88,-169.86 116.44,-165.04 115.5,-171.98"/>
 </g>
-<!-- proc~finalize~2 -->
+<!-- proc~finalize~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_node5" class="node">
-<title>proc~finalize~2</title>
-<g id="a_program~~shape_ring_2d~~CallsGraph_node5"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_surface%finalize">
+<title>proc~finalize~3</title>
+<g id="a_program~~shape_ring_2d~~CallsGraph_node5"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_surface%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="269.5,-150 133.5,-150 133.5,-126 269.5,-126 269.5,-150"/>
 <text text-anchor="middle" x="201.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~finalize~2 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~finalize~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge4" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~finalize~2</title>
+<title>program~shape_ring_2d&#45;&gt;proc~finalize~3</title>
 <path fill="none" stroke="#ff0000" d="M90.27,-152.98C100.69,-151.57 112.09,-150.02 123.48,-148.47"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="124.02,-151.93 133.46,-147.11 123.08,-144.99 124.02,-151.93"/>
 </g>
@@ -460,33 +460,33 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M66.16,-146.91C82.01,-137.77 104.87,-125.42 126,-117 131.15,-114.95 136.57,-113.01 142.05,-111.21"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="143.43,-114.45 151.92,-108.11 141.33,-107.77 143.43,-114.45"/>
 </g>
-<!-- proc~show~2 -->
+<!-- proc~show~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_node7" class="node">
-<title>proc~show~2</title>
-<g id="a_program~~shape_ring_2d~~CallsGraph_node7"><a xlink:href="../proc/show~2.html" xlink:title="nurbs_surface%show">
+<title>proc~show~3</title>
+<g id="a_program~~shape_ring_2d~~CallsGraph_node7"><a xlink:href="../proc/show~3.html" xlink:title="nurbs_surface%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="263.5,-66 139.5,-66 139.5,-42 263.5,-42 263.5,-66"/>
 <text text-anchor="middle" x="201.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%show</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_2d&#45;&gt;proc~show~2 -->
+<!-- program~shape_ring_2d&#45;&gt;proc~show~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge6" class="edge">
-<title>program~shape_ring_2d&#45;&gt;proc~show~2</title>
+<title>program~shape_ring_2d&#45;&gt;proc~show~3</title>
 <path fill="none" stroke="#ff0000" d="M54.32,-146.74C67.42,-128.39 94.61,-93.92 126,-75 129.03,-73.18 132.22,-71.51 135.51,-69.98"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="137.1,-73.1 144.99,-66.03 134.41,-66.64 137.1,-73.1"/>
 </g>
-<!-- interface~compute_xg~2 -->
+<!-- interface~compute_xg~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_node8" class="node">
-<title>interface~compute_xg~2</title>
-<g id="a_program~~shape_ring_2d~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~3</title>
+<g id="a_program~~shape_ring_2d~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="448.5,-360 369.5,-360 369.5,-336 448.5,-336 448.5,-360"/>
 <text text-anchor="middle" x="409" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
+<!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge7" class="edge">
-<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
+<title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
 <path fill="none" stroke="#ff0000" d="M230.73,-297.04C252.82,-306.14 284.49,-318.48 313,-327 327.86,-331.44 344.28,-335.4 359.23,-338.65"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="358.8,-342.13 369.31,-340.78 360.25,-335.28 358.8,-342.13"/>
 </g>
@@ -499,69 +499,69 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~ndgrid -->
+<!-- proc~create~3&#45;&gt;interface~ndgrid -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge8" class="edge">
-<title>proc~create~2&#45;&gt;interface~ndgrid</title>
+<title>proc~create~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M267.24,-291.62C301.71,-295.14 342.83,-299.34 371.7,-302.29"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="371.44,-305.78 381.74,-303.32 372.15,-298.82 371.44,-305.78"/>
 </g>
-<!-- proc~is_rational~2 -->
+<!-- proc~is_rational~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_node13" class="node">
-<title>proc~is_rational~2</title>
-<g id="a_program~~shape_ring_2d~~CallsGraph_node13"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<title>proc~is_rational~3</title>
+<g id="a_program~~shape_ring_2d~~CallsGraph_node13"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="485,-276 333,-276 333,-252 485,-252 485,-276"/>
 <text text-anchor="middle" x="409" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge9" class="edge">
-<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~create~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#ff0000" d="M267.24,-278.38C284.81,-276.59 304.11,-274.62 322.63,-272.72"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="323.23,-276.18 332.82,-271.68 322.52,-269.22 323.23,-276.18"/>
 </g>
-<!-- proc~cmp_elem_xc_vis~2 -->
+<!-- proc~cmp_elem_xc_vis~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_node11" class="node">
-<title>proc~cmp_elem_xc_vis~2</title>
-<g id="a_program~~shape_ring_2d~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis~3</title>
+<g id="a_program~~shape_ring_2d~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="504.5,-234 313.5,-234 313.5,-210 504.5,-210 504.5,-234"/>
 <text text-anchor="middle" x="409" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
+<!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge10" class="edge">
-<title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
+<title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
 <path fill="none" stroke="#ffff00" d="M276.69,-222C285.29,-222 294.19,-222 303.1,-222"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="303.16,-225.5 313.16,-222 303.16,-218.5 303.16,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~2 -->
+<!-- proc~cmp_elem_xg_vis~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_node12" class="node">
-<title>proc~cmp_elem_xg_vis~2</title>
-<g id="a_program~~shape_ring_2d~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis~3</title>
+<g id="a_program~~shape_ring_2d~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="505,-192 313,-192 313,-168 505,-168 505,-192"/>
 <text text-anchor="middle" x="409" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
+<!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge11" class="edge">
-<title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
+<title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
 <path fill="none" stroke="#00ff00" d="M277.27,-180C285.6,-180 294.2,-180 302.82,-180"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="302.93,-183.5 312.93,-180 302.93,-176.5 302.93,-183.5"/>
 </g>
-<!-- none~set~2 -->
+<!-- none~set~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_node10" class="node">
-<title>none~set~2</title>
-<g id="a_program~~shape_ring_2d~~CallsGraph_node10"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<title>none~set~3</title>
+<g id="a_program~~shape_ring_2d~~CallsGraph_node10"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="465.5,-108 352.5,-108 352.5,-84 465.5,-84 465.5,-108"/>
 <text text-anchor="middle" x="409" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring~2&#45;&gt;none~set~2 -->
+<!-- proc~set_ring~2&#45;&gt;none~set~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge12" class="edge">
-<title>proc~set_ring~2&#45;&gt;none~set~2</title>
+<title>proc~set_ring~2&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#0000ff" d="M271.21,-96C294.08,-96 319.48,-96 342.13,-96"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="342.32,-99.5 352.32,-96 342.32,-92.5 342.32,-99.5"/>
 </g>
@@ -595,63 +595,63 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M436.02,-303.12C469.19,-299.46 526.69,-293.1 564.03,-288.98"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="564.43,-292.45 573.99,-287.87 563.67,-285.49 564.43,-292.45"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_node17" class="node">
-<title>proc~set1~2</title>
-<g id="a_program~~shape_ring_2d~~CallsGraph_node17"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<title>proc~set1~3</title>
+<g id="a_program~~shape_ring_2d~~CallsGraph_node17"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="661,-108 541,-108 541,-84 661,-84 661,-108"/>
 <text text-anchor="middle" x="601" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge15" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M465.72,-96C486.14,-96 509.5,-96 530.94,-96"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="530.97,-99.5 540.97,-96 530.97,-92.5 530.97,-99.5"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_node18" class="node">
-<title>proc~set2~2</title>
-<g id="a_program~~shape_ring_2d~~CallsGraph_node18"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<title>proc~set2~3</title>
+<g id="a_program~~shape_ring_2d~~CallsGraph_node18"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="661,-66 541,-66 541,-42 661,-42 661,-66"/>
 <text text-anchor="middle" x="601" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge16" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M464.45,-83.96C486.61,-79.07 512.39,-73.37 535.49,-68.26"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="536.54,-71.61 545.55,-66.04 535.03,-64.78 536.54,-71.61"/>
 </g>
-<!-- proc~set3~2 -->
+<!-- proc~set3~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_node19" class="node">
-<title>proc~set3~2</title>
-<g id="a_program~~shape_ring_2d~~CallsGraph_node19"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<title>proc~set3~3</title>
+<g id="a_program~~shape_ring_2d~~CallsGraph_node19"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="661,-150 541,-150 541,-126 661,-126 661,-150"/>
 <text text-anchor="middle" x="601" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge17" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
+<title>none~set~3&#45;&gt;proc~set3~3</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M464.45,-108.04C486.61,-112.93 512.39,-118.63 535.49,-123.74"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="535.03,-127.22 545.55,-125.96 536.54,-120.39 535.03,-127.22"/>
 </g>
-<!-- proc~set4~2 -->
+<!-- proc~set4~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_node20" class="node">
-<title>proc~set4~2</title>
-<g id="a_program~~shape_ring_2d~~CallsGraph_node20"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<title>proc~set4~3</title>
+<g id="a_program~~shape_ring_2d~~CallsGraph_node20"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="661,-24 541,-24 541,0 661,0 661,-24"/>
 <text text-anchor="middle" x="601" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set4~2 -->
+<!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge18" class="edge">
-<title>none~set~2&#45;&gt;proc~set4~2</title>
+<title>none~set~3&#45;&gt;proc~set4~3</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M433.32,-83.85C459.26,-70.57 502.57,-49.03 541,-33 545.41,-31.16 550.04,-29.34 554.69,-27.57"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="556.03,-30.81 564.2,-24.05 553.61,-24.24 556.03,-30.81"/>
 </g>
@@ -664,15 +664,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge19" class="edge">
-<title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#00ffff" d="M504.72,-222C519.24,-222 533.78,-222 546.96,-222"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="547.22,-225.5 557.22,-222 547.22,-218.5 547.22,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge20" class="edge">
-<title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#0000ff" d="M464.45,-192.04C490.49,-197.79 521.53,-204.65 547.34,-210.36"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="546.8,-213.82 557.31,-212.56 548.31,-206.99 546.8,-213.82"/>
 </g>
@@ -721,39 +721,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M644.93,-211.73C666.69,-206.52 693.46,-200.11 717.24,-194.42"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="718.32,-197.76 727.23,-192.03 716.69,-190.95 718.32,-197.76"/>
 </g>
-<!-- proc~cmp_degree~2 -->
+<!-- proc~cmp_degree~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_node21" class="node">
-<title>proc~cmp_degree~2</title>
-<g id="a_program~~shape_ring_2d~~CallsGraph_node21"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<title>proc~cmp_degree~3</title>
+<g id="a_program~~shape_ring_2d~~CallsGraph_node21"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="860,-150 697,-150 697,-126 860,-126 860,-150"/>
 <text text-anchor="middle" x="778.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge24" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#00ff91" d="M652.29,-108.04C672.58,-112.89 696.15,-118.53 717.34,-123.6"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="716.66,-127.04 727.2,-125.96 718.29,-120.23 716.66,-127.04"/>
 </g>
-<!-- proc~cmp_nc~2 -->
+<!-- proc~cmp_nc~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_node25" class="node">
-<title>proc~cmp_nc~2</title>
-<g id="a_program~~shape_ring_2d~~CallsGraph_node25"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<title>proc~cmp_nc~3</title>
+<g id="a_program~~shape_ring_2d~~CallsGraph_node25"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="848,-108 709,-108 709,-84 848,-84 848,-108"/>
 <text text-anchor="middle" x="778.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge25" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#00ff91" d="M661.42,-96C673.3,-96 685.97,-96 698.4,-96"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="698.76,-99.5 708.76,-96 698.76,-92.5 698.76,-99.5"/>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge26" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#0091ff" d="M652.29,-66.04C672.58,-70.89 696.15,-76.53 717.34,-81.6"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="716.66,-85.04 727.2,-83.96 718.29,-78.23 716.66,-85.04"/>
 </g>
@@ -766,30 +766,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge27" class="edge">
-<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#0091ff" d="M661.42,-54C675.26,-54 690.16,-54 704.51,-54"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="704.85,-57.5 714.85,-54 704.85,-50.5 704.85,-57.5"/>
 </g>
-<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge28" class="edge">
-<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#4800ff" d="M661.42,-138C669.64,-138 678.23,-138 686.86,-138"/>
 <polygon fill="#4800ff" stroke="#4800ff" points="686.98,-141.5 696.98,-138 686.98,-134.5 686.98,-141.5"/>
 </g>
-<!-- proc~get_multiplicity~2 -->
+<!-- proc~get_multiplicity~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_node28" class="node">
-<title>proc~get_multiplicity~2</title>
-<g id="a_program~~shape_ring_2d~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<title>proc~get_multiplicity~3</title>
+<g id="a_program~~shape_ring_2d~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1074,-149 896,-149 896,-125 1074,-125 1074,-149"/>
 <text text-anchor="middle" x="985" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge29" class="edge">
-<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#ff0000" d="M860.03,-137.61C868.47,-137.56 877.11,-137.52 885.71,-137.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="885.8,-140.98 895.78,-137.43 885.76,-133.98 885.8,-140.98"/>
 </g>
@@ -802,9 +802,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge30" class="edge">
-<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0000ff" d="M848.14,-99.68C918.69,-103.47 1028.03,-109.33 1099.57,-113.17"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="1099.67,-116.68 1109.85,-113.72 1100.05,-109.69 1099.67,-116.68"/>
 </g>
@@ -853,9 +853,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1234.33,-109C1242.69,-107.91 1251.35,-106.78 1259.92,-105.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1260.44,-109.12 1269.9,-104.36 1259.53,-102.18 1260.44,-109.12"/>
 </g>
-<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_ring_2d~~CallsGraph_edge34" class="edge">
-<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M1074.17,-127.47C1082.77,-126.54 1091.42,-125.6 1099.82,-124.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1100.36,-128.16 1109.93,-123.6 1099.61,-121.2 1100.36,-128.16"/>
 </g>
@@ -962,7 +962,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~13"></span>
+              <span class="anchor" id="variable-shape~6"></span>
               type(<a href='../type/nurbs_surface.html'>nurbs_surface</a>)
             </td>
             <td>
@@ -1009,7 +1009,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/shape_ring_3d.html b/program/shape_ring_3d.html
index ea614c691..ae91eaa47 100644
--- a/program/shape_ring_3d.html
+++ b/program/shape_ring_3d.html
@@ -115,7 +115,7 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/shape_ring_3d.html#variable-shape~10">shape</a>
+            <a class="list-group-item" href="../program/shape_ring_3d.html#variable-shape~20">shape</a>
         </div>
       </div>
     </div>
@@ -385,63 +385,63 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="90,-171 0,-171 0,-147 90,-147 90,-171"/>
 <text text-anchor="middle" x="45" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50">shape_ring_3d</text>
 </g>
-<!-- proc~create -->
+<!-- proc~create~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_node2" class="node">
-<title>proc~create</title>
-<g id="a_program~~shape_ring_3d~~CallsGraph_node2"><a xlink:href="../proc/create.html" xlink:title="nurbs_volume%create">
+<title>proc~create~2</title>
+<g id="a_program~~shape_ring_3d~~CallsGraph_node2"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_volume%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="267,-297 136,-297 136,-273 267,-273 267,-297"/>
 <text text-anchor="middle" x="201.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%create</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~create -->
+<!-- program~shape_ring_3d&#45;&gt;proc~create~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge1" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~create</title>
+<title>program~shape_ring_3d&#45;&gt;proc~create~2</title>
 <path fill="none" stroke="#ff0000" d="M55.64,-171.22C69.78,-188.61 97.56,-220.85 126,-243 138.16,-252.47 152.71,-261.16 165.71,-268.16"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="164.36,-271.4 174.84,-272.93 167.61,-265.2 164.36,-271.4"/>
 </g>
-<!-- proc~export_xc -->
+<!-- proc~export_xc~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_node3" class="node">
-<title>proc~export_xc</title>
-<g id="a_program~~shape_ring_3d~~CallsGraph_node3"><a xlink:href="../proc/export_xc.html" xlink:title="nurbs_volume%export_Xc">
+<title>proc~export_xc~2</title>
+<g id="a_program~~shape_ring_3d~~CallsGraph_node3"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_volume%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="276.5,-234 126.5,-234 126.5,-210 276.5,-210 276.5,-234"/>
 <text text-anchor="middle" x="201.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~export_xc -->
+<!-- program~shape_ring_3d&#45;&gt;proc~export_xc~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge2" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~export_xc</title>
+<title>program~shape_ring_3d&#45;&gt;proc~export_xc~2</title>
 <path fill="none" stroke="#ff0000" d="M66.16,-171.09C82.01,-180.23 104.87,-192.58 126,-201 131.15,-203.05 136.57,-204.99 142.05,-206.79"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="141.33,-210.23 151.92,-209.89 143.43,-203.55 141.33,-210.23"/>
 </g>
-<!-- proc~export_xg -->
+<!-- proc~export_xg~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_node4" class="node">
-<title>proc~export_xg</title>
-<g id="a_program~~shape_ring_3d~~CallsGraph_node4"><a xlink:href="../proc/export_xg.html" xlink:title="nurbs_volume%export_Xg">
+<title>proc~export_xg~2</title>
+<g id="a_program~~shape_ring_3d~~CallsGraph_node4"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_volume%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="277,-192 126,-192 126,-168 277,-168 277,-192"/>
 <text text-anchor="middle" x="201.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~export_xg -->
+<!-- program~shape_ring_3d&#45;&gt;proc~export_xg~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge3" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~export_xg</title>
+<title>program~shape_ring_3d&#45;&gt;proc~export_xg~2</title>
 <path fill="none" stroke="#ff0000" d="M90.27,-165.02C98.37,-166.12 107.07,-167.3 115.89,-168.5"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="115.5,-171.98 125.88,-169.86 116.44,-165.04 115.5,-171.98"/>
 </g>
-<!-- proc~finalize -->
+<!-- proc~finalize~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_node5" class="node">
-<title>proc~finalize</title>
-<g id="a_program~~shape_ring_3d~~CallsGraph_node5"><a xlink:href="../proc/finalize.html" xlink:title="nurbs_volume%finalize">
+<title>proc~finalize~2</title>
+<g id="a_program~~shape_ring_3d~~CallsGraph_node5"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_volume%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="269.5,-150 133.5,-150 133.5,-126 269.5,-126 269.5,-150"/>
 <text text-anchor="middle" x="201.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~finalize -->
+<!-- program~shape_ring_3d&#45;&gt;proc~finalize~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge4" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~finalize</title>
+<title>program~shape_ring_3d&#45;&gt;proc~finalize~2</title>
 <path fill="none" stroke="#ff0000" d="M90.27,-152.98C100.69,-151.57 112.09,-150.02 123.48,-148.47"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="124.02,-151.93 133.46,-147.11 123.08,-144.99 124.02,-151.93"/>
 </g>
@@ -460,33 +460,33 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M66.16,-146.91C82.01,-137.77 104.87,-125.42 126,-117 131.15,-114.95 136.57,-113.01 142.05,-111.21"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="143.43,-114.45 151.92,-108.11 141.33,-107.77 143.43,-114.45"/>
 </g>
-<!-- proc~show -->
+<!-- proc~show~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_node7" class="node">
-<title>proc~show</title>
-<g id="a_program~~shape_ring_3d~~CallsGraph_node7"><a xlink:href="../proc/show.html" xlink:title="nurbs_volume%show">
+<title>proc~show~2</title>
+<g id="a_program~~shape_ring_3d~~CallsGraph_node7"><a xlink:href="../proc/show~2.html" xlink:title="nurbs_volume%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="263.5,-66 139.5,-66 139.5,-42 263.5,-42 263.5,-66"/>
 <text text-anchor="middle" x="201.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%show</text>
 </a>
 </g>
 </g>
-<!-- program~shape_ring_3d&#45;&gt;proc~show -->
+<!-- program~shape_ring_3d&#45;&gt;proc~show~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge6" class="edge">
-<title>program~shape_ring_3d&#45;&gt;proc~show</title>
+<title>program~shape_ring_3d&#45;&gt;proc~show~2</title>
 <path fill="none" stroke="#ff0000" d="M54.32,-146.74C67.42,-128.39 94.61,-93.92 126,-75 129.03,-73.18 132.22,-71.51 135.51,-69.98"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="137.1,-73.1 144.99,-66.03 134.41,-66.64 137.1,-73.1"/>
 </g>
-<!-- interface~compute_xg -->
+<!-- interface~compute_xg~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_node8" class="node">
-<title>interface~compute_xg</title>
-<g id="a_program~~shape_ring_3d~~CallsGraph_node8"><a xlink:href="../interface/compute_xg.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~2</title>
+<g id="a_program~~shape_ring_3d~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="448.5,-360 369.5,-360 369.5,-336 448.5,-336 448.5,-360"/>
 <text text-anchor="middle" x="409" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;interface~compute_xg -->
+<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge7" class="edge">
-<title>proc~create&#45;&gt;interface~compute_xg</title>
+<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
 <path fill="none" stroke="#ff0000" d="M230.73,-297.04C252.82,-306.14 284.49,-318.48 313,-327 327.86,-331.44 344.28,-335.4 359.23,-338.65"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="358.8,-342.13 369.31,-340.78 360.25,-335.28 358.8,-342.13"/>
 </g>
@@ -499,69 +499,69 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;interface~ndgrid -->
+<!-- proc~create~2&#45;&gt;interface~ndgrid -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge8" class="edge">
-<title>proc~create&#45;&gt;interface~ndgrid</title>
+<title>proc~create~2&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M267.24,-291.62C301.71,-295.14 342.83,-299.34 371.7,-302.29"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="371.44,-305.78 381.74,-303.32 372.15,-298.82 371.44,-305.78"/>
 </g>
-<!-- proc~is_rational -->
+<!-- proc~is_rational~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_node13" class="node">
-<title>proc~is_rational</title>
-<g id="a_program~~shape_ring_3d~~CallsGraph_node13"><a xlink:href="../proc/is_rational.html" xlink:title="nurbs_volume%is_rational">
+<title>proc~is_rational~2</title>
+<g id="a_program~~shape_ring_3d~~CallsGraph_node13"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_volume%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="485,-276 333,-276 333,-252 485,-252 485,-276"/>
 <text text-anchor="middle" x="409" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create&#45;&gt;proc~is_rational -->
+<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge9" class="edge">
-<title>proc~create&#45;&gt;proc~is_rational</title>
+<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
 <path fill="none" stroke="#ff0000" d="M267.24,-278.38C284.81,-276.59 304.11,-274.62 322.63,-272.72"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="323.23,-276.18 332.82,-271.68 322.52,-269.22 323.23,-276.18"/>
 </g>
-<!-- proc~cmp_elem_xc_vis -->
+<!-- proc~cmp_elem_xc_vis~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_node11" class="node">
-<title>proc~cmp_elem_xc_vis</title>
-<g id="a_program~~shape_ring_3d~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis~2</title>
+<g id="a_program~~shape_ring_3d~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="504.5,-234 313.5,-234 313.5,-210 504.5,-210 504.5,-234"/>
 <text text-anchor="middle" x="409" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis -->
+<!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge10" class="edge">
-<title>proc~export_xc&#45;&gt;proc~cmp_elem_xc_vis</title>
+<title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
 <path fill="none" stroke="#ffff00" d="M276.69,-222C285.29,-222 294.19,-222 303.1,-222"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="303.16,-225.5 313.16,-222 303.16,-218.5 303.16,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis -->
+<!-- proc~cmp_elem_xg_vis~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_node12" class="node">
-<title>proc~cmp_elem_xg_vis</title>
-<g id="a_program~~shape_ring_3d~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis~2</title>
+<g id="a_program~~shape_ring_3d~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_volume%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="505,-192 313,-192 313,-168 505,-168 505,-192"/>
 <text text-anchor="middle" x="409" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis -->
+<!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge11" class="edge">
-<title>proc~export_xg&#45;&gt;proc~cmp_elem_xg_vis</title>
+<title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
 <path fill="none" stroke="#00ff00" d="M277.27,-180C285.6,-180 294.2,-180 302.82,-180"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="302.93,-183.5 312.93,-180 302.93,-176.5 302.93,-183.5"/>
 </g>
-<!-- none~set -->
+<!-- none~set~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_node10" class="node">
-<title>none~set</title>
-<g id="a_program~~shape_ring_3d~~CallsGraph_node10"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set" xlink:title="nurbs_volume%set">
+<title>none~set~2</title>
+<g id="a_program~~shape_ring_3d~~CallsGraph_node10"><a xlink:href="../type/nurbs_volume.html#boundprocedure-set~2" xlink:title="nurbs_volume%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="465.5,-108 352.5,-108 352.5,-84 465.5,-84 465.5,-108"/>
 <text text-anchor="middle" x="409" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_ring&#45;&gt;none~set -->
+<!-- proc~set_ring&#45;&gt;none~set~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge12" class="edge">
-<title>proc~set_ring&#45;&gt;none~set</title>
+<title>proc~set_ring&#45;&gt;none~set~2</title>
 <path fill="none" stroke="#0000ff" d="M271.21,-96C294.08,-96 319.48,-96 342.13,-96"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="342.32,-99.5 352.32,-96 342.32,-92.5 342.32,-99.5"/>
 </g>
@@ -595,63 +595,63 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M436.02,-303.12C469.19,-299.46 526.69,-293.1 564.03,-288.98"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="564.43,-292.45 573.99,-287.87 563.67,-285.49 564.43,-292.45"/>
 </g>
-<!-- proc~set1 -->
+<!-- proc~set1~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_node17" class="node">
-<title>proc~set1</title>
-<g id="a_program~~shape_ring_3d~~CallsGraph_node17"><a xlink:href="../proc/set1.html" xlink:title="nurbs_volume%set1">
+<title>proc~set1~2</title>
+<g id="a_program~~shape_ring_3d~~CallsGraph_node17"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_volume%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="661,-108 541,-108 541,-84 661,-84 661,-108"/>
 <text text-anchor="middle" x="601" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set1 -->
+<!-- none~set~2&#45;&gt;proc~set1~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge15" class="edge">
-<title>none~set&#45;&gt;proc~set1</title>
+<title>none~set~2&#45;&gt;proc~set1~2</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M465.72,-96C486.14,-96 509.5,-96 530.94,-96"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="530.97,-99.5 540.97,-96 530.97,-92.5 530.97,-99.5"/>
 </g>
-<!-- proc~set2 -->
+<!-- proc~set2~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_node18" class="node">
-<title>proc~set2</title>
-<g id="a_program~~shape_ring_3d~~CallsGraph_node18"><a xlink:href="../proc/set2.html" xlink:title="nurbs_volume%set2">
+<title>proc~set2~2</title>
+<g id="a_program~~shape_ring_3d~~CallsGraph_node18"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_volume%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="661,-66 541,-66 541,-42 661,-42 661,-66"/>
 <text text-anchor="middle" x="601" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set2 -->
+<!-- none~set~2&#45;&gt;proc~set2~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge16" class="edge">
-<title>none~set&#45;&gt;proc~set2</title>
+<title>none~set~2&#45;&gt;proc~set2~2</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M464.45,-83.96C486.61,-79.07 512.39,-73.37 535.49,-68.26"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="536.54,-71.61 545.55,-66.04 535.03,-64.78 536.54,-71.61"/>
 </g>
-<!-- proc~set3 -->
+<!-- proc~set3~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_node19" class="node">
-<title>proc~set3</title>
-<g id="a_program~~shape_ring_3d~~CallsGraph_node19"><a xlink:href="../proc/set3.html" xlink:title="nurbs_volume%set3">
+<title>proc~set3~2</title>
+<g id="a_program~~shape_ring_3d~~CallsGraph_node19"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_volume%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="661,-150 541,-150 541,-126 661,-126 661,-150"/>
 <text text-anchor="middle" x="601" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set3 -->
+<!-- none~set~2&#45;&gt;proc~set3~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge17" class="edge">
-<title>none~set&#45;&gt;proc~set3</title>
+<title>none~set~2&#45;&gt;proc~set3~2</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M464.45,-108.04C486.61,-112.93 512.39,-118.63 535.49,-123.74"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="535.03,-127.22 545.55,-125.96 536.54,-120.39 535.03,-127.22"/>
 </g>
-<!-- proc~set4 -->
+<!-- proc~set4~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_node20" class="node">
-<title>proc~set4</title>
-<g id="a_program~~shape_ring_3d~~CallsGraph_node20"><a xlink:href="../proc/set4.html" xlink:title="nurbs_volume%set4">
+<title>proc~set4~2</title>
+<g id="a_program~~shape_ring_3d~~CallsGraph_node20"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_volume%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="661,-24 541,-24 541,0 661,0 661,-24"/>
 <text text-anchor="middle" x="601" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set&#45;&gt;proc~set4 -->
+<!-- none~set~2&#45;&gt;proc~set4~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge18" class="edge">
-<title>none~set&#45;&gt;proc~set4</title>
+<title>none~set~2&#45;&gt;proc~set4~2</title>
 <path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M433.32,-83.85C459.26,-70.57 502.57,-49.03 541,-33 545.41,-31.16 550.04,-29.34 554.69,-27.57"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="556.03,-30.81 564.2,-24.05 553.61,-24.24 556.03,-30.81"/>
 </g>
@@ -664,15 +664,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge19" class="edge">
-<title>proc~cmp_elem_xc_vis&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#00ffff" d="M504.72,-222C519.24,-222 533.78,-222 546.96,-222"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="547.22,-225.5 557.22,-222 547.22,-218.5 547.22,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge20" class="edge">
-<title>proc~cmp_elem_xg_vis&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#0000ff" d="M464.45,-192.04C490.49,-197.79 521.53,-204.65 547.34,-210.36"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="546.8,-213.82 557.31,-212.56 548.31,-206.99 546.8,-213.82"/>
 </g>
@@ -721,39 +721,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M644.93,-211.73C666.69,-206.52 693.46,-200.11 717.24,-194.42"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="718.32,-197.76 727.23,-192.03 716.69,-190.95 718.32,-197.76"/>
 </g>
-<!-- proc~cmp_degree -->
+<!-- proc~cmp_degree~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_node21" class="node">
-<title>proc~cmp_degree</title>
-<g id="a_program~~shape_ring_3d~~CallsGraph_node21"><a xlink:href="../proc/cmp_degree.html" xlink:title="nurbs_volume%cmp_degree">
+<title>proc~cmp_degree~2</title>
+<g id="a_program~~shape_ring_3d~~CallsGraph_node21"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_volume%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="860,-150 697,-150 697,-126 860,-126 860,-150"/>
 <text text-anchor="middle" x="778.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_degree -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge24" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_degree</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#00ff91" d="M652.29,-108.04C672.58,-112.89 696.15,-118.53 717.34,-123.6"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="716.66,-127.04 727.2,-125.96 718.29,-120.23 716.66,-127.04"/>
 </g>
-<!-- proc~cmp_nc -->
+<!-- proc~cmp_nc~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_node25" class="node">
-<title>proc~cmp_nc</title>
-<g id="a_program~~shape_ring_3d~~CallsGraph_node25"><a xlink:href="../proc/cmp_nc.html" xlink:title="nurbs_volume%cmp_nc">
+<title>proc~cmp_nc~2</title>
+<g id="a_program~~shape_ring_3d~~CallsGraph_node25"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_volume%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="848,-108 709,-108 709,-84 848,-84 848,-108"/>
 <text text-anchor="middle" x="778.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1&#45;&gt;proc~cmp_nc -->
+<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge25" class="edge">
-<title>proc~set1&#45;&gt;proc~cmp_nc</title>
+<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#00ff91" d="M661.42,-96C673.3,-96 685.97,-96 698.4,-96"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="698.76,-99.5 708.76,-96 698.76,-92.5 698.76,-99.5"/>
 </g>
-<!-- proc~set2&#45;&gt;proc~cmp_nc -->
+<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge26" class="edge">
-<title>proc~set2&#45;&gt;proc~cmp_nc</title>
+<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
 <path fill="none" stroke="#0091ff" d="M652.29,-66.04C672.58,-70.89 696.15,-76.53 717.34,-81.6"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="716.66,-85.04 727.2,-83.96 718.29,-78.23 716.66,-85.04"/>
 </g>
@@ -766,30 +766,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge27" class="edge">
-<title>proc~set2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#0091ff" d="M661.42,-54C675.26,-54 690.16,-54 704.51,-54"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="704.85,-57.5 714.85,-54 704.85,-50.5 704.85,-57.5"/>
 </g>
-<!-- proc~set3&#45;&gt;proc~cmp_degree -->
+<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge28" class="edge">
-<title>proc~set3&#45;&gt;proc~cmp_degree</title>
+<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
 <path fill="none" stroke="#4800ff" d="M661.42,-138C669.64,-138 678.23,-138 686.86,-138"/>
 <polygon fill="#4800ff" stroke="#4800ff" points="686.98,-141.5 696.98,-138 686.98,-134.5 686.98,-141.5"/>
 </g>
-<!-- proc~get_multiplicity -->
+<!-- proc~get_multiplicity~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_node28" class="node">
-<title>proc~get_multiplicity</title>
-<g id="a_program~~shape_ring_3d~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity.html" xlink:title="nurbs_volume%get_multiplicity">
+<title>proc~get_multiplicity~2</title>
+<g id="a_program~~shape_ring_3d~~CallsGraph_node28"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_volume%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1074,-149 896,-149 896,-125 1074,-125 1074,-149"/>
 <text text-anchor="middle" x="985" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_volume%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree&#45;&gt;proc~get_multiplicity -->
+<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge29" class="edge">
-<title>proc~cmp_degree&#45;&gt;proc~get_multiplicity</title>
+<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
 <path fill="none" stroke="#ff0000" d="M860.03,-137.61C868.47,-137.56 877.11,-137.52 885.71,-137.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="885.8,-140.98 895.78,-137.43 885.76,-133.98 885.8,-140.98"/>
 </g>
@@ -802,9 +802,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge30" class="edge">
-<title>proc~cmp_nc&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0000ff" d="M848.14,-99.68C918.69,-103.47 1028.03,-109.33 1099.57,-113.17"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="1099.67,-116.68 1109.85,-113.72 1100.05,-109.69 1099.67,-116.68"/>
 </g>
@@ -853,9 +853,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1234.33,-109C1242.69,-107.91 1251.35,-106.78 1259.92,-105.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1260.44,-109.12 1269.9,-104.36 1259.53,-102.18 1260.44,-109.12"/>
 </g>
-<!-- proc~get_multiplicity&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_ring_3d~~CallsGraph_edge34" class="edge">
-<title>proc~get_multiplicity&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M1074.17,-127.47C1082.77,-126.54 1091.42,-125.6 1099.82,-124.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1100.36,-128.16 1109.93,-123.6 1099.61,-121.2 1100.36,-128.16"/>
 </g>
@@ -962,7 +962,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~10"></span>
+              <span class="anchor" id="variable-shape~20"></span>
               type(<a href='../type/nurbs_volume.html'>nurbs_volume</a>)
             </td>
             <td>
@@ -1009,7 +1009,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/program/shape_tetragon.html b/program/shape_tetragon.html
index 4ec2cdbf0..093921091 100644
--- a/program/shape_tetragon.html
+++ b/program/shape_tetragon.html
@@ -115,7 +115,7 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../program/shape_tetragon.html#variable-shape~5">shape</a>
+            <a class="list-group-item" href="../program/shape_tetragon.html#variable-shape~11">shape</a>
         </div>
       </div>
     </div>
@@ -386,63 +386,63 @@ <h3 class="card-title">Calls</h3>
 <polygon fill="none" stroke="black" points="96,-171 0,-171 0,-147 96,-147 96,-171"/>
 <text text-anchor="middle" x="48" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50">shape_tetragon</text>
 </g>
-<!-- proc~create~2 -->
+<!-- proc~create~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_node2" class="node">
-<title>proc~create~2</title>
-<g id="a_program~~shape_tetragon~~CallsGraph_node2"><a xlink:href="../proc/create~2.html" xlink:title="nurbs_surface%create">
+<title>proc~create~3</title>
+<g id="a_program~~shape_tetragon~~CallsGraph_node2"><a xlink:href="../proc/create~3.html" xlink:title="nurbs_surface%create">
 <polygon fill="#d9534f" stroke="#d9534f" points="279.5,-297 148.5,-297 148.5,-273 279.5,-273 279.5,-297"/>
 <text text-anchor="middle" x="214" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%create</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~create~2 -->
+<!-- program~shape_tetragon&#45;&gt;proc~create~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge1" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~create~2</title>
+<title>program~shape_tetragon&#45;&gt;proc~create~3</title>
 <path fill="none" stroke="#ff0000" d="M58.75,-171.03C73.32,-188.48 102.29,-221.11 132,-243 145.16,-252.69 160.87,-261.4 174.94,-268.33"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="173.83,-271.68 184.36,-272.84 176.85,-265.37 173.83,-271.68"/>
 </g>
-<!-- proc~export_xc~2 -->
+<!-- proc~export_xc~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_node3" class="node">
-<title>proc~export_xc~2</title>
-<g id="a_program~~shape_tetragon~~CallsGraph_node3"><a xlink:href="../proc/export_xc~2.html" xlink:title="nurbs_surface%export_Xc">
+<title>proc~export_xc~3</title>
+<g id="a_program~~shape_tetragon~~CallsGraph_node3"><a xlink:href="../proc/export_xc~3.html" xlink:title="nurbs_surface%export_Xc">
 <polygon fill="#d9534f" stroke="#d9534f" points="289,-234 139,-234 139,-210 289,-210 289,-234"/>
 <text text-anchor="middle" x="214" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xc</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~export_xc~2 -->
+<!-- program~shape_tetragon&#45;&gt;proc~export_xc~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge2" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~export_xc~2</title>
+<title>program~shape_tetragon&#45;&gt;proc~export_xc~3</title>
 <path fill="none" stroke="#ff0000" d="M69.93,-171.18C86.37,-180.35 110.09,-192.73 132,-201 137.8,-203.19 143.91,-205.23 150.08,-207.12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="149.19,-210.5 159.77,-209.94 151.15,-203.78 149.19,-210.5"/>
 </g>
-<!-- proc~export_xg~2 -->
+<!-- proc~export_xg~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_node4" class="node">
-<title>proc~export_xg~2</title>
-<g id="a_program~~shape_tetragon~~CallsGraph_node4"><a xlink:href="../proc/export_xg~2.html" xlink:title="nurbs_surface%export_Xg">
+<title>proc~export_xg~3</title>
+<g id="a_program~~shape_tetragon~~CallsGraph_node4"><a xlink:href="../proc/export_xg~3.html" xlink:title="nurbs_surface%export_Xg">
 <polygon fill="#d9534f" stroke="#d9534f" points="289.5,-192 138.5,-192 138.5,-168 289.5,-168 289.5,-192"/>
 <text text-anchor="middle" x="214" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%export_Xg</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~export_xg~2 -->
+<!-- program~shape_tetragon&#45;&gt;proc~export_xg~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge3" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~export_xg~2</title>
+<title>program~shape_tetragon&#45;&gt;proc~export_xg~3</title>
 <path fill="none" stroke="#ff0000" d="M96.44,-165.07C106.5,-166.36 117.42,-167.76 128.4,-169.17"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="128.12,-172.66 138.48,-170.46 129.01,-165.72 128.12,-172.66"/>
 </g>
-<!-- proc~finalize~2 -->
+<!-- proc~finalize~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_node5" class="node">
-<title>proc~finalize~2</title>
-<g id="a_program~~shape_tetragon~~CallsGraph_node5"><a xlink:href="../proc/finalize~2.html" xlink:title="nurbs_surface%finalize">
+<title>proc~finalize~3</title>
+<g id="a_program~~shape_tetragon~~CallsGraph_node5"><a xlink:href="../proc/finalize~3.html" xlink:title="nurbs_surface%finalize">
 <polygon fill="#d9534f" stroke="#d9534f" points="282,-150 146,-150 146,-126 282,-126 282,-150"/>
 <text text-anchor="middle" x="214" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%finalize</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~finalize~2 -->
+<!-- program~shape_tetragon&#45;&gt;proc~finalize~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge4" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~finalize~2</title>
+<title>program~shape_tetragon&#45;&gt;proc~finalize~3</title>
 <path fill="none" stroke="#ff0000" d="M96.44,-152.93C108.72,-151.35 122.28,-149.62 135.67,-147.9"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="136.38,-151.34 145.85,-146.6 135.49,-144.4 136.38,-151.34"/>
 </g>
@@ -461,33 +461,33 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M69.93,-146.82C86.37,-137.65 110.09,-125.27 132,-117 137.8,-114.81 143.91,-112.77 150.08,-110.88"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="151.15,-114.22 159.77,-108.06 149.19,-107.5 151.15,-114.22"/>
 </g>
-<!-- proc~show~2 -->
+<!-- proc~show~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_node7" class="node">
-<title>proc~show~2</title>
-<g id="a_program~~shape_tetragon~~CallsGraph_node7"><a xlink:href="../proc/show~2.html" xlink:title="nurbs_surface%show">
+<title>proc~show~3</title>
+<g id="a_program~~shape_tetragon~~CallsGraph_node7"><a xlink:href="../proc/show~3.html" xlink:title="nurbs_surface%show">
 <polygon fill="#d9534f" stroke="#d9534f" points="276,-66 152,-66 152,-42 276,-42 276,-66"/>
 <text text-anchor="middle" x="214" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%show</text>
 </a>
 </g>
 </g>
-<!-- program~shape_tetragon&#45;&gt;proc~show~2 -->
+<!-- program~shape_tetragon&#45;&gt;proc~show~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge6" class="edge">
-<title>program~shape_tetragon&#45;&gt;proc~show~2</title>
+<title>program~shape_tetragon&#45;&gt;proc~show~3</title>
 <path fill="none" stroke="#ff0000" d="M57.47,-146.97C71.05,-128.6 99.49,-93.72 132,-75 135.28,-73.11 138.73,-71.39 142.28,-69.82"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="143.86,-72.96 151.87,-66.02 141.28,-66.45 143.86,-72.96"/>
 </g>
-<!-- interface~compute_xg~2 -->
+<!-- interface~compute_xg~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_node8" class="node">
-<title>interface~compute_xg~2</title>
-<g id="a_program~~shape_tetragon~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~2.html" xlink:title="compute_Xg">
+<title>interface~compute_xg~3</title>
+<g id="a_program~~shape_tetragon~~CallsGraph_node8"><a xlink:href="../interface/compute_xg~3.html" xlink:title="compute_Xg">
 <polygon fill="#a7506f" stroke="#a7506f" points="467.5,-360 388.5,-360 388.5,-336 467.5,-336 467.5,-360"/>
 <text text-anchor="middle" x="428" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">compute_Xg</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~compute_xg~2 -->
+<!-- proc~create~3&#45;&gt;interface~compute_xg~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge7" class="edge">
-<title>proc~create~2&#45;&gt;interface~compute_xg~2</title>
+<title>proc~create~3&#45;&gt;interface~compute_xg~3</title>
 <path fill="none" stroke="#ff0000" d="M245.44,-297.13C268.85,-306.17 302.14,-318.38 332,-327 346.9,-331.3 363.33,-335.22 378.28,-338.47"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="377.84,-341.96 388.35,-340.62 379.3,-335.11 377.84,-341.96"/>
 </g>
@@ -500,69 +500,69 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;interface~ndgrid -->
+<!-- proc~create~3&#45;&gt;interface~ndgrid -->
 <g id="program~~shape_tetragon~~CallsGraph_edge8" class="edge">
-<title>proc~create~2&#45;&gt;interface~ndgrid</title>
+<title>proc~create~3&#45;&gt;interface~ndgrid</title>
 <path fill="none" stroke="#ff0000" d="M279.76,-291.41C316.14,-295.02 360.2,-299.38 390.59,-302.39"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="390.44,-305.9 400.73,-303.4 391.13,-298.93 390.44,-305.9"/>
 </g>
-<!-- proc~is_rational~2 -->
+<!-- proc~is_rational~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_node13" class="node">
-<title>proc~is_rational~2</title>
-<g id="a_program~~shape_tetragon~~CallsGraph_node13"><a xlink:href="../proc/is_rational~2.html" xlink:title="nurbs_surface%is_rational">
+<title>proc~is_rational~3</title>
+<g id="a_program~~shape_tetragon~~CallsGraph_node13"><a xlink:href="../proc/is_rational~3.html" xlink:title="nurbs_surface%is_rational">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="504,-276 352,-276 352,-252 504,-252 504,-276"/>
 <text text-anchor="middle" x="428" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%is_rational</text>
 </a>
 </g>
 </g>
-<!-- proc~create~2&#45;&gt;proc~is_rational~2 -->
+<!-- proc~create~3&#45;&gt;proc~is_rational~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge9" class="edge">
-<title>proc~create~2&#45;&gt;proc~is_rational~2</title>
+<title>proc~create~3&#45;&gt;proc~is_rational~3</title>
 <path fill="none" stroke="#ff0000" d="M279.76,-278.59C299.33,-276.65 321.12,-274.49 341.81,-272.44"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="342.25,-275.91 351.86,-271.44 341.56,-268.95 342.25,-275.91"/>
 </g>
-<!-- proc~cmp_elem_xc_vis~2 -->
+<!-- proc~cmp_elem_xc_vis~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_node11" class="node">
-<title>proc~cmp_elem_xc_vis~2</title>
-<g id="a_program~~shape_tetragon~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
+<title>proc~cmp_elem_xc_vis~3</title>
+<g id="a_program~~shape_tetragon~~CallsGraph_node11"><a xlink:href="../proc/cmp_elem_xc_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xc_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="523.5,-234 332.5,-234 332.5,-210 523.5,-210 523.5,-234"/>
 <text text-anchor="middle" x="428" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xc_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2 -->
+<!-- proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge10" class="edge">
-<title>proc~export_xc~2&#45;&gt;proc~cmp_elem_xc_vis~2</title>
+<title>proc~export_xc~3&#45;&gt;proc~cmp_elem_xc_vis~3</title>
 <path fill="none" stroke="#ffff00" d="M289.15,-222C299.84,-222 311.02,-222 322.17,-222"/>
 <polygon fill="#ffff00" stroke="#ffff00" points="322.4,-225.5 332.4,-222 322.4,-218.5 322.4,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~2 -->
+<!-- proc~cmp_elem_xg_vis~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_node12" class="node">
-<title>proc~cmp_elem_xg_vis~2</title>
-<g id="a_program~~shape_tetragon~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis~2.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
+<title>proc~cmp_elem_xg_vis~3</title>
+<g id="a_program~~shape_tetragon~~CallsGraph_node12"><a xlink:href="../proc/cmp_elem_xg_vis~3.html" xlink:title="nurbs_surface%cmp_elem_Xg_vis">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="524,-192 332,-192 332,-168 524,-168 524,-192"/>
 <text text-anchor="middle" x="428" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_elem_Xg_vis</text>
 </a>
 </g>
 </g>
-<!-- proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2 -->
+<!-- proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge11" class="edge">
-<title>proc~export_xg~2&#45;&gt;proc~cmp_elem_xg_vis~2</title>
+<title>proc~export_xg~3&#45;&gt;proc~cmp_elem_xg_vis~3</title>
 <path fill="none" stroke="#00ff00" d="M289.74,-180C300.04,-180 310.77,-180 321.5,-180"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="321.76,-183.5 331.76,-180 321.76,-176.5 321.76,-183.5"/>
 </g>
-<!-- none~set~2 -->
+<!-- none~set~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_node10" class="node">
-<title>none~set~2</title>
-<g id="a_program~~shape_tetragon~~CallsGraph_node10"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~2" xlink:title="nurbs_surface%set">
+<title>none~set~3</title>
+<g id="a_program~~shape_tetragon~~CallsGraph_node10"><a xlink:href="../type/nurbs_surface.html#boundprocedure-set~3" xlink:title="nurbs_surface%set">
 <polygon fill="#a7506f" stroke="#a7506f" points="484.5,-108 371.5,-108 371.5,-84 484.5,-84 484.5,-108"/>
 <text text-anchor="middle" x="428" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set</text>
 </a>
 </g>
 </g>
-<!-- proc~set_tetragon&#45;&gt;none~set~2 -->
+<!-- proc~set_tetragon&#45;&gt;none~set~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge12" class="edge">
-<title>proc~set_tetragon&#45;&gt;none~set~2</title>
+<title>proc~set_tetragon&#45;&gt;none~set~3</title>
 <path fill="none" stroke="#0000ff" d="M296.06,-96C317.55,-96 340.51,-96 361.09,-96"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="361.3,-99.5 371.3,-96 361.3,-92.5 361.3,-99.5"/>
 </g>
@@ -611,63 +611,63 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ffda00" stroke-dasharray="5,2" d="M455.02,-303.12C488.19,-299.46 545.69,-293.1 583.03,-288.98"/>
 <polygon fill="#ffda00" stroke="#ffda00" points="583.43,-292.45 592.99,-287.87 582.67,-285.49 583.43,-292.45"/>
 </g>
-<!-- proc~set1~2 -->
+<!-- proc~set1~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_node18" class="node">
-<title>proc~set1~2</title>
-<g id="a_program~~shape_tetragon~~CallsGraph_node18"><a xlink:href="../proc/set1~2.html" xlink:title="nurbs_surface%set1">
+<title>proc~set1~3</title>
+<g id="a_program~~shape_tetragon~~CallsGraph_node18"><a xlink:href="../proc/set1~3.html" xlink:title="nurbs_surface%set1">
 <polygon fill="#d9534f" stroke="#d9534f" points="680,-108 560,-108 560,-84 680,-84 680,-108"/>
 <text text-anchor="middle" x="620" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set1</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set1~2 -->
+<!-- none~set~3&#45;&gt;proc~set1~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge16" class="edge">
-<title>none~set~2&#45;&gt;proc~set1~2</title>
+<title>none~set~3&#45;&gt;proc~set1~3</title>
 <path fill="none" stroke="#48ff00" stroke-dasharray="5,2" d="M484.72,-96C505.14,-96 528.5,-96 549.94,-96"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="549.97,-99.5 559.97,-96 549.97,-92.5 549.97,-99.5"/>
 </g>
-<!-- proc~set2~2 -->
+<!-- proc~set2~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_node19" class="node">
-<title>proc~set2~2</title>
-<g id="a_program~~shape_tetragon~~CallsGraph_node19"><a xlink:href="../proc/set2~2.html" xlink:title="nurbs_surface%set2">
+<title>proc~set2~3</title>
+<g id="a_program~~shape_tetragon~~CallsGraph_node19"><a xlink:href="../proc/set2~3.html" xlink:title="nurbs_surface%set2">
 <polygon fill="#d9534f" stroke="#d9534f" points="680,-66 560,-66 560,-42 680,-42 680,-66"/>
 <text text-anchor="middle" x="620" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set2</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set2~2 -->
+<!-- none~set~3&#45;&gt;proc~set2~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge17" class="edge">
-<title>none~set~2&#45;&gt;proc~set2~2</title>
+<title>none~set~3&#45;&gt;proc~set2~3</title>
 <path fill="none" stroke="#48ff00" stroke-dasharray="5,2" d="M483.45,-83.96C505.61,-79.07 531.39,-73.37 554.49,-68.26"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="555.54,-71.61 564.55,-66.04 554.03,-64.78 555.54,-71.61"/>
 </g>
-<!-- proc~set3~2 -->
+<!-- proc~set3~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_node20" class="node">
-<title>proc~set3~2</title>
-<g id="a_program~~shape_tetragon~~CallsGraph_node20"><a xlink:href="../proc/set3~2.html" xlink:title="nurbs_surface%set3">
+<title>proc~set3~3</title>
+<g id="a_program~~shape_tetragon~~CallsGraph_node20"><a xlink:href="../proc/set3~3.html" xlink:title="nurbs_surface%set3">
 <polygon fill="#d9534f" stroke="#d9534f" points="680,-150 560,-150 560,-126 680,-126 680,-150"/>
 <text text-anchor="middle" x="620" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set3</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set3~2 -->
+<!-- none~set~3&#45;&gt;proc~set3~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge18" class="edge">
-<title>none~set~2&#45;&gt;proc~set3~2</title>
+<title>none~set~3&#45;&gt;proc~set3~3</title>
 <path fill="none" stroke="#48ff00" stroke-dasharray="5,2" d="M483.45,-108.04C505.61,-112.93 531.39,-118.63 554.49,-123.74"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="554.03,-127.22 564.55,-125.96 555.54,-120.39 554.03,-127.22"/>
 </g>
-<!-- proc~set4~2 -->
+<!-- proc~set4~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_node21" class="node">
-<title>proc~set4~2</title>
-<g id="a_program~~shape_tetragon~~CallsGraph_node21"><a xlink:href="../proc/set4~2.html" xlink:title="nurbs_surface%set4">
+<title>proc~set4~3</title>
+<g id="a_program~~shape_tetragon~~CallsGraph_node21"><a xlink:href="../proc/set4~3.html" xlink:title="nurbs_surface%set4">
 <polygon fill="#d9534f" stroke="#d9534f" points="680,-24 560,-24 560,0 680,0 680,-24"/>
 <text text-anchor="middle" x="620" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%set4</text>
 </a>
 </g>
 </g>
-<!-- none~set~2&#45;&gt;proc~set4~2 -->
+<!-- none~set~3&#45;&gt;proc~set4~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge19" class="edge">
-<title>none~set~2&#45;&gt;proc~set4~2</title>
+<title>none~set~3&#45;&gt;proc~set4~3</title>
 <path fill="none" stroke="#48ff00" stroke-dasharray="5,2" d="M484.54,-89.95C498.1,-86.83 512.12,-82.12 524,-75 545.09,-62.36 539.74,-46.92 560,-33 562.35,-31.38 564.84,-29.88 567.42,-28.48"/>
 <polygon fill="#48ff00" stroke="#48ff00" points="568.95,-31.62 576.42,-24.11 565.9,-25.32 568.95,-31.62"/>
 </g>
@@ -680,15 +680,15 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge20" class="edge">
-<title>proc~cmp_elem_xc_vis~2&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xc_vis~3&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#00ff91" d="M523.72,-222C538.24,-222 552.78,-222 565.96,-222"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="566.22,-225.5 576.22,-222 566.22,-218.5 566.22,-225.5"/>
 </g>
-<!-- proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0 -->
+<!-- proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge21" class="edge">
-<title>proc~cmp_elem_xg_vis~2&#45;&gt;interface~elemconn_c0</title>
+<title>proc~cmp_elem_xg_vis~3&#45;&gt;interface~elemconn_c0</title>
 <path fill="none" stroke="#0091ff" d="M483.45,-192.04C509.49,-197.79 540.53,-204.65 566.34,-210.36"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="565.8,-213.82 576.31,-212.56 567.31,-206.99 565.8,-213.82"/>
 </g>
@@ -737,39 +737,39 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M663.93,-211.73C685.69,-206.52 712.46,-200.11 736.24,-194.42"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="737.32,-197.76 746.23,-192.03 735.69,-190.95 737.32,-197.76"/>
 </g>
-<!-- proc~cmp_degree~2 -->
+<!-- proc~cmp_degree~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_node22" class="node">
-<title>proc~cmp_degree~2</title>
-<g id="a_program~~shape_tetragon~~CallsGraph_node22"><a xlink:href="../proc/cmp_degree~2.html" xlink:title="nurbs_surface%cmp_degree">
+<title>proc~cmp_degree~3</title>
+<g id="a_program~~shape_tetragon~~CallsGraph_node22"><a xlink:href="../proc/cmp_degree~3.html" xlink:title="nurbs_surface%cmp_degree">
 <polygon fill="#d9534f" stroke="#d9534f" points="879,-150 716,-150 716,-126 879,-126 879,-150"/>
 <text text-anchor="middle" x="797.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_degree</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge25" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#00ff91" d="M671.29,-108.04C691.58,-112.89 715.15,-118.53 736.34,-123.6"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="735.66,-127.04 746.2,-125.96 737.29,-120.23 735.66,-127.04"/>
 </g>
-<!-- proc~cmp_nc~2 -->
+<!-- proc~cmp_nc~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_node26" class="node">
-<title>proc~cmp_nc~2</title>
-<g id="a_program~~shape_tetragon~~CallsGraph_node26"><a xlink:href="../proc/cmp_nc~2.html" xlink:title="nurbs_surface%cmp_nc">
+<title>proc~cmp_nc~3</title>
+<g id="a_program~~shape_tetragon~~CallsGraph_node26"><a xlink:href="../proc/cmp_nc~3.html" xlink:title="nurbs_surface%cmp_nc">
 <polygon fill="#d9534f" stroke="#d9534f" points="867,-108 728,-108 728,-84 867,-84 867,-108"/>
 <text text-anchor="middle" x="797.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%cmp_nc</text>
 </a>
 </g>
 </g>
-<!-- proc~set1~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set1~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge26" class="edge">
-<title>proc~set1~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set1~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#00ff91" d="M680.42,-96C692.3,-96 704.97,-96 717.4,-96"/>
 <polygon fill="#00ff91" stroke="#00ff91" points="717.76,-99.5 727.76,-96 717.76,-92.5 717.76,-99.5"/>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~cmp_nc~2 -->
+<!-- proc~set2~3&#45;&gt;proc~cmp_nc~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge27" class="edge">
-<title>proc~set2~2&#45;&gt;proc~cmp_nc~2</title>
+<title>proc~set2~3&#45;&gt;proc~cmp_nc~3</title>
 <path fill="none" stroke="#0091ff" d="M671.29,-66.04C691.58,-70.89 715.15,-76.53 736.34,-81.6"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="735.66,-85.04 746.2,-83.96 737.29,-78.23 735.66,-85.04"/>
 </g>
@@ -782,30 +782,30 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~set2~2&#45;&gt;proc~compute_knot_vector -->
+<!-- proc~set2~3&#45;&gt;proc~compute_knot_vector -->
 <g id="program~~shape_tetragon~~CallsGraph_edge28" class="edge">
-<title>proc~set2~2&#45;&gt;proc~compute_knot_vector</title>
+<title>proc~set2~3&#45;&gt;proc~compute_knot_vector</title>
 <path fill="none" stroke="#0091ff" d="M680.42,-54C694.26,-54 709.16,-54 723.51,-54"/>
 <polygon fill="#0091ff" stroke="#0091ff" points="723.85,-57.5 733.85,-54 723.85,-50.5 723.85,-57.5"/>
 </g>
-<!-- proc~set3~2&#45;&gt;proc~cmp_degree~2 -->
+<!-- proc~set3~3&#45;&gt;proc~cmp_degree~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge29" class="edge">
-<title>proc~set3~2&#45;&gt;proc~cmp_degree~2</title>
+<title>proc~set3~3&#45;&gt;proc~cmp_degree~3</title>
 <path fill="none" stroke="#4800ff" d="M680.42,-138C688.64,-138 697.23,-138 705.86,-138"/>
 <polygon fill="#4800ff" stroke="#4800ff" points="705.98,-141.5 715.98,-138 705.98,-134.5 705.98,-141.5"/>
 </g>
-<!-- proc~get_multiplicity~2 -->
+<!-- proc~get_multiplicity~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_node29" class="node">
-<title>proc~get_multiplicity~2</title>
-<g id="a_program~~shape_tetragon~~CallsGraph_node29"><a xlink:href="../proc/get_multiplicity~2.html" xlink:title="nurbs_surface%get_multiplicity">
+<title>proc~get_multiplicity~3</title>
+<g id="a_program~~shape_tetragon~~CallsGraph_node29"><a xlink:href="../proc/get_multiplicity~3.html" xlink:title="nurbs_surface%get_multiplicity">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="1093,-149 915,-149 915,-125 1093,-125 1093,-149"/>
 <text text-anchor="middle" x="1004" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nurbs_surface%get_multiplicity</text>
 </a>
 </g>
 </g>
-<!-- proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2 -->
+<!-- proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3 -->
 <g id="program~~shape_tetragon~~CallsGraph_edge30" class="edge">
-<title>proc~cmp_degree~2&#45;&gt;proc~get_multiplicity~2</title>
+<title>proc~cmp_degree~3&#45;&gt;proc~get_multiplicity~3</title>
 <path fill="none" stroke="#ff0000" d="M879.03,-137.61C887.47,-137.56 896.11,-137.52 904.71,-137.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="904.8,-140.98 914.78,-137.43 904.76,-133.98 904.8,-140.98"/>
 </g>
@@ -818,9 +818,9 @@ <h3 class="card-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_tetragon~~CallsGraph_edge31" class="edge">
-<title>proc~cmp_nc~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~cmp_nc~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#0000ff" d="M867.14,-99.68C937.69,-103.47 1047.03,-109.33 1118.57,-113.17"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="1118.67,-116.68 1128.85,-113.72 1119.05,-109.69 1118.67,-116.68"/>
 </g>
@@ -869,9 +869,9 @@ <h3 class="card-title">Calls</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M1253.33,-109C1261.69,-107.91 1270.35,-106.78 1278.92,-105.66"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="1279.44,-109.12 1288.9,-104.36 1278.53,-102.18 1279.44,-109.12"/>
 </g>
-<!-- proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity -->
+<!-- proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity -->
 <g id="program~~shape_tetragon~~CallsGraph_edge35" class="edge">
-<title>proc~get_multiplicity~2&#45;&gt;interface~compute_multiplicity</title>
+<title>proc~get_multiplicity~3&#45;&gt;interface~compute_multiplicity</title>
 <path fill="none" stroke="#00ff00" d="M1093.17,-127.47C1101.77,-126.54 1110.42,-125.6 1118.82,-124.7"/>
 <polygon fill="#00ff00" stroke="#00ff00" points="1119.36,-128.16 1128.93,-123.6 1118.61,-121.2 1119.36,-128.16"/>
 </g>
@@ -978,7 +978,7 @@ <h2>Variables</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-shape~5"></span>
+              <span class="anchor" id="variable-shape~11"></span>
               type(<a href='../type/nurbs_surface.html'>nurbs_surface</a>)
             </td>
             <td>
@@ -1025,7 +1025,7 @@ <h2>Variables</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/search.html b/search.html
index e342c7313..2bfcec2ac 100644
--- a/search.html
+++ b/search.html
@@ -101,7 +101,7 @@ <h1>Search Results</h1>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/cmp_area.f90.html b/sourcefile/cmp_area.f90.html
index 2cecfda36..f70405272 100644
--- a/sourcefile/cmp_area.f90.html
+++ b/sourcefile/cmp_area.f90.html
@@ -365,7 +365,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/cmp_length.f90.html b/sourcefile/cmp_length.f90.html
index 3f6c1984e..f17654742 100644
--- a/sourcefile/cmp_length.f90.html
+++ b/sourcefile/cmp_length.f90.html
@@ -362,7 +362,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/cmp_volume.f90.html b/sourcefile/cmp_volume.f90.html
index 74e8c832b..69425105e 100644
--- a/sourcefile/cmp_volume.f90.html
+++ b/sourcefile/cmp_volume.f90.html
@@ -370,7 +370,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/demo_curve.f90.html b/sourcefile/demo_curve.f90.html
index 6ddb83ea0..689a92a13 100644
--- a/sourcefile/demo_curve.f90.html
+++ b/sourcefile/demo_curve.f90.html
@@ -422,7 +422,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/demo_surface.f90.html b/sourcefile/demo_surface.f90.html
index 506a7d616..dfbe14a82 100644
--- a/sourcefile/demo_surface.f90.html
+++ b/sourcefile/demo_surface.f90.html
@@ -425,7 +425,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/demo_volume.f90.html b/sourcefile/demo_volume.f90.html
index d0cdd37f6..7489ff09b 100644
--- a/sourcefile/demo_volume.f90.html
+++ b/sourcefile/demo_volume.f90.html
@@ -420,7 +420,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/example_curve_1.f90.html b/sourcefile/example_curve_1.f90.html
index 7473f230d..175917af3 100644
--- a/sourcefile/example_curve_1.f90.html
+++ b/sourcefile/example_curve_1.f90.html
@@ -486,7 +486,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/example_ppm1.f90.html b/sourcefile/example_ppm1.f90.html
index 8a95de238..9169bc36c 100644
--- a/sourcefile/example_ppm1.f90.html
+++ b/sourcefile/example_ppm1.f90.html
@@ -709,7 +709,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/example_ppm2.f90.html b/sourcefile/example_ppm2.f90.html
index d2c571da1..38fd5b46b 100644
--- a/sourcefile/example_ppm2.f90.html
+++ b/sourcefile/example_ppm2.f90.html
@@ -718,7 +718,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/example_ppm3.f90.html b/sourcefile/example_ppm3.f90.html
index e6b39ab8c..3bd5ed23e 100644
--- a/sourcefile/example_ppm3.f90.html
+++ b/sourcefile/example_ppm3.f90.html
@@ -701,7 +701,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/example_surface_1.f90.html b/sourcefile/example_surface_1.f90.html
index 4f3ba96c0..82fcfc77a 100644
--- a/sourcefile/example_surface_1.f90.html
+++ b/sourcefile/example_surface_1.f90.html
@@ -517,7 +517,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/example_volume_1.f90.html b/sourcefile/example_volume_1.f90.html
index 2ee8d9000..411db1850 100644
--- a/sourcefile/example_volume_1.f90.html
+++ b/sourcefile/example_volume_1.f90.html
@@ -541,7 +541,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/forcad.f90.html b/sourcefile/forcad.f90.html
index 7263f6e5b..276aef574 100644
--- a/sourcefile/forcad.f90.html
+++ b/sourcefile/forcad.f90.html
@@ -835,7 +835,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/forcad_nurbs_curve.f90.html b/sourcefile/forcad_nurbs_curve.f90.html
index 9d06c22f7..4df4276f6 100644
--- a/sourcefile/forcad_nurbs_curve.f90.html
+++ b/sourcefile/forcad_nurbs_curve.f90.html
@@ -3243,7 +3243,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/forcad_nurbs_surface.f90.html b/sourcefile/forcad_nurbs_surface.f90.html
index efaf411f7..bc3de7a7a 100644
--- a/sourcefile/forcad_nurbs_surface.f90.html
+++ b/sourcefile/forcad_nurbs_surface.f90.html
@@ -4035,7 +4035,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/forcad_nurbs_volume.f90.html b/sourcefile/forcad_nurbs_volume.f90.html
index df8f01efc..77335cdab 100644
--- a/sourcefile/forcad_nurbs_volume.f90.html
+++ b/sourcefile/forcad_nurbs_volume.f90.html
@@ -4848,7 +4848,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/forcad_utils.f90.html b/sourcefile/forcad_utils.f90.html
index ee4e5894e..2d9695553 100644
--- a/sourcefile/forcad_utils.f90.html
+++ b/sourcefile/forcad_utils.f90.html
@@ -2000,7 +2000,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/nearest_point_1d.f90.html b/sourcefile/nearest_point_1d.f90.html
index b2544fb15..bc669fee4 100644
--- a/sourcefile/nearest_point_1d.f90.html
+++ b/sourcefile/nearest_point_1d.f90.html
@@ -417,7 +417,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/nearest_point_2d.f90.html b/sourcefile/nearest_point_2d.f90.html
index 51454192a..576a60895 100644
--- a/sourcefile/nearest_point_2d.f90.html
+++ b/sourcefile/nearest_point_2d.f90.html
@@ -411,7 +411,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/nearest_point_2d_bench.f90.html b/sourcefile/nearest_point_2d_bench.f90.html
index cd0db50ce..ffd2d5ac4 100644
--- a/sourcefile/nearest_point_2d_bench.f90.html
+++ b/sourcefile/nearest_point_2d_bench.f90.html
@@ -400,7 +400,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/nearest_point_3d.f90.html b/sourcefile/nearest_point_3d.f90.html
index 0a302706b..e19375cbc 100644
--- a/sourcefile/nearest_point_3d.f90.html
+++ b/sourcefile/nearest_point_3d.f90.html
@@ -418,7 +418,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/put_to_nurbs.f90.html b/sourcefile/put_to_nurbs.f90.html
index de73f2968..5ec74cb8d 100644
--- a/sourcefile/put_to_nurbs.f90.html
+++ b/sourcefile/put_to_nurbs.f90.html
@@ -404,7 +404,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/shape_c_1d.f90.html b/sourcefile/shape_c_1d.f90.html
index 72b9c0915..eb951c091 100644
--- a/sourcefile/shape_c_1d.f90.html
+++ b/sourcefile/shape_c_1d.f90.html
@@ -385,7 +385,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/shape_c_2d.f90.html b/sourcefile/shape_c_2d.f90.html
index baef12ecb..05da15ba1 100644
--- a/sourcefile/shape_c_2d.f90.html
+++ b/sourcefile/shape_c_2d.f90.html
@@ -385,7 +385,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/shape_c_3d.f90.html b/sourcefile/shape_c_3d.f90.html
index 26ed11b74..bb1feeff2 100644
--- a/sourcefile/shape_c_3d.f90.html
+++ b/sourcefile/shape_c_3d.f90.html
@@ -385,7 +385,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/shape_circle.f90.html b/sourcefile/shape_circle.f90.html
index b97763f7f..ad387e290 100644
--- a/sourcefile/shape_circle.f90.html
+++ b/sourcefile/shape_circle.f90.html
@@ -385,7 +385,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/shape_half_circle.f90.html b/sourcefile/shape_half_circle.f90.html
index 6add8188a..c0b964d9d 100644
--- a/sourcefile/shape_half_circle.f90.html
+++ b/sourcefile/shape_half_circle.f90.html
@@ -374,7 +374,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/shape_half_ring_2d.f90.html b/sourcefile/shape_half_ring_2d.f90.html
index 176a21dba..90a2c41c3 100644
--- a/sourcefile/shape_half_ring_2d.f90.html
+++ b/sourcefile/shape_half_ring_2d.f90.html
@@ -374,7 +374,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/shape_half_ring_3d.f90.html b/sourcefile/shape_half_ring_3d.f90.html
index 791e5ea14..e6e65337f 100644
--- a/sourcefile/shape_half_ring_3d.f90.html
+++ b/sourcefile/shape_half_ring_3d.f90.html
@@ -374,7 +374,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/shape_hexahedron.f90.html b/sourcefile/shape_hexahedron.f90.html
index 0068d3e76..24467a25c 100644
--- a/sourcefile/shape_hexahedron.f90.html
+++ b/sourcefile/shape_hexahedron.f90.html
@@ -380,7 +380,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/shape_ring_2d.f90.html b/sourcefile/shape_ring_2d.f90.html
index 013890214..8fbdd5125 100644
--- a/sourcefile/shape_ring_2d.f90.html
+++ b/sourcefile/shape_ring_2d.f90.html
@@ -374,7 +374,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/shape_ring_3d.f90.html b/sourcefile/shape_ring_3d.f90.html
index 6aa83c7f6..5c7482f62 100644
--- a/sourcefile/shape_ring_3d.f90.html
+++ b/sourcefile/shape_ring_3d.f90.html
@@ -374,7 +374,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/sourcefile/shape_tetragon.f90.html b/sourcefile/shape_tetragon.f90.html
index a3541f241..cc228662c 100644
--- a/sourcefile/shape_tetragon.f90.html
+++ b/sourcefile/shape_tetragon.f90.html
@@ -387,7 +387,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/tipuesearch/tipuesearch_content.js b/tipuesearch/tipuesearch_content.js
index 87aa0408a..9fdbd8c2d 100644
--- a/tipuesearch/tipuesearch_content.js
+++ b/tipuesearch/tipuesearch_content.js
@@ -1 +1 @@
-var tipuesearch = {"pages":[{"title":" ForCAD ","text":"ForCAD ForCAD : A parallel Fortran library for geometric modeling using NURBS (Non-Uniform Rational B-Splines). ForCAD supports B-Spline , NURBS , Bezier , and Rational Bezier curves, surfaces, and volumes. Main Features Parallelized using OpenMP and do concurrent . Create NURBS objects by specifying control points, weights and knots. Refine NURBS objects by inserting or removing knots and elevating degree. Compute basis functions and derivatives of NURBS objects. Obtain IGA elements connectivity. Obtain visualized elements connectivity and coordinates for geometry and control geometry. Mesh insertion into a NURBS object. Export NURBS objects to VTK files for visualization. Includes predefined NURBS shapes: Circle, Half Circle, Tetragon, Hexahedron, 2D Ring, Half 2D Ring, 3D Ring, Half 3D Ring, C-shapes. Rotate and translate NURBS objects. Visualization using provided python PyVista scripts. Examples Installation Requirements A Fortran compiler, such as GNU Fortran ( gfortran ), Intel Fortran Compiler ( ifx/ifort ) or NVIDIA HPC SDK Fortran compiler ( nvfortran ). The Fortran Package Manager fpm . Optional: PyVista (Recommended) or ParaView for visualization. Clone the repository Clone the ForCAD repository from GitHub: git clone https://github.com/gha3mi/forcad.git cd forcad Install PyVista (Optional) To install PyVista, run the following command: pip install pyvista Running Examples with fpm fpm run --example <file name excluding the .f90 extension> After executing the examples, .vtk files will be generated in the vtk directory. To visualize these files, a show() method is provided which utilizes PyVista. Alternatively, other visualization tools like ParaView can also be used. Using ForCAD as a fpm Dependency If you want to use ForCAD as a dependency in your own fpm project,\nyou can easily include it by adding the following line to your fpm.toml file: [dependencies] forcad = { git = \"https://github.com/gha3mi/forcad.git\" } API documentation The most up-to-date API documentation for the master branch is available here .\nTo generate the API documentation for ForCAD using ford run the following\ncommand: ford ford.yml Roadmap For a detailed roadmap outlining upcoming features and enhancements, please refer to ROADMAP.md . Contributing To contribute to ForCAD, please review the CONTRIBUTING.md . Citation If you use ForCAD in your research, please cite it as follows: @software { seyed_ali_ghasemi_2024_10904447 , author = {Ghasemi, S. A.} , title = {gha3mi/ForCAD} , year = 2024 , publisher = {Zenodo} , doi = {10.5281/zenodo.10904447} , url = {https://doi.org/10.5281/zenodo.10904447} } References Piegl, L., & Tiller, W. (1995). The NURBS Book. In Monographs in Visual Communications. Springer Berlin Heidelberg. https://doi.org/10.1007/978-3-642-97385-7 An Introduction to NURBS. (2001). Elsevier. https://doi.org/10.1016/b978-1-55860-669-2.x5000-3 Sullivan et al., (2019). PyVista: 3D plotting and mesh analysis through a streamlined interface for the Visualization Toolkit (VTK). Journal of Open Source Software, 4(37), 1450, https://doi.org/10.21105/joss.01450 Ahrens, James, Geveci, Berk, Law, Charles, ParaView: An End-User Tool for Large Data Visualization, Visualization Handbook, Elsevier, 2005, ISBN-13: 9780123875822 Developer Info Seyed Ali Ghasemi","tags":"home","loc":"index.html"},{"title":"nurbs_volume – ForCAD ","text":"type, public :: nurbs_volume Components Type Visibility Attributes Name Initial real(kind=rk), private, allocatable :: Wc (:) Weights for the control points (1D array: [nc(1) nc(2) nc(3)]) real(kind=rk), private, allocatable :: Xc (:,:) Control points (2D array: [nc(1) nc(2) nc(3), dim]) real(kind=rk), private, allocatable :: Xg (:,:) Geometry points (2D array: [ng(1) ng(2) ng(3), dim]) real(kind=rk), private, allocatable :: Xt (:,:) Evaluation parameter values (2D array: [ng(1) ng(2) ng(3), dim] real(kind=rk), private, allocatable :: Xt1 (:) Evaluation parameter values in the first direction (1D array: [ng(1)]) real(kind=rk), private, allocatable :: Xt2 (:) Evaluation parameter values in the second direction (1D array: [ng(2)]) real(kind=rk), private, allocatable :: Xt3 (:) Evaluation parameter values in the third direction (1D array: [ng(3)]) integer, private :: degree (3) Degree (order) of the volume integer, private, allocatable :: elemConn (:,:) IGA element connectivity integer, private, allocatable :: elemConn_Xc_vis (:,:) Connectivity for visualization of control points integer, private, allocatable :: elemConn_Xg_vis (:,:) Connectivity for visualization of geometry points real(kind=rk), private, allocatable :: knot1 (:) Knot vector in the first direction (1D array) real(kind=rk), private, allocatable :: knot2 (:) Knot vector in the second direction (1D array) real(kind=rk), private, allocatable :: knot3 (:) Knot vector in the third direction (1D array) integer, private :: nc (3) Number of control points in each direction integer, private :: ng (3) Number of geometry points in each direction Type-Bound Procedures procedure, public :: ansatz Compute the shape functions, derivative of shape functions and dV private pure subroutine ansatz (this, ie, ig, Tgc, dTgc_dXg, dV) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dV generic, public :: basis => basis_vector , basis_scalar Compute the basis functions of the NURBS volume private pure subroutine basis_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:) procedure, public :: cmp_Xg Compute geometry points private pure function cmp_Xg (this, Xt) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this real(kind=rk), intent(in), contiguous :: Xt (:) Return Value real(kind=rk), allocatable, (:) procedure, public :: cmp_degree Compute degree of the NURBS volume private pure subroutine cmp_degree (this, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: dir procedure, public :: cmp_degreeFace Compute degrees of the faces private pure function cmp_degreeFace (this, face) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: face Return Value integer, (3) procedure, public :: cmp_elem Generate IGA element connectivity private pure function cmp_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: cmp_elemFace Compute faces of the IGA elements private pure function cmp_elemFace (this, elem, face) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause number of nodes in each direction Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:) procedure, public :: cmp_elemFace_Xc_vis Compute faces of the control points private pure function cmp_elemFace_Xc_vis (this, elem, face) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause number of nodes in each direction Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:) procedure, public :: cmp_elemFace_Xg_vis Compute faces of the geometry points private pure function cmp_elemFace_Xg_vis (this, elem, face) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause number of nodes in each direction Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:) procedure, public :: cmp_elem_Xc_vis Generate connectivity for control points private pure function cmp_elem_Xc_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) procedure, public :: cmp_elem_Xg_vis Generate connectivity for geometry points private pure function cmp_elem_Xg_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) procedure, public :: cmp_nc Compute number of required control points private pure subroutine cmp_nc (this, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: dir procedure, public :: cmp_volume Compute the volume of the NURBS volume private pure subroutine cmp_volume (this, volume) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(out) :: volume procedure, public :: create Generate geometry points private pure subroutine create (this, res1, res2, res3, Xt1, Xt2, Xt3, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(in), optional, contiguous :: Xt (:,:) generic, public :: derivative => derivative_vector , derivative_scalar Compute the derivative of the NURBS volume private pure subroutine derivative_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) generic, public :: derivative2 => derivative2_vector , derivative2_scalar Compute the second derivative of the NURBS volume private pure subroutine derivative2_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) procedure, public :: elevate_degree Elevate the degree of the NURBS volume private pure subroutine elevate_degree (this, dir, t) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir integer, intent(in) :: t procedure, public :: export_Xc Export control points to VTK file private impure subroutine export_Xc (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this character(len=*), intent(in) :: filename procedure, public :: export_Xg Export geometry points to VTK file private impure subroutine export_Xg (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this character(len=*), intent(in) :: filename procedure, public :: finalize Finalize the NURBS volume object private pure subroutine finalize (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this generic, public :: get_Wc => get_Wc_all , get_Wci Get weights private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) generic, public :: get_Xc => get_Xc_all , get_Xci , get_Xcid Get control points private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) generic, public :: get_Xg => get_Xg_all , get_Xgi , get_Xgid Get geometry points private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, public :: get_Xt Get parameter values private pure function get_Xt (this, dir) result(Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) procedure, public :: get_continuity Compute and return the continuity of the NURBS volume private pure function get_continuity (this, dir) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) generic, public :: get_degree => get_degree_all , get_degree_dir Get degree of the NURBS volume private pure function get_degree_all (this) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) private pure function get_degree_dir (this, dir) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer procedure, public :: get_elem Get IGA element connectivity private pure function get_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: get_elem_Xc_vis Get connectivity for control points private pure function get_elem_Xc_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: get_elem_Xg_vis Get connectivity for geometry points private pure function get_elem_Xg_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) generic, public :: get_knot => get_knoti , get_knot_all Get knot vector private pure function get_knoti (this, dir, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir integer, intent(in) :: i Return Value real(kind=rk) private pure function get_knot_all (this, dir) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) procedure, public :: get_multiplicity Compute and return the multiplicity of the knots private pure function get_multiplicity (this, dir) result(m) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) generic, public :: get_nc => get_nc_all , get_nc_dir Get number of control points private pure function get_nc_all (this) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) private pure function get_nc_dir (this, dir) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer procedure, public :: get_ng Get number of geometry points private pure function get_ng (this) result(ng) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) procedure, public :: insert_knots Insert knots into the knot vector private pure subroutine insert_knots (this, dir, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) procedure, public :: is_rational Check if the NURBS volume is rational private pure function is_rational (this) result(r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value logical procedure, public :: modify_Wc Modify weights private pure subroutine modify_Wc (this, W, num) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num procedure, public :: modify_Xc Modify control points private pure subroutine modify_Xc (this, X, num, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir procedure, public :: nearest_point Find the nearest point on the NURBS volume (Approximation) private pure subroutine nearest_point (this, point_Xg, nearest_Xg, nearest_Xt, id) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xt (:) integer, intent(out), optional :: id procedure, public :: nearest_point2 Find the nearest point on the NURBS volume (Minimization - Newton's method) private impure subroutine nearest_point2 (this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt (3) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) procedure, public :: put_to_nurbs Put a shape to a NURBS volume private pure subroutine put_to_nurbs (this, X, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: X (:,:) integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: remove_knots Remove knots from the knot vector private pure subroutine remove_knots (this, dir, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) procedure, public :: rotate_Xc Rotate control points private pure subroutine rotate_Xc (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta procedure, public :: rotate_Xg Rotate geometry points private pure subroutine rotate_Xg (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta generic, public :: set => set1 , set2 , set3 , set4 Set NURBS volume private pure subroutine set1 (this, knot1, knot2, knot3, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set control points and weights for the NURBS volume object. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set2 (this, Xth_dir1, Xth_dir2, Xth_dir3, degree, continuity1, continuity2, continuity3, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set control points and weights for the NURBS volume object. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir1 (:) real(kind=rk), intent(in), contiguous :: Xth_dir2 (:) real(kind=rk), intent(in), contiguous :: Xth_dir3 (:) integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: continuity1 (:) integer, intent(in), contiguous :: continuity2 (:) integer, intent(in), contiguous :: continuity3 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set3 (this, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier volume using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set1 Set knot vectors, control points and weights for the NURBS volume object private pure subroutine set1 (this, knot1, knot2, knot3, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set control points and weights for the NURBS volume object. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set2 Set NURBS volume using nodes of parameter space, degree, continuity, control points and weights private pure subroutine set2 (this, Xth_dir1, Xth_dir2, Xth_dir3, degree, continuity1, continuity2, continuity3, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set control points and weights for the NURBS volume object. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir1 (:) real(kind=rk), intent(in), contiguous :: Xth_dir2 (:) real(kind=rk), intent(in), contiguous :: Xth_dir3 (:) integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: continuity1 (:) integer, intent(in), contiguous :: continuity2 (:) integer, intent(in), contiguous :: continuity3 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set3 Set Bezier or Rational Bezier volume using control points and weights private pure subroutine set3 (this, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier volume using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set4 Set NURBS volume using degree, number of control points, control points and weights private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set_C Set a C-shape private pure subroutine set_C (this, center, radius1, radius2, length) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length procedure, public :: set_elem Set IGA element connectivity private pure subroutine set_elem (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_elem_Xc_vis Set connectivity for control points private pure subroutine set_elem_Xc_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_elem_Xg_vis Set connectivity for geometry points private pure subroutine set_elem_Xg_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_half_ring Set a half ring private pure subroutine set_half_ring (this, center, radius1, radius2, length) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length procedure, public :: set_hexahedron Set a hexahedron private pure subroutine set_hexahedron (this, L, nc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: L (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set_ring Set a ring private pure subroutine set_ring (this, center, radius1, radius2, length) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length procedure, public :: show Show the NURBS object using PyVista private impure subroutine show (this, vtkfile_Xc, vtkfile_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg procedure, public :: translate_Xc Translate control points private pure subroutine translate_Xc (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) procedure, public :: translate_Xg Translate geometry points private pure subroutine translate_Xg (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) procedure, private :: basis_scalar Compute the basis functions of the NURBS volume private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:) procedure, private :: basis_vector Compute the basis functions of the NURBS volume private pure subroutine basis_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) procedure, private :: derivative2_scalar Compute the second derivative of the NURBS volume private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) procedure, private :: derivative2_vector Compute the second derivative of the NURBS volume private pure subroutine derivative2_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) procedure, private :: derivative_scalar Compute the derivative of the NURBS volume private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) procedure, private :: derivative_vector Compute the derivative of the NURBS volume private pure subroutine derivative_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) procedure, private :: get_Wc_all Get all weights private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Wci Get i-th weight private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) procedure, private :: get_Xc_all Get all control points private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) procedure, private :: get_Xci Get i-th control point private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Xcid Get i-th control point in a specific direction private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, private :: get_Xg_all Get all geometry points private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) procedure, private :: get_Xgi Get i-th geometry point private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Xgid Get i-th geometry point in a specific direction private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, private :: get_degree_all Get degree of the NURBS volume in all directions private pure function get_degree_all (this) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) procedure, private :: get_degree_dir Get degree of the NURBS volume in a specific direction private pure function get_degree_dir (this, dir) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer procedure, private :: get_knot_all Get all knot vectors private pure function get_knot_all (this, dir) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) procedure, private :: get_knoti Get i-th knot value private pure function get_knoti (this, dir, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir integer, intent(in) :: i Return Value real(kind=rk) procedure, private :: get_nc_all Get number of control points in all directions private pure function get_nc_all (this) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) procedure, private :: get_nc_dir Get number of control points in a specific direction private pure function get_nc_dir (this, dir) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer","tags":"","loc":"type/nurbs_volume.html"},{"title":"nurbs_surface – ForCAD ","text":"type, public :: nurbs_surface Components Type Visibility Attributes Name Initial real(kind=rk), private, allocatable :: Wc (:) Weights for control points (1D array: [nc(1)*nc(2)]) real(kind=rk), private, allocatable :: Xc (:,:) Control points (2D array: [nc(1)*nc(2), dim]) real(kind=rk), private, allocatable :: Xg (:,:) Geometry points (2D array: [ng(1)*ng(2), dim]) real(kind=rk), private, allocatable :: Xt (:,:) Evaluation parameter values (2D array: [ng(1)*ng(2), 2]) real(kind=rk), private, allocatable :: Xt1 (:) Evaluation parameter values in the first direction (1D array: [ng(1)]) real(kind=rk), private, allocatable :: Xt2 (:) Evaluation parameter values in the second direction (1D array: [ng(2)]) integer, private :: degree (2) Degree (order) of the surface integer, private, allocatable :: elemConn (:,:) IGA element connectivity integer, private, allocatable :: elemConn_Xc_vis (:,:) Connectivity for visualization of control points integer, private, allocatable :: elemConn_Xg_vis (:,:) Connectivity for visualization of geometry points real(kind=rk), private, allocatable :: knot1 (:) Knot vector in the first direction (1D array) real(kind=rk), private, allocatable :: knot2 (:) Knot vector in the second direction (1D array) integer, private :: nc (2) Number of control points in each direction integer, private :: ng (2) Number of geometry points in each direction Type-Bound Procedures procedure, public :: ansatz Compute the shape functions, derivative of shape functions and dA private pure subroutine ansatz (this, ie, ig, Tgc, dTgc_dXg, dA) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dA generic, public :: basis => basis_vector , basis_scalar Compute the basis functions of the NURBS surface private pure subroutine basis_vector (this, res1, res2, Xt1, Xt2, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:) procedure, public :: cmp_Xg Compute geometry points private pure function cmp_Xg (this, Xt) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this real(kind=rk), intent(in), contiguous :: Xt (:) Return Value real(kind=rk), allocatable, (:) procedure, public :: cmp_area Compute the area of the NURBS surface private pure subroutine cmp_area (this, area) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(out) :: area procedure, public :: cmp_degree Compute degree of the NURBS surface private pure subroutine cmp_degree (this, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: dir procedure, public :: cmp_elem Generate IGA element connectivity private pure function cmp_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: cmp_elem_Xc_vis Generate connectivity for control points private pure function cmp_elem_Xc_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) procedure, public :: cmp_elem_Xg_vis Generate connectivity for geometry points private pure function cmp_elem_Xg_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) procedure, public :: cmp_nc Compute number of required control points private pure subroutine cmp_nc (this, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: dir procedure, public :: create Generate geometry points private pure subroutine create (this, res1, res2, Xt1, Xt2, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt (:,:) generic, public :: derivative => derivative_vector , derivative_scalar Compute the derivative of the NURBS surface private pure subroutine derivative_vector (this, res1, res2, Xt1, Xt2, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) generic, public :: derivative2 => derivative2_vector , derivative2_scalar Compute the second derivative of the NURBS surface private pure subroutine derivative2_vector (this, res1, res2, Xt1, Xt2, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) procedure, public :: elevate_degree Elevate degree private pure subroutine elevate_degree (this, dir, t) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir integer, intent(in) :: t procedure, public :: export_Xc Export control points to VTK file private impure subroutine export_Xc (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this character(len=*), intent(in) :: filename procedure, public :: export_Xg Export geometry points to VTK file private impure subroutine export_Xg (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this character(len=*), intent(in) :: filename procedure, public :: finalize Finalize the NURBS surface object private pure subroutine finalize (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this generic, public :: get_Wc => get_Wc_all , get_Wci Get weights private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) generic, public :: get_Xc => get_Xc_all , get_Xci , get_Xcid Get control points private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) generic, public :: get_Xg => get_Xg_all , get_Xgi , get_Xgid Get geometry points private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, public :: get_Xt Get parameter values private pure function get_Xt (this, dir) result(Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) procedure, public :: get_continuity Compute and return the continuity of the NURBS surface private pure function get_continuity (this, dir) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) generic, public :: get_degree => get_degree_all , get_degree_dir Get degree of the NURBS surface private pure function get_degree_all (this) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) private pure function get_degree_dir (this, dir) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer procedure, public :: get_elem Get IGA element connectivity private pure function get_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: get_elem_Xc_vis Get connectivity for control points private pure function get_elem_Xc_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: get_elem_Xg_vis Get connectivity for geometry points private pure function get_elem_Xg_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) generic, public :: get_knot => get_knoti , get_knot_all Get knot vector private pure function get_knoti (this, dir, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir integer, intent(in) :: i Return Value real(kind=rk) private pure function get_knot_all (this, dir) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) procedure, public :: get_multiplicity Compute and return the multiplicity of the knot vector private pure function get_multiplicity (this, dir) result(m) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) generic, public :: get_nc => get_nc_all , get_nc_dir Get number of control points private pure function get_nc_all (this) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) private pure function get_nc_dir (this, dir) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer procedure, public :: get_ng Get number of geometry points private pure function get_ng (this) result(ng) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) procedure, public :: insert_knots Insert knots into the knot vector private pure subroutine insert_knots (this, dir, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) procedure, public :: is_rational Check if the NURBS surface is rational private pure function is_rational (this) result(r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value logical procedure, public :: modify_Wc Modify weights private pure subroutine modify_Wc (this, W, num) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num procedure, public :: modify_Xc Modify control points private pure subroutine modify_Xc (this, X, num, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir procedure, public :: nearest_point Find the nearest point on the NURBS surface (Approximation) private pure subroutine nearest_point (this, point_Xg, nearest_Xg, nearest_Xt, id) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xt (:) integer, intent(out), optional :: id procedure, public :: nearest_point2 Find the nearest point on the NURBS surface (Minimization - Newton's method) private impure subroutine nearest_point2 (this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt (2) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) procedure, public :: remove_knots Remove knots from the knot vector private pure subroutine remove_knots (this, dir, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) procedure, public :: rotate_Xc Rotate control points private pure subroutine rotate_Xc (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta procedure, public :: rotate_Xg Rotate geometry points private pure subroutine rotate_Xg (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta generic, public :: set => set1 , set2 , set3 , set4 Set NURBS surface private pure subroutine set1 (this, knot1, knot2, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vectors, control points and weights for the NURBS surface object. Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set2 (this, Xth_dir1, Xth_dir2, degree, continuity1, continuity2, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir1 (:) real(kind=rk), intent(in), contiguous :: Xth_dir2 (:) integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: continuity1 (:) integer, intent(in), contiguous :: continuity2 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set3 (this, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier surface using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set1 Set knot vectors, control points and weights for the NURBS surface object private pure subroutine set1 (this, knot1, knot2, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vectors, control points and weights for the NURBS surface object. Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set2 Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights private pure subroutine set2 (this, Xth_dir1, Xth_dir2, degree, continuity1, continuity2, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir1 (:) real(kind=rk), intent(in), contiguous :: Xth_dir2 (:) integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: continuity1 (:) integer, intent(in), contiguous :: continuity2 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set3 Set Bezier or Rational Bezier surface using control points and weights private pure subroutine set3 (this, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier surface using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set4 Set NURBS surface using degree, number of control points, control points and weights private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set_C Set a C-shape private pure subroutine set_C (this, center, radius1, radius2) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 procedure, public :: set_elem Set IGA element connectivity private pure subroutine set_elem (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_elem_Xc_vis Set connectivity for control points private pure subroutine set_elem_Xc_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_elem_Xg_vis Set connectivity for geometry points private pure subroutine set_elem_Xg_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_half_ring Set a half ring private pure subroutine set_half_ring (this, center, radius1, radius2) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 procedure, public :: set_ring Set a ring private pure subroutine set_ring (this, center, radius1, radius2) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 procedure, public :: set_tetragon Set a tetragon private pure subroutine set_tetragon (this, L, nc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: L (2) integer, intent(in) :: nc (2) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: show Show the NURBS object using PyVista private impure subroutine show (this, vtkfile_Xc, vtkfile_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg procedure, public :: translate_Xc Translate control points private pure subroutine translate_Xc (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) procedure, public :: translate_Xg Translate geometry points private pure subroutine translate_Xg (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) procedure, private :: basis_scalar Compute the basis functions of the NURBS surface private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:) procedure, private :: basis_vector Compute the basis functions of the NURBS surface private pure subroutine basis_vector (this, res1, res2, Xt1, Xt2, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) procedure, private :: derivative2_scalar Compute the second derivative of the NURBS surface private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) procedure, private :: derivative2_vector Compute the second derivative of the NURBS surface private pure subroutine derivative2_vector (this, res1, res2, Xt1, Xt2, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) procedure, private :: derivative_scalar Compute the derivative of the NURBS surface private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) procedure, private :: derivative_vector Compute the derivative of the NURBS surface private pure subroutine derivative_vector (this, res1, res2, Xt1, Xt2, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) procedure, private :: get_Wc_all Get all weights private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Wci Get i-th weight private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) procedure, private :: get_Xc_all Get all control points private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) procedure, private :: get_Xci Get i-th control point private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Xcid Get i-th control point in a specific direction private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, private :: get_Xg_all Get all geometry points private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) procedure, private :: get_Xgi Get i-th geometry point private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Xgid Get i-th geometry point in a specific direction private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, private :: get_degree_all Get degree of the NURBS surface in both directions private pure function get_degree_all (this) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) procedure, private :: get_degree_dir Get degree of the NURBS surface in a specific direction private pure function get_degree_dir (this, dir) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer procedure, private :: get_knot_all Get all knot vectors private pure function get_knot_all (this, dir) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) procedure, private :: get_knoti Get i-th knot value private pure function get_knoti (this, dir, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir integer, intent(in) :: i Return Value real(kind=rk) procedure, private :: get_nc_all Get number of control points in all directions private pure function get_nc_all (this) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) procedure, private :: get_nc_dir Get number of control points in a specific direction private pure function get_nc_dir (this, dir) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer","tags":"","loc":"type/nurbs_surface.html"},{"title":"nurbs_curve – ForCAD ","text":"type, public :: nurbs_curve Components Type Visibility Attributes Name Initial real(kind=rk), private, allocatable :: Wc (:) Weights for control points (1D array: [nc]) real(kind=rk), private, allocatable :: Xc (:,:) Control points (2D array: [nc, dim]) real(kind=rk), private, allocatable :: Xg (:,:) Geometry points (2D array: [ng, dim]) real(kind=rk), private, allocatable :: Xt (:) Evaluation points (1D array: [ng]) integer, private :: degree Degree (order) of the curve integer, private, allocatable :: elemConn (:,:) IGA element connectivity integer, private, allocatable :: elemConn_Xc_vis (:,:) Connectivity for visualization of control points integer, private, allocatable :: elemConn_Xg_vis (:,:) Connectivity for visualization of geometry points real(kind=rk), private, allocatable :: knot (:) Knot vector (1D array) integer, private :: nc Number of control points integer, private :: ng Number of geometry points Type-Bound Procedures procedure, public :: ansatz Compute the shape functions, derivative of shape functions and dL private pure subroutine ansatz (this, ie, ig, Tgc, dTgc_dXg, dL) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dL generic, public :: basis => basis_vector , basis_scalar Compute the basis functions of the NURBS curve private pure subroutine basis_vector (this, res, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: Tgc (:) procedure, public :: cmp_Xg Compute geometry points private pure function cmp_Xg (this, Xt) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this real(kind=rk), intent(in) :: Xt Return Value real(kind=rk), allocatable, (:) procedure, public :: cmp_degree Compute degree of the NURBS curve private pure subroutine cmp_degree (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this procedure, public :: cmp_elem Generate IGA element connectivity private pure function cmp_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: cmp_elem_Xc_vis Generate connectivity for control points private pure function cmp_elem_Xc_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in), optional :: p Return Value integer, allocatable, (:,:) procedure, public :: cmp_elem_Xg_vis Generate connectivity for geometry points private pure function cmp_elem_Xg_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in), optional :: p Return Value integer, allocatable, (:,:) procedure, public :: cmp_length Compute the length of the NURBS curve private pure subroutine cmp_length (this, length) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(out) :: length procedure, public :: cmp_nc Compute number of required control points private pure subroutine cmp_nc (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this procedure, public :: create Generate geometry points private pure subroutine create (this, res, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) generic, public :: derivative => derivative_vector , derivative_scalar Compute the derivative of the NURBS curve private pure subroutine derivative_vector (this, res, Xt, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: dTgc (:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) generic, public :: derivative2 => derivative2_vector , derivative2_scalar Compute the second derivative of the NURBS curve private pure subroutine derivative2_vector (this, res, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: d2Tgc (:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) procedure, public :: elevate_degree Elevate the degree of the curve private pure subroutine elevate_degree (this, t) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: t procedure, public :: export_Xc Export control points to VTK file private impure subroutine export_Xc (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this character(len=*), intent(in) :: filename procedure, public :: export_Xg Export geometry points to VTK file private impure subroutine export_Xg (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this character(len=*), intent(in) :: filename procedure, public :: finalize Finalize the NURBS curve object private pure subroutine finalize (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this generic, public :: get_Wc => get_Wc_all , get_Wci Get weights private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) generic, public :: get_Xc => get_Xc_all , get_Xci , get_Xcid Get control points private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) generic, public :: get_Xg => get_Xg_all , get_Xgi , get_Xgid Get geometry points private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, public :: get_Xt Get parameter values private pure function get_Xt (this) result(Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) procedure, public :: get_continuity Compute and return the continuity of the curve private pure function get_continuity (this) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:) procedure, public :: get_degree Get degree of the NURBS curve private pure function get_degree (this) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer procedure, public :: get_elem Get IGA element connectivity private pure function get_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: get_elem_Xc_vis Get connectivity for control points private pure function get_elem_Xc_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: get_elem_Xg_vis Get connectivity for geometry points private pure function get_elem_Xg_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) generic, public :: get_knot => get_knoti , get_knot_all Get knot vector private pure function get_knoti (this, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: i Return Value real(kind=rk) private pure function get_knot_all (this) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) procedure, public :: get_multiplicity Compute and return the multiplicity of the knots private pure function get_multiplicity (this) result(m) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:) procedure, public :: get_nc Get number of control points private pure function get_nc (this) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer procedure, public :: get_ng Get number of geometry points private pure function get_ng (this) result(ng) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer procedure, public :: insert_knots Insert knots into the knot vector private pure subroutine insert_knots (this, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) procedure, public :: is_rational Check if the NURBS curve is rational private pure function is_rational (this) result(r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value logical procedure, public :: modify_Wc Modify weights private pure subroutine modify_Wc (this, W, num) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num procedure, public :: modify_Xc Modify control points private pure subroutine modify_Xc (this, X, num, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir procedure, public :: nearest_point Find the nearest point on the NURBS curve (Approximation) private pure subroutine nearest_point (this, point_Xg, nearest_Xg, nearest_Xt, id) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional :: nearest_Xt integer, intent(out), optional :: id procedure, public :: nearest_point2 Find the nearest point on the NURBS curve (Minimization - Newton's method) private impure subroutine nearest_point2 (this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) procedure, public :: remove_knots Remove knots from the knot vector private pure subroutine remove_knots (this, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) procedure, public :: rotate_Xc Rotate control points private pure subroutine rotate_Xc (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta procedure, public :: rotate_Xg Rotate geometry points private pure subroutine rotate_Xg (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta generic, public :: set => set1 , set1a , set2 , set3 , set4 Set NURBS curve private pure subroutine set1 (this, knot, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vector, control points and weights for the NURBS curve object. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set1a (this, knot, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vector, control points and weights for the NURBS curve object. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Xc (:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set2 (this, Xth_dir, degree, continuity, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set NURBS curve using nodes of parameter space (Xth), degree, continuity, control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir (:) integer, intent(in) :: degree integer, intent(in), contiguous :: continuity (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set3 (this, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier curve using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set1 Set knot vector, control points and weights for the NURBS curve object private pure subroutine set1 (this, knot, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vector, control points and weights for the NURBS curve object. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set1a private pure subroutine set1a (this, knot, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vector, control points and weights for the NURBS curve object. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Xc (:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set2 Set NURBS curve using nodes of parameter space, degree, continuity, control points and weights private pure subroutine set2 (this, Xth_dir, degree, continuity, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set NURBS curve using nodes of parameter space (Xth), degree, continuity, control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir (:) integer, intent(in) :: degree integer, intent(in), contiguous :: continuity (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set3 Set Bezier or Rational Bezier curve using control points and weights private pure subroutine set3 (this, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier curve using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set4 Set NURBS curve using degree, number of control points, control points and weights private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set_C Set a C-shape private pure subroutine set_C (this, center, radius) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius procedure, public :: set_circle Set a circle private pure subroutine set_circle (this, center, radius) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius procedure, public :: set_elem Set IGA element connectivity private pure subroutine set_elem (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_elem_Xc_vis Set connectivity for control points private pure subroutine set_elem_Xc_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_elem_Xg_vis Set connectivity for geometry points private pure subroutine set_elem_Xg_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_half_circle Set a half circle private pure subroutine set_half_circle (this, center, radius) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius procedure, public :: show Show the NURBS object using PyVista private impure subroutine show (this, vtkfile_Xc, vtkfile_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg procedure, public :: translate_Xc Translate control points private pure subroutine translate_Xc (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) procedure, public :: translate_Xg Translate geometry points private pure subroutine translate_Xg (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) procedure, private :: basis_scalar Compute the basis functions of the NURBS curve private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: Tgc (:) procedure, private :: basis_vector Compute the basis functions of the NURBS curve private pure subroutine basis_vector (this, res, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) procedure, private :: derivative2_scalar Compute the second derivative of the NURBS curve private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: d2Tgc (:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) procedure, private :: derivative2_vector Compute the second derivative of the NURBS curve private pure subroutine derivative2_vector (this, res, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) procedure, private :: derivative_scalar Compute the derivative of the NURBS curve private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: dTgc (:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) procedure, private :: derivative_vector Compute the derivative of the NURBS curve private pure subroutine derivative_vector (this, res, Xt, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) procedure, private :: get_Wc_all Get all weights private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Wci Get i-th weight private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) procedure, private :: get_Xc_all Get all control points private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) procedure, private :: get_Xci Get i-th control point private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Xcid Get i-th control point in a specific direction private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, private :: get_Xg_all Get all geometry points private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) procedure, private :: get_Xgi Get i-th geometry point private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Xgid Get i-th geometry point in a specific direction private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, private :: get_knot_all Get all knot vectors private pure function get_knot_all (this) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) procedure, private :: get_knoti Get i-th knot value private pure function get_knoti (this, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: i Return Value real(kind=rk)","tags":"","loc":"type/nurbs_curve.html"},{"title":"compute_Xg_nurbs_3d – ForCAD","text":"impure function compute_Xg_nurbs_3d(Xt, knot1, knot2, knot3, degree, nc, ng, Xc, Wc) result(Xg) Uses forcad_utils proc~~compute_xg_nurbs_3d~~UsesGraph proc~compute_xg_nurbs_3d compute_Xg_nurbs_3d module~forcad_utils forcad_utils proc~compute_xg_nurbs_3d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) integer, intent(in) :: ng (3) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_xg_nurbs_3d~~CallsGraph proc~compute_xg_nurbs_3d compute_Xg_nurbs_3d proc~basis_bspline basis_bspline proc~compute_xg_nurbs_3d->proc~basis_bspline proc~kron kron proc~compute_xg_nurbs_3d->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_nurbs_3d.html"},{"title":"compute_Xg_nurbs_3d_1point – ForCAD","text":"impure function compute_Xg_nurbs_3d_1point(Xt, knot1, knot2, knot3, degree, nc, Xc, Wc) result(Xg) Uses forcad_utils proc~~compute_xg_nurbs_3d_1point~~UsesGraph proc~compute_xg_nurbs_3d_1point compute_Xg_nurbs_3d_1point module~forcad_utils forcad_utils proc~compute_xg_nurbs_3d_1point->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_xg_nurbs_3d_1point~~CallsGraph proc~compute_xg_nurbs_3d_1point compute_Xg_nurbs_3d_1point proc~basis_bspline basis_bspline proc~compute_xg_nurbs_3d_1point->proc~basis_bspline proc~kron kron proc~compute_xg_nurbs_3d_1point->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_nurbs_3d_1point.html"},{"title":"compute_Xg_bspline_3d – ForCAD","text":"impure function compute_Xg_bspline_3d(Xt, knot1, knot2, knot3, degree, nc, ng, Xc) result(Xg) Uses forcad_utils proc~~compute_xg_bspline_3d~~UsesGraph proc~compute_xg_bspline_3d compute_Xg_bspline_3d module~forcad_utils forcad_utils proc~compute_xg_bspline_3d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) integer, intent(in) :: ng (3) real(kind=rk), intent(in), contiguous :: Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_xg_bspline_3d~~CallsGraph proc~compute_xg_bspline_3d compute_Xg_bspline_3d proc~basis_bspline basis_bspline proc~compute_xg_bspline_3d->proc~basis_bspline proc~kron kron proc~compute_xg_bspline_3d->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_bspline_3d.html"},{"title":"compute_Xg_bspline_3d_1point – ForCAD","text":"impure function compute_Xg_bspline_3d_1point(Xt, knot1, knot2, knot3, degree, nc, Xc) result(Xg) Uses forcad_utils proc~~compute_xg_bspline_3d_1point~~UsesGraph proc~compute_xg_bspline_3d_1point compute_Xg_bspline_3d_1point module~forcad_utils forcad_utils proc~compute_xg_bspline_3d_1point->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) real(kind=rk), intent(in), contiguous :: Xc (:,:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_xg_bspline_3d_1point~~CallsGraph proc~compute_xg_bspline_3d_1point compute_Xg_bspline_3d_1point proc~basis_bspline basis_bspline proc~compute_xg_bspline_3d_1point->proc~basis_bspline proc~kron kron proc~compute_xg_bspline_3d_1point->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_bspline_3d_1point.html"},{"title":"compute_Tgc_nurbs_3d_vector – ForCAD","text":"impure function compute_Tgc_nurbs_3d_vector(Xt, knot1, knot2, knot3, degree, nc, ng, Wc) result(Tgc) Uses forcad_utils proc~~compute_tgc_nurbs_3d_vector~~UsesGraph proc~compute_tgc_nurbs_3d_vector compute_Tgc_nurbs_3d_vector module~forcad_utils forcad_utils proc~compute_tgc_nurbs_3d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) integer, intent(in) :: ng (3) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_tgc_nurbs_3d_vector~~CallsGraph proc~compute_tgc_nurbs_3d_vector compute_Tgc_nurbs_3d_vector proc~basis_bspline basis_bspline proc~compute_tgc_nurbs_3d_vector->proc~basis_bspline proc~kron kron proc~compute_tgc_nurbs_3d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_nurbs_3d_vector.html"},{"title":"compute_Tgc_nurbs_3d_scalar – ForCAD","text":"impure function compute_Tgc_nurbs_3d_scalar(Xt, knot1, knot2, knot3, degree, nc, Wc) result(Tgc) Uses forcad_utils proc~~compute_tgc_nurbs_3d_scalar~~UsesGraph proc~compute_tgc_nurbs_3d_scalar compute_Tgc_nurbs_3d_scalar module~forcad_utils forcad_utils proc~compute_tgc_nurbs_3d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_tgc_nurbs_3d_scalar~~CallsGraph proc~compute_tgc_nurbs_3d_scalar compute_Tgc_nurbs_3d_scalar proc~basis_bspline basis_bspline proc~compute_tgc_nurbs_3d_scalar->proc~basis_bspline proc~kron kron proc~compute_tgc_nurbs_3d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_nurbs_3d_scalar.html"},{"title":"compute_Tgc_bspline_3d_vector – ForCAD","text":"impure function compute_Tgc_bspline_3d_vector(Xt, knot1, knot2, knot3, degree, nc, ng) result(Tgc) Uses forcad_utils proc~~compute_tgc_bspline_3d_vector~~UsesGraph proc~compute_tgc_bspline_3d_vector compute_Tgc_bspline_3d_vector module~forcad_utils forcad_utils proc~compute_tgc_bspline_3d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) integer, intent(in) :: ng (3) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_tgc_bspline_3d_vector~~CallsGraph proc~compute_tgc_bspline_3d_vector compute_Tgc_bspline_3d_vector proc~basis_bspline basis_bspline proc~compute_tgc_bspline_3d_vector->proc~basis_bspline proc~kron kron proc~compute_tgc_bspline_3d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_bspline_3d_vector.html"},{"title":"compute_Tgc_bspline_3d_scalar – ForCAD","text":"impure function compute_Tgc_bspline_3d_scalar(Xt, knot1, knot2, knot3, degree, nc) result(Tgc) Uses forcad_utils proc~~compute_tgc_bspline_3d_scalar~~UsesGraph proc~compute_tgc_bspline_3d_scalar compute_Tgc_bspline_3d_scalar module~forcad_utils forcad_utils proc~compute_tgc_bspline_3d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_tgc_bspline_3d_scalar~~CallsGraph proc~compute_tgc_bspline_3d_scalar compute_Tgc_bspline_3d_scalar proc~basis_bspline basis_bspline proc~compute_tgc_bspline_3d_scalar->proc~basis_bspline proc~kron kron proc~compute_tgc_bspline_3d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_bspline_3d_scalar.html"},{"title":"nearest_point_help_3d – ForCAD","text":"impure function nearest_point_help_3d(ng, Xg, point_Xg) result(distances) Uses forcad_utils proc~~nearest_point_help_3d~~UsesGraph proc~nearest_point_help_3d nearest_point_help_3d module~forcad_utils forcad_utils proc~nearest_point_help_3d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name integer, intent(in) :: ng (3) real(kind=rk), intent(in), contiguous :: Xg (:,:) real(kind=rk), intent(in), contiguous :: point_Xg (:) Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/nearest_point_help_3d.html"},{"title":"compute_dTgc_nurbs_3d_vector – ForCAD","text":"impure subroutine compute_dTgc_nurbs_3d_vector(Xt, knot1, knot2, knot3, degree, nc, ng, Wc, dTgc, Tgc) Uses forcad_utils proc~~compute_dtgc_nurbs_3d_vector~~UsesGraph proc~compute_dtgc_nurbs_3d_vector compute_dTgc_nurbs_3d_vector module~forcad_utils forcad_utils proc~compute_dtgc_nurbs_3d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) integer, intent(in) :: ng (3) real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_dtgc_nurbs_3d_vector~~CallsGraph proc~compute_dtgc_nurbs_3d_vector compute_dTgc_nurbs_3d_vector proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_nurbs_3d_vector->proc~basis_bspline_der proc~kron kron proc~compute_dtgc_nurbs_3d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_nurbs_3d_vector.html"},{"title":"compute_dTgc_nurbs_3d_scalar – ForCAD","text":"impure subroutine compute_dTgc_nurbs_3d_scalar(Xt, knot1, knot2, knot3, degree, nc, Wc, dTgc, Tgc, elem) Uses forcad_utils proc~~compute_dtgc_nurbs_3d_scalar~~UsesGraph proc~compute_dtgc_nurbs_3d_scalar compute_dTgc_nurbs_3d_scalar module~forcad_utils forcad_utils proc~compute_dtgc_nurbs_3d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~compute_dtgc_nurbs_3d_scalar~~CallsGraph proc~compute_dtgc_nurbs_3d_scalar compute_dTgc_nurbs_3d_scalar proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_nurbs_3d_scalar->proc~basis_bspline_der proc~kron kron proc~compute_dtgc_nurbs_3d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_nurbs_3d_scalar.html"},{"title":"compute_dTgc_bspline_3d_vector – ForCAD","text":"impure subroutine compute_dTgc_bspline_3d_vector(Xt, knot1, knot2, knot3, degree, nc, ng, dTgc, Tgc) Uses forcad_utils proc~~compute_dtgc_bspline_3d_vector~~UsesGraph proc~compute_dtgc_bspline_3d_vector compute_dTgc_bspline_3d_vector module~forcad_utils forcad_utils proc~compute_dtgc_bspline_3d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) integer, intent(in) :: ng (3) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_dtgc_bspline_3d_vector~~CallsGraph proc~compute_dtgc_bspline_3d_vector compute_dTgc_bspline_3d_vector proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_bspline_3d_vector->proc~basis_bspline_der proc~kron kron proc~compute_dtgc_bspline_3d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_bspline_3d_vector.html"},{"title":"compute_dTgc_bspline_3d_scalar – ForCAD","text":"impure subroutine compute_dTgc_bspline_3d_scalar(Xt, knot1, knot2, knot3, degree, nc, dTgc, Tgc, elem) Uses forcad_utils proc~~compute_dtgc_bspline_3d_scalar~~UsesGraph proc~compute_dtgc_bspline_3d_scalar compute_dTgc_bspline_3d_scalar module~forcad_utils forcad_utils proc~compute_dtgc_bspline_3d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~compute_dtgc_bspline_3d_scalar~~CallsGraph proc~compute_dtgc_bspline_3d_scalar compute_dTgc_bspline_3d_scalar proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_bspline_3d_scalar->proc~basis_bspline_der proc~kron kron proc~compute_dtgc_bspline_3d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_bspline_3d_scalar.html"},{"title":"compute_d2Tgc_nurbs_3d_vector – ForCAD","text":"impure subroutine compute_d2Tgc_nurbs_3d_vector(Xt, knot1, knot2, knot3, degree, nc, ng, Wc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_nurbs_3d_vector~~UsesGraph proc~compute_d2tgc_nurbs_3d_vector compute_d2Tgc_nurbs_3d_vector module~forcad_utils forcad_utils proc~compute_d2tgc_nurbs_3d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) integer, intent(in) :: ng (3) real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_d2tgc_nurbs_3d_vector~~CallsGraph proc~compute_d2tgc_nurbs_3d_vector compute_d2Tgc_nurbs_3d_vector proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_nurbs_3d_vector->proc~basis_bspline_2der proc~kron kron proc~compute_d2tgc_nurbs_3d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_nurbs_3d_vector.html"},{"title":"compute_d2Tgc_nurbs_3d_scalar – ForCAD","text":"impure subroutine compute_d2Tgc_nurbs_3d_scalar(Xt, knot1, knot2, knot3, degree, nc, Wc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_nurbs_3d_scalar~~UsesGraph proc~compute_d2tgc_nurbs_3d_scalar compute_d2Tgc_nurbs_3d_scalar module~forcad_utils forcad_utils proc~compute_d2tgc_nurbs_3d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~compute_d2tgc_nurbs_3d_scalar~~CallsGraph proc~compute_d2tgc_nurbs_3d_scalar compute_d2Tgc_nurbs_3d_scalar proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_nurbs_3d_scalar->proc~basis_bspline_2der proc~kron kron proc~compute_d2tgc_nurbs_3d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_nurbs_3d_scalar.html"},{"title":"compute_d2Tgc_bspline_3d_vector – ForCAD","text":"impure subroutine compute_d2Tgc_bspline_3d_vector(Xt, knot1, knot2, knot3, degree, nc, ng, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_bspline_3d_vector~~UsesGraph proc~compute_d2tgc_bspline_3d_vector compute_d2Tgc_bspline_3d_vector module~forcad_utils forcad_utils proc~compute_d2tgc_bspline_3d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) integer, intent(in) :: ng (3) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_d2tgc_bspline_3d_vector~~CallsGraph proc~compute_d2tgc_bspline_3d_vector compute_d2Tgc_bspline_3d_vector proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_bspline_3d_vector->proc~basis_bspline_2der proc~kron kron proc~compute_d2tgc_bspline_3d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_bspline_3d_vector.html"},{"title":"compute_d2Tgc_bspline_3d_scalar – ForCAD","text":"impure subroutine compute_d2Tgc_bspline_3d_scalar(Xt, knot1, knot2, knot3, degree, nc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_bspline_3d_scalar~~UsesGraph proc~compute_d2tgc_bspline_3d_scalar compute_d2Tgc_bspline_3d_scalar module~forcad_utils forcad_utils proc~compute_d2tgc_bspline_3d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~compute_d2tgc_bspline_3d_scalar~~CallsGraph proc~compute_d2tgc_bspline_3d_scalar compute_d2Tgc_bspline_3d_scalar proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_bspline_3d_scalar->proc~basis_bspline_2der proc~kron kron proc~compute_d2tgc_bspline_3d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_bspline_3d_scalar.html"},{"title":"compute_Xg_nurbs_2d – ForCAD","text":"impure function compute_Xg_nurbs_2d(Xt, knot1, knot2, degree, nc, ng, Xc, Wc) result(Xg) Uses forcad_utils proc~~compute_xg_nurbs_2d~~UsesGraph proc~compute_xg_nurbs_2d compute_Xg_nurbs_2d module~forcad_utils forcad_utils proc~compute_xg_nurbs_2d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: ng (2) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_xg_nurbs_2d~~CallsGraph proc~compute_xg_nurbs_2d compute_Xg_nurbs_2d proc~basis_bspline basis_bspline proc~compute_xg_nurbs_2d->proc~basis_bspline proc~kron kron proc~compute_xg_nurbs_2d->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_nurbs_2d.html"},{"title":"compute_Xg_nurbs_2d_1point – ForCAD","text":"impure function compute_Xg_nurbs_2d_1point(Xt, knot1, knot2, degree, nc, Xc, Wc) result(Xg) Uses forcad_utils proc~~compute_xg_nurbs_2d_1point~~UsesGraph proc~compute_xg_nurbs_2d_1point compute_Xg_nurbs_2d_1point module~forcad_utils forcad_utils proc~compute_xg_nurbs_2d_1point->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_xg_nurbs_2d_1point~~CallsGraph proc~compute_xg_nurbs_2d_1point compute_Xg_nurbs_2d_1point proc~basis_bspline basis_bspline proc~compute_xg_nurbs_2d_1point->proc~basis_bspline proc~kron kron proc~compute_xg_nurbs_2d_1point->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_nurbs_2d_1point.html"},{"title":"compute_Xg_bspline_2d – ForCAD","text":"impure function compute_Xg_bspline_2d(Xt, knot1, knot2, degree, nc, ng, Xc) result(Xg) Uses forcad_utils proc~~compute_xg_bspline_2d~~UsesGraph proc~compute_xg_bspline_2d compute_Xg_bspline_2d module~forcad_utils forcad_utils proc~compute_xg_bspline_2d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: ng (2) real(kind=rk), intent(in), contiguous :: Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_xg_bspline_2d~~CallsGraph proc~compute_xg_bspline_2d compute_Xg_bspline_2d proc~basis_bspline basis_bspline proc~compute_xg_bspline_2d->proc~basis_bspline proc~kron kron proc~compute_xg_bspline_2d->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_bspline_2d.html"},{"title":"compute_Xg_bspline_2d_1point – ForCAD","text":"impure function compute_Xg_bspline_2d_1point(Xt, knot1, knot2, degree, nc, Xc) result(Xg) Uses forcad_utils proc~~compute_xg_bspline_2d_1point~~UsesGraph proc~compute_xg_bspline_2d_1point compute_Xg_bspline_2d_1point module~forcad_utils forcad_utils proc~compute_xg_bspline_2d_1point->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(in), contiguous :: Xc (:,:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_xg_bspline_2d_1point~~CallsGraph proc~compute_xg_bspline_2d_1point compute_Xg_bspline_2d_1point proc~basis_bspline basis_bspline proc~compute_xg_bspline_2d_1point->proc~basis_bspline proc~kron kron proc~compute_xg_bspline_2d_1point->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_bspline_2d_1point.html"},{"title":"compute_Tgc_nurbs_2d_vector – ForCAD","text":"impure function compute_Tgc_nurbs_2d_vector(Xt, knot1, knot2, degree, nc, ng, Wc) result(Tgc) Uses forcad_utils proc~~compute_tgc_nurbs_2d_vector~~UsesGraph proc~compute_tgc_nurbs_2d_vector compute_Tgc_nurbs_2d_vector module~forcad_utils forcad_utils proc~compute_tgc_nurbs_2d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: ng (2) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_tgc_nurbs_2d_vector~~CallsGraph proc~compute_tgc_nurbs_2d_vector compute_Tgc_nurbs_2d_vector proc~basis_bspline basis_bspline proc~compute_tgc_nurbs_2d_vector->proc~basis_bspline proc~kron kron proc~compute_tgc_nurbs_2d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_nurbs_2d_vector.html"},{"title":"compute_Tgc_nurbs_2d_scalar – ForCAD","text":"impure function compute_Tgc_nurbs_2d_scalar(Xt, knot1, knot2, degree, nc, Wc) result(Tgc) Uses forcad_utils proc~~compute_tgc_nurbs_2d_scalar~~UsesGraph proc~compute_tgc_nurbs_2d_scalar compute_Tgc_nurbs_2d_scalar module~forcad_utils forcad_utils proc~compute_tgc_nurbs_2d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_tgc_nurbs_2d_scalar~~CallsGraph proc~compute_tgc_nurbs_2d_scalar compute_Tgc_nurbs_2d_scalar proc~basis_bspline basis_bspline proc~compute_tgc_nurbs_2d_scalar->proc~basis_bspline proc~kron kron proc~compute_tgc_nurbs_2d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_nurbs_2d_scalar.html"},{"title":"compute_Tgc_bspline_2d_vector – ForCAD","text":"impure function compute_Tgc_bspline_2d_vector(Xt, knot1, knot2, degree, nc, ng) result(Tgc) Uses forcad_utils proc~~compute_tgc_bspline_2d_vector~~UsesGraph proc~compute_tgc_bspline_2d_vector compute_Tgc_bspline_2d_vector module~forcad_utils forcad_utils proc~compute_tgc_bspline_2d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: ng (2) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_tgc_bspline_2d_vector~~CallsGraph proc~compute_tgc_bspline_2d_vector compute_Tgc_bspline_2d_vector proc~basis_bspline basis_bspline proc~compute_tgc_bspline_2d_vector->proc~basis_bspline proc~kron kron proc~compute_tgc_bspline_2d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_bspline_2d_vector.html"},{"title":"compute_Tgc_bspline_2d_scalar – ForCAD","text":"impure function compute_Tgc_bspline_2d_scalar(Xt, knot1, knot2, degree, nc) result(Tgc) Uses forcad_utils proc~~compute_tgc_bspline_2d_scalar~~UsesGraph proc~compute_tgc_bspline_2d_scalar compute_Tgc_bspline_2d_scalar module~forcad_utils forcad_utils proc~compute_tgc_bspline_2d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_tgc_bspline_2d_scalar~~CallsGraph proc~compute_tgc_bspline_2d_scalar compute_Tgc_bspline_2d_scalar proc~basis_bspline basis_bspline proc~compute_tgc_bspline_2d_scalar->proc~basis_bspline proc~kron kron proc~compute_tgc_bspline_2d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_bspline_2d_scalar.html"},{"title":"nearest_point_help_2d – ForCAD","text":"impure function nearest_point_help_2d(ng, Xg, point_Xg) result(distances) Uses forcad_utils proc~~nearest_point_help_2d~~UsesGraph proc~nearest_point_help_2d nearest_point_help_2d module~forcad_utils forcad_utils proc~nearest_point_help_2d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name integer, intent(in) :: ng (2) real(kind=rk), intent(in), contiguous :: Xg (:,:) real(kind=rk), intent(in), contiguous :: point_Xg (:) Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/nearest_point_help_2d.html"},{"title":"compute_dTgc_nurbs_2d_vector – ForCAD","text":"impure subroutine compute_dTgc_nurbs_2d_vector(Xt, knot1, knot2, degree, nc, ng, Wc, dTgc, Tgc) Uses forcad_utils proc~~compute_dtgc_nurbs_2d_vector~~UsesGraph proc~compute_dtgc_nurbs_2d_vector compute_dTgc_nurbs_2d_vector module~forcad_utils forcad_utils proc~compute_dtgc_nurbs_2d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: ng (2) real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_dtgc_nurbs_2d_vector~~CallsGraph proc~compute_dtgc_nurbs_2d_vector compute_dTgc_nurbs_2d_vector proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_nurbs_2d_vector->proc~basis_bspline_der proc~kron kron proc~compute_dtgc_nurbs_2d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_nurbs_2d_vector.html"},{"title":"compute_dTgc_nurbs_2d_scalar – ForCAD","text":"impure subroutine compute_dTgc_nurbs_2d_scalar(Xt, knot1, knot2, degree, nc, Wc, dTgc, Tgc, elem) Uses forcad_utils proc~~compute_dtgc_nurbs_2d_scalar~~UsesGraph proc~compute_dtgc_nurbs_2d_scalar compute_dTgc_nurbs_2d_scalar module~forcad_utils forcad_utils proc~compute_dtgc_nurbs_2d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~compute_dtgc_nurbs_2d_scalar~~CallsGraph proc~compute_dtgc_nurbs_2d_scalar compute_dTgc_nurbs_2d_scalar proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_nurbs_2d_scalar->proc~basis_bspline_der proc~kron kron proc~compute_dtgc_nurbs_2d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_nurbs_2d_scalar.html"},{"title":"compute_dTgc_bspline_2d_vector – ForCAD","text":"impure subroutine compute_dTgc_bspline_2d_vector(Xt, knot1, knot2, degree, nc, ng, dTgc, Tgc) Uses forcad_utils proc~~compute_dtgc_bspline_2d_vector~~UsesGraph proc~compute_dtgc_bspline_2d_vector compute_dTgc_bspline_2d_vector module~forcad_utils forcad_utils proc~compute_dtgc_bspline_2d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: ng (2) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_dtgc_bspline_2d_vector~~CallsGraph proc~compute_dtgc_bspline_2d_vector compute_dTgc_bspline_2d_vector proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_bspline_2d_vector->proc~basis_bspline_der proc~kron kron proc~compute_dtgc_bspline_2d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_bspline_2d_vector.html"},{"title":"compute_dTgc_bspline_2d_scalar – ForCAD","text":"impure subroutine compute_dTgc_bspline_2d_scalar(Xt, knot1, knot2, degree, nc, dTgc, Tgc, elem) Uses forcad_utils proc~~compute_dtgc_bspline_2d_scalar~~UsesGraph proc~compute_dtgc_bspline_2d_scalar compute_dTgc_bspline_2d_scalar module~forcad_utils forcad_utils proc~compute_dtgc_bspline_2d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~compute_dtgc_bspline_2d_scalar~~CallsGraph proc~compute_dtgc_bspline_2d_scalar compute_dTgc_bspline_2d_scalar proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_bspline_2d_scalar->proc~basis_bspline_der proc~kron kron proc~compute_dtgc_bspline_2d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_bspline_2d_scalar.html"},{"title":"compute_d2Tgc_nurbs_2d_vector – ForCAD","text":"impure subroutine compute_d2Tgc_nurbs_2d_vector(Xt, knot1, knot2, degree, nc, ng, Wc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_nurbs_2d_vector~~UsesGraph proc~compute_d2tgc_nurbs_2d_vector compute_d2Tgc_nurbs_2d_vector module~forcad_utils forcad_utils proc~compute_d2tgc_nurbs_2d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: ng (2) real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_d2tgc_nurbs_2d_vector~~CallsGraph proc~compute_d2tgc_nurbs_2d_vector compute_d2Tgc_nurbs_2d_vector proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_nurbs_2d_vector->proc~basis_bspline_2der proc~kron kron proc~compute_d2tgc_nurbs_2d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_nurbs_2d_vector.html"},{"title":"compute_d2Tgc_nurbs_2d_scalar – ForCAD","text":"impure subroutine compute_d2Tgc_nurbs_2d_scalar(Xt, knot1, knot2, degree, nc, Wc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_nurbs_2d_scalar~~UsesGraph proc~compute_d2tgc_nurbs_2d_scalar compute_d2Tgc_nurbs_2d_scalar module~forcad_utils forcad_utils proc~compute_d2tgc_nurbs_2d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~compute_d2tgc_nurbs_2d_scalar~~CallsGraph proc~compute_d2tgc_nurbs_2d_scalar compute_d2Tgc_nurbs_2d_scalar proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_nurbs_2d_scalar->proc~basis_bspline_2der proc~kron kron proc~compute_d2tgc_nurbs_2d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_nurbs_2d_scalar.html"},{"title":"compute_d2Tgc_bspline_2d_vector – ForCAD","text":"impure subroutine compute_d2Tgc_bspline_2d_vector(Xt, knot1, knot2, degree, nc, ng, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_bspline_2d_vector~~UsesGraph proc~compute_d2tgc_bspline_2d_vector compute_d2Tgc_bspline_2d_vector module~forcad_utils forcad_utils proc~compute_d2tgc_bspline_2d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: ng (2) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_d2tgc_bspline_2d_vector~~CallsGraph proc~compute_d2tgc_bspline_2d_vector compute_d2Tgc_bspline_2d_vector proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_bspline_2d_vector->proc~basis_bspline_2der proc~kron kron proc~compute_d2tgc_bspline_2d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_bspline_2d_vector.html"},{"title":"compute_d2Tgc_bspline_2d_scalar – ForCAD","text":"impure subroutine compute_d2Tgc_bspline_2d_scalar(Xt, knot1, knot2, degree, nc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_bspline_2d_scalar~~UsesGraph proc~compute_d2tgc_bspline_2d_scalar compute_d2Tgc_bspline_2d_scalar module~forcad_utils forcad_utils proc~compute_d2tgc_bspline_2d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~compute_d2tgc_bspline_2d_scalar~~CallsGraph proc~compute_d2tgc_bspline_2d_scalar compute_d2Tgc_bspline_2d_scalar proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_bspline_2d_scalar->proc~basis_bspline_2der proc~kron kron proc~compute_d2tgc_bspline_2d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_bspline_2d_scalar.html"},{"title":"compute_Xg_nurbs_1d – ForCAD","text":"impure function compute_Xg_nurbs_1d(Xt, knot, degree, nc, ng, Xc, Wc) result(Xg) Uses forcad_utils proc~~compute_xg_nurbs_1d~~UsesGraph proc~compute_xg_nurbs_1d compute_Xg_nurbs_1d module~forcad_utils forcad_utils proc~compute_xg_nurbs_1d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc integer, intent(in) :: ng real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_xg_nurbs_1d~~CallsGraph proc~compute_xg_nurbs_1d compute_Xg_nurbs_1d proc~basis_bspline basis_bspline proc~compute_xg_nurbs_1d->proc~basis_bspline Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_nurbs_1d.html"},{"title":"compute_Xg_nurbs_1d_1point – ForCAD","text":"impure function compute_Xg_nurbs_1d_1point(Xt, knot, degree, nc, Xc, Wc) result(Xg) Uses forcad_utils proc~~compute_xg_nurbs_1d_1point~~UsesGraph proc~compute_xg_nurbs_1d_1point compute_Xg_nurbs_1d_1point module~forcad_utils forcad_utils proc~compute_xg_nurbs_1d_1point->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_xg_nurbs_1d_1point~~CallsGraph proc~compute_xg_nurbs_1d_1point compute_Xg_nurbs_1d_1point proc~basis_bspline basis_bspline proc~compute_xg_nurbs_1d_1point->proc~basis_bspline Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_nurbs_1d_1point.html"},{"title":"compute_Xg_bspline_1d – ForCAD","text":"impure function compute_Xg_bspline_1d(Xt, knot, degree, nc, ng, Xc) result(Xg) Uses forcad_utils proc~~compute_xg_bspline_1d~~UsesGraph proc~compute_xg_bspline_1d compute_Xg_bspline_1d module~forcad_utils forcad_utils proc~compute_xg_bspline_1d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc integer, intent(in) :: ng real(kind=rk), intent(in), contiguous :: Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_xg_bspline_1d~~CallsGraph proc~compute_xg_bspline_1d compute_Xg_bspline_1d proc~basis_bspline basis_bspline proc~compute_xg_bspline_1d->proc~basis_bspline Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_bspline_1d.html"},{"title":"compute_Xg_bspline_1d_1point – ForCAD","text":"impure function compute_Xg_bspline_1d_1point(Xt, knot, degree, nc, Xc) result(Xg) Uses forcad_utils proc~~compute_xg_bspline_1d_1point~~UsesGraph proc~compute_xg_bspline_1d_1point compute_Xg_bspline_1d_1point module~forcad_utils forcad_utils proc~compute_xg_bspline_1d_1point->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Xc (:,:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_xg_bspline_1d_1point~~CallsGraph proc~compute_xg_bspline_1d_1point compute_Xg_bspline_1d_1point proc~basis_bspline basis_bspline proc~compute_xg_bspline_1d_1point->proc~basis_bspline Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_bspline_1d_1point.html"},{"title":"compute_Tgc_nurbs_1d_vector – ForCAD","text":"impure function compute_Tgc_nurbs_1d_vector(Xt, knot, degree, nc, ng, Wc) result(Tgc) Uses forcad_utils proc~~compute_tgc_nurbs_1d_vector~~UsesGraph proc~compute_tgc_nurbs_1d_vector compute_Tgc_nurbs_1d_vector module~forcad_utils forcad_utils proc~compute_tgc_nurbs_1d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc integer, intent(in) :: ng real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_tgc_nurbs_1d_vector~~CallsGraph proc~compute_tgc_nurbs_1d_vector compute_Tgc_nurbs_1d_vector proc~basis_bspline basis_bspline proc~compute_tgc_nurbs_1d_vector->proc~basis_bspline Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_nurbs_1d_vector.html"},{"title":"compute_Tgc_nurbs_1d_scalar – ForCAD","text":"impure function compute_Tgc_nurbs_1d_scalar(Xt, knot, degree, nc, Wc) result(Tgc) Uses forcad_utils proc~~compute_tgc_nurbs_1d_scalar~~UsesGraph proc~compute_tgc_nurbs_1d_scalar compute_Tgc_nurbs_1d_scalar module~forcad_utils forcad_utils proc~compute_tgc_nurbs_1d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_tgc_nurbs_1d_scalar~~CallsGraph proc~compute_tgc_nurbs_1d_scalar compute_Tgc_nurbs_1d_scalar proc~basis_bspline basis_bspline proc~compute_tgc_nurbs_1d_scalar->proc~basis_bspline Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_nurbs_1d_scalar.html"},{"title":"compute_Tgc_bspline_1d_vector – ForCAD","text":"impure function compute_Tgc_bspline_1d_vector(Xt, knot, degree, nc, ng) result(Tgc) Uses forcad_utils proc~~compute_tgc_bspline_1d_vector~~UsesGraph proc~compute_tgc_bspline_1d_vector compute_Tgc_bspline_1d_vector module~forcad_utils forcad_utils proc~compute_tgc_bspline_1d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc integer, intent(in) :: ng Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_tgc_bspline_1d_vector~~CallsGraph proc~compute_tgc_bspline_1d_vector compute_Tgc_bspline_1d_vector proc~basis_bspline basis_bspline proc~compute_tgc_bspline_1d_vector->proc~basis_bspline Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_bspline_1d_vector.html"},{"title":"compute_Tgc_bspline_1d_scalar – ForCAD","text":"impure function compute_Tgc_bspline_1d_scalar(Xt, knot, degree, nc) result(Tgc) Uses forcad_utils proc~~compute_tgc_bspline_1d_scalar~~UsesGraph proc~compute_tgc_bspline_1d_scalar compute_Tgc_bspline_1d_scalar module~forcad_utils forcad_utils proc~compute_tgc_bspline_1d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_tgc_bspline_1d_scalar~~CallsGraph proc~compute_tgc_bspline_1d_scalar compute_Tgc_bspline_1d_scalar proc~basis_bspline basis_bspline proc~compute_tgc_bspline_1d_scalar->proc~basis_bspline Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_bspline_1d_scalar.html"},{"title":"nearest_point_help_1d – ForCAD","text":"impure function nearest_point_help_1d(ng, Xg, point_Xg) result(distances) Uses forcad_utils proc~~nearest_point_help_1d~~UsesGraph proc~nearest_point_help_1d nearest_point_help_1d module~forcad_utils forcad_utils proc~nearest_point_help_1d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name integer, intent(in) :: ng real(kind=rk), intent(in), contiguous :: Xg (:,:) real(kind=rk), intent(in), contiguous :: point_Xg (:) Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/nearest_point_help_1d.html"},{"title":"compute_dTgc_nurbs_1d_vector – ForCAD","text":"impure subroutine compute_dTgc_nurbs_1d_vector(Xt, knot, degree, nc, ng, Wc, dTgc, Tgc) Uses forcad_utils proc~~compute_dtgc_nurbs_1d_vector~~UsesGraph proc~compute_dtgc_nurbs_1d_vector compute_dTgc_nurbs_1d_vector module~forcad_utils forcad_utils proc~compute_dtgc_nurbs_1d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc integer, intent(in) :: ng real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_dtgc_nurbs_1d_vector~~CallsGraph proc~compute_dtgc_nurbs_1d_vector compute_dTgc_nurbs_1d_vector proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_nurbs_1d_vector->proc~basis_bspline_der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_nurbs_1d_vector.html"},{"title":"compute_dTgc_nurbs_1d_scalar – ForCAD","text":"impure subroutine compute_dTgc_nurbs_1d_scalar(Xt, knot, degree, nc, Wc, dTgc, Tgc, elem) Uses forcad_utils proc~~compute_dtgc_nurbs_1d_scalar~~UsesGraph proc~compute_dtgc_nurbs_1d_scalar compute_dTgc_nurbs_1d_scalar module~forcad_utils forcad_utils proc~compute_dtgc_nurbs_1d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: dTgc (:) real(kind=rk), intent(out), allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~compute_dtgc_nurbs_1d_scalar~~CallsGraph proc~compute_dtgc_nurbs_1d_scalar compute_dTgc_nurbs_1d_scalar proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_nurbs_1d_scalar->proc~basis_bspline_der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_nurbs_1d_scalar.html"},{"title":"compute_dTgc_bspline_1d_vector – ForCAD","text":"impure subroutine compute_dTgc_bspline_1d_vector(Xt, knot, degree, nc, ng, dTgc, Tgc) Uses forcad_utils proc~~compute_dtgc_bspline_1d_vector~~UsesGraph proc~compute_dtgc_bspline_1d_vector compute_dTgc_bspline_1d_vector module~forcad_utils forcad_utils proc~compute_dtgc_bspline_1d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc integer, intent(in) :: ng real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_dtgc_bspline_1d_vector~~CallsGraph proc~compute_dtgc_bspline_1d_vector compute_dTgc_bspline_1d_vector proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_bspline_1d_vector->proc~basis_bspline_der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_bspline_1d_vector.html"},{"title":"compute_dTgc_bspline_1d_scalar – ForCAD","text":"impure subroutine compute_dTgc_bspline_1d_scalar(Xt, knot, degree, nc, dTgc, Tgc, elem) Uses forcad_utils proc~~compute_dtgc_bspline_1d_scalar~~UsesGraph proc~compute_dtgc_bspline_1d_scalar compute_dTgc_bspline_1d_scalar module~forcad_utils forcad_utils proc~compute_dtgc_bspline_1d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(out), allocatable :: dTgc (:) real(kind=rk), intent(out), allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~compute_dtgc_bspline_1d_scalar~~CallsGraph proc~compute_dtgc_bspline_1d_scalar compute_dTgc_bspline_1d_scalar proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_bspline_1d_scalar->proc~basis_bspline_der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_bspline_1d_scalar.html"},{"title":"compute_d2Tgc_nurbs_1d_vector – ForCAD","text":"impure subroutine compute_d2Tgc_nurbs_1d_vector(Xt, knot, degree, nc, ng, Wc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_nurbs_1d_vector~~UsesGraph proc~compute_d2tgc_nurbs_1d_vector compute_d2Tgc_nurbs_1d_vector module~forcad_utils forcad_utils proc~compute_d2tgc_nurbs_1d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc integer, intent(in) :: ng real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_d2tgc_nurbs_1d_vector~~CallsGraph proc~compute_d2tgc_nurbs_1d_vector compute_d2Tgc_nurbs_1d_vector proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_nurbs_1d_vector->proc~basis_bspline_2der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_nurbs_1d_vector.html"},{"title":"compute_d2Tgc_nurbs_1d_scalar – ForCAD","text":"impure subroutine compute_d2Tgc_nurbs_1d_scalar(Xt, knot, degree, nc, Wc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_nurbs_1d_scalar~~UsesGraph proc~compute_d2tgc_nurbs_1d_scalar compute_d2Tgc_nurbs_1d_scalar module~forcad_utils forcad_utils proc~compute_d2tgc_nurbs_1d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc (:) real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~compute_d2tgc_nurbs_1d_scalar~~CallsGraph proc~compute_d2tgc_nurbs_1d_scalar compute_d2Tgc_nurbs_1d_scalar proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_nurbs_1d_scalar->proc~basis_bspline_2der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_nurbs_1d_scalar.html"},{"title":"compute_d2Tgc_bspline_1d_vector – ForCAD","text":"impure subroutine compute_d2Tgc_bspline_1d_vector(Xt, knot, degree, nc, ng, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_bspline_1d_vector~~UsesGraph proc~compute_d2tgc_bspline_1d_vector compute_d2Tgc_bspline_1d_vector module~forcad_utils forcad_utils proc~compute_d2tgc_bspline_1d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc integer, intent(in) :: ng real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_d2tgc_bspline_1d_vector~~CallsGraph proc~compute_d2tgc_bspline_1d_vector compute_d2Tgc_bspline_1d_vector proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_bspline_1d_vector->proc~basis_bspline_2der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_bspline_1d_vector.html"},{"title":"compute_d2Tgc_bspline_1d_scalar – ForCAD","text":"impure subroutine compute_d2Tgc_bspline_1d_scalar(Xt, knot, degree, nc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_bspline_1d_scalar~~UsesGraph proc~compute_d2tgc_bspline_1d_scalar compute_d2Tgc_bspline_1d_scalar module~forcad_utils forcad_utils proc~compute_d2tgc_bspline_1d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(out), allocatable :: d2Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc (:) real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~compute_d2tgc_bspline_1d_scalar~~CallsGraph proc~compute_d2tgc_bspline_1d_scalar compute_d2Tgc_bspline_1d_scalar proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_bspline_1d_scalar->proc~basis_bspline_2der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_bspline_1d_scalar.html"},{"title":"cmp_Xg – ForCAD","text":"private pure function cmp_Xg(this, Xt) result(Xg) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this real(kind=rk), intent(in), contiguous :: Xt (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~cmp_xg~~CallsGraph proc~cmp_xg nurbs_volume%cmp_Xg interface~compute_xg compute_Xg proc~cmp_xg->interface~compute_xg proc~is_rational nurbs_volume%is_rational proc~cmp_xg->proc~is_rational Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_xg~~CalledByGraph proc~cmp_xg nurbs_volume%cmp_Xg proc~nearest_point2 nurbs_volume%nearest_point2 proc~nearest_point2->proc~cmp_xg program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_xg.html"},{"title":"cmp_degreeFace – ForCAD","text":"private pure function cmp_degreeFace(this, face) result(degree) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: face Return Value integer, (3) Called by proc~~cmp_degreeface~~CalledByGraph proc~cmp_degreeface nurbs_volume%cmp_degreeFace program~example3_volume example3_volume program~example3_volume->proc~cmp_degreeface Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_degreeface.html"},{"title":"cmp_elem – ForCAD","text":"private pure function cmp_elem(this) result(elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem~~CallsGraph proc~cmp_elem nurbs_volume%cmp_elem interface~elemconn_cn elemConn_Cn proc~cmp_elem->interface~elemconn_cn interface~unique unique proc~cmp_elem->interface~unique proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_elem->proc~get_multiplicity proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem~~CalledByGraph proc~cmp_elem nurbs_volume%cmp_elem proc~ansatz nurbs_volume%ansatz proc~ansatz->proc~cmp_elem proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem proc~cmp_volume->proc~ansatz program~example3_volume example3_volume program~example3_volume->proc~cmp_elem program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem.html"},{"title":"cmp_elemFace – ForCAD","text":"private pure function cmp_elemFace(this, elem, face) result(elemConn) number of nodes in each direction Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:) Called by proc~~cmp_elemface~~CalledByGraph proc~cmp_elemface nurbs_volume%cmp_elemFace program~example3_volume example3_volume program~example3_volume->proc~cmp_elemface Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elemface.html"},{"title":"cmp_elemFace_Xc_vis – ForCAD","text":"private pure function cmp_elemFace_Xc_vis(this, elem, face) result(elemConn) number of nodes in each direction Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:)","tags":"","loc":"proc/cmp_elemface_xc_vis.html"},{"title":"cmp_elemFace_Xg_vis – ForCAD","text":"private pure function cmp_elemFace_Xg_vis(this, elem, face) result(elemConn) number of nodes in each direction Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:)","tags":"","loc":"proc/cmp_elemface_xg_vis.html"},{"title":"cmp_elem_Xc_vis – ForCAD","text":"private pure function cmp_elem_Xc_vis(this, p) result(elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem_xc_vis~~CallsGraph proc~cmp_elem_xc_vis nurbs_volume%cmp_elem_Xc_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem_xc_vis~~CalledByGraph proc~cmp_elem_xc_vis nurbs_volume%cmp_elem_Xc_vis proc~export_xc nurbs_volume%export_Xc proc~export_xc->proc~cmp_elem_xc_vis program~example3_volume example3_volume program~example3_volume->proc~export_xc program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~export_xc program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~export_xc program~shape_c_3d shape_C_3d program~shape_c_3d->proc~export_xc program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~export_xc program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~export_xc program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~export_xc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem_xc_vis.html"},{"title":"cmp_elem_Xg_vis – ForCAD","text":"private pure function cmp_elem_Xg_vis(this, p) result(elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem_xg_vis~~CallsGraph proc~cmp_elem_xg_vis nurbs_volume%cmp_elem_Xg_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem_xg_vis~~CalledByGraph proc~cmp_elem_xg_vis nurbs_volume%cmp_elem_Xg_vis proc~export_xg nurbs_volume%export_Xg proc~export_xg->proc~cmp_elem_xg_vis program~example3_volume example3_volume program~example3_volume->proc~export_xg program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~export_xg program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~export_xg program~shape_c_3d shape_C_3d program~shape_c_3d->proc~export_xg program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~export_xg program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~export_xg program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~export_xg Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem_xg_vis.html"},{"title":"get_Wc_all – ForCAD","text":"private pure function get_Wc_all(this) result(Wc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) Called by proc~~get_wc_all~~CalledByGraph proc~get_wc_all nurbs_volume%get_Wc_all none~get_wc nurbs_volume%get_Wc none~get_wc->proc~get_wc_all proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~get_wc proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~get_wc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_wc_all.html"},{"title":"get_Wci – ForCAD","text":"private pure function get_Wci(this, n) result(Wc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) Called by proc~~get_wci~~CalledByGraph proc~get_wci nurbs_volume%get_Wci none~get_wc nurbs_volume%get_Wc none~get_wc->proc~get_wci proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~get_wc proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~get_wc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_wci.html"},{"title":"get_Xc_all – ForCAD","text":"private pure function get_Xc_all(this) result(Xc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) Called by proc~~get_xc_all~~CalledByGraph proc~get_xc_all nurbs_volume%get_Xc_all none~get_xc nurbs_volume%get_Xc none~get_xc->proc~get_xc_all proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~get_xc proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~get_xc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xc_all.html"},{"title":"get_Xci – ForCAD","text":"private pure function get_Xci(this, n) result(Xc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) Called by proc~~get_xci~~CalledByGraph proc~get_xci nurbs_volume%get_Xci none~get_xc nurbs_volume%get_Xc none~get_xc->proc~get_xci proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~get_xc proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~get_xc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xci.html"},{"title":"get_Xcid – ForCAD","text":"private pure function get_Xcid(this, n, dir) result(Xc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) Called by proc~~get_xcid~~CalledByGraph proc~get_xcid nurbs_volume%get_Xcid none~get_xc nurbs_volume%get_Xc none~get_xc->proc~get_xcid proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~get_xc proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~get_xc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xcid.html"},{"title":"get_Xg_all – ForCAD","text":"private pure function get_Xg_all(this) result(Xg) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:)","tags":"","loc":"proc/get_xg_all.html"},{"title":"get_Xgi – ForCAD","text":"private pure function get_Xgi(this, n) result(Xg) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/get_xgi.html"},{"title":"get_Xgid – ForCAD","text":"private pure function get_Xgid(this, n, dir) result(Xg) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk)","tags":"","loc":"proc/get_xgid.html"},{"title":"get_Xt – ForCAD","text":"private pure function get_Xt(this, dir) result(Xt) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/get_xt.html"},{"title":"get_continuity – ForCAD","text":"private pure function get_continuity(this, dir) result(c) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) Calls proc~~get_continuity~~CallsGraph proc~get_continuity nurbs_volume%get_continuity interface~compute_multiplicity compute_multiplicity proc~get_continuity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_continuity.html"},{"title":"get_degree_all – ForCAD","text":"private pure function get_degree_all(this) result(degree) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) Called by proc~~get_degree_all~~CalledByGraph proc~get_degree_all nurbs_volume%get_degree_all none~get_degree nurbs_volume%get_degree none~get_degree->proc~get_degree_all program~example3_volume example3_volume program~example3_volume->none~get_degree Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_degree_all.html"},{"title":"get_degree_dir – ForCAD","text":"private pure function get_degree_dir(this, dir) result(degree) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer Called by proc~~get_degree_dir~~CalledByGraph proc~get_degree_dir nurbs_volume%get_degree_dir none~get_degree nurbs_volume%get_degree none~get_degree->proc~get_degree_dir program~example3_volume example3_volume program~example3_volume->none~get_degree Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_degree_dir.html"},{"title":"get_elem – ForCAD","text":"private pure function get_elem(this) result(elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem.html"},{"title":"get_elem_Xc_vis – ForCAD","text":"private pure function get_elem_Xc_vis(this) result(elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem_xc_vis.html"},{"title":"get_elem_Xg_vis – ForCAD","text":"private pure function get_elem_Xg_vis(this) result(elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem_xg_vis.html"},{"title":"get_knot_all – ForCAD","text":"private pure function get_knot_all(this, dir) result(knot) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) Called by proc~~get_knot_all~~CalledByGraph proc~get_knot_all nurbs_volume%get_knot_all none~get_knot nurbs_volume%get_knot none~get_knot->proc~get_knot_all proc~elevate_degree nurbs_volume%elevate_degree proc~elevate_degree->none~get_knot proc~insert_knots nurbs_volume%insert_knots proc~insert_knots->none~get_knot proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~get_knot proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~get_knot proc~remove_knots nurbs_volume%remove_knots proc~remove_knots->none~get_knot program~example3_volume example3_volume program~example3_volume->none~get_knot program~example3_volume->proc~elevate_degree program~example3_volume->proc~insert_knots program~example3_volume->proc~remove_knots Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_knot_all.html"},{"title":"get_knoti – ForCAD","text":"private pure function get_knoti(this, dir, i) result(knot) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir integer, intent(in) :: i Return Value real(kind=rk) Called by proc~~get_knoti~~CalledByGraph proc~get_knoti nurbs_volume%get_knoti none~get_knot nurbs_volume%get_knot none~get_knot->proc~get_knoti proc~elevate_degree nurbs_volume%elevate_degree proc~elevate_degree->none~get_knot proc~insert_knots nurbs_volume%insert_knots proc~insert_knots->none~get_knot proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~get_knot proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~get_knot proc~remove_knots nurbs_volume%remove_knots proc~remove_knots->none~get_knot program~example3_volume example3_volume program~example3_volume->none~get_knot program~example3_volume->proc~elevate_degree program~example3_volume->proc~insert_knots program~example3_volume->proc~remove_knots Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_knoti.html"},{"title":"get_multiplicity – ForCAD","text":"private pure function get_multiplicity(this, dir) result(m) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) Calls proc~~get_multiplicity~~CallsGraph proc~get_multiplicity nurbs_volume%get_multiplicity interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~get_multiplicity~~CalledByGraph proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree nurbs_volume%cmp_degree proc~cmp_degree->proc~get_multiplicity proc~cmp_elem nurbs_volume%cmp_elem proc~cmp_elem->proc~get_multiplicity proc~ansatz nurbs_volume%ansatz proc~ansatz->proc~cmp_elem none~set nurbs_volume%set proc~ansatz->none~set proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem proc~cmp_volume->proc~ansatz proc~set1 nurbs_volume%set1 proc~set1->proc~cmp_degree proc~set3 nurbs_volume%set3 proc~set3->proc~cmp_degree program~example3_volume example3_volume program~example3_volume->proc~cmp_elem program~example3_volume->none~set proc~elevate_degree nurbs_volume%elevate_degree program~example3_volume->proc~elevate_degree proc~insert_knots nurbs_volume%insert_knots program~example3_volume->proc~insert_knots proc~remove_knots nurbs_volume%remove_knots program~example3_volume->proc~remove_knots none~set->proc~set1 none~set->proc~set3 program~compute_volume compute_volume program~compute_volume->proc~cmp_volume program~compute_volume->none~set proc~elevate_degree->none~set proc~insert_knots->none~set proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~set proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~set proc~remove_knots->none~set proc~set_c nurbs_volume%set_C proc~set_c->none~set proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_multiplicity.html"},{"title":"get_nc_all – ForCAD","text":"private pure function get_nc_all(this) result(nc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3)","tags":"","loc":"proc/get_nc_all.html"},{"title":"get_nc_dir – ForCAD","text":"private pure function get_nc_dir(this, dir) result(nc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer Calls proc~~get_nc_dir~~CallsGraph proc~get_nc_dir nurbs_volume%get_nc_dir interface~compute_multiplicity compute_multiplicity proc~get_nc_dir->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_nc_dir.html"},{"title":"get_ng – ForCAD","text":"private pure function get_ng(this) result(ng) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3)","tags":"","loc":"proc/get_ng.html"},{"title":"is_rational – ForCAD","text":"private pure function is_rational(this) result(r) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value logical Called by proc~~is_rational~~CalledByGraph proc~is_rational nurbs_volume%is_rational proc~basis_scalar nurbs_volume%basis_scalar proc~basis_scalar->proc~is_rational proc~basis_vector nurbs_volume%basis_vector proc~basis_vector->proc~is_rational proc~cmp_xg nurbs_volume%cmp_Xg proc~cmp_xg->proc~is_rational proc~create nurbs_volume%create proc~create->proc~is_rational proc~derivative2_scalar nurbs_volume%derivative2_scalar proc~derivative2_scalar->proc~is_rational proc~derivative2_vector nurbs_volume%derivative2_vector proc~derivative2_vector->proc~is_rational proc~derivative_scalar nurbs_volume%derivative_scalar proc~derivative_scalar->proc~is_rational proc~derivative_vector nurbs_volume%derivative_vector proc~derivative_vector->proc~is_rational none~derivative nurbs_volume%derivative none~derivative->proc~derivative_scalar none~derivative->proc~derivative_vector none~derivative2 nurbs_volume%derivative2 none~derivative2->proc~derivative2_scalar none~derivative2->proc~derivative2_vector proc~nearest_point2 nurbs_volume%nearest_point2 proc~nearest_point2->proc~cmp_xg proc~nearest_point2->proc~create proc~nearest_point2->none~derivative2 program~example3_volume example3_volume program~example3_volume->proc~create program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~create program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~create program~nearest_point_3d->proc~nearest_point2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~create program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~create program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~create program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~create proc~ansatz nurbs_volume%ansatz proc~ansatz->none~derivative proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/is_rational.html"},{"title":"ansatz – ForCAD","text":"private pure subroutine ansatz(this, ie, ig, Tgc, dTgc_dXg, dV) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dV Calls proc~~ansatz~~CallsGraph proc~ansatz nurbs_volume%ansatz interface~gauss_leg gauss_leg proc~ansatz->interface~gauss_leg interface~ndgrid ndgrid proc~ansatz->interface~ndgrid interface~unique unique proc~ansatz->interface~unique none~derivative nurbs_volume%derivative proc~ansatz->none~derivative none~set nurbs_volume%set proc~ansatz->none~set proc~cmp_elem nurbs_volume%cmp_elem proc~ansatz->proc~cmp_elem proc~det det proc~ansatz->proc~det proc~inv inv proc~ansatz->proc~inv proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar nurbs_volume%derivative_scalar none~derivative->proc~derivative_scalar proc~derivative_vector nurbs_volume%derivative_vector none~derivative->proc~derivative_vector proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 proc~cmp_elem->interface~unique interface~elemconn_cn elemConn_Cn proc~cmp_elem->interface~elemconn_cn proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_elem->proc~get_multiplicity proc~inv->proc~det proc~inv->proc~inv proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v interface~compute_dtgc compute_dTgc proc~derivative_scalar->interface~compute_dtgc proc~is_rational nurbs_volume%is_rational proc~derivative_scalar->proc~is_rational proc~derivative_vector->interface~ndgrid proc~derivative_vector->interface~compute_dtgc proc~derivative_vector->proc~is_rational gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_2d->gauss_legendre proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->proc~kron interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~cmp_degree->proc~get_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~ansatz~~CalledByGraph proc~ansatz nurbs_volume%ansatz proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/ansatz.html"},{"title":"basis_scalar – ForCAD","text":"private pure subroutine basis_scalar(this, Xt, Tgc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~basis_scalar~~CallsGraph proc~basis_scalar nurbs_volume%basis_scalar interface~compute_tgc compute_Tgc proc~basis_scalar->interface~compute_tgc proc~is_rational nurbs_volume%is_rational proc~basis_scalar->proc~is_rational Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_scalar.html"},{"title":"basis_vector – ForCAD","text":"private pure subroutine basis_vector(this, res1, res2, res3, Xt1, Xt2, Xt3, Tgc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~basis_vector~~CallsGraph proc~basis_vector nurbs_volume%basis_vector interface~compute_tgc compute_Tgc proc~basis_vector->interface~compute_tgc interface~ndgrid ndgrid proc~basis_vector->interface~ndgrid proc~is_rational nurbs_volume%is_rational proc~basis_vector->proc~is_rational proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_vector.html"},{"title":"cmp_degree – ForCAD","text":"private pure subroutine cmp_degree(this, dir) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: dir Calls proc~~cmp_degree~~CallsGraph proc~cmp_degree nurbs_volume%cmp_degree proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_degree~~CalledByGraph proc~cmp_degree nurbs_volume%cmp_degree proc~set1 nurbs_volume%set1 proc~set1->proc~cmp_degree proc~set3 nurbs_volume%set3 proc~set3->proc~cmp_degree none~set nurbs_volume%set none~set->proc~set1 none~set->proc~set3 proc~ansatz nurbs_volume%ansatz proc~ansatz->none~set proc~elevate_degree nurbs_volume%elevate_degree proc~elevate_degree->none~set proc~insert_knots nurbs_volume%insert_knots proc~insert_knots->none~set proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~set proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~set proc~remove_knots nurbs_volume%remove_knots proc~remove_knots->none~set proc~set_c nurbs_volume%set_C proc~set_c->none~set proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set program~compute_volume compute_volume program~compute_volume->none~set proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume program~example3_volume example3_volume program~example3_volume->none~set program~example3_volume->proc~elevate_degree program~example3_volume->proc~insert_knots program~example3_volume->proc~remove_knots program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set proc~cmp_volume->proc~ansatz program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_degree.html"},{"title":"cmp_nc – ForCAD","text":"private pure subroutine cmp_nc(this, dir) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: dir Calls proc~~cmp_nc~~CallsGraph proc~cmp_nc nurbs_volume%cmp_nc interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_nc~~CalledByGraph proc~cmp_nc nurbs_volume%cmp_nc proc~set1 nurbs_volume%set1 proc~set1->proc~cmp_nc proc~set2 nurbs_volume%set2 proc~set2->proc~cmp_nc none~set nurbs_volume%set none~set->proc~set1 none~set->proc~set2 proc~ansatz nurbs_volume%ansatz proc~ansatz->none~set proc~elevate_degree nurbs_volume%elevate_degree proc~elevate_degree->none~set proc~insert_knots nurbs_volume%insert_knots proc~insert_knots->none~set proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~set proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~set proc~remove_knots nurbs_volume%remove_knots proc~remove_knots->none~set proc~set_c nurbs_volume%set_C proc~set_c->none~set proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set program~compute_volume compute_volume program~compute_volume->none~set proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume program~example3_volume example3_volume program~example3_volume->none~set program~example3_volume->proc~elevate_degree program~example3_volume->proc~insert_knots program~example3_volume->proc~remove_knots program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set proc~cmp_volume->proc~ansatz program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_nc.html"},{"title":"cmp_volume – ForCAD","text":"private pure subroutine cmp_volume(this, volume) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(out) :: volume Calls proc~~cmp_volume~~CallsGraph proc~cmp_volume nurbs_volume%cmp_volume proc~ansatz nurbs_volume%ansatz proc~cmp_volume->proc~ansatz proc~cmp_elem nurbs_volume%cmp_elem proc~cmp_volume->proc~cmp_elem proc~ansatz->proc~cmp_elem interface~gauss_leg gauss_leg proc~ansatz->interface~gauss_leg interface~ndgrid ndgrid proc~ansatz->interface~ndgrid interface~unique unique proc~ansatz->interface~unique none~derivative nurbs_volume%derivative proc~ansatz->none~derivative none~set nurbs_volume%set proc~ansatz->none~set proc~det det proc~ansatz->proc~det proc~inv inv proc~ansatz->proc~inv interface~elemconn_cn elemConn_Cn proc~cmp_elem->interface~elemconn_cn proc~cmp_elem->interface~unique proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_elem->proc~get_multiplicity proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar nurbs_volume%derivative_scalar none~derivative->proc~derivative_scalar proc~derivative_vector nurbs_volume%derivative_vector none~derivative->proc~derivative_vector proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~inv->proc~det proc~inv->proc~inv proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 interface~compute_dtgc compute_dTgc proc~derivative_scalar->interface~compute_dtgc proc~is_rational nurbs_volume%is_rational proc~derivative_scalar->proc~is_rational proc~derivative_vector->interface~ndgrid proc~derivative_vector->interface~compute_dtgc proc~derivative_vector->proc~is_rational gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_2d->gauss_legendre proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->proc~kron proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~cmp_degree->proc~get_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_volume~~CalledByGraph proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_volume.html"},{"title":"create – ForCAD","text":"private pure subroutine create(this, res1, res2, res3, Xt1, Xt2, Xt3, Xt) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(in), optional, contiguous :: Xt (:,:) Calls proc~~create~~CallsGraph proc~create nurbs_volume%create interface~compute_xg compute_Xg proc~create->interface~compute_xg interface~ndgrid ndgrid proc~create->interface~ndgrid proc~is_rational nurbs_volume%is_rational proc~create->proc~is_rational proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~create~~CalledByGraph proc~create nurbs_volume%create proc~nearest_point2 nurbs_volume%nearest_point2 proc~nearest_point2->proc~create program~example3_volume example3_volume program~example3_volume->proc~create program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~create program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~create program~nearest_point_3d->proc~nearest_point2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~create program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~create program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~create program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~create Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/create.html"},{"title":"derivative2_scalar – ForCAD","text":"private pure subroutine derivative2_scalar(this, Xt, d2Tgc, dTgc, Tgc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) Calls proc~~derivative2_scalar~~CallsGraph proc~derivative2_scalar nurbs_volume%derivative2_scalar interface~compute_d2tgc compute_d2Tgc proc~derivative2_scalar->interface~compute_d2tgc proc~is_rational nurbs_volume%is_rational proc~derivative2_scalar->proc~is_rational Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative2_scalar~~CalledByGraph proc~derivative2_scalar nurbs_volume%derivative2_scalar none~derivative2 nurbs_volume%derivative2 none~derivative2->proc~derivative2_scalar proc~nearest_point2 nurbs_volume%nearest_point2 proc~nearest_point2->none~derivative2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative2_scalar.html"},{"title":"derivative2_vector – ForCAD","text":"private pure subroutine derivative2_vector(this, res1, res2, res3, Xt1, Xt2, Xt3, d2Tgc, dTgc, Tgc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) Calls proc~~derivative2_vector~~CallsGraph proc~derivative2_vector nurbs_volume%derivative2_vector interface~compute_d2tgc compute_d2Tgc proc~derivative2_vector->interface~compute_d2tgc interface~ndgrid ndgrid proc~derivative2_vector->interface~ndgrid proc~is_rational nurbs_volume%is_rational proc~derivative2_vector->proc~is_rational proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative2_vector~~CalledByGraph proc~derivative2_vector nurbs_volume%derivative2_vector none~derivative2 nurbs_volume%derivative2 none~derivative2->proc~derivative2_vector proc~nearest_point2 nurbs_volume%nearest_point2 proc~nearest_point2->none~derivative2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative2_vector.html"},{"title":"derivative_scalar – ForCAD","text":"private pure subroutine derivative_scalar(this, Xt, dTgc, Tgc, elem) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~derivative_scalar~~CallsGraph proc~derivative_scalar nurbs_volume%derivative_scalar interface~compute_dtgc compute_dTgc proc~derivative_scalar->interface~compute_dtgc proc~is_rational nurbs_volume%is_rational proc~derivative_scalar->proc~is_rational Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative_scalar~~CalledByGraph proc~derivative_scalar nurbs_volume%derivative_scalar none~derivative nurbs_volume%derivative none~derivative->proc~derivative_scalar proc~ansatz nurbs_volume%ansatz proc~ansatz->none~derivative proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative_scalar.html"},{"title":"derivative_vector – ForCAD","text":"private pure subroutine derivative_vector(this, res1, res2, res3, Xt1, Xt2, Xt3, dTgc, Tgc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) Calls proc~~derivative_vector~~CallsGraph proc~derivative_vector nurbs_volume%derivative_vector interface~compute_dtgc compute_dTgc proc~derivative_vector->interface~compute_dtgc interface~ndgrid ndgrid proc~derivative_vector->interface~ndgrid proc~is_rational nurbs_volume%is_rational proc~derivative_vector->proc~is_rational proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative_vector~~CalledByGraph proc~derivative_vector nurbs_volume%derivative_vector none~derivative nurbs_volume%derivative none~derivative->proc~derivative_vector proc~ansatz nurbs_volume%ansatz proc~ansatz->none~derivative proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative_vector.html"},{"title":"elevate_degree – ForCAD","text":"private pure subroutine elevate_degree(this, dir, t) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir integer, intent(in) :: t Calls proc~~elevate_degree~~CallsGraph proc~elevate_degree nurbs_volume%elevate_degree none~get_knot nurbs_volume%get_knot proc~elevate_degree->none~get_knot none~set nurbs_volume%set proc~elevate_degree->none~set proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree->proc~elevate_degree_a_5_9 proc~get_knot_all nurbs_volume%get_knot_all none~get_knot->proc~get_knot_all proc~get_knoti nurbs_volume%get_knoti none~get_knot->proc~get_knoti proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 interface~compute_multiplicity compute_multiplicity proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~bincoeff bincoeff proc~elevate_degree_a_5_9->proc~bincoeff proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~factln factln proc~bincoeff->proc~factln proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~elevate_degree~~CalledByGraph proc~elevate_degree nurbs_volume%elevate_degree program~example3_volume example3_volume program~example3_volume->proc~elevate_degree Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/elevate_degree.html"},{"title":"export_Xc – ForCAD","text":"private impure subroutine export_Xc(this, filename) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this character(len=*), intent(in) :: filename Calls proc~~export_xc~~CallsGraph proc~export_xc nurbs_volume%export_Xc proc~cmp_elem_xc_vis nurbs_volume%cmp_elem_Xc_vis proc~export_xc->proc~cmp_elem_xc_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~export_xc~~CalledByGraph proc~export_xc nurbs_volume%export_Xc program~example3_volume example3_volume program~example3_volume->proc~export_xc program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~export_xc program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~export_xc program~shape_c_3d shape_C_3d program~shape_c_3d->proc~export_xc program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~export_xc program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~export_xc program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~export_xc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/export_xc.html"},{"title":"export_Xg – ForCAD","text":"private impure subroutine export_Xg(this, filename) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this character(len=*), intent(in) :: filename Calls proc~~export_xg~~CallsGraph proc~export_xg nurbs_volume%export_Xg proc~cmp_elem_xg_vis nurbs_volume%cmp_elem_Xg_vis proc~export_xg->proc~cmp_elem_xg_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~export_xg~~CalledByGraph proc~export_xg nurbs_volume%export_Xg program~example3_volume example3_volume program~example3_volume->proc~export_xg program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~export_xg program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~export_xg program~shape_c_3d shape_C_3d program~shape_c_3d->proc~export_xg program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~export_xg program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~export_xg program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~export_xg Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/export_xg.html"},{"title":"finalize – ForCAD","text":"private pure subroutine finalize(this) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this Called by proc~~finalize~~CalledByGraph proc~finalize nurbs_volume%finalize proc~nearest_point2 nurbs_volume%nearest_point2 proc~nearest_point2->proc~finalize program~example3_volume example3_volume program~example3_volume->proc~finalize program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~finalize program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~finalize program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~finalize program~nearest_point_3d->proc~nearest_point2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~finalize program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~finalize program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~finalize program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~finalize Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/finalize.html"},{"title":"insert_knots – ForCAD","text":"private pure subroutine insert_knots(this, dir, Xth, r) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) Calls proc~~insert_knots~~CallsGraph proc~insert_knots nurbs_volume%insert_knots interface~compute_multiplicity compute_multiplicity proc~insert_knots->interface~compute_multiplicity none~get_knot nurbs_volume%get_knot proc~insert_knots->none~get_knot none~set nurbs_volume%set proc~insert_knots->none~set proc~findspan findspan proc~insert_knots->proc~findspan proc~insert_knot_a_5_1 insert_knot_A_5_1 proc~insert_knots->proc~insert_knot_a_5_1 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_knot_all nurbs_volume%get_knot_all none~get_knot->proc~get_knot_all proc~get_knoti nurbs_volume%get_knoti none~get_knot->proc~get_knoti proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~insert_knots~~CalledByGraph proc~insert_knots nurbs_volume%insert_knots program~example3_volume example3_volume program~example3_volume->proc~insert_knots Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/insert_knots.html"},{"title":"modify_Wc – ForCAD","text":"private pure subroutine modify_Wc(this, W, num) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num Calls proc~~modify_wc~~CallsGraph proc~modify_wc nurbs_volume%modify_Wc none~get_knot nurbs_volume%get_knot proc~modify_wc->none~get_knot none~get_wc nurbs_volume%get_Wc proc~modify_wc->none~get_wc none~get_xc nurbs_volume%get_Xc proc~modify_wc->none~get_xc none~set nurbs_volume%set proc~modify_wc->none~set proc~get_knot_all nurbs_volume%get_knot_all none~get_knot->proc~get_knot_all proc~get_knoti nurbs_volume%get_knoti none~get_knot->proc~get_knoti proc~get_wc_all nurbs_volume%get_Wc_all none~get_wc->proc~get_wc_all proc~get_wci nurbs_volume%get_Wci none~get_wc->proc~get_wci proc~get_xc_all nurbs_volume%get_Xc_all none~get_xc->proc~get_xc_all proc~get_xci nurbs_volume%get_Xci none~get_xc->proc~get_xci proc~get_xcid nurbs_volume%get_Xcid none~get_xc->proc~get_xcid proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/modify_wc.html"},{"title":"modify_Xc – ForCAD","text":"private pure subroutine modify_Xc(this, X, num, dir) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir Calls proc~~modify_xc~~CallsGraph proc~modify_xc nurbs_volume%modify_Xc none~get_knot nurbs_volume%get_knot proc~modify_xc->none~get_knot none~get_wc nurbs_volume%get_Wc proc~modify_xc->none~get_wc none~get_xc nurbs_volume%get_Xc proc~modify_xc->none~get_xc none~set nurbs_volume%set proc~modify_xc->none~set proc~get_knot_all nurbs_volume%get_knot_all none~get_knot->proc~get_knot_all proc~get_knoti nurbs_volume%get_knoti none~get_knot->proc~get_knoti proc~get_wc_all nurbs_volume%get_Wc_all none~get_wc->proc~get_wc_all proc~get_wci nurbs_volume%get_Wci none~get_wc->proc~get_wci proc~get_xc_all nurbs_volume%get_Xc_all none~get_xc->proc~get_xc_all proc~get_xci nurbs_volume%get_Xci none~get_xc->proc~get_xci proc~get_xcid nurbs_volume%get_Xcid none~get_xc->proc~get_xcid proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/modify_xc.html"},{"title":"nearest_point – ForCAD","text":"private pure subroutine nearest_point(this, point_Xg, nearest_Xg, nearest_Xt, id) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xt (:) integer, intent(out), optional :: id Calls proc~~nearest_point~~CallsGraph proc~nearest_point nurbs_volume%nearest_point interface~nearest_point_help_3d nearest_point_help_3d proc~nearest_point->interface~nearest_point_help_3d Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~nearest_point~~CalledByGraph proc~nearest_point nurbs_volume%nearest_point proc~nearest_point2 nurbs_volume%nearest_point2 proc~nearest_point2->proc~nearest_point program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point program~nearest_point_3d->proc~nearest_point2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/nearest_point.html"},{"title":"nearest_point2 – ForCAD","text":"private impure subroutine nearest_point2(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt (3) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) Calls proc~~nearest_point2~~CallsGraph proc~nearest_point2 nurbs_volume%nearest_point2 none~derivative2 nurbs_volume%derivative2 proc~nearest_point2->none~derivative2 proc~cmp_xg nurbs_volume%cmp_Xg proc~nearest_point2->proc~cmp_xg proc~create nurbs_volume%create proc~nearest_point2->proc~create proc~finalize nurbs_volume%finalize proc~nearest_point2->proc~finalize proc~inv inv proc~nearest_point2->proc~inv proc~nearest_point nurbs_volume%nearest_point proc~nearest_point2->proc~nearest_point proc~derivative2_scalar nurbs_volume%derivative2_scalar none~derivative2->proc~derivative2_scalar proc~derivative2_vector nurbs_volume%derivative2_vector none~derivative2->proc~derivative2_vector interface~compute_xg compute_Xg proc~cmp_xg->interface~compute_xg proc~is_rational nurbs_volume%is_rational proc~cmp_xg->proc~is_rational proc~create->interface~compute_xg interface~ndgrid ndgrid proc~create->interface~ndgrid proc~create->proc~is_rational proc~inv->proc~inv proc~det det proc~inv->proc~det interface~nearest_point_help_3d nearest_point_help_3d proc~nearest_point->interface~nearest_point_help_3d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~derivative2_scalar->proc~is_rational interface~compute_d2tgc compute_d2Tgc proc~derivative2_scalar->interface~compute_d2tgc proc~derivative2_vector->interface~ndgrid proc~derivative2_vector->proc~is_rational proc~derivative2_vector->interface~compute_d2tgc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~nearest_point2~~CalledByGraph proc~nearest_point2 nurbs_volume%nearest_point2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/nearest_point2.html"},{"title":"put_to_nurbs – ForCAD","text":"private pure subroutine put_to_nurbs(this, X, elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: X (:,:) integer, intent(in), contiguous :: elemConn (:,:) Calls proc~~put_to_nurbs~~CallsGraph proc~put_to_nurbs nurbs_volume%put_to_nurbs proc~basis_bspline basis_bspline proc~put_to_nurbs->proc~basis_bspline proc~kron kron proc~put_to_nurbs->proc~kron proc~set_elem_xg_vis nurbs_volume%set_elem_Xg_vis proc~put_to_nurbs->proc~set_elem_xg_vis Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~put_to_nurbs~~CalledByGraph proc~put_to_nurbs nurbs_volume%put_to_nurbs program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~put_to_nurbs Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/put_to_nurbs.html"},{"title":"remove_knots – ForCAD","text":"private pure subroutine remove_knots(this, dir, Xth, r) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) Calls proc~~remove_knots~~CallsGraph proc~remove_knots nurbs_volume%remove_knots interface~compute_multiplicity compute_multiplicity proc~remove_knots->interface~compute_multiplicity none~get_knot nurbs_volume%get_knot proc~remove_knots->none~get_knot none~set nurbs_volume%set proc~remove_knots->none~set proc~findspan findspan proc~remove_knots->proc~findspan proc~remove_knots_a_5_8 remove_knots_A_5_8 proc~remove_knots->proc~remove_knots_a_5_8 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_knot_all nurbs_volume%get_knot_all none~get_knot->proc~get_knot_all proc~get_knoti nurbs_volume%get_knoti none~get_knot->proc~get_knoti proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~remove_knots~~CalledByGraph proc~remove_knots nurbs_volume%remove_knots program~example3_volume example3_volume program~example3_volume->proc~remove_knots Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/remove_knots.html"},{"title":"rotate_Xc – ForCAD","text":"private pure subroutine rotate_Xc(this, alpha, beta, theta) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta Calls proc~~rotate_xc~~CallsGraph proc~rotate_xc nurbs_volume%rotate_Xc proc~rotation rotation proc~rotate_xc->proc~rotation cosd cosd proc~rotation->cosd sind sind proc~rotation->sind Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~rotate_xc~~CalledByGraph proc~rotate_xc nurbs_volume%rotate_Xc program~example3_volume example3_volume program~example3_volume->proc~rotate_xc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/rotate_xc.html"},{"title":"rotate_Xg – ForCAD","text":"private pure subroutine rotate_Xg(this, alpha, beta, theta) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta Calls proc~~rotate_xg~~CallsGraph proc~rotate_xg nurbs_volume%rotate_Xg proc~rotation rotation proc~rotate_xg->proc~rotation cosd cosd proc~rotation->cosd sind sind proc~rotation->sind Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~rotate_xg~~CalledByGraph proc~rotate_xg nurbs_volume%rotate_Xg program~example3_volume example3_volume program~example3_volume->proc~rotate_xg Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/rotate_xg.html"},{"title":"set1 – ForCAD","text":"private pure subroutine set1(this, knot1, knot2, knot3, Xc, Wc) Set control points and weights for the NURBS volume object. Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set1~~CallsGraph proc~set1 nurbs_volume%set1 proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set1~~CalledByGraph proc~set1 nurbs_volume%set1 none~set nurbs_volume%set none~set->proc~set1 proc~ansatz nurbs_volume%ansatz proc~ansatz->none~set proc~elevate_degree nurbs_volume%elevate_degree proc~elevate_degree->none~set proc~insert_knots nurbs_volume%insert_knots proc~insert_knots->none~set proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~set proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~set proc~remove_knots nurbs_volume%remove_knots proc~remove_knots->none~set proc~set_c nurbs_volume%set_C proc~set_c->none~set proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set program~compute_volume compute_volume program~compute_volume->none~set proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume program~example3_volume example3_volume program~example3_volume->none~set program~example3_volume->proc~elevate_degree program~example3_volume->proc~insert_knots program~example3_volume->proc~remove_knots program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set proc~cmp_volume->proc~ansatz program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set1.html"},{"title":"set2 – ForCAD","text":"private pure subroutine set2(this, Xth_dir1, Xth_dir2, Xth_dir3, degree, continuity1, continuity2, continuity3, Xc, Wc) Set control points and weights for the NURBS volume object. Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir1 (:) real(kind=rk), intent(in), contiguous :: Xth_dir2 (:) real(kind=rk), intent(in), contiguous :: Xth_dir3 (:) integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: continuity1 (:) integer, intent(in), contiguous :: continuity2 (:) integer, intent(in), contiguous :: continuity3 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set2~~CallsGraph proc~set2 nurbs_volume%set2 proc~cmp_nc nurbs_volume%cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set2~~CalledByGraph proc~set2 nurbs_volume%set2 none~set nurbs_volume%set none~set->proc~set2 proc~ansatz nurbs_volume%ansatz proc~ansatz->none~set proc~elevate_degree nurbs_volume%elevate_degree proc~elevate_degree->none~set proc~insert_knots nurbs_volume%insert_knots proc~insert_knots->none~set proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~set proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~set proc~remove_knots nurbs_volume%remove_knots proc~remove_knots->none~set proc~set_c nurbs_volume%set_C proc~set_c->none~set proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set program~compute_volume compute_volume program~compute_volume->none~set proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume program~example3_volume example3_volume program~example3_volume->none~set program~example3_volume->proc~elevate_degree program~example3_volume->proc~insert_knots program~example3_volume->proc~remove_knots program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set proc~cmp_volume->proc~ansatz program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set2.html"},{"title":"set3 – ForCAD","text":"private pure subroutine set3(this, nc, Xc, Wc) Set Bezier or Rational Bezier volume using control points and weights. Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set3~~CallsGraph proc~set3 nurbs_volume%set3 proc~cmp_degree nurbs_volume%cmp_degree proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set3~~CalledByGraph proc~set3 nurbs_volume%set3 none~set nurbs_volume%set none~set->proc~set3 proc~ansatz nurbs_volume%ansatz proc~ansatz->none~set proc~elevate_degree nurbs_volume%elevate_degree proc~elevate_degree->none~set proc~insert_knots nurbs_volume%insert_knots proc~insert_knots->none~set proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~set proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~set proc~remove_knots nurbs_volume%remove_knots proc~remove_knots->none~set proc~set_c nurbs_volume%set_C proc~set_c->none~set proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set program~compute_volume compute_volume program~compute_volume->none~set proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume program~example3_volume example3_volume program~example3_volume->none~set program~example3_volume->proc~elevate_degree program~example3_volume->proc~insert_knots program~example3_volume->proc~remove_knots program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set proc~cmp_volume->proc~ansatz program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set3.html"},{"title":"set4 – ForCAD","text":"private pure subroutine set4(this, degree, nc, Xc, Wc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Called by proc~~set4~~CalledByGraph proc~set4 nurbs_volume%set4 none~set nurbs_volume%set none~set->proc~set4 proc~ansatz nurbs_volume%ansatz proc~ansatz->none~set proc~elevate_degree nurbs_volume%elevate_degree proc~elevate_degree->none~set proc~insert_knots nurbs_volume%insert_knots proc~insert_knots->none~set proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~set proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~set proc~remove_knots nurbs_volume%remove_knots proc~remove_knots->none~set proc~set_c nurbs_volume%set_C proc~set_c->none~set proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set program~compute_volume compute_volume program~compute_volume->none~set proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume program~example3_volume example3_volume program~example3_volume->none~set program~example3_volume->proc~elevate_degree program~example3_volume->proc~insert_knots program~example3_volume->proc~remove_knots program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set proc~cmp_volume->proc~ansatz program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set4.html"},{"title":"set_C – ForCAD","text":"private pure subroutine set_C(this, center, radius1, radius2, length) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length Calls proc~~set_c~~CallsGraph proc~set_c nurbs_volume%set_C none~set nurbs_volume%set proc~set_c->none~set proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_c~~CalledByGraph proc~set_c nurbs_volume%set_C program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_c.html"},{"title":"set_elem – ForCAD","text":"private pure subroutine set_elem(this, elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) Called by proc~~set_elem~~CalledByGraph proc~set_elem nurbs_volume%set_elem program~example3_volume example3_volume program~example3_volume->proc~set_elem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_elem.html"},{"title":"set_elem_Xc_vis – ForCAD","text":"private pure subroutine set_elem_Xc_vis(this, elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:)","tags":"","loc":"proc/set_elem_xc_vis.html"},{"title":"set_elem_Xg_vis – ForCAD","text":"private pure subroutine set_elem_Xg_vis(this, elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) Called by proc~~set_elem_xg_vis~~CalledByGraph proc~set_elem_xg_vis nurbs_volume%set_elem_Xg_vis proc~put_to_nurbs nurbs_volume%put_to_nurbs proc~put_to_nurbs->proc~set_elem_xg_vis program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~put_to_nurbs Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_elem_xg_vis.html"},{"title":"set_half_ring – ForCAD","text":"private pure subroutine set_half_ring(this, center, radius1, radius2, length) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length Calls proc~~set_half_ring~~CallsGraph proc~set_half_ring nurbs_volume%set_half_ring none~set nurbs_volume%set proc~set_half_ring->none~set proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_half_ring~~CalledByGraph proc~set_half_ring nurbs_volume%set_half_ring program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_half_ring.html"},{"title":"set_hexahedron – ForCAD","text":"private pure subroutine set_hexahedron(this, L, nc, Wc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: L (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set_hexahedron~~CallsGraph proc~set_hexahedron nurbs_volume%set_hexahedron none~set nurbs_volume%set proc~set_hexahedron->none~set proc~hexahedron_xc hexahedron_Xc proc~set_hexahedron->proc~hexahedron_xc proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_hexahedron~~CalledByGraph proc~set_hexahedron nurbs_volume%set_hexahedron program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_hexahedron.html"},{"title":"set_ring – ForCAD","text":"private pure subroutine set_ring(this, center, radius1, radius2, length) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length Calls proc~~set_ring~~CallsGraph proc~set_ring nurbs_volume%set_ring none~set nurbs_volume%set proc~set_ring->none~set proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_ring~~CalledByGraph proc~set_ring nurbs_volume%set_ring program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_ring.html"},{"title":"show – ForCAD","text":"private impure subroutine show(this, vtkfile_Xc, vtkfile_Xg) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg Called by proc~~show~~CalledByGraph proc~show nurbs_volume%show program~example3_volume example3_volume program~example3_volume->proc~show program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~show program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~show program~shape_c_3d shape_C_3d program~shape_c_3d->proc~show program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~show program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~show program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~show Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/show.html"},{"title":"translate_Xc – ForCAD","text":"private pure subroutine translate_Xc(this, vec) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) Called by proc~~translate_xc~~CalledByGraph proc~translate_xc nurbs_volume%translate_Xc program~example3_volume example3_volume program~example3_volume->proc~translate_xc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/translate_xc.html"},{"title":"translate_Xg – ForCAD","text":"private pure subroutine translate_Xg(this, vec) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) Called by proc~~translate_xg~~CalledByGraph proc~translate_xg nurbs_volume%translate_Xg program~example3_volume example3_volume program~example3_volume->proc~translate_xg Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/translate_xg.html"},{"title":"compute_Tgc – ForCAD","text":"private interface compute_Tgc Called by interface~~compute_tgc~~CalledByGraph interface~compute_tgc compute_Tgc proc~basis_scalar nurbs_volume%basis_scalar proc~basis_scalar->interface~compute_tgc proc~basis_vector nurbs_volume%basis_vector proc~basis_vector->interface~compute_tgc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Functions private pure function compute_Tgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Tgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:)","tags":"","loc":"interface/compute_tgc.html"},{"title":"compute_Xg – ForCAD","text":"private interface compute_Xg Called by interface~~compute_xg~~CalledByGraph interface~compute_xg compute_Xg proc~cmp_xg nurbs_volume%cmp_Xg proc~cmp_xg->interface~compute_xg proc~create nurbs_volume%create proc~create->interface~compute_xg proc~nearest_point2 nurbs_volume%nearest_point2 proc~nearest_point2->proc~cmp_xg proc~nearest_point2->proc~create program~example3_volume example3_volume program~example3_volume->proc~create program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~create program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~create program~nearest_point_3d->proc~nearest_point2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~create program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~create program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~create program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~create Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Functions private pure function compute_Xg_bspline_3d(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_bspline_3d_1point(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Xg_nurbs_3d(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_nurbs_3d_1point(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"interface/compute_xg.html"},{"title":"compute_d2Tgc – ForCAD","text":"private interface compute_d2Tgc Called by interface~~compute_d2tgc~~CalledByGraph interface~compute_d2tgc compute_d2Tgc proc~derivative2_scalar nurbs_volume%derivative2_scalar proc~derivative2_scalar->interface~compute_d2tgc proc~derivative2_vector nurbs_volume%derivative2_vector proc~derivative2_vector->interface~compute_d2tgc none~derivative2 nurbs_volume%derivative2 none~derivative2->proc~derivative2_scalar none~derivative2->proc~derivative2_vector proc~nearest_point2 nurbs_volume%nearest_point2 proc~nearest_point2->none~derivative2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Subroutines private pure subroutine compute_d2Tgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_d2Tgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:)","tags":"","loc":"interface/compute_d2tgc.html"},{"title":"compute_dTgc – ForCAD","text":"private interface compute_dTgc Called by interface~~compute_dtgc~~CalledByGraph interface~compute_dtgc compute_dTgc proc~derivative_scalar nurbs_volume%derivative_scalar proc~derivative_scalar->interface~compute_dtgc proc~derivative_vector nurbs_volume%derivative_vector proc~derivative_vector->interface~compute_dtgc none~derivative nurbs_volume%derivative none~derivative->proc~derivative_scalar none~derivative->proc~derivative_vector proc~ansatz nurbs_volume%ansatz proc~ansatz->none~derivative proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Subroutines private pure subroutine compute_dTgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_dTgc, f_Tgc, f_elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in), optional :: f_elem (:) private pure subroutine compute_dTgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_dTgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, f_elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in), optional :: f_elem (:) private pure subroutine compute_dTgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:)","tags":"","loc":"interface/compute_dtgc.html"},{"title":"nearest_point_help_3d – ForCAD","text":"interface Called by interface~~nearest_point_help_3d~~CalledByGraph interface~nearest_point_help_3d nearest_point_help_3d proc~nearest_point nurbs_volume%nearest_point proc~nearest_point->interface~nearest_point_help_3d proc~nearest_point2 nurbs_volume%nearest_point2 proc~nearest_point2->proc~nearest_point program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point program~nearest_point_3d->proc~nearest_point2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. private pure function nearest_point_help_3d(f_ng, f_Xg, f_point_Xg) result(f_distances) Arguments Type Intent Optional Attributes Name integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Xg (:,:) real(kind=rk), intent(in), contiguous :: f_point_Xg (:) Return Value real(kind=rk),allocatable,(:)","tags":"","loc":"interface/nearest_point_help_3d.html"},{"title":"generate_Xc – ForCAD","text":"function generate_Xc(L) result(control_points) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: L Return Value real(kind=rk), allocatable, (:,:) Called by proc~~generate_xc~~CalledByGraph proc~generate_xc generate_Xc program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~generate_xc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/generate_xc.html"},{"title":"generate_Xc – ForCAD","text":"function generate_Xc(num_rows, num_cols, peak_height) result(control_points) Arguments Type Intent Optional Attributes Name integer, intent(in) :: num_rows integer, intent(in) :: num_cols real(kind=rk), intent(in) :: peak_height Return Value real(kind=rk), allocatable, (:,:) Called by proc~~generate_xc~2~~CalledByGraph proc~generate_xc~2 generate_Xc program~example3_surface example3_surface program~example3_surface->proc~generate_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/generate_xc~2.html"},{"title":"generate_Xc – ForCAD","text":"function generate_Xc(num_coils, radius, height, num_points_per_coil) result(control_points) Arguments Type Intent Optional Attributes Name integer, intent(in) :: num_coils real(kind=rk), intent(in) :: radius real(kind=rk), intent(in) :: height integer, intent(in) :: num_points_per_coil Return Value real(kind=rk), allocatable, (:,:) Called by proc~~generate_xc~3~~CalledByGraph proc~generate_xc~3 generate_Xc program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~generate_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/generate_xc~3.html"},{"title":"cmp_Xg – ForCAD","text":"private pure function cmp_Xg(this, Xt) result(Xg) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this real(kind=rk), intent(in), contiguous :: Xt (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~cmp_xg~2~~CallsGraph proc~cmp_xg~2 nurbs_surface%cmp_Xg interface~compute_xg~2 compute_Xg proc~cmp_xg~2->interface~compute_xg~2 proc~is_rational~2 nurbs_surface%is_rational proc~cmp_xg~2->proc~is_rational~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_xg~2~~CalledByGraph proc~cmp_xg~2 nurbs_surface%cmp_Xg proc~nearest_point2~2 nurbs_surface%nearest_point2 proc~nearest_point2~2->proc~cmp_xg~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point2~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_xg~2.html"},{"title":"cmp_elem – ForCAD","text":"private pure function cmp_elem(this) result(elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem~2~~CallsGraph proc~cmp_elem~2 nurbs_surface%cmp_elem interface~elemconn_cn elemConn_Cn proc~cmp_elem~2->interface~elemconn_cn interface~unique unique proc~cmp_elem~2->interface~unique proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_elem~2->proc~get_multiplicity~2 proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem~2~~CalledByGraph proc~cmp_elem~2 nurbs_surface%cmp_elem proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->proc~cmp_elem~2 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~2 proc~cmp_area->proc~ansatz~2 program~compute_area compute_area program~compute_area->proc~cmp_area Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem~2.html"},{"title":"cmp_elem_Xc_vis – ForCAD","text":"private pure function cmp_elem_Xc_vis(this, p) result(elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem_xc_vis~2~~CallsGraph proc~cmp_elem_xc_vis~2 nurbs_surface%cmp_elem_Xc_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem_xc_vis~2~~CalledByGraph proc~cmp_elem_xc_vis~2 nurbs_surface%cmp_elem_Xc_vis proc~export_xc~2 nurbs_surface%export_Xc proc~export_xc~2->proc~cmp_elem_xc_vis~2 program~example3_surface example3_surface program~example3_surface->proc~export_xc~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~export_xc~2 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~export_xc~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~export_xc~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~export_xc~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~export_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem_xc_vis~2.html"},{"title":"cmp_elem_Xg_vis – ForCAD","text":"private pure function cmp_elem_Xg_vis(this, p) result(elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem_xg_vis~2~~CallsGraph proc~cmp_elem_xg_vis~2 nurbs_surface%cmp_elem_Xg_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem_xg_vis~2~~CalledByGraph proc~cmp_elem_xg_vis~2 nurbs_surface%cmp_elem_Xg_vis proc~export_xg~2 nurbs_surface%export_Xg proc~export_xg~2->proc~cmp_elem_xg_vis~2 program~example3_surface example3_surface program~example3_surface->proc~export_xg~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~export_xg~2 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~export_xg~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~export_xg~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~export_xg~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~export_xg~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem_xg_vis~2.html"},{"title":"get_Wc_all – ForCAD","text":"private pure function get_Wc_all(this) result(Wc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) Called by proc~~get_wc_all~2~~CalledByGraph proc~get_wc_all~2 nurbs_surface%get_Wc_all none~get_wc~2 nurbs_surface%get_Wc none~get_wc~2->proc~get_wc_all~2 proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~get_wc~2 proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~get_wc~2 program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_wc_all~2.html"},{"title":"get_Wci – ForCAD","text":"private pure function get_Wci(this, n) result(Wc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) Called by proc~~get_wci~2~~CalledByGraph proc~get_wci~2 nurbs_surface%get_Wci none~get_wc~2 nurbs_surface%get_Wc none~get_wc~2->proc~get_wci~2 proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~get_wc~2 proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~get_wc~2 program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_wci~2.html"},{"title":"get_Xc_all – ForCAD","text":"private pure function get_Xc_all(this) result(Xc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) Called by proc~~get_xc_all~2~~CalledByGraph proc~get_xc_all~2 nurbs_surface%get_Xc_all none~get_xc~2 nurbs_surface%get_Xc none~get_xc~2->proc~get_xc_all~2 proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~get_xc~2 proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~get_xc~2 program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xc_all~2.html"},{"title":"get_Xci – ForCAD","text":"private pure function get_Xci(this, n) result(Xc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) Called by proc~~get_xci~2~~CalledByGraph proc~get_xci~2 nurbs_surface%get_Xci none~get_xc~2 nurbs_surface%get_Xc none~get_xc~2->proc~get_xci~2 proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~get_xc~2 proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~get_xc~2 program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xci~2.html"},{"title":"get_Xcid – ForCAD","text":"private pure function get_Xcid(this, n, dir) result(Xc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) Called by proc~~get_xcid~2~~CalledByGraph proc~get_xcid~2 nurbs_surface%get_Xcid none~get_xc~2 nurbs_surface%get_Xc none~get_xc~2->proc~get_xcid~2 proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~get_xc~2 proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~get_xc~2 program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xcid~2.html"},{"title":"get_Xg_all – ForCAD","text":"private pure function get_Xg_all(this) result(Xg) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) Called by proc~~get_xg_all~2~~CalledByGraph proc~get_xg_all~2 nurbs_surface%get_Xg_all none~get_xg~2 nurbs_surface%get_Xg none~get_xg~2->proc~get_xg_all~2 program~example_ppm1 example_ppm1 program~example_ppm1->none~get_xg~2 program~example_ppm2 example_ppm2 program~example_ppm2->none~get_xg~2 program~example_ppm3 example_ppm3 program~example_ppm3->none~get_xg~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xg_all~2.html"},{"title":"get_Xgi – ForCAD","text":"private pure function get_Xgi(this, n) result(Xg) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) Called by proc~~get_xgi~2~~CalledByGraph proc~get_xgi~2 nurbs_surface%get_Xgi none~get_xg~2 nurbs_surface%get_Xg none~get_xg~2->proc~get_xgi~2 program~example_ppm1 example_ppm1 program~example_ppm1->none~get_xg~2 program~example_ppm2 example_ppm2 program~example_ppm2->none~get_xg~2 program~example_ppm3 example_ppm3 program~example_ppm3->none~get_xg~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xgi~2.html"},{"title":"get_Xgid – ForCAD","text":"private pure function get_Xgid(this, n, dir) result(Xg) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) Called by proc~~get_xgid~2~~CalledByGraph proc~get_xgid~2 nurbs_surface%get_Xgid none~get_xg~2 nurbs_surface%get_Xg none~get_xg~2->proc~get_xgid~2 program~example_ppm1 example_ppm1 program~example_ppm1->none~get_xg~2 program~example_ppm2 example_ppm2 program~example_ppm2->none~get_xg~2 program~example_ppm3 example_ppm3 program~example_ppm3->none~get_xg~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xgid~2.html"},{"title":"get_Xt – ForCAD","text":"private pure function get_Xt(this, dir) result(Xt) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/get_xt~2.html"},{"title":"get_continuity – ForCAD","text":"private pure function get_continuity(this, dir) result(c) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) Calls proc~~get_continuity~2~~CallsGraph proc~get_continuity~2 nurbs_surface%get_continuity interface~compute_multiplicity compute_multiplicity proc~get_continuity~2->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_continuity~2.html"},{"title":"get_degree_all – ForCAD","text":"private pure function get_degree_all(this) result(degree) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) Called by proc~~get_degree_all~2~~CalledByGraph proc~get_degree_all~2 nurbs_surface%get_degree_all none~get_degree~2 nurbs_surface%get_degree none~get_degree~2->proc~get_degree_all~2 program~example3_surface example3_surface program~example3_surface->none~get_degree~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_degree_all~2.html"},{"title":"get_degree_dir – ForCAD","text":"private pure function get_degree_dir(this, dir) result(degree) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer Called by proc~~get_degree_dir~2~~CalledByGraph proc~get_degree_dir~2 nurbs_surface%get_degree_dir none~get_degree~2 nurbs_surface%get_degree none~get_degree~2->proc~get_degree_dir~2 program~example3_surface example3_surface program~example3_surface->none~get_degree~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_degree_dir~2.html"},{"title":"get_elem – ForCAD","text":"private pure function get_elem(this) result(elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem~2.html"},{"title":"get_elem_Xc_vis – ForCAD","text":"private pure function get_elem_Xc_vis(this) result(elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem_xc_vis~2.html"},{"title":"get_elem_Xg_vis – ForCAD","text":"private pure function get_elem_Xg_vis(this) result(elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem_xg_vis~2.html"},{"title":"get_knot_all – ForCAD","text":"private pure function get_knot_all(this, dir) result(knot) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) Called by proc~~get_knot_all~2~~CalledByGraph proc~get_knot_all~2 nurbs_surface%get_knot_all none~get_knot~2 nurbs_surface%get_knot none~get_knot~2->proc~get_knot_all~2 proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->none~get_knot~2 proc~insert_knots~2 nurbs_surface%insert_knots proc~insert_knots~2->none~get_knot~2 proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~get_knot~2 proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~get_knot~2 proc~remove_knots~2 nurbs_surface%remove_knots proc~remove_knots~2->none~get_knot~2 program~example3_surface example3_surface program~example3_surface->none~get_knot~2 program~example3_surface->proc~elevate_degree~2 program~example3_surface->proc~insert_knots~2 program~example3_surface->proc~remove_knots~2 program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_knot_all~2.html"},{"title":"get_knoti – ForCAD","text":"private pure function get_knoti(this, dir, i) result(knot) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir integer, intent(in) :: i Return Value real(kind=rk) Called by proc~~get_knoti~2~~CalledByGraph proc~get_knoti~2 nurbs_surface%get_knoti none~get_knot~2 nurbs_surface%get_knot none~get_knot~2->proc~get_knoti~2 proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->none~get_knot~2 proc~insert_knots~2 nurbs_surface%insert_knots proc~insert_knots~2->none~get_knot~2 proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~get_knot~2 proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~get_knot~2 proc~remove_knots~2 nurbs_surface%remove_knots proc~remove_knots~2->none~get_knot~2 program~example3_surface example3_surface program~example3_surface->none~get_knot~2 program~example3_surface->proc~elevate_degree~2 program~example3_surface->proc~insert_knots~2 program~example3_surface->proc~remove_knots~2 program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_knoti~2.html"},{"title":"get_multiplicity – ForCAD","text":"private pure function get_multiplicity(this, dir) result(m) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) Calls proc~~get_multiplicity~2~~CallsGraph proc~get_multiplicity~2 nurbs_surface%get_multiplicity interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~get_multiplicity~2~~CalledByGraph proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2 nurbs_surface%cmp_degree proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_elem~2 nurbs_surface%cmp_elem proc~cmp_elem~2->proc~get_multiplicity~2 proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->proc~cmp_elem~2 none~set~2 nurbs_surface%set proc~ansatz~2->none~set~2 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~2 proc~cmp_area->proc~ansatz~2 proc~set1~2 nurbs_surface%set1 proc~set1~2->proc~cmp_degree~2 proc~set3~2 nurbs_surface%set3 proc~set3~2->proc~cmp_degree~2 none~set~2->proc~set1~2 none~set~2->proc~set3~2 program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_area->none~set~2 proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->none~set~2 proc~insert_knots~2 nurbs_surface%insert_knots proc~insert_knots~2->none~set~2 proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~set~2 proc~remove_knots~2 nurbs_surface%remove_knots proc~remove_knots~2->none~set~2 proc~set_c~2 nurbs_surface%set_C proc~set_c~2->none~set~2 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~2 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~2 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~2 program~example3_surface example3_surface program~example3_surface->none~set~2 program~example3_surface->proc~elevate_degree~2 program~example3_surface->proc~insert_knots~2 program~example3_surface->proc~remove_knots~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~2 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_multiplicity~2.html"},{"title":"get_nc_all – ForCAD","text":"private pure function get_nc_all(this) result(nc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2)","tags":"","loc":"proc/get_nc_all~2.html"},{"title":"get_nc_dir – ForCAD","text":"private pure function get_nc_dir(this, dir) result(nc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer Calls proc~~get_nc_dir~2~~CallsGraph proc~get_nc_dir~2 nurbs_surface%get_nc_dir interface~compute_multiplicity compute_multiplicity proc~get_nc_dir~2->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_nc_dir~2.html"},{"title":"get_ng – ForCAD","text":"private pure function get_ng(this) result(ng) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) Called by proc~~get_ng~2~~CalledByGraph proc~get_ng~2 nurbs_surface%get_ng program~example_ppm1 example_ppm1 program~example_ppm1->proc~get_ng~2 program~example_ppm2 example_ppm2 program~example_ppm2->proc~get_ng~2 program~example_ppm3 example_ppm3 program~example_ppm3->proc~get_ng~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_ng~2.html"},{"title":"is_rational – ForCAD","text":"private pure function is_rational(this) result(r) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value logical Called by proc~~is_rational~2~~CalledByGraph proc~is_rational~2 nurbs_surface%is_rational proc~basis_scalar~2 nurbs_surface%basis_scalar proc~basis_scalar~2->proc~is_rational~2 proc~basis_vector~2 nurbs_surface%basis_vector proc~basis_vector~2->proc~is_rational~2 proc~cmp_xg~2 nurbs_surface%cmp_Xg proc~cmp_xg~2->proc~is_rational~2 proc~create~2 nurbs_surface%create proc~create~2->proc~is_rational~2 proc~derivative2_scalar~2 nurbs_surface%derivative2_scalar proc~derivative2_scalar~2->proc~is_rational~2 proc~derivative2_vector~2 nurbs_surface%derivative2_vector proc~derivative2_vector~2->proc~is_rational~2 proc~derivative_scalar~2 nurbs_surface%derivative_scalar proc~derivative_scalar~2->proc~is_rational~2 proc~derivative_vector~2 nurbs_surface%derivative_vector proc~derivative_vector~2->proc~is_rational~2 proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->proc~is_rational~2 proc~insert_knots~2 nurbs_surface%insert_knots proc~insert_knots~2->proc~is_rational~2 proc~remove_knots~2 nurbs_surface%remove_knots proc~remove_knots~2->proc~is_rational~2 none~derivative2~2 nurbs_surface%derivative2 none~derivative2~2->proc~derivative2_scalar~2 none~derivative2~2->proc~derivative2_vector~2 none~derivative~2 nurbs_surface%derivative none~derivative~2->proc~derivative_scalar~2 none~derivative~2->proc~derivative_vector~2 proc~nearest_point2~2 nurbs_surface%nearest_point2 proc~nearest_point2~2->proc~cmp_xg~2 proc~nearest_point2~2->proc~create~2 proc~nearest_point2~2->none~derivative2~2 program~example3_surface example3_surface program~example3_surface->proc~create~2 program~example3_surface->proc~elevate_degree~2 program~example3_surface->proc~insert_knots~2 program~example3_surface->proc~remove_knots~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~create~2 program~example_ppm1 example_ppm1 program~example_ppm1->proc~create~2 program~example_ppm2 example_ppm2 program~example_ppm2->proc~create~2 program~example_ppm3 example_ppm3 program~example_ppm3->proc~create~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~create~2 program~nearest_point_2d->proc~nearest_point2~2 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~create~2 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~create~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~create~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~create~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~create~2 proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->none~derivative~2 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 program~compute_area compute_area program~compute_area->proc~cmp_area Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/is_rational~2.html"},{"title":"ansatz – ForCAD","text":"private pure subroutine ansatz(this, ie, ig, Tgc, dTgc_dXg, dA) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dA Calls proc~~ansatz~2~~CallsGraph proc~ansatz~2 nurbs_surface%ansatz interface~gauss_leg gauss_leg proc~ansatz~2->interface~gauss_leg interface~ndgrid ndgrid proc~ansatz~2->interface~ndgrid interface~unique unique proc~ansatz~2->interface~unique none~derivative~2 nurbs_surface%derivative proc~ansatz~2->none~derivative~2 none~set~2 nurbs_surface%set proc~ansatz~2->none~set~2 proc~cmp_elem~2 nurbs_surface%cmp_elem proc~ansatz~2->proc~cmp_elem~2 proc~det det proc~ansatz~2->proc~det proc~inv inv proc~ansatz~2->proc~inv proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar~2 nurbs_surface%derivative_scalar none~derivative~2->proc~derivative_scalar~2 proc~derivative_vector~2 nurbs_surface%derivative_vector none~derivative~2->proc~derivative_vector~2 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 proc~cmp_elem~2->interface~unique interface~elemconn_cn elemConn_Cn proc~cmp_elem~2->interface~elemconn_cn proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_elem~2->proc~get_multiplicity~2 proc~inv->proc~det proc~inv->proc~inv proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v interface~compute_dtgc~2 compute_dTgc proc~derivative_scalar~2->interface~compute_dtgc~2 proc~is_rational~2 nurbs_surface%is_rational proc~derivative_scalar~2->proc~is_rational~2 proc~derivative_vector~2->interface~ndgrid proc~derivative_vector~2->interface~compute_dtgc~2 proc~derivative_vector~2->proc~is_rational~2 gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_2d->gauss_legendre proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->proc~kron interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~ansatz~2~~CalledByGraph proc~ansatz~2 nurbs_surface%ansatz proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 program~compute_area compute_area program~compute_area->proc~cmp_area Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/ansatz~2.html"},{"title":"basis_scalar – ForCAD","text":"private pure subroutine basis_scalar(this, Xt, Tgc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~basis_scalar~2~~CallsGraph proc~basis_scalar~2 nurbs_surface%basis_scalar interface~compute_tgc~2 compute_Tgc proc~basis_scalar~2->interface~compute_tgc~2 proc~is_rational~2 nurbs_surface%is_rational proc~basis_scalar~2->proc~is_rational~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_scalar~2.html"},{"title":"basis_vector – ForCAD","text":"private pure subroutine basis_vector(this, res1, res2, Xt1, Xt2, Tgc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~basis_vector~2~~CallsGraph proc~basis_vector~2 nurbs_surface%basis_vector interface~compute_tgc~2 compute_Tgc proc~basis_vector~2->interface~compute_tgc~2 interface~ndgrid ndgrid proc~basis_vector~2->interface~ndgrid proc~is_rational~2 nurbs_surface%is_rational proc~basis_vector~2->proc~is_rational~2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_vector~2.html"},{"title":"cmp_area – ForCAD","text":"private pure subroutine cmp_area(this, area) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(out) :: area Calls proc~~cmp_area~~CallsGraph proc~cmp_area nurbs_surface%cmp_area proc~ansatz~2 nurbs_surface%ansatz proc~cmp_area->proc~ansatz~2 proc~cmp_elem~2 nurbs_surface%cmp_elem proc~cmp_area->proc~cmp_elem~2 proc~ansatz~2->proc~cmp_elem~2 interface~gauss_leg gauss_leg proc~ansatz~2->interface~gauss_leg interface~ndgrid ndgrid proc~ansatz~2->interface~ndgrid interface~unique unique proc~ansatz~2->interface~unique none~derivative~2 nurbs_surface%derivative proc~ansatz~2->none~derivative~2 none~set~2 nurbs_surface%set proc~ansatz~2->none~set~2 proc~det det proc~ansatz~2->proc~det proc~inv inv proc~ansatz~2->proc~inv interface~elemconn_cn elemConn_Cn proc~cmp_elem~2->interface~elemconn_cn proc~cmp_elem~2->interface~unique proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_elem~2->proc~get_multiplicity~2 proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar~2 nurbs_surface%derivative_scalar none~derivative~2->proc~derivative_scalar~2 proc~derivative_vector~2 nurbs_surface%derivative_vector none~derivative~2->proc~derivative_vector~2 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~inv->proc~det proc~inv->proc~inv proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 interface~compute_dtgc~2 compute_dTgc proc~derivative_scalar~2->interface~compute_dtgc~2 proc~is_rational~2 nurbs_surface%is_rational proc~derivative_scalar~2->proc~is_rational~2 proc~derivative_vector~2->interface~ndgrid proc~derivative_vector~2->interface~compute_dtgc~2 proc~derivative_vector~2->proc~is_rational~2 gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_2d->gauss_legendre proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->proc~kron proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_area~~CalledByGraph proc~cmp_area nurbs_surface%cmp_area program~compute_area compute_area program~compute_area->proc~cmp_area Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_area.html"},{"title":"cmp_degree – ForCAD","text":"private pure subroutine cmp_degree(this, dir) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: dir Calls proc~~cmp_degree~2~~CallsGraph proc~cmp_degree~2 nurbs_surface%cmp_degree proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_degree~2~~CalledByGraph proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2 nurbs_surface%set1 proc~set1~2->proc~cmp_degree~2 proc~set3~2 nurbs_surface%set3 proc~set3~2->proc~cmp_degree~2 none~set~2 nurbs_surface%set none~set~2->proc~set1~2 none~set~2->proc~set3~2 proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->none~set~2 proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->none~set~2 proc~insert_knots~2 nurbs_surface%insert_knots proc~insert_knots~2->none~set~2 proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~set~2 proc~remove_knots~2 nurbs_surface%remove_knots proc~remove_knots~2->none~set~2 proc~set_c~2 nurbs_surface%set_C proc~set_c~2->none~set~2 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~2 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~2 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~2 program~compute_area compute_area program~compute_area->none~set~2 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area program~example3_surface example3_surface program~example3_surface->none~set~2 program~example3_surface->proc~elevate_degree~2 program~example3_surface->proc~insert_knots~2 program~example3_surface->proc~remove_knots~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~2 proc~cmp_area->proc~ansatz~2 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_degree~2.html"},{"title":"cmp_nc – ForCAD","text":"private pure subroutine cmp_nc(this, dir) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: dir Calls proc~~cmp_nc~2~~CallsGraph proc~cmp_nc~2 nurbs_surface%cmp_nc interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_nc~2~~CalledByGraph proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2 nurbs_surface%set1 proc~set1~2->proc~cmp_nc~2 proc~set2~2 nurbs_surface%set2 proc~set2~2->proc~cmp_nc~2 none~set~2 nurbs_surface%set none~set~2->proc~set1~2 none~set~2->proc~set2~2 proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->none~set~2 proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->none~set~2 proc~insert_knots~2 nurbs_surface%insert_knots proc~insert_knots~2->none~set~2 proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~set~2 proc~remove_knots~2 nurbs_surface%remove_knots proc~remove_knots~2->none~set~2 proc~set_c~2 nurbs_surface%set_C proc~set_c~2->none~set~2 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~2 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~2 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~2 program~compute_area compute_area program~compute_area->none~set~2 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area program~example3_surface example3_surface program~example3_surface->none~set~2 program~example3_surface->proc~elevate_degree~2 program~example3_surface->proc~insert_knots~2 program~example3_surface->proc~remove_knots~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~2 proc~cmp_area->proc~ansatz~2 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_nc~2.html"},{"title":"create – ForCAD","text":"private pure subroutine create(this, res1, res2, Xt1, Xt2, Xt) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt (:,:) Calls proc~~create~2~~CallsGraph proc~create~2 nurbs_surface%create interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_surface%is_rational proc~create~2->proc~is_rational~2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~create~2~~CalledByGraph proc~create~2 nurbs_surface%create proc~nearest_point2~2 nurbs_surface%nearest_point2 proc~nearest_point2~2->proc~create~2 program~example3_surface example3_surface program~example3_surface->proc~create~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~create~2 program~example_ppm1 example_ppm1 program~example_ppm1->proc~create~2 program~example_ppm2 example_ppm2 program~example_ppm2->proc~create~2 program~example_ppm3 example_ppm3 program~example_ppm3->proc~create~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~create~2 program~nearest_point_2d->proc~nearest_point2~2 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~create~2 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~create~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~create~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~create~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~create~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/create~2.html"},{"title":"derivative2_scalar – ForCAD","text":"private pure subroutine derivative2_scalar(this, Xt, d2Tgc, dTgc, Tgc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) Calls proc~~derivative2_scalar~2~~CallsGraph proc~derivative2_scalar~2 nurbs_surface%derivative2_scalar interface~compute_d2tgc~2 compute_d2Tgc proc~derivative2_scalar~2->interface~compute_d2tgc~2 proc~is_rational~2 nurbs_surface%is_rational proc~derivative2_scalar~2->proc~is_rational~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative2_scalar~2~~CalledByGraph proc~derivative2_scalar~2 nurbs_surface%derivative2_scalar none~derivative2~2 nurbs_surface%derivative2 none~derivative2~2->proc~derivative2_scalar~2 proc~nearest_point2~2 nurbs_surface%nearest_point2 proc~nearest_point2~2->none~derivative2~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point2~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative2_scalar~2.html"},{"title":"derivative2_vector – ForCAD","text":"private pure subroutine derivative2_vector(this, res1, res2, Xt1, Xt2, d2Tgc, dTgc, Tgc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) Calls proc~~derivative2_vector~2~~CallsGraph proc~derivative2_vector~2 nurbs_surface%derivative2_vector interface~compute_d2tgc~2 compute_d2Tgc proc~derivative2_vector~2->interface~compute_d2tgc~2 interface~ndgrid ndgrid proc~derivative2_vector~2->interface~ndgrid proc~is_rational~2 nurbs_surface%is_rational proc~derivative2_vector~2->proc~is_rational~2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative2_vector~2~~CalledByGraph proc~derivative2_vector~2 nurbs_surface%derivative2_vector none~derivative2~2 nurbs_surface%derivative2 none~derivative2~2->proc~derivative2_vector~2 proc~nearest_point2~2 nurbs_surface%nearest_point2 proc~nearest_point2~2->none~derivative2~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point2~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative2_vector~2.html"},{"title":"derivative_scalar – ForCAD","text":"private pure subroutine derivative_scalar(this, Xt, dTgc, Tgc, elem) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~derivative_scalar~2~~CallsGraph proc~derivative_scalar~2 nurbs_surface%derivative_scalar interface~compute_dtgc~2 compute_dTgc proc~derivative_scalar~2->interface~compute_dtgc~2 proc~is_rational~2 nurbs_surface%is_rational proc~derivative_scalar~2->proc~is_rational~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative_scalar~2~~CalledByGraph proc~derivative_scalar~2 nurbs_surface%derivative_scalar none~derivative~2 nurbs_surface%derivative none~derivative~2->proc~derivative_scalar~2 proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->none~derivative~2 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 program~compute_area compute_area program~compute_area->proc~cmp_area Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative_scalar~2.html"},{"title":"derivative_vector – ForCAD","text":"private pure subroutine derivative_vector(this, res1, res2, Xt1, Xt2, dTgc, Tgc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) Calls proc~~derivative_vector~2~~CallsGraph proc~derivative_vector~2 nurbs_surface%derivative_vector interface~compute_dtgc~2 compute_dTgc proc~derivative_vector~2->interface~compute_dtgc~2 interface~ndgrid ndgrid proc~derivative_vector~2->interface~ndgrid proc~is_rational~2 nurbs_surface%is_rational proc~derivative_vector~2->proc~is_rational~2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative_vector~2~~CalledByGraph proc~derivative_vector~2 nurbs_surface%derivative_vector none~derivative~2 nurbs_surface%derivative none~derivative~2->proc~derivative_vector~2 proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->none~derivative~2 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 program~compute_area compute_area program~compute_area->proc~cmp_area Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative_vector~2.html"},{"title":"elevate_degree – ForCAD","text":"private pure subroutine elevate_degree(this, dir, t) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir integer, intent(in) :: t Calls proc~~elevate_degree~2~~CallsGraph proc~elevate_degree~2 nurbs_surface%elevate_degree none~get_knot~2 nurbs_surface%get_knot proc~elevate_degree~2->none~get_knot~2 none~set~2 nurbs_surface%set proc~elevate_degree~2->none~set~2 proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree~2->proc~elevate_degree_a_5_9 proc~is_rational~2 nurbs_surface%is_rational proc~elevate_degree~2->proc~is_rational~2 proc~get_knot_all~2 nurbs_surface%get_knot_all none~get_knot~2->proc~get_knot_all~2 proc~get_knoti~2 nurbs_surface%get_knoti none~get_knot~2->proc~get_knoti~2 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 interface~compute_multiplicity compute_multiplicity proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~bincoeff bincoeff proc~elevate_degree_a_5_9->proc~bincoeff proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~factln factln proc~bincoeff->proc~factln proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~elevate_degree~2~~CalledByGraph proc~elevate_degree~2 nurbs_surface%elevate_degree program~example3_surface example3_surface program~example3_surface->proc~elevate_degree~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/elevate_degree~2.html"},{"title":"export_Xc – ForCAD","text":"private impure subroutine export_Xc(this, filename) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this character(len=*), intent(in) :: filename Calls proc~~export_xc~2~~CallsGraph proc~export_xc~2 nurbs_surface%export_Xc proc~cmp_elem_xc_vis~2 nurbs_surface%cmp_elem_Xc_vis proc~export_xc~2->proc~cmp_elem_xc_vis~2 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~export_xc~2~~CalledByGraph proc~export_xc~2 nurbs_surface%export_Xc program~example3_surface example3_surface program~example3_surface->proc~export_xc~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~export_xc~2 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~export_xc~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~export_xc~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~export_xc~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~export_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/export_xc~2.html"},{"title":"export_Xg – ForCAD","text":"private impure subroutine export_Xg(this, filename) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this character(len=*), intent(in) :: filename Calls proc~~export_xg~2~~CallsGraph proc~export_xg~2 nurbs_surface%export_Xg proc~cmp_elem_xg_vis~2 nurbs_surface%cmp_elem_Xg_vis proc~export_xg~2->proc~cmp_elem_xg_vis~2 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~export_xg~2~~CalledByGraph proc~export_xg~2 nurbs_surface%export_Xg program~example3_surface example3_surface program~example3_surface->proc~export_xg~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~export_xg~2 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~export_xg~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~export_xg~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~export_xg~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~export_xg~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/export_xg~2.html"},{"title":"finalize – ForCAD","text":"private pure subroutine finalize(this) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this Called by proc~~finalize~2~~CalledByGraph proc~finalize~2 nurbs_surface%finalize proc~nearest_point2~2 nurbs_surface%nearest_point2 proc~nearest_point2~2->proc~finalize~2 program~example3_surface example3_surface program~example3_surface->proc~finalize~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~finalize~2 program~example_ppm1 example_ppm1 program~example_ppm1->proc~finalize~2 program~example_ppm2 example_ppm2 program~example_ppm2->proc~finalize~2 program~example_ppm3 example_ppm3 program~example_ppm3->proc~finalize~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~finalize~2 program~nearest_point_2d->proc~nearest_point2~2 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~finalize~2 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~finalize~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~finalize~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~finalize~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~finalize~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/finalize~2.html"},{"title":"insert_knots – ForCAD","text":"private pure subroutine insert_knots(this, dir, Xth, r) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) Calls proc~~insert_knots~2~~CallsGraph proc~insert_knots~2 nurbs_surface%insert_knots interface~compute_multiplicity compute_multiplicity proc~insert_knots~2->interface~compute_multiplicity none~get_knot~2 nurbs_surface%get_knot proc~insert_knots~2->none~get_knot~2 none~set~2 nurbs_surface%set proc~insert_knots~2->none~set~2 proc~findspan findspan proc~insert_knots~2->proc~findspan proc~insert_knot_a_5_1 insert_knot_A_5_1 proc~insert_knots~2->proc~insert_knot_a_5_1 proc~is_rational~2 nurbs_surface%is_rational proc~insert_knots~2->proc~is_rational~2 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_knot_all~2 nurbs_surface%get_knot_all none~get_knot~2->proc~get_knot_all~2 proc~get_knoti~2 nurbs_surface%get_knoti none~get_knot~2->proc~get_knoti~2 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~insert_knots~2~~CalledByGraph proc~insert_knots~2 nurbs_surface%insert_knots program~example3_surface example3_surface program~example3_surface->proc~insert_knots~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/insert_knots~2.html"},{"title":"modify_Wc – ForCAD","text":"private pure subroutine modify_Wc(this, W, num) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num Calls proc~~modify_wc~2~~CallsGraph proc~modify_wc~2 nurbs_surface%modify_Wc none~get_knot~2 nurbs_surface%get_knot proc~modify_wc~2->none~get_knot~2 none~get_wc~2 nurbs_surface%get_Wc proc~modify_wc~2->none~get_wc~2 none~get_xc~2 nurbs_surface%get_Xc proc~modify_wc~2->none~get_xc~2 none~set~2 nurbs_surface%set proc~modify_wc~2->none~set~2 proc~get_knot_all~2 nurbs_surface%get_knot_all none~get_knot~2->proc~get_knot_all~2 proc~get_knoti~2 nurbs_surface%get_knoti none~get_knot~2->proc~get_knoti~2 proc~get_wc_all~2 nurbs_surface%get_Wc_all none~get_wc~2->proc~get_wc_all~2 proc~get_wci~2 nurbs_surface%get_Wci none~get_wc~2->proc~get_wci~2 proc~get_xc_all~2 nurbs_surface%get_Xc_all none~get_xc~2->proc~get_xc_all~2 proc~get_xcid~2 nurbs_surface%get_Xcid none~get_xc~2->proc~get_xcid~2 proc~get_xci~2 nurbs_surface%get_Xci none~get_xc~2->proc~get_xci~2 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/modify_wc~2.html"},{"title":"modify_Xc – ForCAD","text":"private pure subroutine modify_Xc(this, X, num, dir) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir Calls proc~~modify_xc~2~~CallsGraph proc~modify_xc~2 nurbs_surface%modify_Xc none~get_knot~2 nurbs_surface%get_knot proc~modify_xc~2->none~get_knot~2 none~get_wc~2 nurbs_surface%get_Wc proc~modify_xc~2->none~get_wc~2 none~get_xc~2 nurbs_surface%get_Xc proc~modify_xc~2->none~get_xc~2 none~set~2 nurbs_surface%set proc~modify_xc~2->none~set~2 proc~get_knot_all~2 nurbs_surface%get_knot_all none~get_knot~2->proc~get_knot_all~2 proc~get_knoti~2 nurbs_surface%get_knoti none~get_knot~2->proc~get_knoti~2 proc~get_wc_all~2 nurbs_surface%get_Wc_all none~get_wc~2->proc~get_wc_all~2 proc~get_wci~2 nurbs_surface%get_Wci none~get_wc~2->proc~get_wci~2 proc~get_xc_all~2 nurbs_surface%get_Xc_all none~get_xc~2->proc~get_xc_all~2 proc~get_xcid~2 nurbs_surface%get_Xcid none~get_xc~2->proc~get_xcid~2 proc~get_xci~2 nurbs_surface%get_Xci none~get_xc~2->proc~get_xci~2 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~modify_xc~2~~CalledByGraph proc~modify_xc~2 nurbs_surface%modify_Xc program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/modify_xc~2.html"},{"title":"nearest_point – ForCAD","text":"private pure subroutine nearest_point(this, point_Xg, nearest_Xg, nearest_Xt, id) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xt (:) integer, intent(out), optional :: id Calls proc~~nearest_point~2~~CallsGraph proc~nearest_point~2 nurbs_surface%nearest_point interface~nearest_point_help_2d nearest_point_help_2d proc~nearest_point~2->interface~nearest_point_help_2d Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~nearest_point~2~~CalledByGraph proc~nearest_point~2 nurbs_surface%nearest_point proc~nearest_point2~2 nurbs_surface%nearest_point2 proc~nearest_point2~2->proc~nearest_point~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point~2 program~nearest_point_2d->proc~nearest_point2~2 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~nearest_point~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/nearest_point~2.html"},{"title":"nearest_point2 – ForCAD","text":"private impure subroutine nearest_point2(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt (2) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) Calls proc~~nearest_point2~2~~CallsGraph proc~nearest_point2~2 nurbs_surface%nearest_point2 none~derivative2~2 nurbs_surface%derivative2 proc~nearest_point2~2->none~derivative2~2 proc~cmp_xg~2 nurbs_surface%cmp_Xg proc~nearest_point2~2->proc~cmp_xg~2 proc~create~2 nurbs_surface%create proc~nearest_point2~2->proc~create~2 proc~finalize~2 nurbs_surface%finalize proc~nearest_point2~2->proc~finalize~2 proc~inv inv proc~nearest_point2~2->proc~inv proc~nearest_point~2 nurbs_surface%nearest_point proc~nearest_point2~2->proc~nearest_point~2 proc~derivative2_scalar~2 nurbs_surface%derivative2_scalar none~derivative2~2->proc~derivative2_scalar~2 proc~derivative2_vector~2 nurbs_surface%derivative2_vector none~derivative2~2->proc~derivative2_vector~2 interface~compute_xg~2 compute_Xg proc~cmp_xg~2->interface~compute_xg~2 proc~is_rational~2 nurbs_surface%is_rational proc~cmp_xg~2->proc~is_rational~2 proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~create~2->proc~is_rational~2 proc~inv->proc~inv proc~det det proc~inv->proc~det interface~nearest_point_help_2d nearest_point_help_2d proc~nearest_point~2->interface~nearest_point_help_2d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~derivative2_scalar~2->proc~is_rational~2 interface~compute_d2tgc~2 compute_d2Tgc proc~derivative2_scalar~2->interface~compute_d2tgc~2 proc~derivative2_vector~2->interface~ndgrid proc~derivative2_vector~2->proc~is_rational~2 proc~derivative2_vector~2->interface~compute_d2tgc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~nearest_point2~2~~CalledByGraph proc~nearest_point2~2 nurbs_surface%nearest_point2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point2~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/nearest_point2~2.html"},{"title":"remove_knots – ForCAD","text":"private pure subroutine remove_knots(this, dir, Xth, r) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) Calls proc~~remove_knots~2~~CallsGraph proc~remove_knots~2 nurbs_surface%remove_knots interface~compute_multiplicity compute_multiplicity proc~remove_knots~2->interface~compute_multiplicity none~get_knot~2 nurbs_surface%get_knot proc~remove_knots~2->none~get_knot~2 none~set~2 nurbs_surface%set proc~remove_knots~2->none~set~2 proc~findspan findspan proc~remove_knots~2->proc~findspan proc~is_rational~2 nurbs_surface%is_rational proc~remove_knots~2->proc~is_rational~2 proc~remove_knots_a_5_8 remove_knots_A_5_8 proc~remove_knots~2->proc~remove_knots_a_5_8 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_knot_all~2 nurbs_surface%get_knot_all none~get_knot~2->proc~get_knot_all~2 proc~get_knoti~2 nurbs_surface%get_knoti none~get_knot~2->proc~get_knoti~2 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~remove_knots~2~~CalledByGraph proc~remove_knots~2 nurbs_surface%remove_knots program~example3_surface example3_surface program~example3_surface->proc~remove_knots~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/remove_knots~2.html"},{"title":"rotate_Xc – ForCAD","text":"private pure subroutine rotate_Xc(this, alpha, beta, theta) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta Calls proc~~rotate_xc~2~~CallsGraph proc~rotate_xc~2 nurbs_surface%rotate_Xc proc~rotation rotation proc~rotate_xc~2->proc~rotation cosd cosd proc~rotation->cosd sind sind proc~rotation->sind Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~rotate_xc~2~~CalledByGraph proc~rotate_xc~2 nurbs_surface%rotate_Xc program~example3_surface example3_surface program~example3_surface->proc~rotate_xc~2 program~example_ppm2 example_ppm2 program~example_ppm2->proc~rotate_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/rotate_xc~2.html"},{"title":"rotate_Xg – ForCAD","text":"private pure subroutine rotate_Xg(this, alpha, beta, theta) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta Calls proc~~rotate_xg~2~~CallsGraph proc~rotate_xg~2 nurbs_surface%rotate_Xg proc~rotation rotation proc~rotate_xg~2->proc~rotation cosd cosd proc~rotation->cosd sind sind proc~rotation->sind Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~rotate_xg~2~~CalledByGraph proc~rotate_xg~2 nurbs_surface%rotate_Xg program~example3_surface example3_surface program~example3_surface->proc~rotate_xg~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/rotate_xg~2.html"},{"title":"set1 – ForCAD","text":"private pure subroutine set1(this, knot1, knot2, Xc, Wc) Set knot vectors, control points and weights for the NURBS surface object. Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set1~2~~CallsGraph proc~set1~2 nurbs_surface%set1 proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set1~2~~CalledByGraph proc~set1~2 nurbs_surface%set1 none~set~2 nurbs_surface%set none~set~2->proc~set1~2 proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->none~set~2 proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->none~set~2 proc~insert_knots~2 nurbs_surface%insert_knots proc~insert_knots~2->none~set~2 proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~set~2 proc~remove_knots~2 nurbs_surface%remove_knots proc~remove_knots~2->none~set~2 proc~set_c~2 nurbs_surface%set_C proc~set_c~2->none~set~2 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~2 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~2 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~2 program~compute_area compute_area program~compute_area->none~set~2 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area program~example3_surface example3_surface program~example3_surface->none~set~2 program~example3_surface->proc~elevate_degree~2 program~example3_surface->proc~insert_knots~2 program~example3_surface->proc~remove_knots~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~2 proc~cmp_area->proc~ansatz~2 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set1~2.html"},{"title":"set2 – ForCAD","text":"private pure subroutine set2(this, Xth_dir1, Xth_dir2, degree, continuity1, continuity2, Xc, Wc) Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir1 (:) real(kind=rk), intent(in), contiguous :: Xth_dir2 (:) integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: continuity1 (:) integer, intent(in), contiguous :: continuity2 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set2~2~~CallsGraph proc~set2~2 nurbs_surface%set2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set2~2~~CalledByGraph proc~set2~2 nurbs_surface%set2 none~set~2 nurbs_surface%set none~set~2->proc~set2~2 proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->none~set~2 proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->none~set~2 proc~insert_knots~2 nurbs_surface%insert_knots proc~insert_knots~2->none~set~2 proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~set~2 proc~remove_knots~2 nurbs_surface%remove_knots proc~remove_knots~2->none~set~2 proc~set_c~2 nurbs_surface%set_C proc~set_c~2->none~set~2 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~2 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~2 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~2 program~compute_area compute_area program~compute_area->none~set~2 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area program~example3_surface example3_surface program~example3_surface->none~set~2 program~example3_surface->proc~elevate_degree~2 program~example3_surface->proc~insert_knots~2 program~example3_surface->proc~remove_knots~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~2 proc~cmp_area->proc~ansatz~2 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set2~2.html"},{"title":"set3 – ForCAD","text":"private pure subroutine set3(this, nc, Xc, Wc) Set Bezier or Rational Bezier surface using control points and weights. Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set3~2~~CallsGraph proc~set3~2 nurbs_surface%set3 proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set3~2~~CalledByGraph proc~set3~2 nurbs_surface%set3 none~set~2 nurbs_surface%set none~set~2->proc~set3~2 proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->none~set~2 proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->none~set~2 proc~insert_knots~2 nurbs_surface%insert_knots proc~insert_knots~2->none~set~2 proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~set~2 proc~remove_knots~2 nurbs_surface%remove_knots proc~remove_knots~2->none~set~2 proc~set_c~2 nurbs_surface%set_C proc~set_c~2->none~set~2 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~2 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~2 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~2 program~compute_area compute_area program~compute_area->none~set~2 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area program~example3_surface example3_surface program~example3_surface->none~set~2 program~example3_surface->proc~elevate_degree~2 program~example3_surface->proc~insert_knots~2 program~example3_surface->proc~remove_knots~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~2 proc~cmp_area->proc~ansatz~2 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set3~2.html"},{"title":"set4 – ForCAD","text":"private pure subroutine set4(this, degree, nc, Xc, Wc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Called by proc~~set4~2~~CalledByGraph proc~set4~2 nurbs_surface%set4 none~set~2 nurbs_surface%set none~set~2->proc~set4~2 proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->none~set~2 proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->none~set~2 proc~insert_knots~2 nurbs_surface%insert_knots proc~insert_knots~2->none~set~2 proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~set~2 proc~remove_knots~2 nurbs_surface%remove_knots proc~remove_knots~2->none~set~2 proc~set_c~2 nurbs_surface%set_C proc~set_c~2->none~set~2 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~2 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~2 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~2 program~compute_area compute_area program~compute_area->none~set~2 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area program~example3_surface example3_surface program~example3_surface->none~set~2 program~example3_surface->proc~elevate_degree~2 program~example3_surface->proc~insert_knots~2 program~example3_surface->proc~remove_knots~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~2 proc~cmp_area->proc~ansatz~2 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set4~2.html"},{"title":"set_C – ForCAD","text":"private pure subroutine set_C(this, center, radius1, radius2) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 Calls proc~~set_c~2~~CallsGraph proc~set_c~2 nurbs_surface%set_C none~set~2 nurbs_surface%set proc~set_c~2->none~set~2 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_c~2~~CalledByGraph proc~set_c~2 nurbs_surface%set_C program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_c~2.html"},{"title":"set_elem – ForCAD","text":"private pure subroutine set_elem(this, elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:)","tags":"","loc":"proc/set_elem~2.html"},{"title":"set_elem_Xc_vis – ForCAD","text":"private pure subroutine set_elem_Xc_vis(this, elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:)","tags":"","loc":"proc/set_elem_xc_vis~2.html"},{"title":"set_elem_Xg_vis – ForCAD","text":"private pure subroutine set_elem_Xg_vis(this, elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:)","tags":"","loc":"proc/set_elem_xg_vis~2.html"},{"title":"set_half_ring – ForCAD","text":"private pure subroutine set_half_ring(this, center, radius1, radius2) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 Calls proc~~set_half_ring~2~~CallsGraph proc~set_half_ring~2 nurbs_surface%set_half_ring none~set~2 nurbs_surface%set proc~set_half_ring~2->none~set~2 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_half_ring~2~~CalledByGraph proc~set_half_ring~2 nurbs_surface%set_half_ring program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_half_ring~2.html"},{"title":"set_ring – ForCAD","text":"private pure subroutine set_ring(this, center, radius1, radius2) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 Calls proc~~set_ring~2~~CallsGraph proc~set_ring~2 nurbs_surface%set_ring none~set~2 nurbs_surface%set proc~set_ring~2->none~set~2 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_ring~2~~CalledByGraph proc~set_ring~2 nurbs_surface%set_ring program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_ring~2.html"},{"title":"set_tetragon – ForCAD","text":"private pure subroutine set_tetragon(this, L, nc, Wc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: L (2) integer, intent(in) :: nc (2) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set_tetragon~~CallsGraph proc~set_tetragon nurbs_surface%set_tetragon none~set~2 nurbs_surface%set proc~set_tetragon->none~set~2 proc~tetragon_xc tetragon_Xc proc~set_tetragon->proc~tetragon_xc proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_tetragon~~CalledByGraph proc~set_tetragon nurbs_surface%set_tetragon program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_tetragon.html"},{"title":"show – ForCAD","text":"private impure subroutine show(this, vtkfile_Xc, vtkfile_Xg) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg Called by proc~~show~2~~CalledByGraph proc~show~2 nurbs_surface%show program~example3_surface example3_surface program~example3_surface->proc~show~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~show~2 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~show~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~show~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~show~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~show~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/show~2.html"},{"title":"translate_Xc – ForCAD","text":"private pure subroutine translate_Xc(this, vec) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) Called by proc~~translate_xc~2~~CalledByGraph proc~translate_xc~2 nurbs_surface%translate_Xc program~example3_surface example3_surface program~example3_surface->proc~translate_xc~2 program~example_ppm2 example_ppm2 program~example_ppm2->proc~translate_xc~2 program~example_ppm3 example_ppm3 program~example_ppm3->proc~translate_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/translate_xc~2.html"},{"title":"translate_Xg – ForCAD","text":"private pure subroutine translate_Xg(this, vec) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) Called by proc~~translate_xg~2~~CalledByGraph proc~translate_xg~2 nurbs_surface%translate_Xg program~example3_surface example3_surface program~example3_surface->proc~translate_xg~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/translate_xg~2.html"},{"title":"compute_Tgc – ForCAD","text":"private interface compute_Tgc Called by interface~~compute_tgc~2~~CalledByGraph interface~compute_tgc~2 compute_Tgc proc~basis_scalar~2 nurbs_surface%basis_scalar proc~basis_scalar~2->interface~compute_tgc~2 proc~basis_vector~2 nurbs_surface%basis_vector proc~basis_vector~2->interface~compute_tgc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Functions private pure function compute_Tgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Tgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:)","tags":"","loc":"interface/compute_tgc~2.html"},{"title":"compute_Xg – ForCAD","text":"private interface compute_Xg Called by interface~~compute_xg~2~~CalledByGraph interface~compute_xg~2 compute_Xg proc~cmp_xg~2 nurbs_surface%cmp_Xg proc~cmp_xg~2->interface~compute_xg~2 proc~create~2 nurbs_surface%create proc~create~2->interface~compute_xg~2 proc~nearest_point2~2 nurbs_surface%nearest_point2 proc~nearest_point2~2->proc~cmp_xg~2 proc~nearest_point2~2->proc~create~2 program~example3_surface example3_surface program~example3_surface->proc~create~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~create~2 program~example_ppm1 example_ppm1 program~example_ppm1->proc~create~2 program~example_ppm2 example_ppm2 program~example_ppm2->proc~create~2 program~example_ppm3 example_ppm3 program~example_ppm3->proc~create~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~create~2 program~nearest_point_2d->proc~nearest_point2~2 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~create~2 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~create~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~create~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~create~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~create~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Functions private pure function compute_Xg_bspline_2d(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_bspline_2d_1point(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Xg_nurbs_2d(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_nurbs_2d_1point(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"interface/compute_xg~2.html"},{"title":"compute_d2Tgc – ForCAD","text":"private interface compute_d2Tgc Called by interface~~compute_d2tgc~2~~CalledByGraph interface~compute_d2tgc~2 compute_d2Tgc proc~derivative2_scalar~2 nurbs_surface%derivative2_scalar proc~derivative2_scalar~2->interface~compute_d2tgc~2 proc~derivative2_vector~2 nurbs_surface%derivative2_vector proc~derivative2_vector~2->interface~compute_d2tgc~2 none~derivative2~2 nurbs_surface%derivative2 none~derivative2~2->proc~derivative2_scalar~2 none~derivative2~2->proc~derivative2_vector~2 proc~nearest_point2~2 nurbs_surface%nearest_point2 proc~nearest_point2~2->none~derivative2~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point2~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Subroutines private pure subroutine compute_d2Tgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, nc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_d2Tgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:)","tags":"","loc":"interface/compute_d2tgc~2.html"},{"title":"compute_dTgc – ForCAD","text":"private interface compute_dTgc Called by interface~~compute_dtgc~2~~CalledByGraph interface~compute_dtgc~2 compute_dTgc proc~derivative_scalar~2 nurbs_surface%derivative_scalar proc~derivative_scalar~2->interface~compute_dtgc~2 proc~derivative_vector~2 nurbs_surface%derivative_vector proc~derivative_vector~2->interface~compute_dtgc~2 none~derivative~2 nurbs_surface%derivative none~derivative~2->proc~derivative_scalar~2 none~derivative~2->proc~derivative_vector~2 proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->none~derivative~2 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 program~compute_area compute_area program~compute_area->proc~cmp_area Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Subroutines private pure subroutine compute_dTgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, nc, f_dTgc, f_Tgc, elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in) :: elem (:) private pure subroutine compute_dTgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, nc, f_ng, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_dTgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in) :: elem (:) private pure subroutine compute_dTgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:)","tags":"","loc":"interface/compute_dtgc~2.html"},{"title":"nearest_point_help_2d – ForCAD","text":"interface Called by interface~~nearest_point_help_2d~~CalledByGraph interface~nearest_point_help_2d nearest_point_help_2d proc~nearest_point~2 nurbs_surface%nearest_point proc~nearest_point~2->interface~nearest_point_help_2d proc~nearest_point2~2 nurbs_surface%nearest_point2 proc~nearest_point2~2->proc~nearest_point~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point~2 program~nearest_point_2d->proc~nearest_point2~2 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~nearest_point~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. private pure function nearest_point_help_2d(f_ng, f_Xg, f_point_Xg) result(f_distances) Arguments Type Intent Optional Attributes Name integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Xg (:,:) real(kind=rk), intent(in), contiguous :: f_point_Xg (:) Return Value real(kind=rk),allocatable,(:)","tags":"","loc":"interface/nearest_point_help_2d.html"},{"title":"generate_Xc – ForCAD","text":"function generate_Xc(num_rows, num_cols, peak_height) result(control_points) Arguments Type Intent Optional Attributes Name integer, intent(in) :: num_rows integer, intent(in) :: num_cols real(kind=rk), intent(in) :: peak_height Return Value real(kind=rk), allocatable, (:,:) Called by proc~~generate_xc~4~~CalledByGraph proc~generate_xc~4 generate_Xc program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~generate_xc~4 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/generate_xc~4.html"},{"title":"generate_Xc – ForCAD","text":"function generate_Xc(L) result(control_points) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: L Return Value real(kind=rk), allocatable, (:,:) Called by proc~~generate_xc~5~~CalledByGraph proc~generate_xc~5 generate_Xc program~example3_volume example3_volume program~example3_volume->proc~generate_xc~5 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/generate_xc~5.html"},{"title":"basis_bernstein – ForCAD","text":"public pure function basis_bernstein(Xt, nc) result(B) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt integer, intent(in) :: nc Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/basis_bernstein.html"},{"title":"basis_bspline – ForCAD","text":"public pure function basis_bspline(Xt, knot, nc, degree) result(B) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: nc integer, intent(in) :: degree Return Value real(kind=rk), allocatable, (:) Called by proc~~basis_bspline~~CalledByGraph proc~basis_bspline basis_bspline proc~compute_tgc_bspline_1d_scalar compute_Tgc_bspline_1d_scalar proc~compute_tgc_bspline_1d_scalar->proc~basis_bspline proc~compute_tgc_bspline_1d_vector compute_Tgc_bspline_1d_vector proc~compute_tgc_bspline_1d_vector->proc~basis_bspline proc~compute_tgc_bspline_2d_scalar compute_Tgc_bspline_2d_scalar proc~compute_tgc_bspline_2d_scalar->proc~basis_bspline proc~compute_tgc_bspline_2d_vector compute_Tgc_bspline_2d_vector proc~compute_tgc_bspline_2d_vector->proc~basis_bspline proc~compute_tgc_bspline_3d_scalar compute_Tgc_bspline_3d_scalar proc~compute_tgc_bspline_3d_scalar->proc~basis_bspline proc~compute_tgc_bspline_3d_vector compute_Tgc_bspline_3d_vector proc~compute_tgc_bspline_3d_vector->proc~basis_bspline proc~compute_tgc_nurbs_1d_scalar compute_Tgc_nurbs_1d_scalar proc~compute_tgc_nurbs_1d_scalar->proc~basis_bspline proc~compute_tgc_nurbs_1d_vector compute_Tgc_nurbs_1d_vector proc~compute_tgc_nurbs_1d_vector->proc~basis_bspline proc~compute_tgc_nurbs_2d_scalar compute_Tgc_nurbs_2d_scalar proc~compute_tgc_nurbs_2d_scalar->proc~basis_bspline proc~compute_tgc_nurbs_2d_vector compute_Tgc_nurbs_2d_vector proc~compute_tgc_nurbs_2d_vector->proc~basis_bspline proc~compute_tgc_nurbs_3d_scalar compute_Tgc_nurbs_3d_scalar proc~compute_tgc_nurbs_3d_scalar->proc~basis_bspline proc~compute_tgc_nurbs_3d_vector compute_Tgc_nurbs_3d_vector proc~compute_tgc_nurbs_3d_vector->proc~basis_bspline proc~compute_xg_bspline_1d compute_Xg_bspline_1d proc~compute_xg_bspline_1d->proc~basis_bspline proc~compute_xg_bspline_1d_1point compute_Xg_bspline_1d_1point proc~compute_xg_bspline_1d_1point->proc~basis_bspline proc~compute_xg_bspline_2d compute_Xg_bspline_2d proc~compute_xg_bspline_2d->proc~basis_bspline proc~compute_xg_bspline_2d_1point compute_Xg_bspline_2d_1point proc~compute_xg_bspline_2d_1point->proc~basis_bspline proc~compute_xg_bspline_3d compute_Xg_bspline_3d proc~compute_xg_bspline_3d->proc~basis_bspline proc~compute_xg_bspline_3d_1point compute_Xg_bspline_3d_1point proc~compute_xg_bspline_3d_1point->proc~basis_bspline proc~compute_xg_nurbs_1d compute_Xg_nurbs_1d proc~compute_xg_nurbs_1d->proc~basis_bspline proc~compute_xg_nurbs_1d_1point compute_Xg_nurbs_1d_1point proc~compute_xg_nurbs_1d_1point->proc~basis_bspline proc~compute_xg_nurbs_2d compute_Xg_nurbs_2d proc~compute_xg_nurbs_2d->proc~basis_bspline proc~compute_xg_nurbs_2d_1point compute_Xg_nurbs_2d_1point proc~compute_xg_nurbs_2d_1point->proc~basis_bspline proc~compute_xg_nurbs_3d compute_Xg_nurbs_3d proc~compute_xg_nurbs_3d->proc~basis_bspline proc~compute_xg_nurbs_3d_1point compute_Xg_nurbs_3d_1point proc~compute_xg_nurbs_3d_1point->proc~basis_bspline proc~put_to_nurbs nurbs_volume%put_to_nurbs proc~put_to_nurbs->proc~basis_bspline program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~put_to_nurbs Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_bspline.html"},{"title":"compute_knot_vector – ForCAD","text":"public pure function compute_knot_vector(Xth_dir, degree, continuity) result(knot) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xth_dir (:) integer, intent(in) :: degree integer, intent(in), contiguous :: continuity (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_knot_vector~~CallsGraph proc~compute_knot_vector compute_knot_vector proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~compute_knot_vector~~CalledByGraph proc~compute_knot_vector compute_knot_vector proc~set2 nurbs_volume%set2 proc~set2->proc~compute_knot_vector proc~set2~2 nurbs_surface%set2 proc~set2~2->proc~compute_knot_vector proc~set2~3 nurbs_curve%set2 proc~set2~3->proc~compute_knot_vector none~set nurbs_volume%set none~set->proc~set2 none~set~2 nurbs_surface%set none~set~2->proc~set2~2 none~set~3 nurbs_curve%set none~set~3->proc~set2~3 proc~ansatz nurbs_volume%ansatz proc~ansatz->none~set proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->none~set~2 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree nurbs_volume%elevate_degree proc~elevate_degree->none~set proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->none~set~2 proc~elevate_degree~3 nurbs_curve%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots nurbs_volume%insert_knots proc~insert_knots->none~set proc~insert_knots~2 nurbs_surface%insert_knots proc~insert_knots~2->none~set~2 proc~insert_knots~3 nurbs_curve%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~set proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~set proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~set~2 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots nurbs_volume%remove_knots proc~remove_knots->none~set proc~remove_knots~2 nurbs_surface%remove_knots proc~remove_knots~2->none~set~2 proc~remove_knots~3 nurbs_curve%remove_knots proc~remove_knots~3->none~set~3 proc~set_c nurbs_volume%set_C proc~set_c->none~set proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set~3 proc~set_c~2 nurbs_surface%set_C proc~set_c~2->none~set~2 proc~set_c~3 nurbs_curve%set_C proc~set_c~3->none~set~3 proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set~3 proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~2 proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~2 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~2 program~compute_area compute_area program~compute_area->none~set~2 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->none~set~3 proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->none~set proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume program~example1_curve example1_curve program~example1_curve->none~set~3 program~example1_curve->proc~elevate_degree~3 program~example1_curve->proc~insert_knots~3 program~example1_curve->proc~remove_knots~3 program~example3_surface example3_surface program~example3_surface->none~set~2 program~example3_surface->proc~elevate_degree~2 program~example3_surface->proc~insert_knots~2 program~example3_surface->proc~remove_knots~2 program~example3_volume example3_volume program~example3_volume->none~set program~example3_volume->proc~elevate_degree program~example3_volume->proc~insert_knots program~example3_volume->proc~remove_knots program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set proc~cmp_area->proc~ansatz~2 proc~cmp_length->proc~ansatz~3 proc~cmp_volume->proc~ansatz program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c~3 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_knot_vector.html"},{"title":"det – ForCAD","text":"public pure function det(A) result(detA) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: A (:,:) Return Value real(kind=rk) Called by proc~~det~~CalledByGraph proc~det det proc~ansatz nurbs_volume%ansatz proc~ansatz->proc~det proc~inv inv proc~ansatz->proc~inv proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->proc~det proc~ansatz~2->proc~inv proc~inv->proc~det proc~inv->proc~inv proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz proc~nearest_point2 nurbs_volume%nearest_point2 proc~nearest_point2->proc~inv proc~nearest_point2~2 nurbs_surface%nearest_point2 proc~nearest_point2~2->proc~inv program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_volume compute_volume program~compute_volume->proc~cmp_volume program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point2~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/det.html"},{"title":"findspan – ForCAD","text":"public pure function findspan(n, degree, Xth, knot) result(s) Arguments Type Intent Optional Attributes Name integer, intent(in) :: n integer, intent(in) :: degree real(kind=rk), intent(in) :: Xth real(kind=rk), intent(in), contiguous :: knot (:) Return Value integer Called by proc~~findspan~~CalledByGraph proc~findspan findspan proc~insert_knots nurbs_volume%insert_knots proc~insert_knots->proc~findspan proc~insert_knots~2 nurbs_surface%insert_knots proc~insert_knots~2->proc~findspan proc~insert_knots~3 nurbs_curve%insert_knots proc~insert_knots~3->proc~findspan proc~remove_knots nurbs_volume%remove_knots proc~remove_knots->proc~findspan proc~remove_knots~2 nurbs_surface%remove_knots proc~remove_knots~2->proc~findspan proc~remove_knots~3 nurbs_curve%remove_knots proc~remove_knots~3->proc~findspan program~example1_curve example1_curve program~example1_curve->proc~insert_knots~3 program~example1_curve->proc~remove_knots~3 program~example3_surface example3_surface program~example3_surface->proc~insert_knots~2 program~example3_surface->proc~remove_knots~2 program~example3_volume example3_volume program~example3_volume->proc~insert_knots program~example3_volume->proc~remove_knots Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/findspan.html"},{"title":"hexahedron_Xc – ForCAD","text":"public pure function hexahedron_Xc(L, nc) result(Xc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: L (3) integer, intent(in) :: nc (3) Return Value real(kind=rk), allocatable, (:,:) Called by proc~~hexahedron_xc~~CalledByGraph proc~hexahedron_xc hexahedron_Xc proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->proc~hexahedron_xc program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~hexahedron_xc program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/hexahedron_xc.html"},{"title":"inv – ForCAD","text":"public pure recursive function inv(A) result(A_inv) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: A (:,:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~inv~~CallsGraph proc~inv inv proc~inv->proc~inv proc~det det proc~inv->proc~det Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~inv~~CalledByGraph proc~inv inv proc~inv->proc~inv proc~ansatz nurbs_volume%ansatz proc~ansatz->proc~inv proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->proc~inv proc~nearest_point2 nurbs_volume%nearest_point2 proc~nearest_point2->proc~inv proc~nearest_point2~2 nurbs_surface%nearest_point2 proc~nearest_point2~2->proc~inv proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point2~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point2 program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/inv.html"},{"title":"kron – ForCAD","text":"public pure function kron(u, v) result(w) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: u (:) real(kind=rk), intent(in), contiguous :: v (:) Return Value real(kind=rk), (size(u)*size(v)) Called by proc~~kron~~CalledByGraph proc~kron kron proc~compute_d2tgc_bspline_2d_scalar compute_d2Tgc_bspline_2d_scalar proc~compute_d2tgc_bspline_2d_scalar->proc~kron proc~compute_d2tgc_bspline_2d_vector compute_d2Tgc_bspline_2d_vector proc~compute_d2tgc_bspline_2d_vector->proc~kron proc~compute_d2tgc_bspline_3d_scalar compute_d2Tgc_bspline_3d_scalar proc~compute_d2tgc_bspline_3d_scalar->proc~kron proc~compute_d2tgc_bspline_3d_vector compute_d2Tgc_bspline_3d_vector proc~compute_d2tgc_bspline_3d_vector->proc~kron proc~compute_d2tgc_nurbs_2d_scalar compute_d2Tgc_nurbs_2d_scalar proc~compute_d2tgc_nurbs_2d_scalar->proc~kron proc~compute_d2tgc_nurbs_2d_vector compute_d2Tgc_nurbs_2d_vector proc~compute_d2tgc_nurbs_2d_vector->proc~kron proc~compute_d2tgc_nurbs_3d_scalar compute_d2Tgc_nurbs_3d_scalar proc~compute_d2tgc_nurbs_3d_scalar->proc~kron proc~compute_d2tgc_nurbs_3d_vector compute_d2Tgc_nurbs_3d_vector proc~compute_d2tgc_nurbs_3d_vector->proc~kron proc~compute_dtgc_bspline_2d_scalar compute_dTgc_bspline_2d_scalar proc~compute_dtgc_bspline_2d_scalar->proc~kron proc~compute_dtgc_bspline_2d_vector compute_dTgc_bspline_2d_vector proc~compute_dtgc_bspline_2d_vector->proc~kron proc~compute_dtgc_bspline_3d_scalar compute_dTgc_bspline_3d_scalar proc~compute_dtgc_bspline_3d_scalar->proc~kron proc~compute_dtgc_bspline_3d_vector compute_dTgc_bspline_3d_vector proc~compute_dtgc_bspline_3d_vector->proc~kron proc~compute_dtgc_nurbs_2d_scalar compute_dTgc_nurbs_2d_scalar proc~compute_dtgc_nurbs_2d_scalar->proc~kron proc~compute_dtgc_nurbs_2d_vector compute_dTgc_nurbs_2d_vector proc~compute_dtgc_nurbs_2d_vector->proc~kron proc~compute_dtgc_nurbs_3d_scalar compute_dTgc_nurbs_3d_scalar proc~compute_dtgc_nurbs_3d_scalar->proc~kron proc~compute_dtgc_nurbs_3d_vector compute_dTgc_nurbs_3d_vector proc~compute_dtgc_nurbs_3d_vector->proc~kron proc~compute_tgc_bspline_2d_scalar compute_Tgc_bspline_2d_scalar proc~compute_tgc_bspline_2d_scalar->proc~kron proc~compute_tgc_bspline_2d_vector compute_Tgc_bspline_2d_vector proc~compute_tgc_bspline_2d_vector->proc~kron proc~compute_tgc_bspline_3d_scalar compute_Tgc_bspline_3d_scalar proc~compute_tgc_bspline_3d_scalar->proc~kron proc~compute_tgc_bspline_3d_vector compute_Tgc_bspline_3d_vector proc~compute_tgc_bspline_3d_vector->proc~kron proc~compute_tgc_nurbs_2d_scalar compute_Tgc_nurbs_2d_scalar proc~compute_tgc_nurbs_2d_scalar->proc~kron proc~compute_tgc_nurbs_2d_vector compute_Tgc_nurbs_2d_vector proc~compute_tgc_nurbs_2d_vector->proc~kron proc~compute_tgc_nurbs_3d_scalar compute_Tgc_nurbs_3d_scalar proc~compute_tgc_nurbs_3d_scalar->proc~kron proc~compute_tgc_nurbs_3d_vector compute_Tgc_nurbs_3d_vector proc~compute_tgc_nurbs_3d_vector->proc~kron proc~compute_xg_bspline_2d compute_Xg_bspline_2d proc~compute_xg_bspline_2d->proc~kron proc~compute_xg_bspline_2d_1point compute_Xg_bspline_2d_1point proc~compute_xg_bspline_2d_1point->proc~kron proc~compute_xg_bspline_3d compute_Xg_bspline_3d proc~compute_xg_bspline_3d->proc~kron proc~compute_xg_bspline_3d_1point compute_Xg_bspline_3d_1point proc~compute_xg_bspline_3d_1point->proc~kron proc~compute_xg_nurbs_2d compute_Xg_nurbs_2d proc~compute_xg_nurbs_2d->proc~kron proc~compute_xg_nurbs_2d_1point compute_Xg_nurbs_2d_1point proc~compute_xg_nurbs_2d_1point->proc~kron proc~compute_xg_nurbs_3d compute_Xg_nurbs_3d proc~compute_xg_nurbs_3d->proc~kron proc~compute_xg_nurbs_3d_1point compute_Xg_nurbs_3d_1point proc~compute_xg_nurbs_3d_1point->proc~kron proc~gauss_legendre_2d gauss_legendre_2D proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d gauss_legendre_3D proc~gauss_legendre_3d->proc~kron proc~put_to_nurbs nurbs_volume%put_to_nurbs proc~put_to_nurbs->proc~kron interface~gauss_leg gauss_leg interface~gauss_leg->proc~gauss_legendre_2d interface~gauss_leg->proc~gauss_legendre_3d program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~put_to_nurbs proc~ansatz nurbs_volume%ansatz proc~ansatz->interface~gauss_leg proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->interface~gauss_leg proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->interface~gauss_leg proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/kron.html"},{"title":"rotation – ForCAD","text":"public pure function rotation(alpha, beta, theta) result(R) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta Return Value real(kind=rk), dimension(3,3) Calls proc~~rotation~~CallsGraph proc~rotation rotation cosd cosd proc~rotation->cosd sind sind proc~rotation->sind Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~rotation~~CalledByGraph proc~rotation rotation proc~rotate_xc nurbs_volume%rotate_Xc proc~rotate_xc->proc~rotation proc~rotate_xc~2 nurbs_surface%rotate_Xc proc~rotate_xc~2->proc~rotation proc~rotate_xc~3 nurbs_curve%rotate_Xc proc~rotate_xc~3->proc~rotation proc~rotate_xg nurbs_volume%rotate_Xg proc~rotate_xg->proc~rotation proc~rotate_xg~2 nurbs_surface%rotate_Xg proc~rotate_xg~2->proc~rotation proc~rotate_xg~3 nurbs_curve%rotate_Xg proc~rotate_xg~3->proc~rotation program~example1_curve example1_curve program~example1_curve->proc~rotate_xc~3 program~example1_curve->proc~rotate_xg~3 program~example3_surface example3_surface program~example3_surface->proc~rotate_xc~2 program~example3_surface->proc~rotate_xg~2 program~example3_volume example3_volume program~example3_volume->proc~rotate_xc program~example3_volume->proc~rotate_xg program~example_ppm2 example_ppm2 program~example_ppm2->proc~rotate_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/rotation.html"},{"title":"tetragon_Xc – ForCAD","text":"public pure function tetragon_Xc(L, nc) result(Xc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: L (2) integer, intent(in) :: nc (2) Return Value real(kind=rk), allocatable, (:,:) Called by proc~~tetragon_xc~~CalledByGraph proc~tetragon_xc tetragon_Xc proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->proc~tetragon_xc program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/tetragon_xc.html"},{"title":"bincoeff – ForCAD","text":"private pure function bincoeff(n, k) result(b) Arguments Type Intent Optional Attributes Name integer, intent(in) :: n integer, intent(in) :: k Return Value real(kind=rk) Calls proc~~bincoeff~~CallsGraph proc~bincoeff bincoeff proc~factln factln proc~bincoeff->proc~factln Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~bincoeff~~CalledByGraph proc~bincoeff bincoeff proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree_a_5_9->proc~bincoeff proc~elevate_degree nurbs_volume%elevate_degree proc~elevate_degree->proc~elevate_degree_a_5_9 proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->proc~elevate_degree_a_5_9 proc~elevate_degree~3 nurbs_curve%elevate_degree proc~elevate_degree~3->proc~elevate_degree_a_5_9 program~example1_curve example1_curve program~example1_curve->proc~elevate_degree~3 program~example3_surface example3_surface program~example3_surface->proc~elevate_degree~2 program~example3_volume example3_volume program~example3_volume->proc~elevate_degree Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/bincoeff.html"},{"title":"cmp_elemConn_C0_L – ForCAD","text":"private pure function cmp_elemConn_C0_L(nnode, p) result(elemConn) Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode integer, intent(in) :: p Return Value integer, allocatable, (:,:) Called by proc~~cmp_elemconn_c0_l~~CalledByGraph proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0 elemConn_C0 interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elem_xc_vis nurbs_volume%cmp_elem_Xc_vis proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xc_vis~2 nurbs_surface%cmp_elem_Xc_vis proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xc_vis~3 nurbs_curve%cmp_elem_Xc_vis proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis nurbs_volume%cmp_elem_Xg_vis proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis~2 nurbs_surface%cmp_elem_Xg_vis proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~3 nurbs_curve%cmp_elem_Xg_vis proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~export_xc nurbs_volume%export_Xc proc~export_xc->proc~cmp_elem_xc_vis proc~export_xc~2 nurbs_surface%export_Xc proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~export_xc~3 nurbs_curve%export_Xc proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~export_xg nurbs_volume%export_Xg proc~export_xg->proc~cmp_elem_xg_vis proc~export_xg~2 nurbs_surface%export_Xg proc~export_xg~2->proc~cmp_elem_xg_vis~2 proc~export_xg~3 nurbs_curve%export_Xg proc~export_xg~3->proc~cmp_elem_xg_vis~3 program~example1_curve example1_curve program~example1_curve->proc~export_xc~3 program~example1_curve->proc~export_xg~3 program~example3_surface example3_surface program~example3_surface->proc~export_xc~2 program~example3_surface->proc~export_xg~2 program~example3_volume example3_volume program~example3_volume->proc~export_xc program~example3_volume->proc~export_xg program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~export_xc~3 program~example_nurbs_curve->proc~export_xg~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~export_xc~2 program~example_nurbs_surface->proc~export_xg~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~export_xc program~example_nurbs_volume->proc~export_xg program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~export_xc program~example_put_to_nurbs->proc~export_xg program~shape_c_1d shape_C_1d program~shape_c_1d->proc~export_xc~3 program~shape_c_1d->proc~export_xg~3 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~export_xc~2 program~shape_c_2d->proc~export_xg~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~export_xc program~shape_c_3d->proc~export_xg program~shape_circle shape_circle program~shape_circle->proc~export_xc~3 program~shape_circle->proc~export_xg~3 program~shape_half_circle shape_half_circle program~shape_half_circle->proc~export_xc~3 program~shape_half_circle->proc~export_xg~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~export_xc~2 program~shape_half_ring_2d->proc~export_xg~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~export_xc program~shape_half_ring_3d->proc~export_xg program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~export_xc program~shape_hexahedron->proc~export_xg program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~export_xc~2 program~shape_ring_2d->proc~export_xg~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~export_xc program~shape_ring_3d->proc~export_xg program~shape_tetragon shape_tetragon program~shape_tetragon->proc~export_xc~2 program~shape_tetragon->proc~export_xg~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elemconn_c0_l.html"},{"title":"cmp_elemConn_C0_S – ForCAD","text":"private pure function cmp_elemConn_C0_S(nnode1, nnode2, p1, p2) result(elemConn) Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: p1 integer, intent(in) :: p2 Return Value integer, allocatable, (:,:) Called by proc~~cmp_elemconn_c0_s~~CalledByGraph proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0 elemConn_C0 interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elem_xc_vis nurbs_volume%cmp_elem_Xc_vis proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xc_vis~2 nurbs_surface%cmp_elem_Xc_vis proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xc_vis~3 nurbs_curve%cmp_elem_Xc_vis proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis nurbs_volume%cmp_elem_Xg_vis proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis~2 nurbs_surface%cmp_elem_Xg_vis proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~3 nurbs_curve%cmp_elem_Xg_vis proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~export_xc nurbs_volume%export_Xc proc~export_xc->proc~cmp_elem_xc_vis proc~export_xc~2 nurbs_surface%export_Xc proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~export_xc~3 nurbs_curve%export_Xc proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~export_xg nurbs_volume%export_Xg proc~export_xg->proc~cmp_elem_xg_vis proc~export_xg~2 nurbs_surface%export_Xg proc~export_xg~2->proc~cmp_elem_xg_vis~2 proc~export_xg~3 nurbs_curve%export_Xg proc~export_xg~3->proc~cmp_elem_xg_vis~3 program~example1_curve example1_curve program~example1_curve->proc~export_xc~3 program~example1_curve->proc~export_xg~3 program~example3_surface example3_surface program~example3_surface->proc~export_xc~2 program~example3_surface->proc~export_xg~2 program~example3_volume example3_volume program~example3_volume->proc~export_xc program~example3_volume->proc~export_xg program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~export_xc~3 program~example_nurbs_curve->proc~export_xg~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~export_xc~2 program~example_nurbs_surface->proc~export_xg~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~export_xc program~example_nurbs_volume->proc~export_xg program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~export_xc program~example_put_to_nurbs->proc~export_xg program~shape_c_1d shape_C_1d program~shape_c_1d->proc~export_xc~3 program~shape_c_1d->proc~export_xg~3 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~export_xc~2 program~shape_c_2d->proc~export_xg~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~export_xc program~shape_c_3d->proc~export_xg program~shape_circle shape_circle program~shape_circle->proc~export_xc~3 program~shape_circle->proc~export_xg~3 program~shape_half_circle shape_half_circle program~shape_half_circle->proc~export_xc~3 program~shape_half_circle->proc~export_xg~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~export_xc~2 program~shape_half_ring_2d->proc~export_xg~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~export_xc program~shape_half_ring_3d->proc~export_xg program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~export_xc program~shape_hexahedron->proc~export_xg program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~export_xc~2 program~shape_ring_2d->proc~export_xg~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~export_xc program~shape_ring_3d->proc~export_xg program~shape_tetragon shape_tetragon program~shape_tetragon->proc~export_xc~2 program~shape_tetragon->proc~export_xg~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elemconn_c0_s.html"},{"title":"cmp_elemConn_C0_V – ForCAD","text":"private pure function cmp_elemConn_C0_V(nnode1, nnode2, nnode3, p1, p2, p3) result(elemConn) Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: nnode3 integer, intent(in) :: p1 integer, intent(in) :: p2 integer, intent(in) :: p3 Return Value integer, allocatable, (:,:) Called by proc~~cmp_elemconn_c0_v~~CalledByGraph proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0 elemConn_C0 interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_elem_xc_vis nurbs_volume%cmp_elem_Xc_vis proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xc_vis~2 nurbs_surface%cmp_elem_Xc_vis proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xc_vis~3 nurbs_curve%cmp_elem_Xc_vis proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis nurbs_volume%cmp_elem_Xg_vis proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis~2 nurbs_surface%cmp_elem_Xg_vis proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~3 nurbs_curve%cmp_elem_Xg_vis proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~export_xc nurbs_volume%export_Xc proc~export_xc->proc~cmp_elem_xc_vis proc~export_xc~2 nurbs_surface%export_Xc proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~export_xc~3 nurbs_curve%export_Xc proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~export_xg nurbs_volume%export_Xg proc~export_xg->proc~cmp_elem_xg_vis proc~export_xg~2 nurbs_surface%export_Xg proc~export_xg~2->proc~cmp_elem_xg_vis~2 proc~export_xg~3 nurbs_curve%export_Xg proc~export_xg~3->proc~cmp_elem_xg_vis~3 program~example1_curve example1_curve program~example1_curve->proc~export_xc~3 program~example1_curve->proc~export_xg~3 program~example3_surface example3_surface program~example3_surface->proc~export_xc~2 program~example3_surface->proc~export_xg~2 program~example3_volume example3_volume program~example3_volume->proc~export_xc program~example3_volume->proc~export_xg program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~export_xc~3 program~example_nurbs_curve->proc~export_xg~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~export_xc~2 program~example_nurbs_surface->proc~export_xg~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~export_xc program~example_nurbs_volume->proc~export_xg program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~export_xc program~example_put_to_nurbs->proc~export_xg program~shape_c_1d shape_C_1d program~shape_c_1d->proc~export_xc~3 program~shape_c_1d->proc~export_xg~3 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~export_xc~2 program~shape_c_2d->proc~export_xg~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~export_xc program~shape_c_3d->proc~export_xg program~shape_circle shape_circle program~shape_circle->proc~export_xc~3 program~shape_circle->proc~export_xg~3 program~shape_half_circle shape_half_circle program~shape_half_circle->proc~export_xc~3 program~shape_half_circle->proc~export_xg~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~export_xc~2 program~shape_half_ring_2d->proc~export_xg~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~export_xc program~shape_half_ring_3d->proc~export_xg program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~export_xc program~shape_hexahedron->proc~export_xg program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~export_xc~2 program~shape_ring_2d->proc~export_xg~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~export_xc program~shape_ring_3d->proc~export_xg program~shape_tetragon shape_tetragon program~shape_tetragon->proc~export_xc~2 program~shape_tetragon->proc~export_xg~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elemconn_c0_v.html"},{"title":"compute_multiplicity1 – ForCAD","text":"private pure function compute_multiplicity1(knot) result(multiplicity) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: knot (:) Return Value integer, allocatable, (:) Called by proc~~compute_multiplicity1~~CalledByGraph proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity compute_multiplicity interface~compute_multiplicity->proc~compute_multiplicity1 proc~cmp_nc nurbs_volume%cmp_nc proc~cmp_nc->interface~compute_multiplicity proc~cmp_nc~2 nurbs_surface%cmp_nc proc~cmp_nc~2->interface~compute_multiplicity proc~cmp_nc~3 nurbs_curve%cmp_nc proc~cmp_nc~3->interface~compute_multiplicity proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~get_continuity nurbs_volume%get_continuity proc~get_continuity->interface~compute_multiplicity proc~get_continuity~2 nurbs_surface%get_continuity proc~get_continuity~2->interface~compute_multiplicity proc~get_continuity~3 nurbs_curve%get_continuity proc~get_continuity~3->interface~compute_multiplicity proc~get_multiplicity nurbs_volume%get_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~get_nc_dir nurbs_volume%get_nc_dir proc~get_nc_dir->interface~compute_multiplicity proc~get_nc_dir~2 nurbs_surface%get_nc_dir proc~get_nc_dir~2->interface~compute_multiplicity proc~insert_knots nurbs_volume%insert_knots proc~insert_knots->interface~compute_multiplicity none~set nurbs_volume%set proc~insert_knots->none~set proc~insert_knots~2 nurbs_surface%insert_knots proc~insert_knots~2->interface~compute_multiplicity none~set~2 nurbs_surface%set proc~insert_knots~2->none~set~2 proc~insert_knots~3 nurbs_curve%insert_knots proc~insert_knots~3->interface~compute_multiplicity none~set~3 nurbs_curve%set proc~insert_knots~3->none~set~3 proc~remove_knots nurbs_volume%remove_knots proc~remove_knots->interface~compute_multiplicity proc~remove_knots->none~set proc~remove_knots~2 nurbs_surface%remove_knots proc~remove_knots~2->interface~compute_multiplicity proc~remove_knots~2->none~set~2 proc~remove_knots~3 nurbs_curve%remove_knots proc~remove_knots~3->interface~compute_multiplicity proc~remove_knots~3->none~set~3 proc~cmp_degree nurbs_volume%cmp_degree proc~cmp_degree->proc~get_multiplicity proc~cmp_degree~2 nurbs_surface%cmp_degree proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_degree~3 nurbs_curve%cmp_degree proc~cmp_degree~3->proc~get_multiplicity~3 proc~cmp_elem nurbs_volume%cmp_elem proc~cmp_elem->proc~get_multiplicity proc~cmp_elem~2 nurbs_surface%cmp_elem proc~cmp_elem~2->proc~get_multiplicity~2 proc~cmp_elem~3 nurbs_curve%cmp_elem proc~cmp_elem~3->proc~get_multiplicity~3 proc~elevate_degree nurbs_volume%elevate_degree proc~elevate_degree->proc~elevate_degree_a_5_9 proc~elevate_degree->none~set proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->proc~elevate_degree_a_5_9 proc~elevate_degree~2->none~set~2 proc~elevate_degree~3 nurbs_curve%elevate_degree proc~elevate_degree~3->proc~elevate_degree_a_5_9 proc~elevate_degree~3->none~set~3 proc~set1 nurbs_volume%set1 proc~set1->proc~cmp_nc proc~set1->proc~cmp_degree proc~set1~2 nurbs_surface%set1 proc~set1~2->proc~cmp_nc~2 proc~set1~2->proc~cmp_degree~2 proc~set2 nurbs_volume%set2 proc~set2->proc~cmp_nc proc~set2~2 nurbs_surface%set2 proc~set2~2->proc~cmp_nc~2 program~example1_curve example1_curve program~example1_curve->proc~insert_knots~3 program~example1_curve->proc~remove_knots~3 program~example1_curve->proc~elevate_degree~3 program~example1_curve->none~set~3 program~example3_surface example3_surface program~example3_surface->proc~insert_knots~2 program~example3_surface->proc~remove_knots~2 program~example3_surface->proc~elevate_degree~2 program~example3_surface->none~set~2 program~example3_volume example3_volume program~example3_volume->proc~insert_knots program~example3_volume->proc~remove_knots program~example3_volume->proc~cmp_elem program~example3_volume->proc~elevate_degree program~example3_volume->none~set none~set->proc~set1 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 none~set~2->proc~set1~2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~ansatz nurbs_volume%ansatz proc~ansatz->proc~cmp_elem proc~ansatz->none~set proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~2->none~set~2 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->proc~cmp_elem~3 proc~ansatz~3->none~set~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~2 proc~cmp_area->proc~ansatz~2 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem~3 proc~cmp_length->proc~ansatz~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem proc~cmp_volume->proc~ansatz proc~set1a nurbs_curve%set1a proc~set1a->proc~cmp_degree~3 proc~set1~3 nurbs_curve%set1 proc~set1~3->proc~cmp_degree~3 proc~set3->proc~cmp_degree proc~set3~2->proc~cmp_degree~2 proc~set3~3 nurbs_curve%set3 proc~set3~3->proc~cmp_degree~3 none~set~3->proc~set1a none~set~3->proc~set1~3 none~set~3->proc~set3~3 proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~set proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~set proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~set~2 proc~set_c nurbs_volume%set_C proc~set_c->none~set proc~set_c~2 nurbs_surface%set_C proc~set_c~2->none~set~2 proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~2 proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~2 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~2 program~compute_area compute_area program~compute_area->none~set~2 program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_length->none~set~3 program~compute_volume compute_volume program~compute_volume->none~set program~compute_volume->proc~cmp_volume program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~set~3 proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set~3 proc~set_c~3 nurbs_curve%set_C proc~set_c~3->none~set~3 proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set~3 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 program~example_ppm3->proc~set_tetragon program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set~3 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c~3 program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_multiplicity1.html"},{"title":"compute_multiplicity2 – ForCAD","text":"private pure function compute_multiplicity2(knot, Xth) result(multiplicity) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in) :: Xth Return Value integer Called by proc~~compute_multiplicity2~~CalledByGraph proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity compute_multiplicity interface~compute_multiplicity->proc~compute_multiplicity2 proc~cmp_nc nurbs_volume%cmp_nc proc~cmp_nc->interface~compute_multiplicity proc~cmp_nc~2 nurbs_surface%cmp_nc proc~cmp_nc~2->interface~compute_multiplicity proc~cmp_nc~3 nurbs_curve%cmp_nc proc~cmp_nc~3->interface~compute_multiplicity proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~get_continuity nurbs_volume%get_continuity proc~get_continuity->interface~compute_multiplicity proc~get_continuity~2 nurbs_surface%get_continuity proc~get_continuity~2->interface~compute_multiplicity proc~get_continuity~3 nurbs_curve%get_continuity proc~get_continuity~3->interface~compute_multiplicity proc~get_multiplicity nurbs_volume%get_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~get_nc_dir nurbs_volume%get_nc_dir proc~get_nc_dir->interface~compute_multiplicity proc~get_nc_dir~2 nurbs_surface%get_nc_dir proc~get_nc_dir~2->interface~compute_multiplicity proc~insert_knots nurbs_volume%insert_knots proc~insert_knots->interface~compute_multiplicity none~set nurbs_volume%set proc~insert_knots->none~set proc~insert_knots~2 nurbs_surface%insert_knots proc~insert_knots~2->interface~compute_multiplicity none~set~2 nurbs_surface%set proc~insert_knots~2->none~set~2 proc~insert_knots~3 nurbs_curve%insert_knots proc~insert_knots~3->interface~compute_multiplicity none~set~3 nurbs_curve%set proc~insert_knots~3->none~set~3 proc~remove_knots nurbs_volume%remove_knots proc~remove_knots->interface~compute_multiplicity proc~remove_knots->none~set proc~remove_knots~2 nurbs_surface%remove_knots proc~remove_knots~2->interface~compute_multiplicity proc~remove_knots~2->none~set~2 proc~remove_knots~3 nurbs_curve%remove_knots proc~remove_knots~3->interface~compute_multiplicity proc~remove_knots~3->none~set~3 proc~cmp_degree nurbs_volume%cmp_degree proc~cmp_degree->proc~get_multiplicity proc~cmp_degree~2 nurbs_surface%cmp_degree proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_degree~3 nurbs_curve%cmp_degree proc~cmp_degree~3->proc~get_multiplicity~3 proc~cmp_elem nurbs_volume%cmp_elem proc~cmp_elem->proc~get_multiplicity proc~cmp_elem~2 nurbs_surface%cmp_elem proc~cmp_elem~2->proc~get_multiplicity~2 proc~cmp_elem~3 nurbs_curve%cmp_elem proc~cmp_elem~3->proc~get_multiplicity~3 proc~elevate_degree nurbs_volume%elevate_degree proc~elevate_degree->proc~elevate_degree_a_5_9 proc~elevate_degree->none~set proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->proc~elevate_degree_a_5_9 proc~elevate_degree~2->none~set~2 proc~elevate_degree~3 nurbs_curve%elevate_degree proc~elevate_degree~3->proc~elevate_degree_a_5_9 proc~elevate_degree~3->none~set~3 proc~set1 nurbs_volume%set1 proc~set1->proc~cmp_nc proc~set1->proc~cmp_degree proc~set1~2 nurbs_surface%set1 proc~set1~2->proc~cmp_nc~2 proc~set1~2->proc~cmp_degree~2 proc~set2 nurbs_volume%set2 proc~set2->proc~cmp_nc proc~set2~2 nurbs_surface%set2 proc~set2~2->proc~cmp_nc~2 program~example1_curve example1_curve program~example1_curve->proc~insert_knots~3 program~example1_curve->proc~remove_knots~3 program~example1_curve->proc~elevate_degree~3 program~example1_curve->none~set~3 program~example3_surface example3_surface program~example3_surface->proc~insert_knots~2 program~example3_surface->proc~remove_knots~2 program~example3_surface->proc~elevate_degree~2 program~example3_surface->none~set~2 program~example3_volume example3_volume program~example3_volume->proc~insert_knots program~example3_volume->proc~remove_knots program~example3_volume->proc~cmp_elem program~example3_volume->proc~elevate_degree program~example3_volume->none~set none~set->proc~set1 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 none~set~2->proc~set1~2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~ansatz nurbs_volume%ansatz proc~ansatz->proc~cmp_elem proc~ansatz->none~set proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~2->none~set~2 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->proc~cmp_elem~3 proc~ansatz~3->none~set~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~2 proc~cmp_area->proc~ansatz~2 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem~3 proc~cmp_length->proc~ansatz~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem proc~cmp_volume->proc~ansatz proc~set1a nurbs_curve%set1a proc~set1a->proc~cmp_degree~3 proc~set1~3 nurbs_curve%set1 proc~set1~3->proc~cmp_degree~3 proc~set3->proc~cmp_degree proc~set3~2->proc~cmp_degree~2 proc~set3~3 nurbs_curve%set3 proc~set3~3->proc~cmp_degree~3 none~set~3->proc~set1a none~set~3->proc~set1~3 none~set~3->proc~set3~3 proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~set proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~set proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~set~2 proc~set_c nurbs_volume%set_C proc~set_c->none~set proc~set_c~2 nurbs_surface%set_C proc~set_c~2->none~set~2 proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~2 proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~2 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~2 program~compute_area compute_area program~compute_area->none~set~2 program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_length->none~set~3 program~compute_volume compute_volume program~compute_volume->none~set program~compute_volume->proc~cmp_volume program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~set~3 proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set~3 proc~set_c~3 nurbs_curve%set_C proc~set_c~3->none~set~3 proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set~3 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 program~example_ppm3->proc~set_tetragon program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set~3 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c~3 program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_multiplicity2.html"},{"title":"dyad_t1_t1 – ForCAD","text":"private pure function dyad_t1_t1(a, b) result(c) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: a (:) real(kind=rk), intent(in), contiguous :: b (:) Return Value real(kind=rk), allocatable, (:,:) Called by proc~~dyad_t1_t1~~CalledByGraph proc~dyad_t1_t1 dyad_t1_t1 interface~dyad dyad interface~dyad->proc~dyad_t1_t1 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->interface~dyad proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/dyad_t1_t1.html"},{"title":"factln – ForCAD","text":"private pure function factln(n) result(f) Arguments Type Intent Optional Attributes Name integer, intent(in) :: n Return Value real(kind=rk) Called by proc~~factln~~CalledByGraph proc~factln factln proc~bincoeff bincoeff proc~bincoeff->proc~factln proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree_a_5_9->proc~bincoeff proc~elevate_degree nurbs_volume%elevate_degree proc~elevate_degree->proc~elevate_degree_a_5_9 proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->proc~elevate_degree_a_5_9 proc~elevate_degree~3 nurbs_curve%elevate_degree proc~elevate_degree~3->proc~elevate_degree_a_5_9 program~example1_curve example1_curve program~example1_curve->proc~elevate_degree~3 program~example3_surface example3_surface program~example3_surface->proc~elevate_degree~2 program~example3_volume example3_volume program~example3_volume->proc~elevate_degree Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/factln.html"},{"title":"isinf – ForCAD","text":"private pure elemental function isinf(x) result(output) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: x Return Value logical","tags":"","loc":"proc/isinf.html"},{"title":"isnan – ForCAD","text":"private pure elemental function isnan(x) result(output) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: x Return Value logical","tags":"","loc":"proc/isnan.html"},{"title":"repelem – ForCAD","text":"private pure function repelem(a, b) result(c) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: a (:) integer, intent(in), contiguous :: b (:) Return Value real(kind=rk), (sum(b)) Called by proc~~repelem~~CalledByGraph proc~repelem repelem proc~compute_knot_vector compute_knot_vector proc~compute_knot_vector->proc~repelem proc~set2 nurbs_volume%set2 proc~set2->proc~compute_knot_vector proc~set2~2 nurbs_surface%set2 proc~set2~2->proc~compute_knot_vector proc~set2~3 nurbs_curve%set2 proc~set2~3->proc~compute_knot_vector none~set nurbs_volume%set none~set->proc~set2 none~set~2 nurbs_surface%set none~set~2->proc~set2~2 none~set~3 nurbs_curve%set none~set~3->proc~set2~3 proc~ansatz nurbs_volume%ansatz proc~ansatz->none~set proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->none~set~2 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree nurbs_volume%elevate_degree proc~elevate_degree->none~set proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->none~set~2 proc~elevate_degree~3 nurbs_curve%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots nurbs_volume%insert_knots proc~insert_knots->none~set proc~insert_knots~2 nurbs_surface%insert_knots proc~insert_knots~2->none~set~2 proc~insert_knots~3 nurbs_curve%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~set proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~set proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~set~2 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots nurbs_volume%remove_knots proc~remove_knots->none~set proc~remove_knots~2 nurbs_surface%remove_knots proc~remove_knots~2->none~set~2 proc~remove_knots~3 nurbs_curve%remove_knots proc~remove_knots~3->none~set~3 proc~set_c nurbs_volume%set_C proc~set_c->none~set proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set~3 proc~set_c~2 nurbs_surface%set_C proc~set_c~2->none~set~2 proc~set_c~3 nurbs_curve%set_C proc~set_c~3->none~set~3 proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set~3 proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~2 proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~2 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~2 program~compute_area compute_area program~compute_area->none~set~2 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->none~set~3 proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->none~set proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume program~example1_curve example1_curve program~example1_curve->none~set~3 program~example1_curve->proc~elevate_degree~3 program~example1_curve->proc~insert_knots~3 program~example1_curve->proc~remove_knots~3 program~example3_surface example3_surface program~example3_surface->none~set~2 program~example3_surface->proc~elevate_degree~2 program~example3_surface->proc~insert_knots~2 program~example3_surface->proc~remove_knots~2 program~example3_volume example3_volume program~example3_volume->none~set program~example3_volume->proc~elevate_degree program~example3_volume->proc~insert_knots program~example3_volume->proc~remove_knots program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set proc~cmp_area->proc~ansatz~2 proc~cmp_length->proc~ansatz~3 proc~cmp_volume->proc~ansatz program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c~3 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/repelem.html"},{"title":"unique_integer – ForCAD","text":"private pure function unique_integer(vec) result(output) Arguments Type Intent Optional Attributes Name integer, intent(in), dimension(:), contiguous :: vec Return Value integer, dimension(:), allocatable Called by proc~~unique_integer~~CalledByGraph proc~unique_integer unique_integer interface~unique unique interface~unique->proc~unique_integer proc~ansatz nurbs_volume%ansatz proc~ansatz->interface~unique proc~cmp_elem nurbs_volume%cmp_elem proc~ansatz->proc~cmp_elem proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->interface~unique proc~cmp_elem~2 nurbs_surface%cmp_elem proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->interface~unique proc~cmp_elem~3 nurbs_curve%cmp_elem proc~ansatz~3->proc~cmp_elem~3 proc~cmp_elem->interface~unique proc~cmp_elem~2->interface~unique proc~cmp_elem~3->interface~unique proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 proc~cmp_area->proc~cmp_elem~2 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 proc~cmp_length->proc~cmp_elem~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz proc~cmp_volume->proc~cmp_elem program~example3_volume example3_volume program~example3_volume->proc~cmp_elem program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/unique_integer.html"},{"title":"unique_real – ForCAD","text":"private pure function unique_real(vec) result(output) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), dimension(:), contiguous :: vec Return Value real(kind=rk), dimension(:), allocatable Called by proc~~unique_real~~CalledByGraph proc~unique_real unique_real interface~unique unique interface~unique->proc~unique_real proc~ansatz nurbs_volume%ansatz proc~ansatz->interface~unique proc~cmp_elem nurbs_volume%cmp_elem proc~ansatz->proc~cmp_elem proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->interface~unique proc~cmp_elem~2 nurbs_surface%cmp_elem proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->interface~unique proc~cmp_elem~3 nurbs_curve%cmp_elem proc~ansatz~3->proc~cmp_elem~3 proc~cmp_elem->interface~unique proc~cmp_elem~2->interface~unique proc~cmp_elem~3->interface~unique proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 proc~cmp_area->proc~cmp_elem~2 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 proc~cmp_length->proc~cmp_elem~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz proc~cmp_volume->proc~cmp_elem program~example3_volume example3_volume program~example3_volume->proc~cmp_elem program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/unique_real.html"},{"title":"basis_bspline_2der – ForCAD","text":"public pure subroutine basis_bspline_2der(Xt, knot, nc, degree, d2B, dB, B) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: nc integer, intent(in) :: degree real(kind=rk), intent(out), allocatable :: d2B (:) real(kind=rk), intent(out), optional, allocatable :: dB (:) real(kind=rk), intent(out), optional, allocatable :: B (:) Called by proc~~basis_bspline_2der~~CalledByGraph proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_bspline_1d_scalar compute_d2Tgc_bspline_1d_scalar proc~compute_d2tgc_bspline_1d_scalar->proc~basis_bspline_2der proc~compute_d2tgc_bspline_1d_vector compute_d2Tgc_bspline_1d_vector proc~compute_d2tgc_bspline_1d_vector->proc~basis_bspline_2der proc~compute_d2tgc_bspline_2d_scalar compute_d2Tgc_bspline_2d_scalar proc~compute_d2tgc_bspline_2d_scalar->proc~basis_bspline_2der proc~compute_d2tgc_bspline_2d_vector compute_d2Tgc_bspline_2d_vector proc~compute_d2tgc_bspline_2d_vector->proc~basis_bspline_2der proc~compute_d2tgc_bspline_3d_scalar compute_d2Tgc_bspline_3d_scalar proc~compute_d2tgc_bspline_3d_scalar->proc~basis_bspline_2der proc~compute_d2tgc_bspline_3d_vector compute_d2Tgc_bspline_3d_vector proc~compute_d2tgc_bspline_3d_vector->proc~basis_bspline_2der proc~compute_d2tgc_nurbs_1d_scalar compute_d2Tgc_nurbs_1d_scalar proc~compute_d2tgc_nurbs_1d_scalar->proc~basis_bspline_2der proc~compute_d2tgc_nurbs_1d_vector compute_d2Tgc_nurbs_1d_vector proc~compute_d2tgc_nurbs_1d_vector->proc~basis_bspline_2der proc~compute_d2tgc_nurbs_2d_scalar compute_d2Tgc_nurbs_2d_scalar proc~compute_d2tgc_nurbs_2d_scalar->proc~basis_bspline_2der proc~compute_d2tgc_nurbs_2d_vector compute_d2Tgc_nurbs_2d_vector proc~compute_d2tgc_nurbs_2d_vector->proc~basis_bspline_2der proc~compute_d2tgc_nurbs_3d_scalar compute_d2Tgc_nurbs_3d_scalar proc~compute_d2tgc_nurbs_3d_scalar->proc~basis_bspline_2der proc~compute_d2tgc_nurbs_3d_vector compute_d2Tgc_nurbs_3d_vector proc~compute_d2tgc_nurbs_3d_vector->proc~basis_bspline_2der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_bspline_2der.html"},{"title":"basis_bspline_der – ForCAD","text":"public pure subroutine basis_bspline_der(Xt, knot, nc, degree, dB, B) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: nc integer, intent(in) :: degree real(kind=rk), intent(out), allocatable :: dB (:) real(kind=rk), intent(out), optional, allocatable :: B (:) Called by proc~~basis_bspline_der~~CalledByGraph proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_bspline_1d_scalar compute_dTgc_bspline_1d_scalar proc~compute_dtgc_bspline_1d_scalar->proc~basis_bspline_der proc~compute_dtgc_bspline_1d_vector compute_dTgc_bspline_1d_vector proc~compute_dtgc_bspline_1d_vector->proc~basis_bspline_der proc~compute_dtgc_bspline_2d_scalar compute_dTgc_bspline_2d_scalar proc~compute_dtgc_bspline_2d_scalar->proc~basis_bspline_der proc~compute_dtgc_bspline_2d_vector compute_dTgc_bspline_2d_vector proc~compute_dtgc_bspline_2d_vector->proc~basis_bspline_der proc~compute_dtgc_bspline_3d_scalar compute_dTgc_bspline_3d_scalar proc~compute_dtgc_bspline_3d_scalar->proc~basis_bspline_der proc~compute_dtgc_bspline_3d_vector compute_dTgc_bspline_3d_vector proc~compute_dtgc_bspline_3d_vector->proc~basis_bspline_der proc~compute_dtgc_nurbs_1d_scalar compute_dTgc_nurbs_1d_scalar proc~compute_dtgc_nurbs_1d_scalar->proc~basis_bspline_der proc~compute_dtgc_nurbs_1d_vector compute_dTgc_nurbs_1d_vector proc~compute_dtgc_nurbs_1d_vector->proc~basis_bspline_der proc~compute_dtgc_nurbs_2d_scalar compute_dTgc_nurbs_2d_scalar proc~compute_dtgc_nurbs_2d_scalar->proc~basis_bspline_der proc~compute_dtgc_nurbs_2d_vector compute_dTgc_nurbs_2d_vector proc~compute_dtgc_nurbs_2d_vector->proc~basis_bspline_der proc~compute_dtgc_nurbs_3d_scalar compute_dTgc_nurbs_3d_scalar proc~compute_dtgc_nurbs_3d_scalar->proc~basis_bspline_der proc~compute_dtgc_nurbs_3d_vector compute_dTgc_nurbs_3d_vector proc~compute_dtgc_nurbs_3d_vector->proc~basis_bspline_der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_bspline_der.html"},{"title":"elevate_degree_A_5_9 – ForCAD","text":"public pure subroutine elevate_degree_A_5_9(t, knot, degree, Xcw, nc_new, knot_new, Xcw_new) Arguments Type Intent Optional Attributes Name integer, intent(in) :: t real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree real(kind=rk), intent(in), contiguous :: Xcw (:,:) integer, intent(out) :: nc_new real(kind=rk), intent(out), allocatable :: knot_new (:) real(kind=rk), intent(out), allocatable :: Xcw_new (:,:) Calls proc~~elevate_degree_a_5_9~~CallsGraph proc~elevate_degree_a_5_9 elevate_degree_A_5_9 interface~compute_multiplicity compute_multiplicity proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~bincoeff bincoeff proc~elevate_degree_a_5_9->proc~bincoeff proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~factln factln proc~bincoeff->proc~factln Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~elevate_degree_a_5_9~~CalledByGraph proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree nurbs_volume%elevate_degree proc~elevate_degree->proc~elevate_degree_a_5_9 proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->proc~elevate_degree_a_5_9 proc~elevate_degree~3 nurbs_curve%elevate_degree proc~elevate_degree~3->proc~elevate_degree_a_5_9 program~example1_curve example1_curve program~example1_curve->proc~elevate_degree~3 program~example3_surface example3_surface program~example3_surface->proc~elevate_degree~2 program~example3_volume example3_volume program~example3_volume->proc~elevate_degree Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/elevate_degree_a_5_9.html"},{"title":"insert_knot_A_5_1 – ForCAD","text":"public pure subroutine insert_knot_A_5_1(p, UP, Pw, u, k, s, r, nq, UQ, Qw) Arguments Type Intent Optional Attributes Name integer, intent(in) :: p real(kind=rk), intent(in), contiguous :: UP (0:) real(kind=rk), intent(in), contiguous :: Pw (0:,:) real(kind=rk), intent(in) :: u integer, intent(in) :: k integer, intent(in) :: s integer, intent(in) :: r integer, intent(out) :: nq real(kind=rk), intent(out), allocatable :: UQ (:) real(kind=rk), intent(out), allocatable :: Qw (:,:) Called by proc~~insert_knot_a_5_1~~CalledByGraph proc~insert_knot_a_5_1 insert_knot_A_5_1 proc~insert_knots nurbs_volume%insert_knots proc~insert_knots->proc~insert_knot_a_5_1 proc~insert_knots~2 nurbs_surface%insert_knots proc~insert_knots~2->proc~insert_knot_a_5_1 proc~insert_knots~3 nurbs_curve%insert_knots proc~insert_knots~3->proc~insert_knot_a_5_1 program~example1_curve example1_curve program~example1_curve->proc~insert_knots~3 program~example3_surface example3_surface program~example3_surface->proc~insert_knots~2 program~example3_volume example3_volume program~example3_volume->proc~insert_knots Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/insert_knot_a_5_1.html"},{"title":"remove_knots_A_5_8 – ForCAD","text":"public pure subroutine remove_knots_A_5_8(p, knot, Pw, u, r, s, num, t, knot_new, Pw_new) Arguments Type Intent Optional Attributes Name integer, intent(in) :: p real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Pw (:,:) real(kind=rk), intent(in) :: u integer, intent(in) :: r integer, intent(in) :: s integer, intent(in) :: num integer, intent(out) :: t real(kind=rk), intent(out), allocatable :: knot_new (:) real(kind=rk), intent(out), allocatable :: Pw_new (:,:) Called by proc~~remove_knots_a_5_8~~CalledByGraph proc~remove_knots_a_5_8 remove_knots_A_5_8 proc~remove_knots nurbs_volume%remove_knots proc~remove_knots->proc~remove_knots_a_5_8 proc~remove_knots~2 nurbs_surface%remove_knots proc~remove_knots~2->proc~remove_knots_a_5_8 proc~remove_knots~3 nurbs_curve%remove_knots proc~remove_knots~3->proc~remove_knots_a_5_8 program~example1_curve example1_curve program~example1_curve->proc~remove_knots~3 program~example3_surface example3_surface program~example3_surface->proc~remove_knots~2 program~example3_volume example3_volume program~example3_volume->proc~remove_knots Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/remove_knots_a_5_8.html"},{"title":"cmp_elemConn_Cn_L – ForCAD","text":"private pure subroutine cmp_elemConn_Cn_L(nnode, p, Xth, vecKnot_mul, elemConn) Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode integer, intent(in) :: p real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: vecKnot_mul (:) integer, intent(out), allocatable :: elemConn (:,:) Called by proc~~cmp_elemconn_cn_l~~CalledByGraph proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn elemConn_Cn interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elem nurbs_volume%cmp_elem proc~cmp_elem->interface~elemconn_cn proc~cmp_elem~2 nurbs_surface%cmp_elem proc~cmp_elem~2->interface~elemconn_cn proc~cmp_elem~3 nurbs_curve%cmp_elem proc~cmp_elem~3->interface~elemconn_cn proc~ansatz nurbs_volume%ansatz proc~ansatz->proc~cmp_elem proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->proc~cmp_elem~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~2 proc~cmp_area->proc~ansatz~2 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem~3 proc~cmp_length->proc~ansatz~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem proc~cmp_volume->proc~ansatz program~example3_volume example3_volume program~example3_volume->proc~cmp_elem program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elemconn_cn_l.html"},{"title":"cmp_elemConn_Cn_S – ForCAD","text":"private pure subroutine cmp_elemConn_Cn_S(nnode1, nnode2, p1, p2, Xth1, Xth2, vecKnot_mul1, vecKnot_mul2, elemConn) Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: p1 integer, intent(in) :: p2 real(kind=rk), intent(in), contiguous :: Xth1 (:) real(kind=rk), intent(in), contiguous :: Xth2 (:) integer, intent(in), contiguous :: vecKnot_mul1 (:) integer, intent(in), contiguous :: vecKnot_mul2 (:) integer, intent(out), allocatable :: elemConn (:,:) Called by proc~~cmp_elemconn_cn_s~~CalledByGraph proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn elemConn_Cn interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elem nurbs_volume%cmp_elem proc~cmp_elem->interface~elemconn_cn proc~cmp_elem~2 nurbs_surface%cmp_elem proc~cmp_elem~2->interface~elemconn_cn proc~cmp_elem~3 nurbs_curve%cmp_elem proc~cmp_elem~3->interface~elemconn_cn proc~ansatz nurbs_volume%ansatz proc~ansatz->proc~cmp_elem proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->proc~cmp_elem~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~2 proc~cmp_area->proc~ansatz~2 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem~3 proc~cmp_length->proc~ansatz~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem proc~cmp_volume->proc~ansatz program~example3_volume example3_volume program~example3_volume->proc~cmp_elem program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elemconn_cn_s.html"},{"title":"cmp_elemConn_Cn_V – ForCAD","text":"private pure subroutine cmp_elemConn_Cn_V(nnode1, nnode2, nnode3, p1, p2, p3, Xth1, Xth2, Xth3, vecKnot_mul1, vecKnot_mul2, vecKnot_mul3, elemConn) Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: nnode3 integer, intent(in) :: p1 integer, intent(in) :: p2 integer, intent(in) :: p3 real(kind=rk), intent(in), contiguous :: Xth1 (:) real(kind=rk), intent(in), contiguous :: Xth2 (:) real(kind=rk), intent(in), contiguous :: Xth3 (:) integer, intent(in), contiguous :: vecKnot_mul1 (:) integer, intent(in), contiguous :: vecKnot_mul2 (:) integer, intent(in), contiguous :: vecKnot_mul3 (:) integer, intent(out), allocatable :: elemConn (:,:) Called by proc~~cmp_elemconn_cn_v~~CalledByGraph proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn elemConn_Cn interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~cmp_elem nurbs_volume%cmp_elem proc~cmp_elem->interface~elemconn_cn proc~cmp_elem~2 nurbs_surface%cmp_elem proc~cmp_elem~2->interface~elemconn_cn proc~cmp_elem~3 nurbs_curve%cmp_elem proc~cmp_elem~3->interface~elemconn_cn proc~ansatz nurbs_volume%ansatz proc~ansatz->proc~cmp_elem proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->proc~cmp_elem~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~2 proc~cmp_area->proc~ansatz~2 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem~3 proc~cmp_length->proc~ansatz~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem proc~cmp_volume->proc~ansatz program~example3_volume example3_volume program~example3_volume->proc~cmp_elem program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elemconn_cn_v.html"},{"title":"gauss_legendre_1D – ForCAD","text":"private pure subroutine gauss_legendre_1D(interval, degree, Xksi, Wksi) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval (2) integer, intent(in) :: degree real(kind=rk), intent(out), allocatable :: Xksi (:) real(kind=rk), intent(out), allocatable :: Wksi (:) Calls proc~~gauss_legendre_1d~~CallsGraph proc~gauss_legendre_1d gauss_legendre_1D gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~gauss_legendre_1d~~CalledByGraph proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg gauss_leg interface~gauss_leg->proc~gauss_legendre_1d proc~ansatz nurbs_volume%ansatz proc~ansatz->interface~gauss_leg proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->interface~gauss_leg proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->interface~gauss_leg proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/gauss_legendre_1d.html"},{"title":"gauss_legendre_2D – ForCAD","text":"private pure subroutine gauss_legendre_2D(interval1, interval2, degree, Xksi, Wksi) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval1 (2) real(kind=rk), intent(in) :: interval2 (2) integer, intent(in) :: degree (2) real(kind=rk), intent(out), allocatable :: Xksi (:,:) real(kind=rk), intent(out), allocatable :: Wksi (:) Calls proc~~gauss_legendre_2d~~CallsGraph proc~gauss_legendre_2d gauss_legendre_2D gauss_legendre gauss_legendre proc~gauss_legendre_2d->gauss_legendre interface~ndgrid ndgrid proc~gauss_legendre_2d->interface~ndgrid proc~kron kron proc~gauss_legendre_2d->proc~kron proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~gauss_legendre_2d~~CalledByGraph proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg gauss_leg interface~gauss_leg->proc~gauss_legendre_2d proc~ansatz nurbs_volume%ansatz proc~ansatz->interface~gauss_leg proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->interface~gauss_leg proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->interface~gauss_leg proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/gauss_legendre_2d.html"},{"title":"gauss_legendre_3D – ForCAD","text":"private pure subroutine gauss_legendre_3D(interval1, interval2, interval3, degree, Xksi, Wksi) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval1 (2) real(kind=rk), intent(in) :: interval2 (2) real(kind=rk), intent(in) :: interval3 (2) integer, intent(in) :: degree (3) real(kind=rk), intent(out), allocatable :: Xksi (:,:) real(kind=rk), intent(out), allocatable :: Wksi (:) Calls proc~~gauss_legendre_3d~~CallsGraph proc~gauss_legendre_3d gauss_legendre_3D gauss_legendre gauss_legendre proc~gauss_legendre_3d->gauss_legendre interface~ndgrid ndgrid proc~gauss_legendre_3d->interface~ndgrid proc~kron kron proc~gauss_legendre_3d->proc~kron proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~gauss_legendre_3d~~CalledByGraph proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg gauss_leg interface~gauss_leg->proc~gauss_legendre_3d proc~ansatz nurbs_volume%ansatz proc~ansatz->interface~gauss_leg proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->interface~gauss_leg proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->interface~gauss_leg proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/gauss_legendre_3d.html"},{"title":"ndgrid2 – ForCAD","text":"private pure subroutine ndgrid2(X_dir1, X_dir2, Xt) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: X_dir1 (:) real(kind=rk), intent(in), contiguous :: X_dir2 (:) real(kind=rk), intent(out), allocatable :: Xt (:,:) Called by proc~~ndgrid2~~CalledByGraph proc~ndgrid2 ndgrid2 interface~ndgrid ndgrid interface~ndgrid->proc~ndgrid2 proc~ansatz nurbs_volume%ansatz proc~ansatz->interface~ndgrid interface~gauss_leg gauss_leg proc~ansatz->interface~gauss_leg none~derivative nurbs_volume%derivative proc~ansatz->none~derivative proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->interface~ndgrid proc~ansatz~2->interface~gauss_leg none~derivative~2 nurbs_surface%derivative proc~ansatz~2->none~derivative~2 proc~basis_vector nurbs_volume%basis_vector proc~basis_vector->interface~ndgrid proc~basis_vector~2 nurbs_surface%basis_vector proc~basis_vector~2->interface~ndgrid proc~create nurbs_volume%create proc~create->interface~ndgrid proc~create~2 nurbs_surface%create proc~create~2->interface~ndgrid proc~derivative2_vector nurbs_volume%derivative2_vector proc~derivative2_vector->interface~ndgrid proc~derivative2_vector~2 nurbs_surface%derivative2_vector proc~derivative2_vector~2->interface~ndgrid proc~derivative_vector nurbs_volume%derivative_vector proc~derivative_vector->interface~ndgrid proc~derivative_vector~2 nurbs_surface%derivative_vector proc~derivative_vector~2->interface~ndgrid proc~gauss_legendre_2d gauss_legendre_2D proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_3d gauss_legendre_3D proc~gauss_legendre_3d->interface~ndgrid interface~gauss_leg->proc~gauss_legendre_2d interface~gauss_leg->proc~gauss_legendre_3d none~derivative->proc~derivative_vector none~derivative2 nurbs_volume%derivative2 none~derivative2->proc~derivative2_vector none~derivative2~2 nurbs_surface%derivative2 none~derivative2~2->proc~derivative2_vector~2 none~derivative~2->proc~derivative_vector~2 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz proc~nearest_point2 nurbs_volume%nearest_point2 proc~nearest_point2->proc~create proc~nearest_point2->none~derivative2 proc~nearest_point2~2 nurbs_surface%nearest_point2 proc~nearest_point2~2->proc~create~2 proc~nearest_point2~2->none~derivative2~2 program~example3_surface example3_surface program~example3_surface->proc~create~2 program~example3_volume example3_volume program~example3_volume->proc~create program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~create~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~create program~example_ppm1 example_ppm1 program~example_ppm1->proc~create~2 program~example_ppm2 example_ppm2 program~example_ppm2->proc~create~2 program~example_ppm3 example_ppm3 program~example_ppm3->proc~create~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~create~2 program~nearest_point_2d->proc~nearest_point2~2 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~create~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~create program~nearest_point_3d->proc~nearest_point2 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~create~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~create program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~create~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~create program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~create program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~create~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~create program~shape_tetragon shape_tetragon program~shape_tetragon->proc~create~2 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->interface~gauss_leg program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_volume compute_volume program~compute_volume->proc~cmp_volume proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/ndgrid2.html"},{"title":"ndgrid3 – ForCAD","text":"private pure subroutine ndgrid3(X_dir1, X_dir2, X_dir3, Xt) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: X_dir1 (:) real(kind=rk), intent(in), contiguous :: X_dir2 (:) real(kind=rk), intent(in), contiguous :: X_dir3 (:) real(kind=rk), intent(out), allocatable :: Xt (:,:) Called by proc~~ndgrid3~~CalledByGraph proc~ndgrid3 ndgrid3 interface~ndgrid ndgrid interface~ndgrid->proc~ndgrid3 proc~ansatz nurbs_volume%ansatz proc~ansatz->interface~ndgrid interface~gauss_leg gauss_leg proc~ansatz->interface~gauss_leg none~derivative nurbs_volume%derivative proc~ansatz->none~derivative proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->interface~ndgrid proc~ansatz~2->interface~gauss_leg none~derivative~2 nurbs_surface%derivative proc~ansatz~2->none~derivative~2 proc~basis_vector nurbs_volume%basis_vector proc~basis_vector->interface~ndgrid proc~basis_vector~2 nurbs_surface%basis_vector proc~basis_vector~2->interface~ndgrid proc~create nurbs_volume%create proc~create->interface~ndgrid proc~create~2 nurbs_surface%create proc~create~2->interface~ndgrid proc~derivative2_vector nurbs_volume%derivative2_vector proc~derivative2_vector->interface~ndgrid proc~derivative2_vector~2 nurbs_surface%derivative2_vector proc~derivative2_vector~2->interface~ndgrid proc~derivative_vector nurbs_volume%derivative_vector proc~derivative_vector->interface~ndgrid proc~derivative_vector~2 nurbs_surface%derivative_vector proc~derivative_vector~2->interface~ndgrid proc~gauss_legendre_2d gauss_legendre_2D proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_3d gauss_legendre_3D proc~gauss_legendre_3d->interface~ndgrid interface~gauss_leg->proc~gauss_legendre_2d interface~gauss_leg->proc~gauss_legendre_3d none~derivative->proc~derivative_vector none~derivative2 nurbs_volume%derivative2 none~derivative2->proc~derivative2_vector none~derivative2~2 nurbs_surface%derivative2 none~derivative2~2->proc~derivative2_vector~2 none~derivative~2->proc~derivative_vector~2 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz proc~nearest_point2 nurbs_volume%nearest_point2 proc~nearest_point2->proc~create proc~nearest_point2->none~derivative2 proc~nearest_point2~2 nurbs_surface%nearest_point2 proc~nearest_point2~2->proc~create~2 proc~nearest_point2~2->none~derivative2~2 program~example3_surface example3_surface program~example3_surface->proc~create~2 program~example3_volume example3_volume program~example3_volume->proc~create program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~create~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~create program~example_ppm1 example_ppm1 program~example_ppm1->proc~create~2 program~example_ppm2 example_ppm2 program~example_ppm2->proc~create~2 program~example_ppm3 example_ppm3 program~example_ppm3->proc~create~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~create~2 program~nearest_point_2d->proc~nearest_point2~2 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~create~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~create program~nearest_point_3d->proc~nearest_point2 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~create~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~create program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~create~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~create program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~create program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~create~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~create program~shape_tetragon shape_tetragon program~shape_tetragon->proc~create~2 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->interface~gauss_leg program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_volume compute_volume program~compute_volume->proc~cmp_volume proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/ndgrid3.html"},{"title":"compute_multiplicity – ForCAD","text":"public interface compute_multiplicity Calls interface~~compute_multiplicity~~CallsGraph interface~compute_multiplicity compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by interface~~compute_multiplicity~~CalledByGraph interface~compute_multiplicity compute_multiplicity proc~cmp_nc nurbs_volume%cmp_nc proc~cmp_nc->interface~compute_multiplicity proc~cmp_nc~2 nurbs_surface%cmp_nc proc~cmp_nc~2->interface~compute_multiplicity proc~cmp_nc~3 nurbs_curve%cmp_nc proc~cmp_nc~3->interface~compute_multiplicity proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~get_continuity nurbs_volume%get_continuity proc~get_continuity->interface~compute_multiplicity proc~get_continuity~2 nurbs_surface%get_continuity proc~get_continuity~2->interface~compute_multiplicity proc~get_continuity~3 nurbs_curve%get_continuity proc~get_continuity~3->interface~compute_multiplicity proc~get_multiplicity nurbs_volume%get_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~get_nc_dir nurbs_volume%get_nc_dir proc~get_nc_dir->interface~compute_multiplicity proc~get_nc_dir~2 nurbs_surface%get_nc_dir proc~get_nc_dir~2->interface~compute_multiplicity proc~insert_knots nurbs_volume%insert_knots proc~insert_knots->interface~compute_multiplicity none~set nurbs_volume%set proc~insert_knots->none~set proc~insert_knots~2 nurbs_surface%insert_knots proc~insert_knots~2->interface~compute_multiplicity none~set~2 nurbs_surface%set proc~insert_knots~2->none~set~2 proc~insert_knots~3 nurbs_curve%insert_knots proc~insert_knots~3->interface~compute_multiplicity none~set~3 nurbs_curve%set proc~insert_knots~3->none~set~3 proc~remove_knots nurbs_volume%remove_knots proc~remove_knots->interface~compute_multiplicity proc~remove_knots->none~set proc~remove_knots~2 nurbs_surface%remove_knots proc~remove_knots~2->interface~compute_multiplicity proc~remove_knots~2->none~set~2 proc~remove_knots~3 nurbs_curve%remove_knots proc~remove_knots~3->interface~compute_multiplicity proc~remove_knots~3->none~set~3 proc~cmp_degree nurbs_volume%cmp_degree proc~cmp_degree->proc~get_multiplicity proc~cmp_degree~2 nurbs_surface%cmp_degree proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_degree~3 nurbs_curve%cmp_degree proc~cmp_degree~3->proc~get_multiplicity~3 proc~cmp_elem nurbs_volume%cmp_elem proc~cmp_elem->proc~get_multiplicity proc~cmp_elem~2 nurbs_surface%cmp_elem proc~cmp_elem~2->proc~get_multiplicity~2 proc~cmp_elem~3 nurbs_curve%cmp_elem proc~cmp_elem~3->proc~get_multiplicity~3 proc~elevate_degree nurbs_volume%elevate_degree proc~elevate_degree->proc~elevate_degree_a_5_9 proc~elevate_degree->none~set proc~elevate_degree~2 nurbs_surface%elevate_degree proc~elevate_degree~2->proc~elevate_degree_a_5_9 proc~elevate_degree~2->none~set~2 proc~elevate_degree~3 nurbs_curve%elevate_degree proc~elevate_degree~3->proc~elevate_degree_a_5_9 proc~elevate_degree~3->none~set~3 proc~set1 nurbs_volume%set1 proc~set1->proc~cmp_nc proc~set1->proc~cmp_degree proc~set1~2 nurbs_surface%set1 proc~set1~2->proc~cmp_nc~2 proc~set1~2->proc~cmp_degree~2 proc~set2 nurbs_volume%set2 proc~set2->proc~cmp_nc proc~set2~2 nurbs_surface%set2 proc~set2~2->proc~cmp_nc~2 program~example1_curve example1_curve program~example1_curve->proc~insert_knots~3 program~example1_curve->proc~remove_knots~3 program~example1_curve->proc~elevate_degree~3 program~example1_curve->none~set~3 program~example3_surface example3_surface program~example3_surface->proc~insert_knots~2 program~example3_surface->proc~remove_knots~2 program~example3_surface->proc~elevate_degree~2 program~example3_surface->none~set~2 program~example3_volume example3_volume program~example3_volume->proc~insert_knots program~example3_volume->proc~remove_knots program~example3_volume->proc~cmp_elem program~example3_volume->proc~elevate_degree program~example3_volume->none~set none~set->proc~set1 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 none~set~2->proc~set1~2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~ansatz nurbs_volume%ansatz proc~ansatz->proc~cmp_elem proc~ansatz->none~set proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~2->none~set~2 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->proc~cmp_elem~3 proc~ansatz~3->none~set~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~2 proc~cmp_area->proc~ansatz~2 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem~3 proc~cmp_length->proc~ansatz~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem proc~cmp_volume->proc~ansatz proc~set1a nurbs_curve%set1a proc~set1a->proc~cmp_degree~3 proc~set1~3 nurbs_curve%set1 proc~set1~3->proc~cmp_degree~3 proc~set3->proc~cmp_degree proc~set3~2->proc~cmp_degree~2 proc~set3~3 nurbs_curve%set3 proc~set3~3->proc~cmp_degree~3 none~set~3->proc~set1a none~set~3->proc~set1~3 none~set~3->proc~set3~3 proc~modify_wc nurbs_volume%modify_Wc proc~modify_wc->none~set proc~modify_wc~2 nurbs_surface%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_xc nurbs_volume%modify_Xc proc~modify_xc->none~set proc~modify_xc~2 nurbs_surface%modify_Xc proc~modify_xc~2->none~set~2 proc~set_c nurbs_volume%set_C proc~set_c->none~set proc~set_c~2 nurbs_surface%set_C proc~set_c~2->none~set~2 proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~2 proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~2 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~2 program~compute_area compute_area program~compute_area->none~set~2 program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_length->none~set~3 program~compute_volume compute_volume program~compute_volume->none~set program~compute_volume->proc~cmp_volume program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~set~3 proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set~3 proc~set_c~3 nurbs_curve%set_C proc~set_c~3->none~set~3 proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set~3 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~2 program~example_ppm3->proc~set_tetragon program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set~3 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c~3 program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Module Procedures private pure function compute_multiplicity1 (knot) result(multiplicity) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: knot (:) Return Value integer, allocatable, (:) private pure function compute_multiplicity2 (knot, Xth) result(multiplicity) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in) :: Xth Return Value integer","tags":"","loc":"interface/compute_multiplicity.html"},{"title":"dyad – ForCAD","text":"public interface dyad Calls interface~~dyad~~CallsGraph interface~dyad dyad proc~dyad_t1_t1 dyad_t1_t1 interface~dyad->proc~dyad_t1_t1 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by interface~~dyad~~CalledByGraph interface~dyad dyad proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->interface~dyad proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Module Procedures private pure function dyad_t1_t1 (a, b) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: a (:) real(kind=rk), intent(in), contiguous :: b (:) Return Value real(kind=rk), allocatable, (:,:)","tags":"","loc":"interface/dyad.html"},{"title":"elemConn_C0 – ForCAD","text":"public interface elemConn_C0 Calls interface~~elemconn_c0~~CallsGraph interface~elemconn_c0 elemConn_C0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by interface~~elemconn_c0~~CalledByGraph interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis nurbs_volume%cmp_elem_Xc_vis proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xc_vis~2 nurbs_surface%cmp_elem_Xc_vis proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xc_vis~3 nurbs_curve%cmp_elem_Xc_vis proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis nurbs_volume%cmp_elem_Xg_vis proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis~2 nurbs_surface%cmp_elem_Xg_vis proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~3 nurbs_curve%cmp_elem_Xg_vis proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~export_xc nurbs_volume%export_Xc proc~export_xc->proc~cmp_elem_xc_vis proc~export_xc~2 nurbs_surface%export_Xc proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~export_xc~3 nurbs_curve%export_Xc proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~export_xg nurbs_volume%export_Xg proc~export_xg->proc~cmp_elem_xg_vis proc~export_xg~2 nurbs_surface%export_Xg proc~export_xg~2->proc~cmp_elem_xg_vis~2 proc~export_xg~3 nurbs_curve%export_Xg proc~export_xg~3->proc~cmp_elem_xg_vis~3 program~example1_curve example1_curve program~example1_curve->proc~export_xc~3 program~example1_curve->proc~export_xg~3 program~example3_surface example3_surface program~example3_surface->proc~export_xc~2 program~example3_surface->proc~export_xg~2 program~example3_volume example3_volume program~example3_volume->proc~export_xc program~example3_volume->proc~export_xg program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~export_xc~3 program~example_nurbs_curve->proc~export_xg~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~export_xc~2 program~example_nurbs_surface->proc~export_xg~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~export_xc program~example_nurbs_volume->proc~export_xg program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~export_xc program~example_put_to_nurbs->proc~export_xg program~shape_c_1d shape_C_1d program~shape_c_1d->proc~export_xc~3 program~shape_c_1d->proc~export_xg~3 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~export_xc~2 program~shape_c_2d->proc~export_xg~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~export_xc program~shape_c_3d->proc~export_xg program~shape_circle shape_circle program~shape_circle->proc~export_xc~3 program~shape_circle->proc~export_xg~3 program~shape_half_circle shape_half_circle program~shape_half_circle->proc~export_xc~3 program~shape_half_circle->proc~export_xg~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~export_xc~2 program~shape_half_ring_2d->proc~export_xg~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~export_xc program~shape_half_ring_3d->proc~export_xg program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~export_xc program~shape_hexahedron->proc~export_xg program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~export_xc~2 program~shape_ring_2d->proc~export_xg~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~export_xc program~shape_ring_3d->proc~export_xg program~shape_tetragon shape_tetragon program~shape_tetragon->proc~export_xc~2 program~shape_tetragon->proc~export_xg~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Module Procedures private pure function cmp_elemConn_C0_L (nnode, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode integer, intent(in) :: p Return Value integer, allocatable, (:,:) private pure function cmp_elemConn_C0_S (nnode1, nnode2, p1, p2) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: p1 integer, intent(in) :: p2 Return Value integer, allocatable, (:,:) private pure function cmp_elemConn_C0_V (nnode1, nnode2, nnode3, p1, p2, p3) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: nnode3 integer, intent(in) :: p1 integer, intent(in) :: p2 integer, intent(in) :: p3 Return Value integer, allocatable, (:,:)","tags":"","loc":"interface/elemconn_c0.html"},{"title":"elemConn_Cn – ForCAD","text":"public interface elemConn_Cn Calls interface~~elemconn_cn~~CallsGraph interface~elemconn_cn elemConn_Cn proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by interface~~elemconn_cn~~CalledByGraph interface~elemconn_cn elemConn_Cn proc~cmp_elem nurbs_volume%cmp_elem proc~cmp_elem->interface~elemconn_cn proc~cmp_elem~2 nurbs_surface%cmp_elem proc~cmp_elem~2->interface~elemconn_cn proc~cmp_elem~3 nurbs_curve%cmp_elem proc~cmp_elem~3->interface~elemconn_cn proc~ansatz nurbs_volume%ansatz proc~ansatz->proc~cmp_elem proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->proc~cmp_elem~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~2 proc~cmp_area->proc~ansatz~2 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem~3 proc~cmp_length->proc~ansatz~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem proc~cmp_volume->proc~ansatz program~example3_volume example3_volume program~example3_volume->proc~cmp_elem program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Module Procedures private pure subroutine cmp_elemConn_Cn_L (nnode, p, Xth, vecKnot_mul, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode integer, intent(in) :: p real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: vecKnot_mul (:) integer, intent(out), allocatable :: elemConn (:,:) private pure subroutine cmp_elemConn_Cn_S (nnode1, nnode2, p1, p2, Xth1, Xth2, vecKnot_mul1, vecKnot_mul2, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: p1 integer, intent(in) :: p2 real(kind=rk), intent(in), contiguous :: Xth1 (:) real(kind=rk), intent(in), contiguous :: Xth2 (:) integer, intent(in), contiguous :: vecKnot_mul1 (:) integer, intent(in), contiguous :: vecKnot_mul2 (:) integer, intent(out), allocatable :: elemConn (:,:) private pure subroutine cmp_elemConn_Cn_V (nnode1, nnode2, nnode3, p1, p2, p3, Xth1, Xth2, Xth3, vecKnot_mul1, vecKnot_mul2, vecKnot_mul3, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: nnode3 integer, intent(in) :: p1 integer, intent(in) :: p2 integer, intent(in) :: p3 real(kind=rk), intent(in), contiguous :: Xth1 (:) real(kind=rk), intent(in), contiguous :: Xth2 (:) real(kind=rk), intent(in), contiguous :: Xth3 (:) integer, intent(in), contiguous :: vecKnot_mul1 (:) integer, intent(in), contiguous :: vecKnot_mul2 (:) integer, intent(in), contiguous :: vecKnot_mul3 (:) integer, intent(out), allocatable :: elemConn (:,:)","tags":"","loc":"interface/elemconn_cn.html"},{"title":"gauss_leg – ForCAD","text":"public interface gauss_leg Calls interface~~gauss_leg~~CallsGraph interface~gauss_leg gauss_leg proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->gauss_legendre interface~ndgrid ndgrid proc~gauss_legendre_2d->interface~ndgrid proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->proc~kron proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by interface~~gauss_leg~~CalledByGraph interface~gauss_leg gauss_leg proc~ansatz nurbs_volume%ansatz proc~ansatz->interface~gauss_leg proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->interface~gauss_leg proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->interface~gauss_leg proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Module Procedures private pure subroutine gauss_legendre_1D (interval, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval (2) integer, intent(in) :: degree real(kind=rk), intent(out), allocatable :: Xksi (:) real(kind=rk), intent(out), allocatable :: Wksi (:) private pure subroutine gauss_legendre_2D (interval1, interval2, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval1 (2) real(kind=rk), intent(in) :: interval2 (2) integer, intent(in) :: degree (2) real(kind=rk), intent(out), allocatable :: Xksi (:,:) real(kind=rk), intent(out), allocatable :: Wksi (:) private pure subroutine gauss_legendre_3D (interval1, interval2, interval3, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval1 (2) real(kind=rk), intent(in) :: interval2 (2) real(kind=rk), intent(in) :: interval3 (2) integer, intent(in) :: degree (3) real(kind=rk), intent(out), allocatable :: Xksi (:,:) real(kind=rk), intent(out), allocatable :: Wksi (:)","tags":"","loc":"interface/gauss_leg.html"},{"title":"ndgrid – ForCAD","text":"public interface ndgrid Calls interface~~ndgrid~~CallsGraph interface~ndgrid ndgrid proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by interface~~ndgrid~~CalledByGraph interface~ndgrid ndgrid proc~ansatz nurbs_volume%ansatz proc~ansatz->interface~ndgrid interface~gauss_leg gauss_leg proc~ansatz->interface~gauss_leg none~derivative nurbs_volume%derivative proc~ansatz->none~derivative proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->interface~ndgrid proc~ansatz~2->interface~gauss_leg none~derivative~2 nurbs_surface%derivative proc~ansatz~2->none~derivative~2 proc~basis_vector nurbs_volume%basis_vector proc~basis_vector->interface~ndgrid proc~basis_vector~2 nurbs_surface%basis_vector proc~basis_vector~2->interface~ndgrid proc~create nurbs_volume%create proc~create->interface~ndgrid proc~create~2 nurbs_surface%create proc~create~2->interface~ndgrid proc~derivative2_vector nurbs_volume%derivative2_vector proc~derivative2_vector->interface~ndgrid proc~derivative2_vector~2 nurbs_surface%derivative2_vector proc~derivative2_vector~2->interface~ndgrid proc~derivative_vector nurbs_volume%derivative_vector proc~derivative_vector->interface~ndgrid proc~derivative_vector~2 nurbs_surface%derivative_vector proc~derivative_vector~2->interface~ndgrid proc~gauss_legendre_2d gauss_legendre_2D proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_3d gauss_legendre_3D proc~gauss_legendre_3d->interface~ndgrid interface~gauss_leg->proc~gauss_legendre_2d interface~gauss_leg->proc~gauss_legendre_3d none~derivative->proc~derivative_vector none~derivative2 nurbs_volume%derivative2 none~derivative2->proc~derivative2_vector none~derivative2~2 nurbs_surface%derivative2 none~derivative2~2->proc~derivative2_vector~2 none~derivative~2->proc~derivative_vector~2 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz proc~nearest_point2 nurbs_volume%nearest_point2 proc~nearest_point2->proc~create proc~nearest_point2->none~derivative2 proc~nearest_point2~2 nurbs_surface%nearest_point2 proc~nearest_point2~2->proc~create~2 proc~nearest_point2~2->none~derivative2~2 program~example3_surface example3_surface program~example3_surface->proc~create~2 program~example3_volume example3_volume program~example3_volume->proc~create program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~create~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~create program~example_ppm1 example_ppm1 program~example_ppm1->proc~create~2 program~example_ppm2 example_ppm2 program~example_ppm2->proc~create~2 program~example_ppm3 example_ppm3 program~example_ppm3->proc~create~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~create~2 program~nearest_point_2d->proc~nearest_point2~2 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~create~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~create program~nearest_point_3d->proc~nearest_point2 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~create~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~create program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~create~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~create program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~create program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~create~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~create program~shape_tetragon shape_tetragon program~shape_tetragon->proc~create~2 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->interface~gauss_leg program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_volume compute_volume program~compute_volume->proc~cmp_volume proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Module Procedures private pure subroutine ndgrid2 (X_dir1, X_dir2, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: X_dir1 (:) real(kind=rk), intent(in), contiguous :: X_dir2 (:) real(kind=rk), intent(out), allocatable :: Xt (:,:) private pure subroutine ndgrid3 (X_dir1, X_dir2, X_dir3, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: X_dir1 (:) real(kind=rk), intent(in), contiguous :: X_dir2 (:) real(kind=rk), intent(in), contiguous :: X_dir3 (:) real(kind=rk), intent(out), allocatable :: Xt (:,:)","tags":"","loc":"interface/ndgrid.html"},{"title":"unique – ForCAD","text":"public interface unique Calls interface~~unique~~CallsGraph interface~unique unique proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by interface~~unique~~CalledByGraph interface~unique unique proc~ansatz nurbs_volume%ansatz proc~ansatz->interface~unique proc~cmp_elem nurbs_volume%cmp_elem proc~ansatz->proc~cmp_elem proc~ansatz~2 nurbs_surface%ansatz proc~ansatz~2->interface~unique proc~cmp_elem~2 nurbs_surface%cmp_elem proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->interface~unique proc~cmp_elem~3 nurbs_curve%cmp_elem proc~ansatz~3->proc~cmp_elem~3 proc~cmp_elem->interface~unique proc~cmp_elem~2->interface~unique proc~cmp_elem~3->interface~unique proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~2 proc~cmp_area->proc~cmp_elem~2 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 proc~cmp_length->proc~cmp_elem~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz proc~cmp_volume->proc~cmp_elem program~example3_volume example3_volume program~example3_volume->proc~cmp_elem program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Module Procedures private pure function unique_integer (vec) result(output) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in), dimension(:), contiguous :: vec Return Value integer, dimension(:), allocatable private pure function unique_real (vec) result(output) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), dimension(:), contiguous :: vec Return Value real(kind=rk), dimension(:), allocatable","tags":"","loc":"interface/unique.html"},{"title":"cmp_Xg – ForCAD","text":"private pure function cmp_Xg(this, Xt) result(Xg) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this real(kind=rk), intent(in) :: Xt Return Value real(kind=rk), allocatable, (:) Calls proc~~cmp_xg~3~~CallsGraph proc~cmp_xg~3 nurbs_curve%cmp_Xg interface~compute_xg~3 compute_Xg proc~cmp_xg~3->interface~compute_xg~3 proc~is_rational~3 nurbs_curve%is_rational proc~cmp_xg~3->proc~is_rational~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_xg~3~~CalledByGraph proc~cmp_xg~3 nurbs_curve%cmp_Xg proc~nearest_point2~3 nurbs_curve%nearest_point2 proc~nearest_point2~3->proc~cmp_xg~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~nearest_point2~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_xg~3.html"},{"title":"cmp_elem – ForCAD","text":"private pure function cmp_elem(this) result(elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem~3~~CallsGraph proc~cmp_elem~3 nurbs_curve%cmp_elem interface~elemconn_cn elemConn_Cn proc~cmp_elem~3->interface~elemconn_cn interface~unique unique proc~cmp_elem~3->interface~unique proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_elem~3->proc~get_multiplicity~3 proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem~3~~CalledByGraph proc~cmp_elem~3 nurbs_curve%cmp_elem proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->proc~cmp_elem~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem~3 proc~cmp_length->proc~ansatz~3 program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem~3.html"},{"title":"cmp_elem_Xc_vis – ForCAD","text":"private pure function cmp_elem_Xc_vis(this, p) result(elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in), optional :: p Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem_xc_vis~3~~CallsGraph proc~cmp_elem_xc_vis~3 nurbs_curve%cmp_elem_Xc_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem_xc_vis~3~~CalledByGraph proc~cmp_elem_xc_vis~3 nurbs_curve%cmp_elem_Xc_vis proc~export_xc~3 nurbs_curve%export_Xc proc~export_xc~3->proc~cmp_elem_xc_vis~3 program~example1_curve example1_curve program~example1_curve->proc~export_xc~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~export_xc~3 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~export_xc~3 program~shape_circle shape_circle program~shape_circle->proc~export_xc~3 program~shape_half_circle shape_half_circle program~shape_half_circle->proc~export_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem_xc_vis~3.html"},{"title":"cmp_elem_Xg_vis – ForCAD","text":"private pure function cmp_elem_Xg_vis(this, p) result(elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in), optional :: p Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem_xg_vis~3~~CallsGraph proc~cmp_elem_xg_vis~3 nurbs_curve%cmp_elem_Xg_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem_xg_vis~3~~CalledByGraph proc~cmp_elem_xg_vis~3 nurbs_curve%cmp_elem_Xg_vis proc~export_xg~3 nurbs_curve%export_Xg proc~export_xg~3->proc~cmp_elem_xg_vis~3 program~example1_curve example1_curve program~example1_curve->proc~export_xg~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~export_xg~3 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~export_xg~3 program~shape_circle shape_circle program~shape_circle->proc~export_xg~3 program~shape_half_circle shape_half_circle program~shape_half_circle->proc~export_xg~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem_xg_vis~3.html"},{"title":"get_Wc_all – ForCAD","text":"private pure function get_Wc_all(this) result(Wc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) Called by proc~~get_wc_all~3~~CalledByGraph proc~get_wc_all~3 nurbs_curve%get_Wc_all none~get_wc~3 nurbs_curve%get_Wc none~get_wc~3->proc~get_wc_all~3 proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~get_wc~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~get_wc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_wc_all~3.html"},{"title":"get_Wci – ForCAD","text":"private pure function get_Wci(this, n) result(Wc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) Called by proc~~get_wci~3~~CalledByGraph proc~get_wci~3 nurbs_curve%get_Wci none~get_wc~3 nurbs_curve%get_Wc none~get_wc~3->proc~get_wci~3 proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~get_wc~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~get_wc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_wci~3.html"},{"title":"get_Xc_all – ForCAD","text":"private pure function get_Xc_all(this) result(Xc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) Called by proc~~get_xc_all~3~~CalledByGraph proc~get_xc_all~3 nurbs_curve%get_Xc_all none~get_xc~3 nurbs_curve%get_Xc none~get_xc~3->proc~get_xc_all~3 proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~get_xc~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~get_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xc_all~3.html"},{"title":"get_Xci – ForCAD","text":"private pure function get_Xci(this, n) result(Xc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) Called by proc~~get_xci~3~~CalledByGraph proc~get_xci~3 nurbs_curve%get_Xci none~get_xc~3 nurbs_curve%get_Xc none~get_xc~3->proc~get_xci~3 proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~get_xc~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~get_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xci~3.html"},{"title":"get_Xcid – ForCAD","text":"private pure function get_Xcid(this, n, dir) result(Xc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) Called by proc~~get_xcid~3~~CalledByGraph proc~get_xcid~3 nurbs_curve%get_Xcid none~get_xc~3 nurbs_curve%get_Xc none~get_xc~3->proc~get_xcid~3 proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~get_xc~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~get_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xcid~3.html"},{"title":"get_Xg_all – ForCAD","text":"private pure function get_Xg_all(this) result(Xg) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:)","tags":"","loc":"proc/get_xg_all~3.html"},{"title":"get_Xgi – ForCAD","text":"private pure function get_Xgi(this, n) result(Xg) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/get_xgi~3.html"},{"title":"get_Xgid – ForCAD","text":"private pure function get_Xgid(this, n, dir) result(Xg) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk)","tags":"","loc":"proc/get_xgid~3.html"},{"title":"get_Xt – ForCAD","text":"private pure function get_Xt(this) result(Xt) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/get_xt~3.html"},{"title":"get_continuity – ForCAD","text":"private pure function get_continuity(this) result(c) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:) Calls proc~~get_continuity~3~~CallsGraph proc~get_continuity~3 nurbs_curve%get_continuity interface~compute_multiplicity compute_multiplicity proc~get_continuity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_continuity~3.html"},{"title":"get_degree – ForCAD","text":"private pure function get_degree(this) result(degree) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer Called by proc~~get_degree~~CalledByGraph proc~get_degree nurbs_curve%get_degree program~example1_curve example1_curve program~example1_curve->proc~get_degree Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_degree.html"},{"title":"get_elem – ForCAD","text":"private pure function get_elem(this) result(elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem~3.html"},{"title":"get_elem_Xc_vis – ForCAD","text":"private pure function get_elem_Xc_vis(this) result(elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem_xc_vis~3.html"},{"title":"get_elem_Xg_vis – ForCAD","text":"private pure function get_elem_Xg_vis(this) result(elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem_xg_vis~3.html"},{"title":"get_knot_all – ForCAD","text":"private pure function get_knot_all(this) result(knot) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) Called by proc~~get_knot_all~3~~CalledByGraph proc~get_knot_all~3 nurbs_curve%get_knot_all none~get_knot~3 nurbs_curve%get_knot none~get_knot~3->proc~get_knot_all~3 proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~get_knot~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~get_knot~3 program~example1_curve example1_curve program~example1_curve->none~get_knot~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_knot_all~3.html"},{"title":"get_knoti – ForCAD","text":"private pure function get_knoti(this, i) result(knot) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: i Return Value real(kind=rk) Called by proc~~get_knoti~3~~CalledByGraph proc~get_knoti~3 nurbs_curve%get_knoti none~get_knot~3 nurbs_curve%get_knot none~get_knot~3->proc~get_knoti~3 proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~get_knot~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~get_knot~3 program~example1_curve example1_curve program~example1_curve->none~get_knot~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_knoti~3.html"},{"title":"get_multiplicity – ForCAD","text":"private pure function get_multiplicity(this) result(m) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:) Calls proc~~get_multiplicity~3~~CallsGraph proc~get_multiplicity~3 nurbs_curve%get_multiplicity interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~get_multiplicity~3~~CalledByGraph proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3 nurbs_curve%cmp_degree proc~cmp_degree~3->proc~get_multiplicity~3 proc~cmp_elem~3 nurbs_curve%cmp_elem proc~cmp_elem~3->proc~get_multiplicity~3 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->proc~cmp_elem~3 none~set~3 nurbs_curve%set proc~ansatz~3->none~set~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem~3 proc~cmp_length->proc~ansatz~3 proc~set1a nurbs_curve%set1a proc~set1a->proc~cmp_degree~3 proc~set1~3 nurbs_curve%set1 proc~set1~3->proc~cmp_degree~3 proc~set3~3 nurbs_curve%set3 proc~set3~3->proc~cmp_degree~3 none~set~3->proc~set1a none~set~3->proc~set1~3 none~set~3->proc~set3~3 program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_length->none~set~3 proc~elevate_degree~3 nurbs_curve%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots~3 nurbs_curve%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots~3 nurbs_curve%remove_knots proc~remove_knots~3->none~set~3 proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set~3 proc~set_c~3 nurbs_curve%set_C proc~set_c~3->none~set~3 proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set~3 program~example1_curve example1_curve program~example1_curve->none~set~3 program~example1_curve->proc~elevate_degree~3 program~example1_curve->proc~insert_knots~3 program~example1_curve->proc~remove_knots~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set~3 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c~3 program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_multiplicity~3.html"},{"title":"get_nc – ForCAD","text":"private pure function get_nc(this) result(nc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer","tags":"","loc":"proc/get_nc.html"},{"title":"get_ng – ForCAD","text":"private pure function get_ng(this) result(ng) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer","tags":"","loc":"proc/get_ng~3.html"},{"title":"is_rational – ForCAD","text":"private pure function is_rational(this) result(r) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value logical Called by proc~~is_rational~3~~CalledByGraph proc~is_rational~3 nurbs_curve%is_rational proc~basis_scalar~3 nurbs_curve%basis_scalar proc~basis_scalar~3->proc~is_rational~3 proc~basis_vector~3 nurbs_curve%basis_vector proc~basis_vector~3->proc~is_rational~3 proc~cmp_xg~3 nurbs_curve%cmp_Xg proc~cmp_xg~3->proc~is_rational~3 proc~create~3 nurbs_curve%create proc~create~3->proc~is_rational~3 proc~derivative2_scalar~3 nurbs_curve%derivative2_scalar proc~derivative2_scalar~3->proc~is_rational~3 proc~derivative2_vector~3 nurbs_curve%derivative2_vector proc~derivative2_vector~3->proc~is_rational~3 proc~derivative_scalar~3 nurbs_curve%derivative_scalar proc~derivative_scalar~3->proc~is_rational~3 proc~derivative_vector~3 nurbs_curve%derivative_vector proc~derivative_vector~3->proc~is_rational~3 proc~elevate_degree~3 nurbs_curve%elevate_degree proc~elevate_degree~3->proc~is_rational~3 proc~insert_knots~3 nurbs_curve%insert_knots proc~insert_knots~3->proc~is_rational~3 proc~remove_knots~3 nurbs_curve%remove_knots proc~remove_knots~3->proc~is_rational~3 none~derivative2~3 nurbs_curve%derivative2 none~derivative2~3->proc~derivative2_scalar~3 none~derivative2~3->proc~derivative2_vector~3 none~derivative~3 nurbs_curve%derivative none~derivative~3->proc~derivative_scalar~3 none~derivative~3->proc~derivative_vector~3 proc~nearest_point2~3 nurbs_curve%nearest_point2 proc~nearest_point2~3->proc~cmp_xg~3 proc~nearest_point2~3->proc~create~3 proc~nearest_point2~3->none~derivative2~3 program~example1_curve example1_curve program~example1_curve->proc~create~3 program~example1_curve->proc~elevate_degree~3 program~example1_curve->proc~insert_knots~3 program~example1_curve->proc~remove_knots~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~create~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~create~3 program~nearest_point_1d->proc~nearest_point2~3 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~create~3 program~shape_circle shape_circle program~shape_circle->proc~create~3 program~shape_half_circle shape_half_circle program~shape_half_circle->proc~create~3 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->none~derivative~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/is_rational~3.html"},{"title":"ansatz – ForCAD","text":"private pure subroutine ansatz(this, ie, ig, Tgc, dTgc_dXg, dL) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dL Calls proc~~ansatz~3~~CallsGraph proc~ansatz~3 nurbs_curve%ansatz interface~dyad dyad proc~ansatz~3->interface~dyad interface~gauss_leg gauss_leg proc~ansatz~3->interface~gauss_leg interface~unique unique proc~ansatz~3->interface~unique none~derivative~3 nurbs_curve%derivative proc~ansatz~3->none~derivative~3 none~set~3 nurbs_curve%set proc~ansatz~3->none~set~3 proc~cmp_elem~3 nurbs_curve%cmp_elem proc~ansatz~3->proc~cmp_elem~3 proc~dyad_t1_t1 dyad_t1_t1 interface~dyad->proc~dyad_t1_t1 proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar~3 nurbs_curve%derivative_scalar none~derivative~3->proc~derivative_scalar~3 proc~derivative_vector~3 nurbs_curve%derivative_vector none~derivative~3->proc~derivative_vector~3 proc~set1a nurbs_curve%set1a none~set~3->proc~set1a proc~set1~3 nurbs_curve%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_curve%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_curve%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_curve%set4 none~set~3->proc~set4~3 proc~cmp_elem~3->interface~unique interface~elemconn_cn elemConn_Cn proc~cmp_elem~3->interface~elemconn_cn proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_elem~3->proc~get_multiplicity~3 proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v interface~compute_dtgc~3 compute_dTgc proc~derivative_scalar~3->interface~compute_dtgc~3 proc~is_rational~3 nurbs_curve%is_rational proc~derivative_scalar~3->proc~is_rational~3 proc~derivative_vector~3->interface~compute_dtgc~3 proc~derivative_vector~3->proc~is_rational~3 gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->gauss_legendre interface~ndgrid ndgrid proc~gauss_legendre_2d->interface~ndgrid proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->proc~kron interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~set1~3->proc~cmp_degree~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~cmp_degree~3->proc~get_multiplicity~3 proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~ansatz~3~~CalledByGraph proc~ansatz~3 nurbs_curve%ansatz proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/ansatz~3.html"},{"title":"basis_scalar – ForCAD","text":"private pure subroutine basis_scalar(this, Xt, Tgc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~basis_scalar~3~~CallsGraph proc~basis_scalar~3 nurbs_curve%basis_scalar interface~compute_tgc~3 compute_Tgc proc~basis_scalar~3->interface~compute_tgc~3 proc~is_rational~3 nurbs_curve%is_rational proc~basis_scalar~3->proc~is_rational~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_scalar~3.html"},{"title":"basis_vector – ForCAD","text":"private pure subroutine basis_vector(this, res, Xt, Tgc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~basis_vector~3~~CallsGraph proc~basis_vector~3 nurbs_curve%basis_vector interface~compute_tgc~3 compute_Tgc proc~basis_vector~3->interface~compute_tgc~3 proc~is_rational~3 nurbs_curve%is_rational proc~basis_vector~3->proc~is_rational~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_vector~3.html"},{"title":"cmp_degree – ForCAD","text":"private pure subroutine cmp_degree(this) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this Calls proc~~cmp_degree~3~~CallsGraph proc~cmp_degree~3 nurbs_curve%cmp_degree proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_degree~3~~CalledByGraph proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a nurbs_curve%set1a proc~set1a->proc~cmp_degree~3 proc~set1~3 nurbs_curve%set1 proc~set1~3->proc~cmp_degree~3 proc~set3~3 nurbs_curve%set3 proc~set3~3->proc~cmp_degree~3 none~set~3 nurbs_curve%set none~set~3->proc~set1a none~set~3->proc~set1~3 none~set~3->proc~set3~3 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree~3 nurbs_curve%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots~3 nurbs_curve%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots~3 nurbs_curve%remove_knots proc~remove_knots~3->none~set~3 proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set~3 proc~set_c~3 nurbs_curve%set_C proc~set_c~3->none~set~3 proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set~3 program~compute_length compute_length program~compute_length->none~set~3 proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length program~example1_curve example1_curve program~example1_curve->none~set~3 program~example1_curve->proc~elevate_degree~3 program~example1_curve->proc~insert_knots~3 program~example1_curve->proc~remove_knots~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set~3 proc~cmp_length->proc~ansatz~3 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c~3 program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_degree~3.html"},{"title":"cmp_length – ForCAD","text":"private pure subroutine cmp_length(this, length) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(out) :: length Calls proc~~cmp_length~~CallsGraph proc~cmp_length nurbs_curve%cmp_length proc~ansatz~3 nurbs_curve%ansatz proc~cmp_length->proc~ansatz~3 proc~cmp_elem~3 nurbs_curve%cmp_elem proc~cmp_length->proc~cmp_elem~3 proc~ansatz~3->proc~cmp_elem~3 interface~dyad dyad proc~ansatz~3->interface~dyad interface~gauss_leg gauss_leg proc~ansatz~3->interface~gauss_leg interface~unique unique proc~ansatz~3->interface~unique none~derivative~3 nurbs_curve%derivative proc~ansatz~3->none~derivative~3 none~set~3 nurbs_curve%set proc~ansatz~3->none~set~3 interface~elemconn_cn elemConn_Cn proc~cmp_elem~3->interface~elemconn_cn proc~cmp_elem~3->interface~unique proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_elem~3->proc~get_multiplicity~3 proc~dyad_t1_t1 dyad_t1_t1 interface~dyad->proc~dyad_t1_t1 proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar~3 nurbs_curve%derivative_scalar none~derivative~3->proc~derivative_scalar~3 proc~derivative_vector~3 nurbs_curve%derivative_vector none~derivative~3->proc~derivative_vector~3 proc~set1a nurbs_curve%set1a none~set~3->proc~set1a proc~set1~3 nurbs_curve%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_curve%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_curve%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_curve%set4 none~set~3->proc~set4~3 interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 interface~compute_dtgc~3 compute_dTgc proc~derivative_scalar~3->interface~compute_dtgc~3 proc~is_rational~3 nurbs_curve%is_rational proc~derivative_scalar~3->proc~is_rational~3 proc~derivative_vector~3->interface~compute_dtgc~3 proc~derivative_vector~3->proc~is_rational~3 gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->gauss_legendre interface~ndgrid ndgrid proc~gauss_legendre_2d->interface~ndgrid proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->proc~kron proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~set1~3->proc~cmp_degree~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~cmp_degree~3->proc~get_multiplicity~3 proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_length~~CalledByGraph proc~cmp_length nurbs_curve%cmp_length program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_length.html"},{"title":"cmp_nc – ForCAD","text":"private pure subroutine cmp_nc(this) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this Calls proc~~cmp_nc~3~~CallsGraph proc~cmp_nc~3 nurbs_curve%cmp_nc interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_nc~3.html"},{"title":"create – ForCAD","text":"private pure subroutine create(this, res, Xt) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) Calls proc~~create~3~~CallsGraph proc~create~3 nurbs_curve%create interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 proc~is_rational~3 nurbs_curve%is_rational proc~create~3->proc~is_rational~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~create~3~~CalledByGraph proc~create~3 nurbs_curve%create proc~nearest_point2~3 nurbs_curve%nearest_point2 proc~nearest_point2~3->proc~create~3 program~example1_curve example1_curve program~example1_curve->proc~create~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~create~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~create~3 program~nearest_point_1d->proc~nearest_point2~3 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~create~3 program~shape_circle shape_circle program~shape_circle->proc~create~3 program~shape_half_circle shape_half_circle program~shape_half_circle->proc~create~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/create~3.html"},{"title":"derivative2_scalar – ForCAD","text":"private pure subroutine derivative2_scalar(this, Xt, d2Tgc, dTgc, Tgc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: d2Tgc (:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) Calls proc~~derivative2_scalar~3~~CallsGraph proc~derivative2_scalar~3 nurbs_curve%derivative2_scalar interface~compute_d2tgc~3 compute_d2Tgc proc~derivative2_scalar~3->interface~compute_d2tgc~3 proc~is_rational~3 nurbs_curve%is_rational proc~derivative2_scalar~3->proc~is_rational~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative2_scalar~3~~CalledByGraph proc~derivative2_scalar~3 nurbs_curve%derivative2_scalar none~derivative2~3 nurbs_curve%derivative2 none~derivative2~3->proc~derivative2_scalar~3 proc~nearest_point2~3 nurbs_curve%nearest_point2 proc~nearest_point2~3->none~derivative2~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~nearest_point2~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative2_scalar~3.html"},{"title":"derivative2_vector – ForCAD","text":"private pure subroutine derivative2_vector(this, res, Xt, d2Tgc, dTgc, Tgc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) Calls proc~~derivative2_vector~3~~CallsGraph proc~derivative2_vector~3 nurbs_curve%derivative2_vector interface~compute_d2tgc~3 compute_d2Tgc proc~derivative2_vector~3->interface~compute_d2tgc~3 proc~is_rational~3 nurbs_curve%is_rational proc~derivative2_vector~3->proc~is_rational~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative2_vector~3~~CalledByGraph proc~derivative2_vector~3 nurbs_curve%derivative2_vector none~derivative2~3 nurbs_curve%derivative2 none~derivative2~3->proc~derivative2_vector~3 proc~nearest_point2~3 nurbs_curve%nearest_point2 proc~nearest_point2~3->none~derivative2~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~nearest_point2~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative2_vector~3.html"},{"title":"derivative_scalar – ForCAD","text":"private pure subroutine derivative_scalar(this, Xt, dTgc, Tgc, elem) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: dTgc (:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~derivative_scalar~3~~CallsGraph proc~derivative_scalar~3 nurbs_curve%derivative_scalar interface~compute_dtgc~3 compute_dTgc proc~derivative_scalar~3->interface~compute_dtgc~3 proc~is_rational~3 nurbs_curve%is_rational proc~derivative_scalar~3->proc~is_rational~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative_scalar~3~~CalledByGraph proc~derivative_scalar~3 nurbs_curve%derivative_scalar none~derivative~3 nurbs_curve%derivative none~derivative~3->proc~derivative_scalar~3 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->none~derivative~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative_scalar~3.html"},{"title":"derivative_vector – ForCAD","text":"private pure subroutine derivative_vector(this, res, Xt, dTgc, Tgc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) Calls proc~~derivative_vector~3~~CallsGraph proc~derivative_vector~3 nurbs_curve%derivative_vector interface~compute_dtgc~3 compute_dTgc proc~derivative_vector~3->interface~compute_dtgc~3 proc~is_rational~3 nurbs_curve%is_rational proc~derivative_vector~3->proc~is_rational~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative_vector~3~~CalledByGraph proc~derivative_vector~3 nurbs_curve%derivative_vector none~derivative~3 nurbs_curve%derivative none~derivative~3->proc~derivative_vector~3 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->none~derivative~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative_vector~3.html"},{"title":"elevate_degree – ForCAD","text":"private pure subroutine elevate_degree(this, t) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: t Calls proc~~elevate_degree~3~~CallsGraph proc~elevate_degree~3 nurbs_curve%elevate_degree none~set~3 nurbs_curve%set proc~elevate_degree~3->none~set~3 proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree~3->proc~elevate_degree_a_5_9 proc~is_rational~3 nurbs_curve%is_rational proc~elevate_degree~3->proc~is_rational~3 proc~set1a nurbs_curve%set1a none~set~3->proc~set1a proc~set1~3 nurbs_curve%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_curve%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_curve%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_curve%set4 none~set~3->proc~set4~3 interface~compute_multiplicity compute_multiplicity proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~bincoeff bincoeff proc~elevate_degree_a_5_9->proc~bincoeff proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~factln factln proc~bincoeff->proc~factln proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~set1~3->proc~cmp_degree~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~elevate_degree~3~~CalledByGraph proc~elevate_degree~3 nurbs_curve%elevate_degree program~example1_curve example1_curve program~example1_curve->proc~elevate_degree~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/elevate_degree~3.html"},{"title":"export_Xc – ForCAD","text":"private impure subroutine export_Xc(this, filename) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this character(len=*), intent(in) :: filename Calls proc~~export_xc~3~~CallsGraph proc~export_xc~3 nurbs_curve%export_Xc proc~cmp_elem_xc_vis~3 nurbs_curve%cmp_elem_Xc_vis proc~export_xc~3->proc~cmp_elem_xc_vis~3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~export_xc~3~~CalledByGraph proc~export_xc~3 nurbs_curve%export_Xc program~example1_curve example1_curve program~example1_curve->proc~export_xc~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~export_xc~3 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~export_xc~3 program~shape_circle shape_circle program~shape_circle->proc~export_xc~3 program~shape_half_circle shape_half_circle program~shape_half_circle->proc~export_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/export_xc~3.html"},{"title":"export_Xg – ForCAD","text":"private impure subroutine export_Xg(this, filename) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this character(len=*), intent(in) :: filename Calls proc~~export_xg~3~~CallsGraph proc~export_xg~3 nurbs_curve%export_Xg proc~cmp_elem_xg_vis~3 nurbs_curve%cmp_elem_Xg_vis proc~export_xg~3->proc~cmp_elem_xg_vis~3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~export_xg~3~~CalledByGraph proc~export_xg~3 nurbs_curve%export_Xg program~example1_curve example1_curve program~example1_curve->proc~export_xg~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~export_xg~3 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~export_xg~3 program~shape_circle shape_circle program~shape_circle->proc~export_xg~3 program~shape_half_circle shape_half_circle program~shape_half_circle->proc~export_xg~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/export_xg~3.html"},{"title":"finalize – ForCAD","text":"private pure subroutine finalize(this) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this Called by proc~~finalize~3~~CalledByGraph proc~finalize~3 nurbs_curve%finalize proc~nearest_point2~3 nurbs_curve%nearest_point2 proc~nearest_point2~3->proc~finalize~3 program~example1_curve example1_curve program~example1_curve->proc~finalize~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~finalize~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~finalize~3 program~nearest_point_1d->proc~nearest_point2~3 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~finalize~3 program~shape_circle shape_circle program~shape_circle->proc~finalize~3 program~shape_half_circle shape_half_circle program~shape_half_circle->proc~finalize~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/finalize~3.html"},{"title":"insert_knots – ForCAD","text":"private pure subroutine insert_knots(this, Xth, r) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) Calls proc~~insert_knots~3~~CallsGraph proc~insert_knots~3 nurbs_curve%insert_knots interface~compute_multiplicity compute_multiplicity proc~insert_knots~3->interface~compute_multiplicity none~set~3 nurbs_curve%set proc~insert_knots~3->none~set~3 proc~findspan findspan proc~insert_knots~3->proc~findspan proc~insert_knot_a_5_1 insert_knot_A_5_1 proc~insert_knots~3->proc~insert_knot_a_5_1 proc~is_rational~3 nurbs_curve%is_rational proc~insert_knots~3->proc~is_rational~3 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~set1a nurbs_curve%set1a none~set~3->proc~set1a proc~set1~3 nurbs_curve%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_curve%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_curve%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_curve%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~set1~3->proc~cmp_degree~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~insert_knots~3~~CalledByGraph proc~insert_knots~3 nurbs_curve%insert_knots program~example1_curve example1_curve program~example1_curve->proc~insert_knots~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/insert_knots~3.html"},{"title":"modify_Wc – ForCAD","text":"private pure subroutine modify_Wc(this, W, num) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num Calls proc~~modify_wc~3~~CallsGraph proc~modify_wc~3 nurbs_curve%modify_Wc none~get_knot~3 nurbs_curve%get_knot proc~modify_wc~3->none~get_knot~3 none~get_wc~3 nurbs_curve%get_Wc proc~modify_wc~3->none~get_wc~3 none~get_xc~3 nurbs_curve%get_Xc proc~modify_wc~3->none~get_xc~3 none~set~3 nurbs_curve%set proc~modify_wc~3->none~set~3 proc~get_knot_all~3 nurbs_curve%get_knot_all none~get_knot~3->proc~get_knot_all~3 proc~get_knoti~3 nurbs_curve%get_knoti none~get_knot~3->proc~get_knoti~3 proc~get_wc_all~3 nurbs_curve%get_Wc_all none~get_wc~3->proc~get_wc_all~3 proc~get_wci~3 nurbs_curve%get_Wci none~get_wc~3->proc~get_wci~3 proc~get_xc_all~3 nurbs_curve%get_Xc_all none~get_xc~3->proc~get_xc_all~3 proc~get_xcid~3 nurbs_curve%get_Xcid none~get_xc~3->proc~get_xcid~3 proc~get_xci~3 nurbs_curve%get_Xci none~get_xc~3->proc~get_xci~3 proc~set1a nurbs_curve%set1a none~set~3->proc~set1a proc~set1~3 nurbs_curve%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_curve%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_curve%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_curve%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~set1~3->proc~cmp_degree~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/modify_wc~3.html"},{"title":"modify_Xc – ForCAD","text":"private pure subroutine modify_Xc(this, X, num, dir) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir Calls proc~~modify_xc~3~~CallsGraph proc~modify_xc~3 nurbs_curve%modify_Xc none~get_knot~3 nurbs_curve%get_knot proc~modify_xc~3->none~get_knot~3 none~get_wc~3 nurbs_curve%get_Wc proc~modify_xc~3->none~get_wc~3 none~get_xc~3 nurbs_curve%get_Xc proc~modify_xc~3->none~get_xc~3 none~set~3 nurbs_curve%set proc~modify_xc~3->none~set~3 proc~get_knot_all~3 nurbs_curve%get_knot_all none~get_knot~3->proc~get_knot_all~3 proc~get_knoti~3 nurbs_curve%get_knoti none~get_knot~3->proc~get_knoti~3 proc~get_wc_all~3 nurbs_curve%get_Wc_all none~get_wc~3->proc~get_wc_all~3 proc~get_wci~3 nurbs_curve%get_Wci none~get_wc~3->proc~get_wci~3 proc~get_xc_all~3 nurbs_curve%get_Xc_all none~get_xc~3->proc~get_xc_all~3 proc~get_xcid~3 nurbs_curve%get_Xcid none~get_xc~3->proc~get_xcid~3 proc~get_xci~3 nurbs_curve%get_Xci none~get_xc~3->proc~get_xci~3 proc~set1a nurbs_curve%set1a none~set~3->proc~set1a proc~set1~3 nurbs_curve%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_curve%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_curve%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_curve%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~set1~3->proc~cmp_degree~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/modify_xc~3.html"},{"title":"nearest_point – ForCAD","text":"private pure subroutine nearest_point(this, point_Xg, nearest_Xg, nearest_Xt, id) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional :: nearest_Xt integer, intent(out), optional :: id Calls proc~~nearest_point~3~~CallsGraph proc~nearest_point~3 nurbs_curve%nearest_point interface~nearest_point_help_1d nearest_point_help_1d proc~nearest_point~3->interface~nearest_point_help_1d Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~nearest_point~3~~CalledByGraph proc~nearest_point~3 nurbs_curve%nearest_point proc~nearest_point2~3 nurbs_curve%nearest_point2 proc~nearest_point2~3->proc~nearest_point~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~nearest_point~3 program~nearest_point_1d->proc~nearest_point2~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/nearest_point~3.html"},{"title":"nearest_point2 – ForCAD","text":"private impure subroutine nearest_point2(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) Calls proc~~nearest_point2~3~~CallsGraph proc~nearest_point2~3 nurbs_curve%nearest_point2 none~derivative2~3 nurbs_curve%derivative2 proc~nearest_point2~3->none~derivative2~3 proc~cmp_xg~3 nurbs_curve%cmp_Xg proc~nearest_point2~3->proc~cmp_xg~3 proc~create~3 nurbs_curve%create proc~nearest_point2~3->proc~create~3 proc~finalize~3 nurbs_curve%finalize proc~nearest_point2~3->proc~finalize~3 proc~nearest_point~3 nurbs_curve%nearest_point proc~nearest_point2~3->proc~nearest_point~3 proc~derivative2_scalar~3 nurbs_curve%derivative2_scalar none~derivative2~3->proc~derivative2_scalar~3 proc~derivative2_vector~3 nurbs_curve%derivative2_vector none~derivative2~3->proc~derivative2_vector~3 interface~compute_xg~3 compute_Xg proc~cmp_xg~3->interface~compute_xg~3 proc~is_rational~3 nurbs_curve%is_rational proc~cmp_xg~3->proc~is_rational~3 proc~create~3->interface~compute_xg~3 proc~create~3->proc~is_rational~3 interface~nearest_point_help_1d nearest_point_help_1d proc~nearest_point~3->interface~nearest_point_help_1d proc~derivative2_scalar~3->proc~is_rational~3 interface~compute_d2tgc~3 compute_d2Tgc proc~derivative2_scalar~3->interface~compute_d2tgc~3 proc~derivative2_vector~3->proc~is_rational~3 proc~derivative2_vector~3->interface~compute_d2tgc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~nearest_point2~3~~CalledByGraph proc~nearest_point2~3 nurbs_curve%nearest_point2 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~nearest_point2~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/nearest_point2~3.html"},{"title":"remove_knots – ForCAD","text":"private pure subroutine remove_knots(this, Xth, r) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) Calls proc~~remove_knots~3~~CallsGraph proc~remove_knots~3 nurbs_curve%remove_knots interface~compute_multiplicity compute_multiplicity proc~remove_knots~3->interface~compute_multiplicity none~set~3 nurbs_curve%set proc~remove_knots~3->none~set~3 proc~findspan findspan proc~remove_knots~3->proc~findspan proc~is_rational~3 nurbs_curve%is_rational proc~remove_knots~3->proc~is_rational~3 proc~remove_knots_a_5_8 remove_knots_A_5_8 proc~remove_knots~3->proc~remove_knots_a_5_8 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~set1a nurbs_curve%set1a none~set~3->proc~set1a proc~set1~3 nurbs_curve%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_curve%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_curve%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_curve%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~set1~3->proc~cmp_degree~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~remove_knots~3~~CalledByGraph proc~remove_knots~3 nurbs_curve%remove_knots program~example1_curve example1_curve program~example1_curve->proc~remove_knots~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/remove_knots~3.html"},{"title":"rotate_Xc – ForCAD","text":"private pure subroutine rotate_Xc(this, alpha, beta, theta) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta Calls proc~~rotate_xc~3~~CallsGraph proc~rotate_xc~3 nurbs_curve%rotate_Xc proc~rotation rotation proc~rotate_xc~3->proc~rotation cosd cosd proc~rotation->cosd sind sind proc~rotation->sind Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~rotate_xc~3~~CalledByGraph proc~rotate_xc~3 nurbs_curve%rotate_Xc program~example1_curve example1_curve program~example1_curve->proc~rotate_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/rotate_xc~3.html"},{"title":"rotate_Xg – ForCAD","text":"private pure subroutine rotate_Xg(this, alpha, beta, theta) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta Calls proc~~rotate_xg~3~~CallsGraph proc~rotate_xg~3 nurbs_curve%rotate_Xg proc~rotation rotation proc~rotate_xg~3->proc~rotation cosd cosd proc~rotation->cosd sind sind proc~rotation->sind Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~rotate_xg~3~~CalledByGraph proc~rotate_xg~3 nurbs_curve%rotate_Xg program~example1_curve example1_curve program~example1_curve->proc~rotate_xg~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/rotate_xg~3.html"},{"title":"set1 – ForCAD","text":"private pure subroutine set1(this, knot, Xc, Wc) Set knot vector, control points and weights for the NURBS curve object. Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set1~3~~CallsGraph proc~set1~3 nurbs_curve%set1 proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set1~3~~CalledByGraph proc~set1~3 nurbs_curve%set1 none~set~3 nurbs_curve%set none~set~3->proc~set1~3 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree~3 nurbs_curve%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots~3 nurbs_curve%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots~3 nurbs_curve%remove_knots proc~remove_knots~3->none~set~3 proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set~3 proc~set_c~3 nurbs_curve%set_C proc~set_c~3->none~set~3 proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set~3 program~compute_length compute_length program~compute_length->none~set~3 proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length program~example1_curve example1_curve program~example1_curve->none~set~3 program~example1_curve->proc~elevate_degree~3 program~example1_curve->proc~insert_knots~3 program~example1_curve->proc~remove_knots~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set~3 proc~cmp_length->proc~ansatz~3 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c~3 program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set1~3.html"},{"title":"set1a – ForCAD","text":"private pure subroutine set1a(this, knot, Xc, Wc) Set knot vector, control points and weights for the NURBS curve object. Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Xc (:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set1a~~CallsGraph proc~set1a nurbs_curve%set1a proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set1a~~CalledByGraph proc~set1a nurbs_curve%set1a none~set~3 nurbs_curve%set none~set~3->proc~set1a proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree~3 nurbs_curve%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots~3 nurbs_curve%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots~3 nurbs_curve%remove_knots proc~remove_knots~3->none~set~3 proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set~3 proc~set_c~3 nurbs_curve%set_C proc~set_c~3->none~set~3 proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set~3 program~compute_length compute_length program~compute_length->none~set~3 proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length program~example1_curve example1_curve program~example1_curve->none~set~3 program~example1_curve->proc~elevate_degree~3 program~example1_curve->proc~insert_knots~3 program~example1_curve->proc~remove_knots~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set~3 proc~cmp_length->proc~ansatz~3 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c~3 program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set1a.html"},{"title":"set2 – ForCAD","text":"private pure subroutine set2(this, Xth_dir, degree, continuity, Xc, Wc) Set NURBS curve using nodes of parameter space (Xth), degree, continuity, control points and weights. Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir (:) integer, intent(in) :: degree integer, intent(in), contiguous :: continuity (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set2~3~~CallsGraph proc~set2~3 nurbs_curve%set2 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set2~3~~CalledByGraph proc~set2~3 nurbs_curve%set2 none~set~3 nurbs_curve%set none~set~3->proc~set2~3 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree~3 nurbs_curve%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots~3 nurbs_curve%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots~3 nurbs_curve%remove_knots proc~remove_knots~3->none~set~3 proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set~3 proc~set_c~3 nurbs_curve%set_C proc~set_c~3->none~set~3 proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set~3 program~compute_length compute_length program~compute_length->none~set~3 proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length program~example1_curve example1_curve program~example1_curve->none~set~3 program~example1_curve->proc~elevate_degree~3 program~example1_curve->proc~insert_knots~3 program~example1_curve->proc~remove_knots~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set~3 proc~cmp_length->proc~ansatz~3 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c~3 program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set2~3.html"},{"title":"set3 – ForCAD","text":"private pure subroutine set3(this, Xc, Wc) Set Bezier or Rational Bezier curve using control points and weights. Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set3~3~~CallsGraph proc~set3~3 nurbs_curve%set3 proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set3~3~~CalledByGraph proc~set3~3 nurbs_curve%set3 none~set~3 nurbs_curve%set none~set~3->proc~set3~3 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree~3 nurbs_curve%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots~3 nurbs_curve%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots~3 nurbs_curve%remove_knots proc~remove_knots~3->none~set~3 proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set~3 proc~set_c~3 nurbs_curve%set_C proc~set_c~3->none~set~3 proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set~3 program~compute_length compute_length program~compute_length->none~set~3 proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length program~example1_curve example1_curve program~example1_curve->none~set~3 program~example1_curve->proc~elevate_degree~3 program~example1_curve->proc~insert_knots~3 program~example1_curve->proc~remove_knots~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set~3 proc~cmp_length->proc~ansatz~3 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c~3 program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set3~3.html"},{"title":"set4 – ForCAD","text":"private pure subroutine set4(this, degree, nc, Xc, Wc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Called by proc~~set4~3~~CalledByGraph proc~set4~3 nurbs_curve%set4 none~set~3 nurbs_curve%set none~set~3->proc~set4~3 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree~3 nurbs_curve%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots~3 nurbs_curve%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots~3 nurbs_curve%remove_knots proc~remove_knots~3->none~set~3 proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set~3 proc~set_c~3 nurbs_curve%set_C proc~set_c~3->none~set~3 proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set~3 program~compute_length compute_length program~compute_length->none~set~3 proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length program~example1_curve example1_curve program~example1_curve->none~set~3 program~example1_curve->proc~elevate_degree~3 program~example1_curve->proc~insert_knots~3 program~example1_curve->proc~remove_knots~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set~3 proc~cmp_length->proc~ansatz~3 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c~3 program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set4~3.html"},{"title":"set_C – ForCAD","text":"private pure subroutine set_C(this, center, radius) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius Calls proc~~set_c~3~~CallsGraph proc~set_c~3 nurbs_curve%set_C none~set~3 nurbs_curve%set proc~set_c~3->none~set~3 proc~set1a nurbs_curve%set1a none~set~3->proc~set1a proc~set1~3 nurbs_curve%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_curve%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_curve%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_curve%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~set1~3->proc~cmp_degree~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_c~3~~CalledByGraph proc~set_c~3 nurbs_curve%set_C program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_c~3.html"},{"title":"set_circle – ForCAD","text":"private pure subroutine set_circle(this, center, radius) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius Calls proc~~set_circle~~CallsGraph proc~set_circle nurbs_curve%set_circle none~set~3 nurbs_curve%set proc~set_circle->none~set~3 proc~set1a nurbs_curve%set1a none~set~3->proc~set1a proc~set1~3 nurbs_curve%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_curve%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_curve%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_curve%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~set1~3->proc~cmp_degree~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_circle~~CalledByGraph proc~set_circle nurbs_curve%set_circle program~shape_circle shape_circle program~shape_circle->proc~set_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_circle.html"},{"title":"set_elem – ForCAD","text":"private pure subroutine set_elem(this, elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:)","tags":"","loc":"proc/set_elem~3.html"},{"title":"set_elem_Xc_vis – ForCAD","text":"private pure subroutine set_elem_Xc_vis(this, elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:)","tags":"","loc":"proc/set_elem_xc_vis~3.html"},{"title":"set_elem_Xg_vis – ForCAD","text":"private pure subroutine set_elem_Xg_vis(this, elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:)","tags":"","loc":"proc/set_elem_xg_vis~3.html"},{"title":"set_half_circle – ForCAD","text":"private pure subroutine set_half_circle(this, center, radius) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius Calls proc~~set_half_circle~~CallsGraph proc~set_half_circle nurbs_curve%set_half_circle none~set~3 nurbs_curve%set proc~set_half_circle->none~set~3 proc~set1a nurbs_curve%set1a none~set~3->proc~set1a proc~set1~3 nurbs_curve%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_curve%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_curve%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_curve%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~set1~3->proc~cmp_degree~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_half_circle~~CalledByGraph proc~set_half_circle nurbs_curve%set_half_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_half_circle.html"},{"title":"show – ForCAD","text":"private impure subroutine show(this, vtkfile_Xc, vtkfile_Xg) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg Called by proc~~show~3~~CalledByGraph proc~show~3 nurbs_curve%show program~example1_curve example1_curve program~example1_curve->proc~show~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~show~3 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~show~3 program~shape_circle shape_circle program~shape_circle->proc~show~3 program~shape_half_circle shape_half_circle program~shape_half_circle->proc~show~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/show~3.html"},{"title":"translate_Xc – ForCAD","text":"private pure subroutine translate_Xc(this, vec) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) Called by proc~~translate_xc~3~~CalledByGraph proc~translate_xc~3 nurbs_curve%translate_Xc program~example1_curve example1_curve program~example1_curve->proc~translate_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/translate_xc~3.html"},{"title":"translate_Xg – ForCAD","text":"private pure subroutine translate_Xg(this, vec) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) Called by proc~~translate_xg~3~~CalledByGraph proc~translate_xg~3 nurbs_curve%translate_Xg program~example1_curve example1_curve program~example1_curve->proc~translate_xg~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/translate_xg~3.html"},{"title":"compute_Tgc – ForCAD","text":"private interface compute_Tgc Called by interface~~compute_tgc~3~~CalledByGraph interface~compute_tgc~3 compute_Tgc proc~basis_scalar~3 nurbs_curve%basis_scalar proc~basis_scalar~3->interface~compute_tgc~3 proc~basis_vector~3 nurbs_curve%basis_vector proc~basis_vector~3->interface~compute_tgc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Functions private pure function compute_Tgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Tgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:)","tags":"","loc":"interface/compute_tgc~3.html"},{"title":"compute_Xg – ForCAD","text":"private interface compute_Xg Called by interface~~compute_xg~3~~CalledByGraph interface~compute_xg~3 compute_Xg proc~cmp_xg~3 nurbs_curve%cmp_Xg proc~cmp_xg~3->interface~compute_xg~3 proc~create~3 nurbs_curve%create proc~create~3->interface~compute_xg~3 proc~nearest_point2~3 nurbs_curve%nearest_point2 proc~nearest_point2~3->proc~cmp_xg~3 proc~nearest_point2~3->proc~create~3 program~example1_curve example1_curve program~example1_curve->proc~create~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~create~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~create~3 program~nearest_point_1d->proc~nearest_point2~3 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~create~3 program~shape_circle shape_circle program~shape_circle->proc~create~3 program~shape_half_circle shape_half_circle program~shape_half_circle->proc~create~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Functions private pure function compute_Xg_bspline_1d(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_bspline_1d_1point(f_Xt, f_knot, f_degree, f_nc, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Xg_nurbs_1d(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_nurbs_1d_1point(f_Xt, f_knot, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"interface/compute_xg~3.html"},{"title":"compute_d2Tgc – ForCAD","text":"private interface compute_d2Tgc Called by interface~~compute_d2tgc~3~~CalledByGraph interface~compute_d2tgc~3 compute_d2Tgc proc~derivative2_scalar~3 nurbs_curve%derivative2_scalar proc~derivative2_scalar~3->interface~compute_d2tgc~3 proc~derivative2_vector~3 nurbs_curve%derivative2_vector proc~derivative2_vector~3->interface~compute_d2tgc~3 none~derivative2~3 nurbs_curve%derivative2 none~derivative2~3->proc~derivative2_scalar~3 none~derivative2~3->proc~derivative2_vector~3 proc~nearest_point2~3 nurbs_curve%nearest_point2 proc~nearest_point2~3->none~derivative2~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~nearest_point2~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Subroutines private pure subroutine compute_d2Tgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(out), allocatable :: f_d2Tgc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_d2Tgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:)","tags":"","loc":"interface/compute_d2tgc~3.html"},{"title":"compute_dTgc – ForCAD","text":"private interface compute_dTgc Called by interface~~compute_dtgc~3~~CalledByGraph interface~compute_dtgc~3 compute_dTgc proc~derivative_scalar~3 nurbs_curve%derivative_scalar proc~derivative_scalar~3->interface~compute_dtgc~3 proc~derivative_vector~3 nurbs_curve%derivative_vector proc~derivative_vector~3->interface~compute_dtgc~3 none~derivative~3 nurbs_curve%derivative none~derivative~3->proc~derivative_scalar~3 none~derivative~3->proc~derivative_vector~3 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->none~derivative~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz~3 program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Subroutines private pure subroutine compute_dTgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_dTgc, f_Tgc, f_elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(out), allocatable :: f_dTgc (:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in), optional :: f_elem (:) private pure subroutine compute_dTgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_dTgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, f_elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in), optional :: f_elem (:) private pure subroutine compute_dTgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:)","tags":"","loc":"interface/compute_dtgc~3.html"},{"title":"nearest_point_help_1d – ForCAD","text":"interface Called by interface~~nearest_point_help_1d~~CalledByGraph interface~nearest_point_help_1d nearest_point_help_1d proc~nearest_point~3 nurbs_curve%nearest_point proc~nearest_point~3->interface~nearest_point_help_1d proc~nearest_point2~3 nurbs_curve%nearest_point2 proc~nearest_point2~3->proc~nearest_point~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~nearest_point~3 program~nearest_point_1d->proc~nearest_point2~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. private pure function nearest_point_help_1d(f_ng, f_Xg, f_point_Xg) result(f_distances) Arguments Type Intent Optional Attributes Name integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Xg (:,:) real(kind=rk), intent(in), contiguous :: f_point_Xg (:) Return Value real(kind=rk),allocatable,(:)","tags":"","loc":"interface/nearest_point_help_1d.html"},{"title":"forcad_nurbs_volume – ForCAD","text":"This module defines the 'nurbs_volume' type for representing a Non-Uniform Rational B-Spline (NURBS) volume. Uses forcad_utils module~~forcad_nurbs_volume~~UsesGraph module~forcad_nurbs_volume forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Used by module~~forcad_nurbs_volume~~UsedByGraph module~forcad_nurbs_volume forcad_nurbs_volume module~forcad forcad module~forcad->module~forcad_nurbs_volume program~compute_area compute_area program~compute_area->module~forcad program~compute_length compute_length program~compute_length->module~forcad program~compute_volume compute_volume program~compute_volume->module~forcad program~example1_curve example1_curve program~example1_curve->module~forcad program~example3_surface example3_surface program~example3_surface->module~forcad program~example3_volume example3_volume program~example3_volume->module~forcad program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->module~forcad program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->module~forcad program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->module~forcad program~example_ppm1 example_ppm1 program~example_ppm1->module~forcad program~example_ppm2 example_ppm2 program~example_ppm2->module~forcad program~example_ppm3 example_ppm3 program~example_ppm3->module~forcad program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->module~forcad program~nearest_point_1d nearest_point_1d program~nearest_point_1d->module~forcad program~nearest_point_2d nearest_point_2d program~nearest_point_2d->module~forcad program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->module~forcad program~nearest_point_3d nearest_point_3d program~nearest_point_3d->module~forcad program~shape_c_1d shape_C_1d program~shape_c_1d->module~forcad program~shape_c_2d shape_C_2d program~shape_c_2d->module~forcad program~shape_c_3d shape_C_3d program~shape_c_3d->module~forcad program~shape_circle shape_circle program~shape_circle->module~forcad program~shape_half_circle shape_half_circle program~shape_half_circle->module~forcad program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->module~forcad program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->module~forcad program~shape_hexahedron shape_hexahedron program~shape_hexahedron->module~forcad program~shape_ring_2d shape_ring_2d program~shape_ring_2d->module~forcad program~shape_ring_3d shape_ring_3d program~shape_ring_3d->module~forcad program~shape_tetragon shape_tetragon program~shape_tetragon->module~forcad Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Interfaces private        interface compute_Tgc private pure function compute_Tgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Tgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private        interface compute_Xg private pure function compute_Xg_bspline_3d(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_bspline_3d_1point(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Xg_nurbs_3d(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_nurbs_3d_1point(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private        interface compute_d2Tgc private pure subroutine compute_d2Tgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_d2Tgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private        interface compute_dTgc private pure subroutine compute_dTgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_dTgc, f_Tgc, f_elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in), optional :: f_elem (:) private pure subroutine compute_dTgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_dTgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, f_elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in), optional :: f_elem (:) private pure subroutine compute_dTgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) interface private pure function nearest_point_help_3d(f_ng, f_Xg, f_point_Xg) result(f_distances) Arguments Type Intent Optional Attributes Name integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Xg (:,:) real(kind=rk), intent(in), contiguous :: f_point_Xg (:) Return Value real(kind=rk), allocatable, (:) Derived Types type, public :: nurbs_volume Components Type Visibility Attributes Name Initial real(kind=rk), private, allocatable :: Wc (:) Weights for the control points (1D array: [nc(1) nc(2) nc(3)]) real(kind=rk), private, allocatable :: Xc (:,:) Control points (2D array: [nc(1) nc(2) nc(3), dim]) real(kind=rk), private, allocatable :: Xg (:,:) Geometry points (2D array: [ng(1) ng(2) ng(3), dim]) real(kind=rk), private, allocatable :: Xt (:,:) Evaluation parameter values (2D array: [ng(1) ng(2) ng(3), dim] real(kind=rk), private, allocatable :: Xt1 (:) Evaluation parameter values in the first direction (1D array: [ng(1)]) real(kind=rk), private, allocatable :: Xt2 (:) Evaluation parameter values in the second direction (1D array: [ng(2)]) real(kind=rk), private, allocatable :: Xt3 (:) Evaluation parameter values in the third direction (1D array: [ng(3)]) integer, private :: degree (3) Degree (order) of the volume integer, private, allocatable :: elemConn (:,:) IGA element connectivity integer, private, allocatable :: elemConn_Xc_vis (:,:) Connectivity for visualization of control points integer, private, allocatable :: elemConn_Xg_vis (:,:) Connectivity for visualization of geometry points real(kind=rk), private, allocatable :: knot1 (:) Knot vector in the first direction (1D array) real(kind=rk), private, allocatable :: knot2 (:) Knot vector in the second direction (1D array) real(kind=rk), private, allocatable :: knot3 (:) Knot vector in the third direction (1D array) integer, private :: nc (3) Number of control points in each direction integer, private :: ng (3) Number of geometry points in each direction Type-Bound Procedures procedure, public :: ansatz Compute the shape functions, derivative of shape functions and dV Read more… generic, public :: basis => basis_vector , basis_scalar Compute the basis functions of the NURBS volume Read more… procedure, public :: cmp_Xg Compute geometry points Read more… procedure, public :: cmp_degree Compute degree of the NURBS volume Read more… procedure, public :: cmp_degreeFace Compute degrees of the faces Read more… procedure, public :: cmp_elem Generate IGA element connectivity Read more… procedure, public :: cmp_elemFace Compute faces of the IGA elements Read more… procedure, public :: cmp_elemFace_Xc_vis Compute faces of the control points Read more… procedure, public :: cmp_elemFace_Xg_vis Compute faces of the geometry points Read more… procedure, public :: cmp_elem_Xc_vis Generate connectivity for control points Read more… procedure, public :: cmp_elem_Xg_vis Generate connectivity for geometry points Read more… procedure, public :: cmp_nc Compute number of required control points Read more… procedure, public :: cmp_volume Compute the volume of the NURBS volume Read more… procedure, public :: create Generate geometry points Read more… generic, public :: derivative => derivative_vector , derivative_scalar Compute the derivative of the NURBS volume Read more… generic, public :: derivative2 => derivative2_vector , derivative2_scalar Compute the second derivative of the NURBS volume Read more… procedure, public :: elevate_degree Elevate the degree of the NURBS volume Read more… procedure, public :: export_Xc Export control points to VTK file Read more… procedure, public :: export_Xg Export geometry points to VTK file Read more… procedure, public :: finalize Finalize the NURBS volume object Read more… generic, public :: get_Wc => get_Wc_all , get_Wci Get weights Read more… generic, public :: get_Xc => get_Xc_all , get_Xci , get_Xcid Get control points Read more… generic, public :: get_Xg => get_Xg_all , get_Xgi , get_Xgid Get geometry points Read more… procedure, public :: get_Xt Get parameter values Read more… procedure, public :: get_continuity Compute and return the continuity of the NURBS volume Read more… generic, public :: get_degree => get_degree_all , get_degree_dir Get degree of the NURBS volume Read more… procedure, public :: get_elem Get IGA element connectivity Read more… procedure, public :: get_elem_Xc_vis Get connectivity for control points Read more… procedure, public :: get_elem_Xg_vis Get connectivity for geometry points Read more… generic, public :: get_knot => get_knoti , get_knot_all Get knot vector Read more… procedure, public :: get_multiplicity Compute and return the multiplicity of the knots Read more… generic, public :: get_nc => get_nc_all , get_nc_dir Get number of control points Read more… procedure, public :: get_ng Get number of geometry points Read more… procedure, public :: insert_knots Insert knots into the knot vector Read more… procedure, public :: is_rational Check if the NURBS volume is rational Read more… procedure, public :: modify_Wc Modify weights Read more… procedure, public :: modify_Xc Modify control points Read more… procedure, public :: nearest_point Find the nearest point on the NURBS volume (Approximation) Read more… procedure, public :: nearest_point2 Find the nearest point on the NURBS volume (Minimization - Newton's method) Read more… procedure, public :: put_to_nurbs Put a shape to a NURBS volume Read more… procedure, public :: remove_knots Remove knots from the knot vector Read more… procedure, public :: rotate_Xc Rotate control points Read more… procedure, public :: rotate_Xg Rotate geometry points Read more… generic, public :: set => set1 , set2 , set3 , set4 Set NURBS volume Read more… procedure, public :: set1 Set knot vectors, control points and weights for the NURBS volume object Read more… procedure, public :: set2 Set NURBS volume using nodes of parameter space, degree, continuity, control points and weights Read more… procedure, public :: set3 Set Bezier or Rational Bezier volume using control points and weights Read more… procedure, public :: set4 Set NURBS volume using degree, number of control points, control points and weights Read more… procedure, public :: set_C Set a C-shape Read more… procedure, public :: set_elem Set IGA element connectivity Read more… procedure, public :: set_elem_Xc_vis Set connectivity for control points Read more… procedure, public :: set_elem_Xg_vis Set connectivity for geometry points Read more… procedure, public :: set_half_ring Set a half ring Read more… procedure, public :: set_hexahedron Set a hexahedron Read more… procedure, public :: set_ring Set a ring Read more… procedure, public :: show Show the NURBS object using PyVista Read more… procedure, public :: translate_Xc Translate control points Read more… procedure, public :: translate_Xg Translate geometry points Read more… procedure, private :: basis_scalar Compute the basis functions of the NURBS volume Read more… procedure, private :: basis_vector Compute the basis functions of the NURBS volume Read more… procedure, private :: derivative2_scalar Compute the second derivative of the NURBS volume Read more… procedure, private :: derivative2_vector Compute the second derivative of the NURBS volume Read more… procedure, private :: derivative_scalar Compute the derivative of the NURBS volume Read more… procedure, private :: derivative_vector Compute the derivative of the NURBS volume Read more… procedure, private :: get_Wc_all Get all weights Read more… procedure, private :: get_Wci Get i-th weight Read more… procedure, private :: get_Xc_all Get all control points Read more… procedure, private :: get_Xci Get i-th control point Read more… procedure, private :: get_Xcid Get i-th control point in a specific direction Read more… procedure, private :: get_Xg_all Get all geometry points Read more… procedure, private :: get_Xgi Get i-th geometry point Read more… procedure, private :: get_Xgid Get i-th geometry point in a specific direction Read more… procedure, private :: get_degree_all Get degree of the NURBS volume in all directions Read more… procedure, private :: get_degree_dir Get degree of the NURBS volume in a specific direction Read more… procedure, private :: get_knot_all Get all knot vectors Read more… procedure, private :: get_knoti Get i-th knot value Read more… procedure, private :: get_nc_all Get number of control points in all directions Read more… procedure, private :: get_nc_dir Get number of control points in a specific direction Read more… Functions private pure function cmp_Xg (this, Xt) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this real(kind=rk), intent(in), contiguous :: Xt (:) Return Value real(kind=rk), allocatable, (:) private pure function cmp_degreeFace (this, face) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: face Return Value integer, (3) private pure function cmp_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function cmp_elemFace (this, elem, face) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause number of nodes in each direction Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:) private pure function cmp_elemFace_Xc_vis (this, elem, face) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause number of nodes in each direction Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:) private pure function cmp_elemFace_Xg_vis (this, elem, face) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause number of nodes in each direction Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:) private pure function cmp_elem_Xc_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) private pure function cmp_elem_Xg_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) private pure function get_Xt (this, dir) result(Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) private pure function get_continuity (this, dir) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) private pure function get_degree_all (this) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) private pure function get_degree_dir (this, dir) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer private pure function get_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_elem_Xc_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_elem_Xg_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_knot_all (this, dir) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) private pure function get_knoti (this, dir, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir integer, intent(in) :: i Return Value real(kind=rk) private pure function get_multiplicity (this, dir) result(m) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) private pure function get_nc_all (this) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) private pure function get_nc_dir (this, dir) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer private pure function get_ng (this) result(ng) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) private pure function is_rational (this) result(r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value logical Subroutines private pure subroutine ansatz (this, ie, ig, Tgc, dTgc_dXg, dV) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dV private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:) private pure subroutine basis_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) private pure subroutine cmp_degree (this, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: dir private pure subroutine cmp_nc (this, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: dir private pure subroutine cmp_volume (this, volume) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(out) :: volume private pure subroutine create (this, res1, res2, res3, Xt1, Xt2, Xt3, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(in), optional, contiguous :: Xt (:,:) private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) private pure subroutine derivative2_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) private pure subroutine derivative_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine elevate_degree (this, dir, t) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir integer, intent(in) :: t private impure subroutine export_Xc (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this character(len=*), intent(in) :: filename private impure subroutine export_Xg (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this character(len=*), intent(in) :: filename private pure subroutine finalize (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this private pure subroutine insert_knots (this, dir, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) private pure subroutine modify_Wc (this, W, num) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num private pure subroutine modify_Xc (this, X, num, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir private pure subroutine nearest_point (this, point_Xg, nearest_Xg, nearest_Xt, id) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xt (:) integer, intent(out), optional :: id private impure subroutine nearest_point2 (this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt (3) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) private pure subroutine put_to_nurbs (this, X, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: X (:,:) integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine remove_knots (this, dir, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) private pure subroutine rotate_Xc (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta private pure subroutine rotate_Xg (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta private pure subroutine set1 (this, knot1, knot2, knot3, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set control points and weights for the NURBS volume object. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set2 (this, Xth_dir1, Xth_dir2, Xth_dir3, degree, continuity1, continuity2, continuity3, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set control points and weights for the NURBS volume object. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir1 (:) real(kind=rk), intent(in), contiguous :: Xth_dir2 (:) real(kind=rk), intent(in), contiguous :: Xth_dir3 (:) integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: continuity1 (:) integer, intent(in), contiguous :: continuity2 (:) integer, intent(in), contiguous :: continuity3 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set3 (this, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier volume using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set_C (this, center, radius1, radius2, length) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length private pure subroutine set_elem (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_elem_Xc_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_elem_Xg_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_half_ring (this, center, radius1, radius2, length) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length private pure subroutine set_hexahedron (this, L, nc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: L (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set_ring (this, center, radius1, radius2, length) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length private impure subroutine show (this, vtkfile_Xc, vtkfile_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg private pure subroutine translate_Xc (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) private pure subroutine translate_Xg (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:)","tags":"","loc":"module/forcad_nurbs_volume.html"},{"title":"forcad – ForCAD","text":"Uses forcad_nurbs_surface forcad_utils forcad_nurbs_curve forcad_nurbs_volume module~~forcad~~UsesGraph module~forcad forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Used by module~~forcad~~UsedByGraph module~forcad forcad program~compute_area compute_area program~compute_area->module~forcad program~compute_length compute_length program~compute_length->module~forcad program~compute_volume compute_volume program~compute_volume->module~forcad program~example1_curve example1_curve program~example1_curve->module~forcad program~example3_surface example3_surface program~example3_surface->module~forcad program~example3_volume example3_volume program~example3_volume->module~forcad program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->module~forcad program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->module~forcad program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->module~forcad program~example_ppm1 example_ppm1 program~example_ppm1->module~forcad program~example_ppm2 example_ppm2 program~example_ppm2->module~forcad program~example_ppm3 example_ppm3 program~example_ppm3->module~forcad program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->module~forcad program~nearest_point_1d nearest_point_1d program~nearest_point_1d->module~forcad program~nearest_point_2d nearest_point_2d program~nearest_point_2d->module~forcad program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->module~forcad program~nearest_point_3d nearest_point_3d program~nearest_point_3d->module~forcad program~shape_c_1d shape_C_1d program~shape_c_1d->module~forcad program~shape_c_2d shape_C_2d program~shape_c_2d->module~forcad program~shape_c_3d shape_C_3d program~shape_c_3d->module~forcad program~shape_circle shape_circle program~shape_circle->module~forcad program~shape_half_circle shape_half_circle program~shape_half_circle->module~forcad program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->module~forcad program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->module~forcad program~shape_hexahedron shape_hexahedron program~shape_hexahedron->module~forcad program~shape_ring_2d shape_ring_2d program~shape_ring_2d->module~forcad program~shape_ring_3d shape_ring_3d program~shape_ring_3d->module~forcad program~shape_tetragon shape_tetragon program~shape_tetragon->module~forcad Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"module/forcad.html"},{"title":"forcad_nurbs_surface – ForCAD","text":"This module defines the 'nurbs_surface' type for representing a Non-Uniform Rational B-Spline (NURBS) surface. Uses forcad_utils module~~forcad_nurbs_surface~~UsesGraph module~forcad_nurbs_surface forcad_nurbs_surface module~forcad_utils forcad_utils module~forcad_nurbs_surface->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Used by module~~forcad_nurbs_surface~~UsedByGraph module~forcad_nurbs_surface forcad_nurbs_surface module~forcad forcad module~forcad->module~forcad_nurbs_surface program~compute_area compute_area program~compute_area->module~forcad program~compute_length compute_length program~compute_length->module~forcad program~compute_volume compute_volume program~compute_volume->module~forcad program~example1_curve example1_curve program~example1_curve->module~forcad program~example3_surface example3_surface program~example3_surface->module~forcad program~example3_volume example3_volume program~example3_volume->module~forcad program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->module~forcad program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->module~forcad program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->module~forcad program~example_ppm1 example_ppm1 program~example_ppm1->module~forcad program~example_ppm2 example_ppm2 program~example_ppm2->module~forcad program~example_ppm3 example_ppm3 program~example_ppm3->module~forcad program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->module~forcad program~nearest_point_1d nearest_point_1d program~nearest_point_1d->module~forcad program~nearest_point_2d nearest_point_2d program~nearest_point_2d->module~forcad program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->module~forcad program~nearest_point_3d nearest_point_3d program~nearest_point_3d->module~forcad program~shape_c_1d shape_C_1d program~shape_c_1d->module~forcad program~shape_c_2d shape_C_2d program~shape_c_2d->module~forcad program~shape_c_3d shape_C_3d program~shape_c_3d->module~forcad program~shape_circle shape_circle program~shape_circle->module~forcad program~shape_half_circle shape_half_circle program~shape_half_circle->module~forcad program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->module~forcad program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->module~forcad program~shape_hexahedron shape_hexahedron program~shape_hexahedron->module~forcad program~shape_ring_2d shape_ring_2d program~shape_ring_2d->module~forcad program~shape_ring_3d shape_ring_3d program~shape_ring_3d->module~forcad program~shape_tetragon shape_tetragon program~shape_tetragon->module~forcad Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Interfaces private        interface compute_Tgc private pure function compute_Tgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Tgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private        interface compute_Xg private pure function compute_Xg_bspline_2d(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_bspline_2d_1point(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Xg_nurbs_2d(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_nurbs_2d_1point(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private        interface compute_d2Tgc private pure subroutine compute_d2Tgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, nc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_d2Tgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private        interface compute_dTgc private pure subroutine compute_dTgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, nc, f_dTgc, f_Tgc, elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in) :: elem (:) private pure subroutine compute_dTgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, nc, f_ng, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_dTgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in) :: elem (:) private pure subroutine compute_dTgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) interface private pure function nearest_point_help_2d(f_ng, f_Xg, f_point_Xg) result(f_distances) Arguments Type Intent Optional Attributes Name integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Xg (:,:) real(kind=rk), intent(in), contiguous :: f_point_Xg (:) Return Value real(kind=rk), allocatable, (:) Derived Types type, public :: nurbs_surface Components Type Visibility Attributes Name Initial real(kind=rk), private, allocatable :: Wc (:) Weights for control points (1D array: [nc(1)*nc(2)]) real(kind=rk), private, allocatable :: Xc (:,:) Control points (2D array: [nc(1)*nc(2), dim]) real(kind=rk), private, allocatable :: Xg (:,:) Geometry points (2D array: [ng(1)*ng(2), dim]) real(kind=rk), private, allocatable :: Xt (:,:) Evaluation parameter values (2D array: [ng(1)*ng(2), 2]) real(kind=rk), private, allocatable :: Xt1 (:) Evaluation parameter values in the first direction (1D array: [ng(1)]) real(kind=rk), private, allocatable :: Xt2 (:) Evaluation parameter values in the second direction (1D array: [ng(2)]) integer, private :: degree (2) Degree (order) of the surface integer, private, allocatable :: elemConn (:,:) IGA element connectivity integer, private, allocatable :: elemConn_Xc_vis (:,:) Connectivity for visualization of control points integer, private, allocatable :: elemConn_Xg_vis (:,:) Connectivity for visualization of geometry points real(kind=rk), private, allocatable :: knot1 (:) Knot vector in the first direction (1D array) real(kind=rk), private, allocatable :: knot2 (:) Knot vector in the second direction (1D array) integer, private :: nc (2) Number of control points in each direction integer, private :: ng (2) Number of geometry points in each direction Type-Bound Procedures procedure, public :: ansatz Compute the shape functions, derivative of shape functions and dA Read more… generic, public :: basis => basis_vector , basis_scalar Compute the basis functions of the NURBS surface Read more… procedure, public :: cmp_Xg Compute geometry points Read more… procedure, public :: cmp_area Compute the area of the NURBS surface Read more… procedure, public :: cmp_degree Compute degree of the NURBS surface Read more… procedure, public :: cmp_elem Generate IGA element connectivity Read more… procedure, public :: cmp_elem_Xc_vis Generate connectivity for control points Read more… procedure, public :: cmp_elem_Xg_vis Generate connectivity for geometry points Read more… procedure, public :: cmp_nc Compute number of required control points Read more… procedure, public :: create Generate geometry points Read more… generic, public :: derivative => derivative_vector , derivative_scalar Compute the derivative of the NURBS surface Read more… generic, public :: derivative2 => derivative2_vector , derivative2_scalar Compute the second derivative of the NURBS surface Read more… procedure, public :: elevate_degree Elevate degree Read more… procedure, public :: export_Xc Export control points to VTK file Read more… procedure, public :: export_Xg Export geometry points to VTK file Read more… procedure, public :: finalize Finalize the NURBS surface object Read more… generic, public :: get_Wc => get_Wc_all , get_Wci Get weights Read more… generic, public :: get_Xc => get_Xc_all , get_Xci , get_Xcid Get control points Read more… generic, public :: get_Xg => get_Xg_all , get_Xgi , get_Xgid Get geometry points Read more… procedure, public :: get_Xt Get parameter values Read more… procedure, public :: get_continuity Compute and return the continuity of the NURBS surface Read more… generic, public :: get_degree => get_degree_all , get_degree_dir Get degree of the NURBS surface Read more… procedure, public :: get_elem Get IGA element connectivity Read more… procedure, public :: get_elem_Xc_vis Get connectivity for control points Read more… procedure, public :: get_elem_Xg_vis Get connectivity for geometry points Read more… generic, public :: get_knot => get_knoti , get_knot_all Get knot vector Read more… procedure, public :: get_multiplicity Compute and return the multiplicity of the knot vector Read more… generic, public :: get_nc => get_nc_all , get_nc_dir Get number of control points Read more… procedure, public :: get_ng Get number of geometry points Read more… procedure, public :: insert_knots Insert knots into the knot vector Read more… procedure, public :: is_rational Check if the NURBS surface is rational Read more… procedure, public :: modify_Wc Modify weights Read more… procedure, public :: modify_Xc Modify control points Read more… procedure, public :: nearest_point Find the nearest point on the NURBS surface (Approximation) Read more… procedure, public :: nearest_point2 Find the nearest point on the NURBS surface (Minimization - Newton's method) Read more… procedure, public :: remove_knots Remove knots from the knot vector Read more… procedure, public :: rotate_Xc Rotate control points Read more… procedure, public :: rotate_Xg Rotate geometry points Read more… generic, public :: set => set1 , set2 , set3 , set4 Set NURBS surface Read more… procedure, public :: set1 Set knot vectors, control points and weights for the NURBS surface object Read more… procedure, public :: set2 Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights Read more… procedure, public :: set3 Set Bezier or Rational Bezier surface using control points and weights Read more… procedure, public :: set4 Set NURBS surface using degree, number of control points, control points and weights Read more… procedure, public :: set_C Set a C-shape Read more… procedure, public :: set_elem Set IGA element connectivity Read more… procedure, public :: set_elem_Xc_vis Set connectivity for control points Read more… procedure, public :: set_elem_Xg_vis Set connectivity for geometry points Read more… procedure, public :: set_half_ring Set a half ring Read more… procedure, public :: set_ring Set a ring Read more… procedure, public :: set_tetragon Set a tetragon Read more… procedure, public :: show Show the NURBS object using PyVista Read more… procedure, public :: translate_Xc Translate control points Read more… procedure, public :: translate_Xg Translate geometry points Read more… procedure, private :: basis_scalar Compute the basis functions of the NURBS surface Read more… procedure, private :: basis_vector Compute the basis functions of the NURBS surface Read more… procedure, private :: derivative2_scalar Compute the second derivative of the NURBS surface Read more… procedure, private :: derivative2_vector Compute the second derivative of the NURBS surface Read more… procedure, private :: derivative_scalar Compute the derivative of the NURBS surface Read more… procedure, private :: derivative_vector Compute the derivative of the NURBS surface Read more… procedure, private :: get_Wc_all Get all weights Read more… procedure, private :: get_Wci Get i-th weight Read more… procedure, private :: get_Xc_all Get all control points Read more… procedure, private :: get_Xci Get i-th control point Read more… procedure, private :: get_Xcid Get i-th control point in a specific direction Read more… procedure, private :: get_Xg_all Get all geometry points Read more… procedure, private :: get_Xgi Get i-th geometry point Read more… procedure, private :: get_Xgid Get i-th geometry point in a specific direction Read more… procedure, private :: get_degree_all Get degree of the NURBS surface in both directions Read more… procedure, private :: get_degree_dir Get degree of the NURBS surface in a specific direction Read more… procedure, private :: get_knot_all Get all knot vectors Read more… procedure, private :: get_knoti Get i-th knot value Read more… procedure, private :: get_nc_all Get number of control points in all directions Read more… procedure, private :: get_nc_dir Get number of control points in a specific direction Read more… Functions private pure function cmp_Xg (this, Xt) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this real(kind=rk), intent(in), contiguous :: Xt (:) Return Value real(kind=rk), allocatable, (:) private pure function cmp_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function cmp_elem_Xc_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) private pure function cmp_elem_Xg_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) private pure function get_Xt (this, dir) result(Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) private pure function get_continuity (this, dir) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) private pure function get_degree_all (this) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) private pure function get_degree_dir (this, dir) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer private pure function get_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_elem_Xc_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_elem_Xg_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_knot_all (this, dir) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) private pure function get_knoti (this, dir, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir integer, intent(in) :: i Return Value real(kind=rk) private pure function get_multiplicity (this, dir) result(m) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) private pure function get_nc_all (this) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) private pure function get_nc_dir (this, dir) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer private pure function get_ng (this) result(ng) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) private pure function is_rational (this) result(r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value logical Subroutines private pure subroutine ansatz (this, ie, ig, Tgc, dTgc_dXg, dA) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dA private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:) private pure subroutine basis_vector (this, res1, res2, Xt1, Xt2, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) private pure subroutine cmp_area (this, area) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(out) :: area private pure subroutine cmp_degree (this, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: dir private pure subroutine cmp_nc (this, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: dir private pure subroutine create (this, res1, res2, Xt1, Xt2, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt (:,:) private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) private pure subroutine derivative2_vector (this, res1, res2, Xt1, Xt2, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) private pure subroutine derivative_vector (this, res1, res2, Xt1, Xt2, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine elevate_degree (this, dir, t) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir integer, intent(in) :: t private impure subroutine export_Xc (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this character(len=*), intent(in) :: filename private impure subroutine export_Xg (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this character(len=*), intent(in) :: filename private pure subroutine finalize (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this private pure subroutine insert_knots (this, dir, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) private pure subroutine modify_Wc (this, W, num) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num private pure subroutine modify_Xc (this, X, num, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir private pure subroutine nearest_point (this, point_Xg, nearest_Xg, nearest_Xt, id) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xt (:) integer, intent(out), optional :: id private impure subroutine nearest_point2 (this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt (2) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) private pure subroutine remove_knots (this, dir, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) private pure subroutine rotate_Xc (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta private pure subroutine rotate_Xg (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta private pure subroutine set1 (this, knot1, knot2, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vectors, control points and weights for the NURBS surface object. Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set2 (this, Xth_dir1, Xth_dir2, degree, continuity1, continuity2, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir1 (:) real(kind=rk), intent(in), contiguous :: Xth_dir2 (:) integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: continuity1 (:) integer, intent(in), contiguous :: continuity2 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set3 (this, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier surface using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set_C (this, center, radius1, radius2) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 private pure subroutine set_elem (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_elem_Xc_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_elem_Xg_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_half_ring (this, center, radius1, radius2) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 private pure subroutine set_ring (this, center, radius1, radius2) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 private pure subroutine set_tetragon (this, L, nc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: L (2) integer, intent(in) :: nc (2) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private impure subroutine show (this, vtkfile_Xc, vtkfile_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg private pure subroutine translate_Xc (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) private pure subroutine translate_Xg (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:)","tags":"","loc":"module/forcad_nurbs_surface.html"},{"title":"forcad_utils – ForCAD","text":"This module contains parameters, functions and subroutines that are used in the library. Uses stdlib_quadrature module~~forcad_utils~~UsesGraph module~forcad_utils forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Used by module~~forcad_utils~~UsedByGraph module~forcad_utils forcad_utils module~forcad forcad module~forcad->module~forcad_utils module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils proc~compute_d2tgc_bspline_1d_scalar compute_d2Tgc_bspline_1d_scalar proc~compute_d2tgc_bspline_1d_scalar->module~forcad_utils proc~compute_d2tgc_bspline_1d_vector compute_d2Tgc_bspline_1d_vector proc~compute_d2tgc_bspline_1d_vector->module~forcad_utils proc~compute_d2tgc_bspline_2d_scalar compute_d2Tgc_bspline_2d_scalar proc~compute_d2tgc_bspline_2d_scalar->module~forcad_utils proc~compute_d2tgc_bspline_2d_vector compute_d2Tgc_bspline_2d_vector proc~compute_d2tgc_bspline_2d_vector->module~forcad_utils proc~compute_d2tgc_bspline_3d_scalar compute_d2Tgc_bspline_3d_scalar proc~compute_d2tgc_bspline_3d_scalar->module~forcad_utils proc~compute_d2tgc_bspline_3d_vector compute_d2Tgc_bspline_3d_vector proc~compute_d2tgc_bspline_3d_vector->module~forcad_utils proc~compute_d2tgc_nurbs_1d_scalar compute_d2Tgc_nurbs_1d_scalar proc~compute_d2tgc_nurbs_1d_scalar->module~forcad_utils proc~compute_d2tgc_nurbs_1d_vector compute_d2Tgc_nurbs_1d_vector proc~compute_d2tgc_nurbs_1d_vector->module~forcad_utils proc~compute_d2tgc_nurbs_2d_scalar compute_d2Tgc_nurbs_2d_scalar proc~compute_d2tgc_nurbs_2d_scalar->module~forcad_utils proc~compute_d2tgc_nurbs_2d_vector compute_d2Tgc_nurbs_2d_vector proc~compute_d2tgc_nurbs_2d_vector->module~forcad_utils proc~compute_d2tgc_nurbs_3d_scalar compute_d2Tgc_nurbs_3d_scalar proc~compute_d2tgc_nurbs_3d_scalar->module~forcad_utils proc~compute_d2tgc_nurbs_3d_vector compute_d2Tgc_nurbs_3d_vector proc~compute_d2tgc_nurbs_3d_vector->module~forcad_utils proc~compute_dtgc_bspline_1d_scalar compute_dTgc_bspline_1d_scalar proc~compute_dtgc_bspline_1d_scalar->module~forcad_utils proc~compute_dtgc_bspline_1d_vector compute_dTgc_bspline_1d_vector proc~compute_dtgc_bspline_1d_vector->module~forcad_utils proc~compute_dtgc_bspline_2d_scalar compute_dTgc_bspline_2d_scalar proc~compute_dtgc_bspline_2d_scalar->module~forcad_utils proc~compute_dtgc_bspline_2d_vector compute_dTgc_bspline_2d_vector proc~compute_dtgc_bspline_2d_vector->module~forcad_utils proc~compute_dtgc_bspline_3d_scalar compute_dTgc_bspline_3d_scalar proc~compute_dtgc_bspline_3d_scalar->module~forcad_utils proc~compute_dtgc_bspline_3d_vector compute_dTgc_bspline_3d_vector proc~compute_dtgc_bspline_3d_vector->module~forcad_utils proc~compute_dtgc_nurbs_1d_scalar compute_dTgc_nurbs_1d_scalar proc~compute_dtgc_nurbs_1d_scalar->module~forcad_utils proc~compute_dtgc_nurbs_1d_vector compute_dTgc_nurbs_1d_vector proc~compute_dtgc_nurbs_1d_vector->module~forcad_utils proc~compute_dtgc_nurbs_2d_scalar compute_dTgc_nurbs_2d_scalar proc~compute_dtgc_nurbs_2d_scalar->module~forcad_utils proc~compute_dtgc_nurbs_2d_vector compute_dTgc_nurbs_2d_vector proc~compute_dtgc_nurbs_2d_vector->module~forcad_utils proc~compute_dtgc_nurbs_3d_scalar compute_dTgc_nurbs_3d_scalar proc~compute_dtgc_nurbs_3d_scalar->module~forcad_utils proc~compute_dtgc_nurbs_3d_vector compute_dTgc_nurbs_3d_vector proc~compute_dtgc_nurbs_3d_vector->module~forcad_utils proc~compute_tgc_bspline_1d_scalar compute_Tgc_bspline_1d_scalar proc~compute_tgc_bspline_1d_scalar->module~forcad_utils proc~compute_tgc_bspline_1d_vector compute_Tgc_bspline_1d_vector proc~compute_tgc_bspline_1d_vector->module~forcad_utils proc~compute_tgc_bspline_2d_scalar compute_Tgc_bspline_2d_scalar proc~compute_tgc_bspline_2d_scalar->module~forcad_utils proc~compute_tgc_bspline_2d_vector compute_Tgc_bspline_2d_vector proc~compute_tgc_bspline_2d_vector->module~forcad_utils proc~compute_tgc_bspline_3d_scalar compute_Tgc_bspline_3d_scalar proc~compute_tgc_bspline_3d_scalar->module~forcad_utils proc~compute_tgc_bspline_3d_vector compute_Tgc_bspline_3d_vector proc~compute_tgc_bspline_3d_vector->module~forcad_utils proc~compute_tgc_nurbs_1d_scalar compute_Tgc_nurbs_1d_scalar proc~compute_tgc_nurbs_1d_scalar->module~forcad_utils proc~compute_tgc_nurbs_1d_vector compute_Tgc_nurbs_1d_vector proc~compute_tgc_nurbs_1d_vector->module~forcad_utils proc~compute_tgc_nurbs_2d_scalar compute_Tgc_nurbs_2d_scalar proc~compute_tgc_nurbs_2d_scalar->module~forcad_utils proc~compute_tgc_nurbs_2d_vector compute_Tgc_nurbs_2d_vector proc~compute_tgc_nurbs_2d_vector->module~forcad_utils proc~compute_tgc_nurbs_3d_scalar compute_Tgc_nurbs_3d_scalar proc~compute_tgc_nurbs_3d_scalar->module~forcad_utils proc~compute_tgc_nurbs_3d_vector compute_Tgc_nurbs_3d_vector proc~compute_tgc_nurbs_3d_vector->module~forcad_utils proc~compute_xg_bspline_1d compute_Xg_bspline_1d proc~compute_xg_bspline_1d->module~forcad_utils proc~compute_xg_bspline_1d_1point compute_Xg_bspline_1d_1point proc~compute_xg_bspline_1d_1point->module~forcad_utils proc~compute_xg_bspline_2d compute_Xg_bspline_2d proc~compute_xg_bspline_2d->module~forcad_utils proc~compute_xg_bspline_2d_1point compute_Xg_bspline_2d_1point proc~compute_xg_bspline_2d_1point->module~forcad_utils proc~compute_xg_bspline_3d compute_Xg_bspline_3d proc~compute_xg_bspline_3d->module~forcad_utils proc~compute_xg_bspline_3d_1point compute_Xg_bspline_3d_1point proc~compute_xg_bspline_3d_1point->module~forcad_utils proc~compute_xg_nurbs_1d compute_Xg_nurbs_1d proc~compute_xg_nurbs_1d->module~forcad_utils proc~compute_xg_nurbs_1d_1point compute_Xg_nurbs_1d_1point proc~compute_xg_nurbs_1d_1point->module~forcad_utils proc~compute_xg_nurbs_2d compute_Xg_nurbs_2d proc~compute_xg_nurbs_2d->module~forcad_utils proc~compute_xg_nurbs_2d_1point compute_Xg_nurbs_2d_1point proc~compute_xg_nurbs_2d_1point->module~forcad_utils proc~compute_xg_nurbs_3d compute_Xg_nurbs_3d proc~compute_xg_nurbs_3d->module~forcad_utils proc~compute_xg_nurbs_3d_1point compute_Xg_nurbs_3d_1point proc~compute_xg_nurbs_3d_1point->module~forcad_utils proc~nearest_point_help_1d nearest_point_help_1d proc~nearest_point_help_1d->module~forcad_utils proc~nearest_point_help_2d nearest_point_help_2d proc~nearest_point_help_2d->module~forcad_utils proc~nearest_point_help_3d nearest_point_help_3d proc~nearest_point_help_3d->module~forcad_utils program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->module~forcad_utils program~example_put_to_nurbs->module~forcad program~compute_area compute_area program~compute_area->module~forcad program~compute_length compute_length program~compute_length->module~forcad program~compute_volume compute_volume program~compute_volume->module~forcad program~example1_curve example1_curve program~example1_curve->module~forcad program~example3_surface example3_surface program~example3_surface->module~forcad program~example3_volume example3_volume program~example3_volume->module~forcad program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->module~forcad program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->module~forcad program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->module~forcad program~example_ppm1 example_ppm1 program~example_ppm1->module~forcad program~example_ppm2 example_ppm2 program~example_ppm2->module~forcad program~example_ppm3 example_ppm3 program~example_ppm3->module~forcad program~nearest_point_1d nearest_point_1d program~nearest_point_1d->module~forcad program~nearest_point_2d nearest_point_2d program~nearest_point_2d->module~forcad program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->module~forcad program~nearest_point_3d nearest_point_3d program~nearest_point_3d->module~forcad program~shape_c_1d shape_C_1d program~shape_c_1d->module~forcad program~shape_c_2d shape_C_2d program~shape_c_2d->module~forcad program~shape_c_3d shape_C_3d program~shape_c_3d->module~forcad program~shape_circle shape_circle program~shape_circle->module~forcad program~shape_half_circle shape_half_circle program~shape_half_circle->module~forcad program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->module~forcad program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->module~forcad program~shape_hexahedron shape_hexahedron program~shape_hexahedron->module~forcad program~shape_ring_2d shape_ring_2d program~shape_ring_2d->module~forcad program~shape_ring_3d shape_ring_3d program~shape_ring_3d->module~forcad program~shape_tetragon shape_tetragon program~shape_tetragon->module~forcad Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Visibility Attributes Name Initial integer, public, parameter :: rk = kind(1.0d0) Interfaces public        interface compute_multiplicity private pure function compute_multiplicity1 (knot) result(multiplicity) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: knot (:) Return Value integer, allocatable, (:) private pure function compute_multiplicity2 (knot, Xth) result(multiplicity) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in) :: Xth Return Value integer public        interface dyad private pure function dyad_t1_t1 (a, b) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: a (:) real(kind=rk), intent(in), contiguous :: b (:) Return Value real(kind=rk), allocatable, (:,:) public        interface elemConn_C0 private pure function cmp_elemConn_C0_L (nnode, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode integer, intent(in) :: p Return Value integer, allocatable, (:,:) private pure function cmp_elemConn_C0_S (nnode1, nnode2, p1, p2) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: p1 integer, intent(in) :: p2 Return Value integer, allocatable, (:,:) private pure function cmp_elemConn_C0_V (nnode1, nnode2, nnode3, p1, p2, p3) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: nnode3 integer, intent(in) :: p1 integer, intent(in) :: p2 integer, intent(in) :: p3 Return Value integer, allocatable, (:,:) public        interface elemConn_Cn private pure subroutine cmp_elemConn_Cn_L (nnode, p, Xth, vecKnot_mul, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode integer, intent(in) :: p real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: vecKnot_mul (:) integer, intent(out), allocatable :: elemConn (:,:) private pure subroutine cmp_elemConn_Cn_S (nnode1, nnode2, p1, p2, Xth1, Xth2, vecKnot_mul1, vecKnot_mul2, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: p1 integer, intent(in) :: p2 real(kind=rk), intent(in), contiguous :: Xth1 (:) real(kind=rk), intent(in), contiguous :: Xth2 (:) integer, intent(in), contiguous :: vecKnot_mul1 (:) integer, intent(in), contiguous :: vecKnot_mul2 (:) integer, intent(out), allocatable :: elemConn (:,:) private pure subroutine cmp_elemConn_Cn_V (nnode1, nnode2, nnode3, p1, p2, p3, Xth1, Xth2, Xth3, vecKnot_mul1, vecKnot_mul2, vecKnot_mul3, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: nnode3 integer, intent(in) :: p1 integer, intent(in) :: p2 integer, intent(in) :: p3 real(kind=rk), intent(in), contiguous :: Xth1 (:) real(kind=rk), intent(in), contiguous :: Xth2 (:) real(kind=rk), intent(in), contiguous :: Xth3 (:) integer, intent(in), contiguous :: vecKnot_mul1 (:) integer, intent(in), contiguous :: vecKnot_mul2 (:) integer, intent(in), contiguous :: vecKnot_mul3 (:) integer, intent(out), allocatable :: elemConn (:,:) public        interface gauss_leg private pure subroutine gauss_legendre_1D (interval, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval (2) integer, intent(in) :: degree real(kind=rk), intent(out), allocatable :: Xksi (:) real(kind=rk), intent(out), allocatable :: Wksi (:) private pure subroutine gauss_legendre_2D (interval1, interval2, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval1 (2) real(kind=rk), intent(in) :: interval2 (2) integer, intent(in) :: degree (2) real(kind=rk), intent(out), allocatable :: Xksi (:,:) real(kind=rk), intent(out), allocatable :: Wksi (:) private pure subroutine gauss_legendre_3D (interval1, interval2, interval3, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval1 (2) real(kind=rk), intent(in) :: interval2 (2) real(kind=rk), intent(in) :: interval3 (2) integer, intent(in) :: degree (3) real(kind=rk), intent(out), allocatable :: Xksi (:,:) real(kind=rk), intent(out), allocatable :: Wksi (:) public        interface ndgrid private pure subroutine ndgrid2 (X_dir1, X_dir2, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: X_dir1 (:) real(kind=rk), intent(in), contiguous :: X_dir2 (:) real(kind=rk), intent(out), allocatable :: Xt (:,:) private pure subroutine ndgrid3 (X_dir1, X_dir2, X_dir3, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: X_dir1 (:) real(kind=rk), intent(in), contiguous :: X_dir2 (:) real(kind=rk), intent(in), contiguous :: X_dir3 (:) real(kind=rk), intent(out), allocatable :: Xt (:,:) public        interface unique private pure function unique_integer (vec) result(output) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in), dimension(:), contiguous :: vec Return Value integer, dimension(:), allocatable private pure function unique_real (vec) result(output) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), dimension(:), contiguous :: vec Return Value real(kind=rk), dimension(:), allocatable Functions public pure function basis_bernstein (Xt, nc) result(B) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt integer, intent(in) :: nc Return Value real(kind=rk), allocatable, (:) public pure function basis_bspline (Xt, knot, nc, degree) result(B) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: nc integer, intent(in) :: degree Return Value real(kind=rk), allocatable, (:) public pure function compute_knot_vector (Xth_dir, degree, continuity) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xth_dir (:) integer, intent(in) :: degree integer, intent(in), contiguous :: continuity (:) Return Value real(kind=rk), allocatable, (:) public pure function det (A) result(detA) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: A (:,:) Return Value real(kind=rk) public pure function findspan (n, degree, Xth, knot) result(s) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: n integer, intent(in) :: degree real(kind=rk), intent(in) :: Xth real(kind=rk), intent(in), contiguous :: knot (:) Return Value integer public pure function hexahedron_Xc (L, nc) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: L (3) integer, intent(in) :: nc (3) Return Value real(kind=rk), allocatable, (:,:) public pure recursive function inv (A) result(A_inv) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: A (:,:) Return Value real(kind=rk), allocatable, (:,:) public pure function kron (u, v) result(w) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: u (:) real(kind=rk), intent(in), contiguous :: v (:) Return Value real(kind=rk), (size(u)*size(v)) public pure function rotation (alpha, beta, theta) result(R) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta Return Value real(kind=rk), dimension(3,3) public pure function tetragon_Xc (L, nc) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: L (2) integer, intent(in) :: nc (2) Return Value real(kind=rk), allocatable, (:,:) private pure function bincoeff (n, k) result(b) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: n integer, intent(in) :: k Return Value real(kind=rk) private pure function cmp_elemConn_C0_L (nnode, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode integer, intent(in) :: p Return Value integer, allocatable, (:,:) private pure function cmp_elemConn_C0_S (nnode1, nnode2, p1, p2) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: p1 integer, intent(in) :: p2 Return Value integer, allocatable, (:,:) private pure function cmp_elemConn_C0_V (nnode1, nnode2, nnode3, p1, p2, p3) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: nnode3 integer, intent(in) :: p1 integer, intent(in) :: p2 integer, intent(in) :: p3 Return Value integer, allocatable, (:,:) private pure function compute_multiplicity1 (knot) result(multiplicity) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: knot (:) Return Value integer, allocatable, (:) private pure function compute_multiplicity2 (knot, Xth) result(multiplicity) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in) :: Xth Return Value integer private pure function dyad_t1_t1 (a, b) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: a (:) real(kind=rk), intent(in), contiguous :: b (:) Return Value real(kind=rk), allocatable, (:,:) private pure function factln (n) result(f) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: n Return Value real(kind=rk) private pure elemental function isinf (x) result(output) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: x Return Value logical private pure elemental function isnan (x) result(output) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: x Return Value logical private pure function repelem (a, b) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: a (:) integer, intent(in), contiguous :: b (:) Return Value real(kind=rk), (sum(b)) private pure function unique_integer (vec) result(output) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in), dimension(:), contiguous :: vec Return Value integer, dimension(:), allocatable private pure function unique_real (vec) result(output) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), dimension(:), contiguous :: vec Return Value real(kind=rk), dimension(:), allocatable Subroutines public pure subroutine basis_bspline_2der (Xt, knot, nc, degree, d2B, dB, B) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: nc integer, intent(in) :: degree real(kind=rk), intent(out), allocatable :: d2B (:) real(kind=rk), intent(out), optional, allocatable :: dB (:) real(kind=rk), intent(out), optional, allocatable :: B (:) public pure subroutine basis_bspline_der (Xt, knot, nc, degree, dB, B) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: nc integer, intent(in) :: degree real(kind=rk), intent(out), allocatable :: dB (:) real(kind=rk), intent(out), optional, allocatable :: B (:) public pure subroutine elevate_degree_A_5_9 (t, knot, degree, Xcw, nc_new, knot_new, Xcw_new) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: t real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree real(kind=rk), intent(in), contiguous :: Xcw (:,:) integer, intent(out) :: nc_new real(kind=rk), intent(out), allocatable :: knot_new (:) real(kind=rk), intent(out), allocatable :: Xcw_new (:,:) public pure subroutine insert_knot_A_5_1 (p, UP, Pw, u, k, s, r, nq, UQ, Qw) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: p real(kind=rk), intent(in), contiguous :: UP (0:) real(kind=rk), intent(in), contiguous :: Pw (0:,:) real(kind=rk), intent(in) :: u integer, intent(in) :: k integer, intent(in) :: s integer, intent(in) :: r integer, intent(out) :: nq real(kind=rk), intent(out), allocatable :: UQ (:) real(kind=rk), intent(out), allocatable :: Qw (:,:) public pure subroutine remove_knots_A_5_8 (p, knot, Pw, u, r, s, num, t, knot_new, Pw_new) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: p real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Pw (:,:) real(kind=rk), intent(in) :: u integer, intent(in) :: r integer, intent(in) :: s integer, intent(in) :: num integer, intent(out) :: t real(kind=rk), intent(out), allocatable :: knot_new (:) real(kind=rk), intent(out), allocatable :: Pw_new (:,:) private pure subroutine cmp_elemConn_Cn_L (nnode, p, Xth, vecKnot_mul, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode integer, intent(in) :: p real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: vecKnot_mul (:) integer, intent(out), allocatable :: elemConn (:,:) private pure subroutine cmp_elemConn_Cn_S (nnode1, nnode2, p1, p2, Xth1, Xth2, vecKnot_mul1, vecKnot_mul2, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: p1 integer, intent(in) :: p2 real(kind=rk), intent(in), contiguous :: Xth1 (:) real(kind=rk), intent(in), contiguous :: Xth2 (:) integer, intent(in), contiguous :: vecKnot_mul1 (:) integer, intent(in), contiguous :: vecKnot_mul2 (:) integer, intent(out), allocatable :: elemConn (:,:) private pure subroutine cmp_elemConn_Cn_V (nnode1, nnode2, nnode3, p1, p2, p3, Xth1, Xth2, Xth3, vecKnot_mul1, vecKnot_mul2, vecKnot_mul3, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: nnode3 integer, intent(in) :: p1 integer, intent(in) :: p2 integer, intent(in) :: p3 real(kind=rk), intent(in), contiguous :: Xth1 (:) real(kind=rk), intent(in), contiguous :: Xth2 (:) real(kind=rk), intent(in), contiguous :: Xth3 (:) integer, intent(in), contiguous :: vecKnot_mul1 (:) integer, intent(in), contiguous :: vecKnot_mul2 (:) integer, intent(in), contiguous :: vecKnot_mul3 (:) integer, intent(out), allocatable :: elemConn (:,:) private pure subroutine gauss_legendre_1D (interval, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval (2) integer, intent(in) :: degree real(kind=rk), intent(out), allocatable :: Xksi (:) real(kind=rk), intent(out), allocatable :: Wksi (:) private pure subroutine gauss_legendre_2D (interval1, interval2, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval1 (2) real(kind=rk), intent(in) :: interval2 (2) integer, intent(in) :: degree (2) real(kind=rk), intent(out), allocatable :: Xksi (:,:) real(kind=rk), intent(out), allocatable :: Wksi (:) private pure subroutine gauss_legendre_3D (interval1, interval2, interval3, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval1 (2) real(kind=rk), intent(in) :: interval2 (2) real(kind=rk), intent(in) :: interval3 (2) integer, intent(in) :: degree (3) real(kind=rk), intent(out), allocatable :: Xksi (:,:) real(kind=rk), intent(out), allocatable :: Wksi (:) private pure subroutine ndgrid2 (X_dir1, X_dir2, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: X_dir1 (:) real(kind=rk), intent(in), contiguous :: X_dir2 (:) real(kind=rk), intent(out), allocatable :: Xt (:,:) private pure subroutine ndgrid3 (X_dir1, X_dir2, X_dir3, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: X_dir1 (:) real(kind=rk), intent(in), contiguous :: X_dir2 (:) real(kind=rk), intent(in), contiguous :: X_dir3 (:) real(kind=rk), intent(out), allocatable :: Xt (:,:)","tags":"","loc":"module/forcad_utils.html"},{"title":"forcad_nurbs_curve – ForCAD","text":"This module defines the 'nurbs_curve' type for representing a Non-Uniform Rational B-Spline (NURBS) curve. Uses forcad_utils module~~forcad_nurbs_curve~~UsesGraph module~forcad_nurbs_curve forcad_nurbs_curve module~forcad_utils forcad_utils module~forcad_nurbs_curve->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Used by module~~forcad_nurbs_curve~~UsedByGraph module~forcad_nurbs_curve forcad_nurbs_curve module~forcad forcad module~forcad->module~forcad_nurbs_curve program~compute_area compute_area program~compute_area->module~forcad program~compute_length compute_length program~compute_length->module~forcad program~compute_volume compute_volume program~compute_volume->module~forcad program~example1_curve example1_curve program~example1_curve->module~forcad program~example3_surface example3_surface program~example3_surface->module~forcad program~example3_volume example3_volume program~example3_volume->module~forcad program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->module~forcad program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->module~forcad program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->module~forcad program~example_ppm1 example_ppm1 program~example_ppm1->module~forcad program~example_ppm2 example_ppm2 program~example_ppm2->module~forcad program~example_ppm3 example_ppm3 program~example_ppm3->module~forcad program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->module~forcad program~nearest_point_1d nearest_point_1d program~nearest_point_1d->module~forcad program~nearest_point_2d nearest_point_2d program~nearest_point_2d->module~forcad program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->module~forcad program~nearest_point_3d nearest_point_3d program~nearest_point_3d->module~forcad program~shape_c_1d shape_C_1d program~shape_c_1d->module~forcad program~shape_c_2d shape_C_2d program~shape_c_2d->module~forcad program~shape_c_3d shape_C_3d program~shape_c_3d->module~forcad program~shape_circle shape_circle program~shape_circle->module~forcad program~shape_half_circle shape_half_circle program~shape_half_circle->module~forcad program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->module~forcad program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->module~forcad program~shape_hexahedron shape_hexahedron program~shape_hexahedron->module~forcad program~shape_ring_2d shape_ring_2d program~shape_ring_2d->module~forcad program~shape_ring_3d shape_ring_3d program~shape_ring_3d->module~forcad program~shape_tetragon shape_tetragon program~shape_tetragon->module~forcad Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Interfaces private        interface compute_Tgc private pure function compute_Tgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Tgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private        interface compute_Xg private pure function compute_Xg_bspline_1d(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_bspline_1d_1point(f_Xt, f_knot, f_degree, f_nc, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Xg_nurbs_1d(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_nurbs_1d_1point(f_Xt, f_knot, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private        interface compute_d2Tgc private pure subroutine compute_d2Tgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(out), allocatable :: f_d2Tgc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_d2Tgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private        interface compute_dTgc private pure subroutine compute_dTgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_dTgc, f_Tgc, f_elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(out), allocatable :: f_dTgc (:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in), optional :: f_elem (:) private pure subroutine compute_dTgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_dTgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, f_elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in), optional :: f_elem (:) private pure subroutine compute_dTgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) interface private pure function nearest_point_help_1d(f_ng, f_Xg, f_point_Xg) result(f_distances) Arguments Type Intent Optional Attributes Name integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Xg (:,:) real(kind=rk), intent(in), contiguous :: f_point_Xg (:) Return Value real(kind=rk), allocatable, (:) Derived Types type, public :: nurbs_curve Components Type Visibility Attributes Name Initial real(kind=rk), private, allocatable :: Wc (:) Weights for control points (1D array: [nc]) real(kind=rk), private, allocatable :: Xc (:,:) Control points (2D array: [nc, dim]) real(kind=rk), private, allocatable :: Xg (:,:) Geometry points (2D array: [ng, dim]) real(kind=rk), private, allocatable :: Xt (:) Evaluation points (1D array: [ng]) integer, private :: degree Degree (order) of the curve integer, private, allocatable :: elemConn (:,:) IGA element connectivity integer, private, allocatable :: elemConn_Xc_vis (:,:) Connectivity for visualization of control points integer, private, allocatable :: elemConn_Xg_vis (:,:) Connectivity for visualization of geometry points real(kind=rk), private, allocatable :: knot (:) Knot vector (1D array) integer, private :: nc Number of control points integer, private :: ng Number of geometry points Type-Bound Procedures procedure, public :: ansatz Compute the shape functions, derivative of shape functions and dL Read more… generic, public :: basis => basis_vector , basis_scalar Compute the basis functions of the NURBS curve Read more… procedure, public :: cmp_Xg Compute geometry points Read more… procedure, public :: cmp_degree Compute degree of the NURBS curve Read more… procedure, public :: cmp_elem Generate IGA element connectivity Read more… procedure, public :: cmp_elem_Xc_vis Generate connectivity for control points Read more… procedure, public :: cmp_elem_Xg_vis Generate connectivity for geometry points Read more… procedure, public :: cmp_length Compute the length of the NURBS curve Read more… procedure, public :: cmp_nc Compute number of required control points Read more… procedure, public :: create Generate geometry points Read more… generic, public :: derivative => derivative_vector , derivative_scalar Compute the derivative of the NURBS curve Read more… generic, public :: derivative2 => derivative2_vector , derivative2_scalar Compute the second derivative of the NURBS curve Read more… procedure, public :: elevate_degree Elevate the degree of the curve Read more… procedure, public :: export_Xc Export control points to VTK file Read more… procedure, public :: export_Xg Export geometry points to VTK file Read more… procedure, public :: finalize Finalize the NURBS curve object Read more… generic, public :: get_Wc => get_Wc_all , get_Wci Get weights Read more… generic, public :: get_Xc => get_Xc_all , get_Xci , get_Xcid Get control points Read more… generic, public :: get_Xg => get_Xg_all , get_Xgi , get_Xgid Get geometry points Read more… procedure, public :: get_Xt Get parameter values Read more… procedure, public :: get_continuity Compute and return the continuity of the curve Read more… procedure, public :: get_degree Get degree of the NURBS curve Read more… procedure, public :: get_elem Get IGA element connectivity Read more… procedure, public :: get_elem_Xc_vis Get connectivity for control points Read more… procedure, public :: get_elem_Xg_vis Get connectivity for geometry points Read more… generic, public :: get_knot => get_knoti , get_knot_all Get knot vector Read more… procedure, public :: get_multiplicity Compute and return the multiplicity of the knots Read more… procedure, public :: get_nc Get number of control points Read more… procedure, public :: get_ng Get number of geometry points Read more… procedure, public :: insert_knots Insert knots into the knot vector Read more… procedure, public :: is_rational Check if the NURBS curve is rational Read more… procedure, public :: modify_Wc Modify weights Read more… procedure, public :: modify_Xc Modify control points Read more… procedure, public :: nearest_point Find the nearest point on the NURBS curve (Approximation) Read more… procedure, public :: nearest_point2 Find the nearest point on the NURBS curve (Minimization - Newton's method) Read more… procedure, public :: remove_knots Remove knots from the knot vector Read more… procedure, public :: rotate_Xc Rotate control points Read more… procedure, public :: rotate_Xg Rotate geometry points Read more… generic, public :: set => set1 , set1a , set2 , set3 , set4 Set NURBS curve Read more… procedure, public :: set1 Set knot vector, control points and weights for the NURBS curve object Read more… procedure, public :: set1a procedure, public :: set2 Set NURBS curve using nodes of parameter space, degree, continuity, control points and weights Read more… procedure, public :: set3 Set Bezier or Rational Bezier curve using control points and weights Read more… procedure, public :: set4 Set NURBS curve using degree, number of control points, control points and weights Read more… procedure, public :: set_C Set a C-shape Read more… procedure, public :: set_circle Set a circle Read more… procedure, public :: set_elem Set IGA element connectivity Read more… procedure, public :: set_elem_Xc_vis Set connectivity for control points Read more… procedure, public :: set_elem_Xg_vis Set connectivity for geometry points Read more… procedure, public :: set_half_circle Set a half circle Read more… procedure, public :: show Show the NURBS object using PyVista Read more… procedure, public :: translate_Xc Translate control points Read more… procedure, public :: translate_Xg Translate geometry points Read more… procedure, private :: basis_scalar Compute the basis functions of the NURBS curve Read more… procedure, private :: basis_vector Compute the basis functions of the NURBS curve Read more… procedure, private :: derivative2_scalar Compute the second derivative of the NURBS curve Read more… procedure, private :: derivative2_vector Compute the second derivative of the NURBS curve Read more… procedure, private :: derivative_scalar Compute the derivative of the NURBS curve Read more… procedure, private :: derivative_vector Compute the derivative of the NURBS curve Read more… procedure, private :: get_Wc_all Get all weights Read more… procedure, private :: get_Wci Get i-th weight Read more… procedure, private :: get_Xc_all Get all control points Read more… procedure, private :: get_Xci Get i-th control point Read more… procedure, private :: get_Xcid Get i-th control point in a specific direction Read more… procedure, private :: get_Xg_all Get all geometry points Read more… procedure, private :: get_Xgi Get i-th geometry point Read more… procedure, private :: get_Xgid Get i-th geometry point in a specific direction Read more… procedure, private :: get_knot_all Get all knot vectors Read more… procedure, private :: get_knoti Get i-th knot value Read more… Functions private pure function cmp_Xg (this, Xt) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this real(kind=rk), intent(in) :: Xt Return Value real(kind=rk), allocatable, (:) private pure function cmp_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function cmp_elem_Xc_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in), optional :: p Return Value integer, allocatable, (:,:) private pure function cmp_elem_Xg_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in), optional :: p Return Value integer, allocatable, (:,:) private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) private pure function get_Xt (this) result(Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) private pure function get_continuity (this) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:) private pure function get_degree (this) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer private pure function get_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_elem_Xc_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_elem_Xg_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_knot_all (this) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) private pure function get_knoti (this, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: i Return Value real(kind=rk) private pure function get_multiplicity (this) result(m) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:) private pure function get_nc (this) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer private pure function get_ng (this) result(ng) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer private pure function is_rational (this) result(r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value logical Subroutines private pure subroutine ansatz (this, ie, ig, Tgc, dTgc_dXg, dL) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dL private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: Tgc (:) private pure subroutine basis_vector (this, res, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) private pure subroutine cmp_degree (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this private pure subroutine cmp_length (this, length) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(out) :: length private pure subroutine cmp_nc (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this private pure subroutine create (this, res, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: d2Tgc (:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) private pure subroutine derivative2_vector (this, res, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: dTgc (:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) private pure subroutine derivative_vector (this, res, Xt, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine elevate_degree (this, t) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: t private impure subroutine export_Xc (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this character(len=*), intent(in) :: filename private impure subroutine export_Xg (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this character(len=*), intent(in) :: filename private pure subroutine finalize (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this private pure subroutine insert_knots (this, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) private pure subroutine modify_Wc (this, W, num) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num private pure subroutine modify_Xc (this, X, num, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir private pure subroutine nearest_point (this, point_Xg, nearest_Xg, nearest_Xt, id) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional :: nearest_Xt integer, intent(out), optional :: id private impure subroutine nearest_point2 (this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) private pure subroutine remove_knots (this, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) private pure subroutine rotate_Xc (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta private pure subroutine rotate_Xg (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta private pure subroutine set1 (this, knot, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vector, control points and weights for the NURBS curve object. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set1a (this, knot, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vector, control points and weights for the NURBS curve object. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Xc (:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set2 (this, Xth_dir, degree, continuity, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set NURBS curve using nodes of parameter space (Xth), degree, continuity, control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir (:) integer, intent(in) :: degree integer, intent(in), contiguous :: continuity (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set3 (this, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier curve using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set_C (this, center, radius) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius private pure subroutine set_circle (this, center, radius) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius private pure subroutine set_elem (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_elem_Xc_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_elem_Xg_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_half_circle (this, center, radius) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius private impure subroutine show (this, vtkfile_Xc, vtkfile_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg private pure subroutine translate_Xc (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) private pure subroutine translate_Xg (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:)","tags":"","loc":"module/forcad_nurbs_curve.html"},{"title":"nearest_point_3d – ForCAD","text":"Uses forcad program~~nearest_point_3d~~UsesGraph program~nearest_point_3d nearest_point_3d module~forcad forcad program~nearest_point_3d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. The weights of the control points (Wc) are optional. Generate the NURBS volume with resolutions of 20, 20, 20 Find the nearest point on the volume to a given point\nFind the nearest point on the volume to a given point\nThe optimization method is used to find the nearest point\nThe optimization method is based on the Newton-Raphson method\nFinalize the NURBS volume object Calls program~~nearest_point_3d~~CallsGraph program~nearest_point_3d nearest_point_3d none~set nurbs_volume%set program~nearest_point_3d->none~set proc~create nurbs_volume%create program~nearest_point_3d->proc~create proc~finalize nurbs_volume%finalize program~nearest_point_3d->proc~finalize proc~nearest_point nurbs_volume%nearest_point program~nearest_point_3d->proc~nearest_point proc~nearest_point2 nurbs_volume%nearest_point2 program~nearest_point_3d->proc~nearest_point2 proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 interface~compute_xg compute_Xg proc~create->interface~compute_xg interface~ndgrid ndgrid proc~create->interface~ndgrid proc~is_rational nurbs_volume%is_rational proc~create->proc~is_rational interface~nearest_point_help_3d nearest_point_help_3d proc~nearest_point->interface~nearest_point_help_3d proc~nearest_point2->proc~create proc~nearest_point2->proc~finalize proc~nearest_point2->proc~nearest_point none~derivative2 nurbs_volume%derivative2 proc~nearest_point2->none~derivative2 proc~cmp_xg nurbs_volume%cmp_Xg proc~nearest_point2->proc~cmp_xg proc~inv inv proc~nearest_point2->proc~inv proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~derivative2_scalar nurbs_volume%derivative2_scalar none~derivative2->proc~derivative2_scalar proc~derivative2_vector nurbs_volume%derivative2_vector none~derivative2->proc~derivative2_vector proc~cmp_xg->interface~compute_xg proc~cmp_xg->proc~is_rational proc~inv->proc~inv proc~det det proc~inv->proc~det proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~derivative2_scalar->proc~is_rational interface~compute_d2tgc compute_d2Tgc proc~derivative2_scalar->interface~compute_d2tgc proc~derivative2_vector->interface~ndgrid proc~derivative2_vector->proc~is_rational proc~derivative2_vector->interface~compute_d2tgc proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk) :: Wc (8) Weights of the control points real(kind=rk) :: Xc (8,3) Control points integer :: id id of the nearest point real(kind=rk), allocatable :: nearest_Xg (:) Coordinates of the nearest point on the volume real(kind=rk), allocatable :: nearest_Xt (:) Corresponding parametric coordinates of the nearest point type( nurbs_volume ) :: shape Declare a NURBS volume object","tags":"","loc":"program/nearest_point_3d.html"},{"title":"compute_volume – ForCAD","text":"Uses forcad program~~compute_volume~~UsesGraph program~compute_volume compute_volume module~forcad forcad program~compute_volume->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Calls program~~compute_volume~~CallsGraph program~compute_volume compute_volume none~set nurbs_volume%set program~compute_volume->none~set proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 proc~ansatz nurbs_volume%ansatz proc~cmp_volume->proc~ansatz proc~cmp_elem nurbs_volume%cmp_elem proc~cmp_volume->proc~cmp_elem proc~ansatz->none~set proc~ansatz->proc~cmp_elem interface~gauss_leg gauss_leg proc~ansatz->interface~gauss_leg interface~ndgrid ndgrid proc~ansatz->interface~ndgrid interface~unique unique proc~ansatz->interface~unique none~derivative nurbs_volume%derivative proc~ansatz->none~derivative proc~det det proc~ansatz->proc~det proc~inv inv proc~ansatz->proc~inv interface~elemconn_cn elemConn_Cn proc~cmp_elem->interface~elemconn_cn proc~cmp_elem->interface~unique proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_elem->proc~get_multiplicity proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar nurbs_volume%derivative_scalar none~derivative->proc~derivative_scalar proc~derivative_vector nurbs_volume%derivative_vector none~derivative->proc~derivative_vector proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity->interface~compute_multiplicity proc~inv->proc~det proc~inv->proc~inv proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 interface~compute_dtgc compute_dTgc proc~derivative_scalar->interface~compute_dtgc proc~is_rational nurbs_volume%is_rational proc~derivative_scalar->proc~is_rational proc~derivative_vector->interface~ndgrid proc~derivative_vector->interface~compute_dtgc proc~derivative_vector->proc~is_rational gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_2d->gauss_legendre proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk) :: Xc (8,3) type( nurbs_volume ) :: shape real(kind=rk) :: volume","tags":"","loc":"program/compute_volume.html"},{"title":"shape_C_1d – ForCAD","text":"Uses forcad program~~shape_c_1d~~UsesGraph program~shape_c_1d shape_C_1d module~forcad forcad program~shape_c_1d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set a C-shape with radius 2.0 and center at [0.0, 0.0, 0.0] Export control points to a VTK file Generate the NURBS C-shape with a resolution of 100 Export the generated cirlce to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS curve object Calls program~~shape_c_1d~~CallsGraph program~shape_c_1d shape_C_1d proc~create~3 nurbs_curve%create program~shape_c_1d->proc~create~3 proc~export_xc~3 nurbs_curve%export_Xc program~shape_c_1d->proc~export_xc~3 proc~export_xg~3 nurbs_curve%export_Xg program~shape_c_1d->proc~export_xg~3 proc~finalize~3 nurbs_curve%finalize program~shape_c_1d->proc~finalize~3 proc~set_c~3 nurbs_curve%set_C program~shape_c_1d->proc~set_c~3 proc~show~3 nurbs_curve%show program~shape_c_1d->proc~show~3 interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 proc~is_rational~3 nurbs_curve%is_rational proc~create~3->proc~is_rational~3 proc~cmp_elem_xc_vis~3 nurbs_curve%cmp_elem_Xc_vis proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~cmp_elem_xg_vis~3 nurbs_curve%cmp_elem_Xg_vis proc~export_xg~3->proc~cmp_elem_xg_vis~3 none~set~3 nurbs_curve%set proc~set_c~3->none~set~3 proc~set1a nurbs_curve%set1a none~set~3->proc~set1a proc~set1~3 nurbs_curve%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_curve%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_curve%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_curve%set4 none~set~3->proc~set4~3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~set1~3->proc~cmp_degree~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_curve ) :: shape","tags":"","loc":"program/shape_c_1d.html"},{"title":"nearest_point_1d – ForCAD","text":"Uses forcad program~~nearest_point_1d~~UsesGraph program~nearest_point_1d nearest_point_1d module~forcad forcad program~nearest_point_1d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Define control points for the NURBS curve\nDefine weights for the control points (optional)\nDefine knot vector Set knot vector, control points, and weights for the NURBS curve object.\nWc is optional Generate the NURBS curve with a resolution of 20 Find the nearest point on the curve to a given point\nFind the nearest point on the curve to a given point\nThe optimization method is used to find the nearest point\nThe optimization method is based on the Newton-Raphson method\nFinalize the NURBS curve object Calls program~~nearest_point_1d~~CallsGraph program~nearest_point_1d nearest_point_1d none~set~3 nurbs_curve%set program~nearest_point_1d->none~set~3 proc~create~3 nurbs_curve%create program~nearest_point_1d->proc~create~3 proc~finalize~3 nurbs_curve%finalize program~nearest_point_1d->proc~finalize~3 proc~nearest_point2~3 nurbs_curve%nearest_point2 program~nearest_point_1d->proc~nearest_point2~3 proc~nearest_point~3 nurbs_curve%nearest_point program~nearest_point_1d->proc~nearest_point~3 proc~set1a nurbs_curve%set1a none~set~3->proc~set1a proc~set1~3 nurbs_curve%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_curve%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_curve%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_curve%set4 none~set~3->proc~set4~3 interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 proc~is_rational~3 nurbs_curve%is_rational proc~create~3->proc~is_rational~3 proc~nearest_point2~3->proc~create~3 proc~nearest_point2~3->proc~finalize~3 proc~nearest_point2~3->proc~nearest_point~3 none~derivative2~3 nurbs_curve%derivative2 proc~nearest_point2~3->none~derivative2~3 proc~cmp_xg~3 nurbs_curve%cmp_Xg proc~nearest_point2~3->proc~cmp_xg~3 interface~nearest_point_help_1d nearest_point_help_1d proc~nearest_point~3->interface~nearest_point_help_1d proc~derivative2_scalar~3 nurbs_curve%derivative2_scalar none~derivative2~3->proc~derivative2_scalar~3 proc~derivative2_vector~3 nurbs_curve%derivative2_vector none~derivative2~3->proc~derivative2_vector~3 proc~cmp_xg~3->interface~compute_xg~3 proc~cmp_xg~3->proc~is_rational~3 proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~set1~3->proc~cmp_degree~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~derivative2_scalar~3->proc~is_rational~3 interface~compute_d2tgc~3 compute_d2Tgc proc~derivative2_scalar~3->interface~compute_d2tgc~3 proc~derivative2_vector~3->proc~is_rational~3 proc~derivative2_vector~3->interface~compute_d2tgc~3 interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Wc (:) Arrays for control points and weights real(kind=rk), allocatable :: Xc (:,:) Arrays for control points and weights integer :: id Variable for the id of the nearest point real(kind=rk) :: knot (6) Array for knot vector real(kind=rk), allocatable :: nearest_Xg (:) Array for the nearest point on the curve real(kind=rk) :: nearest_Xt Array for the parametric coordinates of the nearest point type( nurbs_curve ) :: shape Declare a NURBS curve object","tags":"","loc":"program/nearest_point_1d.html"},{"title":"shape_tetragon – ForCAD","text":"Uses forcad program~~shape_tetragon~~UsesGraph program~shape_tetragon shape_tetragon module~forcad forcad program~shape_tetragon->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set a tetragon with lengths of 2.0 and 3.0 and 3 and 4 control points in each direction\nThe weights of the control points (Wc) are optional. Export the control points to a VTK file Generate the NURBS surface with resolutions of 30 in both dimensions Export the generated surface to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS surface object Calls program~~shape_tetragon~~CallsGraph program~shape_tetragon shape_tetragon proc~create~2 nurbs_surface%create program~shape_tetragon->proc~create~2 proc~export_xc~2 nurbs_surface%export_Xc program~shape_tetragon->proc~export_xc~2 proc~export_xg~2 nurbs_surface%export_Xg program~shape_tetragon->proc~export_xg~2 proc~finalize~2 nurbs_surface%finalize program~shape_tetragon->proc~finalize~2 proc~set_tetragon nurbs_surface%set_tetragon program~shape_tetragon->proc~set_tetragon proc~show~2 nurbs_surface%show program~shape_tetragon->proc~show~2 interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_surface%is_rational proc~create~2->proc~is_rational~2 proc~cmp_elem_xc_vis~2 nurbs_surface%cmp_elem_Xc_vis proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~cmp_elem_xg_vis~2 nurbs_surface%cmp_elem_Xg_vis proc~export_xg~2->proc~cmp_elem_xg_vis~2 none~set~2 nurbs_surface%set proc~set_tetragon->none~set~2 proc~tetragon_xc tetragon_Xc proc~set_tetragon->proc~tetragon_xc proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_surface ) :: shape Declare a NURBS surface object","tags":"","loc":"program/shape_tetragon.html"},{"title":"example_ppm1 – ForCAD","text":"Uses forimage forcad fortime forcolormap program~~example_ppm1~~UsesGraph program~example_ppm1 example_ppm1 forcolormap forcolormap program~example_ppm1->forcolormap forimage forimage program~example_ppm1->forimage fortime fortime program~example_ppm1->fortime module~forcad forcad program~example_ppm1->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Visualization of NURBS surfaces using ForCAD, ForImage and ForColorMap libraries\nThis example converts NURBS surfaces (vector) to an image (raster) using ForCAD, ForImage and ForColorMap libraries. Set the shape parameters for a tetragon\nSet the shape parameters for a ring\nSet the shape parameters for a ring\nSet the shape parameters for a ring\nSet the shape parameters for a ring Calls program~~example_ppm1~~CallsGraph program~example_ppm1 example_ppm1 compute_rgb compute_rgb program~example_ppm1->compute_rgb export_pnm export_pnm program~example_ppm1->export_pnm get_b get_b program~example_ppm1->get_b get_g get_g program~example_ppm1->get_g get_r get_r program~example_ppm1->get_r none~get_xg~2 nurbs_surface%get_Xg program~example_ppm1->none~get_xg~2 proc~create~2 nurbs_surface%create program~example_ppm1->proc~create~2 proc~finalize~2 nurbs_surface%finalize program~example_ppm1->proc~finalize~2 proc~get_ng~2 nurbs_surface%get_ng program~example_ppm1->proc~get_ng~2 proc~set_ring~2 nurbs_surface%set_ring program~example_ppm1->proc~set_ring~2 proc~set_tetragon nurbs_surface%set_tetragon program~example_ppm1->proc~set_tetragon set set program~example_ppm1->set set_pnm set_pnm program~example_ppm1->set_pnm timer_start timer_start program~example_ppm1->timer_start timer_stop timer_stop program~example_ppm1->timer_stop proc~get_xg_all~2 nurbs_surface%get_Xg_all none~get_xg~2->proc~get_xg_all~2 proc~get_xgid~2 nurbs_surface%get_Xgid none~get_xg~2->proc~get_xgid~2 proc~get_xgi~2 nurbs_surface%get_Xgi none~get_xg~2->proc~get_xgi~2 interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_surface%is_rational proc~create~2->proc~is_rational~2 none~set~2 nurbs_surface%set proc~set_ring~2->none~set~2 proc~set_tetragon->none~set~2 proc~tetragon_xc tetragon_Xc proc~set_tetragon->proc~tetragon_xc proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Xg (:,:) real(kind=rk) :: aspect_ratio type(color) :: background_color integer :: blue real(kind=rk) :: center (3) type(colormap) :: cmap integer :: green integer :: height integer :: i integer, allocatable :: idx (:,:) type(format_pnm) :: image real(kind=rk) :: inner_radius integer :: ng (2) real(kind=rk) :: outer_radius integer(kind=ik), allocatable :: px (:,:) integer :: red integer :: res1 integer :: res2 type( nurbs_surface ) :: shape type(timer) :: t integer :: width real(kind=rk), allocatable :: z_values (:)","tags":"","loc":"program/example_ppm1.html"},{"title":"shape_half_circle – ForCAD","text":"Uses forcad program~~shape_half_circle~~UsesGraph program~shape_half_circle shape_half_circle module~forcad forcad program~shape_half_circle->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set up a half circle shape centered at the 0,0,0 with a radius of 1 Export the control points to a VTK file for visualization. Create the shape using the specified number of elements in each direction. Export the geometry to a VTK file for visualization. Show the control geometry and geometry using PyVista Finalize and clean up the shape object. Calls program~~shape_half_circle~~CallsGraph program~shape_half_circle shape_half_circle proc~create~3 nurbs_curve%create program~shape_half_circle->proc~create~3 proc~export_xc~3 nurbs_curve%export_Xc program~shape_half_circle->proc~export_xc~3 proc~export_xg~3 nurbs_curve%export_Xg program~shape_half_circle->proc~export_xg~3 proc~finalize~3 nurbs_curve%finalize program~shape_half_circle->proc~finalize~3 proc~set_half_circle nurbs_curve%set_half_circle program~shape_half_circle->proc~set_half_circle proc~show~3 nurbs_curve%show program~shape_half_circle->proc~show~3 interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 proc~is_rational~3 nurbs_curve%is_rational proc~create~3->proc~is_rational~3 proc~cmp_elem_xc_vis~3 nurbs_curve%cmp_elem_Xc_vis proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~cmp_elem_xg_vis~3 nurbs_curve%cmp_elem_Xg_vis proc~export_xg~3->proc~cmp_elem_xg_vis~3 none~set~3 nurbs_curve%set proc~set_half_circle->none~set~3 proc~set1a nurbs_curve%set1a none~set~3->proc~set1a proc~set1~3 nurbs_curve%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_curve%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_curve%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_curve%set4 none~set~3->proc~set4~3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~set1~3->proc~cmp_degree~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_curve ) :: shape","tags":"","loc":"program/shape_half_circle.html"},{"title":"example_nurbs_volume – ForCAD","text":"Uses forcad program~~example_nurbs_volume~~UsesGraph program~example_nurbs_volume example_nurbs_volume module~forcad forcad program~example_nurbs_volume->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. This program demonstrates the usage of a NURBS volume object to create, and finalize a NURBS volume.\nIt sets up control points and weights, generates the volume, and exports the control points\nand the volume to VTK files at various stages. Define control points for the NURBS volume Define weights for the control points Set control points and weights for the NURBS volume object Deallocate local arrays Export initial control points to a VTK file Generate the NURBS volume with a resolution of 15X15X15 Export the generated volume to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS volume object Calls program~~example_nurbs_volume~~CallsGraph program~example_nurbs_volume example_nurbs_volume none~set nurbs_volume%set program~example_nurbs_volume->none~set proc~create nurbs_volume%create program~example_nurbs_volume->proc~create proc~export_xc nurbs_volume%export_Xc program~example_nurbs_volume->proc~export_xc proc~export_xg nurbs_volume%export_Xg program~example_nurbs_volume->proc~export_xg proc~finalize nurbs_volume%finalize program~example_nurbs_volume->proc~finalize proc~generate_xc generate_Xc program~example_nurbs_volume->proc~generate_xc proc~show nurbs_volume%show program~example_nurbs_volume->proc~show proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 interface~compute_xg compute_Xg proc~create->interface~compute_xg interface~ndgrid ndgrid proc~create->interface~ndgrid proc~is_rational nurbs_volume%is_rational proc~create->proc~is_rational proc~cmp_elem_xc_vis nurbs_volume%cmp_elem_Xc_vis proc~export_xc->proc~cmp_elem_xc_vis proc~cmp_elem_xg_vis nurbs_volume%cmp_elem_Xg_vis proc~export_xg->proc~cmp_elem_xg_vis proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Wc (:) Arrays for control points and weights real(kind=rk), allocatable :: Xc (:,:) Arrays for control points and weights type( nurbs_volume ) :: nurbs Declare a NURBS volume object Functions function generate_Xc (L) result(control_points) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: L Return Value real(kind=rk), allocatable, (:,:) Source Code program example_nurbs_volume use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: nurbs !! Declare a NURBS volume object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights !----------------------------------------------------------------------------- ! Setting up the NURBS volume !----------------------------------------------------------------------------- !> Define control points for the NURBS volume Xc = generate_Xc ( 1.0_rk ) !> Define weights for the control points allocate ( Wc ( size ( Xc , 1 )), source = 1.0_rk ) !> Set control points and weights for the NURBS volume object call nurbs % set ([ 2 , 2 , 2 ], Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export initial control points to a VTK file call nurbs % export_Xc ( 'vtk/demo_volume_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS volume !----------------------------------------------------------------------------- !> Generate the NURBS volume with a resolution of 15X15X15 call nurbs % create ( 15 , 15 , 15 ) !> Export the generated volume to a VTK file call nurbs % export_Xg ( 'vtk/demo_volume_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/demo_volume_Xc.vtk' , 'vtk/demo_volume_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS volume object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( L ) result ( control_points ) implicit none real ( rk ), intent ( in ) :: L real ( rk ), allocatable :: control_points (:,:) real ( rk ) :: L2 L2 = L / 2.0_rk allocate ( control_points ( 8 , 3 )) control_points ( 1 ,:) = [ L2 , - L2 , L2 ] control_points ( 2 ,:) = [ L2 , - L2 , - L2 ] control_points ( 3 ,:) = [ - L2 , - L2 , L2 ] control_points ( 4 ,:) = [ - L2 , - L2 , - L2 ] control_points ( 5 ,:) = [ L2 , L2 , L2 ] control_points ( 6 ,:) = [ L2 , L2 , - L2 ] control_points ( 7 ,:) = [ - L2 , L2 , L2 ] control_points ( 8 ,:) = [ - L2 , L2 , - L2 ] end function !----------------------------------------------------------------------------- end program example_nurbs_volume","tags":"","loc":"program/example_nurbs_volume.html"},{"title":"example_put_to_nurbs – ForCAD","text":"Uses forcad forcad_utils program~~example_put_to_nurbs~~UsesGraph program~example_put_to_nurbs example_put_to_nurbs module~forcad forcad program~example_put_to_nurbs->module~forcad module~forcad_utils forcad_utils program~example_put_to_nurbs->module~forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. You can create your shape or use a predefined one\nRead coordinates from file\nRead element connectivities from file\nSet a control shape that will be used to put the shape into\nThe contol shape is a hexahedron with 100x40x10 with 10x5x3 number of control points\nBy modifying the control shape you can modify the shape Map the shape into the shape Deallocate local variables Export the shape and the control shape to vtk files\nShow the control geometry and geometry using PyVista Finalize the control shape Calls program~~example_put_to_nurbs~~CallsGraph program~example_put_to_nurbs example_put_to_nurbs none~set nurbs_volume%set program~example_put_to_nurbs->none~set proc~export_xc nurbs_volume%export_Xc program~example_put_to_nurbs->proc~export_xc proc~export_xg nurbs_volume%export_Xg program~example_put_to_nurbs->proc~export_xg proc~finalize nurbs_volume%finalize program~example_put_to_nurbs->proc~finalize proc~hexahedron_xc hexahedron_Xc program~example_put_to_nurbs->proc~hexahedron_xc proc~put_to_nurbs nurbs_volume%put_to_nurbs program~example_put_to_nurbs->proc~put_to_nurbs proc~show nurbs_volume%show program~example_put_to_nurbs->proc~show proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 proc~cmp_elem_xc_vis nurbs_volume%cmp_elem_Xc_vis proc~export_xc->proc~cmp_elem_xc_vis proc~cmp_elem_xg_vis nurbs_volume%cmp_elem_Xg_vis proc~export_xg->proc~cmp_elem_xg_vis proc~basis_bspline basis_bspline proc~put_to_nurbs->proc~basis_bspline proc~kron kron proc~put_to_nurbs->proc~kron proc~set_elem_xg_vis nurbs_volume%set_elem_Xg_vis proc~put_to_nurbs->proc~set_elem_xg_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: X (:,:) type( nurbs_volume ) :: control_shape integer, allocatable :: elem (:,:) integer :: i integer :: nunit","tags":"","loc":"program/example_put_to_nurbs.html"},{"title":"shape_half_ring_2d – ForCAD","text":"Uses forcad program~~shape_half_ring_2d~~UsesGraph program~shape_half_ring_2d shape_half_ring_2d module~forcad forcad program~shape_half_ring_2d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set up a half ring shape centered at 0,0,0 with inner radius 1 and outer radius 2. Export the control points to a VTK file for visualization. Create the shape using the specified number of elements in each direction. Export the geometry to a VTK file for visualization. Show the control geometry and geometry using PyVista Finalize and clean up the shape object. Calls program~~shape_half_ring_2d~~CallsGraph program~shape_half_ring_2d shape_half_ring_2d proc~create~2 nurbs_surface%create program~shape_half_ring_2d->proc~create~2 proc~export_xc~2 nurbs_surface%export_Xc program~shape_half_ring_2d->proc~export_xc~2 proc~export_xg~2 nurbs_surface%export_Xg program~shape_half_ring_2d->proc~export_xg~2 proc~finalize~2 nurbs_surface%finalize program~shape_half_ring_2d->proc~finalize~2 proc~set_half_ring~2 nurbs_surface%set_half_ring program~shape_half_ring_2d->proc~set_half_ring~2 proc~show~2 nurbs_surface%show program~shape_half_ring_2d->proc~show~2 interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_surface%is_rational proc~create~2->proc~is_rational~2 proc~cmp_elem_xc_vis~2 nurbs_surface%cmp_elem_Xc_vis proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~cmp_elem_xg_vis~2 nurbs_surface%cmp_elem_Xg_vis proc~export_xg~2->proc~cmp_elem_xg_vis~2 none~set~2 nurbs_surface%set proc~set_half_ring~2->none~set~2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_surface ) :: shape","tags":"","loc":"program/shape_half_ring_2d.html"},{"title":"nearest_point_2d – ForCAD","text":"Uses forcad program~~nearest_point_2d~~UsesGraph program~nearest_point_2d nearest_point_2d module~forcad forcad program~nearest_point_2d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set a surface with 4 control points\nThe weights of the control points (Wc) are optional. Generate the NURBS surface with resolutions of 30 in both dimensions Find the nearest point on the surface to a given point\nFind the nearest point on the surface to a given point\nThe optimization method is used to find the nearest point\nThe optimization method is based on the Newton-Raphson method\nFinalize the NURBS surface object Calls program~~nearest_point_2d~~CallsGraph program~nearest_point_2d nearest_point_2d none~set~2 nurbs_surface%set program~nearest_point_2d->none~set~2 proc~create~2 nurbs_surface%create program~nearest_point_2d->proc~create~2 proc~finalize~2 nurbs_surface%finalize program~nearest_point_2d->proc~finalize~2 proc~nearest_point2~2 nurbs_surface%nearest_point2 program~nearest_point_2d->proc~nearest_point2~2 proc~nearest_point~2 nurbs_surface%nearest_point program~nearest_point_2d->proc~nearest_point~2 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_surface%is_rational proc~create~2->proc~is_rational~2 proc~nearest_point2~2->proc~create~2 proc~nearest_point2~2->proc~finalize~2 proc~nearest_point2~2->proc~nearest_point~2 none~derivative2~2 nurbs_surface%derivative2 proc~nearest_point2~2->none~derivative2~2 proc~cmp_xg~2 nurbs_surface%cmp_Xg proc~nearest_point2~2->proc~cmp_xg~2 proc~inv inv proc~nearest_point2~2->proc~inv interface~nearest_point_help_2d nearest_point_help_2d proc~nearest_point~2->interface~nearest_point_help_2d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~derivative2_scalar~2 nurbs_surface%derivative2_scalar none~derivative2~2->proc~derivative2_scalar~2 proc~derivative2_vector~2 nurbs_surface%derivative2_vector none~derivative2~2->proc~derivative2_vector~2 proc~cmp_xg~2->interface~compute_xg~2 proc~cmp_xg~2->proc~is_rational~2 proc~inv->proc~inv proc~det det proc~inv->proc~det proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~derivative2_scalar~2->proc~is_rational~2 interface~compute_d2tgc~2 compute_d2Tgc proc~derivative2_scalar~2->interface~compute_d2tgc~2 proc~derivative2_vector~2->interface~ndgrid proc~derivative2_vector~2->proc~is_rational~2 proc~derivative2_vector~2->interface~compute_d2tgc~2 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk) :: Wc (4) Weights of the control points real(kind=rk) :: Xc (4,3) Control points integer :: id id of the nearest point real(kind=rk), allocatable :: nearest_Xg (:) Coordinates of the nearest point on the surface real(kind=rk), allocatable :: nearest_Xt (:) Corresponding parametric coordinates of the nearest point type( nurbs_surface ) :: shape Declare a NURBS surface object","tags":"","loc":"program/nearest_point_2d.html"},{"title":"shape_ring_3d – ForCAD","text":"Uses forcad program~~shape_ring_3d~~UsesGraph program~shape_ring_3d shape_ring_3d module~forcad forcad program~shape_ring_3d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set up a ring shape centered at 0,0,0 with inner radius 1, outer radius 2, and length 1. Export the control points to a VTK file for visualization. Create the shape using the specified number of elements in each direction. Export the geometry to a VTK file for visualization. Show the control geometry and geometry using PyVista Finalize and clean up the shape object. Calls program~~shape_ring_3d~~CallsGraph program~shape_ring_3d shape_ring_3d proc~create nurbs_volume%create program~shape_ring_3d->proc~create proc~export_xc nurbs_volume%export_Xc program~shape_ring_3d->proc~export_xc proc~export_xg nurbs_volume%export_Xg program~shape_ring_3d->proc~export_xg proc~finalize nurbs_volume%finalize program~shape_ring_3d->proc~finalize proc~set_ring nurbs_volume%set_ring program~shape_ring_3d->proc~set_ring proc~show nurbs_volume%show program~shape_ring_3d->proc~show interface~compute_xg compute_Xg proc~create->interface~compute_xg interface~ndgrid ndgrid proc~create->interface~ndgrid proc~is_rational nurbs_volume%is_rational proc~create->proc~is_rational proc~cmp_elem_xc_vis nurbs_volume%cmp_elem_Xc_vis proc~export_xc->proc~cmp_elem_xc_vis proc~cmp_elem_xg_vis nurbs_volume%cmp_elem_Xg_vis proc~export_xg->proc~cmp_elem_xg_vis none~set nurbs_volume%set proc~set_ring->none~set proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_volume ) :: shape","tags":"","loc":"program/shape_ring_3d.html"},{"title":"example3_surface – ForCAD","text":"Uses forcad program~~example3_surface~~UsesGraph program~example3_surface example3_surface module~forcad forcad program~example3_surface->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. This program demonstrates the usage of a NURBS (Non-Uniform Rational B-Spline) surface object to create  and finalize a NURBS surface.\nIt sets up control points, weights, and knot vectors for all three dimensions, generates the surface, and exports the control points and the surface to VTK files. Define control points for the NURBS surface Define weights for the control points\nDefine knot vectors for both dimensions\nSet knot vectors, control points, and weights for the NURBS surface object Deallocate local arrays Export the control points to a VTK file Generate the NURBS surface with resolutions of 30 in both dimensions Export the generated surface to a VTK file Show the control geometry and geometry using PyVista Print size of the knot vectors\nInsert knots 0.25, twice and 0.75, once in both directions\nPrint size of the knot vectors after inserting knots\nPrint the degrees Elevate degree by 2 in both directions\nPrint the degrees after elevating Print size of the knot vectors\nRemove knots 0.25, twice and 0.75, once in both directions\nPrint size of the knot vectors after removing knots\nGenerate the refined NURBS surface with resolutions of 30 in both dimensions Export updated control points to a VTK file Export the refined generated surface to a VTK file Show the control geometry and geometry using PyVista Rotate the control points Rotate the generated curve Translate the control points Translate the generated curve Export the transformed control points to a VTK file Export the transformed generated volume to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS surface object Calls program~~example3_surface~~CallsGraph program~example3_surface example3_surface none~get_degree~2 nurbs_surface%get_degree program~example3_surface->none~get_degree~2 none~get_knot~2 nurbs_surface%get_knot program~example3_surface->none~get_knot~2 none~set~2 nurbs_surface%set program~example3_surface->none~set~2 proc~create~2 nurbs_surface%create program~example3_surface->proc~create~2 proc~elevate_degree~2 nurbs_surface%elevate_degree program~example3_surface->proc~elevate_degree~2 proc~export_xc~2 nurbs_surface%export_Xc program~example3_surface->proc~export_xc~2 proc~export_xg~2 nurbs_surface%export_Xg program~example3_surface->proc~export_xg~2 proc~finalize~2 nurbs_surface%finalize program~example3_surface->proc~finalize~2 proc~generate_xc~2 generate_Xc program~example3_surface->proc~generate_xc~2 proc~insert_knots~2 nurbs_surface%insert_knots program~example3_surface->proc~insert_knots~2 proc~remove_knots~2 nurbs_surface%remove_knots program~example3_surface->proc~remove_knots~2 proc~rotate_xc~2 nurbs_surface%rotate_Xc program~example3_surface->proc~rotate_xc~2 proc~rotate_xg~2 nurbs_surface%rotate_Xg program~example3_surface->proc~rotate_xg~2 proc~show~2 nurbs_surface%show program~example3_surface->proc~show~2 proc~translate_xc~2 nurbs_surface%translate_Xc program~example3_surface->proc~translate_xc~2 proc~translate_xg~2 nurbs_surface%translate_Xg program~example3_surface->proc~translate_xg~2 proc~get_degree_all~2 nurbs_surface%get_degree_all none~get_degree~2->proc~get_degree_all~2 proc~get_degree_dir~2 nurbs_surface%get_degree_dir none~get_degree~2->proc~get_degree_dir~2 proc~get_knot_all~2 nurbs_surface%get_knot_all none~get_knot~2->proc~get_knot_all~2 proc~get_knoti~2 nurbs_surface%get_knoti none~get_knot~2->proc~get_knoti~2 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_surface%is_rational proc~create~2->proc~is_rational~2 proc~elevate_degree~2->none~get_knot~2 proc~elevate_degree~2->none~set~2 proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree~2->proc~elevate_degree_a_5_9 proc~elevate_degree~2->proc~is_rational~2 proc~cmp_elem_xc_vis~2 nurbs_surface%cmp_elem_Xc_vis proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~cmp_elem_xg_vis~2 nurbs_surface%cmp_elem_Xg_vis proc~export_xg~2->proc~cmp_elem_xg_vis~2 proc~insert_knots~2->none~get_knot~2 proc~insert_knots~2->none~set~2 interface~compute_multiplicity compute_multiplicity proc~insert_knots~2->interface~compute_multiplicity proc~findspan findspan proc~insert_knots~2->proc~findspan proc~insert_knot_a_5_1 insert_knot_A_5_1 proc~insert_knots~2->proc~insert_knot_a_5_1 proc~insert_knots~2->proc~is_rational~2 proc~remove_knots~2->none~get_knot~2 proc~remove_knots~2->none~set~2 proc~remove_knots~2->interface~compute_multiplicity proc~remove_knots~2->proc~findspan proc~remove_knots~2->proc~is_rational~2 proc~remove_knots_a_5_8 remove_knots_A_5_8 proc~remove_knots~2->proc~remove_knots_a_5_8 proc~rotation rotation proc~rotate_xc~2->proc~rotation proc~rotate_xg~2->proc~rotation proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~bincoeff bincoeff proc~elevate_degree_a_5_9->proc~bincoeff cosd cosd proc~rotation->cosd sind sind proc~rotation->sind proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~factln factln proc~bincoeff->proc~factln proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Wc (:) Arrays for control points and weights real(kind=rk), allocatable :: Xc (:,:) Arrays for control points and weights real(kind=rk) :: knot1 (6) Arrays for knot vectors in both dimensions real(kind=rk) :: knot2 (6) Arrays for knot vectors in both dimensions type( nurbs_surface ) :: nurbs Declare a NURBS surface object Functions function generate_Xc (num_rows, num_cols, peak_height) result(control_points) Arguments Type Intent Optional Attributes Name integer, intent(in) :: num_rows integer, intent(in) :: num_cols real(kind=rk), intent(in) :: peak_height Return Value real(kind=rk), allocatable, (:,:) Source Code program example3_surface use forcad implicit none type ( nurbs_surface ) :: nurbs !! Declare a NURBS surface object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights real ( rk ) :: knot1 ( 6 ), knot2 ( 6 ) !! Arrays for knot vectors in both dimensions !----------------------------------------------------------------------------- ! Setting up the NURBS surface !----------------------------------------------------------------------------- !> Define control points for the NURBS surface Xc = generate_Xc ( 3 , 3 , 1.0_rk ) !> Define weights for the control points allocate ( Wc ( size ( Xc , 1 ))) Wc = 1.0_rk Wc ( 2 ) = 2.0_rk !> Define knot vectors for both dimensions knot1 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] !> Set knot vectors, control points, and weights for the NURBS surface object call nurbs % set ( knot1 , knot2 , Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export the control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_surface_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS surface !----------------------------------------------------------------------------- !> Generate the NURBS surface with resolutions of 30 in both dimensions call nurbs % create ( 30 , 30 ) !> Export the generated surface to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_surface_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_surface_Xc.vtk' , 'vtk/nurbs_surface_Xg.vtk' ) !----------------------------------------------------------------------------- ! Refinements !----------------------------------------------------------------------------- !> Print size of the knot vectors print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) !> Insert knots 0.25, twice and 0.75, once in both directions call nurbs % insert_knots ( 1 , [ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) ! direction 1 call nurbs % insert_knots ( 2 , [ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) ! direction 2 !> Print size of the knot vectors after inserting knots print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) !> Print the degrees print * , nurbs % get_degree () !> Elevate degree by 2 in both directions call nurbs % elevate_degree ( 1 , 2 ) ! direction 1 call nurbs % elevate_degree ( 2 , 2 ) ! direction 2 !> Print the degrees after elevating print * , nurbs % get_degree () !> Print size of the knot vectors print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) !> Remove knots 0.25, twice and 0.75, once in both directions call nurbs % remove_knots ( 1 , [ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) ! direction 1 call nurbs % remove_knots ( 2 , [ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) ! direction 2 !> Print size of the knot vectors after removing knots print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) !> Generate the refined NURBS surface with resolutions of 30 in both dimensions call nurbs % create () !> Export updated control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_surface_Xc2.vtk' ) !> Export the refined generated surface to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_surface_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_surface_Xc2.vtk' , 'vtk/nurbs_surface_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Transformations !----------------------------------------------------------------------------- !> Rotate the control points call nurbs % rotate_Xc ( alpha = 4 5.0_rk , beta = 0.0_rk , theta = 9 0.0_rk ) !> Rotate the generated curve call nurbs % rotate_Xg ( alpha =- 4 5.0_rk , beta = 0.0_rk , theta =- 9 0.0_rk ) !> Translate the control points call nurbs % translate_Xc ([ 1.0_rk , 2.0_rk , - 3.0_rk ]) !> Translate the generated curve call nurbs % translate_Xg ([ - 1.0_rk , - 2.0_rk , 3.0_rk ]) !> Export the transformed control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_surface_Xc3.vtk' ) !> Export the transformed generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_surface_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_surface_Xc3.vtk' , 'vtk/nurbs_surface_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS surface object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( num_rows , num_cols , peak_height ) result ( control_points ) integer , intent ( in ) :: num_rows , num_cols real ( rk ), intent ( in ) :: peak_height real ( rk ), allocatable :: control_points (:,:) integer :: i , j real ( rk ) :: x_spacing , y_spacing , x_offset , y_offset x_spacing = 1.0_rk / real ( num_cols - 1 , rk ) y_spacing = 1.0_rk / real ( num_rows - 1 , rk ) x_offset = - 0.5_rk y_offset = - 0.5_rk allocate ( control_points ( num_rows * num_cols , 3 )) do i = 1 , num_rows do j = 1 , num_cols control_points (( i - 1 ) * num_cols + j , 1 ) = x_offset + real ( j - 1 , rk ) * x_spacing control_points (( i - 1 ) * num_cols + j , 2 ) = y_offset + real ( i - 1 , rk ) * y_spacing control_points (( i - 1 ) * num_cols + j , 3 ) = & peak_height * exp ( - (( control_points (( i - 1 ) * num_cols + j , 1 ) ** 2 ) & + ( control_points (( i - 1 ) * num_cols + j , 2 ) ** 2 ))) + 0.5_rk * peak_height * 0.2_rk end do end do end function !----------------------------------------------------------------------------- end program example3_surface","tags":"","loc":"program/example3_surface.html"},{"title":"compute_length – ForCAD","text":"Uses forcad program~~compute_length~~UsesGraph program~compute_length compute_length module~forcad forcad program~compute_length->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Calls program~~compute_length~~CallsGraph program~compute_length compute_length none~set~3 nurbs_curve%set program~compute_length->none~set~3 proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length proc~set1a nurbs_curve%set1a none~set~3->proc~set1a proc~set1~3 nurbs_curve%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_curve%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_curve%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_curve%set4 none~set~3->proc~set4~3 proc~ansatz~3 nurbs_curve%ansatz proc~cmp_length->proc~ansatz~3 proc~cmp_elem~3 nurbs_curve%cmp_elem proc~cmp_length->proc~cmp_elem~3 proc~ansatz~3->none~set~3 proc~ansatz~3->proc~cmp_elem~3 interface~dyad dyad proc~ansatz~3->interface~dyad interface~gauss_leg gauss_leg proc~ansatz~3->interface~gauss_leg interface~unique unique proc~ansatz~3->interface~unique none~derivative~3 nurbs_curve%derivative proc~ansatz~3->none~derivative~3 interface~elemconn_cn elemConn_Cn proc~cmp_elem~3->interface~elemconn_cn proc~cmp_elem~3->interface~unique proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_elem~3->proc~get_multiplicity~3 proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~set1~3->proc~cmp_degree~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~dyad_t1_t1 dyad_t1_t1 interface~dyad->proc~dyad_t1_t1 proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar~3 nurbs_curve%derivative_scalar none~derivative~3->proc~derivative_scalar~3 proc~derivative_vector~3 nurbs_curve%derivative_vector none~derivative~3->proc~derivative_vector~3 proc~cmp_degree~3->proc~get_multiplicity~3 proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 interface~compute_dtgc~3 compute_dTgc proc~derivative_scalar~3->interface~compute_dtgc~3 proc~is_rational~3 nurbs_curve%is_rational proc~derivative_scalar~3->proc~is_rational~3 proc~derivative_vector~3->interface~compute_dtgc~3 proc~derivative_vector~3->proc~is_rational~3 gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->gauss_legendre interface~ndgrid ndgrid proc~gauss_legendre_2d->interface~ndgrid proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->proc~kron proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk) :: Xc (2,3) real(kind=rk) :: length type( nurbs_curve ) :: shape","tags":"","loc":"program/compute_length.html"},{"title":"example_nurbs_curve – ForCAD","text":"Uses forcad program~~example_nurbs_curve~~UsesGraph program~example_nurbs_curve example_nurbs_curve module~forcad forcad program~example_nurbs_curve->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. This program demonstrates the usage of a NURBS curve object to create, and finalize a NURBS curve.\nIt sets up control points and weights, generates the curve, and exports the control points\nand the curve to VTK files at various stages. Define control points for the NURBS curve Define weights for the control points Set control points and weights for the NURBS curve object Deallocate local arrays Export initial control points to a VTK file Generate the NURBS curve with a resolution of 500 Export the generated curve to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS curve object Calls program~~example_nurbs_curve~~CallsGraph program~example_nurbs_curve example_nurbs_curve none~set~3 nurbs_curve%set program~example_nurbs_curve->none~set~3 proc~create~3 nurbs_curve%create program~example_nurbs_curve->proc~create~3 proc~export_xc~3 nurbs_curve%export_Xc program~example_nurbs_curve->proc~export_xc~3 proc~export_xg~3 nurbs_curve%export_Xg program~example_nurbs_curve->proc~export_xg~3 proc~finalize~3 nurbs_curve%finalize program~example_nurbs_curve->proc~finalize~3 proc~generate_xc~3 generate_Xc program~example_nurbs_curve->proc~generate_xc~3 proc~show~3 nurbs_curve%show program~example_nurbs_curve->proc~show~3 proc~set1a nurbs_curve%set1a none~set~3->proc~set1a proc~set1~3 nurbs_curve%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_curve%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_curve%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_curve%set4 none~set~3->proc~set4~3 interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 proc~is_rational~3 nurbs_curve%is_rational proc~create~3->proc~is_rational~3 proc~cmp_elem_xc_vis~3 nurbs_curve%cmp_elem_Xc_vis proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~cmp_elem_xg_vis~3 nurbs_curve%cmp_elem_Xg_vis proc~export_xg~3->proc~cmp_elem_xg_vis~3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~set1~3->proc~cmp_degree~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Wc (:) Arrays for control points and weights real(kind=rk), allocatable :: Xc (:,:) Arrays for control points and weights type( nurbs_curve ) :: nurbs Declare a NURBS curve object Functions function generate_Xc (num_coils, radius, height, num_points_per_coil) result(control_points) Arguments Type Intent Optional Attributes Name integer, intent(in) :: num_coils real(kind=rk), intent(in) :: radius real(kind=rk), intent(in) :: height integer, intent(in) :: num_points_per_coil Return Value real(kind=rk), allocatable, (:,:) Source Code program example_nurbs_curve use forcad , only : rk , nurbs_curve implicit none type ( nurbs_curve ) :: nurbs !! Declare a NURBS curve object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights !----------------------------------------------------------------------------- ! Setting up the NURBS curve !----------------------------------------------------------------------------- !> Define control points for the NURBS curve Xc = generate_Xc ( 5 , 1.0_rk , 2.0_rk , 20 ) !> Define weights for the control points allocate ( Wc ( size ( Xc , 1 )), source = 1.0_rk ) !> Set control points and weights for the NURBS curve object call nurbs % set ( Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export initial control points to a VTK file call nurbs % export_Xc ( 'vtk/demo_curve_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS curve !----------------------------------------------------------------------------- !> Generate the NURBS curve with a resolution of 500 call nurbs % create ( res = 500 ) !> Export the generated curve to a VTK file call nurbs % export_Xg ( 'vtk/demo_curve_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/demo_curve_Xc.vtk' , 'vtk/demo_curve_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( num_coils , radius , height , num_points_per_coil ) result ( control_points ) integer , intent ( in ) :: num_coils , num_points_per_coil real ( rk ), intent ( in ) :: radius , height real ( rk ), allocatable :: control_points (:,:) integer :: coil , i real ( rk ) :: theta , coil_height allocate ( control_points ( num_coils * num_points_per_coil , 3 )) do coil = 1 , num_coils coil_height = height * real ( coil - 1 , rk ) / real ( num_coils - 1 , rk ) theta = 0.0_rk do i = 1 , num_points_per_coil theta = theta + 2.0_rk * acos ( - 1.0_rk ) / real ( num_points_per_coil , rk ) control_points (( coil - 1 ) * num_points_per_coil + i , 1 ) = radius * cos ( theta ) control_points (( coil - 1 ) * num_points_per_coil + i , 2 ) = radius * sin ( theta ) control_points (( coil - 1 ) * num_points_per_coil + i , 3 ) = coil_height end do end do end function !----------------------------------------------------------------------------- end program example_nurbs_curve","tags":"","loc":"program/example_nurbs_curve.html"},{"title":"shape_circle – ForCAD","text":"Uses forcad program~~shape_circle~~UsesGraph program~shape_circle shape_circle module~forcad forcad program~shape_circle->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set a circle with radius 2.0 and center at [0.0, 0.0, 0.0] Export control points to a VTK file Generate the NURBS circle with a resolution of 100 Export the generated cirlce to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS curve object Calls program~~shape_circle~~CallsGraph program~shape_circle shape_circle proc~create~3 nurbs_curve%create program~shape_circle->proc~create~3 proc~export_xc~3 nurbs_curve%export_Xc program~shape_circle->proc~export_xc~3 proc~export_xg~3 nurbs_curve%export_Xg program~shape_circle->proc~export_xg~3 proc~finalize~3 nurbs_curve%finalize program~shape_circle->proc~finalize~3 proc~set_circle nurbs_curve%set_circle program~shape_circle->proc~set_circle proc~show~3 nurbs_curve%show program~shape_circle->proc~show~3 interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 proc~is_rational~3 nurbs_curve%is_rational proc~create~3->proc~is_rational~3 proc~cmp_elem_xc_vis~3 nurbs_curve%cmp_elem_Xc_vis proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~cmp_elem_xg_vis~3 nurbs_curve%cmp_elem_Xg_vis proc~export_xg~3->proc~cmp_elem_xg_vis~3 none~set~3 nurbs_curve%set proc~set_circle->none~set~3 proc~set1a nurbs_curve%set1a none~set~3->proc~set1a proc~set1~3 nurbs_curve%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_curve%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_curve%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_curve%set4 none~set~3->proc~set4~3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~set1~3->proc~cmp_degree~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_curve ) :: shape","tags":"","loc":"program/shape_circle.html"},{"title":"example_nurbs_surface – ForCAD","text":"Uses forcad program~~example_nurbs_surface~~UsesGraph program~example_nurbs_surface example_nurbs_surface module~forcad forcad program~example_nurbs_surface->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. This program demonstrates the usage of a NURBS surface object to create, and finalize a NURBS surface.\nIt sets up control points and weights, generates the surface, and exports the control points\nand the surface to VTK files at various stages. Define control points for the NURBS surface Define weights for the control points Set control points and weights for the NURBS surface object Deallocate local arrays Export initial control points to a VTK file Generate the NURBS surface with a resolution of 30x30 Export the generated surface to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS surface object Calls program~~example_nurbs_surface~~CallsGraph program~example_nurbs_surface example_nurbs_surface none~set~2 nurbs_surface%set program~example_nurbs_surface->none~set~2 proc~create~2 nurbs_surface%create program~example_nurbs_surface->proc~create~2 proc~export_xc~2 nurbs_surface%export_Xc program~example_nurbs_surface->proc~export_xc~2 proc~export_xg~2 nurbs_surface%export_Xg program~example_nurbs_surface->proc~export_xg~2 proc~finalize~2 nurbs_surface%finalize program~example_nurbs_surface->proc~finalize~2 proc~generate_xc~4 generate_Xc program~example_nurbs_surface->proc~generate_xc~4 proc~show~2 nurbs_surface%show program~example_nurbs_surface->proc~show~2 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_surface%is_rational proc~create~2->proc~is_rational~2 proc~cmp_elem_xc_vis~2 nurbs_surface%cmp_elem_Xc_vis proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~cmp_elem_xg_vis~2 nurbs_surface%cmp_elem_Xg_vis proc~export_xg~2->proc~cmp_elem_xg_vis~2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Wc (:) Arrays for control points and weights real(kind=rk), allocatable :: Xc (:,:) Arrays for control points and weights type( nurbs_surface ) :: nurbs Declare a NURBS surface object Functions function generate_Xc (num_rows, num_cols, peak_height) result(control_points) Arguments Type Intent Optional Attributes Name integer, intent(in) :: num_rows integer, intent(in) :: num_cols real(kind=rk), intent(in) :: peak_height Return Value real(kind=rk), allocatable, (:,:) Source Code program example_nurbs_surface use forcad , only : rk , nurbs_surface implicit none type ( nurbs_surface ) :: nurbs !! Declare a NURBS surface object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights !----------------------------------------------------------------------------- ! Setting up the NURBS surface !----------------------------------------------------------------------------- !> Define control points for the NURBS surface Xc = generate_Xc ( 10 , 10 , 1.5_rk ) !> Define weights for the control points allocate ( Wc ( size ( Xc , 1 )), source = 1.0_rk ) !> Set control points and weights for the NURBS surface object call nurbs % set ([ 10 , 10 ], Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export initial control points to a VTK file call nurbs % export_Xc ( 'vtk/demo_surface_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS surface !----------------------------------------------------------------------------- !> Generate the NURBS surface with a resolution of 30x30 call nurbs % create ( res1 = 30 , res2 = 30 ) !> Export the generated surface to a VTK file call nurbs % export_Xg ( 'vtk/demo_surface_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/demo_surface_Xc.vtk' , 'vtk/demo_surface_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS surface object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( num_rows , num_cols , peak_height ) result ( control_points ) integer , intent ( in ) :: num_rows , num_cols real ( rk ), intent ( in ) :: peak_height real ( rk ), allocatable :: control_points (:,:) integer :: i , j real ( rk ) :: x_spacing , y_spacing , x_offset , y_offset x_spacing = 1.0_rk / real ( num_cols - 1 , rk ) y_spacing = 1.0_rk / real ( num_rows - 1 , rk ) x_offset = - 0.5_rk y_offset = - 0.5_rk allocate ( control_points ( num_rows * num_cols , 3 )) do i = 1 , num_rows do j = 1 , num_cols control_points (( i - 1 ) * num_cols + j , 1 ) = x_offset + real ( j - 1 , rk ) * x_spacing control_points (( i - 1 ) * num_cols + j , 2 ) = y_offset + real ( i - 1 , rk ) * y_spacing control_points (( i - 1 ) * num_cols + j , 3 ) = & peak_height * exp ( - (( control_points (( i - 1 ) * num_cols + j , 1 ) ** 2 ) & + ( control_points (( i - 1 ) * num_cols + j , 2 ) ** 2 ))) + 0.5_rk * peak_height * 0.2_rk end do end do end function !----------------------------------------------------------------------------- end program example_nurbs_surface","tags":"","loc":"program/example_nurbs_surface.html"},{"title":"shape_ring_2d – ForCAD","text":"Uses forcad program~~shape_ring_2d~~UsesGraph program~shape_ring_2d shape_ring_2d module~forcad forcad program~shape_ring_2d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set up a ring shape with inner radius 1.0 and outer radius 2.0. Export the control points to a VTK file for visualization. Create the shape using the specified number of elements in each direction. Export the geometry to a VTK file for visualization. Show the control geometry and geometry using PyVista Finalize and clean up the shape object. Calls program~~shape_ring_2d~~CallsGraph program~shape_ring_2d shape_ring_2d proc~create~2 nurbs_surface%create program~shape_ring_2d->proc~create~2 proc~export_xc~2 nurbs_surface%export_Xc program~shape_ring_2d->proc~export_xc~2 proc~export_xg~2 nurbs_surface%export_Xg program~shape_ring_2d->proc~export_xg~2 proc~finalize~2 nurbs_surface%finalize program~shape_ring_2d->proc~finalize~2 proc~set_ring~2 nurbs_surface%set_ring program~shape_ring_2d->proc~set_ring~2 proc~show~2 nurbs_surface%show program~shape_ring_2d->proc~show~2 interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_surface%is_rational proc~create~2->proc~is_rational~2 proc~cmp_elem_xc_vis~2 nurbs_surface%cmp_elem_Xc_vis proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~cmp_elem_xg_vis~2 nurbs_surface%cmp_elem_Xg_vis proc~export_xg~2->proc~cmp_elem_xg_vis~2 none~set~2 nurbs_surface%set proc~set_ring~2->none~set~2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_surface ) :: shape","tags":"","loc":"program/shape_ring_2d.html"},{"title":"example_ppm3 – ForCAD","text":"Uses forimage forcad fortime forcolormap program~~example_ppm3~~UsesGraph program~example_ppm3 example_ppm3 forcolormap forcolormap program~example_ppm3->forcolormap forimage forimage program~example_ppm3->forimage fortime fortime program~example_ppm3->fortime module~forcad forcad program~example_ppm3->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Visualization of NURBS surfaces using ForCAD, ForImage and ForColorMap libraries\nThis example converts NURBS surfaces (vector) to an image (raster) using ForCAD, ForImage and ForColorMap libraries. Set the shape parameters for a tetragon Calls program~~example_ppm3~~CallsGraph program~example_ppm3 example_ppm3 compute_rgb compute_rgb program~example_ppm3->compute_rgb export_pnm export_pnm program~example_ppm3->export_pnm get_b get_b program~example_ppm3->get_b get_g get_g program~example_ppm3->get_g get_r get_r program~example_ppm3->get_r none~get_xg~2 nurbs_surface%get_Xg program~example_ppm3->none~get_xg~2 proc~create~2 nurbs_surface%create program~example_ppm3->proc~create~2 proc~finalize~2 nurbs_surface%finalize program~example_ppm3->proc~finalize~2 proc~get_ng~2 nurbs_surface%get_ng program~example_ppm3->proc~get_ng~2 proc~modify_xc~2 nurbs_surface%modify_Xc program~example_ppm3->proc~modify_xc~2 proc~set_tetragon nurbs_surface%set_tetragon program~example_ppm3->proc~set_tetragon proc~translate_xc~2 nurbs_surface%translate_Xc program~example_ppm3->proc~translate_xc~2 set set program~example_ppm3->set set_pnm set_pnm program~example_ppm3->set_pnm timer_start timer_start program~example_ppm3->timer_start timer_stop timer_stop program~example_ppm3->timer_stop proc~get_xg_all~2 nurbs_surface%get_Xg_all none~get_xg~2->proc~get_xg_all~2 proc~get_xgid~2 nurbs_surface%get_Xgid none~get_xg~2->proc~get_xgid~2 proc~get_xgi~2 nurbs_surface%get_Xgi none~get_xg~2->proc~get_xgi~2 interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_surface%is_rational proc~create~2->proc~is_rational~2 none~get_knot~2 nurbs_surface%get_knot proc~modify_xc~2->none~get_knot~2 none~get_wc~2 nurbs_surface%get_Wc proc~modify_xc~2->none~get_wc~2 none~get_xc~2 nurbs_surface%get_Xc proc~modify_xc~2->none~get_xc~2 none~set~2 nurbs_surface%set proc~modify_xc~2->none~set~2 proc~set_tetragon->none~set~2 proc~tetragon_xc tetragon_Xc proc~set_tetragon->proc~tetragon_xc proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~get_knot_all~2 nurbs_surface%get_knot_all none~get_knot~2->proc~get_knot_all~2 proc~get_knoti~2 nurbs_surface%get_knoti none~get_knot~2->proc~get_knoti~2 proc~get_wc_all~2 nurbs_surface%get_Wc_all none~get_wc~2->proc~get_wc_all~2 proc~get_wci~2 nurbs_surface%get_Wci none~get_wc~2->proc~get_wci~2 proc~get_xc_all~2 nurbs_surface%get_Xc_all none~get_xc~2->proc~get_xc_all~2 proc~get_xcid~2 nurbs_surface%get_Xcid none~get_xc~2->proc~get_xcid~2 proc~get_xci~2 nurbs_surface%get_Xci none~get_xc~2->proc~get_xci~2 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Xg (:,:) real(kind=rk) :: aspect_ratio type(color) :: background_color integer :: blue type(colormap) :: cmap integer :: green integer :: height integer :: i integer, allocatable :: idx (:,:) type(format_pnm) :: image integer :: ng (2) integer(kind=ik), allocatable :: px (:,:) integer :: red integer :: res1 integer :: res2 type( nurbs_surface ) :: shape type(timer) :: t integer :: width real(kind=rk), allocatable :: z_values (:)","tags":"","loc":"program/example_ppm3.html"},{"title":"example_ppm2 – ForCAD","text":"Uses forimage forcad fortime forcolormap program~~example_ppm2~~UsesGraph program~example_ppm2 example_ppm2 forcolormap forcolormap program~example_ppm2->forcolormap forimage forimage program~example_ppm2->forimage fortime fortime program~example_ppm2->fortime module~forcad forcad program~example_ppm2->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Visualization of NURBS surfaces using ForCAD, ForImage and ForColorMap libraries\nThis example converts NURBS surfaces (vector) to an image (raster) using ForCAD, ForImage and ForColorMap libraries. Set the shape parameters for a tetragon\nSet the shape parameters for a ring\nSet the shape parameters for a ring\nSet the shape parameters for a ring\nSet the shape parameters for a ring Calls program~~example_ppm2~~CallsGraph program~example_ppm2 example_ppm2 compute_rgb compute_rgb program~example_ppm2->compute_rgb export_pnm export_pnm program~example_ppm2->export_pnm get_b get_b program~example_ppm2->get_b get_g get_g program~example_ppm2->get_g get_r get_r program~example_ppm2->get_r none~get_xg~2 nurbs_surface%get_Xg program~example_ppm2->none~get_xg~2 proc~create~2 nurbs_surface%create program~example_ppm2->proc~create~2 proc~finalize~2 nurbs_surface%finalize program~example_ppm2->proc~finalize~2 proc~get_ng~2 nurbs_surface%get_ng program~example_ppm2->proc~get_ng~2 proc~rotate_xc~2 nurbs_surface%rotate_Xc program~example_ppm2->proc~rotate_xc~2 proc~set_half_ring~2 nurbs_surface%set_half_ring program~example_ppm2->proc~set_half_ring~2 proc~set_tetragon nurbs_surface%set_tetragon program~example_ppm2->proc~set_tetragon proc~translate_xc~2 nurbs_surface%translate_Xc program~example_ppm2->proc~translate_xc~2 set set program~example_ppm2->set set_pnm set_pnm program~example_ppm2->set_pnm timer_start timer_start program~example_ppm2->timer_start timer_stop timer_stop program~example_ppm2->timer_stop proc~get_xg_all~2 nurbs_surface%get_Xg_all none~get_xg~2->proc~get_xg_all~2 proc~get_xgid~2 nurbs_surface%get_Xgid none~get_xg~2->proc~get_xgid~2 proc~get_xgi~2 nurbs_surface%get_Xgi none~get_xg~2->proc~get_xgi~2 interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_surface%is_rational proc~create~2->proc~is_rational~2 proc~rotation rotation proc~rotate_xc~2->proc~rotation none~set~2 nurbs_surface%set proc~set_half_ring~2->none~set~2 proc~set_tetragon->none~set~2 proc~tetragon_xc tetragon_Xc proc~set_tetragon->proc~tetragon_xc proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 cosd cosd proc~rotation->cosd sind sind proc~rotation->sind proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Xg (:,:) real(kind=rk) :: aspect_ratio type(color) :: background_color integer :: blue real(kind=rk) :: center (3) type(colormap) :: cmap integer :: green integer :: height integer :: i integer, allocatable :: idx (:,:) type(format_pnm) :: image real(kind=rk) :: inner_radius integer :: ng (2) real(kind=rk) :: outer_radius integer(kind=ik), allocatable :: px (:,:) integer :: red integer :: res1 integer :: res2 type( nurbs_surface ) :: shape type(timer) :: t integer :: width real(kind=rk), allocatable :: z_values (:)","tags":"","loc":"program/example_ppm2.html"},{"title":"example3_volume – ForCAD","text":"Uses forcad program~~example3_volume~~UsesGraph program~example3_volume example3_volume module~forcad forcad program~example3_volume->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. This program demonstrates the usage of a NURBS (Non-Uniform Rational B-Spline) volume object to create  and finalize a NURBS volume.\nIt sets up control points, weights, and knot vectors for all three dimensions, generates the volume, and exports the control points and the volume to VTK files. Define the control points for the NURBS volume Define weights for the control points (optional)\nDefine knot vectors for all three dimensions\nSet knot vectors, control points, and weights for the NURBS volume object\nWc is optional. Deallocate local arrays Export the control points to a VTK file Generate the NURBS volume with resolutions of 20, 20, and 20 in the three dimensions Export the generated volume to a VTK file Show the control geometry and geometry using PyVista Print size of knot vectors\nInsert knots 0.25 and 0.75 in all three directions\nPrint size of knot vectors after inserting knots\nPrint degrees Elevate degree by 2 in all three directions\nPrint degrees after elevating Print size of knot vectors\nPrint size of knot vectors after removing knots\nGenerate the refined NURBS volume with resolutions of 40, 40, and 40 in the three dimensions Export updated control points to a VTK file Export the refined generated volume to a VTK file Show the control geometry and geometry using PyVista Rotate the control points Rotate the generated curve Translate the control points Translate the generated curve Export the transformed control points to a VTK file Export the transformed generated volume to a VTK file Show the control geometry and geometry using PyVista first compute and set the connectivities of volume elements get the connectivity of the face1 of the first element\nget the degree of the faces\nFinalize the NURBS volume object Calls program~~example3_volume~~CallsGraph program~example3_volume example3_volume none~get_degree nurbs_volume%get_degree program~example3_volume->none~get_degree none~get_knot nurbs_volume%get_knot program~example3_volume->none~get_knot none~set nurbs_volume%set program~example3_volume->none~set proc~cmp_degreeface nurbs_volume%cmp_degreeFace program~example3_volume->proc~cmp_degreeface proc~cmp_elem nurbs_volume%cmp_elem program~example3_volume->proc~cmp_elem proc~cmp_elemface nurbs_volume%cmp_elemFace program~example3_volume->proc~cmp_elemface proc~create nurbs_volume%create program~example3_volume->proc~create proc~elevate_degree nurbs_volume%elevate_degree program~example3_volume->proc~elevate_degree proc~export_xc nurbs_volume%export_Xc program~example3_volume->proc~export_xc proc~export_xg nurbs_volume%export_Xg program~example3_volume->proc~export_xg proc~finalize nurbs_volume%finalize program~example3_volume->proc~finalize proc~generate_xc~5 generate_Xc program~example3_volume->proc~generate_xc~5 proc~insert_knots nurbs_volume%insert_knots program~example3_volume->proc~insert_knots proc~remove_knots nurbs_volume%remove_knots program~example3_volume->proc~remove_knots proc~rotate_xc nurbs_volume%rotate_Xc program~example3_volume->proc~rotate_xc proc~rotate_xg nurbs_volume%rotate_Xg program~example3_volume->proc~rotate_xg proc~set_elem nurbs_volume%set_elem program~example3_volume->proc~set_elem proc~show nurbs_volume%show program~example3_volume->proc~show proc~translate_xc nurbs_volume%translate_Xc program~example3_volume->proc~translate_xc proc~translate_xg nurbs_volume%translate_Xg program~example3_volume->proc~translate_xg proc~get_degree_all nurbs_volume%get_degree_all none~get_degree->proc~get_degree_all proc~get_degree_dir nurbs_volume%get_degree_dir none~get_degree->proc~get_degree_dir proc~get_knot_all nurbs_volume%get_knot_all none~get_knot->proc~get_knot_all proc~get_knoti nurbs_volume%get_knoti none~get_knot->proc~get_knoti proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 interface~elemconn_cn elemConn_Cn proc~cmp_elem->interface~elemconn_cn interface~unique unique proc~cmp_elem->interface~unique proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_elem->proc~get_multiplicity interface~compute_xg compute_Xg proc~create->interface~compute_xg interface~ndgrid ndgrid proc~create->interface~ndgrid proc~is_rational nurbs_volume%is_rational proc~create->proc~is_rational proc~elevate_degree->none~get_knot proc~elevate_degree->none~set proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree->proc~elevate_degree_a_5_9 proc~cmp_elem_xc_vis nurbs_volume%cmp_elem_Xc_vis proc~export_xc->proc~cmp_elem_xc_vis proc~cmp_elem_xg_vis nurbs_volume%cmp_elem_Xg_vis proc~export_xg->proc~cmp_elem_xg_vis proc~insert_knots->none~get_knot proc~insert_knots->none~set interface~compute_multiplicity compute_multiplicity proc~insert_knots->interface~compute_multiplicity proc~findspan findspan proc~insert_knots->proc~findspan proc~insert_knot_a_5_1 insert_knot_A_5_1 proc~insert_knots->proc~insert_knot_a_5_1 proc~remove_knots->none~get_knot proc~remove_knots->none~set proc~remove_knots->interface~compute_multiplicity proc~remove_knots->proc~findspan proc~remove_knots_a_5_8 remove_knots_A_5_8 proc~remove_knots->proc~remove_knots_a_5_8 proc~rotation rotation proc~rotate_xc->proc~rotation proc~rotate_xg->proc~rotation proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~bincoeff bincoeff proc~elevate_degree_a_5_9->proc~bincoeff proc~get_multiplicity->interface~compute_multiplicity cosd cosd proc~rotation->cosd sind sind proc~rotation->sind proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~factln factln proc~bincoeff->proc~factln proc~cmp_degree->proc~get_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Wc (:) Arrays for control points and weights real(kind=rk), allocatable :: Xc (:,:) Arrays for control points and weights real(kind=rk) :: knot1 (4) Arrays for knot vectors in all three dimensions real(kind=rk) :: knot2 (4) Arrays for knot vectors in all three dimensions real(kind=rk) :: knot3 (4) Arrays for knot vectors in all three dimensions type( nurbs_volume ) :: nurbs Declare a NURBS volume object Functions function generate_Xc (L) result(control_points) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: L Return Value real(kind=rk), allocatable, (:,:) Source Code program example3_volume use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: nurbs !! Declare a NURBS volume object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights real ( rk ) :: knot1 ( 4 ), knot2 ( 4 ), knot3 ( 4 ) !! Arrays for knot vectors in all three dimensions !----------------------------------------------------------------------------- ! Setting up the NURBS volume !----------------------------------------------------------------------------- !> Define the control points for the NURBS volume Xc = generate_Xc ( 5.0_rk ) !> Define weights for the control points (optional) allocate ( Wc ( size ( Xc , 1 )), source = 1.0_rk ) Wc ( 2 ) = 5.0_rk !> Define knot vectors for all three dimensions knot1 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] knot3 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] !> Set knot vectors, control points, and weights for the NURBS volume object !> Wc is optional. call nurbs % set ( knot1 , knot2 , knot3 , Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export the control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_volume_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS volume !----------------------------------------------------------------------------- !> Generate the NURBS volume with resolutions of 20, 20, and 20 in the three dimensions call nurbs % create ( 20 , 20 , 20 ) !> Export the generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_volume_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_volume_Xc.vtk' , 'vtk/nurbs_volume_Xg.vtk' ) !----------------------------------------------------------------------------- ! Refinements !----------------------------------------------------------------------------- !> Print size of knot vectors print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) print * , size ( nurbs % get_knot ( 3 )) !> Insert knots 0.25 and 0.75 in all three directions call nurbs % insert_knots ( 1 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 1 call nurbs % insert_knots ( 2 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 2 call nurbs % insert_knots ( 3 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 3 !> Print size of knot vectors after inserting knots print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) print * , size ( nurbs % get_knot ( 3 )) !> Print degrees print * , nurbs % get_degree () !> Elevate degree by 2 in all three directions call nurbs % elevate_degree ( 1 , 2 ) ! direction 1 call nurbs % elevate_degree ( 2 , 2 ) ! direction 2 call nurbs % elevate_degree ( 3 , 2 ) ! direction 3 !> Print degrees after elevating print * , nurbs % get_degree () !> Print size of knot vectors print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) print * , size ( nurbs % get_knot ( 3 )) call nurbs % remove_knots ( 1 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 1 call nurbs % remove_knots ( 2 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 2 call nurbs % remove_knots ( 3 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 3 !> Print size of knot vectors after removing knots print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) print * , size ( nurbs % get_knot ( 3 )) !> Generate the refined NURBS volume with resolutions of 40, 40, and 40 in the three dimensions call nurbs % create () !> Export updated control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_volume_Xc2.vtk' ) !> Export the refined generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_volume_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_volume_Xc2.vtk' , 'vtk/nurbs_volume_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Transformations !----------------------------------------------------------------------------- !> Rotate the control points call nurbs % rotate_Xc ( alpha =- 4 5.0_rk , beta = 0.0_rk , theta = 9 0.0_rk ) !> Rotate the generated curve call nurbs % rotate_Xg ( alpha =- 4 5.0_rk , beta = 0.0_rk , theta = 9 0.0_rk ) !> Translate the control points call nurbs % translate_Xc ([ 1.0_rk , 2.0_rk , - 3.0_rk ]) !> Translate the generated curve call nurbs % translate_Xg ([ 1.0_rk , 2.0_rk , - 3.0_rk ]) !> Export the transformed control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_volume_Xc3.vtk' ) !> Export the transformed generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_volume_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_volume_Xc3.vtk' , 'vtk/nurbs_volume_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Extract faces !----------------------------------------------------------------------------- !> first compute and set the connectivities of volume elements call nurbs % set_elem ( nurbs % cmp_elem ()) !> get the connectivity of the face1 of the first element print * , 'Face 1 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 1 ) print * , 'Face 2 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 2 ) print * , 'Face 3 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 3 ) print * , 'Face 4 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 4 ) print * , 'Face 5 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 5 ) print * , 'Face 6 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 6 ) !> get the degree of the faces print * , 'Degree of face 1:' , nurbs % cmp_degreeFace ( face = 1 ) print * , 'Degree of face 2:' , nurbs % cmp_degreeFace ( face = 2 ) print * , 'Degree of face 3:' , nurbs % cmp_degreeFace ( face = 3 ) print * , 'Degree of face 4:' , nurbs % cmp_degreeFace ( face = 4 ) print * , 'Degree of face 5:' , nurbs % cmp_degreeFace ( face = 5 ) print * , 'Degree of face 6:' , nurbs % cmp_degreeFace ( face = 6 ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS volume object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( L ) result ( control_points ) implicit none real ( rk ), intent ( in ) :: L real ( rk ), allocatable :: control_points (:,:) real ( rk ) :: L2 L2 = L / 2.0_rk allocate ( control_points ( 8 , 3 )) control_points ( 1 ,:) = [ L2 , - L2 , L2 ] control_points ( 2 ,:) = [ L2 , - L2 , - L2 ] control_points ( 3 ,:) = [ - L2 , - L2 , L2 ] control_points ( 4 ,:) = [ - L2 , - L2 , - L2 ] control_points ( 5 ,:) = [ L2 , L2 , L2 ] control_points ( 6 ,:) = [ L2 , L2 , - L2 ] control_points ( 7 ,:) = [ - L2 , L2 , L2 ] control_points ( 8 ,:) = [ - L2 , L2 , - L2 ] end function !----------------------------------------------------------------------------- end program example3_volume","tags":"","loc":"program/example3_volume.html"},{"title":"example1_curve – ForCAD","text":"Uses forcad program~~example1_curve~~UsesGraph program~example1_curve example1_curve module~forcad forcad program~example1_curve->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. This program demonstrates the usage of a NURBS (Non-Uniform Rational B-Spline) curve object to create  and finalize a NURBS curve.\nIt sets up control points, weights, and knot vectors for all three dimensions, generates the curve, and exports the control points and the curve to VTK files. Define control points for the NURBS curve\nDefine weights for the control points (optional)\nDefine knot vector Set knot vector, control points, and weights for the NURBS curve object.\nWc is optional Deallocate local arrays Export control points to a VTK file Generate the NURBS curve with a resolution of 20 Export the generated curve to a VTK file Show the control geometry and geometry using PyVista Print size of the knot vector Insert knots 0.25, twice and 0.75, once Print size of the updated knot vector Print the degree of the curve Elevate the degree of the curve (2 times) Print the updated degree of the curve Print size of the knot vector Remove knots 0.25, twice and 0.75, once Print size of the updated knot vector Generate the refined curve with a resolution of 20 Export updated control points to a VTK file Export the refined generated curve to a VTK file Show the control geometry and geometry using PyVista Rotate the control points Rotate the generated curve Translate the control points Translate the generated curve Export the transformed control points to a VTK file Export the transformed generated volume to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS curve object Calls program~~example1_curve~~CallsGraph program~example1_curve example1_curve none~get_knot~3 nurbs_curve%get_knot program~example1_curve->none~get_knot~3 none~set~3 nurbs_curve%set program~example1_curve->none~set~3 proc~create~3 nurbs_curve%create program~example1_curve->proc~create~3 proc~elevate_degree~3 nurbs_curve%elevate_degree program~example1_curve->proc~elevate_degree~3 proc~export_xc~3 nurbs_curve%export_Xc program~example1_curve->proc~export_xc~3 proc~export_xg~3 nurbs_curve%export_Xg program~example1_curve->proc~export_xg~3 proc~finalize~3 nurbs_curve%finalize program~example1_curve->proc~finalize~3 proc~get_degree nurbs_curve%get_degree program~example1_curve->proc~get_degree proc~insert_knots~3 nurbs_curve%insert_knots program~example1_curve->proc~insert_knots~3 proc~remove_knots~3 nurbs_curve%remove_knots program~example1_curve->proc~remove_knots~3 proc~rotate_xc~3 nurbs_curve%rotate_Xc program~example1_curve->proc~rotate_xc~3 proc~rotate_xg~3 nurbs_curve%rotate_Xg program~example1_curve->proc~rotate_xg~3 proc~show~3 nurbs_curve%show program~example1_curve->proc~show~3 proc~translate_xc~3 nurbs_curve%translate_Xc program~example1_curve->proc~translate_xc~3 proc~translate_xg~3 nurbs_curve%translate_Xg program~example1_curve->proc~translate_xg~3 proc~get_knot_all~3 nurbs_curve%get_knot_all none~get_knot~3->proc~get_knot_all~3 proc~get_knoti~3 nurbs_curve%get_knoti none~get_knot~3->proc~get_knoti~3 proc~set1a nurbs_curve%set1a none~set~3->proc~set1a proc~set1~3 nurbs_curve%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_curve%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_curve%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_curve%set4 none~set~3->proc~set4~3 interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 proc~is_rational~3 nurbs_curve%is_rational proc~create~3->proc~is_rational~3 proc~elevate_degree~3->none~set~3 proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree~3->proc~elevate_degree_a_5_9 proc~elevate_degree~3->proc~is_rational~3 proc~cmp_elem_xc_vis~3 nurbs_curve%cmp_elem_Xc_vis proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~cmp_elem_xg_vis~3 nurbs_curve%cmp_elem_Xg_vis proc~export_xg~3->proc~cmp_elem_xg_vis~3 proc~insert_knots~3->none~set~3 interface~compute_multiplicity compute_multiplicity proc~insert_knots~3->interface~compute_multiplicity proc~findspan findspan proc~insert_knots~3->proc~findspan proc~insert_knot_a_5_1 insert_knot_A_5_1 proc~insert_knots~3->proc~insert_knot_a_5_1 proc~insert_knots~3->proc~is_rational~3 proc~remove_knots~3->none~set~3 proc~remove_knots~3->interface~compute_multiplicity proc~remove_knots~3->proc~findspan proc~remove_knots~3->proc~is_rational~3 proc~remove_knots_a_5_8 remove_knots_A_5_8 proc~remove_knots~3->proc~remove_knots_a_5_8 proc~rotation rotation proc~rotate_xc~3->proc~rotation proc~rotate_xg~3->proc~rotation proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~bincoeff bincoeff proc~elevate_degree_a_5_9->proc~bincoeff cosd cosd proc~rotation->cosd sind sind proc~rotation->sind proc~cmp_degree~3 nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree~3 proc~set1~3->proc~cmp_degree~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~factln factln proc~bincoeff->proc~factln proc~get_multiplicity~3 nurbs_curve%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Wc (:) Arrays for control points and weights real(kind=rk), allocatable :: Xc (:,:) Arrays for control points and weights real(kind=rk) :: knot (6) Array for knot vector type( nurbs_curve ) :: nurbs Declare a NURBS curve object Source Code program example1_curve use forcad , only : rk , nurbs_curve implicit none type ( nurbs_curve ) :: nurbs !! Declare a NURBS curve object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights real ( rk ) :: knot ( 6 ) !! Array for knot vector !----------------------------------------------------------------------------- ! Setting up the NURBS curve !----------------------------------------------------------------------------- !> Define control points for the NURBS curve allocate ( Xc ( 3 , 3 )) Xc ( 1 ,:) = [ 0.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 0.0_rk , 5.0_rk , 0.0_rk ] Xc ( 3 ,:) = [ 5.0_rk , 5.0_rk , 0.0_rk ] !> Define weights for the control points (optional) allocate ( Wc ( 3 )) Wc = [ 1.0_rk , 2.0_rk , 0.3_rk ] !> Define knot vector knot = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] !> Set knot vector, control points, and weights for the NURBS curve object. !> Wc is optional call nurbs % set ( knot , Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_curve_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS curve !----------------------------------------------------------------------------- !> Generate the NURBS curve with a resolution of 20 call nurbs % create ( res = 20 ) !> Export the generated curve to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_curve_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_curve_Xc.vtk' , 'vtk/nurbs_curve_Xg.vtk' ) !----------------------------------------------------------------------------- ! Refinements !----------------------------------------------------------------------------- !> Print size of the knot vector print * , size ( nurbs % get_knot ()) !> Insert knots 0.25, twice and 0.75, once call nurbs % insert_knots ([ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) !> Print size of the updated knot vector print * , size ( nurbs % get_knot ()) !> Print the degree of the curve print * , nurbs % get_degree () !> Elevate the degree of the curve (2 times) call nurbs % elevate_degree ( 2 ) !> Print the updated degree of the curve print * , nurbs % get_degree () !> Print size of the knot vector print * , size ( nurbs % get_knot ()) !> Remove knots 0.25, twice and 0.75, once call nurbs % remove_knots ([ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) !> Print size of the updated knot vector print * , size ( nurbs % get_knot ()) !> Generate the refined curve with a resolution of 20 call nurbs % create () !> Export updated control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_curve_Xc2.vtk' ) !> Export the refined generated curve to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_curve_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_curve_Xc2.vtk' , 'vtk/nurbs_curve_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Transformations !----------------------------------------------------------------------------- !> Rotate the control points call nurbs % rotate_Xc ( alpha = 4 5.0_rk , beta = 0.0_rk , theta = 9 0.0_rk ) !> Rotate the generated curve call nurbs % rotate_Xg ( alpha =- 4 5.0_rk , beta = 0.0_rk , theta =- 9 0.0_rk ) !> Translate the control points call nurbs % translate_Xc ([ 1.0_rk , 2.0_rk , - 3.0_rk ]) !> Translate the generated curve call nurbs % translate_Xg ([ - 1.0_rk , - 2.0_rk , 3.0_rk ]) !> Export the transformed control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_curve_Xc3.vtk' ) !> Export the transformed generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_curve_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_curve_Xc3.vtk' , 'vtk/nurbs_curve_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call nurbs % finalize () end program example1_curve","tags":"","loc":"program/example1_curve.html"},{"title":"shape_C_2d – ForCAD","text":"Uses forcad program~~shape_c_2d~~UsesGraph program~shape_c_2d shape_C_2d module~forcad forcad program~shape_c_2d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set a C-shape with radius 2.0 and center at [0.0, 0.0, 0.0] Export control points to a VTK file Generate the NURBS C-shape with a resolution of 100 Export the generated cirlce to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS curve object Calls program~~shape_c_2d~~CallsGraph program~shape_c_2d shape_C_2d proc~create~2 nurbs_surface%create program~shape_c_2d->proc~create~2 proc~export_xc~2 nurbs_surface%export_Xc program~shape_c_2d->proc~export_xc~2 proc~export_xg~2 nurbs_surface%export_Xg program~shape_c_2d->proc~export_xg~2 proc~finalize~2 nurbs_surface%finalize program~shape_c_2d->proc~finalize~2 proc~set_c~2 nurbs_surface%set_C program~shape_c_2d->proc~set_c~2 proc~show~2 nurbs_surface%show program~shape_c_2d->proc~show~2 interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_surface%is_rational proc~create~2->proc~is_rational~2 proc~cmp_elem_xc_vis~2 nurbs_surface%cmp_elem_Xc_vis proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~cmp_elem_xg_vis~2 nurbs_surface%cmp_elem_Xg_vis proc~export_xg~2->proc~cmp_elem_xg_vis~2 none~set~2 nurbs_surface%set proc~set_c~2->none~set~2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_surface ) :: shape","tags":"","loc":"program/shape_c_2d.html"},{"title":"nearest_point_2d_bench – ForCAD","text":"Uses forcad fortime program~~nearest_point_2d_bench~~UsesGraph program~nearest_point_2d_bench nearest_point_2d_bench fortime fortime program~nearest_point_2d_bench->fortime module~forcad forcad program~nearest_point_2d_bench->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set a tetragon with lengths of 2.0 and 3.0 and 3 and 4 control points in each direction\nThe weights of the control points (Wc) are optional. Generate the NURBS surface with resolutions of 30 in both dimensions Find the nearest point on the surface to a given point\nFinalize the NURBS surface object Calls program~~nearest_point_2d_bench~~CallsGraph program~nearest_point_2d_bench nearest_point_2d_bench proc~create~2 nurbs_surface%create program~nearest_point_2d_bench->proc~create~2 proc~finalize~2 nurbs_surface%finalize program~nearest_point_2d_bench->proc~finalize~2 proc~nearest_point~2 nurbs_surface%nearest_point program~nearest_point_2d_bench->proc~nearest_point~2 proc~set_tetragon nurbs_surface%set_tetragon program~nearest_point_2d_bench->proc~set_tetragon timer_start timer_start program~nearest_point_2d_bench->timer_start timer_stop timer_stop program~nearest_point_2d_bench->timer_stop interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_surface%is_rational proc~create~2->proc~is_rational~2 interface~nearest_point_help_2d nearest_point_help_2d proc~nearest_point~2->interface~nearest_point_help_2d none~set~2 nurbs_surface%set proc~set_tetragon->none~set~2 proc~tetragon_xc tetragon_Xc proc~set_tetragon->proc~tetragon_xc proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial integer :: i integer :: id id of the nearest point integer :: j real(kind=rk), allocatable :: nearest_Xg (:) Coordinates of the nearest point on the surface real(kind=rk), allocatable :: nearest_Xt (:) Corresponding parametric coordinates of the nearest point real(kind=rk), allocatable :: points (:,:) type( nurbs_surface ) :: shape Declare a NURBS surface object type(timer) :: t","tags":"","loc":"program/nearest_point_2d_bench.html"},{"title":"compute_area – ForCAD","text":"Uses forcad program~~compute_area~~UsesGraph program~compute_area compute_area module~forcad forcad program~compute_area->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Calls program~~compute_area~~CallsGraph program~compute_area compute_area none~set~2 nurbs_surface%set program~compute_area->none~set~2 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area proc~set1~2 nurbs_surface%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_surface%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_surface%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_surface%set4 none~set~2->proc~set4~2 proc~ansatz~2 nurbs_surface%ansatz proc~cmp_area->proc~ansatz~2 proc~cmp_elem~2 nurbs_surface%cmp_elem proc~cmp_area->proc~cmp_elem~2 proc~ansatz~2->none~set~2 proc~ansatz~2->proc~cmp_elem~2 interface~gauss_leg gauss_leg proc~ansatz~2->interface~gauss_leg interface~ndgrid ndgrid proc~ansatz~2->interface~ndgrid interface~unique unique proc~ansatz~2->interface~unique none~derivative~2 nurbs_surface%derivative proc~ansatz~2->none~derivative~2 proc~det det proc~ansatz~2->proc~det proc~inv inv proc~ansatz~2->proc~inv interface~elemconn_cn elemConn_Cn proc~cmp_elem~2->interface~elemconn_cn proc~cmp_elem~2->interface~unique proc~get_multiplicity~2 nurbs_surface%get_multiplicity proc~cmp_elem~2->proc~get_multiplicity~2 proc~cmp_degree~2 nurbs_surface%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_surface%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar~2 nurbs_surface%derivative_scalar none~derivative~2->proc~derivative_scalar~2 proc~derivative_vector~2 nurbs_surface%derivative_vector none~derivative~2->proc~derivative_vector~2 proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~2->interface~compute_multiplicity proc~inv->proc~det proc~inv->proc~inv proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 interface~compute_dtgc~2 compute_dTgc proc~derivative_scalar~2->interface~compute_dtgc~2 proc~is_rational~2 nurbs_surface%is_rational proc~derivative_scalar~2->proc~is_rational~2 proc~derivative_vector~2->interface~ndgrid proc~derivative_vector~2->interface~compute_dtgc~2 proc~derivative_vector~2->proc~is_rational~2 gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_2d->gauss_legendre proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk) :: Xc (4,3) real(kind=rk) :: area type( nurbs_surface ) :: shape","tags":"","loc":"program/compute_area.html"},{"title":"shape_C_3d – ForCAD","text":"Uses forcad program~~shape_c_3d~~UsesGraph program~shape_c_3d shape_C_3d module~forcad forcad program~shape_c_3d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set a C-shape with radius 2.0 and center at [0.0, 0.0, 0.0] Export control points to a VTK file Generate the NURBS C-shape with a resolution of 100 Export the generated cirlce to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS curve object Calls program~~shape_c_3d~~CallsGraph program~shape_c_3d shape_C_3d proc~create nurbs_volume%create program~shape_c_3d->proc~create proc~export_xc nurbs_volume%export_Xc program~shape_c_3d->proc~export_xc proc~export_xg nurbs_volume%export_Xg program~shape_c_3d->proc~export_xg proc~finalize nurbs_volume%finalize program~shape_c_3d->proc~finalize proc~set_c nurbs_volume%set_C program~shape_c_3d->proc~set_c proc~show nurbs_volume%show program~shape_c_3d->proc~show interface~compute_xg compute_Xg proc~create->interface~compute_xg interface~ndgrid ndgrid proc~create->interface~ndgrid proc~is_rational nurbs_volume%is_rational proc~create->proc~is_rational proc~cmp_elem_xc_vis nurbs_volume%cmp_elem_Xc_vis proc~export_xc->proc~cmp_elem_xc_vis proc~cmp_elem_xg_vis nurbs_volume%cmp_elem_Xg_vis proc~export_xg->proc~cmp_elem_xg_vis none~set nurbs_volume%set proc~set_c->none~set proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_volume ) :: shape","tags":"","loc":"program/shape_c_3d.html"},{"title":"shape_half_ring_3d – ForCAD","text":"Uses forcad program~~shape_half_ring_3d~~UsesGraph program~shape_half_ring_3d shape_half_ring_3d module~forcad forcad program~shape_half_ring_3d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set up a half ring centered at 0,0,0 with inner radius 1, outer radius 2, and length 1. Export the control points to a VTK file for visualization. Create the shape using the specified number of elements in each direction. Export the geometry to a VTK file for visualization. Show the control geometry and geometry using PyVista Finalize and clean up the shape object. Calls program~~shape_half_ring_3d~~CallsGraph program~shape_half_ring_3d shape_half_ring_3d proc~create nurbs_volume%create program~shape_half_ring_3d->proc~create proc~export_xc nurbs_volume%export_Xc program~shape_half_ring_3d->proc~export_xc proc~export_xg nurbs_volume%export_Xg program~shape_half_ring_3d->proc~export_xg proc~finalize nurbs_volume%finalize program~shape_half_ring_3d->proc~finalize proc~set_half_ring nurbs_volume%set_half_ring program~shape_half_ring_3d->proc~set_half_ring proc~show nurbs_volume%show program~shape_half_ring_3d->proc~show interface~compute_xg compute_Xg proc~create->interface~compute_xg interface~ndgrid ndgrid proc~create->interface~ndgrid proc~is_rational nurbs_volume%is_rational proc~create->proc~is_rational proc~cmp_elem_xc_vis nurbs_volume%cmp_elem_Xc_vis proc~export_xc->proc~cmp_elem_xc_vis proc~cmp_elem_xg_vis nurbs_volume%cmp_elem_Xg_vis proc~export_xg->proc~cmp_elem_xg_vis none~set nurbs_volume%set proc~set_half_ring->none~set proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_volume ) :: shape","tags":"","loc":"program/shape_half_ring_3d.html"},{"title":"shape_hexahedron – ForCAD","text":"Uses forcad program~~shape_hexahedron~~UsesGraph program~shape_hexahedron shape_hexahedron module~forcad forcad program~shape_hexahedron->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set up a hexahedron shape with dimensions L = [2.0, 4.0, 8.0] and a specified number of control points nc = [4, 6, 8].\nThe weights of the control points (Wc) are optional. Export the control points to a VTK file for visualization. Create the shape using the specified number of elements in each direction. Export the geometry to a VTK file for visualization. Show the control geometry and geometry using PyVista Finalize and clean up the shape object. Calls program~~shape_hexahedron~~CallsGraph program~shape_hexahedron shape_hexahedron proc~create nurbs_volume%create program~shape_hexahedron->proc~create proc~export_xc nurbs_volume%export_Xc program~shape_hexahedron->proc~export_xc proc~export_xg nurbs_volume%export_Xg program~shape_hexahedron->proc~export_xg proc~finalize nurbs_volume%finalize program~shape_hexahedron->proc~finalize proc~set_hexahedron nurbs_volume%set_hexahedron program~shape_hexahedron->proc~set_hexahedron proc~show nurbs_volume%show program~shape_hexahedron->proc~show interface~compute_xg compute_Xg proc~create->interface~compute_xg interface~ndgrid ndgrid proc~create->interface~ndgrid proc~is_rational nurbs_volume%is_rational proc~create->proc~is_rational proc~cmp_elem_xc_vis nurbs_volume%cmp_elem_Xc_vis proc~export_xc->proc~cmp_elem_xc_vis proc~cmp_elem_xg_vis nurbs_volume%cmp_elem_Xg_vis proc~export_xg->proc~cmp_elem_xg_vis none~set nurbs_volume%set proc~set_hexahedron->none~set proc~hexahedron_xc hexahedron_Xc proc~set_hexahedron->proc~hexahedron_xc proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1 nurbs_volume%set1 none~set->proc~set1 proc~set2 nurbs_volume%set2 none~set->proc~set2 proc~set3 nurbs_volume%set3 none~set->proc~set3 proc~set4 nurbs_volume%set4 none~set->proc~set4 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree nurbs_volume%cmp_degree proc~set1->proc~cmp_degree proc~cmp_nc nurbs_volume%cmp_nc proc~set1->proc~cmp_nc proc~set2->proc~cmp_nc proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_volume%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_volume ) :: shape","tags":"","loc":"program/shape_hexahedron.html"},{"title":"nearest_point_3d.f90 – ForCAD","text":"This file depends on sourcefile~~nearest_point_3d.f90~~EfferentGraph sourcefile~nearest_point_3d.f90 nearest_point_3d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~nearest_point_3d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program nearest_point_3d use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: shape !! Declare a NURBS volume object real ( rk ), allocatable :: nearest_Xg (:) !! Coordinates of the nearest point on the volume real ( rk ), allocatable :: nearest_Xt (:) !! Corresponding parametric coordinates of the nearest point integer :: id !! id of the nearest point real ( rk ) :: Xc ( 8 , 3 ) !! Control points real ( rk ) :: Wc ( 8 ) !! Weights of the control points !----------------------------------------------------------------------------- ! Setting up the NURBS hexahedron !----------------------------------------------------------------------------- Xc ( 1 ,:) = [ 0.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 3 ,:) = [ 0.0_rk , 4.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ 2.0_rk , 4.0_rk , 0.0_rk ] Xc ( 5 ,:) = [ 0.0_rk , 0.0_rk , 2.0_rk ] Xc ( 6 ,:) = [ 2.0_rk , 0.0_rk , 2.0_rk ] Xc ( 7 ,:) = [ 0.0_rk , 4.0_rk , 2.0_rk ] Xc ( 8 ,:) = [ 2.0_rk , 4.0_rk , 2.0_rk ] !> The weights of the control points (Wc) are optional. Wc = [ 1.0_rk , 1.1_rk , 1.11_rk , 1.0_rk , 0.5_rk , 0.5_rk , 1.2_rk , 1.0_rk ] call shape % set (& knot1 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& knot3 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& Xc = Xc , Wc = Wc ) !----------------------------------------------------------------------------- ! Creating the NURBS volume !----------------------------------------------------------------------------- !> Generate the NURBS volume with resolutions of 20, 20, 20 call shape % create ( 30 , 30 , 30 ) !----------------------------------------------------------------------------- ! Nearest point on the volume !----------------------------------------------------------------------------- !> Find the nearest point on the volume to a given point ! nearest_Xg: Coordinates of the nearest point on the volume (optional) ! nearest_Xt: Corresponding parametric coordinates of the nearest point (optional) ! id: id of the nearest point (optional) call shape % nearest_point ([ 1.5_rk , 3.5_rk , 1.1_rk ], nearest_Xg , nearest_Xt , id ) print '(a,1x,g0,2x,g0,2x,g0,a,2x,g0,2x,g0,2x,g0,2x,a,1x,g0)' ,& 'Nearest point on the volume:' , nearest_Xg , ' with parametric coordinates:' , nearest_Xt , ' and id:' , id !----------------------------------------------------------------------------- ! Nearest point on the volume (Optimization) !----------------------------------------------------------------------------- !> Find the nearest point on the volume to a given point !> The optimization method is used to find the nearest point !> The optimization method is based on the Newton-Raphson method ! nearest_Xt: Corresponding parametric coordinates of the nearest point ! nearest_Xg: Coordinates of the nearest point on the volume (optional) call shape % nearest_point2 ([ 1.5_rk , 3.5_rk , 1.1_rk ], 1.0e-11_rk , 500 , nearest_Xt , nearest_Xg ) print '(a,1x,g0,2x,g0,2x,g0,a,2x,g0,2x,g0,2x,g0)' ,& 'Nearest point on the volume:' , nearest_Xg , ' with parametric coordinates:' , nearest_Xt !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS volume object call shape % finalize () ! deallocate(nearest_Xg, nearest_Xt) end program","tags":"","loc":"sourcefile/nearest_point_3d.f90.html"},{"title":"cmp_volume.f90 – ForCAD","text":"This file depends on sourcefile~~cmp_volume.f90~~EfferentGraph sourcefile~cmp_volume.f90 cmp_volume.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~cmp_volume.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program compute_volume use forcad implicit none type ( nurbs_volume ) :: shape real ( rk ) :: volume real ( rk ) :: Xc ( 8 , 3 ) Xc ( 1 ,:) = [ 0.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 3 ,:) = [ 0.0_rk , 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ 2.0_rk , 2.0_rk , 0.0_rk ] Xc ( 5 ,:) = [ 0.0_rk , 0.0_rk , 2.0_rk ] Xc ( 6 ,:) = [ 2.0_rk , 0.0_rk , 2.0_rk ] Xc ( 7 ,:) = [ 0.0_rk , 2.0_rk , 2.0_rk ] Xc ( 8 ,:) = [ 2.0_rk , 2.0_rk , 2.0_rk ] call shape % set (& knot1 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& knot3 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& Xc = Xc ) call shape % cmp_volume ( volume ) print * , volume end program","tags":"","loc":"sourcefile/cmp_volume.f90.html"},{"title":"shape_C_1d.f90 – ForCAD","text":"This file depends on sourcefile~~shape_c_1d.f90~~EfferentGraph sourcefile~shape_c_1d.f90 shape_C_1d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_c_1d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_C_1d use forcad , only : rk , nurbs_curve implicit none type ( nurbs_curve ) :: shape !----------------------------------------------------------------------------- ! Setting up NURBS C-shape !----------------------------------------------------------------------------- !> Set a C-shape with radius 2.0 and center at [0.0, 0.0, 0.0] call shape % set_C ( center = [ 0.0_rk , 0.0_rk , 0.0_rk ], radius = 2.0_rk ) !> Export control points to a VTK file call shape % export_Xc ( 'vtk/shape_C_1d_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating C-shape !----------------------------------------------------------------------------- !> Generate the NURBS C-shape with a resolution of 100 call shape % create ( res = 100 ) !> Export the generated cirlce to a VTK file call shape % export_Xg ( 'vtk/shape_C_1d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_C_1d_Xc.vtk' , 'vtk/shape_C_1d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call shape % finalize () end program","tags":"","loc":"sourcefile/shape_c_1d.f90.html"},{"title":"forcad_nurbs_volume.f90 – ForCAD","text":"This file depends on sourcefile~~forcad_nurbs_volume.f90~~EfferentGraph sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Files dependent on this one sourcefile~~forcad_nurbs_volume.f90~~AfferentGraph sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~cmp_area.f90 cmp_area.f90 sourcefile~cmp_area.f90->sourcefile~forcad.f90 sourcefile~cmp_length.f90 cmp_length.f90 sourcefile~cmp_length.f90->sourcefile~forcad.f90 sourcefile~cmp_volume.f90 cmp_volume.f90 sourcefile~cmp_volume.f90->sourcefile~forcad.f90 sourcefile~demo_curve.f90 demo_curve.f90 sourcefile~demo_curve.f90->sourcefile~forcad.f90 sourcefile~demo_surface.f90 demo_surface.f90 sourcefile~demo_surface.f90->sourcefile~forcad.f90 sourcefile~demo_volume.f90 demo_volume.f90 sourcefile~demo_volume.f90->sourcefile~forcad.f90 sourcefile~example_curve_1.f90 example_curve_1.f90 sourcefile~example_curve_1.f90->sourcefile~forcad.f90 sourcefile~example_ppm1.f90 example_ppm1.f90 sourcefile~example_ppm1.f90->sourcefile~forcad.f90 sourcefile~example_ppm2.f90 example_ppm2.f90 sourcefile~example_ppm2.f90->sourcefile~forcad.f90 sourcefile~example_ppm3.f90 example_ppm3.f90 sourcefile~example_ppm3.f90->sourcefile~forcad.f90 sourcefile~example_surface_1.f90 example_surface_1.f90 sourcefile~example_surface_1.f90->sourcefile~forcad.f90 sourcefile~example_volume_1.f90 example_volume_1.f90 sourcefile~example_volume_1.f90->sourcefile~forcad.f90 sourcefile~nearest_point_1d.f90 nearest_point_1d.f90 sourcefile~nearest_point_1d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d.f90 nearest_point_2d.f90 sourcefile~nearest_point_2d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d_bench.f90 nearest_point_2d_bench.f90 sourcefile~nearest_point_2d_bench.f90->sourcefile~forcad.f90 sourcefile~nearest_point_3d.f90 nearest_point_3d.f90 sourcefile~nearest_point_3d.f90->sourcefile~forcad.f90 sourcefile~put_to_nurbs.f90 put_to_nurbs.f90 sourcefile~put_to_nurbs.f90->sourcefile~forcad.f90 sourcefile~shape_c_1d.f90 shape_C_1d.f90 sourcefile~shape_c_1d.f90->sourcefile~forcad.f90 sourcefile~shape_c_2d.f90 shape_C_2d.f90 sourcefile~shape_c_2d.f90->sourcefile~forcad.f90 sourcefile~shape_c_3d.f90 shape_C_3d.f90 sourcefile~shape_c_3d.f90->sourcefile~forcad.f90 sourcefile~shape_circle.f90 shape_circle.f90 sourcefile~shape_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_circle.f90 shape_half_circle.f90 sourcefile~shape_half_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_2d.f90 shape_half_ring_2d.f90 sourcefile~shape_half_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_3d.f90 shape_half_ring_3d.f90 sourcefile~shape_half_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_hexahedron.f90 shape_hexahedron.f90 sourcefile~shape_hexahedron.f90->sourcefile~forcad.f90 sourcefile~shape_ring_2d.f90 shape_ring_2d.f90 sourcefile~shape_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_ring_3d.f90 shape_ring_3d.f90 sourcefile~shape_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_tetragon.f90 shape_tetragon.f90 sourcefile~shape_tetragon.f90->sourcefile~forcad.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> This module defines the 'nurbs_volume' type for representing a Non-Uniform Rational B-Spline (NURBS) volume. module forcad_nurbs_volume use forcad_utils , only : rk , basis_bspline , elemConn_C0 , kron , ndgrid , compute_multiplicity , compute_knot_vector , & basis_bspline_der , insert_knot_A_5_1 , findspan , elevate_degree_A_5_9 , hexahedron_Xc , remove_knots_A_5_8 , & elemConn_Cn , unique , rotation , det , inv , gauss_leg implicit none private public nurbs_volume !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause type nurbs_volume real ( rk ), allocatable , private :: Xc (:,:) !! Control points (2D array: [nc(1)*nc(2)*nc(3), dim]) real ( rk ), allocatable , private :: Xg (:,:) !! Geometry points (2D array: [ng(1)*ng(2)*ng(3), dim]) real ( rk ), allocatable , private :: Wc (:) !! Weights for the control points (1D array: [nc(1)*nc(2)*nc(3)]) real ( rk ), allocatable , private :: Xt1 (:) !! Evaluation parameter values in the first direction (1D array: [ng(1)]) real ( rk ), allocatable , private :: Xt2 (:) !! Evaluation parameter values in the second direction (1D array: [ng(2)]) real ( rk ), allocatable , private :: Xt3 (:) !! Evaluation parameter values in the third direction (1D array: [ng(3)]) real ( rk ), allocatable , private :: Xt (:,:) !! Evaluation parameter values (2D array: [ng(1)*ng(2)*ng(3), dim] real ( rk ), allocatable , private :: knot1 (:) !! Knot vector in the first direction (1D array) real ( rk ), allocatable , private :: knot2 (:) !! Knot vector in the second direction (1D array) real ( rk ), allocatable , private :: knot3 (:) !! Knot vector in the third direction (1D array) integer , private :: degree ( 3 ) !! Degree (order) of the volume integer , private :: nc ( 3 ) !! Number of control points in each direction integer , private :: ng ( 3 ) !! Number of geometry points in each direction integer , allocatable , private :: elemConn_Xc_vis (:,:) !! Connectivity for visualization of control points integer , allocatable , private :: elemConn_Xg_vis (:,:) !! Connectivity for visualization of geometry points integer , allocatable , private :: elemConn (:,:) !! IGA element connectivity contains procedure :: set1 !!> Set knot vectors, control points and weights for the NURBS volume object procedure :: set2 !!> Set NURBS volume using nodes of parameter space, degree, continuity, control points and weights procedure :: set3 !!> Set Bezier or Rational Bezier volume using control points and weights procedure :: set4 !!> Set NURBS volume using degree, number of control points, control points and weights generic :: set => set1 , set2 , set3 , set4 !!> Set NURBS volume procedure :: create !!> Generate geometry points procedure :: cmp_Xg !!> Compute geometry points procedure , private :: get_Xc_all !!> Get all control points procedure , private :: get_Xci !!> Get i-th control point procedure , private :: get_Xcid !!> Get i-th control point in a specific direction generic :: get_Xc => get_Xc_all , get_Xci , get_Xcid !!> Get control points procedure , private :: get_Xg_all !!> Get all geometry points procedure , private :: get_Xgi !!> Get i-th geometry point procedure , private :: get_Xgid !!> Get i-th geometry point in a specific direction generic :: get_Xg => get_Xg_all , get_Xgi , get_Xgid !!> Get geometry points procedure , private :: get_Wc_all !!> Get all weights procedure , private :: get_Wci !!> Get i-th weight generic :: get_Wc => get_Wc_all , get_Wci !!> Get weights procedure :: get_Xt !!> Get parameter values procedure , private :: get_knot_all !!> Get all knot vectors procedure , private :: get_knoti !!> Get i-th knot value generic :: get_knot => get_knoti , get_knot_all !!> Get knot vector procedure :: get_ng !!> Get number of geometry points procedure , private :: get_nc_dir !!> Get number of control points in a specific direction procedure , private :: get_nc_all !!> Get number of control points in all directions generic :: get_nc => get_nc_all , get_nc_dir !!> Get number of control points procedure :: cmp_degree !!> Compute degree of the NURBS volume procedure , private :: get_degree_all !!> Get degree of the NURBS volume in all directions procedure , private :: get_degree_dir !!> Get degree of the NURBS volume in a specific direction generic :: get_degree => get_degree_all , get_degree_dir !!> Get degree of the NURBS volume procedure :: finalize !!> Finalize the NURBS volume object procedure :: cmp_elem_Xc_vis !!> Generate connectivity for control points procedure :: cmp_elem_Xg_vis !!> Generate connectivity for geometry points procedure :: cmp_elem !!> Generate IGA element connectivity procedure :: get_elem_Xc_vis !!> Get connectivity for control points procedure :: get_elem_Xg_vis !!> Get connectivity for geometry points procedure :: get_elem !!> Get IGA element connectivity procedure :: set_elem_Xc_vis !!> Set connectivity for control points procedure :: set_elem_Xg_vis !!> Set connectivity for geometry points procedure :: set_elem !!> Set IGA element connectivity procedure :: export_Xc !!> Export control points to VTK file procedure :: export_Xg !!> Export geometry points to VTK file procedure :: modify_Xc !!> Modify control points procedure :: modify_Wc !!> Modify weights procedure :: get_multiplicity !!> Compute and return the multiplicity of the knots procedure :: get_continuity !!> Compute and return the continuity of the NURBS volume procedure :: cmp_nc !!> Compute number of required control points procedure , private :: basis_vector !!> Compute the basis functions of the NURBS volume procedure , private :: basis_scalar !!> Compute the basis functions of the NURBS volume generic :: basis => basis_vector , basis_scalar !!> Compute the basis functions of the NURBS volume procedure , private :: derivative_vector !!> Compute the derivative of the NURBS volume procedure , private :: derivative_scalar !!> Compute the derivative of the NURBS volume generic :: derivative => derivative_vector , derivative_scalar !!> Compute the derivative of the NURBS volume procedure , private :: derivative2_vector !!> Compute the second derivative of the NURBS volume procedure , private :: derivative2_scalar !!> Compute the second derivative of the NURBS volume generic :: derivative2 => derivative2_vector , derivative2_scalar !!> Compute the second derivative of the NURBS volume procedure :: insert_knots !!> Insert knots into the knot vector procedure :: elevate_degree !!> Elevate the degree of the NURBS volume procedure :: is_rational !!> Check if the NURBS volume is rational procedure :: put_to_nurbs !!> Put a shape to a NURBS volume procedure :: remove_knots !!> Remove knots from the knot vector procedure :: rotate_Xc !!> Rotate control points procedure :: rotate_Xg !!> Rotate geometry points procedure :: translate_Xc !!> Translate control points procedure :: translate_Xg !!> Translate geometry points procedure :: show !!> Show the NURBS object using PyVista procedure :: nearest_point !!> Find the nearest point on the NURBS volume (Approximation) procedure :: nearest_point2 !!> Find the nearest point on the NURBS volume (Minimization - Newton's method) procedure :: ansatz !!> Compute the shape functions, derivative of shape functions and dV procedure :: cmp_volume !!> Compute the volume of the NURBS volume ! Faces procedure :: cmp_elemFace_Xc_vis !!> Compute faces of the control points procedure :: cmp_elemFace_Xg_vis !!> Compute faces of the geometry points procedure :: cmp_elemFace !!> Compute faces of the IGA elements procedure :: cmp_degreeFace !!> Compute degrees of the faces ! Shapes procedure :: set_hexahedron !!> Set a hexahedron procedure :: set_ring !!> Set a ring procedure :: set_half_ring !!> Set a half ring procedure :: set_C !!> Set a C-shape end type !=============================================================================== interface compute_Xg pure function compute_Xg_nurbs_3d ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_ng , f_Xc , f_Wc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Xg (:,:) end function pure function compute_Xg_bspline_3d ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_ng , f_Xc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), allocatable :: f_Xg (:,:) end function pure function compute_Xg_nurbs_3d_1point ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_Xc , f_Wc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Xg (:) end function pure function compute_Xg_bspline_3d_1point ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_Xc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), allocatable :: f_Xg (:) end function end interface interface compute_dTgc pure subroutine compute_dTgc_nurbs_3d_vector ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_ng , f_Wc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_dTgc_bspline_3d_vector ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_ng , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_dTgc_nurbs_3d_scalar ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_Wc , f_dTgc , f_Tgc , f_elem ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) integer , intent ( in ), optional :: f_elem (:) end subroutine pure subroutine compute_dTgc_bspline_3d_scalar ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_dTgc , f_Tgc , f_elem ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) integer , intent ( in ), optional :: f_elem (:) end subroutine end interface interface compute_d2Tgc pure subroutine compute_d2Tgc_nurbs_3d_vector (& f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_ng , f_Wc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_d2Tgc_bspline_3d_vector (& f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_ng , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_d2Tgc_nurbs_3d_scalar ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_Wc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) end subroutine pure subroutine compute_d2Tgc_bspline_3d_scalar ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) end subroutine end interface interface compute_Tgc pure function compute_Tgc_nurbs_3d_vector ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_ng , f_Wc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Tgc (:,:) end function pure function compute_Tgc_bspline_3d_vector ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_ng ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), allocatable :: f_Tgc (:,:) end function pure function compute_Tgc_nurbs_3d_scalar ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_Wc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Tgc (:) end function pure function compute_Tgc_bspline_3d_scalar ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) real ( rk ), allocatable :: f_Tgc (:) end function end interface interface pure function nearest_point_help_3d ( f_ng , f_Xg , f_point_Xg ) result ( f_distances ) import :: rk integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Xg (:,:) real ( rk ), intent ( in ), contiguous :: f_point_Xg (:) real ( rk ), allocatable :: f_distances (:) end function end interface contains !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set control points and weights for the NURBS volume object. pure subroutine set1 ( this , knot1 , knot2 , knot3 , Xc , Wc ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( allocated ( this % knot1 )) deallocate ( this % knot1 ) if ( allocated ( this % knot2 )) deallocate ( this % knot2 ) if ( allocated ( this % knot3 )) deallocate ( this % knot3 ) if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % knot1 = knot1 this % knot2 = knot2 this % knot3 = knot3 call this % cmp_degree () call this % cmp_nc () this % Xc = Xc if ( present ( Wc )) then if ( size ( Wc ) /= this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 )) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set control points and weights for the NURBS volume object. pure subroutine set2 ( this , Xth_dir1 , Xth_dir2 , Xth_dir3 , degree , continuity1 , continuity2 , continuity3 , Xc , Wc ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xth_dir1 (:), Xth_dir2 (:), Xth_dir3 (:) integer , intent ( in ), contiguous :: degree (:) integer , intent ( in ), contiguous :: continuity1 (:), continuity2 (:), continuity3 (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) this % knot1 = compute_knot_vector ( Xth_dir1 , degree ( 1 ), continuity1 ) this % knot2 = compute_knot_vector ( Xth_dir2 , degree ( 2 ), continuity2 ) this % knot3 = compute_knot_vector ( Xth_dir3 , degree ( 3 ), continuity3 ) this % degree ( 1 ) = degree ( 1 ) this % degree ( 2 ) = degree ( 2 ) this % degree ( 3 ) = degree ( 3 ) call this % cmp_nc () this % Xc = Xc if ( present ( Wc )) this % Wc = Wc end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set Bezier or Rational Bezier volume using control points and weights. pure subroutine set3 ( this , nc , Xc , Wc ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), contiguous :: nc (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % Xc = Xc this % nc = nc if ( allocated ( this % knot1 )) deallocate ( this % knot1 ) allocate ( this % knot1 ( 2 * this % nc ( 1 ))) this % knot1 ( 1 : this % nc ( 1 )) = 0.0_rk this % knot1 ( this % nc ( 1 ) + 1 : 2 * this % nc ( 1 )) = 1.0_rk if ( allocated ( this % knot2 )) deallocate ( this % knot2 ) allocate ( this % knot2 ( 2 * this % nc ( 2 ))) this % knot2 ( 1 : this % nc ( 2 )) = 0.0_rk this % knot2 ( this % nc ( 2 ) + 1 : 2 * this % nc ( 2 )) = 1.0_rk if ( allocated ( this % knot3 )) deallocate ( this % knot3 ) allocate ( this % knot3 ( 2 * this % nc ( 3 ))) this % knot3 ( 1 : this % nc ( 3 )) = 0.0_rk this % knot3 ( this % nc ( 3 ) + 1 : 2 * this % nc ( 3 )) = 1.0_rk call this % cmp_degree () if ( present ( Wc )) then if ( size ( Wc ) /= this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 )) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set4 ( this , degree , nc , Xc , Wc ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), contiguous :: degree (:) integer , intent ( in ), contiguous :: nc (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) integer :: m ( 3 ), i if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % Xc = Xc this % nc = nc this % degree = degree ! Size of knot vectors m = nc + degree + 1 if ( allocated ( this % knot1 )) deallocate ( this % knot1 ) allocate ( this % knot1 ( m ( 1 ))) this % knot1 ( 1 : degree ( 1 ) + 1 ) = 0.0_rk this % knot1 ( degree ( 1 ) + 2 : m ( 1 ) - degree ( 1 ) - 1 ) = [( real ( i , rk ) / ( m ( 1 ) - 2 * degree ( 1 ) - 1 ), i = 1 , m ( 1 ) - 2 * degree ( 1 ) - 2 )] this % knot1 ( m ( 1 ) - degree ( 1 ): m ( 1 )) = 1.0_rk if ( allocated ( this % knot2 )) deallocate ( this % knot2 ) allocate ( this % knot2 ( m ( 2 ))) this % knot2 ( 1 : degree ( 2 ) + 1 ) = 0.0_rk this % knot2 ( degree ( 2 ) + 2 : m ( 2 ) - degree ( 2 ) - 1 ) = [( real ( i , rk ) / ( m ( 2 ) - 2 * degree ( 2 ) - 1 ), i = 1 , m ( 2 ) - 2 * degree ( 2 ) - 2 )] this % knot2 ( m ( 2 ) - degree ( 2 ): m ( 2 )) = 1.0_rk if ( allocated ( this % knot3 )) deallocate ( this % knot3 ) allocate ( this % knot3 ( m ( 3 ))) this % knot3 ( 1 : degree ( 3 ) + 1 ) = 0.0_rk this % knot3 ( degree ( 3 ) + 2 : m ( 3 ) - degree ( 3 ) - 1 ) = [( real ( i , rk ) / ( m ( 3 ) - 2 * degree ( 3 ) - 1 ), i = 1 , m ( 3 ) - 2 * degree ( 3 ) - 2 )] this % knot3 ( m ( 3 ) - degree ( 3 ): m ( 3 )) = 1.0_rk if ( present ( Wc )) then if ( size ( Wc ) /= nc ( 1 ) * nc ( 2 ) * nc ( 3 )) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine create ( this , res1 , res2 , res3 , Xt1 , Xt2 , Xt3 , Xt ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), optional :: res1 , res2 , res3 real ( rk ), intent ( in ), contiguous , optional :: Xt1 (:), Xt2 (:), Xt3 (:) real ( rk ), intent ( in ), contiguous , optional :: Xt (:,:) integer :: i ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % knot1 ) . or . . not . allocated ( this % knot2 ) . or . . not . allocated ( this % knot3 )) then error stop 'Knot vector(s) is/are not set.' end if ! Set parameter values if ( present ( Xt1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) this % Xt1 = Xt1 elseif ( present ( res1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) allocate ( this % Xt1 ( res1 )) this % Xt1 = [( real ( i - 1 , rk ) / real ( res1 - 1 , rk ), i = 1 , res1 )] ! else ! this%Xt1 = this%Xt1 end if ! Set parameter values if ( present ( Xt2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) this % Xt2 = Xt2 elseif ( present ( res2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) allocate ( this % Xt2 ( res2 )) this % Xt2 = [( real ( i - 1 , rk ) / real ( res2 - 1 , rk ), i = 1 , res2 )] ! else ! this%Xt2 = this%Xt2 end if ! Set parameter values if ( present ( Xt3 )) then if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) this % Xt3 = Xt3 elseif ( present ( res3 )) then if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) allocate ( this % Xt3 ( res3 )) this % Xt3 = [( real ( i - 1 , rk ) / real ( res3 - 1 , rk ), i = 1 , res3 )] ! else ! this%Xt3 = this%Xt3 end if if ( present ( Xt )) then this % Xt = Xt else ! Set number of geometry points this % ng ( 1 ) = size ( this % Xt1 , 1 ) this % ng ( 2 ) = size ( this % Xt2 , 1 ) this % ng ( 3 ) = size ( this % Xt3 , 1 ) call ndgrid ( this % Xt1 , this % Xt2 , this % Xt3 , this % Xt ) end if if ( allocated ( this % Xg )) deallocate ( this % Xg ) allocate ( this % Xg ( this % ng ( 1 ) * this % ng ( 2 ) * this % ng ( 3 ), size ( this % Xc , 2 ))) if ( this % is_rational ()) then ! NURBS this % Xg = compute_Xg (& this % Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % ng , this % Xc , this % Wc ) else ! B-Spline this % Xg = compute_Xg (& this % Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % ng , this % Xc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_Xg ( this , Xt ) result ( Xg ) class ( nurbs_volume ), intent ( in ) :: this real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), allocatable :: Xg (:) ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % knot1 ) . or . . not . allocated ( this % knot2 ) . or . . not . allocated ( this % knot3 )) then error stop 'Knot vector(s) is/are not set.' end if if ( this % is_rational ()) then ! NURBS Xg = compute_Xg ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % Xc , this % Wc ) else ! B-Spline Xg = compute_Xg ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % Xc ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xc_all ( this ) result ( Xc ) class ( nurbs_volume ), intent ( in ) :: this real ( rk ), allocatable :: Xc (:,:) if ( allocated ( this % Xc )) then Xc = this % Xc else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xci ( this , n ) result ( Xc ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ), allocatable :: Xc (:) if ( allocated ( this % Xc )) then if ( n < lbound ( this % Xc , 1 ) . or . n > ubound ( this % Xc , 1 )) then error stop 'Invalid index for control points.' end if Xc = this % Xc ( n ,:) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xcid ( this , n , dir ) result ( Xc ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: n integer , intent ( in ) :: dir real ( rk ) :: Xc if ( allocated ( this % Xc )) then if ( n < lbound ( this % Xc , 1 ) . or . n > ubound ( this % Xc , 1 )) then error stop 'Invalid index for control points.' end if if ( dir < lbound ( this % Xc , 2 ) . or . dir > ubound ( this % Xc , 2 )) then error stop 'Invalid direction for control points.' end if Xc = this % Xc ( n , dir ) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xg_all ( this ) result ( Xg ) class ( nurbs_volume ), intent ( in ) :: this real ( rk ), allocatable :: Xg (:,:) if ( allocated ( this % Xg )) then Xg = this % Xg else error stop 'Geometry points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xgi ( this , n ) result ( Xg ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ), allocatable :: Xg (:) if ( allocated ( this % Xg )) then if ( n < lbound ( this % Xg , 1 ) . or . n > ubound ( this % Xg , 1 )) then error stop 'Invalid index for geometry points.' end if Xg = this % Xg ( n ,:) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xgid ( this , n , dir ) result ( Xg ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: n integer , intent ( in ) :: dir real ( rk ) :: Xg if ( allocated ( this % Xg )) then if ( n < lbound ( this % Xg , 1 ) . or . n > ubound ( this % Xg , 1 )) then error stop 'Invalid index for geometry points.' end if if ( dir < lbound ( this % Xg , 2 ) . or . dir > ubound ( this % Xg , 2 )) then error stop 'Invalid direction for geometry points.' end if Xg = this % Xg ( n , dir ) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Wc_all ( this ) result ( Wc ) class ( nurbs_volume ), intent ( in ) :: this real ( rk ), allocatable :: Wc (:) if ( allocated ( this % Wc )) then Wc = this % Wc else error stop 'The NURBS volume is not rational or weights are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Wci ( this , n ) result ( Wc ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ) :: Wc if ( allocated ( this % Wc )) then if ( n < lbound ( this % Wc , 1 ) . or . n > ubound ( this % Wc , 1 )) then error stop 'Invalid index for weights.' end if Wc = this % Wc ( n ) else error stop 'The NURBS volume is not rational or weights are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xt ( this , dir ) result ( Xt ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: dir real ( rk ), allocatable :: Xt (:) if ( dir == 1 ) then if ( allocated ( this % Xt1 )) then Xt = this % Xt1 else error stop 'Parameter values are not set.' end if elseif ( dir == 2 ) then if ( allocated ( this % Xt2 )) then Xt = this % Xt2 else error stop 'Parameter values are not set.' end if elseif ( dir == 3 ) then if ( allocated ( this % Xt3 )) then Xt = this % Xt3 else error stop 'Parameter values are not set.' end if else error stop 'Invalid direction for parameter values.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_ng ( this ) result ( ng ) class ( nurbs_volume ), intent ( in ) :: this integer :: ng ( 3 ) ng = this % ng end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_degree ( this , dir ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), optional :: dir integer , allocatable :: m1 (:), m2 (:), m3 (:) if ( present ( dir )) then if ( dir == 1 ) then m1 = this % get_multiplicity ( 1 ) this % degree ( 1 ) = m1 ( 1 ) - 1 else if ( dir == 2 ) then m2 = this % get_multiplicity ( 2 ) this % degree ( 2 ) = m2 ( 1 ) - 1 else if ( dir == 3 ) then m3 = this % get_multiplicity ( 3 ) this % degree ( 3 ) = m3 ( 1 ) - 1 else error stop 'Invalid direction for degree.' end if else m1 = this % get_multiplicity ( 1 ) this % degree ( 1 ) = m1 ( 1 ) - 1 m2 = this % get_multiplicity ( 2 ) this % degree ( 2 ) = m2 ( 1 ) - 1 m3 = this % get_multiplicity ( 3 ) this % degree ( 3 ) = m3 ( 1 ) - 1 end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_degree_all ( this ) result ( degree ) class ( nurbs_volume ), intent ( in ) :: this integer :: degree ( 3 ) degree ( 1 ) = this % degree ( 1 ) degree ( 2 ) = this % degree ( 2 ) degree ( 3 ) = this % degree ( 3 ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_degree_dir ( this , dir ) result ( degree ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: dir integer :: degree if ( dir == 1 ) then degree = this % degree ( 1 ) else if ( dir == 2 ) then degree = this % degree ( 2 ) else if ( dir == 3 ) then degree = this % degree ( 3 ) else error stop 'Invalid direction for degree.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_knot_all ( this , dir ) result ( knot ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: dir real ( rk ), allocatable :: knot (:) if ( dir == 1 ) then if ( allocated ( this % knot1 )) then knot = this % knot1 else error stop 'Knot vector is not set.' end if elseif ( dir == 2 ) then if ( allocated ( this % knot2 )) then knot = this % knot2 else error stop 'Knot vector is not set.' end if elseif ( dir == 3 ) then if ( allocated ( this % knot3 )) then knot = this % knot3 else error stop 'Knot vector is not set.' end if else error stop 'Invalid direction for knot vector.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_knoti ( this , dir , i ) result ( knot ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: dir integer , intent ( in ) :: i real ( rk ) :: knot if ( dir == 1 ) then if ( allocated ( this % knot1 )) then if ( i < 1 . or . i > size ( this % knot1 )) then error stop 'Invalid index for knot vector.' else knot = this % knot1 ( i ) end if else error stop 'Knot vector is not set.' end if elseif ( dir == 2 ) then if ( allocated ( this % knot2 )) then if ( i < 1 . or . i > size ( this % knot2 )) then error stop 'Invalid index for knot vector.' else knot = this % knot2 ( i ) end if else error stop 'Knot vector is not set.' end if elseif ( dir == 3 ) then if ( allocated ( this % knot3 )) then if ( i < 1 . or . i > size ( this % knot3 )) then error stop 'Invalid index for knot vector.' else knot = this % knot3 ( i ) end if else error stop 'Knot vector is not set.' end if else error stop 'Invalid direction for knot vector.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine finalize ( this ) class ( nurbs_volume ), intent ( inout ) :: this if ( allocated ( this % Xc )) deallocate ( this % Xc ) if ( allocated ( this % Xg )) deallocate ( this % Xg ) if ( allocated ( this % Wc )) deallocate ( this % Wc ) if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) if ( allocated ( this % Xt )) deallocate ( this % Xt ) if ( allocated ( this % knot1 )) deallocate ( this % knot1 ) if ( allocated ( this % knot2 )) deallocate ( this % knot2 ) if ( allocated ( this % knot3 )) deallocate ( this % knot3 ) if ( allocated ( this % elemConn_Xc_vis )) deallocate ( this % elemConn_Xc_vis ) if ( allocated ( this % elemConn_Xg_vis )) deallocate ( this % elemConn_Xg_vis ) if ( allocated ( this % elemConn )) deallocate ( this % elemConn ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem_Xc_vis ( this , p ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) integer , intent ( in ), contiguous , optional :: p (:) if ( present ( p )) then elemConn = elemConn_C0 ( this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), p ( 1 ), p ( 2 ), p ( 3 )) else elemConn = elemConn_C0 ( this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), 1 , 1 , 1 ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem_Xg_vis ( this , p ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) integer , intent ( in ), contiguous , optional :: p (:) if ( present ( p )) then elemConn = elemConn_C0 ( this % ng ( 1 ), this % ng ( 2 ), this % ng ( 3 ), p ( 1 ), p ( 2 ), p ( 3 )) else elemConn = elemConn_C0 ( this % ng ( 1 ), this % ng ( 2 ), this % ng ( 3 ), 1 , 1 , 1 ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine export_Xc ( this , filename ) class ( nurbs_volume ), intent ( in ) :: this character ( len =* ), intent ( in ) :: filename integer :: i , nc , nunit integer , allocatable :: elemConn (:,:) ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % elemConn_Xc_vis )) then elemConn = this % cmp_elem_Xc_vis () else elemConn = this % elemConn_Xc_vis end if nc = size ( this % Xc , 1 ) open ( newunit = nunit , file = filename , action = 'write' ) write ( nunit , '(a)' ) '# vtk DataFile Version 2.0' write ( nunit , '(a)' ) 'Generated by ForCAD' write ( nunit , '(a)' ) 'ASCII' write ( nunit , '(a)' ) 'DATASET UNSTRUCTURED_GRID' write ( nunit , '(a,\" \",g0,\" \",a)' ) 'POINTS' , nc , 'double' if ( size ( this % Xc , 2 ) == 2 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xc ( i , 1 ), this % Xc ( i , 2 ), 0.0_rk , i = 1 , nc ) elseif ( size ( this % Xc , 2 ) == 3 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xc ( i , 1 ), this % Xc ( i , 2 ), this % Xc ( i , 3 ) , i = 1 , nc ) else error stop 'Invalid dimension for control points.' end if write ( nunit , '(a,\" \",g0,\" \",g0)' ) 'CELLS' , size ( elemConn , 1 ), size ( elemConn , 1 ) * ( size ( elemConn , 2 ) + 1 ) write ( nunit , '(g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0)' )& ( 8 , elemConn ( i , 1 ) - 1 , elemConn ( i , 2 ) - 1 , elemConn ( i , 4 ) - 1 , elemConn ( i , 3 ) - 1 ,& elemConn ( i , 5 ) - 1 , elemConn ( i , 6 ) - 1 , elemConn ( i , 8 ) - 1 , elemConn ( i , 7 ) - 1 , i = 1 , size ( elemConn , 1 )) write ( nunit , '(a,\" \",g0)' ) 'CELL_TYPES' , size ( elemConn , 1 ) write ( nunit , '(g0)' ) ( 12 , i = 1 , size ( elemConn , 1 )) close ( nunit ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine export_Xg ( this , filename ) class ( nurbs_volume ), intent ( in ) :: this character ( len =* ), intent ( in ) :: filename integer :: i , ng , nunit integer , allocatable :: elemConn (:,:) ! check if (. not . allocated ( this % Xg )) then error stop 'Geometry points are not set.' end if if (. not . allocated ( this % elemConn_Xg_vis )) then elemConn = this % cmp_elem_Xg_vis () else elemConn = this % elemConn_Xg_vis end if ng = size ( this % Xg , 1 ) open ( newunit = nunit , file = filename , action = 'write' ) write ( nunit , '(a)' ) '# vtk DataFile Version 2.0' write ( nunit , '(a)' ) 'Generated by ForCAD' write ( nunit , '(a)' ) 'ASCII' write ( nunit , '(a)' ) 'DATASET UNSTRUCTURED_GRID' write ( nunit , '(a,\" \",g0,\" \",a)' ) 'POINTS' , ng , 'double' if ( size ( this % Xg , 2 ) == 2 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xg ( i , 1 ), this % Xg ( i , 2 ), 0.0_rk , i = 1 , ng ) elseif ( size ( this % Xg , 2 ) == 3 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xg ( i , 1 ), this % Xg ( i , 2 ), this % Xg ( i , 3 ) , i = 1 , ng ) else error stop 'Invalid dimension for geometry points.' end if write ( nunit , '(a,\" \",g0,\" \",g0)' ) 'CELLS' , size ( elemConn , 1 ), size ( elemConn , 1 ) * ( size ( elemConn , 2 ) + 1 ) write ( nunit , '(g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0)' )& ( 8 , elemConn ( i , 1 ) - 1 , elemConn ( i , 2 ) - 1 , elemConn ( i , 4 ) - 1 , elemConn ( i , 3 ) - 1 ,& elemConn ( i , 5 ) - 1 , elemConn ( i , 6 ) - 1 , elemConn ( i , 8 ) - 1 , elemConn ( i , 7 ) - 1 , i = 1 , size ( elemConn , 1 )) write ( nunit , '(a,\" \",g0)' ) 'CELL_TYPES' , size ( elemConn , 1 ) write ( nunit , '(g0)' ) ( 12 , i = 1 , size ( elemConn , 1 )) close ( nunit ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine modify_Xc ( this , X , num , dir ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ) :: X integer , intent ( in ) :: num integer , intent ( in ) :: dir if ( allocated ( this % Xc )) then this % Xc ( num , dir ) = X if ( allocated ( this % Wc )) then call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ),& Xc = this % get_Xc (), Wc = this % get_Wc ()) else call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ),& Xc = this % get_Xc ()) end if else error stop 'Control points are not set.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine modify_Wc ( this , W , num ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ) :: W integer , intent ( in ) :: num if ( allocated ( this % Wc )) then this % Wc ( num ) = W if ( allocated ( this % knot1 ) . and . allocated ( this % knot2 ) . and . allocated ( this % knot3 )) then call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ),& Xc = this % get_Xc (), Wc = this % get_Wc ()) else call this % set ( nc = this % nc , Xc = this % get_Xc (), Wc = this % get_Wc ()) end if else error stop 'The NURBS volume is not rational.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_multiplicity ( this , dir ) result ( m ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: dir integer , allocatable :: m (:) if ( dir == 1 ) then ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else m = compute_multiplicity ( this % knot1 ) end if elseif ( dir == 2 ) then ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else m = compute_multiplicity ( this % knot2 ) end if elseif ( dir == 3 ) then ! check if (. not . allocated ( this % knot3 )) then error stop 'Knot vector is not set.' else m = compute_multiplicity ( this % knot3 ) end if else error stop 'Invalid direction.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_continuity ( this , dir ) result ( c ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: dir integer , allocatable :: c (:) if ( dir == 1 ) then ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else c = this % degree ( 1 ) - compute_multiplicity ( this % knot1 ) end if elseif ( dir == 2 ) then ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else c = this % degree ( 2 ) - compute_multiplicity ( this % knot2 ) end if elseif ( dir == 3 ) then ! check if (. not . allocated ( this % knot3 )) then error stop 'Knot vector is not set.' else c = this % degree ( 3 ) - compute_multiplicity ( this % knot3 ) end if else error stop 'Invalid direction.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_nc ( this , dir ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), optional :: dir if ( present ( dir )) then if ( dir == 1 ) then ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else this % nc ( 1 ) = sum ( compute_multiplicity ( this % knot1 )) - this % degree ( 1 ) - 1 end if elseif ( dir == 2 ) then ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else this % nc ( 2 ) = sum ( compute_multiplicity ( this % knot2 )) - this % degree ( 2 ) - 1 end if elseif ( dir == 3 ) then ! check if (. not . allocated ( this % knot3 )) then error stop 'Knot vector is not set.' else this % nc ( 3 ) = sum ( compute_multiplicity ( this % knot3 )) - this % degree ( 3 ) - 1 end if else error stop 'Invalid direction.' end if else ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else this % nc ( 1 ) = sum ( compute_multiplicity ( this % knot1 )) - this % degree ( 1 ) - 1 end if ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else this % nc ( 2 ) = sum ( compute_multiplicity ( this % knot2 )) - this % degree ( 2 ) - 1 end if ! check if (. not . allocated ( this % knot3 )) then error stop 'Knot vector is not set.' else this % nc ( 3 ) = sum ( compute_multiplicity ( this % knot3 )) - this % degree ( 3 ) - 1 end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_nc_all ( this ) result ( nc ) class ( nurbs_volume ), intent ( in ) :: this integer :: nc ( 3 ) nc = this % nc end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_nc_dir ( this , dir ) result ( nc ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: dir integer :: nc if ( dir == 1 ) then ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else nc = sum ( compute_multiplicity ( this % knot1 )) - this % degree ( 1 ) - 1 end if elseif ( dir == 2 ) then ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else nc = sum ( compute_multiplicity ( this % knot2 )) - this % degree ( 2 ) - 1 end if elseif ( dir == 3 ) then ! check if (. not . allocated ( this % knot3 )) then error stop 'Knot vector is not set.' else nc = sum ( compute_multiplicity ( this % knot3 )) - this % degree ( 3 ) - 1 end if else error stop 'Invalid direction.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative_vector ( this , res1 , res2 , res3 , Xt1 , Xt2 , Xt3 , dTgc , Tgc ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), optional :: res1 , res2 , res3 real ( rk ), intent ( in ), contiguous , optional :: Xt1 (:), Xt2 (:), Xt3 (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:,:) integer :: i real ( rk ), allocatable :: Xt (:,:) ! Set parameter values if ( present ( Xt1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) this % Xt1 = Xt1 elseif ( present ( res1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) allocate ( this % Xt1 ( res1 )) this % Xt1 = [( real ( i - 1 , rk ) / real ( res1 - 1 , rk ), i = 1 , res1 )] ! else ! this%Xt1 = this%Xt1 end if ! Set parameter values if ( present ( Xt2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) this % Xt2 = Xt2 elseif ( present ( res2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) allocate ( this % Xt2 ( res2 )) this % Xt2 = [( real ( i - 1 , rk ) / real ( res2 - 1 , rk ), i = 1 , res2 )] ! else ! this%Xt2 = this%Xt2 end if ! Set parameter values if ( present ( Xt3 )) then if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) this % Xt3 = Xt3 elseif ( present ( res3 )) then if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) allocate ( this % Xt3 ( res3 )) this % Xt3 = [( real ( i - 1 , rk ) / real ( res3 - 1 , rk ), i = 1 , res3 )] ! else ! this%Xt3 = this%Xt3 end if ! Set number of geometry points this % ng ( 1 ) = size ( this % Xt1 , 1 ) this % ng ( 2 ) = size ( this % Xt2 , 1 ) this % ng ( 3 ) = size ( this % Xt3 , 1 ) call ndgrid ( this % Xt1 , this % Xt2 , this % Xt3 , Xt ) if ( this % is_rational ()) then ! NURBS call compute_dTgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % ng , this % Wc , dTgc , Tgc ) else call compute_dTgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % ng , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative_scalar ( this , Xt , dTgc , Tgc , elem ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xt (:) integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:) if ( this % is_rational ()) then ! NURBS call compute_dTgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % Wc , dTgc , Tgc , elem ) else call compute_dTgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , dTgc , Tgc , elem ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative2_vector ( this , res1 , res2 , res3 , Xt1 , Xt2 , Xt3 , d2Tgc , dTgc , Tgc ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), optional :: res1 , res2 , res3 real ( rk ), intent ( in ), contiguous , optional :: Xt1 (:), Xt2 (:), Xt3 (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ), optional :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:,:) integer :: i real ( rk ), allocatable :: Xt (:,:) ! Set parameter values if ( present ( Xt1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) this % Xt1 = Xt1 elseif ( present ( res1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) allocate ( this % Xt1 ( res1 )) this % Xt1 = [( real ( i - 1 , rk ) / real ( res1 - 1 , rk ), i = 1 , res1 )] ! else ! this%Xt1 = this%Xt1 end if ! Set parameter values if ( present ( Xt2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) this % Xt2 = Xt2 elseif ( present ( res2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) allocate ( this % Xt2 ( res2 )) this % Xt2 = [( real ( i - 1 , rk ) / real ( res2 - 1 , rk ), i = 1 , res2 )] ! else ! this%Xt2 = this%Xt2 end if ! Set parameter values if ( present ( Xt3 )) then if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) this % Xt3 = Xt3 elseif ( present ( res3 )) then if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) allocate ( this % Xt3 ( res3 )) this % Xt3 = [( real ( i - 1 , rk ) / real ( res3 - 1 , rk ), i = 1 , res3 )] ! else ! this%Xt3 = this%Xt3 end if ! Set number of geometry points this % ng ( 1 ) = size ( this % Xt1 , 1 ) this % ng ( 2 ) = size ( this % Xt2 , 1 ) this % ng ( 3 ) = size ( this % Xt3 , 1 ) call ndgrid ( this % Xt1 , this % Xt2 , this % Xt3 , Xt ) if ( this % is_rational ()) then ! NURBS call compute_d2Tgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % ng , this % Wc , d2Tgc , dTgc , Tgc ) else call compute_d2Tgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % ng , d2Tgc , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative2_scalar ( this , Xt , d2Tgc , dTgc , Tgc ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: dTgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:) if ( this % is_rational ()) then ! NURBS call compute_d2Tgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % Wc , d2Tgc , dTgc , Tgc ) else call compute_d2Tgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , d2Tgc , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine basis_vector ( this , res1 , res2 , res3 , Xt1 , Xt2 , Xt3 , Tgc ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), optional :: res1 , res2 , res3 real ( rk ), intent ( in ), contiguous , optional :: Xt1 (:), Xt2 (:), Xt3 (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) integer :: i real ( rk ), allocatable :: Xt (:,:) ! Set parameter values if ( present ( Xt1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) this % Xt1 = Xt1 elseif ( present ( res1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) allocate ( this % Xt1 ( res1 )) this % Xt1 = [( real ( i - 1 , rk ) / real ( res1 - 1 , rk ), i = 1 , res1 )] ! else ! this%Xt1 = this%Xt1 end if ! Set parameter values if ( present ( Xt2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) this % Xt2 = Xt2 elseif ( present ( res2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) allocate ( this % Xt2 ( res2 )) this % Xt2 = [( real ( i - 1 , rk ) / real ( res2 - 1 , rk ), i = 1 , res2 )] ! else ! this%Xt2 = this%Xt2 end if ! Set parameter values if ( present ( Xt3 )) then if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) this % Xt3 = Xt3 elseif ( present ( res3 )) then if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) allocate ( this % Xt3 ( res3 )) this % Xt3 = [( real ( i - 1 , rk ) / real ( res3 - 1 , rk ), i = 1 , res3 )] ! else ! this%Xt3 = this%Xt3 end if ! Set number of geometry points this % ng ( 1 ) = size ( this % Xt1 , 1 ) this % ng ( 2 ) = size ( this % Xt2 , 1 ) this % ng ( 3 ) = size ( this % Xt3 , 1 ) call ndgrid ( this % Xt1 , this % Xt2 , this % Xt3 , Xt ) if ( this % is_rational ()) then ! NURBS Tgc = compute_Tgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % ng , this % Wc ) else Tgc = compute_Tgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % ng ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine basis_scalar ( this , Xt , Tgc ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) if ( this % is_rational ()) then ! NURBS Tgc = compute_Tgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % Wc ) else Tgc = compute_Tgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine insert_knots ( this , dir , Xth , r ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ) :: dir real ( rk ), intent ( in ), contiguous :: Xth (:) integer , intent ( in ), contiguous :: r (:) integer :: k , i , s , dim , j , n_new real ( rk ), allocatable :: Xc (:,:), Xcw (:,:), Xcw_new (:,:), Xc_new (:,:), Wc_new (:), knot_new (:) real ( rk ), allocatable :: Xc4 (:,:,:,:) if ( dir == 1 ) then ! direction 1 if ( allocated ( this % Wc )) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 1 ) - 1 , this % degree ( 1 ), Xth ( i ), this % knot1 ) if ( this % knot1 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot1 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xcw = reshape ( Xcw ,[ this % nc ( 1 ), this % nc ( 2 ) * this % nc ( 3 ) * ( dim + 1 )]) call insert_knot_A_5_1 (& this % degree ( 1 ),& this % knot1 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xcw_new ) Xcw_new = reshape ( Xcw_new ,[( n_new + 1 ) * this % nc ( 2 ) * this % nc ( 3 ), dim + 1 ]) allocate ( Xc_new ( 1 :( n_new + 1 ) * this % nc ( 2 ) * this % nc ( 3 ), 1 : dim )) allocate ( Wc_new ( 1 :( n_new + 1 ) * this % nc ( 2 ) * this % nc ( 3 ))) do j = 1 , ( n_new + 1 ) * this % nc ( 2 ) * this % nc ( 3 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 1 ) - 1 , this % degree ( 1 ), Xth ( i ), this % knot1 ) if ( this % knot1 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot1 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) Xc = reshape ( this % Xc ,[ this % nc ( 1 ), this % nc ( 2 ) * this % nc ( 3 ) * dim ]) call insert_knot_A_5_1 (& this % degree ( 1 ),& this % knot1 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xc_new ) Xc_new = reshape ( Xc_new ,[( n_new + 1 ) * this % nc ( 2 ) * this % nc ( 3 ), dim ]) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ), Xc = Xc_new ) end do end if elseif ( dir == 2 ) then ! direction 2 if ( allocated ( this % Wc )) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 2 ) - 1 , this % degree ( 2 ), Xth ( i ), this % knot2 ) if ( this % knot2 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot2 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc4 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 2 ), this % nc ( 1 ), this % nc ( 3 ), dim + 1 ], order = [ 2 , 1 , 3 , 4 ]) Xcw = reshape ( Xc4 ,[ this % nc ( 2 ), this % nc ( 1 ) * this % nc ( 3 ) * ( dim + 1 )]) call insert_knot_A_5_1 (& this % degree ( 2 ),& this % knot2 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xcw_new ) Xc4 = reshape ( Xcw_new , [ n_new + 1 , this % nc ( 1 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), n_new + 1 , this % nc ( 3 ), dim + 1 ], order = [ 2 , 1 , 3 , 4 ]) Xcw_new = reshape ( Xc4 ,[ this % nc ( 1 ) * ( n_new + 1 ) * this % nc ( 3 ), dim + 1 ]) allocate ( Xc_new ( 1 : this % nc ( 1 ) * ( n_new + 1 ) * this % nc ( 3 ), 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 1 ) * ( n_new + 1 ) * this % nc ( 3 ))) do j = 1 , this % nc ( 1 ) * ( n_new + 1 ) * this % nc ( 3 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , knot3 = this % get_knot ( 3 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 2 ) - 1 , this % degree ( 2 ), Xth ( i ), this % knot2 ) if ( this % knot2 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot2 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) Xc4 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 2 ), this % nc ( 1 ), this % nc ( 3 ), dim ], order = [ 2 , 1 , 3 , 4 ]) Xc = reshape ( Xc4 ,[ this % nc ( 2 ), this % nc ( 1 ) * this % nc ( 3 ) * dim ]) call insert_knot_A_5_1 (& this % degree ( 2 ),& this % knot2 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xc_new ) Xc4 = reshape ( Xc_new , [ n_new + 1 , this % nc ( 1 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), n_new + 1 , this % nc ( 3 ), dim ], order = [ 2 , 1 , 3 , 4 ]) Xc_new = reshape ( Xc4 ,[ this % nc ( 1 ) * ( n_new + 1 ) * this % nc ( 3 ), dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , knot3 = this % get_knot ( 3 ), Xc = Xc_new ) end do end if elseif ( dir == 3 ) then ! direction 3 if ( allocated ( this % Wc )) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 3 ) - 1 , this % degree ( 3 ), Xth ( i ), this % knot3 ) if ( this % knot3 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot3 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc4 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 3 ), this % nc ( 2 ), this % nc ( 1 ), dim + 1 ], order = [ 3 , 2 , 1 , 4 ]) Xcw = reshape ( Xc4 ,[ this % nc ( 3 ), this % nc ( 2 ) * this % nc ( 1 ) * ( dim + 1 )]) call insert_knot_A_5_1 (& this % degree ( 3 ),& this % knot3 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xcw_new ) Xc4 = reshape ( Xcw_new , [ n_new + 1 , this % nc ( 2 ), this % nc ( 1 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), this % nc ( 2 ), n_new + 1 , dim + 1 ], order = [ 3 , 2 , 1 , 4 ]) Xcw_new = reshape ( Xc4 ,[ this % nc ( 1 ) * this % nc ( 2 ) * ( n_new + 1 ), dim + 1 ]) allocate ( Xc_new ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * ( n_new + 1 ), 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * ( n_new + 1 ))) do j = 1 , this % nc ( 1 ) * this % nc ( 2 ) * ( n_new + 1 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = knot_new , Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 3 ) - 1 , this % degree ( 3 ), Xth ( i ), this % knot3 ) if ( this % knot3 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot3 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) Xc4 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 3 ), this % nc ( 2 ), this % nc ( 1 ), dim ], order = [ 3 , 2 , 1 , 4 ]) Xc = reshape ( Xc4 ,[ this % nc ( 3 ), this % nc ( 2 ) * this % nc ( 1 ) * dim ]) call insert_knot_A_5_1 (& this % degree ( 3 ),& this % knot3 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xc_new ) Xc4 = reshape ( Xc_new , [ n_new + 1 , this % nc ( 2 ), this % nc ( 1 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), this % nc ( 2 ), n_new + 1 , dim ], order = [ 3 , 2 , 1 , 4 ]) Xc_new = reshape ( Xc4 , [ this % nc ( 1 ) * this % nc ( 2 ) * ( n_new + 1 ), dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = knot_new , Xc = Xc_new ) end do end if else error stop 'Invalid direction.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine elevate_degree ( this , dir , t ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ) :: dir integer , intent ( in ) :: t real ( rk ), allocatable :: Xc (:,:), Xcw (:,:), Xcw_new (:,:), Xc_new (:,:), Wc_new (:), knot_new (:) integer :: nc_new , dim , j real ( rk ), allocatable :: Xc4 (:,:,:,:) if ( dir == 1 ) then ! direction 1 if ( allocated ( this % Wc )) then ! NURBS dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xcw = reshape ( Xcw ,[ this % nc ( 1 ), this % nc ( 2 ) * this % nc ( 3 ) * ( dim + 1 )], order = [ 1 , 2 ]) call elevate_degree_A_5_9 ( t , this % knot1 , this % degree ( 1 ), Xcw , nc_new , knot_new , Xcw_new ) Xcw_new = reshape ( Xcw_new ,[ nc_new * this % nc ( 2 ) * this % nc ( 3 ), dim + 1 ], order = [ 1 , 2 ]) allocate ( Xc_new ( 1 : nc_new * this % nc ( 2 ) * this % nc ( 3 ), 1 : dim )) allocate ( Wc_new ( 1 : nc_new * this % nc ( 2 ) * this % nc ( 3 ))) do j = 1 , nc_new * this % nc ( 2 ) * this % nc ( 3 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) else ! B-Spline dim = size ( this % Xc , 2 ) Xc = reshape ( this % Xc ,[ this % nc ( 1 ), this % nc ( 2 ) * this % nc ( 3 ) * dim ], order = [ 1 , 2 ]) call elevate_degree_A_5_9 ( t , this % knot1 , this % degree ( 1 ), Xc , nc_new , knot_new , Xc_new ) Xc_new = reshape ( Xc_new ,[ nc_new * this % nc ( 2 ) * this % nc ( 3 ), dim ], order = [ 1 , 2 ]) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ), Xc = Xc_new ) end if elseif ( dir == 2 ) then ! direction 2 if ( allocated ( this % Wc )) then ! NURBS dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc4 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 2 ), this % nc ( 1 ), this % nc ( 3 ), dim + 1 ], order = [ 2 , 1 , 3 , 4 ]) Xcw = reshape ( Xc4 ,[ this % nc ( 2 ), this % nc ( 1 ) * this % nc ( 3 ) * ( dim + 1 )]) call elevate_degree_A_5_9 ( t , this % knot2 , this % degree ( 2 ), Xcw , nc_new , knot_new , Xcw_new ) Xc4 = reshape ( Xcw_new , [ nc_new , this % nc ( 1 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), nc_new , this % nc ( 3 ), dim + 1 ], order = [ 2 , 1 , 3 , 4 ]) Xcw_new = reshape ( Xc4 ,[ this % nc ( 1 ) * nc_new * this % nc ( 3 ), dim + 1 ]) allocate ( Xc_new ( 1 : this % nc ( 1 ) * nc_new * this % nc ( 3 ), 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 1 ) * nc_new * this % nc ( 3 ))) do j = 1 , this % nc ( 1 ) * nc_new * this % nc ( 3 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , knot3 = this % get_knot ( 3 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) else ! B-Spline dim = size ( this % Xc , 2 ) Xc4 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 2 ), this % nc ( 1 ), this % nc ( 3 ), dim ], order = [ 2 , 1 , 3 , 4 ]) Xc = reshape ( Xc4 ,[ this % nc ( 2 ), this % nc ( 1 ) * this % nc ( 3 ) * dim ]) call elevate_degree_A_5_9 ( t , this % knot2 , this % degree ( 2 ), Xc , nc_new , knot_new , Xc_new ) Xc4 = reshape ( Xc_new , [ nc_new , this % nc ( 1 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), nc_new , this % nc ( 3 ), dim ], order = [ 2 , 1 , 3 , 4 ]) Xc_new = reshape ( Xc4 ,[ this % nc ( 1 ) * nc_new * this % nc ( 3 ), dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , knot3 = this % get_knot ( 3 ), Xc = Xc_new ) end if elseif ( dir == 3 ) then ! direction 3 if ( allocated ( this % Wc )) then ! NURBS dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc4 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 3 ), this % nc ( 2 ), this % nc ( 1 ), dim + 1 ], order = [ 3 , 2 , 1 , 4 ]) Xcw = reshape ( Xc4 ,[ this % nc ( 3 ), this % nc ( 2 ) * this % nc ( 1 ) * ( dim + 1 )]) call elevate_degree_A_5_9 ( t , this % knot3 , this % degree ( 3 ), Xcw , nc_new , knot_new , Xcw_new ) Xc4 = reshape ( Xcw_new , [ nc_new , this % nc ( 2 ), this % nc ( 1 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), this % nc ( 2 ), nc_new , dim + 1 ], order = [ 3 , 2 , 1 , 4 ]) Xcw_new = reshape ( Xc4 ,[ this % nc ( 1 ) * this % nc ( 2 ) * nc_new , dim + 1 ]) allocate ( Xc_new ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * nc_new , 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * nc_new )) do j = 1 , this % nc ( 1 ) * this % nc ( 2 ) * nc_new Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = knot_new , Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) else ! B-Spline dim = size ( this % Xc , 2 ) Xc4 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 3 ), this % nc ( 2 ), this % nc ( 1 ), dim ], order = [ 3 , 2 , 1 , 4 ]) Xc = reshape ( Xc4 ,[ this % nc ( 3 ), this % nc ( 2 ) * this % nc ( 1 ) * dim ]) call elevate_degree_A_5_9 ( t , this % knot3 , this % degree ( 3 ), Xc , nc_new , knot_new , Xc_new ) Xc4 = reshape ( Xc_new , [ nc_new , this % nc ( 2 ), this % nc ( 1 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), this % nc ( 2 ), nc_new , dim ], order = [ 3 , 2 , 1 , 4 ]) Xc_new = reshape ( Xc4 ,[ this % nc ( 1 ) * this % nc ( 2 ) * nc_new , dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = knot_new , Xc = Xc_new ) end if else error stop 'Invalid direction.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function is_rational ( this ) result ( r ) class ( nurbs_volume ), intent ( in ) :: this logical :: r r = . false . if ( allocated ( this % Wc )) then if ( any ( this % Wc /= this % Wc ( 1 ))) then r = . true . end if end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem_Xc_vis ( this , elemConn ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn_Xc_vis )) deallocate ( this % elemConn_Xc_vis ) this % elemConn_Xc_vis = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem_Xg_vis ( this , elemConn ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn_Xg_vis )) deallocate ( this % elemConn_Xg_vis ) this % elemConn_Xg_vis = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem ( this , elemConn ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn )) deallocate ( this % elemConn ) this % elemConn = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem_Xc_vis ( this ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn_Xc_vis end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem_Xg_vis ( this ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn_Xg_vis end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem ( this ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_hexahedron ( this , L , nc , Wc ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: L (:) integer , intent ( in ), contiguous :: nc (:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( present ( Wc )) then call this % set ( nc , hexahedron_Xc ( L , nc ), Wc ) else call this % set ( nc , hexahedron_Xc ( L , nc )) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine put_to_nurbs ( this , X , elemConn ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: X (:,:) integer , intent ( in ), contiguous :: elemConn (:,:) integer :: i real ( rk ), allocatable :: Tgc1 (:), Tgc2 (:), Tgc3 (:), Tgc (:) real ( rk ), allocatable :: Xt (:,:) real ( rk ) :: min_X1 , max_X1 , min_X2 , max_X2 , min_X3 , max_X3 ! Assuming knot vectors are in the range [0,1] ! Normalize the X coordinates to the range [0,1] allocate ( Xt ( size ( X , 1 ), size ( X , 2 ))) min_X1 = minval ( X (:, 1 )) max_X1 = maxval ( X (:, 1 )) min_X2 = minval ( X (:, 2 )) max_X2 = maxval ( X (:, 2 )) min_X3 = minval ( X (:, 3 )) max_X3 = maxval ( X (:, 3 )) Xt (:, 1 ) = ( X (:, 1 ) - min_X1 ) / ( max_X1 - min_X1 ) Xt (:, 2 ) = ( X (:, 2 ) - min_X2 ) / ( max_X2 - min_X2 ) Xt (:, 3 ) = ( X (:, 3 ) - min_X3 ) / ( max_X3 - min_X3 ) allocate ( this % Xg ( size ( Xt , 1 ), size ( this % Xc , 2 ))) allocate ( Tgc ( this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ))) if ( allocated ( this % Wc )) then ! NURBS volume do i = 1 , size ( Xt , 1 ) Tgc1 = basis_bspline ( Xt ( i , 1 ), this % knot1 , this % nc ( 1 ), this % degree ( 1 )) Tgc2 = basis_bspline ( Xt ( i , 2 ), this % knot2 , this % nc ( 2 ), this % degree ( 2 )) Tgc3 = basis_bspline ( Xt ( i , 3 ), this % knot3 , this % nc ( 3 ), this % degree ( 3 )) Tgc = kron ( Tgc3 , kron ( Tgc2 , Tgc1 )) Tgc = Tgc * ( this % Wc / ( dot_product ( Tgc , this % Wc ))) this % Xg ( i ,:) = matmul ( Tgc , this % Xc ) end do else ! B-Spline volume do i = 1 , size ( Xt , 1 ) Tgc1 = basis_bspline ( Xt ( i , 1 ), this % knot1 , this % nc ( 1 ), this % degree ( 1 )) Tgc2 = basis_bspline ( Xt ( i , 2 ), this % knot2 , this % nc ( 2 ), this % degree ( 2 )) Tgc3 = basis_bspline ( Xt ( i , 3 ), this % knot3 , this % nc ( 3 ), this % degree ( 3 )) Tgc = kron ( Tgc3 , kron ( Tgc2 , Tgc1 )) this % Xg ( i ,:) = matmul ( Tgc , this % Xc ) end do end if call this % set_elem_Xg_vis ( elemConn ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine remove_knots ( this , dir , Xth , r ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ) :: dir real ( rk ), intent ( in ), contiguous :: Xth (:) integer , intent ( in ), contiguous :: r (:) integer :: k , i , s , dim , j , nc_new , t real ( rk ), allocatable :: Xc (:,:), Xcw (:,:), Xcw_new (:,:), Xc_new (:,:), Wc_new (:), knot_new (:) real ( rk ), allocatable :: Xc4 (:,:,:,:) if ( dir == 1 ) then ! direction 1 if ( allocated ( this % Wc )) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 1 ) - 1 , this % degree ( 1 ), Xth ( i ), this % knot1 ) if ( this % knot1 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot1 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xcw = reshape ( Xcw ,[ this % nc ( 1 ), this % nc ( 2 ) * this % nc ( 3 ) * ( dim + 1 )], order = [ 1 , 2 ]) call remove_knots_A_5_8 (& this % degree ( 1 ),& this % knot1 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xcw_new ) if ( allocated ( Xcw )) deallocate ( Xcw ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) Xcw_new = reshape ( Xcw_new ,[( nc_new ) * this % nc ( 2 ) * this % nc ( 3 ), dim + 1 ], order = [ 1 , 2 ]) allocate ( Xc_new ( 1 :( nc_new ) * this % nc ( 2 ) * this % nc ( 3 ), 1 : dim )) allocate ( Wc_new ( 1 :( nc_new ) * this % nc ( 2 ) * this % nc ( 3 ))) do j = 1 , ( nc_new ) * this % nc ( 2 ) * this % nc ( 3 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw_new , Xc_new , Wc_new ) end if end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 1 ) - 1 , this % degree ( 1 ), Xth ( i ), this % knot1 ) if ( this % knot1 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot1 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) Xc = reshape ( this % Xc ,[ this % nc ( 1 ), this % nc ( 2 ) * this % nc ( 3 ) * dim ]) call remove_knots_A_5_8 (& this % degree ( 1 ),& this % knot1 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xc_new ) if ( allocated ( Xc )) deallocate ( Xc ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) Xc_new = reshape ( Xc_new ,[( nc_new ) * this % nc ( 2 ) * this % nc ( 3 ), dim ]) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ), Xc = Xc_new ) end if end do end if elseif ( dir == 2 ) then ! direction 2 if ( allocated ( this % Wc )) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 2 ) - 1 , this % degree ( 2 ), Xth ( i ), this % knot2 ) if ( this % knot2 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot2 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc4 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 2 ), this % nc ( 1 ), this % nc ( 3 ), dim + 1 ], order = [ 2 , 1 , 3 , 4 ]) Xcw = reshape ( Xc4 ,[ this % nc ( 2 ), this % nc ( 1 ) * this % nc ( 3 ) * ( dim + 1 )]) call remove_knots_A_5_8 (& this % degree ( 2 ),& this % knot2 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xcw_new ) if ( allocated ( Xcw )) deallocate ( Xcw ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) Xc4 = reshape ( Xcw_new , [ nc_new , this % nc ( 1 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), nc_new , this % nc ( 3 ), dim + 1 ], order = [ 2 , 1 , 3 , 4 ]) Xcw_new = reshape ( Xc4 ,[ this % nc ( 1 ) * ( nc_new ) * this % nc ( 3 ), dim + 1 ]) allocate ( Xc_new ( 1 : this % nc ( 1 ) * ( nc_new ) * this % nc ( 3 ), 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 1 ) * ( nc_new ) * this % nc ( 3 ))) do j = 1 , this % nc ( 1 ) * ( nc_new ) * this % nc ( 3 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , knot3 = this % get_knot ( 3 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw_new , Xc_new , Wc_new ) end if end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 2 ) - 1 , this % degree ( 2 ), Xth ( i ), this % knot2 ) if ( this % knot2 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot2 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) Xc4 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 2 ), this % nc ( 1 ), this % nc ( 3 ), dim ], order = [ 2 , 1 , 3 , 4 ]) Xc = reshape ( Xc4 , [ this % nc ( 2 ), this % nc ( 1 ) * this % nc ( 3 ) * dim ]) call remove_knots_A_5_8 (& this % degree ( 2 ),& this % knot2 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xc_new ) if ( allocated ( Xc )) deallocate ( Xc ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) Xc4 = reshape ( Xc_new , [ nc_new , this % nc ( 1 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), nc_new , this % nc ( 3 ), dim ], order = [ 2 , 1 , 3 , 4 ]) Xc_new = reshape ( Xc4 , [ this % nc ( 1 ) * ( nc_new ) * this % nc ( 3 ), dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , knot3 = this % get_knot ( 3 ), Xc = Xc_new ) end if end do end if elseif ( dir == 3 ) then ! direction 3 if ( allocated ( this % Wc )) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 3 ) - 1 , this % degree ( 3 ), Xth ( i ), this % knot3 ) if ( this % knot3 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot3 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc4 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 3 ), this % nc ( 2 ), this % nc ( 1 ), dim + 1 ], order = [ 3 , 2 , 1 , 4 ]) Xcw = reshape ( Xc4 , [ this % nc ( 3 ), this % nc ( 2 ) * this % nc ( 1 ) * ( dim + 1 )]) call remove_knots_A_5_8 (& this % degree ( 3 ),& this % knot3 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xcw_new ) if ( allocated ( Xcw )) deallocate ( Xcw ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) Xc4 = reshape ( Xcw_new , [ nc_new , this % nc ( 2 ), this % nc ( 1 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), this % nc ( 2 ), nc_new , dim + 1 ], order = [ 3 , 2 , 1 , 4 ]) Xcw_new = reshape ( Xc4 , [ this % nc ( 1 ) * this % nc ( 2 ) * ( nc_new ), dim + 1 ]) allocate ( Xc_new ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * ( nc_new ), 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * ( nc_new ))) do j = 1 , this % nc ( 1 ) * this % nc ( 2 ) * ( nc_new ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = knot_new , Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw_new , Xc_new , Wc_new ) end if end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 3 ) - 1 , this % degree ( 3 ), Xth ( i ), this % knot3 ) if ( this % knot3 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot3 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) Xc4 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 3 ), this % nc ( 2 ), this % nc ( 1 ), dim ], order = [ 3 , 2 , 1 , 4 ]) Xc = reshape ( Xc4 , [ this % nc ( 3 ), this % nc ( 2 ) * this % nc ( 1 ) * dim ]) call remove_knots_A_5_8 (& this % degree ( 3 ),& this % knot3 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xc_new ) if ( allocated ( Xc )) deallocate ( Xc ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) Xc4 = reshape ( Xc_new , [ nc_new , this % nc ( 2 ), this % nc ( 1 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), this % nc ( 2 ), nc_new , dim ], order = [ 3 , 2 , 1 , 4 ]) Xc_new = reshape ( Xc4 , [ this % nc ( 1 ) * this % nc ( 2 ) * ( nc_new ), dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = knot_new , Xc = Xc_new ) end if end do end if else error stop 'Invalid direction.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem ( this ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) call elemConn_Cn ( this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ),& this % degree ( 1 ), this % degree ( 2 ), this % degree ( 3 ),& unique ( this % knot1 ), unique ( this % knot2 ), unique ( this % knot3 ),& this % get_multiplicity ( 1 ), this % get_multiplicity ( 2 ), this % get_multiplicity ( 3 ),& elemConn ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine rotate_Xc ( this , alpha , beta , theta ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ) :: alpha , beta , theta integer :: i do i = 1 , this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) this % Xc ( i , :) = matmul ( rotation ( alpha , beta , theta ), this % Xc ( i , :)) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine rotate_Xg ( this , alpha , beta , theta ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ) :: alpha , beta , theta integer :: i do i = 1 , this % ng ( 1 ) * this % ng ( 2 ) * this % ng ( 3 ) this % Xg ( i , :) = matmul ( rotation ( alpha , beta , theta ), this % Xg ( i , :)) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine translate_Xc ( this , vec ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ) :: vec (:) integer :: i do i = 1 , this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) this % Xc ( i , :) = this % Xc ( i , :) + vec end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine translate_Xg ( this , vec ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ) :: vec (:) integer :: i do i = 1 , this % ng ( 1 ) * this % ng ( 2 ) * this % ng ( 3 ) this % Xg ( i , :) = this % Xg ( i , :) + vec end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine show ( this , vtkfile_Xc , vtkfile_Xg ) class ( nurbs_volume ), intent ( inout ) :: this character ( len =* ), intent ( in ) :: vtkfile_Xc , vtkfile_Xg character ( len = 3000 ) :: pyvista_script pyvista_script = & \"import pyvista as pv\" // achar ( 10 ) // & \"pv.global_theme.color = 'white'\" // achar ( 10 ) // & \"Xc = pv.read('\" // trim ( vtkfile_Xc ) // \"')\" // achar ( 10 ) // & \"Xg = pv.read('\" // trim ( vtkfile_Xg ) // \"')\" // achar ( 10 ) // & \"p = pv.Plotter(lighting='light kit')\" // achar ( 10 ) // & \"actor_Xcp = p.add_mesh(\" // achar ( 10 ) // & \"    Xc,\" // achar ( 10 ) // & \"    style='points',\" // achar ( 10 ) // & \"    point_size=10,\" // achar ( 10 ) // & \"    color='red',\" // achar ( 10 ) // & \"    render_points_as_spheres=True,\" // achar ( 10 ) // & \"    opacity=0.5,\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"actor_Xcw = p.add_mesh(\" // achar ( 10 ) // & \"    Xc,\" // achar ( 10 ) // & \"    show_edges=True,\" // achar ( 10 ) // & \"    color='yellow',\" // achar ( 10 ) // & \"    line_width=3,\" // achar ( 10 ) // & \"    style='wireframe',\" // achar ( 10 ) // & \"    opacity=0.2\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"actor_Xg = p.add_mesh(\" // achar ( 10 ) // & \"    Xg,\" // achar ( 10 ) // & \"    show_edges=False,\" // achar ( 10 ) // & \"    color='cyan',\" // achar ( 10 ) // & \"    line_width=7,\" // achar ( 10 ) // & \"    metallic=0.6,\" // achar ( 10 ) // & \"    pbr=True,\" // achar ( 10 ) // & \"    split_sharp_edges=True,\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_axes(interactive=False)\" // achar ( 10 ) // & \"def point_picker_callback(point):\" // achar ( 10 ) // & \"    mesh = Xc\" // achar ( 10 ) // & \"    point_id = mesh.find_closest_point(point)\" // achar ( 10 ) // & \"    point_coords = mesh.points[point_id]\" // achar ( 10 ) // & \"    label = f'ID: {point_id + 1}\\n({point_coords[0]:.3f}, {point_coords[1]:.3f}, {point_coords[2]:.3f})'\" // achar ( 10 ) // & \"    p.add_point_labels(\" // achar ( 10 ) // & \"        [point_coords],\" // achar ( 10 ) // & \"        [label],\" // achar ( 10 ) // & \"        font_size=14,\" // achar ( 10 ) // & \"        text_color='black',\" // achar ( 10 ) // & \"        show_points=False,\" // achar ( 10 ) // & \"        fill_shape=False,\" // achar ( 10 ) // & \"        shape=None,\" // achar ( 10 ) // & \"    )\" // achar ( 10 ) // & \"picker = p.enable_point_picking(callback=point_picker_callback, show_message=False)\" // achar ( 10 ) // & \"window_size = p.window_size\" // achar ( 10 ) // & \"y_pos = window_size[1]\" // achar ( 10 ) // & \"def Xcp_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xcp.SetVisibility(flag)\" // achar ( 10 ) // & \"def Xcw_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xcw.SetVisibility(flag)\" // achar ( 10 ) // & \"def Xg_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xg.SetVisibility(flag)\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xcp_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='red',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 1 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xcw_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='yellow',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 2 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xg_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='cyan',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 3 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xc (Points)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 1 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xc (Control geometry)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 2 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xg (Geometry)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 3 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text('ForCAD', position=(0.0, 10.0), font_size=14, color='black', font='times')\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'https://github.com/gha3mi/forcad',\" // achar ( 10 ) // & \"    position=(0.0, 0.0),\" // achar ( 10 ) // & \"    font_size=7,\" // achar ( 10 ) // & \"    color='blue',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.show(title='ForCAD', interactive=True)\" call execute_command_line ( 'python -c \"' // trim ( adjustl ( pyvista_script )) // '\"' ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_ring ( this , center , radius1 , radius2 , length ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius1 , radius2 , length real ( rk ), allocatable :: Xc (:,:), Wc (:), knot1 (:), knot2 (:), knot3 (:) integer :: i ! Define control points for ring allocate ( Xc ( 28 , 3 )) Xc ( 1 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 3 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 6 ,:) = [ 1.0_rk , - sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 7 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 1 : 7 , 1 : 2 ) = Xc ( 1 : 7 , 1 : 2 ) * radius1 Xc ( 8 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 9 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 10 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 11 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 12 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 13 ,:) = [ 1.0_rk , - sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 14 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 8 : 14 , 1 : 2 ) = Xc ( 8 : 14 , 1 : 2 ) * radius2 Xc ( 15 ,:) = [ 1.0_rk , 0.0_rk , length ] Xc ( 16 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), length ] Xc ( 17 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , length ] Xc ( 18 ,:) = [ - 2.0_rk , 0.0_rk , length ] Xc ( 19 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , length ] Xc ( 20 ,:) = [ 1.0_rk , - sqrt ( 3.0_rk ), length ] Xc ( 21 ,:) = [ 1.0_rk , 0.0_rk , length ] Xc ( 15 : 21 , 1 : 2 ) = Xc ( 15 : 21 , 1 : 2 ) * radius1 Xc ( 22 ,:) = [ 1.0_rk , 0.0_rk , length ] Xc ( 23 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), length ] Xc ( 24 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , length ] Xc ( 25 ,:) = [ - 2.0_rk , 0.0_rk , length ] Xc ( 26 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , length ] Xc ( 27 ,:) = [ 1.0_rk , - sqrt ( 3.0_rk ), length ] Xc ( 28 ,:) = [ 1.0_rk , 0.0_rk , length ] Xc ( 22 : 28 , 1 : 2 ) = Xc ( 22 : 28 , 1 : 2 ) * radius2 ! Translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) end do ! Define weights for the control points Wc = [ 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ,& 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ,& 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ,& 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ] ! Define knot vector knot1 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 3.0_rk , 1.0_rk / 3.0_rk , 2.0_rk / 3.0_rk , 2.0_rk / 3.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] knot3 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot1 , knot2 , knot3 , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_C ( this , center , radius1 , radius2 , length ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius1 , radius2 , length real ( rk ), allocatable :: Xc (:,:), Wc (:), knot1 (:), knot2 (:), knot3 (:) integer :: i ! Define control points for C-shape allocate ( Xc ( 20 , 3 )) Xc ( 1 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 3 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 1 : 5 , 1 : 2 ) = Xc ( 1 : 5 , 1 : 2 ) * radius1 Xc ( 6 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 7 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 8 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 9 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 10 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 6 : 10 , 1 : 2 ) = Xc ( 6 : 10 , 1 : 2 ) * radius2 Xc ( 11 ,:) = [ 1.0_rk , 0.0_rk , length ] Xc ( 12 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), length ] Xc ( 13 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , length ] Xc ( 14 ,:) = [ - 2.0_rk , 0.0_rk , length ] Xc ( 15 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , length ] Xc ( 11 : 15 , 1 : 2 ) = Xc ( 11 : 15 , 1 : 2 ) * radius1 Xc ( 16 ,:) = [ 1.0_rk , 0.0_rk , length ] Xc ( 17 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), length ] Xc ( 18 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , length ] Xc ( 19 ,:) = [ - 2.0_rk , 0.0_rk , length ] Xc ( 20 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , length ] Xc ( 16 : 20 , 1 : 2 ) = Xc ( 16 : 20 , 1 : 2 ) * radius2 ! Translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) end do ! Define weights for the control points Wc = [ 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ,& 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ,& 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ,& 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ] ! Define knot vector knot1 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 2.0_rk , 1.0_rk / 2.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] knot3 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot1 , knot2 , knot3 , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_half_ring ( this , center , radius1 , radius2 , length ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius1 , radius2 , length real ( rk ), allocatable :: Xc (:,:), Wc (:), knot1 (:), knot2 (:), knot3 (:) integer :: i ! Define control points for half ring allocate ( Xc ( 20 , 3 )) Xc ( 1 ,:) = [ 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 3 ,:) = [ 0.0_rk , 0.5_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 1 : 5 , 1 : 2 ) = Xc ( 1 : 5 , 1 : 2 ) * radius1 Xc ( 6 ,:) = [ 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 7 ,:) = [ 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 8 ,:) = [ 0.0_rk , 0.5_rk , 0.0_rk ] Xc ( 9 ,:) = [ - 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 10 ,:) = [ - 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 6 : 10 , 1 : 2 ) = Xc ( 6 : 10 , 1 : 2 ) * radius2 Xc ( 11 ,:) = [ 0.5_rk , 0.0_rk , length ] Xc ( 12 ,:) = [ 0.5_rk , 0.5_rk , length ] Xc ( 13 ,:) = [ 0.0_rk , 0.5_rk , length ] Xc ( 14 ,:) = [ - 0.5_rk , 0.5_rk , length ] Xc ( 15 ,:) = [ - 0.5_rk , 0.0_rk , length ] Xc ( 11 : 15 , 1 : 2 ) = Xc ( 11 : 15 , 1 : 2 ) * radius1 Xc ( 16 ,:) = [ 0.5_rk , 0.0_rk , length ] Xc ( 17 ,:) = [ 0.5_rk , 0.5_rk , length ] Xc ( 18 ,:) = [ 0.0_rk , 0.5_rk , length ] Xc ( 19 ,:) = [ - 0.5_rk , 0.5_rk , length ] Xc ( 20 ,:) = [ - 0.5_rk , 0.0_rk , length ] Xc ( 16 : 20 , 1 : 2 ) = Xc ( 16 : 20 , 1 : 2 ) * radius2 ! Translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) end do ! Define weights for the control points Wc = [ 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk ,& 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk ,& 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk ,& 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk ] ! Define knot vector knot1 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 2.0_rk , & 1.0_rk / 2.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] knot3 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot1 , knot2 , knot3 , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine nearest_point ( this , point_Xg , nearest_Xg , nearest_Xt , id ) class ( nurbs_volume ), intent ( in ) :: this real ( rk ), intent ( in ) :: point_Xg (:) real ( rk ), intent ( out ), allocatable , optional :: nearest_Xg (:) real ( rk ), intent ( out ), allocatable , optional :: nearest_Xt (:) integer , intent ( out ), optional :: id integer :: id_ real ( rk ), allocatable :: distances (:) allocate ( distances ( this % ng ( 1 ) * this % ng ( 2 ) * this % ng ( 3 ))) distances = nearest_point_help_3d ( this % ng , this % Xg , point_Xg ) id_ = minloc ( distances , dim = 1 ) if ( present ( id )) id = id_ if ( present ( nearest_Xg )) nearest_Xg = this % Xg ( id_ ,:) if ( present ( nearest_Xt )) nearest_Xt = this % Xt ( id_ ,:) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine nearest_point2 ( this , point_Xg , tol , maxit , nearest_Xt , nearest_Xg ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ) :: point_Xg (:) real ( rk ), intent ( in ) :: tol integer , intent ( in ) :: maxit real ( rk ), intent ( out ) :: nearest_Xt ( 3 ) real ( rk ), allocatable , intent ( out ), optional :: nearest_Xg (:) real ( rk ) :: obj , grad ( 3 ), hess ( 3 , 3 ), dk ( 3 ), alphak , tau , beta , lower_bounds ( 3 ), upper_bounds ( 3 ) real ( rk ), allocatable :: Xg (:), xk (:), Tgc (:), dTgc (:,:), d2Tgc (:,:) integer :: k , l logical :: convergenz type ( nurbs_volume ) :: copy_this k = 0 ! lower and upper bounds lower_bounds = [ minval ( this % knot1 ), minval ( this % knot2 ), minval ( this % knot3 )] upper_bounds = [ maxval ( this % knot1 ), maxval ( this % knot2 ), maxval ( this % knot3 )] ! guess initial point copy_this = this call copy_this % create ( 50 , 50 , 50 ) call copy_this % nearest_point ( point_Xg = point_Xg , nearest_Xt = xk ) call copy_this % finalize () ! Check if xk is within the knot vector range if ( xk ( 1 ) < minval ( this % knot1 )) then xk ( 1 ) = minval ( this % knot1 ) else if ( xk ( 1 ) > maxval ( this % knot1 )) then xk ( 1 ) = maxval ( this % knot1 ) end if if ( xk ( 2 ) < minval ( this % knot2 )) then xk ( 2 ) = minval ( this % knot2 ) else if ( xk ( 2 ) > maxval ( this % knot2 )) then xk ( 2 ) = maxval ( this % knot2 ) end if if ( xk ( 3 ) < minval ( this % knot3 )) then xk ( 3 ) = minval ( this % knot3 ) else if ( xk ( 3 ) > maxval ( this % knot3 )) then xk ( 3 ) = maxval ( this % knot3 ) end if convergenz = . false . allocate ( Xg ( size ( this % Xc , 2 ))) ! allocate(dTgc(size(this%Xc,1), 2)) ! allocate(d2Tgc(size(this%Xc,1), 2)) do while (. not . convergenz . and . k < maxit ) ! objection, gradient and hessian Xg = this % cmp_Xg ( xk ) call this % derivative2 ( Xt = xk , d2Tgc = d2Tgc , dTgc = dTgc , Tgc = Tgc ) ! Tgc is not needed obj = norm2 ( Xg - point_Xg ) + 0.001_rk ! add a small number to avoid division by zero grad ( 1 ) = dot_product (( Xg - point_Xg ) / obj , matmul ( dTgc (:, 1 ), this % Xc )) grad ( 2 ) = dot_product (( Xg - point_Xg ) / obj , matmul ( dTgc (:, 2 ), this % Xc )) grad ( 3 ) = dot_product (( Xg - point_Xg ) / obj , matmul ( dTgc (:, 3 ), this % Xc )) hess ( 1 , 1 ) = ( dot_product ( matmul ( dTgc (:, 1 ), this % Xc ), matmul ( dTgc (:, 1 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 1 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 1 ), this % Xc )) * grad ( 1 ) ) / obj ** 2 hess ( 2 , 1 ) = ( dot_product ( matmul ( dTgc (:, 1 ), this % Xc ), matmul ( dTgc (:, 2 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) + 1 : 2 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 1 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 2 ), this % Xc )) * grad ( 1 ) ) / obj ** 2 hess ( 3 , 1 ) = ( dot_product ( matmul ( dTgc (:, 1 ), this % Xc ), matmul ( dTgc (:, 3 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( 2 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) + 1 : 3 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 1 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 3 ), this % Xc )) * grad ( 1 ) ) / obj ** 2 hess ( 1 , 2 ) = ( dot_product ( matmul ( dTgc (:, 2 ), this % Xc ), matmul ( dTgc (:, 1 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 2 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 1 ), this % Xc )) * grad ( 2 ) ) / obj ** 2 hess ( 2 , 2 ) = ( dot_product ( matmul ( dTgc (:, 2 ), this % Xc ), matmul ( dTgc (:, 2 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) + 1 : 2 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 2 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 2 ), this % Xc )) * grad ( 2 ) ) / obj ** 2 hess ( 3 , 2 ) = ( dot_product ( matmul ( dTgc (:, 2 ), this % Xc ), matmul ( dTgc (:, 3 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( 2 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) + 1 : 3 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 2 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 3 ), this % Xc )) * grad ( 2 ) ) / obj ** 2 hess ( 1 , 3 ) = ( dot_product ( matmul ( dTgc (:, 3 ), this % Xc ), matmul ( dTgc (:, 1 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 3 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 1 ), this % Xc )) * grad ( 3 ) ) / obj ** 2 hess ( 2 , 3 ) = ( dot_product ( matmul ( dTgc (:, 3 ), this % Xc ), matmul ( dTgc (:, 2 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) + 1 : 2 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 3 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 2 ), this % Xc )) * grad ( 3 ) ) / obj ** 2 hess ( 3 , 3 ) = ( dot_product ( matmul ( dTgc (:, 3 ), this % Xc ), matmul ( dTgc (:, 3 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( 2 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) + 1 : 3 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 3 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 3 ), this % Xc )) * grad ( 3 ) ) / obj ** 2 ! debug print '(i3,1x,3e20.10,1x,e20.10)' , k , xk , norm2 ( grad ) if ( norm2 ( grad ) <= tol ) then convergenz = . true . nearest_Xt = xk if ( present ( nearest_Xg )) nearest_Xg = this % cmp_Xg ( nearest_Xt ) else dk = - matmul ( inv ( hess ), grad ) ! Backtracking-Armijo Line Search alphak = 1.0_rk tau = 0.5_rk ! 0 < tau  < 1 beta = 1.0e-4_rk ! 0 < beta < 1 l = 0 do while (. not . norm2 ( this % cmp_Xg ( xk + alphak * dk ) - point_Xg ) <= obj + alphak * beta * dot_product ( grad , dk ) . and . l < 50 ) alphak = tau * alphak l = l + 1 end do xk = xk + alphak * dk ! Check if xk is within the knot vector range xk = max ( min ( xk , upper_bounds ), lower_bounds ) k = k + 1 end if end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elemFace ( this , elem , face ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: elem integer , intent ( in ) :: face integer , allocatable :: elemConn (:) integer :: n ( 3 ), ii , jj , k !> number of nodes in each direction n = this % degree + 1 select case ( face ) case ( 1 ) allocate ( elemConn ( n ( 1 ) * n ( 2 ))) elemConn = this % elemConn ( elem , 1 : n ( 1 ) * n ( 2 )) case ( 2 ) allocate ( elemConn ( n ( 1 ) * n ( 2 ))) elemConn = this % elemConn ( elem , n ( 1 ) * n ( 2 ) * n ( 3 ) - n ( 1 ) * n ( 2 ) + 1 : n ( 1 ) * n ( 2 ) * n ( 3 )) case ( 3 ) allocate ( elemConn ( n ( 1 ) * n ( 3 ))) k = 0 do jj = 1 , n ( 3 ) do ii = 1 , n ( 1 ) k = k + 1 elemConn ( k ) = this % elemConn ( elem , n ( 1 ) * n ( 2 ) * jj + ii - n ( 1 ) * n ( 2 )) end do end do case ( 4 ) allocate ( elemConn ( n ( 1 ) * n ( 3 ))) k = 0 do jj = 1 , n ( 3 ) do ii = 1 , n ( 1 ) k = k + 1 elemConn ( k ) = this % elemConn ( elem , n ( 1 ) * n ( 2 ) * jj + ii - n ( 1 )) end do end do case ( 5 ) allocate ( elemConn ( n ( 2 ) * n ( 3 ))) do ii = 1 , n ( 2 ) * n ( 3 ) elemConn ( ii ) = this % elemConn ( elem , n ( 1 ) * ii - n ( 1 ) + 1 ) end do case ( 6 ) allocate ( elemConn ( n ( 2 ) * n ( 3 ))) do ii = 1 , n ( 2 ) * n ( 3 ) elemConn ( ii ) = this % elemConn ( elem , n ( 1 ) * ii ) end do end select end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elemFace_Xc_vis ( this , elem , face ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: elem integer , intent ( in ) :: face integer , allocatable :: elemConn (:) integer :: n ( 3 ), ii , jj , k !> number of nodes in each direction n = [ 2 , 2 , 2 ] select case ( face ) case ( 1 ) allocate ( elemConn ( n ( 1 ) * n ( 2 ))) elemConn = this % elemConn_Xc_vis ( elem , 1 : n ( 1 ) * n ( 2 )) case ( 2 ) allocate ( elemConn ( n ( 1 ) * n ( 2 ))) elemConn = this % elemConn_Xc_vis ( elem , n ( 1 ) * n ( 2 ) * n ( 3 ) - n ( 1 ) * n ( 2 ) + 1 : n ( 1 ) * n ( 2 ) * n ( 3 )) case ( 3 ) allocate ( elemConn ( n ( 1 ) * n ( 3 ))) k = 0 do jj = 1 , n ( 3 ) do ii = 1 , n ( 1 ) k = k + 1 elemConn ( k ) = this % elemConn_Xc_vis ( elem , n ( 1 ) * n ( 2 ) * jj + ii - n ( 1 ) * n ( 2 )) end do end do case ( 4 ) allocate ( elemConn ( n ( 1 ) * n ( 3 ))) k = 0 do jj = 1 , n ( 3 ) do ii = 1 , n ( 1 ) k = k + 1 elemConn ( k ) = this % elemConn_Xc_vis ( elem , n ( 1 ) * n ( 2 ) * jj + ii - n ( 1 )) end do end do case ( 5 ) allocate ( elemConn ( n ( 2 ) * n ( 3 ))) do ii = 1 , n ( 2 ) * n ( 3 ) elemConn ( ii ) = this % elemConn_Xc_vis ( elem , n ( 1 ) * ii - n ( 1 ) + 1 ) end do case ( 6 ) allocate ( elemConn ( n ( 2 ) * n ( 3 ))) do ii = 1 , n ( 2 ) * n ( 3 ) elemConn ( ii ) = this % elemConn_Xc_vis ( elem , n ( 1 ) * ii ) end do end select end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elemFace_Xg_vis ( this , elem , face ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: elem integer , intent ( in ) :: face integer , allocatable :: elemConn (:) integer :: n ( 3 ), ii , jj , k !> number of nodes in each direction n = [ 2 , 2 , 2 ] select case ( face ) case ( 1 ) allocate ( elemConn ( n ( 1 ) * n ( 2 ))) elemConn = this % elemConn_Xg_vis ( elem , 1 : n ( 1 ) * n ( 2 )) case ( 2 ) allocate ( elemConn ( n ( 1 ) * n ( 2 ))) elemConn = this % elemConn_Xg_vis ( elem , n ( 1 ) * n ( 2 ) * n ( 3 ) - n ( 1 ) * n ( 2 ) + 1 : n ( 1 ) * n ( 2 ) * n ( 3 )) case ( 3 ) allocate ( elemConn ( n ( 1 ) * n ( 3 ))) k = 0 do jj = 1 , n ( 3 ) do ii = 1 , n ( 1 ) k = k + 1 elemConn ( k ) = this % elemConn_Xg_vis ( elem , n ( 1 ) * n ( 2 ) * jj + ii - n ( 1 ) * n ( 2 )) end do end do case ( 4 ) allocate ( elemConn ( n ( 1 ) * n ( 3 ))) k = 0 do jj = 1 , n ( 3 ) do ii = 1 , n ( 1 ) k = k + 1 elemConn ( k ) = this % elemConn_Xg_vis ( elem , n ( 1 ) * n ( 2 ) * jj + ii - n ( 1 )) end do end do case ( 5 ) allocate ( elemConn ( n ( 2 ) * n ( 3 ))) do ii = 1 , n ( 2 ) * n ( 3 ) elemConn ( ii ) = this % elemConn_Xg_vis ( elem , n ( 1 ) * ii - n ( 1 ) + 1 ) end do case ( 6 ) allocate ( elemConn ( n ( 2 ) * n ( 3 ))) do ii = 1 , n ( 2 ) * n ( 3 ) elemConn ( ii ) = this % elemConn_Xg_vis ( elem , n ( 1 ) * ii ) end do end select end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_degreeFace ( this , face ) result ( degree ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: face integer :: degree ( 3 ) select case ( face ) case ( 1 ) degree = [ this % degree ( 1 ), this % degree ( 2 ), 0 ] case ( 2 ) degree = [ this % degree ( 1 ), this % degree ( 2 ), 0 ] case ( 3 ) degree = [ this % degree ( 1 ), 0 , this % degree ( 3 )] case ( 4 ) degree = [ this % degree ( 1 ), 0 , this % degree ( 3 )] case ( 5 ) degree = [ 0 , this % degree ( 2 ), this % degree ( 3 )] case ( 6 ) degree = [ 0 , this % degree ( 2 ), this % degree ( 3 )] case default error stop 'Invalid face number' end select end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine ansatz ( this , ie , ig , Tgc , dTgc_dXg , dV ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ) :: ie , ig real ( rk ), intent ( out ) :: dV real ( rk ), allocatable , intent ( out ) :: Tgc (:), dTgc_dXg (:,:) real ( rk ), allocatable :: Xth (:,:), Xth_e (:,:), Xth_eT (:,:), Xc_eT (:,:), Xth1 (:), Xth2 (:), Xth3 (:), Xksi (:,:), Wksi (:) integer , allocatable :: elem_th (:,:), elem_c (:,:), elem_ce (:) type ( nurbs_volume ) :: th , th_e real ( rk ), allocatable :: dTtth_dXksi (:,:), Ttth (:), dTgc_dXt (:,:), Xt (:), dXt_dXksi (:,:), dXg_dXt (:,:) real ( rk ), allocatable :: dXg_dXksi (:,:) !! Jacobian matrix real ( rk ) :: det_dXg_dXksi !! Determinant of the Jacobian matrix call gauss_leg ([ 0.0_rk , 1.0_rk ], [ 0.0_rk , 1.0_rk ], [ 0.0_rk , 1.0_rk ], this % degree , Xksi , Wksi ) Xth1 = unique ( this % knot1 ) Xth2 = unique ( this % knot2 ) Xth3 = unique ( this % knot3 ) call ndgrid ( Xth1 , Xth2 , Xth3 , Xth ) call th % set ([ 0.0_rk , Xth1 , 1.0_rk ], [ 0.0_rk , Xth2 , 1.0_rk ], [ 0.0_rk , Xth3 , 1.0_rk ], Xth ) elem_th = th % cmp_elem () elem_c = this % cmp_elem () Xth_e = Xth ( elem_th ( ie ,:),:) call th_e % set ([ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ], [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ], [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ], Xth_e ) Xth_eT = transpose ( Xth_e ) elem_ce = elem_c ( ie ,:) Xc_eT = transpose ( this % Xc ( elem_ce ,:)) call th_e % derivative ( Xksi ( ig ,:), dTtth_dXksi , Ttth ) Xt = matmul ( Xth_eT , Ttth ) dXt_dXksi = matmul ( Xth_eT , dTtth_dXksi ) call this % derivative ( Xt , dTgc_dXt , Tgc , elem_ce ) dXg_dXt = matmul ( Xc_eT , dTgc_dXt ) dTgc_dXg = matmul ( dTgc_dXt , inv ( dXg_dXt )) dXg_dXksi = matmul ( dXg_dXt , dXt_dXksi ) det_dXg_dXksi = det ( dXg_dXksi ) dV = det_dXg_dXksi * Wksi ( ig ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_volume ( this , volume ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( out ) :: volume real ( rk ), allocatable :: Tgc (:), dTgc_dXg (:,:) integer :: ie , ig real ( rk ) :: dV , dV_ig volume = 0.0_rk do ie = 1 , size ( this % cmp_elem (), 1 ) dV = 0.0_rk do ig = 1 , size ( this % cmp_elem (), 2 ) call this % ansatz ( ie , ig , Tgc , dTgc_dXg , dV_ig ) dV = dV + dV_ig end do volume = volume + dV end do end subroutine !=============================================================================== end module forcad_nurbs_volume !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_nurbs_3d ( Xt , knot1 , knot2 , knot3 , degree , nc , ng , Xc , Wc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ) :: ng ( 3 ) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Xg (:,:) real ( rk ), allocatable :: Tgc (:) integer :: i allocate ( Xg ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), size ( Xc , 2 ))) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) !$OMP PARALLEL DO PRIVATE(Tgc) do i = 1 , ng ( 1 ) * ng ( 2 ) * ng ( 3 ) Tgc = kron ( basis_bspline ( Xt ( i , 3 ), knot3 , nc ( 3 ), degree ( 3 )),& kron (& basis_bspline ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 )))) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) Xg ( i ,:) = matmul ( Tgc , Xc ) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_nurbs_3d_1point ( Xt , knot1 , knot2 , knot3 , degree , nc , Xc , Wc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Xg (:) real ( rk ), allocatable :: Tgc (:) allocate ( Xg ( size ( Xc , 2 ))) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) Tgc = kron ( basis_bspline ( Xt ( 3 ), knot3 , nc ( 3 ), degree ( 3 )),& kron (& basis_bspline ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 )))) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) Xg = matmul ( Tgc , Xc ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_bspline_3d ( Xt , knot1 , knot2 , knot3 , degree , nc , ng , Xc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ) :: ng ( 3 ) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), allocatable :: Xg (:,:) integer :: i allocate ( Xg ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), size ( Xc , 2 ))) !$OMP PARALLEL DO do i = 1 , ng ( 1 ) * ng ( 2 ) * ng ( 3 ) Xg ( i ,:) = matmul ( kron ( basis_bspline ( Xt ( i , 3 ), knot3 , nc ( 3 ), degree ( 3 )), kron (& basis_bspline ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 )))),& Xc ) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_bspline_3d_1point ( Xt , knot1 , knot2 , knot3 , degree , nc , Xc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), allocatable :: Xg (:) allocate ( Xg ( size ( Xc , 2 ))) Xg = matmul ( kron ( basis_bspline ( Xt ( 3 ), knot3 , nc ( 3 ), degree ( 3 )), kron (& basis_bspline ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 )))),& Xc ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_nurbs_3d_vector ( Xt , knot1 , knot2 , knot3 , degree , nc , ng , Wc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ) :: ng ( 3 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: dBi (:,:), dB1 (:), dB2 (:), dB3 (:) real ( rk ), allocatable :: Bi (:), B1 (:), B2 (:), B3 (:) integer :: i allocate ( dTgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) allocate ( Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 )), dBi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) do i = 1 , size ( Xt , 1 ) call basis_bspline_der ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ), dB1 , B1 ) call basis_bspline_der ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 ), dB2 , B2 ) call basis_bspline_der ( Xt ( i , 3 ), knot3 , nc ( 3 ), degree ( 3 ), dB3 , B3 ) Bi = kron ( B3 , kron ( B2 , B1 )) Tgc ( i ,:) = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dBi (:, 1 ) = kron ( kron ( B3 , B2 ), dB1 ) dBi (:, 2 ) = kron ( kron ( B3 , dB2 ), B1 ) dBi (:, 3 ) = kron ( kron ( dB3 , B2 ), B1 ) dTgc ( i ,:, 1 ) = ( dBi (:, 1 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 1 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc ( i ,:, 2 ) = ( dBi (:, 2 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 2 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc ( i ,:, 3 ) = ( dBi (:, 3 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 3 ), Wc ) ) / dot_product ( Bi , Wc ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_nurbs_3d_scalar ( Xt , knot1 , knot2 , knot3 , degree , nc , Wc , dTgc , Tgc , elem ) use forcad_utils , only : rk , basis_bspline_der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) real ( rk ), intent ( in ), contiguous :: Wc (:) integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: dB1 (:), dB2 (:), dB3 (:), dBi (:,:) real ( rk ), allocatable :: B1 (:), B2 (:), B3 (:), Bi (:) call basis_bspline_der ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ), dB1 , B1 ) call basis_bspline_der ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 ), dB2 , B2 ) call basis_bspline_der ( Xt ( 3 ), knot3 , nc ( 3 ), degree ( 3 ), dB3 , B3 ) if (. not . present ( elem )) then allocate ( dTgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) allocate ( dBi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 ), Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) Bi = kron ( B3 , kron ( B2 , B1 )) Tgc = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dBi (:, 1 ) = kron ( kron ( B3 , B2 ), dB1 ) dBi (:, 2 ) = kron ( kron ( B3 , dB2 ), B1 ) dBi (:, 3 ) = kron ( kron ( dB3 , B2 ), B1 ) dTgc (:, 1 ) = ( dBi (:, 1 ) * Wc - Tgc * dot_product ( dBi (:, 1 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc (:, 2 ) = ( dBi (:, 2 ) * Wc - Tgc * dot_product ( dBi (:, 2 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc (:, 3 ) = ( dBi (:, 3 ) * Wc - Tgc * dot_product ( dBi (:, 3 ), Wc ) ) / dot_product ( Bi , Wc ) else allocate ( dTgc ( size ( elem ), 3 )) allocate ( Tgc ( size ( elem ))) allocate ( dBi ( size ( elem ), 3 ), Bi ( size ( elem ))) associate ( Biall => kron ( B3 , kron ( B2 , B1 ))) Bi = Biall ( elem ) Tgc = Bi * ( Wc ( elem ) / ( dot_product ( Bi , Wc ( elem )))) end associate associate ( dB1all => kron ( kron ( B3 , B2 ), dB1 ), dB2all => kron ( kron ( B3 , dB2 ), B1 ), dB3all => kron ( kron ( dB3 , B2 ), B1 )) dBi (:, 1 ) = dB1all ( elem ) dBi (:, 2 ) = dB2all ( elem ) dBi (:, 3 ) = dB3all ( elem ) end associate dTgc (:, 1 ) = ( dBi (:, 1 ) * Wc ( elem ) - Tgc * dot_product ( dBi (:, 1 ), Wc ( elem )) ) / dot_product ( Bi , Wc ( elem )) dTgc (:, 2 ) = ( dBi (:, 2 ) * Wc ( elem ) - Tgc * dot_product ( dBi (:, 2 ), Wc ( elem )) ) / dot_product ( Bi , Wc ( elem )) dTgc (:, 3 ) = ( dBi (:, 3 ) * Wc ( elem ) - Tgc * dot_product ( dBi (:, 3 ), Wc ( elem )) ) / dot_product ( Bi , Wc ( elem )) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_bspline_3d_vector ( Xt , knot1 , knot2 , knot3 , degree , nc , ng , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ) :: ng ( 3 ) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: dB1 (:), dB2 (:), dB3 (:) real ( rk ), allocatable :: B1 (:), B2 (:), B3 (:) integer :: i allocate ( dTgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) !$OMP PARALLEL DO PRIVATE(dB1, dB2, dB3) do i = 1 , size ( Xt , 1 ) call basis_bspline_der ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ), dB1 , B1 ) call basis_bspline_der ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 ), dB2 , B2 ) call basis_bspline_der ( Xt ( i , 3 ), knot3 , nc ( 3 ), degree ( 3 ), dB3 , B3 ) Tgc ( i ,:) = kron ( B3 , kron ( B2 , B1 )) dTgc ( i ,:, 1 ) = kron ( kron ( B3 , B2 ), dB1 ) dTgc ( i ,:, 2 ) = kron ( kron ( B3 , dB2 ), B1 ) dTgc ( i ,:, 3 ) = kron ( kron ( dB3 , B2 ), B1 ) end do !$OMP END PARALLEL DO end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_bspline_3d_scalar ( Xt , knot1 , knot2 , knot3 , degree , nc , dTgc , Tgc , elem ) use forcad_utils , only : rk , basis_bspline_der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: dB1 (:), dB2 (:), dB3 (:) real ( rk ), allocatable :: B1 (:), B2 (:), B3 (:) call basis_bspline_der ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ), dB1 , B1 ) call basis_bspline_der ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 ), dB2 , B2 ) call basis_bspline_der ( Xt ( 3 ), knot3 , nc ( 3 ), degree ( 3 ), dB3 , B3 ) if (. not . present ( elem )) then allocate ( dTgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) Tgc = kron ( B3 , kron ( B2 , B1 )) dTgc (:, 1 ) = kron ( kron ( B3 , B2 ), dB1 ) dTgc (:, 2 ) = kron ( kron ( B3 , dB2 ), B1 ) dTgc (:, 3 ) = kron ( kron ( dB3 , B2 ), B1 ) else allocate ( dTgc ( size ( elem ), 3 )) allocate ( Tgc ( size ( elem ))) associate ( B => kron ( B3 , kron ( B2 , B1 ))) Tgc = B ( elem ) end associate associate ( dB1 => kron ( kron ( B3 , B2 ), dB1 ), dB2 => kron ( kron ( B3 , dB2 ), B1 ), dB3 => kron ( kron ( dB3 , B2 ), B1 )) dTgc (:, 1 ) = dB1 ( elem ) dTgc (:, 2 ) = dB2 ( elem ) dTgc (:, 3 ) = dB3 ( elem ) end associate end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_nurbs_3d_vector ( Xt , knot1 , knot2 , knot3 , degree , nc , ng , Wc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ) :: ng ( 3 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: d2Bi (:,:), d2B1 (:), d2B2 (:), d2B3 (:) real ( rk ), allocatable :: dBi (:,:), dB1 (:), dB2 (:), dB3 (:) real ( rk ), allocatable :: Bi (:), B1 (:), B2 (:), B3 (:) real ( rk ), allocatable :: Tgci (:), dTgci (:) integer :: i allocate ( B1 ( nc ( 1 )), B2 ( nc ( 2 )), B3 ( nc ( 3 ))) allocate ( dB1 ( nc ( 1 )), dB2 ( nc ( 2 )), dB3 ( nc ( 3 ))) allocate ( d2B1 ( nc ( 1 )), d2B2 ( nc ( 2 )), d2B3 ( nc ( 3 ))) allocate ( Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 )), dBi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 ), d2Bi ( 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgci ( nc ( 1 ) * nc ( 2 ) * nc ( 3 )), dTgci ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) allocate ( d2Tgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( dTgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) do i = 1 , size ( Xt , 1 ) call basis_bspline_2der ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ), d2B1 , dB1 , B1 ) call basis_bspline_2der ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 ), d2B2 , dB2 , B2 ) call basis_bspline_2der ( Xt ( i , 3 ), knot3 , nc ( 3 ), degree ( 3 ), d2B3 , dB3 , B3 ) Bi = kron ( B3 , kron ( B2 , B1 )) Tgc ( i ,:) = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dBi (:, 1 ) = kron ( kron ( B3 , B2 ), dB1 ) dBi (:, 2 ) = kron ( kron ( B3 , dB2 ), B1 ) dBi (:, 3 ) = kron ( kron ( dB3 , B2 ), B1 ) dTgc ( i ,:, 1 ) = ( dBi (:, 1 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 1 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc ( i ,:, 2 ) = ( dBi (:, 2 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 2 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc ( i ,:, 3 ) = ( dBi (:, 3 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 3 ), Wc ) ) / dot_product ( Bi , Wc ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( B3 , B2 ), d2B1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( B3 , dB2 ), dB1 ) d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( dB3 , B2 ), dB1 ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( B3 , dB2 ), dB1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( B3 , d2B2 ), B1 ) d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( dB3 , dB2 ), B1 ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( dB3 , B2 ), dB1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( dB3 , dB2 ), B1 ) d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( d2B3 , B2 ), B1 ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) * Wc & - 2.0_rk * dTgc ( i , :, 1 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) * Wc & - dTgc ( i , :, 1 ) * dot_product ( dBi (:, 2 ), Wc ) - dTgc ( i , :, 2 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) * Wc & - dTgc ( i , :, 1 ) * dot_product ( dBi (:, 3 ), Wc ) - dTgc ( i , :, 3 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) * Wc & - dTgc ( i , :, 1 ) * dot_product ( dBi (:, 2 ), Wc ) - dTgc ( i , :, 2 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) * Wc & - 2.0_rk * dTgc ( i , :, 2 ) * dot_product ( dBi (:, 2 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) * Wc & - dTgc ( i , :, 2 ) * dot_product ( dBi (:, 3 ), Wc ) - dTgc ( i , :, 3 ) * dot_product ( dBi (:, 2 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) * Wc & - dTgc ( i , :, 1 ) * dot_product ( dBi (:, 3 ), Wc ) - dTgc ( i , :, 3 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) * Wc & - dTgc ( i , :, 2 ) * dot_product ( dBi (:, 3 ), Wc ) - dTgc ( i , :, 3 ) * dot_product ( dBi (:, 2 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) * Wc & - 2.0_rk * dTgc ( i , :, 3 ) * dot_product ( dBi (:, 3 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ), Wc )) / dot_product ( Bi , Wc ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_nurbs_3d_scalar ( Xt , knot1 , knot2 , knot3 , degree , nc , Wc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: d2Bi (:,:), d2B1 (:), d2B2 (:), d2B3 (:) real ( rk ), allocatable :: dBi (:,:), dB1 (:), dB2 (:), dB3 (:) real ( rk ), allocatable :: Bi (:), B1 (:), B2 (:), B3 (:) allocate ( B1 ( nc ( 1 )), B2 ( nc ( 2 )), B3 ( nc ( 3 ))) allocate ( dB1 ( nc ( 1 )), dB2 ( nc ( 2 )), dB3 ( nc ( 3 ))) allocate ( d2B1 ( nc ( 1 )), d2B2 ( nc ( 2 )), d2B3 ( nc ( 3 ))) allocate ( Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 )), dBi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 ), d2Bi ( 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( d2Tgc ( 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( dTgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) call basis_bspline_2der ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ), d2B1 , dB1 , B1 ) call basis_bspline_2der ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 ), d2B2 , dB2 , B2 ) call basis_bspline_2der ( Xt ( 3 ), knot3 , nc ( 3 ), degree ( 3 ), d2B3 , dB3 , B3 ) Bi = kron ( B3 , kron ( B2 , B1 )) Tgc = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dBi (:, 1 ) = kron ( kron ( B3 , B2 ), dB1 ) dBi (:, 2 ) = kron ( kron ( B3 , dB2 ), B1 ) dBi (:, 3 ) = kron ( kron ( dB3 , B2 ), B1 ) dTgc (:, 1 ) = ( dBi (:, 1 ) * Wc - Tgc * dot_product ( dBi (:, 1 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc (:, 2 ) = ( dBi (:, 2 ) * Wc - Tgc * dot_product ( dBi (:, 2 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc (:, 3 ) = ( dBi (:, 3 ) * Wc - Tgc * dot_product ( dBi (:, 3 ), Wc ) ) / dot_product ( Bi , Wc ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( B3 , B2 ), d2B1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( B3 , dB2 ), dB1 ) d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( dB3 , B2 ), dB1 ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( B3 , dB2 ), dB1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( B3 , d2B2 ), B1 ) d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( dB3 , dB2 ), B1 ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( dB3 , B2 ), dB1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( dB3 , dB2 ), B1 ) d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( d2B3 , B2 ), B1 ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) * Wc & - 2.0_rk * dTgc (:, 1 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) * Wc & - dTgc (:, 1 ) * dot_product ( dBi (:, 2 ), Wc ) - dTgc (:, 2 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) * Wc & - dTgc (:, 1 ) * dot_product ( dBi (:, 3 ), Wc ) - dTgc (:, 3 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc * dot_product ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) * Wc & - dTgc (:, 1 ) * dot_product ( dBi (:, 2 ), Wc ) - dTgc (:, 2 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) * Wc & - 2.0_rk * dTgc (:, 2 ) * dot_product ( dBi (:, 2 ), Wc ) & - Tgc * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) * Wc & - dTgc (:, 2 ) * dot_product ( dBi (:, 3 ), Wc ) - dTgc (:, 3 ) * dot_product ( dBi (:, 2 ), Wc ) & - Tgc * dot_product ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) * Wc & - dTgc (:, 1 ) * dot_product ( dBi (:, 3 ), Wc ) - dTgc (:, 3 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) * Wc & - dTgc (:, 2 ) * dot_product ( dBi (:, 3 ), Wc ) - dTgc (:, 3 ) * dot_product ( dBi (:, 2 ), Wc ) & - Tgc * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) * Wc & - 2.0_rk * dTgc (:, 3 ) * dot_product ( dBi (:, 3 ), Wc ) & - Tgc * dot_product ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ), Wc )) / dot_product ( Bi , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_bspline_3d_vector ( Xt , knot1 , knot2 , knot3 , degree , nc , ng , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ) :: ng ( 3 ) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: d2B1 (:), d2B2 (:), d2B3 (:) real ( rk ), allocatable :: dB1 (:), dB2 (:), dB3 (:) real ( rk ), allocatable :: B1 (:), B2 (:), B3 (:) integer :: i allocate ( d2Tgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( dTgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) do i = 1 , size ( Xt , 1 ) call basis_bspline_2der ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ), d2B1 , dB1 , B1 ) call basis_bspline_2der ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 ), d2B2 , dB2 , B2 ) call basis_bspline_2der ( Xt ( i , 3 ), knot3 , nc ( 3 ), degree ( 3 ), d2B3 , dB3 , B3 ) Tgc ( i ,:) = kron ( B3 , kron ( B2 , B1 )) dTgc ( i ,:, 1 ) = kron ( kron ( B3 , B2 ), dB1 ) dTgc ( i ,:, 2 ) = kron ( kron ( B3 , dB2 ), B1 ) dTgc ( i ,:, 3 ) = kron ( kron ( dB3 , B2 ), B1 ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( B3 , B2 ), d2B1 ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( B3 , dB2 ), dB1 ) d2Tgc ( i , 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( dB3 , B2 ), dB1 ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( B3 , dB2 ), dB1 ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( B3 , d2B2 ), B1 ) d2Tgc ( i , 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( dB3 , dB2 ), B1 ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( dB3 , B2 ), dB1 ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( dB3 , dB2 ), B1 ) d2Tgc ( i , 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( d2B3 , B2 ), B1 ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_bspline_3d_scalar ( Xt , knot1 , knot2 , knot3 , degree , nc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: d2B1 (:), d2B2 (:), d2B3 (:) real ( rk ), allocatable :: dB1 (:), dB2 (:), dB3 (:) real ( rk ), allocatable :: B1 (:), B2 (:), B3 (:) allocate ( d2Tgc ( 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( dTgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) call basis_bspline_2der ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ), d2B1 , dB1 , B1 ) call basis_bspline_2der ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 ), d2B2 , dB2 , B2 ) call basis_bspline_2der ( Xt ( 3 ), knot3 , nc ( 3 ), degree ( 3 ), d2B3 , dB3 , B3 ) Tgc = kron ( B3 , kron ( B2 , B1 )) dTgc (:, 1 ) = kron ( kron ( B3 , B2 ), dB1 ) dTgc (:, 2 ) = kron ( kron ( B3 , dB2 ), B1 ) dTgc (:, 3 ) = kron ( kron ( dB3 , B2 ), B1 ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( B3 , B2 ), d2B1 ) d2Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( B3 , dB2 ), dB1 ) d2Tgc ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( dB3 , B2 ), dB1 ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( B3 , dB2 ), dB1 ) d2Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( B3 , d2B2 ), B1 ) d2Tgc ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( dB3 , dB2 ), B1 ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( dB3 , B2 ), dB1 ) d2Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( dB3 , dB2 ), B1 ) d2Tgc ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( d2B3 , B2 ), B1 ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_nurbs_3d_vector ( Xt , knot1 , knot2 , knot3 , degree , nc , ng , Wc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ) :: ng ( 3 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Tgc (:,:) real ( rk ), allocatable :: Tgci (:) integer :: i allocate ( Tgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) allocate ( Tgci ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) !$OMP PARALLEL DO PRIVATE(Tgci) do i = 1 , size ( Xt , 1 ) Tgci = kron ( basis_bspline ( Xt ( i , 3 ), knot3 , nc ( 3 ), degree ( 3 )), kron (& basis_bspline ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 )))) Tgc ( i ,:) = Tgci * ( Wc / ( dot_product ( Tgci , Wc ))) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_nurbs_3d_scalar ( Xt , knot1 , knot2 , knot3 , degree , nc , Wc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Tgc (:) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) Tgc = kron ( basis_bspline ( Xt ( 3 ), knot3 , nc ( 3 ), degree ( 3 )), kron (& basis_bspline ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 )))) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_bspline_3d_vector ( Xt , knot1 , knot2 , knot3 , degree , nc , ng ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ) :: ng ( 3 ) real ( rk ), allocatable :: Tgc (:,:) integer :: i allocate ( Tgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) !$OMP PARALLEL DO do i = 1 , size ( Xt , 1 ) Tgc ( i ,:) = kron ( basis_bspline ( Xt ( i , 3 ), knot3 , nc ( 3 ), degree ( 3 )), kron (& basis_bspline ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 )))) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_bspline_3d_scalar ( Xt , knot1 , knot2 , knot3 , degree , nc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) real ( rk ), allocatable :: Tgc (:) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) Tgc = kron ( basis_bspline ( Xt ( 3 ), knot3 , nc ( 3 ), degree ( 3 )), kron (& basis_bspline ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 )))) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function nearest_point_help_3d ( ng , Xg , point_Xg ) result ( distances ) use forcad_utils , only : rk implicit none integer , intent ( in ) :: ng ( 3 ) real ( rk ), intent ( in ), contiguous :: Xg (:,:) real ( rk ), intent ( in ), contiguous :: point_Xg (:) real ( rk ), allocatable :: distances (:) integer :: i allocate ( distances ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ))) !$OMP PARALLEL DO do i = 1 , ng ( 1 ) * ng ( 2 ) * ng ( 3 ) distances ( i ) = norm2 ( Xg ( i ,:) - point_Xg ) end do !$OMP END PARALLEL DO end function !===============================================================================","tags":"","loc":"sourcefile/forcad_nurbs_volume.f90.html"},{"title":"nearest_point_1d.f90 – ForCAD","text":"This file depends on sourcefile~~nearest_point_1d.f90~~EfferentGraph sourcefile~nearest_point_1d.f90 nearest_point_1d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~nearest_point_1d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program nearest_point_1d use forcad , only : rk , nurbs_curve implicit none type ( nurbs_curve ) :: shape !! Declare a NURBS curve object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights real ( rk ) :: knot ( 6 ) !! Array for knot vector real ( rk ), allocatable :: nearest_Xg (:) !! Array for the nearest point on the curve real ( rk ) :: nearest_Xt !! Array for the parametric coordinates of the nearest point integer :: id !! Variable for the id of the nearest point !----------------------------------------------------------------------------- ! Setting up the NURBS curve !----------------------------------------------------------------------------- !> Define control points for the NURBS curve allocate ( Xc ( 3 , 3 )) Xc ( 1 ,:) = [ 0.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 0.0_rk , 5.0_rk , 0.0_rk ] Xc ( 3 ,:) = [ 5.0_rk , 5.0_rk , 0.0_rk ] !> Define weights for the control points (optional) allocate ( Wc ( 3 )) Wc = [ 1.0_rk , 1.1_rk , 1.0_rk ] !> Define knot vector knot = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] !> Set knot vector, control points, and weights for the NURBS curve object. !> Wc is optional call shape % set ( knot , Xc , Wc ) !----------------------------------------------------------------------------- ! Creating the NURBS curve !----------------------------------------------------------------------------- !> Generate the NURBS curve with a resolution of 20 call shape % create ( 20 ) !----------------------------------------------------------------------------- ! Nearest point on the curve !----------------------------------------------------------------------------- !> Find the nearest point on the curve to a given point ! nearest_Xg: Coordinates of the nearest point on the curve (optional) ! nearest_Xt: Corresponding parametric coordinates of the nearest point (optional) ! id: id of the nearest point (optional) call shape % nearest_point ([ 4.5_rk , 4.5_rk , 5.0_rk ], nearest_Xg , nearest_Xt , id ) print '(a,1x,g0,2x,g0,2x,g0,a,2x,g0,2x,a,1x,g0)' ,& 'Nearest point on the curve:' , nearest_Xg , ' with parametric coordinates:' , nearest_Xt , ' and id:' , id !----------------------------------------------------------------------------- ! Nearest point on the curve (Optimization) !----------------------------------------------------------------------------- !> Find the nearest point on the curve to a given point !> The optimization method is used to find the nearest point !> The optimization method is based on the Newton-Raphson method ! nearest_Xt: Corresponding parametric coordinates of the nearest point ! nearest_Xg: Coordinates of the nearest point on the curve (optional) call shape % nearest_point2 ([ 4.5_rk , 4.5_rk , 5.0_rk ], 1.0e-11_rk , 30 , nearest_Xt , nearest_Xg ) print '(a,1x,g0,2x,g0,a,2x,g0,2x,g0)' ,& 'Nearest point on the curve:' , nearest_Xg , ' with parametric coordinates:' , nearest_Xt !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call shape % finalize () deallocate ( nearest_Xg , Xc , Wc ) end program","tags":"","loc":"sourcefile/nearest_point_1d.f90.html"},{"title":"shape_tetragon.f90 – ForCAD","text":"This file depends on sourcefile~~shape_tetragon.f90~~EfferentGraph sourcefile~shape_tetragon.f90 shape_tetragon.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_tetragon.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_tetragon use forcad implicit none type ( nurbs_surface ) :: shape !! Declare a NURBS surface object !----------------------------------------------------------------------------- ! Setting up the NURBS tetrangon !----------------------------------------------------------------------------- !> Set a tetragon with lengths of 2.0 and 3.0 and 3 and 4 control points in each direction !> The weights of the control points (Wc) are optional. call shape % set_tetragon ( L = [ 2.0_rk , 3.0_rk ], nc = [ 3 , 4 ]) !> Export the control points to a VTK file call shape % export_Xc ( 'vtk/shape_tetragon_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS surface !----------------------------------------------------------------------------- !> Generate the NURBS surface with resolutions of 30 in both dimensions call shape % create ( 30 , 30 ) !> Export the generated surface to a VTK file call shape % export_Xg ( 'vtk/shape_tetragon_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_tetragon_Xc.vtk' , 'vtk/shape_tetragon_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS surface object call shape % finalize () end program","tags":"","loc":"sourcefile/shape_tetragon.f90.html"},{"title":"example_ppm1.f90 – ForCAD","text":"This file depends on sourcefile~~example_ppm1.f90~~EfferentGraph sourcefile~example_ppm1.f90 example_ppm1.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~example_ppm1.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> Visualization of NURBS surfaces using ForCAD, ForImage and ForColorMap libraries !> This example converts NURBS surfaces (vector) to an image (raster) using ForCAD, ForImage and ForColorMap libraries. program example_ppm1 use forcad , only : rk , nurbs_surface use forimage , only : ik , format_pnm , color use forcolormap , only : colormap use fortime , only : timer implicit none type ( nurbs_surface ) :: shape type ( format_pnm ) :: image type ( color ) :: background_color type ( colormap ) :: cmap integer ( ik ), allocatable :: px (:, :) real ( rk ), allocatable :: Xg (:,:), z_values (:) real ( rk ) :: center ( 3 ), inner_radius , outer_radius , aspect_ratio integer :: height , width , ng ( 2 ), red , green , blue , res1 , res2 , i integer , allocatable :: idx (:,:) type ( timer ) :: t !----------------------------------------------------------------------------- ! Set the image size and calculate the aspect ratio !----------------------------------------------------------------------------- width = 2000 height = 2000 aspect_ratio = real ( width , rk ) / real ( height , rk ) allocate ( px ( height , 3 * width )) !----------------------------------------------------------------------------- ! Set the background color using ForColor class of ForImage !----------------------------------------------------------------------------- call t % timer_start () call background_color % set ( 'white' , use_library = . true .) do i = 1 , width px (:, 3 * ( i - 1 ) + 1 ) = background_color % get_r () px (:, 3 * ( i - 1 ) + 2 ) = background_color % get_g () px (:, 3 * ( i - 1 ) + 3 ) = background_color % get_b () end do call t % timer_stop ( message = 'Setting the background color' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a tetragon res1 = 2000 res2 = 2000 call shape % set_tetragon ( L = [ 1.0_rk , 1.0_rk ], nc = [ 2 , 2 ]) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a tetragon' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! circular gradient z_values = (( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 )))) ** 2 & + (( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) ** 2 ) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'buda' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a ring center = [ 0.25_rk , 0.25_rk , 0.0_rk ] outer_radius = 0.24_rk inner_radius = 0.0_rk res1 = 3500 res2 = 1000 center ( 2 ) = center ( 2 ) / aspect_ratio call shape % set_ring ( center , inner_radius , outer_radius ) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! circular gradient z_values = (( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 )))) ** 2 & + (( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) ** 2 ) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'managua' , 0.0_rk , 2.2_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a ring center = [ 0.75_rk , 0.25_rk , 0.0_rk ] outer_radius = 0.24_rk inner_radius = 0.08_rk res1 = 3500 res2 = 1000 center ( 2 ) = center ( 2 ) / aspect_ratio call shape % set_ring ( center , inner_radius , outer_radius ) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the y-direction z_values = ( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'lipari' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a ring center = [ 0.25_rk , 0.75_rk , 0.0_rk ] outer_radius = 0.24_rk inner_radius = 0.01_rk res1 = 3500 res2 = 1000 center ( 2 ) = center ( 2 ) / aspect_ratio call shape % set_ring ( center , inner_radius , outer_radius ) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the x-direction z_values = ( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'oslo10' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a ring center = [ 0.75_rk , 0.75_rk , 0.0_rk ] outer_radius = 0.24_rk inner_radius = 0.22_rk res1 = 3500 res2 = 1000 center ( 2 ) = center ( 2 ) / aspect_ratio call shape % set_ring ( center , inner_radius , outer_radius ) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the x-direction z_values = ( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- red = 255 green = 215 blue = 0 !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Save the image to a PPM file using ForImage library !----------------------------------------------------------------------------- call t % timer_start () call image % set_pnm (& encoding = 'binary' , & file_format = 'ppm' , & width = width , & height = height , & max_color = 255 , & comment = 'example: ForCAD + ForImage + ForColor + ForColormap' , & pixels = px & ) call image % export_pnm ( 'ppm/example_ppm1' ) call image % finalize () call t % timer_stop ( message = 'Saving the image' ) ! Clean up call cmap % finalize () deallocate ( px , Xg , z_values ) end program","tags":"","loc":"sourcefile/example_ppm1.f90.html"},{"title":"shape_half_circle.f90 – ForCAD","text":"This file depends on sourcefile~~shape_half_circle.f90~~EfferentGraph sourcefile~shape_half_circle.f90 shape_half_circle.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_half_circle.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_half_circle use forcad , only : rk , nurbs_curve implicit none type ( nurbs_curve ) :: shape !> Set up a half circle shape centered at the 0,0,0 with a radius of 1 call shape % set_half_circle ([ 0.0_rk , 0.0_rk , 0.0_rk ], 1.0_rk ) !> Export the control points to a VTK file for visualization. call shape % export_Xc ( 'vtk/shape_half_circle_Xc.vtk' ) !> Create the shape using the specified number of elements in each direction. call shape % create ( 60 ) !> Export the geometry to a VTK file for visualization. call shape % export_Xg ( 'vtk/shape_half_circle_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_half_circle_Xc.vtk' , 'vtk/shape_half_circle_Xg.vtk' ) !> Finalize and clean up the shape object. call shape % finalize () end program","tags":"","loc":"sourcefile/shape_half_circle.f90.html"},{"title":"demo_volume.f90 – ForCAD","text":"This file depends on sourcefile~~demo_volume.f90~~EfferentGraph sourcefile~demo_volume.f90 demo_volume.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~demo_volume.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> This program demonstrates the usage of a NURBS volume object to create, and finalize a NURBS volume. !> It sets up control points and weights, generates the volume, and exports the control points !> and the volume to VTK files at various stages. program example_nurbs_volume use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: nurbs !! Declare a NURBS volume object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights !----------------------------------------------------------------------------- ! Setting up the NURBS volume !----------------------------------------------------------------------------- !> Define control points for the NURBS volume Xc = generate_Xc ( 1.0_rk ) !> Define weights for the control points allocate ( Wc ( size ( Xc , 1 )), source = 1.0_rk ) !> Set control points and weights for the NURBS volume object call nurbs % set ([ 2 , 2 , 2 ], Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export initial control points to a VTK file call nurbs % export_Xc ( 'vtk/demo_volume_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS volume !----------------------------------------------------------------------------- !> Generate the NURBS volume with a resolution of 15X15X15 call nurbs % create ( 15 , 15 , 15 ) !> Export the generated volume to a VTK file call nurbs % export_Xg ( 'vtk/demo_volume_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/demo_volume_Xc.vtk' , 'vtk/demo_volume_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS volume object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( L ) result ( control_points ) implicit none real ( rk ), intent ( in ) :: L real ( rk ), allocatable :: control_points (:,:) real ( rk ) :: L2 L2 = L / 2.0_rk allocate ( control_points ( 8 , 3 )) control_points ( 1 ,:) = [ L2 , - L2 , L2 ] control_points ( 2 ,:) = [ L2 , - L2 , - L2 ] control_points ( 3 ,:) = [ - L2 , - L2 , L2 ] control_points ( 4 ,:) = [ - L2 , - L2 , - L2 ] control_points ( 5 ,:) = [ L2 , L2 , L2 ] control_points ( 6 ,:) = [ L2 , L2 , - L2 ] control_points ( 7 ,:) = [ - L2 , L2 , L2 ] control_points ( 8 ,:) = [ - L2 , L2 , - L2 ] end function !----------------------------------------------------------------------------- end program example_nurbs_volume","tags":"","loc":"sourcefile/demo_volume.f90.html"},{"title":"put_to_nurbs.f90 – ForCAD","text":"This file depends on sourcefile~~put_to_nurbs.f90~~EfferentGraph sourcefile~put_to_nurbs.f90 put_to_nurbs.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~put_to_nurbs.f90->sourcefile~forcad.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~put_to_nurbs.f90->sourcefile~forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program example_put_to_nurbs use forcad use forcad_utils , only : hexahedron_Xc implicit none type ( nurbs_volume ) :: control_shape real ( rk ), allocatable :: X (:,:) integer , allocatable :: elem (:,:) integer :: i , nunit !> You can create your shape or use a predefined one !> Read coordinates from file allocate ( X ( 23200 , 3 )) open ( newunit = nunit , file = 'example/put_to_nurbs_X.txt' ) do i = 1 , 23200 read ( nunit , * ) X ( i , 1 ), X ( i , 2 ), X ( i , 3 ) end do close ( nunit ) !> Read element connectivities from file allocate ( elem ( 20577 , 8 )) open ( newunit = nunit , file = 'example/put_to_nurbs_elem.txt' ) do i = 1 , 20577 read ( nunit , * ) elem ( i , 1 ), elem ( i , 2 ), elem ( i , 4 ), elem ( i , 3 ), elem ( i , 5 ), elem ( i , 6 ), elem ( i , 8 ), elem ( i , 7 ) end do close ( nunit ) !> Set a control shape that will be used to put the shape into !> The contol shape is a hexahedron with 100x40x10 with 10x5x3 number of control points !> By modifying the control shape you can modify the shape call control_shape % set ( nc = [ 10 , 5 , 3 ], Xc = hexahedron_Xc ( L = [ 10 0.0_rk , 4 0.0_rk , 1 0.0_rk ], nc = [ 10 , 5 , 3 ])) !> Map the shape into the shape call control_shape % put_to_nurbs ( X , elem ) !> Deallocate local variables deallocate ( X , elem ) !> Export the shape and the control shape to vtk files call control_shape % export_Xc ( 'vtk/control_shape.vtk' ) call control_shape % export_Xg ( 'vtk/shape.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call control_shape % show ( 'vtk/control_shape.vtk' , 'vtk/shape.vtk' ) !> Finalize the control shape call control_shape % finalize () end program","tags":"","loc":"sourcefile/put_to_nurbs.f90.html"},{"title":"forcad.f90 – ForCAD","text":"This file depends on sourcefile~~forcad.f90~~EfferentGraph sourcefile~forcad.f90 forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Files dependent on this one sourcefile~~forcad.f90~~AfferentGraph sourcefile~forcad.f90 forcad.f90 sourcefile~cmp_area.f90 cmp_area.f90 sourcefile~cmp_area.f90->sourcefile~forcad.f90 sourcefile~cmp_length.f90 cmp_length.f90 sourcefile~cmp_length.f90->sourcefile~forcad.f90 sourcefile~cmp_volume.f90 cmp_volume.f90 sourcefile~cmp_volume.f90->sourcefile~forcad.f90 sourcefile~demo_curve.f90 demo_curve.f90 sourcefile~demo_curve.f90->sourcefile~forcad.f90 sourcefile~demo_surface.f90 demo_surface.f90 sourcefile~demo_surface.f90->sourcefile~forcad.f90 sourcefile~demo_volume.f90 demo_volume.f90 sourcefile~demo_volume.f90->sourcefile~forcad.f90 sourcefile~example_curve_1.f90 example_curve_1.f90 sourcefile~example_curve_1.f90->sourcefile~forcad.f90 sourcefile~example_ppm1.f90 example_ppm1.f90 sourcefile~example_ppm1.f90->sourcefile~forcad.f90 sourcefile~example_ppm2.f90 example_ppm2.f90 sourcefile~example_ppm2.f90->sourcefile~forcad.f90 sourcefile~example_ppm3.f90 example_ppm3.f90 sourcefile~example_ppm3.f90->sourcefile~forcad.f90 sourcefile~example_surface_1.f90 example_surface_1.f90 sourcefile~example_surface_1.f90->sourcefile~forcad.f90 sourcefile~example_volume_1.f90 example_volume_1.f90 sourcefile~example_volume_1.f90->sourcefile~forcad.f90 sourcefile~nearest_point_1d.f90 nearest_point_1d.f90 sourcefile~nearest_point_1d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d.f90 nearest_point_2d.f90 sourcefile~nearest_point_2d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d_bench.f90 nearest_point_2d_bench.f90 sourcefile~nearest_point_2d_bench.f90->sourcefile~forcad.f90 sourcefile~nearest_point_3d.f90 nearest_point_3d.f90 sourcefile~nearest_point_3d.f90->sourcefile~forcad.f90 sourcefile~put_to_nurbs.f90 put_to_nurbs.f90 sourcefile~put_to_nurbs.f90->sourcefile~forcad.f90 sourcefile~shape_c_1d.f90 shape_C_1d.f90 sourcefile~shape_c_1d.f90->sourcefile~forcad.f90 sourcefile~shape_c_2d.f90 shape_C_2d.f90 sourcefile~shape_c_2d.f90->sourcefile~forcad.f90 sourcefile~shape_c_3d.f90 shape_C_3d.f90 sourcefile~shape_c_3d.f90->sourcefile~forcad.f90 sourcefile~shape_circle.f90 shape_circle.f90 sourcefile~shape_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_circle.f90 shape_half_circle.f90 sourcefile~shape_half_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_2d.f90 shape_half_ring_2d.f90 sourcefile~shape_half_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_3d.f90 shape_half_ring_3d.f90 sourcefile~shape_half_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_hexahedron.f90 shape_hexahedron.f90 sourcefile~shape_hexahedron.f90->sourcefile~forcad.f90 sourcefile~shape_ring_2d.f90 shape_ring_2d.f90 sourcefile~shape_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_ring_3d.f90 shape_ring_3d.f90 sourcefile~shape_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_tetragon.f90 shape_tetragon.f90 sourcefile~shape_tetragon.f90->sourcefile~forcad.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause module forcad use forcad_utils use forcad_nurbs_curve use forcad_nurbs_surface use forcad_nurbs_volume private public rk , nurbs_curve , nurbs_surface , nurbs_volume end module forcad","tags":"","loc":"sourcefile/forcad.f90.html"},{"title":"shape_half_ring_2d.f90 – ForCAD","text":"This file depends on sourcefile~~shape_half_ring_2d.f90~~EfferentGraph sourcefile~shape_half_ring_2d.f90 shape_half_ring_2d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_half_ring_2d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_half_ring_2d use forcad , only : rk , nurbs_surface implicit none type ( nurbs_surface ) :: shape !> Set up a half ring shape centered at 0,0,0 with inner radius 1 and outer radius 2. call shape % set_half_ring ([ 0.0_rk , 0.0_rk , 0.0_rk ], 1.0_rk , 2.0_rk ) !> Export the control points to a VTK file for visualization. call shape % export_Xc ( 'vtk/shape_half_ring_2d_Xc.vtk' ) !> Create the shape using the specified number of elements in each direction. call shape % create ( 60 , 15 ) !> Export the geometry to a VTK file for visualization. call shape % export_Xg ( 'vtk/shape_half_ring_2d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_half_ring_2d_Xc.vtk' , 'vtk/shape_half_ring_2d_Xg.vtk' ) !> Finalize and clean up the shape object. call shape % finalize () end program","tags":"","loc":"sourcefile/shape_half_ring_2d.f90.html"},{"title":"nearest_point_2d.f90 – ForCAD","text":"This file depends on sourcefile~~nearest_point_2d.f90~~EfferentGraph sourcefile~nearest_point_2d.f90 nearest_point_2d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~nearest_point_2d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program nearest_point_2d use forcad , only : rk , nurbs_surface implicit none type ( nurbs_surface ) :: shape !! Declare a NURBS surface object real ( rk ), allocatable :: nearest_Xg (:) !! Coordinates of the nearest point on the surface real ( rk ), allocatable :: nearest_Xt (:) !! Corresponding parametric coordinates of the nearest point integer :: id !! id of the nearest point real ( rk ) :: Xc ( 4 , 3 ) !! Control points real ( rk ) :: Wc ( 4 ) !! Weights of the control points !----------------------------------------------------------------------------- ! Setting up the NURBS tetrangon !----------------------------------------------------------------------------- !> Set a surface with 4 control points Xc ( 1 ,:) = [ 0.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 3 ,:) = [ 0.0_rk , 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ 2.0_rk , 2.0_rk , 0.0_rk ] !> The weights of the control points (Wc) are optional. Wc = [ 1.0_rk , 1.1_rk , 0.7_rk , 1.0_rk ] call shape % set ( knot1 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ], knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ], Xc = Xc , Wc = Wc ) !----------------------------------------------------------------------------- ! Creating the NURBS surface !----------------------------------------------------------------------------- !> Generate the NURBS surface with resolutions of 30 in both dimensions call shape % create ( 30 , 30 ) !----------------------------------------------------------------------------- ! Nearest point on the surface (Approximation) !----------------------------------------------------------------------------- !> Find the nearest point on the surface to a given point ! nearest_Xg: Coordinates of the nearest point on the surface (optional) ! nearest_Xt: Corresponding parametric coordinates of the nearest point (optional) ! id: id of the nearest point (optional) call shape % nearest_point ([ 1.3_rk , 1.0_rk , 1.999999999_rk ], nearest_Xg , nearest_Xt , id ) print '(a,1x,g0,2x,g0,2x,g0,a,2x,g0,2x,g0,2x,a,1x,g0)' ,& 'Nearest point on the surface:' , nearest_Xg , ' with parametric coordinates:' , nearest_Xt , ' and id:' , id !----------------------------------------------------------------------------- ! Nearest point on the surface (Optimization) !----------------------------------------------------------------------------- !> Find the nearest point on the surface to a given point !> The optimization method is used to find the nearest point !> The optimization method is based on the Newton-Raphson method ! nearest_Xt: Corresponding parametric coordinates of the nearest point ! nearest_Xg: Coordinates of the nearest point on the surface (optional) call shape % nearest_point2 ([ 1.3_rk , 1.0_rk , 1.999999999_rk ], 1.0e-11_rk , 30 , nearest_Xt , nearest_Xg ) print '(a,1x,g0,2x,g0,2x,g0,a,2x,g0,2x,g0)' ,& 'Nearest point on the surface:' , nearest_Xg , ' with parametric coordinates:' , nearest_Xt !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS surface object call shape % finalize () ! deallocate(nearest_Xg, nearest_Xt) end program","tags":"","loc":"sourcefile/nearest_point_2d.f90.html"},{"title":"shape_ring_3d.f90 – ForCAD","text":"This file depends on sourcefile~~shape_ring_3d.f90~~EfferentGraph sourcefile~shape_ring_3d.f90 shape_ring_3d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_ring_3d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_ring_3d use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: shape !> Set up a ring shape centered at 0,0,0 with inner radius 1, outer radius 2, and length 1. call shape % set_ring ([ 0.0_rk , 0.0_rk , 0.0_rk ], 1.0_rk , 2.0_rk , 1.0_rk ) !> Export the control points to a VTK file for visualization. call shape % export_Xc ( 'vtk/shape_ring_3d_Xc.vtk' ) !> Create the shape using the specified number of elements in each direction. call shape % create ( 60 , 15 , 10 ) !> Export the geometry to a VTK file for visualization. call shape % export_Xg ( 'vtk/shape_ring_3d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_ring_3d_Xc.vtk' , 'vtk/shape_ring_3d_Xg.vtk' ) !> Finalize and clean up the shape object. call shape % finalize () end program","tags":"","loc":"sourcefile/shape_ring_3d.f90.html"},{"title":"example_surface_1.f90 – ForCAD","text":"This file depends on sourcefile~~example_surface_1.f90~~EfferentGraph sourcefile~example_surface_1.f90 example_surface_1.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~example_surface_1.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> This program demonstrates the usage of a NURBS (Non-Uniform Rational B-Spline) surface object to create  and finalize a NURBS surface. !> It sets up control points, weights, and knot vectors for all three dimensions, generates the surface, and exports the control points and the surface to VTK files. program example3_surface use forcad implicit none type ( nurbs_surface ) :: nurbs !! Declare a NURBS surface object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights real ( rk ) :: knot1 ( 6 ), knot2 ( 6 ) !! Arrays for knot vectors in both dimensions !----------------------------------------------------------------------------- ! Setting up the NURBS surface !----------------------------------------------------------------------------- !> Define control points for the NURBS surface Xc = generate_Xc ( 3 , 3 , 1.0_rk ) !> Define weights for the control points allocate ( Wc ( size ( Xc , 1 ))) Wc = 1.0_rk Wc ( 2 ) = 2.0_rk !> Define knot vectors for both dimensions knot1 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] !> Set knot vectors, control points, and weights for the NURBS surface object call nurbs % set ( knot1 , knot2 , Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export the control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_surface_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS surface !----------------------------------------------------------------------------- !> Generate the NURBS surface with resolutions of 30 in both dimensions call nurbs % create ( 30 , 30 ) !> Export the generated surface to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_surface_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_surface_Xc.vtk' , 'vtk/nurbs_surface_Xg.vtk' ) !----------------------------------------------------------------------------- ! Refinements !----------------------------------------------------------------------------- !> Print size of the knot vectors print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) !> Insert knots 0.25, twice and 0.75, once in both directions call nurbs % insert_knots ( 1 , [ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) ! direction 1 call nurbs % insert_knots ( 2 , [ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) ! direction 2 !> Print size of the knot vectors after inserting knots print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) !> Print the degrees print * , nurbs % get_degree () !> Elevate degree by 2 in both directions call nurbs % elevate_degree ( 1 , 2 ) ! direction 1 call nurbs % elevate_degree ( 2 , 2 ) ! direction 2 !> Print the degrees after elevating print * , nurbs % get_degree () !> Print size of the knot vectors print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) !> Remove knots 0.25, twice and 0.75, once in both directions call nurbs % remove_knots ( 1 , [ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) ! direction 1 call nurbs % remove_knots ( 2 , [ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) ! direction 2 !> Print size of the knot vectors after removing knots print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) !> Generate the refined NURBS surface with resolutions of 30 in both dimensions call nurbs % create () !> Export updated control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_surface_Xc2.vtk' ) !> Export the refined generated surface to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_surface_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_surface_Xc2.vtk' , 'vtk/nurbs_surface_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Transformations !----------------------------------------------------------------------------- !> Rotate the control points call nurbs % rotate_Xc ( alpha = 4 5.0_rk , beta = 0.0_rk , theta = 9 0.0_rk ) !> Rotate the generated curve call nurbs % rotate_Xg ( alpha =- 4 5.0_rk , beta = 0.0_rk , theta =- 9 0.0_rk ) !> Translate the control points call nurbs % translate_Xc ([ 1.0_rk , 2.0_rk , - 3.0_rk ]) !> Translate the generated curve call nurbs % translate_Xg ([ - 1.0_rk , - 2.0_rk , 3.0_rk ]) !> Export the transformed control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_surface_Xc3.vtk' ) !> Export the transformed generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_surface_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_surface_Xc3.vtk' , 'vtk/nurbs_surface_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS surface object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( num_rows , num_cols , peak_height ) result ( control_points ) integer , intent ( in ) :: num_rows , num_cols real ( rk ), intent ( in ) :: peak_height real ( rk ), allocatable :: control_points (:,:) integer :: i , j real ( rk ) :: x_spacing , y_spacing , x_offset , y_offset x_spacing = 1.0_rk / real ( num_cols - 1 , rk ) y_spacing = 1.0_rk / real ( num_rows - 1 , rk ) x_offset = - 0.5_rk y_offset = - 0.5_rk allocate ( control_points ( num_rows * num_cols , 3 )) do i = 1 , num_rows do j = 1 , num_cols control_points (( i - 1 ) * num_cols + j , 1 ) = x_offset + real ( j - 1 , rk ) * x_spacing control_points (( i - 1 ) * num_cols + j , 2 ) = y_offset + real ( i - 1 , rk ) * y_spacing control_points (( i - 1 ) * num_cols + j , 3 ) = & peak_height * exp ( - (( control_points (( i - 1 ) * num_cols + j , 1 ) ** 2 ) & + ( control_points (( i - 1 ) * num_cols + j , 2 ) ** 2 ))) + 0.5_rk * peak_height * 0.2_rk end do end do end function !----------------------------------------------------------------------------- end program example3_surface","tags":"","loc":"sourcefile/example_surface_1.f90.html"},{"title":"cmp_length.f90 – ForCAD","text":"This file depends on sourcefile~~cmp_length.f90~~EfferentGraph sourcefile~cmp_length.f90 cmp_length.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~cmp_length.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program compute_length use forcad implicit none type ( nurbs_curve ) :: shape real ( rk ) :: length real ( rk ) :: Xc ( 2 , 3 ) Xc ( 1 ,:) = [ 0.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 2.0_rk , 0.0_rk , 0.0_rk ] call shape % set (& knot = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& Xc = Xc ) call shape % cmp_length ( length ) print * , length end program","tags":"","loc":"sourcefile/cmp_length.f90.html"},{"title":"demo_curve.f90 – ForCAD","text":"This file depends on sourcefile~~demo_curve.f90~~EfferentGraph sourcefile~demo_curve.f90 demo_curve.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~demo_curve.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> This program demonstrates the usage of a NURBS curve object to create, and finalize a NURBS curve. !> It sets up control points and weights, generates the curve, and exports the control points !> and the curve to VTK files at various stages. program example_nurbs_curve use forcad , only : rk , nurbs_curve implicit none type ( nurbs_curve ) :: nurbs !! Declare a NURBS curve object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights !----------------------------------------------------------------------------- ! Setting up the NURBS curve !----------------------------------------------------------------------------- !> Define control points for the NURBS curve Xc = generate_Xc ( 5 , 1.0_rk , 2.0_rk , 20 ) !> Define weights for the control points allocate ( Wc ( size ( Xc , 1 )), source = 1.0_rk ) !> Set control points and weights for the NURBS curve object call nurbs % set ( Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export initial control points to a VTK file call nurbs % export_Xc ( 'vtk/demo_curve_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS curve !----------------------------------------------------------------------------- !> Generate the NURBS curve with a resolution of 500 call nurbs % create ( res = 500 ) !> Export the generated curve to a VTK file call nurbs % export_Xg ( 'vtk/demo_curve_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/demo_curve_Xc.vtk' , 'vtk/demo_curve_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( num_coils , radius , height , num_points_per_coil ) result ( control_points ) integer , intent ( in ) :: num_coils , num_points_per_coil real ( rk ), intent ( in ) :: radius , height real ( rk ), allocatable :: control_points (:,:) integer :: coil , i real ( rk ) :: theta , coil_height allocate ( control_points ( num_coils * num_points_per_coil , 3 )) do coil = 1 , num_coils coil_height = height * real ( coil - 1 , rk ) / real ( num_coils - 1 , rk ) theta = 0.0_rk do i = 1 , num_points_per_coil theta = theta + 2.0_rk * acos ( - 1.0_rk ) / real ( num_points_per_coil , rk ) control_points (( coil - 1 ) * num_points_per_coil + i , 1 ) = radius * cos ( theta ) control_points (( coil - 1 ) * num_points_per_coil + i , 2 ) = radius * sin ( theta ) control_points (( coil - 1 ) * num_points_per_coil + i , 3 ) = coil_height end do end do end function !----------------------------------------------------------------------------- end program example_nurbs_curve","tags":"","loc":"sourcefile/demo_curve.f90.html"},{"title":"shape_circle.f90 – ForCAD","text":"This file depends on sourcefile~~shape_circle.f90~~EfferentGraph sourcefile~shape_circle.f90 shape_circle.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_circle.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_circle use forcad , only : rk , nurbs_curve implicit none type ( nurbs_curve ) :: shape !----------------------------------------------------------------------------- ! Setting up NURBS circle !----------------------------------------------------------------------------- !> Set a circle with radius 2.0 and center at [0.0, 0.0, 0.0] call shape % set_circle ( center = [ 0.0_rk , 0.0_rk , 0.0_rk ], radius = 2.0_rk ) !> Export control points to a VTK file call shape % export_Xc ( 'vtk/shape_circle_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating circle !----------------------------------------------------------------------------- !> Generate the NURBS circle with a resolution of 100 call shape % create ( res = 100 ) !> Export the generated cirlce to a VTK file call shape % export_Xg ( 'vtk/shape_circle_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_circle_Xc.vtk' , 'vtk/shape_circle_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call shape % finalize () end program","tags":"","loc":"sourcefile/shape_circle.f90.html"},{"title":"forcad_nurbs_surface.f90 – ForCAD","text":"This file depends on sourcefile~~forcad_nurbs_surface.f90~~EfferentGraph sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Files dependent on this one sourcefile~~forcad_nurbs_surface.f90~~AfferentGraph sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~cmp_area.f90 cmp_area.f90 sourcefile~cmp_area.f90->sourcefile~forcad.f90 sourcefile~cmp_length.f90 cmp_length.f90 sourcefile~cmp_length.f90->sourcefile~forcad.f90 sourcefile~cmp_volume.f90 cmp_volume.f90 sourcefile~cmp_volume.f90->sourcefile~forcad.f90 sourcefile~demo_curve.f90 demo_curve.f90 sourcefile~demo_curve.f90->sourcefile~forcad.f90 sourcefile~demo_surface.f90 demo_surface.f90 sourcefile~demo_surface.f90->sourcefile~forcad.f90 sourcefile~demo_volume.f90 demo_volume.f90 sourcefile~demo_volume.f90->sourcefile~forcad.f90 sourcefile~example_curve_1.f90 example_curve_1.f90 sourcefile~example_curve_1.f90->sourcefile~forcad.f90 sourcefile~example_ppm1.f90 example_ppm1.f90 sourcefile~example_ppm1.f90->sourcefile~forcad.f90 sourcefile~example_ppm2.f90 example_ppm2.f90 sourcefile~example_ppm2.f90->sourcefile~forcad.f90 sourcefile~example_ppm3.f90 example_ppm3.f90 sourcefile~example_ppm3.f90->sourcefile~forcad.f90 sourcefile~example_surface_1.f90 example_surface_1.f90 sourcefile~example_surface_1.f90->sourcefile~forcad.f90 sourcefile~example_volume_1.f90 example_volume_1.f90 sourcefile~example_volume_1.f90->sourcefile~forcad.f90 sourcefile~nearest_point_1d.f90 nearest_point_1d.f90 sourcefile~nearest_point_1d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d.f90 nearest_point_2d.f90 sourcefile~nearest_point_2d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d_bench.f90 nearest_point_2d_bench.f90 sourcefile~nearest_point_2d_bench.f90->sourcefile~forcad.f90 sourcefile~nearest_point_3d.f90 nearest_point_3d.f90 sourcefile~nearest_point_3d.f90->sourcefile~forcad.f90 sourcefile~put_to_nurbs.f90 put_to_nurbs.f90 sourcefile~put_to_nurbs.f90->sourcefile~forcad.f90 sourcefile~shape_c_1d.f90 shape_C_1d.f90 sourcefile~shape_c_1d.f90->sourcefile~forcad.f90 sourcefile~shape_c_2d.f90 shape_C_2d.f90 sourcefile~shape_c_2d.f90->sourcefile~forcad.f90 sourcefile~shape_c_3d.f90 shape_C_3d.f90 sourcefile~shape_c_3d.f90->sourcefile~forcad.f90 sourcefile~shape_circle.f90 shape_circle.f90 sourcefile~shape_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_circle.f90 shape_half_circle.f90 sourcefile~shape_half_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_2d.f90 shape_half_ring_2d.f90 sourcefile~shape_half_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_3d.f90 shape_half_ring_3d.f90 sourcefile~shape_half_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_hexahedron.f90 shape_hexahedron.f90 sourcefile~shape_hexahedron.f90->sourcefile~forcad.f90 sourcefile~shape_ring_2d.f90 shape_ring_2d.f90 sourcefile~shape_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_ring_3d.f90 shape_ring_3d.f90 sourcefile~shape_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_tetragon.f90 shape_tetragon.f90 sourcefile~shape_tetragon.f90->sourcefile~forcad.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> This module defines the 'nurbs_surface' type for representing a Non-Uniform Rational B-Spline (NURBS) surface. module forcad_nurbs_surface use forcad_utils , only : rk , basis_bspline , elemConn_C0 , kron , ndgrid , compute_multiplicity , compute_knot_vector , & basis_bspline_der , insert_knot_A_5_1 , findspan , elevate_degree_A_5_9 , remove_knots_A_5_8 , tetragon_Xc , & elemConn_Cn , unique , rotation , det , inv , gauss_leg implicit none private public nurbs_surface !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause type nurbs_surface real ( rk ), allocatable , private :: Xc (:,:) !! Control points (2D array: [nc(1)*nc(2), dim]) real ( rk ), allocatable , private :: Xg (:,:) !! Geometry points (2D array: [ng(1)*ng(2), dim]) real ( rk ), allocatable , private :: Wc (:) !! Weights for control points (1D array: [nc(1)*nc(2)]) real ( rk ), allocatable , private :: Xt1 (:) !! Evaluation parameter values in the first direction (1D array: [ng(1)]) real ( rk ), allocatable , private :: Xt2 (:) !! Evaluation parameter values in the second direction (1D array: [ng(2)]) real ( rk ), allocatable , private :: Xt (:,:) !! Evaluation parameter values (2D array: [ng(1)*ng(2), 2]) real ( rk ), allocatable , private :: knot1 (:) !! Knot vector in the first direction (1D array) real ( rk ), allocatable , private :: knot2 (:) !! Knot vector in the second direction (1D array) integer , private :: degree ( 2 ) !! Degree (order) of the surface integer , private :: nc ( 2 ) !! Number of control points in each direction integer , private :: ng ( 2 ) !! Number of geometry points in each direction integer , allocatable , private :: elemConn_Xc_vis (:,:) !! Connectivity for visualization of control points integer , allocatable , private :: elemConn_Xg_vis (:,:) !! Connectivity for visualization of geometry points integer , allocatable , private :: elemConn (:,:) !! IGA element connectivity contains procedure :: set1 !!> Set knot vectors, control points and weights for the NURBS surface object procedure :: set2 !!> Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights procedure :: set3 !!> Set Bezier or Rational Bezier surface using control points and weights procedure :: set4 !!> Set NURBS surface using degree, number of control points, control points and weights generic :: set => set1 , set2 , set3 , set4 !!> Set NURBS surface procedure :: create !!> Generate geometry points procedure :: cmp_Xg !!> Compute geometry points procedure , private :: get_Xc_all !!> Get all control points procedure , private :: get_Xci !!> Get i-th control point procedure , private :: get_Xcid !!> Get i-th control point in a specific direction generic :: get_Xc => get_Xc_all , get_Xci , get_Xcid !!> Get control points procedure , private :: get_Xg_all !!> Get all geometry points procedure , private :: get_Xgi !!> Get i-th geometry point procedure , private :: get_Xgid !!> Get i-th geometry point in a specific direction generic :: get_Xg => get_Xg_all , get_Xgi , get_Xgid !!> Get geometry points procedure , private :: get_Wc_all !!> Get all weights procedure , private :: get_Wci !!> Get i-th weight generic :: get_Wc => get_Wc_all , get_Wci !!> Get weights procedure :: get_Xt !!> Get parameter values procedure , private :: get_knot_all !!> Get all knot vectors procedure , private :: get_knoti !!> Get i-th knot value generic :: get_knot => get_knoti , get_knot_all !!> Get knot vector procedure :: get_ng !!> Get number of geometry points procedure , private :: get_nc_dir !!> Get number of control points in a specific direction procedure , private :: get_nc_all !!> Get number of control points in all directions generic :: get_nc => get_nc_all , get_nc_dir !!> Get number of control points procedure :: cmp_degree !!> Compute degree of the NURBS surface procedure , private :: get_degree_all !!> Get degree of the NURBS surface in both directions procedure , private :: get_degree_dir !!> Get degree of the NURBS surface in a specific direction generic :: get_degree => get_degree_all , get_degree_dir !!> Get degree of the NURBS surface procedure :: finalize !!> Finalize the NURBS surface object procedure :: cmp_elem_Xc_vis !!> Generate connectivity for control points procedure :: cmp_elem_Xg_vis !!> Generate connectivity for geometry points procedure :: cmp_elem !!> Generate IGA element connectivity procedure :: get_elem_Xc_vis !!> Get connectivity for control points procedure :: get_elem_Xg_vis !!> Get connectivity for geometry points procedure :: get_elem !!> Get IGA element connectivity procedure :: set_elem_Xc_vis !!> Set connectivity for control points procedure :: set_elem_Xg_vis !!> Set connectivity for geometry points procedure :: set_elem !!> Set IGA element connectivity procedure :: export_Xc !!> Export control points to VTK file procedure :: export_Xg !!> Export geometry points to VTK file procedure :: modify_Xc !!> Modify control points procedure :: modify_Wc !!> Modify weights procedure :: get_multiplicity !!> Compute and return the multiplicity of the knot vector procedure :: get_continuity !!> Compute and return the continuity of the NURBS surface procedure :: cmp_nc !!> Compute number of required control points procedure , private :: basis_vector !!> Compute the basis functions of the NURBS surface procedure , private :: basis_scalar !!> Compute the basis functions of the NURBS surface generic :: basis => basis_vector , basis_scalar !!> Compute the basis functions of the NURBS surface procedure , private :: derivative_vector !!> Compute the derivative of the NURBS surface procedure , private :: derivative_scalar !!> Compute the derivative of the NURBS surface generic :: derivative => derivative_vector , derivative_scalar !!> Compute the derivative of the NURBS surface procedure , private :: derivative2_vector !!> Compute the second derivative of the NURBS surface procedure , private :: derivative2_scalar !!> Compute the second derivative of the NURBS surface generic :: derivative2 => derivative2_vector , derivative2_scalar !!> Compute the second derivative of the NURBS surface procedure :: insert_knots !!> Insert knots into the knot vector procedure :: elevate_degree !!> Elevate degree procedure :: is_rational !!> Check if the NURBS surface is rational procedure :: remove_knots !!> Remove knots from the knot vector procedure :: rotate_Xc !!> Rotate control points procedure :: rotate_Xg !!> Rotate geometry points procedure :: translate_Xc !!> Translate control points procedure :: translate_Xg !!> Translate geometry points procedure :: show !!> Show the NURBS object using PyVista procedure :: nearest_point !!> Find the nearest point on the NURBS surface (Approximation) procedure :: nearest_point2 !!> Find the nearest point on the NURBS surface (Minimization - Newton's method) procedure :: ansatz !!> Compute the shape functions, derivative of shape functions and dA procedure :: cmp_area !!> Compute the area of the NURBS surface ! Shapes procedure :: set_tetragon !!> Set a tetragon procedure :: set_ring !!> Set a ring procedure :: set_half_ring !!> Set a half ring procedure :: set_C !!> Set a C-shape end type !=============================================================================== interface compute_Xg pure function compute_Xg_nurbs_2d ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_ng , f_Xc , f_Wc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Xg (:,:) end function pure function compute_Xg_bspline_2d ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_ng , f_Xc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:) real ( rk ), intent ( in ), contiguous :: f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), allocatable :: f_Xg (:,:) end function pure function compute_Xg_nurbs_2d_1point ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_Xc , f_Wc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Xg (:) end function pure function compute_Xg_bspline_2d_1point ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_Xc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:) real ( rk ), intent ( in ), contiguous :: f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), allocatable :: f_Xg (:) end function end interface interface compute_dTgc pure subroutine compute_dTgc_nurbs_2d_vector ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_ng , f_Wc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_dTgc_bspline_2d_vector ( f_Xt , f_knot1 , f_knot2 , f_degree , nc , f_ng , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_dTgc_nurbs_2d_scalar ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_Wc , f_dTgc , f_Tgc , elem ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) integer , intent ( in ) :: elem (:) end subroutine pure subroutine compute_dTgc_bspline_2d_scalar ( f_Xt , f_knot1 , f_knot2 , f_degree , nc , f_dTgc , f_Tgc , elem ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) integer , intent ( in ) :: elem (:) end subroutine end interface interface compute_d2Tgc pure subroutine compute_d2Tgc_nurbs_2d_vector ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_ng , f_Wc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_d2Tgc_bspline_2d_vector ( f_Xt , f_knot1 , f_knot2 , f_degree , nc , f_ng , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_d2Tgc_nurbs_2d_scalar ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_Wc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) end subroutine pure subroutine compute_d2Tgc_bspline_2d_scalar ( f_Xt , f_knot1 , f_knot2 , f_degree , nc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) end subroutine end interface interface compute_Tgc pure function compute_Tgc_nurbs_2d_vector ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_ng , f_Wc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Tgc (:,:) end function pure function compute_Tgc_bspline_2d_vector ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_ng ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), allocatable :: f_Tgc (:,:) end function pure function compute_Tgc_nurbs_2d_scalar ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_Wc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Tgc (:) end function pure function compute_Tgc_bspline_2d_scalar ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) real ( rk ), allocatable :: f_Tgc (:) end function end interface interface pure function nearest_point_help_2d ( f_ng , f_Xg , f_point_Xg ) result ( f_distances ) import :: rk integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Xg (:,:) real ( rk ), intent ( in ), contiguous :: f_point_Xg (:) real ( rk ), allocatable :: f_distances (:) end function end interface contains !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set knot vectors, control points and weights for the NURBS surface object. pure subroutine set1 ( this , knot1 , knot2 , Xc , Wc ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: knot1 (:) real ( rk ), intent ( in ), contiguous :: knot2 (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( allocated ( this % knot1 )) deallocate ( this % knot1 ) if ( allocated ( this % knot2 )) deallocate ( this % knot2 ) if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % knot1 = knot1 this % knot2 = knot2 call this % cmp_degree () call this % cmp_nc () this % Xc = Xc if ( present ( Wc )) then if ( size ( Wc ) /= this % nc ( 1 ) * this % nc ( 2 )) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights pure subroutine set2 ( this , Xth_dir1 , Xth_dir2 , degree , continuity1 , continuity2 , Xc , Wc ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xth_dir1 (:), Xth_dir2 (:) integer , intent ( in ), contiguous :: degree (:) integer , intent ( in ), contiguous :: continuity1 (:), continuity2 (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) this % knot1 = compute_knot_vector ( Xth_dir1 , degree ( 1 ), continuity1 ) this % knot2 = compute_knot_vector ( Xth_dir2 , degree ( 2 ), continuity2 ) this % degree ( 1 ) = degree ( 1 ) this % degree ( 2 ) = degree ( 2 ) call this % cmp_nc () this % Xc = Xc if ( present ( Wc )) this % Wc = Wc end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set Bezier or Rational Bezier surface using control points and weights. pure subroutine set3 ( this , nc , Xc , Wc ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), contiguous :: nc (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % Xc = Xc this % nc = nc if ( allocated ( this % knot1 )) deallocate ( this % knot1 ) allocate ( this % knot1 ( 2 * this % nc ( 1 ))) this % knot1 ( 1 : this % nc ( 1 )) = 0.0_rk this % knot1 ( this % nc ( 1 ) + 1 : 2 * this % nc ( 1 )) = 1.0_rk if ( allocated ( this % knot2 )) deallocate ( this % knot2 ) allocate ( this % knot2 ( 2 * this % nc ( 2 ))) this % knot2 ( 1 : this % nc ( 2 )) = 0.0_rk this % knot2 ( this % nc ( 2 ) + 1 : 2 * this % nc ( 2 )) = 1.0_rk call this % cmp_degree () if ( present ( Wc )) then if ( size ( Wc ) /= this % nc ( 1 ) * this % nc ( 2 )) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set4 ( this , degree , nc , Xc , Wc ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), contiguous :: degree (:) integer , intent ( in ), contiguous :: nc (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) integer :: m ( 2 ), i if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % Xc = Xc this % nc = nc this % degree = degree ! Size of knot vectors m = nc + degree + 1 if ( allocated ( this % knot1 )) deallocate ( this % knot1 ) allocate ( this % knot1 ( m ( 1 ))) this % knot1 ( 1 : degree ( 1 ) + 1 ) = 0.0_rk this % knot1 ( degree ( 1 ) + 2 : m ( 1 ) - degree ( 1 ) - 1 ) = [( real ( i , rk ) / ( m ( 1 ) - 2 * degree ( 1 ) - 1 ), i = 1 , m ( 1 ) - 2 * degree ( 1 ) - 2 )] this % knot1 ( m ( 1 ) - degree ( 1 ): m ( 1 )) = 1.0_rk if ( allocated ( this % knot2 )) deallocate ( this % knot2 ) allocate ( this % knot2 ( m ( 2 ))) this % knot2 ( 1 : degree ( 2 ) + 1 ) = 0.0_rk this % knot2 ( degree ( 2 ) + 2 : m ( 2 ) - degree ( 2 ) - 1 ) = [( real ( i , rk ) / ( m ( 2 ) - 2 * degree ( 2 ) - 1 ), i = 1 , m ( 2 ) - 2 * degree ( 2 ) - 2 )] this % knot2 ( m ( 2 ) - degree ( 2 ): m ( 2 )) = 1.0_rk if ( present ( Wc )) then if ( size ( Wc ) /= nc ( 1 ) * nc ( 2 )) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine create ( this , res1 , res2 , Xt1 , Xt2 , Xt ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), optional :: res1 , res2 real ( rk ), intent ( in ), contiguous , optional :: Xt1 (:), Xt2 (:) real ( rk ), contiguous , intent ( in ), optional :: Xt (:,:) integer :: i ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % knot1 ) . or . . not . allocated ( this % knot2 )) then error stop 'Knot vector(s) is/are not set.' end if ! Set parameter values if ( present ( Xt1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) this % Xt1 = Xt1 elseif ( present ( res1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) allocate ( this % Xt1 ( res1 )) this % Xt1 = [( real ( i - 1 , rk ) / real ( res1 - 1 , rk ), i = 1 , res1 )] ! else ! this%Xt1 = this%Xt1 end if ! Set parameter values if ( present ( Xt2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) this % Xt2 = Xt2 elseif ( present ( res2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) allocate ( this % Xt2 ( res2 )) this % Xt2 = [( real ( i - 1 , rk ) / real ( res2 - 1 , rk ), i = 1 , res2 )] ! else ! this%Xt2 = this%Xt2 end if if ( present ( Xt )) then this % Xt = Xt else ! Set number of geometry points this % ng ( 1 ) = size ( this % Xt1 , 1 ) this % ng ( 2 ) = size ( this % Xt2 , 1 ) call ndgrid ( this % Xt1 , this % Xt2 , this % Xt ) end if if ( allocated ( this % Xg )) deallocate ( this % Xg ) if ( this % is_rational ()) then ! NURBS this % Xg = compute_Xg (& this % Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % ng , this % Xc , this % Wc ) else ! B-Spline this % Xg = compute_Xg (& this % Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % ng , this % Xc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_Xg ( this , Xt ) result ( Xg ) class ( nurbs_surface ), intent ( in ) :: this real ( rk ), contiguous , intent ( in ) :: Xt (:) real ( rk ), allocatable :: Xg (:) ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % knot1 ) . or . . not . allocated ( this % knot2 )) then error stop 'Knot vector(s) is/are not set.' end if if ( this % is_rational ()) then ! NURBS Xg = compute_Xg ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % Xc , this % Wc ) else ! B-Spline Xg = compute_Xg ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % Xc ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xc_all ( this ) result ( Xc ) class ( nurbs_surface ), intent ( in ) :: this real ( rk ), allocatable :: Xc (:,:) if ( allocated ( this % Xc )) then Xc = this % Xc else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xci ( this , n ) result ( Xc ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ), allocatable :: Xc (:) if ( allocated ( this % Xc )) then if ( n < lbound ( this % Xc , 1 ) . or . n > ubound ( this % Xc , 1 )) then error stop 'Invalid index for control points.' end if Xc = this % Xc ( n ,:) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xcid ( this , n , dir ) result ( Xc ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: n integer , intent ( in ) :: dir real ( rk ) :: Xc if ( allocated ( this % Xc )) then if ( n < lbound ( this % Xc , 1 ) . or . n > ubound ( this % Xc , 1 )) then error stop 'Invalid index for control points.' end if if ( dir < lbound ( this % Xc , 2 ) . or . dir > ubound ( this % Xc , 2 )) then error stop 'Invalid direction for control points.' end if Xc = this % Xc ( n , dir ) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xg_all ( this ) result ( Xg ) class ( nurbs_surface ), intent ( in ) :: this real ( rk ), allocatable :: Xg (:,:) if ( allocated ( this % Xg )) then Xg = this % Xg else error stop 'Geometry points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xgi ( this , n ) result ( Xg ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ), allocatable :: Xg (:) if ( allocated ( this % Xg )) then if ( n < lbound ( this % Xg , 1 ) . or . n > ubound ( this % Xg , 1 )) then error stop 'Invalid index for geometry points.' end if Xg = this % Xg ( n ,:) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xgid ( this , n , dir ) result ( Xg ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: n integer , intent ( in ) :: dir real ( rk ) :: Xg if ( allocated ( this % Xg )) then if ( n < lbound ( this % Xg , 1 ) . or . n > ubound ( this % Xg , 1 )) then error stop 'Invalid index for geometry points.' end if if ( dir < lbound ( this % Xg , 2 ) . or . dir > ubound ( this % Xg , 2 )) then error stop 'Invalid direction for geometry points.' end if Xg = this % Xg ( n , dir ) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Wc_all ( this ) result ( Wc ) class ( nurbs_surface ), intent ( in ) :: this real ( rk ), allocatable :: Wc (:) if ( allocated ( this % Wc )) then Wc = this % Wc else error stop 'The NURBS surface is not rational or weights are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Wci ( this , n ) result ( Wc ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ) :: Wc if ( allocated ( this % Wc )) then if ( n < lbound ( this % Wc , 1 ) . or . n > ubound ( this % Wc , 1 )) then error stop 'Invalid index for weights.' end if Wc = this % Wc ( n ) else error stop 'The NURBS surface is not rational or weights are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xt ( this , dir ) result ( Xt ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: dir real ( rk ), allocatable :: Xt (:) if ( dir == 1 ) then if ( allocated ( this % Xt1 )) then Xt = this % Xt1 else error stop 'Parameter values are not set.' end if elseif ( dir == 2 ) then if ( allocated ( this % Xt2 )) then Xt = this % Xt2 else error stop 'Parameter values are not set.' end if else error stop 'Invalid direction for parameter values.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_ng ( this ) result ( ng ) class ( nurbs_surface ), intent ( in ) :: this integer :: ng ( 2 ) ng = this % ng end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_degree ( this , dir ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), optional :: dir integer , allocatable :: m1 (:), m2 (:) if ( present ( dir )) then if ( dir == 1 ) then m1 = this % get_multiplicity ( 1 ) this % degree ( 1 ) = m1 ( 1 ) - 1 else if ( dir == 2 ) then m2 = this % get_multiplicity ( 2 ) this % degree ( 2 ) = m2 ( 1 ) - 1 else error stop 'Invalid direction for degree.' end if else m1 = this % get_multiplicity ( 1 ) this % degree ( 1 ) = m1 ( 1 ) - 1 m2 = this % get_multiplicity ( 2 ) this % degree ( 2 ) = m2 ( 1 ) - 1 end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_degree_all ( this ) result ( degree ) class ( nurbs_surface ), intent ( in ) :: this integer :: degree ( 2 ) degree = this % degree end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_degree_dir ( this , dir ) result ( degree ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: dir integer :: degree if ( dir == 1 ) then degree = this % degree ( 1 ) else if ( dir == 2 ) then degree = this % degree ( 2 ) else error stop 'Invalid direction for degree.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_knot_all ( this , dir ) result ( knot ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: dir real ( rk ), allocatable :: knot (:) if ( dir == 1 ) then if ( allocated ( this % knot1 )) then knot = this % knot1 else error stop 'Knot vector is not set.' end if elseif ( dir == 2 ) then if ( allocated ( this % knot2 )) then knot = this % knot2 else error stop 'Knot vector is not set.' end if else error stop 'Invalid direction for knot vector.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_knoti ( this , dir , i ) result ( knot ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: dir integer , intent ( in ) :: i real ( rk ) :: knot if ( dir == 1 ) then if ( allocated ( this % knot1 )) then if ( i < 1 . or . i > size ( this % knot1 )) then error stop 'Invalid index for knot vector.' else knot = this % knot1 ( i ) end if else error stop 'Knot vector is not set.' end if elseif ( dir == 2 ) then if ( allocated ( this % knot2 )) then if ( i < 1 . or . i > size ( this % knot2 )) then error stop 'Invalid index for knot vector.' else knot = this % knot2 ( i ) end if else error stop 'Knot vector is not set.' end if else error stop 'Invalid direction for knot vector.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine finalize ( this ) class ( nurbs_surface ), intent ( inout ) :: this if ( allocated ( this % Xc )) deallocate ( this % Xc ) if ( allocated ( this % Xg )) deallocate ( this % Xg ) if ( allocated ( this % Wc )) deallocate ( this % Wc ) if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) if ( allocated ( this % Xt )) deallocate ( this % Xt ) if ( allocated ( this % knot1 )) deallocate ( this % knot1 ) if ( allocated ( this % knot2 )) deallocate ( this % knot2 ) if ( allocated ( this % elemConn_Xc_vis )) deallocate ( this % elemConn_Xc_vis ) if ( allocated ( this % elemConn_Xg_vis )) deallocate ( this % elemConn_Xg_vis ) if ( allocated ( this % elemConn )) deallocate ( this % elemConn ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem_Xc_vis ( this , p ) result ( elemConn ) class ( nurbs_surface ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) integer , intent ( in ), contiguous , optional :: p (:) if ( present ( p )) then elemConn = elemConn_C0 ( this % nc ( 1 ), this % nc ( 2 ), p ( 1 ), p ( 2 )) else elemConn = elemConn_C0 ( this % nc ( 1 ), this % nc ( 2 ), 1 , 1 ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem_Xg_vis ( this , p ) result ( elemConn ) class ( nurbs_surface ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) integer , intent ( in ), contiguous , optional :: p (:) if ( present ( p )) then elemConn = elemConn_C0 ( this % ng ( 1 ), this % ng ( 2 ), p ( 1 ), p ( 2 )) else elemConn = elemConn_C0 ( this % ng ( 1 ), this % ng ( 2 ), 1 , 1 ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine export_Xc ( this , filename ) class ( nurbs_surface ), intent ( in ) :: this character ( len =* ), intent ( in ) :: filename integer :: i , nc , nunit integer , allocatable :: elemConn (:,:) ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % elemConn_Xc_vis )) then elemConn = this % cmp_elem_Xc_vis () else elemConn = this % elemConn_Xc_vis end if nc = size ( this % Xc , 1 ) open ( newunit = nunit , file = filename , action = 'write' ) write ( nunit , '(a)' ) '# vtk DataFile Version 2.0' write ( nunit , '(a)' ) 'Generated by ForCAD' write ( nunit , '(a)' ) 'ASCII' write ( nunit , '(a)' ) 'DATASET UNSTRUCTURED_GRID' write ( nunit , '(a,\" \",g0,\" \",a)' ) 'POINTS' , nc , 'double' if ( size ( this % Xc , 2 ) == 2 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xc ( i , 1 ), this % Xc ( i , 2 ), 0.0_rk , i = 1 , nc ) elseif ( size ( this % Xc , 2 ) == 3 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xc ( i , 1 ), this % Xc ( i , 2 ), this % Xc ( i , 3 ) , i = 1 , nc ) else error stop 'Invalid dimension for control points.' end if write ( nunit , '(a,\" \",g0,\" \",g0)' ) 'CELLS' , size ( elemConn , 1 ), size ( elemConn , 1 ) * ( size ( elemConn , 2 ) + 1 ) write ( nunit , '(g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0)' )& ( 4 , elemConn ( i , 1 ) - 1 , elemConn ( i , 2 ) - 1 , elemConn ( i , 4 ) - 1 , elemConn ( i , 3 ) - 1 , i = 1 , size ( elemConn , 1 )) write ( nunit , '(a,\" \",g0)' ) 'CELL_TYPES' , size ( elemConn , 1 ) write ( nunit , '(g0)' ) ( 9 , i = 1 , size ( elemConn , 1 )) close ( nunit ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine export_Xg ( this , filename ) class ( nurbs_surface ), intent ( in ) :: this character ( len =* ), intent ( in ) :: filename integer :: i , ng , nunit integer , allocatable :: elemConn (:,:) ! check if (. not . allocated ( this % Xg )) then error stop 'Geometry points are not set.' end if if (. not . allocated ( this % elemConn_Xg_vis )) then elemConn = this % cmp_elem_Xg_vis () else elemConn = this % elemConn_Xg_vis end if ng = size ( this % Xg , 1 ) open ( newunit = nunit , file = filename , action = 'write' ) write ( nunit , '(a)' ) '# vtk DataFile Version 2.0' write ( nunit , '(a)' ) 'Generated by ForCAD' write ( nunit , '(a)' ) 'ASCII' write ( nunit , '(a)' ) 'DATASET UNSTRUCTURED_GRID' write ( nunit , '(a,\" \",g0,\" \",a)' ) 'POINTS' , ng , 'double' if ( size ( this % Xg , 2 ) == 2 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xg ( i , 1 ), this % Xg ( i , 2 ), 0.0_rk , i = 1 , ng ) elseif ( size ( this % Xg , 2 ) == 3 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xg ( i , 1 ), this % Xg ( i , 2 ), this % Xg ( i , 3 ) , i = 1 , ng ) else error stop 'Invalid dimension for geometry points.' end if write ( nunit , '(a,\" \",g0,\" \",g0)' ) 'CELLS' , size ( elemConn , 1 ), size ( elemConn , 1 ) * ( size ( elemConn , 2 ) + 1 ) write ( nunit , '(g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0)' )& ( 4 , elemConn ( i , 1 ) - 1 , elemConn ( i , 2 ) - 1 , elemConn ( i , 4 ) - 1 , elemConn ( i , 3 ) - 1 , i = 1 , size ( elemConn , 1 )) write ( nunit , '(a,\" \",g0)' ) 'CELL_TYPES' , size ( elemConn , 1 ) write ( nunit , '(g0)' ) ( 9 , i = 1 , size ( elemConn , 1 )) close ( nunit ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine modify_Xc ( this , X , num , dir ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: X integer , intent ( in ) :: num integer , intent ( in ) :: dir if ( allocated ( this % Xc )) then this % Xc ( num , dir ) = X if ( allocated ( this % Wc )) then call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), Xc = this % get_Xc (), Wc = this % get_Wc ()) else call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), Xc = this % get_Xc ()) end if else error stop 'Control points are not set.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine modify_Wc ( this , W , num ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: W integer , intent ( in ) :: num if ( allocated ( this % Wc )) then this % Wc ( num ) = W if ( allocated ( this % knot1 ) . and . allocated ( this % knot2 )) then call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), Xc = this % get_Xc (), Wc = this % get_Wc ()) else call this % set ( nc = this % nc , Xc = this % get_Xc (), Wc = this % get_Wc ()) end if else error stop 'The NURBS surface is not rational.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_multiplicity ( this , dir ) result ( m ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: dir integer , allocatable :: m (:) if ( dir == 1 ) then ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else m = compute_multiplicity ( this % knot1 ) end if elseif ( dir == 2 ) then ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else m = compute_multiplicity ( this % knot2 ) end if else error stop 'Invalid direction.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_continuity ( this , dir ) result ( c ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: dir integer , allocatable :: c (:) if ( dir == 1 ) then ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else c = this % degree ( 1 ) - compute_multiplicity ( this % knot1 ) end if elseif ( dir == 2 ) then ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else c = this % degree ( 2 ) - compute_multiplicity ( this % knot2 ) end if else error stop 'Invalid direction.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_nc ( this , dir ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), optional :: dir if ( present ( dir )) then if ( dir == 1 ) then ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else this % nc ( 1 ) = sum ( compute_multiplicity ( this % knot1 )) - this % degree ( 1 ) - 1 end if elseif ( dir == 2 ) then ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else this % nc ( 2 ) = sum ( compute_multiplicity ( this % knot2 )) - this % degree ( 2 ) - 1 end if else error stop 'Invalid direction.' end if else ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else this % nc ( 1 ) = sum ( compute_multiplicity ( this % knot1 )) - this % degree ( 1 ) - 1 end if ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else this % nc ( 2 ) = sum ( compute_multiplicity ( this % knot2 )) - this % degree ( 2 ) - 1 end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_nc_all ( this ) result ( nc ) class ( nurbs_surface ), intent ( in ) :: this integer :: nc ( 2 ) nc = this % nc end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_nc_dir ( this , dir ) result ( nc ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: dir integer :: nc if ( dir == 1 ) then ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else nc = sum ( compute_multiplicity ( this % knot1 )) - this % degree ( 1 ) - 1 end if elseif ( dir == 2 ) then ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else nc = sum ( compute_multiplicity ( this % knot2 )) - this % degree ( 2 ) - 1 end if else error stop 'Invalid direction.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative_vector ( this , res1 , res2 , Xt1 , Xt2 , dTgc , Tgc ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), optional :: res1 , res2 real ( rk ), intent ( in ), contiguous , optional :: Xt1 (:), Xt2 (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:,:) integer :: i real ( rk ), allocatable :: Xt (:,:) ! Set parameter values if ( present ( Xt1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) this % Xt1 = Xt1 elseif ( present ( res1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) allocate ( this % Xt1 ( res1 )) this % Xt1 = [( real ( i - 1 , rk ) / real ( res1 - 1 , rk ), i = 1 , res1 )] ! else ! this%Xt1 = this%Xt1 end if ! Set parameter values if ( present ( Xt2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) this % Xt2 = Xt2 elseif ( present ( res2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) allocate ( this % Xt2 ( res2 )) this % Xt2 = [( real ( i - 1 , rk ) / real ( res2 - 1 , rk ), i = 1 , res2 )] ! else ! this%Xt2 = this%Xt2 end if ! Set number of geometry points this % ng ( 1 ) = size ( this % Xt1 , 1 ) this % ng ( 2 ) = size ( this % Xt2 , 1 ) call ndgrid ( this % Xt1 , this % Xt2 , Xt ) if ( this % is_rational ()) then ! NURBS call compute_dTgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % ng , this % Wc , dTgc , Tgc ) else ! B-Spline call compute_dTgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % ng , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative_scalar ( this , Xt , dTgc , Tgc , elem ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xt (:) integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:) if ( this % is_rational ()) then ! NURBS call compute_dTgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % Wc , dTgc , Tgc , elem ) else ! B-Spline call compute_dTgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , dTgc , Tgc , elem ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative2_vector ( this , res1 , res2 , Xt1 , Xt2 , d2Tgc , dTgc , Tgc ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), optional :: res1 , res2 real ( rk ), intent ( in ), contiguous , optional :: Xt1 (:), Xt2 (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ), optional :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:,:) integer :: i real ( rk ), allocatable :: Xt (:,:) ! Set parameter values if ( present ( Xt1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) this % Xt1 = Xt1 elseif ( present ( res1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) allocate ( this % Xt1 ( res1 )) this % Xt1 = [( real ( i - 1 , rk ) / real ( res1 - 1 , rk ), i = 1 , res1 )] ! else ! this%Xt1 = this%Xt1 end if ! Set parameter values if ( present ( Xt2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) this % Xt2 = Xt2 elseif ( present ( res2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) allocate ( this % Xt2 ( res2 )) this % Xt2 = [( real ( i - 1 , rk ) / real ( res2 - 1 , rk ), i = 1 , res2 )] ! else ! this%Xt2 = this%Xt2 end if ! Set number of geometry points this % ng ( 1 ) = size ( this % Xt1 , 1 ) this % ng ( 2 ) = size ( this % Xt2 , 1 ) call ndgrid ( this % Xt1 , this % Xt2 , Xt ) if ( this % is_rational ()) then ! NURBS call compute_d2Tgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % ng , this % Wc , d2Tgc , dTgc , Tgc ) else ! B-Spline call compute_d2Tgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % ng , d2Tgc , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative2_scalar ( this , Xt , d2Tgc , dTgc , Tgc ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: dTgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:) if ( this % is_rational ()) then ! NURBS call compute_d2Tgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % Wc , d2Tgc , dTgc , Tgc ) else ! B-Spline call compute_d2Tgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , d2Tgc , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine basis_vector ( this , res1 , res2 , Xt1 , Xt2 , Tgc ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), optional :: res1 , res2 real ( rk ), intent ( in ), contiguous , optional :: Xt1 (:), Xt2 (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) integer :: i real ( rk ), allocatable :: Xt (:,:) ! Set parameter values if ( present ( Xt1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) this % Xt1 = Xt1 elseif ( present ( res1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) allocate ( this % Xt1 ( res1 )) this % Xt1 = [( real ( i - 1 , rk ) / real ( res1 - 1 , rk ), i = 1 , res1 )] ! else ! this%Xt1 = this%Xt1 end if ! Set parameter values if ( present ( Xt2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) this % Xt2 = Xt2 elseif ( present ( res2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) allocate ( this % Xt2 ( res2 )) this % Xt2 = [( real ( i - 1 , rk ) / real ( res2 - 1 , rk ), i = 1 , res2 )] ! else ! this%Xt2 = this%Xt2 end if ! Set number of geometry points this % ng ( 1 ) = size ( this % Xt1 , 1 ) this % ng ( 2 ) = size ( this % Xt2 , 1 ) call ndgrid ( this % Xt1 , this % Xt2 , Xt ) if ( this % is_rational ()) then ! NURBS Tgc = compute_Tgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % ng , this % Wc ) else ! B-Spline Tgc = compute_Tgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % ng ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine basis_scalar ( this , Xt , Tgc ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: Xt (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) if ( this % is_rational ()) then ! NURBS Tgc = compute_Tgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % Wc ) else ! B-Spline Tgc = compute_Tgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine insert_knots ( this , dir , Xth , r ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ) :: dir real ( rk ), intent ( in ), contiguous :: Xth (:) integer , intent ( in ), contiguous :: r (:) integer :: k , i , s , dim , j , n_new real ( rk ), allocatable :: Xc (:,:), Xcw (:,:), Xcw_new (:,:), Xc_new (:,:), Wc_new (:), knot_new (:) real ( rk ), allocatable :: Xc3 (:,:,:) if ( dir == 1 ) then ! direction 1 if ( this % is_rational ()) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 1 ) - 1 , this % degree ( 1 ), Xth ( i ), this % knot1 ) if ( this % knot1 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot1 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xcw = reshape ( Xcw ,[ this % nc ( 1 ), this % nc ( 2 ) * ( dim + 1 )]) call insert_knot_A_5_1 (& this % degree ( 1 ),& this % knot1 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xcw_new ) Xcw_new = reshape ( Xcw_new ,[ this % nc ( 2 ) * ( n_new + 1 ), dim + 1 ]) allocate ( Xc_new ( 1 : this % nc ( 2 ) * ( n_new + 1 ), 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 2 ) * ( n_new + 1 ))) do j = 1 , this % nc ( 2 ) * ( n_new + 1 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 1 ) - 1 , this % degree ( 1 ), Xth ( i ), this % knot1 ) if ( this % knot1 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot1 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) Xc = reshape ( this % Xc ,[ this % nc ( 1 ), this % nc ( 2 ) * dim ]) call insert_knot_A_5_1 (& this % degree ( 1 ),& this % knot1 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xc_new ) Xc_new = reshape ( Xc_new ,[( this % nc ( 2 )) * ( n_new + 1 ), dim ]) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), Xc = Xc_new ) end do end if elseif ( dir == 2 ) then ! direction 2 if ( this % is_rational ()) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 2 ) - 1 , this % degree ( 2 ), Xth ( i ), this % knot2 ) if ( this % knot2 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot2 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc3 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), dim + 1 ]) Xc3 = reshape ( Xc3 , [ this % nc ( 2 ), this % nc ( 1 ), dim + 1 ], order = [ 2 , 1 , 3 ]) Xcw = reshape ( Xc3 ,[ this % nc ( 2 ), this % nc ( 1 ) * ( dim + 1 )]) call insert_knot_A_5_1 (& this % degree ( 2 ),& this % knot2 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xcw_new ) Xc3 = reshape ( Xcw_new , [ n_new + 1 , this % nc ( 1 ), dim + 1 ]) Xc3 = reshape ( Xc3 , [ this % nc ( 1 ), n_new + 1 , dim + 1 ], order = [ 2 , 1 , 3 ]) Xcw_new = reshape ( Xc3 ,[( this % nc ( 1 )) * ( n_new + 1 ), dim + 1 ]) allocate ( Xc_new ( 1 :( n_new + 1 ) * this % nc ( 1 ), 1 : dim )) allocate ( Wc_new ( 1 :( n_new + 1 ) * this % nc ( 1 ))) do j = 1 , ( n_new + 1 ) * this % nc ( 1 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 2 ) - 1 , this % degree ( 2 ), Xth ( i ), this % knot2 ) if ( this % knot2 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot2 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) Xc3 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), dim ]) Xc3 = reshape ( Xc3 , [ this % nc ( 2 ), this % nc ( 1 ), dim ], order = [ 2 , 1 , 3 ]) Xc = reshape ( Xc3 ,[ this % nc ( 2 ), this % nc ( 1 ) * dim ]) call insert_knot_A_5_1 (& this % degree ( 2 ),& this % knot2 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xc_new ) Xc3 = reshape ( Xc_new , [ n_new + 1 , this % nc ( 1 ), dim ]) Xc3 = reshape ( Xc3 , [ this % nc ( 1 ), n_new + 1 , dim ], order = [ 2 , 1 , 3 ]) Xc_new = reshape ( Xc3 ,[( this % nc ( 1 )) * ( n_new + 1 ), dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , Xc = Xc_new ) end do end if else error stop 'Invalid direction.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine elevate_degree ( this , dir , t ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ) :: dir integer , intent ( in ) :: t real ( rk ), allocatable :: Xc (:,:), Xcw (:,:), Xcw_new (:,:), knot_new (:), Xc_new (:,:), Wc_new (:) integer :: dim , j , nc_new real ( rk ), allocatable :: Xc3 (:,:,:) if ( dir == 1 ) then ! direction 1 if ( this % is_rational ()) then ! NURBS dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xcw = reshape ( Xcw ,[ this % nc ( 1 ), this % nc ( 2 ) * ( dim + 1 )], order = [ 1 , 2 ]) call elevate_degree_A_5_9 ( t , this % knot1 , this % degree ( 1 ), Xcw , nc_new , knot_new , Xcw_new ) Xcw_new = reshape ( Xcw_new ,[ this % nc ( 2 ) * nc_new , dim + 1 ], order = [ 1 , 2 ]) allocate ( Xc_new ( 1 : this % nc ( 2 ) * nc_new , 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 2 ) * nc_new )) do j = 1 , this % nc ( 2 ) * nc_new Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) else ! B-Spline dim = size ( this % Xc , 2 ) Xc = reshape ( this % Xc ,[ this % nc ( 1 ), this % nc ( 2 ) * ( dim )], order = [ 1 , 2 ]) call elevate_degree_A_5_9 ( t , this % knot1 , this % degree ( 1 ), Xc , nc_new , knot_new , Xc_new ) Xc_new = reshape ( Xc_new ,[ this % nc ( 2 ) * nc_new , dim ], order = [ 1 , 2 ]) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), Xc = Xc_new ) deallocate ( Xc , Xc_new ) end if elseif ( dir == 2 ) then ! direction 2 if ( this % is_rational ()) then ! NURBS dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc3 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), dim + 1 ]) Xc3 = reshape ( Xc3 , [ this % nc ( 2 ), this % nc ( 1 ), dim + 1 ], order = [ 2 , 1 , 3 ]) Xcw = reshape ( Xc3 ,[ this % nc ( 2 ), this % nc ( 1 ) * ( dim + 1 )]) call elevate_degree_A_5_9 ( t , this % knot2 , this % degree ( 2 ), Xcw , nc_new , knot_new , Xcw_new ) Xc3 = reshape ( Xcw_new , [ nc_new , this % nc ( 1 ), dim + 1 ]) Xc3 = reshape ( Xc3 , [ this % nc ( 1 ), nc_new , dim + 1 ], order = [ 2 , 1 , 3 ]) Xcw_new = reshape ( Xc3 ,[( this % nc ( 1 )) * nc_new , dim + 1 ]) allocate ( Xc_new ( 1 : nc_new * this % nc ( 1 ), 1 : dim )) allocate ( Wc_new ( 1 : nc_new * this % nc ( 1 ))) do j = 1 , nc_new * this % nc ( 1 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) else ! B-Spline dim = size ( this % Xc , 2 ) Xc3 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), dim ]) Xc3 = reshape ( Xc3 , [ this % nc ( 2 ), this % nc ( 1 ), dim ], order = [ 2 , 1 , 3 ]) Xc = reshape ( Xc3 ,[ this % nc ( 2 ), this % nc ( 1 ) * dim ]) call elevate_degree_A_5_9 ( t , this % knot2 , this % degree ( 2 ), Xc , nc_new , knot_new , Xc_new ) Xc3 = reshape ( Xc_new , [ nc_new , this % nc ( 1 ), dim ]) Xc3 = reshape ( Xc3 , [ this % nc ( 1 ), nc_new , dim ], order = [ 2 , 1 , 3 ]) Xc_new = reshape ( Xc3 ,[( this % nc ( 1 )) * nc_new , dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , Xc = Xc_new ) end if else error stop 'Invalid direction.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function is_rational ( this ) result ( r ) class ( nurbs_surface ), intent ( in ) :: this logical :: r r = . false . if ( allocated ( this % Wc )) then if ( any ( this % Wc /= this % Wc ( 1 ))) then r = . true . end if end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem_Xc_vis ( this , elemConn ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn_Xc_vis )) deallocate ( this % elemConn_Xc_vis ) this % elemConn_Xc_vis = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem_Xg_vis ( this , elemConn ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn_Xg_vis )) deallocate ( this % elemConn_Xg_vis ) this % elemConn_Xg_vis = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem ( this , elemConn ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn )) deallocate ( this % elemConn ) this % elemConn = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem_Xc_vis ( this ) result ( elemConn ) class ( nurbs_surface ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn_Xc_vis end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem_Xg_vis ( this ) result ( elemConn ) class ( nurbs_surface ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn_Xg_vis end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem ( this ) result ( elemConn ) class ( nurbs_surface ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine remove_knots ( this , dir , Xth , r ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ) :: dir real ( rk ), intent ( in ), contiguous :: Xth (:) integer , intent ( in ), contiguous :: r (:) integer :: k , i , s , dim , j , nc_new , t real ( rk ), allocatable :: Xc (:,:), Xcw (:,:), Xcw_new (:,:), Xc_new (:,:), Wc_new (:), knot_new (:) real ( rk ), allocatable :: Xc3 (:,:,:) if ( dir == 1 ) then ! direction 1 if ( this % is_rational ()) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 1 ) - 1 , this % degree ( 1 ), Xth ( i ), this % knot1 ) if ( this % knot1 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot1 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xcw = reshape ( Xcw ,[ this % nc ( 1 ), this % nc ( 2 ) * ( dim + 1 )], order = [ 1 , 2 ]) call remove_knots_A_5_8 (& this % degree ( 1 ),& this % knot1 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xcw_new ) if ( allocated ( Xcw )) deallocate ( Xcw ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) Xcw_new = reshape ( Xcw_new ,[ this % nc ( 2 ) * ( nc_new ), dim + 1 ], order = [ 1 , 2 ]) allocate ( Xc_new ( 1 : this % nc ( 2 ) * ( nc_new ), 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 2 ) * ( nc_new ))) do j = 1 , this % nc ( 2 ) * ( nc_new ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw_new , Xc_new , Wc_new ) end if end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 1 ) - 1 , this % degree ( 1 ), Xth ( i ), this % knot1 ) if ( this % knot1 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot1 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) Xc = reshape ( this % Xc ,[ this % nc ( 1 ), this % nc ( 2 ) * dim ], order = [ 1 , 2 ]) call remove_knots_A_5_8 (& this % degree ( 1 ),& this % knot1 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xc_new ) if ( allocated ( Xc )) deallocate ( Xc ) if ( t == 0 ) then ! no change else nc_new = size ( Xc_new , 1 ) Xc_new = reshape ( Xc_new ,[( this % nc ( 2 )) * ( nc_new ), dim ], order = [ 1 , 2 ]) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), Xc = Xc_new ) end if end do end if elseif ( dir == 2 ) then ! direction 2 if ( this % is_rational ()) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 2 ) - 1 , this % degree ( 2 ), Xth ( i ), this % knot2 ) if ( this % knot2 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot2 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc3 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), dim + 1 ]) Xc3 = reshape ( Xc3 , [ this % nc ( 2 ), this % nc ( 1 ), dim + 1 ], order = [ 2 , 1 , 3 ]) Xcw = reshape ( Xc3 , [ this % nc ( 2 ), this % nc ( 1 ) * ( dim + 1 )]) call remove_knots_A_5_8 (& this % degree ( 2 ),& this % knot2 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xcw_new ) if ( allocated ( Xcw )) deallocate ( Xcw ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) Xc3 = reshape ( Xcw_new , [ nc_new , this % nc ( 1 ), dim + 1 ]) Xc3 = reshape ( Xc3 , [ this % nc ( 1 ), nc_new , dim + 1 ], order = [ 2 , 1 , 3 ]) Xcw_new = reshape ( Xc3 ,[( this % nc ( 1 )) * ( nc_new ), dim + 1 ]) allocate ( Xc_new ( 1 :( nc_new ) * this % nc ( 1 ), 1 : dim )) allocate ( Wc_new ( 1 :( nc_new ) * this % nc ( 1 ))) do j = 1 , ( nc_new ) * this % nc ( 1 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw_new , Xc_new , Wc_new ) end if end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 2 ) - 1 , this % degree ( 2 ), Xth ( i ), this % knot2 ) if ( this % knot2 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot2 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) Xc3 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), dim ]) Xc3 = reshape ( Xc3 , [ this % nc ( 2 ), this % nc ( 1 ), dim ], order = [ 2 , 1 , 3 ]) Xc = reshape ( Xc3 ,[ this % nc ( 2 ), this % nc ( 1 ) * dim ]) call remove_knots_A_5_8 (& this % degree ( 2 ),& this % knot2 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xc_new ) if ( allocated ( Xc )) deallocate ( Xc ) if ( t == 0 ) then ! no change else nc_new = size ( Xc_new , 1 ) Xc3 = reshape ( Xc_new , [ nc_new , this % nc ( 1 ), dim ]) Xc3 = reshape ( Xc3 , [ this % nc ( 1 ), nc_new , dim ], order = [ 2 , 1 , 3 ]) Xc_new = reshape ( Xc3 ,[( this % nc ( 1 )) * ( nc_new ), dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , Xc = Xc_new ) end if end do end if else error stop 'Invalid direction.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_tetragon ( this , L , nc , Wc ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: L ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) call this % set ( nc = nc , Xc = tetragon_Xc ( L , nc ), Wc = Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem ( this ) result ( elemConn ) class ( nurbs_surface ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) call elemConn_Cn ( this % nc ( 1 ), this % nc ( 2 ),& this % degree ( 1 ), this % degree ( 2 ),& unique ( this % knot1 ), unique ( this % knot2 ),& this % get_multiplicity ( 1 ), this % get_multiplicity ( 2 ),& elemConn ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine rotate_Xc ( this , alpha , beta , theta ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: alpha , beta , theta integer :: i do i = 1 , this % nc ( 1 ) * this % nc ( 2 ) this % Xc ( i , :) = matmul ( rotation ( alpha , beta , theta ), this % Xc ( i , :)) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine rotate_Xg ( this , alpha , beta , theta ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: alpha , beta , theta integer :: i do i = 1 , this % ng ( 1 ) * this % ng ( 2 ) this % Xg ( i , :) = matmul ( rotation ( alpha , beta , theta ), this % Xg ( i , :)) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine translate_Xc ( this , vec ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: vec (:) integer :: i do i = 1 , this % nc ( 1 ) * this % nc ( 2 ) this % Xc ( i , :) = this % Xc ( i , :) + vec end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine translate_Xg ( this , vec ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: vec (:) integer :: i do i = 1 , this % ng ( 1 ) * this % ng ( 2 ) this % Xg ( i , :) = this % Xg ( i , :) + vec end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine show ( this , vtkfile_Xc , vtkfile_Xg ) class ( nurbs_surface ), intent ( inout ) :: this character ( len =* ), intent ( in ) :: vtkfile_Xc , vtkfile_Xg character ( len = 3000 ) :: pyvista_script pyvista_script = & \"import pyvista as pv\" // achar ( 10 ) // & \"pv.global_theme.color = 'white'\" // achar ( 10 ) // & \"Xc = pv.read('\" // trim ( vtkfile_Xc ) // \"')\" // achar ( 10 ) // & \"Xg = pv.read('\" // trim ( vtkfile_Xg ) // \"')\" // achar ( 10 ) // & \"p = pv.Plotter(lighting='light kit')\" // achar ( 10 ) // & \"actor_Xcp = p.add_mesh(\" // achar ( 10 ) // & \"    Xc,\" // achar ( 10 ) // & \"    style='points',\" // achar ( 10 ) // & \"    point_size=10,\" // achar ( 10 ) // & \"    color='red',\" // achar ( 10 ) // & \"    render_points_as_spheres=True,\" // achar ( 10 ) // & \"    opacity=0.5,\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"actor_Xcw = p.add_mesh(\" // achar ( 10 ) // & \"    Xc,\" // achar ( 10 ) // & \"    show_edges=True,\" // achar ( 10 ) // & \"    color='yellow',\" // achar ( 10 ) // & \"    line_width=3,\" // achar ( 10 ) // & \"    style='wireframe',\" // achar ( 10 ) // & \"    opacity=0.2\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"actor_Xg = p.add_mesh(\" // achar ( 10 ) // & \"    Xg,\" // achar ( 10 ) // & \"    show_edges=False,\" // achar ( 10 ) // & \"    color='cyan',\" // achar ( 10 ) // & \"    line_width=7,\" // achar ( 10 ) // & \"    metallic=0.6,\" // achar ( 10 ) // & \"    pbr=True,\" // achar ( 10 ) // & \"    split_sharp_edges=True,\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_axes(interactive=False)\" // achar ( 10 ) // & \"def point_picker_callback(point):\" // achar ( 10 ) // & \"    mesh = Xc\" // achar ( 10 ) // & \"    point_id = mesh.find_closest_point(point)\" // achar ( 10 ) // & \"    point_coords = mesh.points[point_id]\" // achar ( 10 ) // & \"    label = f'ID: {point_id + 1}\\n({point_coords[0]:.3f}, {point_coords[1]:.3f}, {point_coords[2]:.3f})'\" // achar ( 10 ) // & \"    p.add_point_labels(\" // achar ( 10 ) // & \"        [point_coords],\" // achar ( 10 ) // & \"        [label],\" // achar ( 10 ) // & \"        font_size=14,\" // achar ( 10 ) // & \"        text_color='black',\" // achar ( 10 ) // & \"        show_points=False,\" // achar ( 10 ) // & \"        fill_shape=False,\" // achar ( 10 ) // & \"        shape=None,\" // achar ( 10 ) // & \"    )\" // achar ( 10 ) // & \"picker = p.enable_point_picking(callback=point_picker_callback, show_message=False)\" // achar ( 10 ) // & \"window_size = p.window_size\" // achar ( 10 ) // & \"y_pos = window_size[1]\" // achar ( 10 ) // & \"def Xcp_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xcp.SetVisibility(flag)\" // achar ( 10 ) // & \"def Xcw_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xcw.SetVisibility(flag)\" // achar ( 10 ) // & \"def Xg_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xg.SetVisibility(flag)\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xcp_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='red',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 1 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xcw_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='yellow',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 2 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xg_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='cyan',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 3 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xc (Points)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 1 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xc (Control geometry)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 2 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xg (Geometry)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 3 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text('ForCAD', position=(0.0, 10.0), font_size=14, color='black', font='times')\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'https://github.com/gha3mi/forcad',\" // achar ( 10 ) // & \"    position=(0.0, 0.0),\" // achar ( 10 ) // & \"    font_size=7,\" // achar ( 10 ) // & \"    color='blue',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.show(title='ForCAD', interactive=True)\" call execute_command_line ( 'python -c \"' // trim ( adjustl ( pyvista_script )) // '\"' ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_ring ( this , center , radius1 , radius2 ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius1 , radius2 real ( rk ), allocatable :: Xc (:,:), Wc (:), knot1 (:), knot2 (:) integer :: i ! Define control points for ring allocate ( Xc ( 14 , 3 )) Xc ( 1 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 3 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 6 ,:) = [ 1.0_rk , - sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 7 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 1 : 7 , 1 : 2 ) = Xc ( 1 : 7 , 1 : 2 ) * radius1 Xc ( 8 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 9 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 10 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 11 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 12 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 13 ,:) = [ 1.0_rk , - sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 14 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 8 : 14 , 1 : 2 ) = Xc ( 8 : 14 , 1 : 2 ) * radius2 ! Translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) end do ! Define weights for the control points Wc = [ 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ,& 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ] ! Define knot vector knot1 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 3.0_rk , 1.0_rk / 3.0_rk , 2.0_rk / 3.0_rk , 2.0_rk / 3.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot1 , knot2 , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_C ( this , center , radius1 , radius2 ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius1 , radius2 real ( rk ), allocatable :: Xc (:,:), Wc (:), knot1 (:), knot2 (:) integer :: i ! Define control points for C-shape allocate ( Xc ( 10 , 3 )) Xc ( 1 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 3 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 1 : 5 , 1 : 2 ) = Xc ( 1 : 5 , 1 : 2 ) * radius1 Xc ( 6 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 7 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 8 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 9 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 10 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 6 : 10 , 1 : 2 ) = Xc ( 6 : 10 , 1 : 2 ) * radius2 ! Translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) end do ! Define weights for the control points Wc = [ 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ,& 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ] ! Define knot vector knot1 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 2.0_rk , 1.0_rk / 2.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot1 , knot2 , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_half_ring ( this , center , radius1 , radius2 ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius1 , radius2 real ( rk ), allocatable :: Xc (:,:), Wc (:), knot1 (:), knot2 (:) integer :: i ! Define control points for half ring allocate ( Xc ( 10 , 3 )) Xc ( 1 ,:) = [ 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 3 ,:) = [ 0.0_rk , 0.5_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 1 : 5 , 1 : 2 ) = Xc ( 1 : 5 , 1 : 2 ) * radius1 Xc ( 6 ,:) = [ 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 7 ,:) = [ 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 8 ,:) = [ 0.0_rk , 0.5_rk , 0.0_rk ] Xc ( 9 ,:) = [ - 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 10 ,:) = [ - 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 6 : 10 , 1 : 2 ) = Xc ( 6 : 10 , 1 : 2 ) * radius2 ! Translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) end do ! Define weights for the control points Wc = [ 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk ,& 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk ] ! Define knot vector knot1 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 2.0_rk , & 1.0_rk / 2.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot1 , knot2 , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine nearest_point ( this , point_Xg , nearest_Xg , nearest_Xt , id ) class ( nurbs_surface ), intent ( in ) :: this real ( rk ), intent ( in ) :: point_Xg (:) real ( rk ), intent ( out ), allocatable , optional :: nearest_Xg (:) real ( rk ), intent ( out ), allocatable , optional :: nearest_Xt (:) integer , intent ( out ), optional :: id integer :: id_ real ( rk ), allocatable :: distances (:) allocate ( distances ( this % ng ( 1 ) * this % ng ( 2 ))) distances = nearest_point_help_2d ( this % ng , this % Xg , point_Xg ) id_ = minloc ( distances , dim = 1 ) if ( present ( id )) id = id_ if ( present ( nearest_Xg )) nearest_Xg = this % Xg ( id_ ,:) if ( present ( nearest_Xt )) nearest_Xt = this % Xt ( id_ ,:) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine nearest_point2 ( this , point_Xg , tol , maxit , nearest_Xt , nearest_Xg ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: point_Xg (:) real ( rk ), intent ( in ) :: tol integer , intent ( in ) :: maxit real ( rk ), intent ( out ) :: nearest_Xt ( 2 ) real ( rk ), allocatable , intent ( out ), optional :: nearest_Xg (:) real ( rk ) :: obj , grad ( 2 ), hess ( 2 , 2 ), dk ( 2 ), alphak , tau , beta , lower_bounds ( 2 ), upper_bounds ( 2 ) real ( rk ), allocatable :: Xg (:), xk (:), Tgc (:), dTgc (:,:), d2Tgc (:,:) integer :: k , l logical :: convergenz type ( nurbs_surface ) :: copy_this k = 0 ! lower and upper bounds lower_bounds = [ minval ( this % knot1 ), minval ( this % knot2 )] upper_bounds = [ maxval ( this % knot1 ), maxval ( this % knot2 )] ! guess initial point copy_this = this call copy_this % create ( 10 , 10 ) call copy_this % nearest_point ( point_Xg = point_Xg , nearest_Xt = xk ) call copy_this % finalize () ! Check if xk is within the knot vector range if ( xk ( 1 ) < minval ( this % knot1 )) then xk ( 1 ) = minval ( this % knot1 ) else if ( xk ( 1 ) > maxval ( this % knot1 )) then xk ( 1 ) = maxval ( this % knot1 ) end if if ( xk ( 2 ) < minval ( this % knot2 )) then xk ( 2 ) = minval ( this % knot2 ) else if ( xk ( 2 ) > maxval ( this % knot2 )) then xk ( 2 ) = maxval ( this % knot2 ) end if convergenz = . false . allocate ( Xg ( size ( this % Xc , 2 ))) ! allocate(dTgc(size(this%Xc,1), 2)) ! allocate(d2Tgc(size(this%Xc,1), 2)) do while (. not . convergenz . and . k < maxit ) ! objection, gradient and hessian Xg = this % cmp_Xg ( xk ) call this % derivative2 ( Xt = xk , d2Tgc = d2Tgc , dTgc = dTgc , Tgc = Tgc ) ! Tgc is not needed obj = norm2 ( Xg - point_Xg ) + 0.001_rk ! add a small number to avoid division by zero grad ( 1 ) = dot_product (( Xg - point_Xg ) / obj , matmul ( dTgc (:, 1 ), this % Xc )) grad ( 2 ) = dot_product (( Xg - point_Xg ) / obj , matmul ( dTgc (:, 2 ), this % Xc )) hess ( 1 , 1 ) = ( dot_product ( matmul ( dTgc (:, 1 ), this % Xc ), matmul ( dTgc (:, 1 ), this % Xc )) + & dot_product (( Xg - point_Xg ), matmul ( d2Tgc ( 1 : this % nc ( 1 ) * this % nc ( 2 ) , 1 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 1 ), this % Xc )) * grad ( 1 ) ) / obj ** 2 hess ( 2 , 1 ) = ( dot_product ( matmul ( dTgc (:, 1 ), this % Xc ), matmul ( dTgc (:, 2 ), this % Xc )) + & dot_product (( Xg - point_Xg ), matmul ( d2Tgc ( this % nc ( 1 ) * this % nc ( 2 ) + 1 : 2 * this % nc ( 1 ) * this % nc ( 2 ), 1 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 2 ), this % Xc )) * grad ( 1 ) ) / obj ** 2 hess ( 1 , 2 ) = ( dot_product ( matmul ( dTgc (:, 2 ), this % Xc ), matmul ( dTgc (:, 1 ), this % Xc )) + & dot_product (( Xg - point_Xg ), matmul ( d2Tgc ( 1 : this % nc ( 1 ) * this % nc ( 2 ) , 2 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 1 ), this % Xc )) * grad ( 2 ) ) / obj ** 2 hess ( 2 , 2 ) = ( dot_product ( matmul ( dTgc (:, 2 ), this % Xc ), matmul ( dTgc (:, 2 ), this % Xc )) + & dot_product (( Xg - point_Xg ), matmul ( d2Tgc ( this % nc ( 1 ) * this % nc ( 2 ) + 1 : 2 * this % nc ( 1 ) * this % nc ( 2 ), 2 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 2 ), this % Xc )) * grad ( 2 ) ) / obj ** 2 ! debug print '(i3,1x,2e20.10,1x,e20.10)' , k , xk , norm2 ( grad ) if ( norm2 ( grad ) <= tol ) then convergenz = . true . nearest_Xt = xk if ( present ( nearest_Xg )) nearest_Xg = this % cmp_Xg ( nearest_Xt ) else dk = - matmul ( inv ( hess ), grad ) ! Backtracking-Armijo Line Search alphak = 1.0_rk tau = 0.5_rk ! 0 < tau  < 1 beta = 1.0e-4_rk ! 0 < beta < 1 l = 0 do while (. not . norm2 ( this % cmp_Xg ( xk + alphak * dk ) - point_Xg ) <= obj + alphak * beta * dot_product ( grad , dk ) . and . l < 50 ) alphak = tau * alphak l = l + 1 end do xk = xk + alphak * dk ! Check if xk is within the knot vector range xk = max ( min ( xk , upper_bounds ), lower_bounds ) k = k + 1 end if end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine ansatz ( this , ie , ig , Tgc , dTgc_dXg , dA ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ) :: ie , ig real ( rk ), intent ( out ) :: dA real ( rk ), allocatable , intent ( out ) :: Tgc (:), dTgc_dXg (:,:) real ( rk ), allocatable :: Xth (:,:), Xth_e (:,:), Xth_eT (:,:), Xc_eT (:,:), Xth1 (:), Xth2 (:), Xksi (:,:), Wksi (:) integer , allocatable :: elem_th (:,:), elem_c (:,:), elem_ce (:) type ( nurbs_surface ) :: th , th_e real ( rk ), allocatable :: dTtth_dXksi (:,:), Ttth (:), dTgc_dXt (:,:), Xt (:), dXt_dXksi (:,:), dXg_dXt (:,:) real ( rk ), allocatable :: dXg_dXksi (:,:) !! Jacobian matrix real ( rk ) :: det_dXg_dXksi !! Determinant of the Jacobian matrix call gauss_leg ([ 0.0_rk , 1.0_rk ], [ 0.0_rk , 1.0_rk ], this % degree , Xksi , Wksi ) Xth1 = unique ( this % knot1 ) Xth2 = unique ( this % knot2 ) call ndgrid ( Xth1 , Xth2 , Xth ) call th % set ([ 0.0_rk , Xth1 , 1.0_rk ], [ 0.0_rk , Xth2 , 1.0_rk ], Xth ) elem_th = th % cmp_elem () elem_c = this % cmp_elem () Xth_e = Xth ( elem_th ( ie ,:),:) call th_e % set ([ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ], [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ], Xth_e ) Xth_eT = transpose ( Xth_e ) elem_ce = elem_c ( ie ,:) Xc_eT = transpose ( this % Xc ( elem_ce ,:)) call th_e % derivative ( Xksi ( ig ,:), dTtth_dXksi , Ttth ) Xt = matmul ( Xth_eT , Ttth ) dXt_dXksi = matmul ( Xth_eT , dTtth_dXksi ) call this % derivative ( Xt , dTgc_dXt , Tgc , elem_ce ) dXg_dXt = matmul ( Xc_eT , dTgc_dXt ) dTgc_dXg = matmul ( dTgc_dXt , inv ( dXg_dXt )) dXg_dXksi = matmul ( dXg_dXt , dXt_dXksi ) det_dXg_dXksi = det ( dXg_dXksi ) dA = det_dXg_dXksi * Wksi ( ig ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_area ( this , area ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( out ) :: area real ( rk ), allocatable :: Tgc (:), dTgc_dXg (:,:) integer :: ie , ig real ( rk ) :: dA , dA_ig area = 0.0_rk do ie = 1 , size ( this % cmp_elem (), 1 ) dA = 0.0_rk do ig = 1 , size ( this % cmp_elem (), 2 ) call this % ansatz ( ie , ig , Tgc , dTgc_dXg , dA_ig ) dA = dA + dA_ig end do area = area + dA end do end subroutine !=============================================================================== end module forcad_nurbs_surface !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_nurbs_2d ( Xt , knot1 , knot2 , degree , nc , ng , Xc , Wc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: ng ( 2 ) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Xg (:,:) real ( rk ), allocatable :: Tgc (:) integer :: i allocate ( Xg ( ng ( 1 ) * ng ( 2 ), size ( Xc , 2 ))) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ))) !$OMP PARALLEL DO PRIVATE(Tgc) do i = 1 , ng ( 1 ) * ng ( 2 ) Tgc = kron (& basis_bspline ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ))) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) Xg ( i ,:) = matmul ( Tgc , Xc ) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_nurbs_2d_1point ( Xt , knot1 , knot2 , degree , nc , Xc , Wc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Xg (:) real ( rk ), allocatable :: Tgc (:) allocate ( Xg ( size ( Xc , 2 ))) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ))) Tgc = kron (& basis_bspline ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ))) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) Xg = matmul ( Tgc , Xc ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_bspline_2d ( Xt , knot1 , knot2 , degree , nc , ng , Xc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: ng ( 2 ) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), allocatable :: Xg (:,:) integer :: i allocate ( Xg ( ng ( 1 ) * ng ( 2 ), size ( Xc , 2 ))) !$OMP PARALLEL DO do i = 1 , ng ( 1 ) * ng ( 2 ) Xg ( i ,:) = matmul ( kron (& basis_bspline ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ))),& Xc ) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_bspline_2d_1point ( Xt , knot1 , knot2 , degree , nc , Xc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), allocatable :: Xg (:) allocate ( Xg ( size ( Xc , 2 ))) Xg = matmul ( kron (& basis_bspline ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ))),& Xc ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_nurbs_2d_vector ( Xt , knot1 , knot2 , degree , nc , ng , Wc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: ng ( 2 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: dBi (:,:), dB1 (:), dB2 (:) real ( rk ), allocatable :: Bi (:), B1 (:), B2 (:) integer :: i allocate ( dTgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ), 2 ), Tgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ))) allocate ( Bi ( nc ( 1 ) * nc ( 2 )), dBi ( nc ( 1 ) * nc ( 2 ), 2 )) do i = 1 , size ( Xt , 1 ) call basis_bspline_der ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ), dB1 , B1 ) call basis_bspline_der ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 ), dB2 , B2 ) Bi = kron ( B2 , B1 ) Tgc ( i ,:) = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dBi (:, 1 ) = kron ( B2 , dB1 ) dBi (:, 2 ) = kron ( dB2 , B1 ) dTgc ( i ,:, 1 ) = ( dBi (:, 1 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 1 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc ( i ,:, 2 ) = ( dBi (:, 2 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 2 ), Wc ) ) / dot_product ( Bi , Wc ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_nurbs_2d_scalar ( Xt , knot1 , knot2 , degree , nc , Wc , dTgc , Tgc , elem ) use forcad_utils , only : rk , basis_bspline_der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), intent ( in ), contiguous :: Wc (:) integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: dB1 (:), dB2 (:), dBi (:,:) real ( rk ), allocatable :: B1 (:), B2 (:), Bi (:) call basis_bspline_der ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ), dB1 , B1 ) call basis_bspline_der ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 ), dB2 , B2 ) if (. not . present ( elem )) then allocate ( dTgc ( nc ( 1 ) * nc ( 2 ), 2 ), Tgc ( nc ( 1 ) * nc ( 2 ))) allocate ( dBi ( nc ( 1 ) * nc ( 2 ), 2 ), Bi ( nc ( 1 ) * nc ( 2 ))) Bi = kron ( B2 , B1 ) Tgc = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dBi (:, 1 ) = kron ( B2 , dB1 ) dBi (:, 2 ) = kron ( dB2 , B1 ) dTgc (:, 1 ) = ( dBi (:, 1 ) * Wc - Tgc * dot_product ( dBi (:, 1 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc (:, 2 ) = ( dBi (:, 2 ) * Wc - Tgc * dot_product ( dBi (:, 2 ), Wc ) ) / dot_product ( Bi , Wc ) else allocate ( dTgc ( size ( elem ), 2 ), Tgc ( size ( elem ))) allocate ( dBi ( size ( elem ), 2 ), Bi ( size ( elem ))) associate ( Biall => kron ( B2 , B1 )) Bi = Biall ( elem ) Tgc = Bi * ( Wc ( elem ) / ( dot_product ( Bi , Wc ( elem )))) end associate associate ( dB1all => kron ( B2 , dB1 ), dB2all => kron ( dB2 , B1 )) dBi (:, 1 ) = dB1all ( elem ) dBi (:, 2 ) = dB2all ( elem ) end associate dTgc (:, 1 ) = ( dBi (:, 1 ) * Wc ( elem ) - Tgc * dot_product ( dBi (:, 1 ), Wc ( elem )) ) / dot_product ( Bi , Wc ( elem )) dTgc (:, 2 ) = ( dBi (:, 2 ) * Wc ( elem ) - Tgc * dot_product ( dBi (:, 2 ), Wc ( elem )) ) / dot_product ( Bi , Wc ( elem )) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_bspline_2d_vector ( Xt , knot1 , knot2 , degree , nc , ng , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: ng ( 2 ) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: dB1 (:), dB2 (:) real ( rk ), allocatable :: B1 (:), B2 (:) integer :: i allocate ( dTgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ), 2 ), Tgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ))) allocate ( B1 ( nc ( 1 )), B2 ( nc ( 2 )), dB1 ( nc ( 1 )), dB2 ( nc ( 2 ))) do i = 1 , size ( Xt , 1 ) call basis_bspline_der ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ), dB1 , B1 ) call basis_bspline_der ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 ), dB2 , B2 ) Tgc ( i ,:) = kron ( B2 , B1 ) dTgc ( i ,:, 1 ) = kron ( B2 , dB1 ) dTgc ( i ,:, 2 ) = kron ( dB2 , B1 ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_bspline_2d_scalar ( Xt , knot1 , knot2 , degree , nc , dTgc , Tgc , elem ) use forcad_utils , only : rk , basis_bspline_der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: dTgc1 (:), dTgc2 (:) real ( rk ), allocatable :: Tgc1 (:), Tgc2 (:) call basis_bspline_der ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ), dTgc1 , Tgc1 ) call basis_bspline_der ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 ), dTgc2 , Tgc2 ) if (. not . present ( elem )) then allocate ( dTgc ( nc ( 1 ) * nc ( 2 ), 2 )) Tgc = kron ( Tgc2 , Tgc1 ) dTgc (:, 1 ) = kron ( Tgc2 , dTgc1 ) dTgc (:, 2 ) = kron ( dTgc2 , Tgc1 ) else allocate ( dTgc ( size ( elem ), 2 )) associate ( B => kron ( Tgc2 , Tgc1 )) Tgc = B ( elem ) end associate associate ( dB1 => kron ( Tgc2 , dTgc1 ), dB2 => kron ( dTgc2 , Tgc1 )) dTgc (:, 1 ) = dB1 ( elem ) dTgc (:, 2 ) = dB2 ( elem ) end associate end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_nurbs_2d_vector ( Xt , knot1 , knot2 , degree , nc , ng , Wc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: ng ( 2 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: d2Bi (:,:), d2B1 (:), d2B2 (:) real ( rk ), allocatable :: dBi (:,:), dB1 (:), dB2 (:) real ( rk ), allocatable :: Bi (:), B1 (:), B2 (:) real ( rk ), allocatable :: Tgci (:), dTgci (:) integer :: i allocate ( d2Tgc ( ng ( 1 ) * ng ( 2 ), 2 * nc ( 1 ) * nc ( 2 ), 2 )) allocate ( B1 ( nc ( 1 )), B2 ( nc ( 2 ))) allocate ( dB1 ( nc ( 1 )), dB2 ( nc ( 2 ))) allocate ( d2B1 ( nc ( 1 )), d2B2 ( nc ( 2 ))) allocate ( Bi ( nc ( 1 ) * nc ( 2 )), dBi ( nc ( 1 ) * nc ( 2 ), 2 ), d2Bi ( 2 * nc ( 1 ) * nc ( 2 ), 2 )) allocate ( Tgci ( nc ( 1 ) * nc ( 2 )), dTgci ( nc ( 1 ) * nc ( 2 ))) allocate ( Tgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 )), dTgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ), 2 )) do i = 1 , size ( Xt , 1 ) call basis_bspline_2der ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ), d2B1 , dB1 , B1 ) call basis_bspline_2der ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 ), d2B2 , dB2 , B2 ) Bi = kron ( B2 , B1 ) Tgc ( i ,:) = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dBi (:, 1 ) = kron ( B2 , dB1 ) dBi (:, 2 ) = kron ( dB2 , B1 ) dTgc ( i ,:, 1 ) = ( dBi (:, 1 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 1 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc ( i ,:, 2 ) = ( dBi (:, 2 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 2 ), Wc ) ) / dot_product ( Bi , Wc ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 1 ) = kron ( B2 , d2B1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ) = kron ( dB2 , dB1 ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 2 ) = kron ( dB2 , dB1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ) = kron ( d2B2 , B1 ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) , 1 ) = & ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 1 ) * Wc - 2.0_rk * dTgc ( i ,:, 1 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ) = & ( d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ) * Wc - dTgc ( i ,:, 1 ) * dot_product ( dBi (:, 2 ), Wc ) - dTgc ( i ,:, 2 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) , 2 ) = & ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 2 ) * Wc - dTgc ( i ,:, 1 ) * dot_product ( dBi (:, 2 ), Wc ) - dTgc ( i ,:, 2 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 2 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ) = & ( d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ) * Wc - 2.0_rk * dTgc ( i ,:, 2 ) * dot_product ( dBi (:, 2 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ), Wc )) / dot_product ( Bi , Wc ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_nurbs_2d_scalar ( Xt , knot1 , knot2 , degree , nc , Wc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: d2Bi (:,:), d2B1 (:), d2B2 (:) real ( rk ), allocatable :: dBi (:,:), dB1 (:), dB2 (:) real ( rk ), allocatable :: Bi (:), B1 (:), B2 (:) allocate ( B1 ( nc ( 1 )), B2 ( nc ( 2 ))) allocate ( dB1 ( nc ( 1 )), dB2 ( nc ( 2 ))) allocate ( d2B1 ( nc ( 1 )), d2B2 ( nc ( 2 ))) allocate ( Bi ( nc ( 1 ) * nc ( 2 )), dBi ( nc ( 1 ) * nc ( 2 ), 2 ), d2Bi ( 2 * nc ( 1 ) * nc ( 2 ), 2 )) allocate ( Tgc ( nc ( 1 ) * nc ( 2 )), dTgc ( nc ( 1 ) * nc ( 2 ), 2 ), d2Tgc ( 2 * nc ( 1 ) * nc ( 2 ), 2 )) call basis_bspline_2der ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ), d2B1 , dB1 , B1 ) call basis_bspline_2der ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 ), d2B2 , dB2 , B2 ) Bi = kron ( B2 , B1 ) Tgc = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dBi (:, 1 ) = kron ( B2 , dB1 ) dBi (:, 2 ) = kron ( dB2 , B1 ) dTgc (:, 1 ) = ( dBi (:, 1 ) * Wc - Tgc * dot_product ( dBi (:, 1 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc (:, 2 ) = ( dBi (:, 2 ) * Wc - Tgc * dot_product ( dBi (:, 2 ), Wc ) ) / dot_product ( Bi , Wc ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 1 ) = kron ( B2 , d2B1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ) = kron ( dB2 , dB1 ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 2 ) = kron ( dB2 , dB1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ) = kron ( d2B2 , B1 ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) , 1 ) = & ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 1 ) * Wc - 2.0_rk * dTgc (:, 1 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ) = & ( d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ) * Wc - dTgc (:, 1 ) * dot_product ( dBi (:, 2 ), Wc ) - dTgc (:, 2 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) , 2 ) = & ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 2 ) * Wc - dTgc (:, 1 ) * dot_product ( dBi (:, 2 ), Wc ) - dTgc (:, 2 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 2 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ) = & ( d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ) * Wc - 2.0_rk * dTgc (:, 2 ) * dot_product ( dBi (:, 2 ), Wc ) & - Tgc * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ), Wc )) / dot_product ( Bi , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_bspline_2d_vector ( Xt , knot1 , knot2 , degree , nc , ng , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: ng ( 2 ) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: d2B1 (:), d2B2 (:) real ( rk ), allocatable :: dB1 (:), dB2 (:) real ( rk ), allocatable :: B1 (:), B2 (:) integer :: i allocate ( d2Tgc ( ng ( 1 ) * ng ( 2 ), 2 * nc ( 1 ) * nc ( 2 ), 2 )) allocate ( dTgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ), 2 )) allocate ( Tgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ))) do i = 1 , size ( Xt , 1 ) call basis_bspline_2der ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ), d2B1 , dB1 , B1 ) call basis_bspline_2der ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 ), d2B2 , dB2 , B2 ) Tgc ( i ,:) = kron ( B2 , B1 ) dTgc ( i ,:, 1 ) = kron ( B2 , dB1 ) dTgc ( i ,:, 2 ) = kron ( dB2 , B1 ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) , 1 ) = kron ( B2 , d2B1 ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ) = kron ( dB2 , dB1 ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) , 2 ) = kron ( dB2 , dB1 ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ) = kron ( d2B2 , B1 ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_bspline_2d_scalar ( Xt , knot1 , knot2 , degree , nc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: d2B1 (:), d2B2 (:) real ( rk ), allocatable :: dB1 (:), dB2 (:) real ( rk ), allocatable :: B1 (:), B2 (:) allocate ( d2Tgc ( 2 * nc ( 1 ) * nc ( 2 ), 2 )) allocate ( dTgc ( nc ( 1 ) * nc ( 2 ), 2 )) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ))) call basis_bspline_2der ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ), d2B1 , dB1 , B1 ) call basis_bspline_2der ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 ), d2B2 , dB2 , B2 ) Tgc = kron ( B2 , B1 ) dTgc (:, 1 ) = kron ( B2 , dB1 ) dTgc (:, 2 ) = kron ( dB2 , B1 ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) , 1 ) = kron ( B2 , d2B1 ) d2Tgc ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ) = kron ( dB2 , dB1 ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) , 2 ) = kron ( dB2 , dB1 ) d2Tgc ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ) = kron ( d2B2 , B1 ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_nurbs_2d_vector ( Xt , knot1 , knot2 , degree , nc , ng , Wc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: ng ( 2 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Tgc (:,:) real ( rk ), allocatable :: Tgci (:) integer :: i allocate ( Tgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ))) allocate ( Tgci ( nc ( 1 ) * nc ( 2 ))) !$OMP PARALLEL DO PRIVATE(Tgci) do i = 1 , size ( Xt , 1 ) Tgci = kron (& basis_bspline ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ))) Tgc ( i ,:) = Tgci * ( Wc / ( dot_product ( Tgci , Wc ))) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_nurbs_2d_scalar ( Xt , knot1 , knot2 , degree , nc , Wc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Tgc (:) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ))) Tgc = kron (& basis_bspline ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ))) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_bspline_2d_vector ( Xt , knot1 , knot2 , degree , nc , ng ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: ng ( 2 ) real ( rk ), allocatable :: Tgc (:,:) integer :: i allocate ( Tgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ))) !$OMP PARALLEL DO do i = 1 , size ( Xt , 1 ) Tgc ( i ,:) = kron (& basis_bspline ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ))) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_bspline_2d_scalar ( Xt , knot1 , knot2 , degree , nc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), allocatable :: Tgc (:) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ))) Tgc = kron (& basis_bspline ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ))) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function nearest_point_help_2d ( ng , Xg , point_Xg ) result ( distances ) use forcad_utils , only : rk implicit none integer , intent ( in ) :: ng ( 2 ) real ( rk ), intent ( in ), contiguous :: Xg (:,:) real ( rk ), intent ( in ), contiguous :: point_Xg (:) real ( rk ), allocatable :: distances (:) integer :: i allocate ( distances ( ng ( 1 ) * ng ( 2 ))) !$OMP PARALLEL DO do i = 1 , ng ( 1 ) * ng ( 2 ) distances ( i ) = norm2 ( Xg ( i ,:) - point_Xg ) end do !$OMP END PARALLEL DO end function !===============================================================================","tags":"","loc":"sourcefile/forcad_nurbs_surface.f90.html"},{"title":"demo_surface.f90 – ForCAD","text":"This file depends on sourcefile~~demo_surface.f90~~EfferentGraph sourcefile~demo_surface.f90 demo_surface.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~demo_surface.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> This program demonstrates the usage of a NURBS surface object to create, and finalize a NURBS surface. !> It sets up control points and weights, generates the surface, and exports the control points !> and the surface to VTK files at various stages. program example_nurbs_surface use forcad , only : rk , nurbs_surface implicit none type ( nurbs_surface ) :: nurbs !! Declare a NURBS surface object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights !----------------------------------------------------------------------------- ! Setting up the NURBS surface !----------------------------------------------------------------------------- !> Define control points for the NURBS surface Xc = generate_Xc ( 10 , 10 , 1.5_rk ) !> Define weights for the control points allocate ( Wc ( size ( Xc , 1 )), source = 1.0_rk ) !> Set control points and weights for the NURBS surface object call nurbs % set ([ 10 , 10 ], Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export initial control points to a VTK file call nurbs % export_Xc ( 'vtk/demo_surface_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS surface !----------------------------------------------------------------------------- !> Generate the NURBS surface with a resolution of 30x30 call nurbs % create ( res1 = 30 , res2 = 30 ) !> Export the generated surface to a VTK file call nurbs % export_Xg ( 'vtk/demo_surface_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/demo_surface_Xc.vtk' , 'vtk/demo_surface_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS surface object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( num_rows , num_cols , peak_height ) result ( control_points ) integer , intent ( in ) :: num_rows , num_cols real ( rk ), intent ( in ) :: peak_height real ( rk ), allocatable :: control_points (:,:) integer :: i , j real ( rk ) :: x_spacing , y_spacing , x_offset , y_offset x_spacing = 1.0_rk / real ( num_cols - 1 , rk ) y_spacing = 1.0_rk / real ( num_rows - 1 , rk ) x_offset = - 0.5_rk y_offset = - 0.5_rk allocate ( control_points ( num_rows * num_cols , 3 )) do i = 1 , num_rows do j = 1 , num_cols control_points (( i - 1 ) * num_cols + j , 1 ) = x_offset + real ( j - 1 , rk ) * x_spacing control_points (( i - 1 ) * num_cols + j , 2 ) = y_offset + real ( i - 1 , rk ) * y_spacing control_points (( i - 1 ) * num_cols + j , 3 ) = & peak_height * exp ( - (( control_points (( i - 1 ) * num_cols + j , 1 ) ** 2 ) & + ( control_points (( i - 1 ) * num_cols + j , 2 ) ** 2 ))) + 0.5_rk * peak_height * 0.2_rk end do end do end function !----------------------------------------------------------------------------- end program example_nurbs_surface","tags":"","loc":"sourcefile/demo_surface.f90.html"},{"title":"shape_ring_2d.f90 – ForCAD","text":"This file depends on sourcefile~~shape_ring_2d.f90~~EfferentGraph sourcefile~shape_ring_2d.f90 shape_ring_2d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_ring_2d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_ring_2d use forcad , only : rk , nurbs_surface implicit none type ( nurbs_surface ) :: shape !> Set up a ring shape with inner radius 1.0 and outer radius 2.0. call shape % set_ring ([ 0.0_rk , 0.0_rk , 0.0_rk ], 1.0_rk , 2.0_rk ) !> Export the control points to a VTK file for visualization. call shape % export_Xc ( 'vtk/shape_ring_2d_Xc.vtk' ) !> Create the shape using the specified number of elements in each direction. call shape % create ( 60 , 15 ) !> Export the geometry to a VTK file for visualization. call shape % export_Xg ( 'vtk/shape_ring_2d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_ring_2d_Xc.vtk' , 'vtk/shape_ring_2d_Xg.vtk' ) !> Finalize and clean up the shape object. call shape % finalize () end program","tags":"","loc":"sourcefile/shape_ring_2d.f90.html"},{"title":"example_ppm3.f90 – ForCAD","text":"This file depends on sourcefile~~example_ppm3.f90~~EfferentGraph sourcefile~example_ppm3.f90 example_ppm3.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~example_ppm3.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> Visualization of NURBS surfaces using ForCAD, ForImage and ForColorMap libraries !> This example converts NURBS surfaces (vector) to an image (raster) using ForCAD, ForImage and ForColorMap libraries. program example_ppm3 use forcad , only : rk , nurbs_surface use forimage , only : ik , format_pnm , color use forcolormap , only : colormap use fortime , only : timer implicit none type ( nurbs_surface ) :: shape type ( format_pnm ) :: image type ( color ) :: background_color type ( colormap ) :: cmap integer ( ik ), allocatable :: px (:, :) real ( rk ), allocatable :: Xg (:,:), z_values (:) real ( rk ) :: aspect_ratio integer :: height , width , ng ( 2 ), red , green , blue , res1 , res2 , i integer , allocatable :: idx (:,:) type ( timer ) :: t !----------------------------------------------------------------------------- ! Set the image size and calculate the aspect ratio !----------------------------------------------------------------------------- width = 2000 height = 2000 aspect_ratio = real ( width , rk ) / real ( height , rk ) allocate ( px ( height , 3 * width )) !----------------------------------------------------------------------------- ! Set the background color using ForColor class of ForImage !----------------------------------------------------------------------------- call t % timer_start () call background_color % set ( 'white' , use_library = . true .) do i = 1 , width px (:, 3 * ( i - 1 ) + 1 ) = background_color % get_r () px (:, 3 * ( i - 1 ) + 2 ) = background_color % get_g () px (:, 3 * ( i - 1 ) + 3 ) = background_color % get_b () end do call t % timer_stop ( message = 'Setting the background color' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a tetragon res1 = 2000 res2 = 2000 call shape % set_tetragon ( L = [ 1.0_rk , 1.0_rk ], nc = [ 2 , 2 ]) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a tetragon' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! circular gradient z_values = (( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 )))) ** 2 & + (( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) ** 2 ) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'buda' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () res1 = 2000 res2 = 2000 call shape % set_tetragon ( L = [ 0.48_rk , 0.48_rk ], nc = [ 2 , 2 ]) call shape % translate_Xc ([ 0.01_rk , 0.01_rk , 0.0_rk ]) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! circular gradient z_values = (( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 )))) ** 2 & + (( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) ** 2 ) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'managua' , 0.0_rk , 2.2_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () res1 = 2000 res2 = 2000 call shape % set_tetragon ( L = [ 0.48_rk , 0.48_rk ], nc = [ 3 , 2 ]) call shape % translate_Xc ([ 0.51_rk , 0.01_rk , 0.0_rk ]) call shape % modify_Xc ( 0.24_rk , 2 , 2 ) call shape % modify_Xc ( 0.26_rk , 5 , 2 ) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the y-direction z_values = ( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'lipari' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () res1 = 2000 res2 = 2000 call shape % set_tetragon ( L = [ 0.48_rk , 0.48_rk ], nc = [ 2 , 3 ]) call shape % translate_Xc ([ 0.01_rk , 0.51_rk , 0.0_rk ]) call shape % modify_Xc ( 0.26_rk , 3 , 1 ) call shape % modify_Xc ( 0.24_rk , 4 , 1 ) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the x-direction z_values = ( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'oslo10' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () res1 = 2000 res2 = 2000 call shape % set_tetragon ( L = [ 0.48_rk , 0.48_rk ], nc = [ 3 , 3 ]) call shape % translate_Xc ([ 0.51_rk , 0.51_rk , 0.0_rk ]) call shape % modify_Xc ( 0.7_rk , 1 , 2 ) call shape % modify_Xc ( 0.7_rk , 3 , 2 ) call shape % modify_Xc ( 0.8_rk , 7 , 2 ) call shape % modify_Xc ( 0.8_rk , 9 , 2 ) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the x-direction z_values = ( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- red = 255 green = 215 blue = 0 !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Save the image to a PPM file using ForImage library !----------------------------------------------------------------------------- call t % timer_start () call image % set_pnm (& encoding = 'binary' , & file_format = 'ppm' , & width = width , & height = height , & max_color = 255 , & comment = 'example: ForCAD + ForImage + ForColor + ForColormap' , & pixels = px & ) call image % export_pnm ( 'ppm/example_ppm3' ) call image % finalize () call t % timer_stop ( message = 'Saving the image' ) ! Clean up call cmap % finalize () deallocate ( px , Xg , z_values ) end program","tags":"","loc":"sourcefile/example_ppm3.f90.html"},{"title":"example_ppm2.f90 – ForCAD","text":"This file depends on sourcefile~~example_ppm2.f90~~EfferentGraph sourcefile~example_ppm2.f90 example_ppm2.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~example_ppm2.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> Visualization of NURBS surfaces using ForCAD, ForImage and ForColorMap libraries !> This example converts NURBS surfaces (vector) to an image (raster) using ForCAD, ForImage and ForColorMap libraries. program example_ppm2 use forcad , only : rk , nurbs_surface use forimage , only : ik , format_pnm , color use forcolormap , only : colormap use fortime , only : timer implicit none type ( nurbs_surface ) :: shape type ( format_pnm ) :: image type ( color ) :: background_color type ( colormap ) :: cmap integer ( ik ), allocatable :: px (:, :) real ( rk ), allocatable :: Xg (:,:), z_values (:) real ( rk ) :: center ( 3 ), inner_radius , outer_radius , aspect_ratio integer :: height , width , ng ( 2 ), red , green , blue , res1 , res2 , i integer , allocatable :: idx (:,:) type ( timer ) :: t !----------------------------------------------------------------------------- ! Set the image size and calculate the aspect ratio !----------------------------------------------------------------------------- width = 2000 height = 2000 aspect_ratio = real ( width , rk ) / real ( height , rk ) allocate ( px ( height , 3 * width )) !----------------------------------------------------------------------------- ! Set the background color using ForColor class of ForImage !----------------------------------------------------------------------------- call t % timer_start () call background_color % set ( 'white' , use_library = . true .) do i = 1 , width px (:, 3 * ( i - 1 ) + 1 ) = background_color % get_r () px (:, 3 * ( i - 1 ) + 2 ) = background_color % get_g () px (:, 3 * ( i - 1 ) + 3 ) = background_color % get_b () end do call t % timer_stop ( message = 'Setting the background color' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a tetragon res1 = 2000 res2 = 2000 call shape % set_tetragon ( L = [ 1.0_rk , 1.0_rk ], nc = [ 2 , 2 ]) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a tetragon' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! circular gradient z_values = (( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 )))) ** 2 & + (( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) ** 2 ) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'buda' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting the colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- !> Set the shape parameters for a ring call t % timer_start () center = [ 0.0_rk , 0.0_rk , 0.0_rk ] outer_radius = 0.24_rk * 2.0_rk inner_radius = 0.0_rk * 2.0_rk res1 = 3500 res2 = 1000 center ( 2 ) = center ( 2 ) / aspect_ratio call shape % set_half_ring ( center , inner_radius , outer_radius ) call shape % rotate_Xc ( 0.0_rk , 0.0_rk , 4 5.0_rk ) call shape % translate_Xc ([ 0.25_rk , 0.25_rk , 0.0_rk ]) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! circular gradient z_values = (( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 )))) ** 2 & + (( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) ** 2 ) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'managua' , 0.0_rk , 2.2_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting the colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- !> Set the shape parameters for a ring call t % timer_start () center = [ 0.0_rk , 0.0_rk , 0.0_rk ] outer_radius = 0.24_rk * 2.0_rk inner_radius = 0.08_rk * 2.0_rk res1 = 3500 res2 = 1000 center ( 2 ) = center ( 2 ) / aspect_ratio call shape % set_half_ring ( center , inner_radius , outer_radius ) call shape % rotate_Xc ( 0.0_rk , 0.0_rk , - 4 5.0_rk ) call shape % translate_Xc ([ 0.75_rk , 0.25_rk , 0.0_rk ]) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the y-direction z_values = ( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'lipari' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting the colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a ring center = [ 0.0_rk , 0.0_rk , 0.0_rk ] outer_radius = 0.24_rk * 2.0_rk inner_radius = 0.01_rk * 2.0_rk res1 = 3500 res2 = 1000 center ( 2 ) = center ( 2 ) / aspect_ratio call shape % set_half_ring ( center , inner_radius , outer_radius ) call shape % rotate_Xc ( 0.0_rk , 0.0_rk , - 9 0.0_rk ) call shape % translate_Xc ([ 0.25_rk , 0.75_rk , 0.0_rk ]) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the x-direction z_values = ( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'oslo10' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting the colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a ring center = [ 0.0_rk , 0.0_rk , 0.0_rk ] outer_radius = 0.24_rk * 2.0_rk inner_radius = 0.22_rk * 2.0_rk res1 = 3500 res2 = 1000 center ( 2 ) = center ( 2 ) / aspect_ratio call shape % set_half_ring ( center , inner_radius , outer_radius ) call shape % rotate_Xc ( 0.0_rk , 0.0_rk , 0.0_rk ) call shape % translate_Xc ([ 0.75_rk , 0.75_rk , 0.0_rk ]) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the x-direction z_values = ( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- red = 255 green = 215 blue = 0 !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting the colors' ) !----------------------------------------------------------------------------- ! Save the image to a PPM file using ForImage library !----------------------------------------------------------------------------- call t % timer_start () call image % set_pnm (& encoding = 'binary' , & file_format = 'ppm' , & width = width , & height = height , & max_color = 255 , & comment = 'example: ForCAD + ForImage + ForColor + ForColormap' , & pixels = px & ) call image % export_pnm ( 'ppm/example_ppm2' ) call image % finalize () call t % timer_stop ( message = 'Saving the image' ) ! Clean up call cmap % finalize () deallocate ( px , Xg , z_values ) end program","tags":"","loc":"sourcefile/example_ppm2.f90.html"},{"title":"example_volume_1.f90 – ForCAD","text":"This file depends on sourcefile~~example_volume_1.f90~~EfferentGraph sourcefile~example_volume_1.f90 example_volume_1.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~example_volume_1.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> This program demonstrates the usage of a NURBS (Non-Uniform Rational B-Spline) volume object to create  and finalize a NURBS volume. !> It sets up control points, weights, and knot vectors for all three dimensions, generates the volume, and exports the control points and the volume to VTK files. program example3_volume use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: nurbs !! Declare a NURBS volume object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights real ( rk ) :: knot1 ( 4 ), knot2 ( 4 ), knot3 ( 4 ) !! Arrays for knot vectors in all three dimensions !----------------------------------------------------------------------------- ! Setting up the NURBS volume !----------------------------------------------------------------------------- !> Define the control points for the NURBS volume Xc = generate_Xc ( 5.0_rk ) !> Define weights for the control points (optional) allocate ( Wc ( size ( Xc , 1 )), source = 1.0_rk ) Wc ( 2 ) = 5.0_rk !> Define knot vectors for all three dimensions knot1 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] knot3 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] !> Set knot vectors, control points, and weights for the NURBS volume object !> Wc is optional. call nurbs % set ( knot1 , knot2 , knot3 , Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export the control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_volume_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS volume !----------------------------------------------------------------------------- !> Generate the NURBS volume with resolutions of 20, 20, and 20 in the three dimensions call nurbs % create ( 20 , 20 , 20 ) !> Export the generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_volume_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_volume_Xc.vtk' , 'vtk/nurbs_volume_Xg.vtk' ) !----------------------------------------------------------------------------- ! Refinements !----------------------------------------------------------------------------- !> Print size of knot vectors print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) print * , size ( nurbs % get_knot ( 3 )) !> Insert knots 0.25 and 0.75 in all three directions call nurbs % insert_knots ( 1 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 1 call nurbs % insert_knots ( 2 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 2 call nurbs % insert_knots ( 3 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 3 !> Print size of knot vectors after inserting knots print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) print * , size ( nurbs % get_knot ( 3 )) !> Print degrees print * , nurbs % get_degree () !> Elevate degree by 2 in all three directions call nurbs % elevate_degree ( 1 , 2 ) ! direction 1 call nurbs % elevate_degree ( 2 , 2 ) ! direction 2 call nurbs % elevate_degree ( 3 , 2 ) ! direction 3 !> Print degrees after elevating print * , nurbs % get_degree () !> Print size of knot vectors print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) print * , size ( nurbs % get_knot ( 3 )) call nurbs % remove_knots ( 1 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 1 call nurbs % remove_knots ( 2 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 2 call nurbs % remove_knots ( 3 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 3 !> Print size of knot vectors after removing knots print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) print * , size ( nurbs % get_knot ( 3 )) !> Generate the refined NURBS volume with resolutions of 40, 40, and 40 in the three dimensions call nurbs % create () !> Export updated control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_volume_Xc2.vtk' ) !> Export the refined generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_volume_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_volume_Xc2.vtk' , 'vtk/nurbs_volume_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Transformations !----------------------------------------------------------------------------- !> Rotate the control points call nurbs % rotate_Xc ( alpha =- 4 5.0_rk , beta = 0.0_rk , theta = 9 0.0_rk ) !> Rotate the generated curve call nurbs % rotate_Xg ( alpha =- 4 5.0_rk , beta = 0.0_rk , theta = 9 0.0_rk ) !> Translate the control points call nurbs % translate_Xc ([ 1.0_rk , 2.0_rk , - 3.0_rk ]) !> Translate the generated curve call nurbs % translate_Xg ([ 1.0_rk , 2.0_rk , - 3.0_rk ]) !> Export the transformed control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_volume_Xc3.vtk' ) !> Export the transformed generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_volume_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_volume_Xc3.vtk' , 'vtk/nurbs_volume_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Extract faces !----------------------------------------------------------------------------- !> first compute and set the connectivities of volume elements call nurbs % set_elem ( nurbs % cmp_elem ()) !> get the connectivity of the face1 of the first element print * , 'Face 1 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 1 ) print * , 'Face 2 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 2 ) print * , 'Face 3 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 3 ) print * , 'Face 4 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 4 ) print * , 'Face 5 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 5 ) print * , 'Face 6 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 6 ) !> get the degree of the faces print * , 'Degree of face 1:' , nurbs % cmp_degreeFace ( face = 1 ) print * , 'Degree of face 2:' , nurbs % cmp_degreeFace ( face = 2 ) print * , 'Degree of face 3:' , nurbs % cmp_degreeFace ( face = 3 ) print * , 'Degree of face 4:' , nurbs % cmp_degreeFace ( face = 4 ) print * , 'Degree of face 5:' , nurbs % cmp_degreeFace ( face = 5 ) print * , 'Degree of face 6:' , nurbs % cmp_degreeFace ( face = 6 ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS volume object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( L ) result ( control_points ) implicit none real ( rk ), intent ( in ) :: L real ( rk ), allocatable :: control_points (:,:) real ( rk ) :: L2 L2 = L / 2.0_rk allocate ( control_points ( 8 , 3 )) control_points ( 1 ,:) = [ L2 , - L2 , L2 ] control_points ( 2 ,:) = [ L2 , - L2 , - L2 ] control_points ( 3 ,:) = [ - L2 , - L2 , L2 ] control_points ( 4 ,:) = [ - L2 , - L2 , - L2 ] control_points ( 5 ,:) = [ L2 , L2 , L2 ] control_points ( 6 ,:) = [ L2 , L2 , - L2 ] control_points ( 7 ,:) = [ - L2 , L2 , L2 ] control_points ( 8 ,:) = [ - L2 , L2 , - L2 ] end function !----------------------------------------------------------------------------- end program example3_volume","tags":"","loc":"sourcefile/example_volume_1.f90.html"},{"title":"example_curve_1.f90 – ForCAD","text":"This file depends on sourcefile~~example_curve_1.f90~~EfferentGraph sourcefile~example_curve_1.f90 example_curve_1.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~example_curve_1.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> This program demonstrates the usage of a NURBS (Non-Uniform Rational B-Spline) curve object to create  and finalize a NURBS curve. !> It sets up control points, weights, and knot vectors for all three dimensions, generates the curve, and exports the control points and the curve to VTK files. program example1_curve use forcad , only : rk , nurbs_curve implicit none type ( nurbs_curve ) :: nurbs !! Declare a NURBS curve object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights real ( rk ) :: knot ( 6 ) !! Array for knot vector !----------------------------------------------------------------------------- ! Setting up the NURBS curve !----------------------------------------------------------------------------- !> Define control points for the NURBS curve allocate ( Xc ( 3 , 3 )) Xc ( 1 ,:) = [ 0.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 0.0_rk , 5.0_rk , 0.0_rk ] Xc ( 3 ,:) = [ 5.0_rk , 5.0_rk , 0.0_rk ] !> Define weights for the control points (optional) allocate ( Wc ( 3 )) Wc = [ 1.0_rk , 2.0_rk , 0.3_rk ] !> Define knot vector knot = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] !> Set knot vector, control points, and weights for the NURBS curve object. !> Wc is optional call nurbs % set ( knot , Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_curve_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS curve !----------------------------------------------------------------------------- !> Generate the NURBS curve with a resolution of 20 call nurbs % create ( res = 20 ) !> Export the generated curve to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_curve_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_curve_Xc.vtk' , 'vtk/nurbs_curve_Xg.vtk' ) !----------------------------------------------------------------------------- ! Refinements !----------------------------------------------------------------------------- !> Print size of the knot vector print * , size ( nurbs % get_knot ()) !> Insert knots 0.25, twice and 0.75, once call nurbs % insert_knots ([ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) !> Print size of the updated knot vector print * , size ( nurbs % get_knot ()) !> Print the degree of the curve print * , nurbs % get_degree () !> Elevate the degree of the curve (2 times) call nurbs % elevate_degree ( 2 ) !> Print the updated degree of the curve print * , nurbs % get_degree () !> Print size of the knot vector print * , size ( nurbs % get_knot ()) !> Remove knots 0.25, twice and 0.75, once call nurbs % remove_knots ([ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) !> Print size of the updated knot vector print * , size ( nurbs % get_knot ()) !> Generate the refined curve with a resolution of 20 call nurbs % create () !> Export updated control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_curve_Xc2.vtk' ) !> Export the refined generated curve to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_curve_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_curve_Xc2.vtk' , 'vtk/nurbs_curve_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Transformations !----------------------------------------------------------------------------- !> Rotate the control points call nurbs % rotate_Xc ( alpha = 4 5.0_rk , beta = 0.0_rk , theta = 9 0.0_rk ) !> Rotate the generated curve call nurbs % rotate_Xg ( alpha =- 4 5.0_rk , beta = 0.0_rk , theta =- 9 0.0_rk ) !> Translate the control points call nurbs % translate_Xc ([ 1.0_rk , 2.0_rk , - 3.0_rk ]) !> Translate the generated curve call nurbs % translate_Xg ([ - 1.0_rk , - 2.0_rk , 3.0_rk ]) !> Export the transformed control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_curve_Xc3.vtk' ) !> Export the transformed generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_curve_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_curve_Xc3.vtk' , 'vtk/nurbs_curve_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call nurbs % finalize () end program example1_curve","tags":"","loc":"sourcefile/example_curve_1.f90.html"},{"title":"shape_C_2d.f90 – ForCAD","text":"This file depends on sourcefile~~shape_c_2d.f90~~EfferentGraph sourcefile~shape_c_2d.f90 shape_C_2d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_c_2d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_C_2d use forcad , only : rk , nurbs_surface implicit none type ( nurbs_surface ) :: shape !----------------------------------------------------------------------------- ! Setting up NURBS C-shape !----------------------------------------------------------------------------- !> Set a C-shape with radius 2.0 and center at [0.0, 0.0, 0.0] call shape % set_C ( center = [ 0.0_rk , 0.0_rk , 0.0_rk ], radius1 = 1.0_rk , radius2 = 2.0_rk ) !> Export control points to a VTK file call shape % export_Xc ( 'vtk/shape_C_2d_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating C-shape !----------------------------------------------------------------------------- !> Generate the NURBS C-shape with a resolution of 100 call shape % create ( 100 , 60 ) !> Export the generated cirlce to a VTK file call shape % export_Xg ( 'vtk/shape_C_2d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_C_2d_Xc.vtk' , 'vtk/shape_C_2d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call shape % finalize () end program","tags":"","loc":"sourcefile/shape_c_2d.f90.html"},{"title":"nearest_point_2d_bench.f90 – ForCAD","text":"This file depends on sourcefile~~nearest_point_2d_bench.f90~~EfferentGraph sourcefile~nearest_point_2d_bench.f90 nearest_point_2d_bench.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~nearest_point_2d_bench.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program nearest_point_2d_bench use forcad , only : rk , nurbs_surface use fortime implicit none type ( nurbs_surface ) :: shape !! Declare a NURBS surface object real ( rk ), allocatable :: nearest_Xg (:) !! Coordinates of the nearest point on the surface real ( rk ), allocatable :: nearest_Xt (:) !! Corresponding parametric coordinates of the nearest point integer :: id !! id of the nearest point real ( rk ), allocatable :: points (:,:) integer :: i , j type ( timer ) :: t !----------------------------------------------------------------------------- ! Setting up the NURBS tetrangon !----------------------------------------------------------------------------- !> Set a tetragon with lengths of 2.0 and 3.0 and 3 and 4 control points in each direction !> The weights of the control points (Wc) are optional. call shape % set_tetragon ( L = [ 2.0_rk , 3.0_rk ], nc = [ 3 , 4 ]) !----------------------------------------------------------------------------- ! Creating the NURBS surface !----------------------------------------------------------------------------- !> Generate the NURBS surface with resolutions of 30 in both dimensions call shape % create ( 100 , 100 ) !----------------------------------------------------------------------------- ! Nearest point on the surface !----------------------------------------------------------------------------- !> Find the nearest point on the surface to a given point ! nearest_Xg: Coordinates of the nearest point on the surface (optional) ! nearest_Xt: Corresponding parametric coordinates of the nearest point (optional) ! id: id of the nearest point (optional) do j = 1 , 40 allocate ( points ( j * 1000 , 3 )) print * , j * 1000 call random_number ( points ) call t % timer_start () do concurrent ( i = 1 : size ( points , 1 )) call shape % nearest_point ( points ( i ,:), nearest_Xg , nearest_Xt , id ) end do call t % timer_stop () deallocate ( points ) end do !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS surface object call shape % finalize () deallocate ( nearest_Xg , nearest_Xt ) end program","tags":"","loc":"sourcefile/nearest_point_2d_bench.f90.html"},{"title":"forcad_utils.f90 – ForCAD","text":"Files dependent on this one sourcefile~~forcad_utils.f90~~AfferentGraph sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 sourcefile~put_to_nurbs.f90 put_to_nurbs.f90 sourcefile~put_to_nurbs.f90->sourcefile~forcad_utils.f90 sourcefile~put_to_nurbs.f90->sourcefile~forcad.f90 sourcefile~cmp_area.f90 cmp_area.f90 sourcefile~cmp_area.f90->sourcefile~forcad.f90 sourcefile~cmp_length.f90 cmp_length.f90 sourcefile~cmp_length.f90->sourcefile~forcad.f90 sourcefile~cmp_volume.f90 cmp_volume.f90 sourcefile~cmp_volume.f90->sourcefile~forcad.f90 sourcefile~demo_curve.f90 demo_curve.f90 sourcefile~demo_curve.f90->sourcefile~forcad.f90 sourcefile~demo_surface.f90 demo_surface.f90 sourcefile~demo_surface.f90->sourcefile~forcad.f90 sourcefile~demo_volume.f90 demo_volume.f90 sourcefile~demo_volume.f90->sourcefile~forcad.f90 sourcefile~example_curve_1.f90 example_curve_1.f90 sourcefile~example_curve_1.f90->sourcefile~forcad.f90 sourcefile~example_ppm1.f90 example_ppm1.f90 sourcefile~example_ppm1.f90->sourcefile~forcad.f90 sourcefile~example_ppm2.f90 example_ppm2.f90 sourcefile~example_ppm2.f90->sourcefile~forcad.f90 sourcefile~example_ppm3.f90 example_ppm3.f90 sourcefile~example_ppm3.f90->sourcefile~forcad.f90 sourcefile~example_surface_1.f90 example_surface_1.f90 sourcefile~example_surface_1.f90->sourcefile~forcad.f90 sourcefile~example_volume_1.f90 example_volume_1.f90 sourcefile~example_volume_1.f90->sourcefile~forcad.f90 sourcefile~nearest_point_1d.f90 nearest_point_1d.f90 sourcefile~nearest_point_1d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d.f90 nearest_point_2d.f90 sourcefile~nearest_point_2d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d_bench.f90 nearest_point_2d_bench.f90 sourcefile~nearest_point_2d_bench.f90->sourcefile~forcad.f90 sourcefile~nearest_point_3d.f90 nearest_point_3d.f90 sourcefile~nearest_point_3d.f90->sourcefile~forcad.f90 sourcefile~shape_c_1d.f90 shape_C_1d.f90 sourcefile~shape_c_1d.f90->sourcefile~forcad.f90 sourcefile~shape_c_2d.f90 shape_C_2d.f90 sourcefile~shape_c_2d.f90->sourcefile~forcad.f90 sourcefile~shape_c_3d.f90 shape_C_3d.f90 sourcefile~shape_c_3d.f90->sourcefile~forcad.f90 sourcefile~shape_circle.f90 shape_circle.f90 sourcefile~shape_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_circle.f90 shape_half_circle.f90 sourcefile~shape_half_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_2d.f90 shape_half_ring_2d.f90 sourcefile~shape_half_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_3d.f90 shape_half_ring_3d.f90 sourcefile~shape_half_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_hexahedron.f90 shape_hexahedron.f90 sourcefile~shape_hexahedron.f90->sourcefile~forcad.f90 sourcefile~shape_ring_2d.f90 shape_ring_2d.f90 sourcefile~shape_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_ring_3d.f90 shape_ring_3d.f90 sourcefile~shape_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_tetragon.f90 shape_tetragon.f90 sourcefile~shape_tetragon.f90->sourcefile~forcad.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> This module contains parameters, functions and subroutines that are used in the library. module forcad_utils use stdlib_quadrature , only : gauss_legendre implicit none private public :: rk , basis_bernstein , basis_bspline , elemConn_C0 , kron , ndgrid , compute_multiplicity , compute_knot_vector , & basis_bspline_der , insert_knot_A_5_1 , findspan , elevate_degree_A_5_9 , hexahedron_Xc , tetragon_Xc , remove_knots_A_5_8 , & elemConn_Cn , unique , rotation , basis_bspline_2der , det , inv , dyad , gauss_leg integer , parameter :: rk = kind ( 1.0d0 ) !=============================================================================== interface elemConn_C0 module procedure cmp_elemConn_C0_L module procedure cmp_elemConn_C0_S module procedure cmp_elemConn_C0_V end interface !=============================================================================== !=============================================================================== interface elemConn_Cn module procedure cmp_elemConn_Cn_L module procedure cmp_elemConn_Cn_S module procedure cmp_elemConn_Cn_V end interface !=============================================================================== !=============================================================================== interface ndgrid module procedure ndgrid2 module procedure ndgrid3 end interface !=============================================================================== !=============================================================================== interface compute_multiplicity module procedure compute_multiplicity1 module procedure compute_multiplicity2 end interface !=============================================================================== !=============================================================================== interface unique module procedure unique_integer module procedure unique_real end interface !=============================================================================== !=============================================================================== interface dyad module procedure dyad_t1_t1 end interface !=============================================================================== !=============================================================================== interface gauss_leg module procedure gauss_legendre_1D module procedure gauss_legendre_2D module procedure gauss_legendre_3D end interface !=============================================================================== contains !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function basis_bspline ( Xt , knot , nc , degree ) result ( B ) integer , intent ( in ) :: degree real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: nc real ( rk ), intent ( in ) :: Xt real ( rk ) :: temp , Xth_i , Xth_i1 , Xth_ip , Xth_ip1 real ( rk ), allocatable :: Nt (:,:) integer :: i , p real ( rk ), allocatable :: B (:) temp = abs ( Xt - knot ( size ( knot ))) allocate ( Nt ( nc , 0 : degree ), source = 0.0_rk ) do p = 0 , degree do concurrent ( i = 1 : nc ) Xth_i = knot ( i ) Xth_i1 = knot ( i + 1 ) Xth_ip = knot ( i + p ) Xth_ip1 = knot ( i + p + 1 ) if ( temp /= tiny ( 0.0_rk ) . and . Xt >= Xth_i . and . Xt <= Xth_i1 ) Nt ( i , 0 ) = 1.0_rk if ( Xth_ip /= Xth_i ) Nt ( i , p ) = ( Xt - Xth_i ) / ( Xth_ip - Xth_i ) * Nt ( i , p - 1 ) if ( Xth_ip1 /= Xth_i1 ) Nt ( i , p ) = Nt ( i , p ) + ( Xth_ip1 - Xt ) / ( Xth_ip1 - Xth_i1 ) * Nt ( i + 1 , p - 1 ) end do end do B = Nt (:, degree ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine basis_bspline_der ( Xt , knot , nc , degree , dB , B ) integer , intent ( in ) :: degree real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: nc real ( rk ), intent ( in ) :: Xt real ( rk ), allocatable , intent ( out ) :: dB (:) real ( rk ), allocatable , intent ( out ), optional :: B (:) real ( rk ), allocatable :: N (:,:), dN_dXt (:,:) real ( rk ) :: temp , Xth_i , Xth_i1 , Xth_ip , Xth_ip1 integer :: i , p temp = abs ( Xt - knot ( size ( knot ))) allocate ( N ( nc , 0 : degree ), source = 0.0_rk ) allocate ( dN_dXt ( nc , 0 : degree ), source = 0.0_rk ) do p = 0 , degree do concurrent ( i = 1 : nc ) Xth_i = knot ( i ) Xth_i1 = knot ( i + 1 ) Xth_ip = knot ( i + p ) Xth_ip1 = knot ( i + p + 1 ) if ( temp /= tiny ( 0.0_rk ) . and . Xth_i <= Xt . and . Xt <= Xth_i1 ) then N ( i , 0 ) = 1.0_rk dN_dXt ( i , 0 ) = 0.0_rk end if if ( Xth_ip /= Xth_i ) then N ( i , p ) = ( Xt - Xth_i ) / ( Xth_ip - Xth_i ) * N ( i , p - 1 ) dN_dXt ( i , p ) = ( N ( i , p - 1 ) + ( Xt - Xth_i ) * dN_dXt ( i , p - 1 ) ) / ( Xth_ip - Xth_i ) end if if ( Xth_ip1 /= Xth_i1 ) then N ( i , p ) = N ( i , p ) + ( Xth_ip1 - Xt ) / ( Xth_ip1 - Xth_i1 ) * N ( i + 1 , p - 1 ) dN_dXt ( i , p ) = dN_dXt ( i , p ) - ( N ( i + 1 , p - 1 ) - ( Xth_ip1 - Xt ) * dN_dXt ( i + 1 , p - 1 ) ) / ( Xth_ip1 - Xth_i1 ) end if end do end do dB = dN_dXt (:, degree ) if ( present ( B )) B = N (:, degree ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine basis_bspline_2der ( Xt , knot , nc , degree , d2B , dB , B ) integer , intent ( in ) :: degree real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: nc real ( rk ), intent ( in ) :: Xt real ( rk ), allocatable , intent ( out ) :: d2B (:) real ( rk ), allocatable , intent ( out ), optional :: dB (:) real ( rk ), allocatable , intent ( out ), optional :: B (:) real ( rk ), allocatable :: N (:,:), dN_dXt (:,:), d2N_dXt2 (:,:) real ( rk ) :: temp , Xth_i , Xth_i1 , Xth_ip , Xth_ip1 integer :: i , p temp = abs ( Xt - knot ( size ( knot ))) allocate ( N ( nc , 0 : degree ), source = 0.0_rk ) allocate ( dN_dXt ( nc , 0 : degree ), source = 0.0_rk ) allocate ( d2N_dXt2 ( nc , 0 : degree ), source = 0.0_rk ) do p = 0 , degree do concurrent ( i = 1 : nc ) Xth_i = knot ( i ) Xth_i1 = knot ( i + 1 ) Xth_ip = knot ( i + p ) Xth_ip1 = knot ( i + p + 1 ) if ( temp /= tiny ( 0.0_rk ) . and . Xth_i <= Xt . and . Xt <= Xth_i1 ) then N ( i , 0 ) = 1.0_rk dN_dXt ( i , 0 ) = 0.0_rk d2N_dXt2 ( i , 0 ) = 0.0_rk end if if ( Xth_ip /= Xth_i ) then N ( i , p ) = ( Xt - Xth_i ) / ( Xth_ip - Xth_i ) * N ( i , p - 1 ) ! dN_dXt(i,p) = p*(N(i,p-1)/(Xth_ip - Xth_i)) dN_dXt ( i , p ) = ( N ( i , p - 1 ) + ( Xt - Xth_i ) * dN_dXt ( i , p - 1 ) ) / ( Xth_ip - Xth_i ) d2N_dXt2 ( i , p ) = ( 2 * dN_dXt ( i , p - 1 ) + ( Xt - Xth_i ) * d2N_dXt2 ( i , p - 1 )) / ( Xth_ip - Xth_i ) end if if ( Xth_ip1 /= Xth_i1 ) then N ( i , p ) = N ( i , p ) + ( Xth_ip1 - Xt ) / ( Xth_ip1 - Xth_i1 ) * N ( i + 1 , p - 1 ) ! dN_dXt(i,p) = dN_dXt(i,p) - p*( N(i+1,p-1)/(Xth_ip1 - Xth_i1)) dN_dXt ( i , p ) = dN_dXt ( i , p ) - ( N ( i + 1 , p - 1 ) - ( Xth_ip1 - Xt ) * dN_dXt ( i + 1 , p - 1 ) ) / ( Xth_ip1 - Xth_i1 ) d2N_dXt2 ( i , p ) = d2N_dXt2 ( i , p ) - ( 2 * dN_dXt ( i + 1 , p - 1 ) - ( Xth_ip1 - Xt ) * d2N_dXt2 ( i + 1 , p - 1 )) / ( Xth_ip1 - Xth_i1 ) end if end do end do d2B = d2N_dXt2 (:, degree ) if ( present ( dB )) dB = dN_dXt (:, degree ) if ( present ( B )) B = N (:, degree ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function basis_bernstein ( Xt , nc ) result ( B ) real ( rk ), intent ( in ) :: Xt integer , intent ( in ) :: nc real ( rk ), allocatable :: B (:) integer :: p , degree degree = nc - 1 allocate ( B ( nc ), source = 0.0_rk ) do concurrent ( p = 0 : degree ) B ( p + 1 ) = gamma ( real ( nc , kind = rk )) / ( gamma ( real ( p + 1 , kind = rk )) * gamma ( real ( nc - p , kind = rk ))) if ( Xt == 0.0_rk . and . p == 0 ) then B ( p + 1 ) = B ( p + 1 ) * ( 1.0_rk - Xt ) ** ( degree - p ) else if ( Xt == 0.0_rk . and . degree - p == 0 ) then B ( p + 1 ) = B ( p + 1 ) * ( Xt ** p ) else B ( p + 1 ) = B ( p + 1 ) * ( Xt ** p ) * ( 1.0_rk - Xt ) ** ( degree - p ) end if end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function kron ( u , v ) result ( w ) real ( rk ), intent ( in ), contiguous :: u (:), v (:) real ( rk ) :: w ( size ( u ) * size ( v )) integer :: i , j , n n = size ( v ) do concurrent ( i = 1 : size ( u ), j = 1 : n ) w (( i - 1 ) * n + j ) = u ( i ) * v ( j ) end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine ndgrid2 ( X_dir1 , X_dir2 , Xt ) real ( rk ), intent ( in ), contiguous :: X_dir1 (:), X_dir2 (:) real ( rk ), allocatable , intent ( out ) :: Xt (:,:) integer :: s1 , s2 , i , j s1 = size ( X_dir1 ) s2 = size ( X_dir2 ) allocate ( Xt ( s1 * s2 , 2 )) do concurrent ( j = 1 : s2 , i = 1 : s1 ) Xt (( j - 1 ) * s1 + i , 1 ) = X_dir1 ( i ) Xt (( j - 1 ) * s1 + i , 2 ) = X_dir2 ( j ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine ndgrid3 ( X_dir1 , X_dir2 , X_dir3 , Xt ) real ( rk ), intent ( in ), contiguous :: X_dir1 (:), X_dir2 (:), X_dir3 (:) real ( rk ), allocatable , intent ( out ) :: Xt (:,:) integer :: s1 , s2 , s3 , i , j , k s1 = size ( X_dir1 ) s2 = size ( X_dir2 ) s3 = size ( X_dir3 ) allocate ( Xt ( s1 * s2 * s3 , 3 )) do concurrent ( k = 1 : s3 , j = 1 : s2 , i = 1 : s1 ) Xt ((( k - 1 ) * s2 + ( j - 1 )) * s1 + i , 1 ) = X_dir1 ( i ) Xt ((( k - 1 ) * s2 + ( j - 1 )) * s1 + i , 2 ) = X_dir2 ( j ) Xt ((( k - 1 ) * s2 + ( j - 1 )) * s1 + i , 3 ) = X_dir3 ( k ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function repelem ( a , b ) result ( c ) real ( rk ), intent ( in ), contiguous :: a (:) integer , intent ( in ), contiguous :: b (:) real ( rk ) :: c ( sum ( b )) integer :: i , l , n l = 0 do i = 1 , size ( a ) n = b ( i ) c ( l + 1 : l + n ) = a ( i ) l = l + n end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elemConn_C0_L ( nnode , p ) result ( elemConn ) integer , intent ( in ) :: nnode integer , intent ( in ) :: p integer , allocatable :: elemConn (:,:) integer :: i , l integer , allocatable :: nodes (:) if ( mod ( nnode - 1 , p ) /= 0 ) error stop 'cmp_elemConn_C0_L: nnode-1 must be divisible by p' allocate ( elemConn ( ( nnode - 1 ) / p , p + 1 )) nodes = [( i , i = 1 , nnode )] l = 0 do i = 1 , nnode - p , p l = l + 1 elemConn ( l ,:) = reshape ( nodes ( i : i + p ),[( p + 1 )]) end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elemConn_C0_S ( nnode1 , nnode2 , p1 , p2 ) result ( elemConn ) integer , intent ( in ) :: nnode1 , nnode2 integer , intent ( in ) :: p1 , p2 integer , allocatable :: elemConn (:,:) integer :: i , j , l integer , allocatable :: nodes (:,:) if ( mod ( nnode1 - 1 , p1 ) /= 0 ) error stop 'cmp_elemConn_C0_S: nnode1-1 must be divisible by p1' if ( mod ( nnode2 - 1 , p2 ) /= 0 ) error stop 'cmp_elemConn_C0_S: nnode2-1 must be divisible by p2' allocate ( elemConn ( (( nnode1 - 1 ) / p1 ) * (( nnode2 - 1 ) / p2 ), ( p1 + 1 ) * ( p2 + 1 ))) nodes = reshape ([( i , i = 1 , nnode1 * nnode2 )], [ nnode1 , nnode2 ]) l = 0 do j = 1 , nnode2 - p2 , p2 do i = 1 , nnode1 - p1 , p1 l = l + 1 elemConn ( l ,:) = reshape ( nodes ( i : i + p1 , j : j + p2 ),[( p1 + 1 ) * ( p2 + 1 )]) end do end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elemConn_C0_V ( nnode1 , nnode2 , nnode3 , p1 , p2 , p3 ) result ( elemConn ) integer , intent ( in ) :: nnode1 , nnode2 , nnode3 integer , intent ( in ) :: p1 , p2 , p3 integer , allocatable :: elemConn (:,:) integer :: i , j , k , l integer , allocatable :: nodes (:,:,:) if ( mod ( nnode1 - 1 , p1 ) /= 0 ) error stop 'cmp_elemConn_C0_V: nnode1-1 must be divisible by p1' if ( mod ( nnode2 - 1 , p2 ) /= 0 ) error stop 'cmp_elemConn_C0_V: nnode2-1 must be divisible by p2' if ( mod ( nnode3 - 1 , p3 ) /= 0 ) error stop 'cmp_elemConn_C0_V: nnode3-1 must be divisible by p3' allocate ( elemConn ( (( nnode1 - 1 ) / p1 ) * (( nnode2 - 1 ) / p2 ) * (( nnode3 - 1 ) / p3 ) ,( p1 + 1 ) * ( p2 + 1 ) * ( p3 + 1 ))) nodes = reshape ([( i , i = 1 , nnode1 * nnode2 * nnode3 )], [ nnode1 , nnode2 , nnode3 ]) l = 0 do k = 1 , nnode3 - p3 , p3 do j = 1 , nnode2 - p2 , p2 do i = 1 , nnode1 - p1 , p1 l = l + 1 elemConn ( l ,:) = reshape ( nodes ( i : i + p1 , j : j + p2 , k : k + p3 ),[( p1 + 1 ) * ( p2 + 1 ) * ( p3 + 1 )]) end do end do end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_elemConn_Cn_L ( nnode , p , Xth , vecKnot_mul , elemConn ) integer , intent ( in ) :: p , nnode integer , intent ( in ), contiguous :: vecKnot_mul (:) real ( rk ), intent ( in ), contiguous :: Xth (:) integer , allocatable , intent ( out ) :: elemConn (:,:) integer , allocatable :: nodes (:) integer :: i , nnel , m , nelem nnel = p + 1 nodes = [( i , i = 1 , nnode )] nelem = size ( Xth ) - 1 allocate ( elemConn ( nelem , nnel )) m = - p do i = 1 , nelem m = m + vecKnot_mul ( i ) elemConn ( i ,:) = nodes ( m : m + p ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_elemConn_Cn_S ( nnode1 , nnode2 , p1 , p2 ,& Xth1 , Xth2 , vecKnot_mul1 , vecKnot_mul2 , elemConn ) integer , intent ( in ) :: p1 , p2 , nnode1 , nnode2 integer , intent ( in ), contiguous :: vecKnot_mul1 (:), vecKnot_mul2 (:) real ( rk ), intent ( in ), contiguous :: Xth1 (:), Xth2 (:) integer , allocatable , intent ( out ) :: elemConn (:,:) integer , allocatable :: nodes (:,:), nodes_vec (:) integer :: nnd_total , i , j , l , nnel1 , nnel2 , m , n , nelem1 , nelem2 , nelem nnel1 = p1 + 1 nnel2 = p2 + 1 nnd_total = nnode1 * nnode2 allocate ( nodes_vec ( nnd_total )) Nodes_vec = [( i , i = 1 , nnd_total )] nodes = reshape ( nodes_vec ,[ nnode1 , nnode2 ]) nelem1 = size ( Xth1 ) - 1 nelem2 = size ( Xth2 ) - 1 nelem = nelem1 * nelem2 allocate ( elemConn ( nelem , nnel1 * nnel2 )) l = 0 n = - p2 do j = 1 , nelem2 n = n + vecKnot_mul2 ( j ) m = - p1 do i = 1 , nelem1 m = m + vecKnot_mul1 ( i ) l = l + 1 elemConn ( l ,:) = reshape ( nodes ( m : m + p1 , n : n + p2 ), [ nnel1 * nnel2 ]) end do end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_elemConn_Cn_V ( nnode1 , nnode2 , nnode3 , p1 , p2 , p3 ,& Xth1 , Xth2 , Xth3 , vecKnot_mul1 , vecKnot_mul2 , vecKnot_mul3 , elemConn ) integer , intent ( in ) :: p1 , p2 , p3 , nnode1 , nnode2 , nnode3 integer , intent ( in ), contiguous :: vecKnot_mul1 (:), vecKnot_mul2 (:), vecKnot_mul3 (:) real ( rk ), intent ( in ), contiguous :: Xth1 (:), Xth2 (:), Xth3 (:) integer , allocatable , intent ( out ) :: elemConn (:,:) integer , allocatable :: nodes (:,:,:), nodes_vec (:) integer :: nnd_total , i , j , k , l , nnel1 , nnel2 , nnel3 , m , n , o , nelem1 , nelem2 , nelem3 , nelem nnel1 = p1 + 1 nnel2 = p2 + 1 nnel3 = p3 + 1 nnd_total = nnode1 * nnode2 * nnode3 allocate ( nodes_vec ( nnd_total )) Nodes_vec = [( i , i = 1 , nnd_total )] nodes = reshape ( nodes_vec ,[ nnode1 , nnode2 , nnode3 ]) nelem1 = size ( Xth1 ) - 1 nelem2 = size ( Xth2 ) - 1 nelem3 = size ( Xth3 ) - 1 nelem = nelem1 * nelem2 * nelem3 allocate ( elemConn ( nelem , nnel1 * nnel2 * nnel3 )) l = 0 o = - p3 do k = 1 , nelem3 o = o + vecKnot_mul3 ( k ) n = - p2 do j = 1 , nelem2 n = n + vecKnot_mul2 ( j ) m = - p1 do i = 1 , nelem1 m = m + vecKnot_mul1 ( i ) l = l + 1 elemConn ( l ,:) = reshape ( nodes ( m : m + p1 , n : n + p2 , o : o + p3 ), [ nnel1 * nnel2 * nnel3 ]) end do end do end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function compute_multiplicity1 ( knot ) result ( multiplicity ) real ( rk ), intent ( in ), contiguous :: knot (:) integer , allocatable :: multiplicity (:) integer :: i , count count = 1 do i = 2 , size ( knot ) if ( knot ( i ) /= knot ( i - 1 )) count = count + 1 end do allocate ( multiplicity ( count )) multiplicity ( 1 ) = 1 count = 1 do i = 2 , size ( knot ) if ( knot ( i ) /= knot ( i - 1 )) then count = count + 1 multiplicity ( count ) = 1 else multiplicity ( count ) = multiplicity ( count ) + 1 end if end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function compute_multiplicity2 ( knot , Xth ) result ( multiplicity ) real ( rk ), intent ( in ), contiguous :: knot (:) real ( rk ), intent ( in ) :: Xth integer :: multiplicity integer :: i , count , size_knot size_knot = size ( knot ) multiplicity = 0 i = 1 do while ( i <= size_knot ) if ( knot ( i ) == Xth ) then count = 1 do while ( i + count <= size_knot . and . knot ( i + count ) == Xth ) count = count + 1 end do if ( count > multiplicity ) then multiplicity = count end if i = i + count else i = i + 1 end if end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function compute_knot_vector ( Xth_dir , degree , continuity ) result ( knot ) real ( rk ), intent ( in ), contiguous :: Xth_dir (:) integer , intent ( in ) :: degree integer , intent ( in ), contiguous :: continuity (:) real ( rk ), allocatable :: knot (:) knot = repelem ( Xth_dir , ( degree - continuity )) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause elemental pure function isinf ( x ) result ( output ) real ( rk ), intent ( in ) :: x logical :: output output = . false . if ( x > huge ( x )) output = . true . if ( x < - huge ( x )) output = . true . end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause elemental pure function isnan ( x ) result ( output ) real ( rk ), intent ( in ) :: x logical :: output output = . false . if ( x /= x ) output = . true . end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine insert_knot_A_5_1 ( p , UP , Pw , u , k , s , r , nq , UQ , Qw ) integer , intent ( in ) :: p , k , s , r real ( rk ), intent ( in ), contiguous :: UP ( 0 :), Pw ( 0 :,:) real ( rk ), intent ( in ) :: u real ( rk ), allocatable , intent ( out ) :: UQ (:), Qw (:,:) integer , intent ( out ) :: nq integer :: i , j , L , mp , dim , np real ( rk ), allocatable :: Rw (:,:) real ( rk ) :: alpha dim = size ( Pw , 2 ) np = size ( Pw , 1 ) - 1 mp = np + p + 1 nq = np + r allocate ( UQ ( 0 : mp + r )) allocate ( Qw ( 0 : nq , 1 : dim )) allocate ( Rw ( 0 : p , 1 : dim )) UQ ( 0 : k ) = UP ( 0 : k ) UQ ( k + 1 : k + r ) = u UQ ( k + 1 + r : mp + r ) = UP ( k + 1 : mp ) Qw ( 0 : k - p ,:) = Pw ( 0 : k - p ,:) Qw ( k - s + r : np + r ,:) = Pw ( k - s : np ,:) Rw ( 0 : p - s ,:) = Pw ( k - p : k - s ,:) do j = 1 , r L = k - p + j do i = 0 , p - j - s alpha = ( u - UP ( L + i )) / ( UP ( i + k + 1 ) - UP ( L + i )) Rw ( i ,:) = alpha * Rw ( i + 1 ,:) + ( 1.0_rk - alpha ) * Rw ( i ,:) end do Qw ( L ,:) = Rw ( 0 ,:) Qw ( k + r - j - s ,:) = Rw ( p - j - s ,:) end do Qw ( L + 1 : k - s - 1 ,:) = Rw ( 1 : k - s - 1 - L ,:) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function findspan ( n , degree , Xth , knot ) result ( s ) integer , intent ( in ) :: n , degree real ( rk ), intent ( in ) :: Xth real ( rk ), intent ( in ), contiguous :: knot (:) integer :: s integer :: low , high , mid if ( Xth == knot ( n + 2 )) then s = n return end if low = degree high = n + 1 mid = ( low + high ) / 2 do while ( Xth < knot ( mid + 1 ) . or . Xth >= knot ( mid + 2 )) if ( Xth < knot ( mid + 1 )) then high = mid else low = mid end if mid = ( low + high ) / 2 end do s = mid end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine elevate_degree_A_5_9 ( t , knot , degree , Xcw , nc_new , knot_new , Xcw_new ) integer , intent ( in ) :: t real ( rk ), intent ( in ), contiguous :: Xcw (:,:), knot (:) integer , intent ( in ) :: degree integer , intent ( out ) :: nc_new real ( rk ), allocatable , intent ( out ) :: Xcw_new (:,:), knot_new (:) real ( rk ), allocatable :: bezalfs (:,:), bpts (:,:), ebpts (:,:), Nextbpts (:,:), alfs (:) real ( rk ) :: inv , alpha1 , alpha2 , Xth1 , Xth2 , numer , den integer :: n , lbz , rbz , sv , tr , kj , first , knoti , last , alpha3 , dim , nc integer :: i , j , q , s , m , ph , ph2 , mpi , mh , r , a , b , Xcwi , oldr , mul integer , allocatable :: mlp (:) nc = size ( Xcw , 1 ) dim = size ( Xcw , 2 ) mlp = compute_multiplicity ( knot ) mlp = mlp + t nc_new = sum ( mlp ) - ( mlp ( 1 ) - 1 ) - 1 allocate ( Xcw_new ( nc_new , dim ), source = 0.0_rk ) allocate ( bezalfs ( degree + 1 , degree + t + 1 ), source = 0.0_rk ) allocate ( bpts ( degree + 1 , dim ), source = 0.0_rk ) allocate ( ebpts ( degree + t + 1 , dim ), source = 0.0_rk ) allocate ( Nextbpts ( degree + 1 , dim ), source = 0.0_rk ) allocate ( alfs ( degree ), source = 0.0_rk ) n = nc - 1 m = n + degree + 1 ph = degree + t ph2 = ph / 2 bezalfs ( 1 , 1 ) = 1.0_rk bezalfs ( degree + 1 , ph + 1 ) = 1.0_rk do i = 1 , ph2 inv = 1.0_rk / bincoeff ( ph , i ) mpi = min ( degree , i ) do j = max ( 0 , i - t ), mpi bezalfs ( j + 1 , i + 1 ) = inv * bincoeff ( degree , j ) * bincoeff ( t , i - j ) end do end do do i = ph2 + 1 , ph - 1 mpi = min ( degree , i ) do j = max ( 0 , i - t ), mpi bezalfs ( j + 1 , i + 1 ) = bezalfs ( degree - j + 1 , ph - i + 1 ) end do end do mh = ph knoti = ph + 1 r = - 1 a = degree b = degree + 1 Xcwi = 1 Xth1 = knot ( 1 ) Xcw_new ( 1 ,:) = Xcw ( 1 ,:) allocate ( knot_new ( sum ( mlp )), source = 0.0_rk ) knot_new ( 1 : ph + 1 ) = Xth1 do i = 0 , degree bpts ( i + 1 ,:) = Xcw ( i + 1 ,:) end do do while ( b < m ) i = b do while ( b < m . and . knot ( b + 1 ) == knot ( b + 2 )) b = b + 1 if ( b + 2 > size ( knot )) then exit end if end do mul = b - i + 1 mh = mh + mul + t Xth2 = knot ( b + 1 ) oldr = r r = degree - mul if ( oldr > 0 ) then lbz = ( oldr + 2 ) / 2 else lbz = 1 end if if ( r > 0 ) then rbz = ph - ( r + 1 ) / 2 else rbz = ph end if if ( r > 0 ) then numer = Xth2 - Xth1 do q = degree , mul + 1 , - 1 alfs ( q - mul ) = numer / ( knot ( a + q + 1 ) - Xth1 ) end do do j = 1 , r sv = r - j s = mul + j do q = degree , s , - 1 bpts ( q + 1 ,:) = ( 1.0_rk - alfs ( q - s + 1 )) * bpts ( q ,:) + alfs ( q - s + 1 ) * bpts ( q + 1 ,:) end do Nextbpts ( sv + 1 ,:) = bpts ( degree + 1 ,:) end do end if do i = lbz , ph ebpts ( i + 1 ,:) = 0.0_rk mpi = min ( degree , i ) do j = max ( 0 , i - t ), mpi ebpts ( i + 1 ,:) = bezalfs ( j + 1 , i + 1 ) * bpts ( j + 1 ,:) + ebpts ( i + 1 ,:) end do end do if ( oldr > 1 ) then first = knoti - 2 last = knoti den = Xth2 - Xth1 alpha3 = floor (( Xth2 - knot ( knoti )) / den ) do tr = 1 , oldr - 1 i = first j = last kj = j - knoti + 1 do while ( j - i > tr ) if ( i < Xcwi ) then alpha1 = ( Xth2 - knot ( i + 1 )) / ( Xth1 - knot ( i + 1 )) Xcw_new ( i + 1 ,:) = ( 1 - alpha1 ) * Xcw_new ( i ,:) + alpha1 * Xcw_new ( i + 1 ,:) end if if ( j >= lbz ) then if ( j - tr <= knoti - ph + oldr ) then alpha2 = ( Xth2 - knot_new ( j - tr + 1 )) / den ebpts ( kj + 1 ,:) = alpha2 * ebpts ( kj + 1 ,:) + ( 1 - alpha2 ) * ebpts ( kj + 2 ,:) else ebpts ( kj + 1 ,:) = ( 1 - alpha3 ) * ebpts (:, kj + 2 ) + alpha3 * ebpts ( kj + 1 ,:) end if end if i = i + 1 j = j - 1 kj = kj - 1 end do first = first - 1 last = last + 1 end do end if if ( a /= degree ) then do i = 0 , ph - oldr - 1 knot_new ( knoti + 1 ) = Xth1 knoti = knoti + 1 end do end if do j = lbz , rbz Xcw_new ( Xcwi + 1 ,:) = ebpts ( j + 1 ,:) Xcwi = Xcwi + 1 end do if ( b < m ) then do j = 0 , r - 1 bpts ( j + 1 ,:) = Nextbpts ( j + 1 ,:) end do do j = r , degree bpts ( j + 1 ,:) = Xcw ( b - degree + j + 1 ,:) end do a = b b = b + 1 Xth1 = Xth2 else do i = 0 , ph knot_new ( knoti + i + 1 ) = Xth2 end do end if end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function bincoeff ( n , k ) result ( b ) integer , intent ( in ) :: n , k real ( rk ) :: b b = floor ( 0.5_rk + exp ( factln ( n ) - factln ( k ) - factln ( n - k ))) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function factln ( n ) result ( f ) integer , intent ( in ) :: n real ( rk ) :: f if ( n <= 1 ) then f = 0.0_rk return end if f = log ( gamma ( real ( n + 1 , rk ))) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function hexahedron_Xc ( L , nc ) result ( Xc ) real ( rk ), intent ( in ) :: L ( 3 ) integer , intent ( in ) :: nc ( 3 ) real ( rk ), allocatable :: Xc (:,:) real ( rk ) :: dx , dy , dz integer :: i , j , k , nci dx = L ( 1 ) / real ( nc ( 1 ) - 1 , rk ) dy = L ( 2 ) / real ( nc ( 2 ) - 1 , rk ) dz = L ( 3 ) / real ( nc ( 3 ) - 1 , rk ) allocate ( Xc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) nci = 1 do k = 0 , nc ( 3 ) - 1 do j = 0 , nc ( 2 ) - 1 do i = 0 , nc ( 1 ) - 1 Xc ( nci , 1 ) = real ( i , rk ) * dx Xc ( nci , 2 ) = real ( j , rk ) * dy Xc ( nci , 3 ) = real ( k , rk ) * dz nci = nci + 1 end do end do end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function tetragon_Xc ( L , nc ) result ( Xc ) real ( rk ), intent ( in ) :: L ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), allocatable :: Xc (:,:) real ( rk ) :: dx , dy integer :: i , j , nci dx = L ( 1 ) / real ( nc ( 1 ) - 1 , rk ) dy = L ( 2 ) / real ( nc ( 2 ) - 1 , rk ) allocate ( Xc ( nc ( 1 ) * nc ( 2 ), 3 )) nci = 1 do j = 0 , nc ( 2 ) - 1 do i = 0 , nc ( 1 ) - 1 Xc ( nci , 1 ) = real ( i , rk ) * dx Xc ( nci , 2 ) = real ( j , rk ) * dy Xc ( nci , 3 ) = 0.0_rk nci = nci + 1 end do end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine remove_knots_A_5_8 ( p , knot , Pw , u , r , s , num , t , knot_new , Pw_new ) real ( rk ), intent ( in ) :: u integer , intent ( in ) :: p , r , s , num real ( rk ), intent ( in ), contiguous :: knot (:) real ( rk ), intent ( in ), contiguous :: Pw (:,:) real ( rk ), allocatable , intent ( out ) :: knot_new (:) real ( rk ), allocatable , intent ( out ) :: Pw_new (:,:) real ( rk ), allocatable :: Pw_copy (:,:), knot_copy (:) integer , intent ( out ) :: t real ( rk ) :: tol , alfi , alfj real ( rk ), allocatable :: temp (:,:) integer :: i , j , ii , jj , remflag , off , first , last , ord , fout , m , k , n , nc , dim , tt dim = size ( Pw , 2 ) nc = size ( Pw , 1 ) n = nc m = n + p + 1 ord = p + 1 fout = ( 2 * r - s - p ) / 2 last = r - s first = r - p Pw_copy = Pw knot_copy = knot ! TODO: tol = 1.0e-6_rk * minval ( Pw (:, dim )) / ( 1.0_rk + maxval ( sqrt ( sum ( Pw ** 2 , 2 )))) allocate ( temp ( 2 * p + 1 , dim ), source = 0.0_rk ) t = 0 do tt = 0 , num - 1 off = first - 1 temp ( 1 ,:) = Pw_copy ( off ,:) temp ( last + 1 - off + 1 ,:) = Pw_copy ( last + 1 ,:) i = first j = last ii = 1 jj = last - off remflag = 0 do while ( j - i > t ) alfi = ( u - knot_copy ( i )) / ( knot_copy ( i + ord + t ) - knot_copy ( i )) alfj = ( u - knot_copy ( j - t )) / ( knot_copy ( j + ord ) - knot_copy ( j - t )) temp ( ii + 1 ,:) = ( Pw_copy ( i ,:) - ( 1.0_rk - alfi ) * temp ( ii - 1 + 1 ,:)) / alfi temp ( jj + 1 ,:) = ( Pw_copy ( j ,:) - alfj * temp ( jj + 1 + 1 ,:)) / ( 1.0_rk - alfj ) i = i + 1 ii = ii + 1 j = j - 1 jj = jj - 1 end do if ( j - i <= t ) then if ( norm2 ( temp ( ii - 1 + 1 ,:) - temp ( jj + 1 + 1 ,:)) <= tol ) then remflag = 1 else alfi = ( u - knot_copy ( i )) / ( knot_copy ( i + ord + t ) - knot_copy ( i )) if ( norm2 ( Pw_copy ( i ,:) - ( alfi * temp ( ii + t + 1 + 1 ,:) + ( 1.0_rk - alfi ) * temp ( ii - 1 + 1 ,:))) <= tol ) then remflag = 1 end if end if end if if ( remflag == 0 ) then exit else i = first j = last do while ( j - i > t ) Pw_copy ( i ,:) = temp ( i - off + 1 ,:) Pw_copy ( j ,:) = temp ( j - off + 1 ,:) i = i + 1 j = j - 1 end do end if first = first - 1 last = last + 1 t = t + 1 end do if ( t == 0 ) then return end if do k = r + 1 , m knot_copy ( k - t ) = knot_copy ( k ) end do j = fout i = j do k = 1 , t - 1 if ( mod ( k , 2 ) == 1 ) then i = i + 1 else j = j - 1 end if end do do k = i + 1 , n Pw_copy ( j ,:) = Pw_copy ( k ,:) j = j + 1 end do knot_new = knot_copy ( 1 : size ( knot_copy ) - t ) Pw_new = Pw_copy ( 1 : size ( Pw_copy , 1 ) - t ,:) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function unique_integer ( vec ) result ( output ) integer , dimension (:), intent ( in ), contiguous :: vec integer , dimension (:), allocatable :: output integer :: i , j , k allocate ( output ( 0 )) do i = 1 , size ( vec ) k = 0 do j = 1 , size ( output ) if ( vec ( i ) == output ( j )) then k = k + 1 exit end if end do if ( k == 0 ) then output = [ output , vec ( i )] end if end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function unique_real ( vec ) result ( output ) real ( rk ), dimension (:), intent ( in ), contiguous :: vec real ( rk ), dimension (:), allocatable :: output integer :: i , j , k allocate ( output ( 0 )) do i = 1 , size ( vec ) k = 0 do j = 1 , size ( output ) if ( vec ( i ) == output ( j )) then k = k + 1 exit end if end do if ( k == 0 ) then output = [ output , vec ( i )] end if end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function rotation ( alpha , beta , theta ) result ( R ) real ( rk ), intent ( in ) :: alpha , beta , theta real ( rk ), dimension ( 3 , 3 ) :: R R ( 1 , 1 ) = cosd ( beta ) * cosd ( theta ) R ( 2 , 1 ) = cosd ( beta ) * sind ( theta ) R ( 3 , 1 ) = - sind ( beta ) R ( 1 , 2 ) = sind ( alpha ) * sind ( beta ) * cosd ( theta ) - cosd ( alpha ) * sind ( theta ) R ( 2 , 2 ) = sind ( alpha ) * sind ( beta ) * sind ( theta ) + cosd ( alpha ) * cosd ( theta ) R ( 3 , 2 ) = sind ( alpha ) * cosd ( beta ) R ( 1 , 3 ) = cosd ( alpha ) * sind ( beta ) * cosd ( theta ) + sind ( alpha ) * sind ( theta ) R ( 2 , 3 ) = cosd ( alpha ) * sind ( beta ) * sind ( theta ) - sind ( alpha ) * cosd ( theta ) R ( 3 , 3 ) = cosd ( alpha ) * cosd ( beta ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function det ( A ) result ( detA ) real ( rk ), intent ( in ) :: A (:,:) real ( rk ) :: detA if ( size ( A , 1 ) == size ( A , 2 )) then select case ( size ( A , 1 )) case ( 2 ) detA = A ( 1 , 1 ) * A ( 2 , 2 ) - A ( 1 , 2 ) * A ( 2 , 1 ) case ( 3 ) detA = & + A ( 1 , 1 ) * ( A ( 2 , 2 ) * A ( 3 , 3 ) - A ( 2 , 3 ) * A ( 3 , 2 ) )& - A ( 1 , 2 ) * ( A ( 2 , 1 ) * A ( 3 , 3 ) - A ( 2 , 3 ) * A ( 3 , 1 ) )& + A ( 1 , 3 ) * ( A ( 2 , 1 ) * A ( 3 , 2 ) - A ( 2 , 2 ) * A ( 3 , 1 ) ) end select elseif ( size ( A , 1 ) == 3 . and . size ( A , 2 ) == 2 ) then detA = & + A ( 1 , 1 ) * ( A ( 2 , 2 ) * 1.0_rk - A ( 3 , 2 ) * 1.0_rk )& - A ( 1 , 2 ) * ( A ( 2 , 1 ) * 1.0_rk - A ( 3 , 1 ) * 1.0_rk )& + 1.0_rk * ( A ( 2 , 1 ) * A ( 3 , 2 ) - A ( 3 , 1 ) * A ( 2 , 2 ) ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause recursive pure function inv ( A ) result ( A_inv ) real ( rk ), intent ( in ) :: A (:,:) real ( rk ), allocatable :: A_inv (:,:) if ( size ( A , 1 ) == size ( A , 2 )) then select case ( size ( A , 1 )) case ( 2 ) allocate ( A_inv ( size ( A , 1 ), size ( A , 2 ))) A_inv ( 1 , 1 ) = A ( 2 , 2 ) A_inv ( 1 , 2 ) = - A ( 1 , 2 ) A_inv ( 2 , 1 ) = - A ( 2 , 1 ) A_inv ( 2 , 2 ) = A ( 1 , 1 ) A_inv = A_inv / det ( A ) case ( 3 ) allocate ( A_inv ( size ( A , 1 ), size ( A , 2 ))) A_inv ( 1 , 1 ) = A ( 2 , 2 ) * A ( 3 , 3 ) - A ( 2 , 3 ) * A ( 3 , 2 ) A_inv ( 1 , 2 ) = A ( 1 , 3 ) * A ( 3 , 2 ) - A ( 1 , 2 ) * A ( 3 , 3 ) A_inv ( 1 , 3 ) = A ( 1 , 2 ) * A ( 2 , 3 ) - A ( 1 , 3 ) * A ( 2 , 2 ) A_inv ( 2 , 1 ) = A ( 2 , 3 ) * A ( 3 , 1 ) - A ( 2 , 1 ) * A ( 3 , 3 ) A_inv ( 2 , 2 ) = A ( 1 , 1 ) * A ( 3 , 3 ) - A ( 1 , 3 ) * A ( 3 , 1 ) A_inv ( 2 , 3 ) = A ( 1 , 3 ) * A ( 2 , 1 ) - A ( 1 , 1 ) * A ( 2 , 3 ) A_inv ( 3 , 1 ) = A ( 2 , 1 ) * A ( 3 , 2 ) - A ( 2 , 2 ) * A ( 3 , 1 ) A_inv ( 3 , 2 ) = A ( 1 , 2 ) * A ( 3 , 1 ) - A ( 1 , 1 ) * A ( 3 , 2 ) A_inv ( 3 , 3 ) = A ( 1 , 1 ) * A ( 2 , 2 ) - A ( 1 , 2 ) * A ( 2 , 1 ) A_inv = A_inv / det ( A ) end select elseif ( size ( A , 1 ) > size ( A , 2 )) then allocate ( A_inv ( size ( A , 2 ), size ( A , 1 ))) A_inv = transpose ( A ) A_inv = matmul ( inv ( matmul ( A_inv , A )), A_inv ) elseif ( size ( A , 1 ) < size ( A , 2 )) then allocate ( A_inv ( size ( A , 2 ), size ( A , 1 ))) A_inv = transpose ( A ) A_inv = matmul ( A_inv , inv ( matmul ( A , A_inv ))) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function dyad_t1_t1 ( a , b ) result ( c ) real ( rk ), intent ( in ), contiguous :: a (:) real ( rk ), intent ( in ), contiguous :: b (:) real ( rk ), allocatable :: c (:,:) integer :: i allocate ( c ( size ( a ), size ( b ))) do concurrent ( i = 1 : size ( c , 1 )) c ( i , :) = a ( i ) * b (:) end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine gauss_legendre_1D ( interval , degree , Xksi , Wksi ) real ( rk ), intent ( in ) :: interval ( 2 ) integer , intent ( in ) :: degree real ( rk ), allocatable , intent ( out ) :: Xksi (:), Wksi (:) allocate ( Xksi ( degree + 1 ), Wksi ( degree + 1 )) call gauss_legendre ( Xksi , Wksi , interval ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine gauss_legendre_2D ( interval1 , interval2 , degree , Xksi , Wksi ) real ( rk ), intent ( in ) :: interval1 ( 2 ), interval2 ( 2 ) integer , intent ( in ) :: degree ( 2 ) real ( rk ), allocatable , intent ( out ) :: Xksi (:,:), Wksi (:) real ( rk ), allocatable :: Xksi1 (:), Wksi1 (:), Xksi2 (:), Wksi2 (:) allocate ( Xksi1 ( degree ( 1 ) + 1 ), Wksi1 ( degree ( 1 ) + 1 )) allocate ( Xksi2 ( degree ( 2 ) + 1 ), Wksi2 ( degree ( 2 ) + 1 )) call gauss_legendre ( Xksi1 , Wksi1 , interval1 ) call gauss_legendre ( Xksi2 , Wksi2 , interval2 ) call ndgrid ( Xksi1 , Xksi2 , Xksi ) Wksi = kron ( Wksi1 , Wksi2 ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine gauss_legendre_3D ( interval1 , interval2 , interval3 , degree , Xksi , Wksi ) real ( rk ), intent ( in ) :: interval1 ( 2 ), interval2 ( 2 ), interval3 ( 2 ) integer , intent ( in ) :: degree ( 3 ) real ( rk ), allocatable , intent ( out ) :: Xksi (:,:), Wksi (:) real ( rk ), allocatable :: Xksi1 (:), Wksi1 (:), Xksi2 (:), Wksi2 (:), Xksi3 (:), Wksi3 (:) allocate ( Xksi1 ( degree ( 1 ) + 1 ), Wksi1 ( degree ( 1 ) + 1 )) allocate ( Xksi2 ( degree ( 2 ) + 1 ), Wksi2 ( degree ( 2 ) + 1 )) allocate ( Xksi3 ( degree ( 3 ) + 1 ), Wksi3 ( degree ( 3 ) + 1 )) call gauss_legendre ( Xksi1 , Wksi1 , interval1 ) call gauss_legendre ( Xksi2 , Wksi2 , interval2 ) call gauss_legendre ( Xksi3 , Wksi3 , interval3 ) call ndgrid ( Xksi1 , Xksi2 , Xksi3 , Xksi ) Wksi = kron ( kron ( Wksi3 , Wksi2 ), Wksi1 ) end subroutine !=============================================================================== end module forcad_utils","tags":"","loc":"sourcefile/forcad_utils.f90.html"},{"title":"cmp_area.f90 – ForCAD","text":"This file depends on sourcefile~~cmp_area.f90~~EfferentGraph sourcefile~cmp_area.f90 cmp_area.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~cmp_area.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program compute_area use forcad implicit none type ( nurbs_surface ) :: shape real ( rk ) :: area real ( rk ) :: Xc ( 4 , 3 ) Xc ( 1 ,:) = [ 0.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 3 ,:) = [ 0.0_rk , 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ 2.0_rk , 2.0_rk , 0.0_rk ] call shape % set (& knot1 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& Xc = Xc ) call shape % cmp_area ( area ) print * , area end program","tags":"","loc":"sourcefile/cmp_area.f90.html"},{"title":"shape_C_3d.f90 – ForCAD","text":"This file depends on sourcefile~~shape_c_3d.f90~~EfferentGraph sourcefile~shape_c_3d.f90 shape_C_3d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_c_3d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_C_3d use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: shape !----------------------------------------------------------------------------- ! Setting up NURBS C-shape !----------------------------------------------------------------------------- !> Set a C-shape with radius 2.0 and center at [0.0, 0.0, 0.0] call shape % set_C ( center = [ 0.0_rk , 0.0_rk , 0.0_rk ], radius1 = 1.0_rk , radius2 = 2.0_rk , length = 2.0_rk ) !> Export control points to a VTK file call shape % export_Xc ( 'vtk/shape_C_3d_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating C-shape !----------------------------------------------------------------------------- !> Generate the NURBS C-shape with a resolution of 100 call shape % create ( 100 , 60 , 10 ) !> Export the generated cirlce to a VTK file call shape % export_Xg ( 'vtk/shape_C_3d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_C_3d_Xc.vtk' , 'vtk/shape_C_3d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call shape % finalize () end program","tags":"","loc":"sourcefile/shape_c_3d.f90.html"},{"title":"shape_half_ring_3d.f90 – ForCAD","text":"This file depends on sourcefile~~shape_half_ring_3d.f90~~EfferentGraph sourcefile~shape_half_ring_3d.f90 shape_half_ring_3d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_half_ring_3d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_half_ring_3d use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: shape !> Set up a half ring centered at 0,0,0 with inner radius 1, outer radius 2, and length 1. call shape % set_half_ring ([ 0.0_rk , 0.0_rk , 0.0_rk ], 1.0_rk , 2.0_rk , 1.0_rk ) !> Export the control points to a VTK file for visualization. call shape % export_Xc ( 'vtk/shape_half_ring_3d_Xc.vtk' ) !> Create the shape using the specified number of elements in each direction. call shape % create ( 60 , 15 , 10 ) !> Export the geometry to a VTK file for visualization. call shape % export_Xg ( 'vtk/shape_half_ring_3d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_half_ring_3d_Xc.vtk' , 'vtk/shape_half_ring_3d_Xg.vtk' ) !> Finalize and clean up the shape object. call shape % finalize () end program","tags":"","loc":"sourcefile/shape_half_ring_3d.f90.html"},{"title":"shape_hexahedron.f90 – ForCAD","text":"This file depends on sourcefile~~shape_hexahedron.f90~~EfferentGraph sourcefile~shape_hexahedron.f90 shape_hexahedron.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_hexahedron.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_hexahedron use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: shape !> Set up a hexahedron shape with dimensions L = [2.0, 4.0, 8.0] and a specified number of control points nc = [4, 6, 8]. !> The weights of the control points (Wc) are optional. call shape % set_hexahedron ( L = [ 2.0_rk , 4.0_rk , 8.0_rk ], nc = [ 4 , 6 , 8 ]) ! Additional modifications can be made to control points and weights, or the NURBS can be refined using knot insertion or degree elevation. ! call shape%insert_knots(...) ! call shape%elevate_degree(...) ! ... !> Export the control points to a VTK file for visualization. call shape % export_Xc ( 'vtk/shape_hexahedron_Xc.vtk' ) !> Create the shape using the specified number of elements in each direction. call shape % create ( 8 , 16 , 32 ) !> Export the geometry to a VTK file for visualization. call shape % export_Xg ( 'vtk/shape_hexahedron_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_hexahedron_Xc.vtk' , 'vtk/shape_hexahedron_Xg.vtk' ) !> Finalize and clean up the shape object. call shape % finalize () end program","tags":"","loc":"sourcefile/shape_hexahedron.f90.html"},{"title":"forcad_nurbs_curve.f90 – ForCAD","text":"This file depends on sourcefile~~forcad_nurbs_curve.f90~~EfferentGraph sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Files dependent on this one sourcefile~~forcad_nurbs_curve.f90~~AfferentGraph sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~cmp_area.f90 cmp_area.f90 sourcefile~cmp_area.f90->sourcefile~forcad.f90 sourcefile~cmp_length.f90 cmp_length.f90 sourcefile~cmp_length.f90->sourcefile~forcad.f90 sourcefile~cmp_volume.f90 cmp_volume.f90 sourcefile~cmp_volume.f90->sourcefile~forcad.f90 sourcefile~demo_curve.f90 demo_curve.f90 sourcefile~demo_curve.f90->sourcefile~forcad.f90 sourcefile~demo_surface.f90 demo_surface.f90 sourcefile~demo_surface.f90->sourcefile~forcad.f90 sourcefile~demo_volume.f90 demo_volume.f90 sourcefile~demo_volume.f90->sourcefile~forcad.f90 sourcefile~example_curve_1.f90 example_curve_1.f90 sourcefile~example_curve_1.f90->sourcefile~forcad.f90 sourcefile~example_ppm1.f90 example_ppm1.f90 sourcefile~example_ppm1.f90->sourcefile~forcad.f90 sourcefile~example_ppm2.f90 example_ppm2.f90 sourcefile~example_ppm2.f90->sourcefile~forcad.f90 sourcefile~example_ppm3.f90 example_ppm3.f90 sourcefile~example_ppm3.f90->sourcefile~forcad.f90 sourcefile~example_surface_1.f90 example_surface_1.f90 sourcefile~example_surface_1.f90->sourcefile~forcad.f90 sourcefile~example_volume_1.f90 example_volume_1.f90 sourcefile~example_volume_1.f90->sourcefile~forcad.f90 sourcefile~nearest_point_1d.f90 nearest_point_1d.f90 sourcefile~nearest_point_1d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d.f90 nearest_point_2d.f90 sourcefile~nearest_point_2d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d_bench.f90 nearest_point_2d_bench.f90 sourcefile~nearest_point_2d_bench.f90->sourcefile~forcad.f90 sourcefile~nearest_point_3d.f90 nearest_point_3d.f90 sourcefile~nearest_point_3d.f90->sourcefile~forcad.f90 sourcefile~put_to_nurbs.f90 put_to_nurbs.f90 sourcefile~put_to_nurbs.f90->sourcefile~forcad.f90 sourcefile~shape_c_1d.f90 shape_C_1d.f90 sourcefile~shape_c_1d.f90->sourcefile~forcad.f90 sourcefile~shape_c_2d.f90 shape_C_2d.f90 sourcefile~shape_c_2d.f90->sourcefile~forcad.f90 sourcefile~shape_c_3d.f90 shape_C_3d.f90 sourcefile~shape_c_3d.f90->sourcefile~forcad.f90 sourcefile~shape_circle.f90 shape_circle.f90 sourcefile~shape_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_circle.f90 shape_half_circle.f90 sourcefile~shape_half_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_2d.f90 shape_half_ring_2d.f90 sourcefile~shape_half_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_3d.f90 shape_half_ring_3d.f90 sourcefile~shape_half_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_hexahedron.f90 shape_hexahedron.f90 sourcefile~shape_hexahedron.f90->sourcefile~forcad.f90 sourcefile~shape_ring_2d.f90 shape_ring_2d.f90 sourcefile~shape_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_ring_3d.f90 shape_ring_3d.f90 sourcefile~shape_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_tetragon.f90 shape_tetragon.f90 sourcefile~shape_tetragon.f90->sourcefile~forcad.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> This module defines the 'nurbs_curve' type for representing a Non-Uniform Rational B-Spline (NURBS) curve. module forcad_nurbs_curve use forcad_utils , only : rk , basis_bspline , elemConn_C0 , compute_multiplicity , compute_knot_vector , basis_bspline_der ,& insert_knot_A_5_1 , findspan , elevate_degree_A_5_9 , remove_knots_A_5_8 , & elemConn_Cn , unique , rotation , dyad , gauss_leg implicit none private public nurbs_curve !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause type nurbs_curve real ( rk ), allocatable , private :: Xc (:,:) !! Control points (2D array: [nc, dim]) real ( rk ), allocatable , private :: Xg (:,:) !! Geometry points (2D array: [ng, dim]) real ( rk ), allocatable , private :: Wc (:) !! Weights for control points (1D array: [nc]) real ( rk ), allocatable , private :: Xt (:) !! Evaluation points (1D array: [ng]) real ( rk ), allocatable , private :: knot (:) !! Knot vector (1D array) integer , private :: degree !! Degree (order) of the curve integer , private :: nc !! Number of control points integer , private :: ng !! Number of geometry points integer , allocatable , private :: elemConn_Xc_vis (:,:) !! Connectivity for visualization of control points integer , allocatable , private :: elemConn_Xg_vis (:,:) !! Connectivity for visualization of geometry points integer , allocatable , private :: elemConn (:,:) !! IGA element connectivity contains procedure :: set1 !!> Set knot vector, control points and weights for the NURBS curve object procedure :: set1a procedure :: set2 !!> Set NURBS curve using nodes of parameter space, degree, continuity, control points and weights procedure :: set3 !!> Set Bezier or Rational Bezier curve using control points and weights procedure :: set4 !!> Set NURBS curve using degree, number of control points, control points and weights generic :: set => set1 , set1a , set2 , set3 , set4 !!> Set NURBS curve procedure :: create !!> Generate geometry points procedure :: cmp_Xg !!> Compute geometry points procedure , private :: get_Xc_all !!> Get all control points procedure , private :: get_Xci !!> Get i-th control point procedure , private :: get_Xcid !!> Get i-th control point in a specific direction generic :: get_Xc => get_Xc_all , get_Xci , get_Xcid !!> Get control points procedure , private :: get_Xg_all !!> Get all geometry points procedure , private :: get_Xgi !!> Get i-th geometry point procedure , private :: get_Xgid !!> Get i-th geometry point in a specific direction generic :: get_Xg => get_Xg_all , get_Xgi , get_Xgid !!> Get geometry points procedure , private :: get_Wc_all !!> Get all weights procedure , private :: get_Wci !!> Get i-th weight generic :: get_Wc => get_Wc_all , get_Wci !!> Get weights procedure :: get_Xt !!> Get parameter values procedure , private :: get_knot_all !!> Get all knot vectors procedure , private :: get_knoti !!> Get i-th knot value generic :: get_knot => get_knoti , get_knot_all !!> Get knot vector procedure :: get_ng !!> Get number of geometry points procedure :: cmp_degree !!> Compute degree of the NURBS curve procedure :: get_degree !!> Get degree of the NURBS curve procedure :: finalize !!> Finalize the NURBS curve object procedure :: cmp_elem_Xc_vis !!> Generate connectivity for control points procedure :: cmp_elem_Xg_vis !!> Generate connectivity for geometry points procedure :: cmp_elem !!> Generate IGA element connectivity procedure :: get_elem_Xc_vis !!> Get connectivity for control points procedure :: get_elem_Xg_vis !!> Get connectivity for geometry points procedure :: get_elem !!> Get IGA element connectivity procedure :: set_elem_Xc_vis !!> Set connectivity for control points procedure :: set_elem_Xg_vis !!> Set connectivity for geometry points procedure :: set_elem !!> Set IGA element connectivity procedure :: export_Xc !!> Export control points to VTK file procedure :: export_Xg !!> Export geometry points to VTK file procedure :: modify_Xc !!> Modify control points procedure :: modify_Wc !!> Modify weights procedure :: get_multiplicity !!> Compute and return the multiplicity of the knots procedure :: get_continuity !!> Compute and return the continuity of the curve procedure :: cmp_nc !!> Compute number of required control points procedure :: get_nc !!> Get number of control points procedure :: insert_knots !!> Insert knots into the knot vector procedure :: elevate_degree !!> Elevate the degree of the curve procedure , private :: basis_vector !!> Compute the basis functions of the NURBS curve procedure , private :: basis_scalar !!> Compute the basis functions of the NURBS curve generic :: basis => basis_vector , basis_scalar !!> Compute the basis functions of the NURBS curve procedure , private :: derivative_vector !!> Compute the derivative of the NURBS curve procedure , private :: derivative_scalar !!> Compute the derivative of the NURBS curve generic :: derivative => derivative_vector , derivative_scalar !!> Compute the derivative of the NURBS curve procedure , private :: derivative2_vector !!> Compute the second derivative of the NURBS curve procedure , private :: derivative2_scalar !!> Compute the second derivative of the NURBS curve generic :: derivative2 => derivative2_vector , derivative2_scalar !!> Compute the second derivative of the NURBS curve procedure :: is_rational !!> Check if the NURBS curve is rational procedure :: remove_knots !!> Remove knots from the knot vector procedure :: rotate_Xc !!> Rotate control points procedure :: rotate_Xg !!> Rotate geometry points procedure :: translate_Xc !!> Translate control points procedure :: translate_Xg !!> Translate geometry points procedure :: show !!> Show the NURBS object using PyVista procedure :: nearest_point !!> Find the nearest point on the NURBS curve (Approximation) procedure :: nearest_point2 !!> Find the nearest point on the NURBS curve (Minimization - Newton's method) procedure :: ansatz !!> Compute the shape functions, derivative of shape functions and dL procedure :: cmp_length !!> Compute the length of the NURBS curve ! Shapes procedure :: set_circle !!> Set a circle procedure :: set_half_circle !!> Set a half circle procedure :: set_C !!> Set a C-shape end type !=============================================================================== interface compute_Xg pure function compute_Xg_nurbs_1d ( f_Xt , f_knot , f_degree , f_nc , f_ng , f_Xc , f_Wc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc integer , intent ( in ) :: f_ng real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Xg (:,:) end function pure function compute_Xg_bspline_1d ( f_Xt , f_knot , f_degree , f_nc , f_ng , f_Xc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc integer , intent ( in ) :: f_ng real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), allocatable :: f_Xg (:,:) end function pure function compute_Xg_nurbs_1d_1point ( f_Xt , f_knot , f_degree , f_nc , f_Xc , f_Wc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ) :: f_Xt real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Xg (:) end function pure function compute_Xg_bspline_1d_1point ( f_Xt , f_knot , f_degree , f_nc , f_Xc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ) :: f_Xt real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), allocatable :: f_Xg (:) end function end interface interface compute_d2Tgc pure subroutine compute_d2Tgc_nurbs_1d_vector ( f_Xt , f_knot , f_degree , f_nc , f_ng , f_Wc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc integer , intent ( in ) :: f_ng real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_d2Tgc_bspline_1d_vector ( f_Xt , f_knot , f_degree , f_nc , f_ng , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc integer , intent ( in ) :: f_ng real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_d2Tgc_nurbs_1d_scalar ( f_Xt , f_knot , f_degree , f_nc , f_Wc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ) :: f_Xt real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) end subroutine pure subroutine compute_d2Tgc_bspline_1d_scalar ( f_Xt , f_knot , f_degree , f_nc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ) :: f_Xt real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) end subroutine end interface interface compute_dTgc pure subroutine compute_dTgc_nurbs_1d_vector ( f_Xt , f_knot , f_degree , f_nc , f_ng , f_Wc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc integer , intent ( in ) :: f_ng real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_dTgc_bspline_1d_vector ( f_Xt , f_knot , f_degree , f_nc , f_ng , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc integer , intent ( in ) :: f_ng real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_dTgc_nurbs_1d_scalar ( f_Xt , f_knot , f_degree , f_nc , f_Wc , f_dTgc , f_Tgc , f_elem ) import :: rk real ( rk ), intent ( in ) :: f_Xt real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) integer , intent ( in ), optional :: f_elem (:) end subroutine pure subroutine compute_dTgc_bspline_1d_scalar ( f_Xt , f_knot , f_degree , f_nc , f_dTgc , f_Tgc , f_elem ) import :: rk real ( rk ), intent ( in ) :: f_Xt real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc real ( rk ), allocatable , intent ( out ) :: f_dTgc (:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) integer , intent ( in ), optional :: f_elem (:) end subroutine end interface interface compute_Tgc pure function compute_Tgc_nurbs_1d_vector ( f_Xt , f_knot , f_degree , f_nc , f_ng , f_Wc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc integer , intent ( in ) :: f_ng real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Tgc (:,:) end function pure function compute_Tgc_bspline_1d_vector ( f_Xt , f_knot , f_degree , f_nc , f_ng ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc integer , intent ( in ) :: f_ng real ( rk ), allocatable :: f_Tgc (:,:) end function pure function compute_Tgc_nurbs_1d_scalar ( f_Xt , f_knot , f_degree , f_nc , f_Wc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ) :: f_Xt real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Tgc (:) end function pure function compute_Tgc_bspline_1d_scalar ( f_Xt , f_knot , f_degree , f_nc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ) :: f_Xt real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc real ( rk ), allocatable :: f_Tgc (:) end function end interface interface pure function nearest_point_help_1d ( f_ng , f_Xg , f_point_Xg ) result ( f_distances ) import :: rk integer , intent ( in ) :: f_ng real ( rk ), intent ( in ), contiguous :: f_Xg (:,:) real ( rk ), intent ( in ), contiguous :: f_point_Xg (:) real ( rk ), allocatable :: f_distances (:) end function end interface contains !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set knot vector, control points and weights for the NURBS curve object. pure subroutine set1 ( this , knot , Xc , Wc ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: knot (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( allocated ( this % knot )) deallocate ( this % knot ) if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % knot = knot call this % cmp_degree () this % Xc = Xc this % nc = size ( this % Xc , 1 ) if ( present ( Wc )) then if ( size ( Wc ) /= this % nc ) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set knot vector, control points and weights for the NURBS curve object. pure subroutine set1a ( this , knot , Xc , Wc ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: knot (:) real ( rk ), intent ( in ), contiguous :: Xc (:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( allocated ( this % knot )) deallocate ( this % knot ) if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % knot = knot call this % cmp_degree () allocate ( this % Xc ( size ( Xc ), 3 ), source = 0.0_rk ) this % Xc (:, 1 ) = Xc this % nc = size ( this % Xc , 1 ) if ( present ( Wc )) then if ( size ( Wc ) /= this % nc ) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set NURBS curve using nodes of parameter space (Xth), degree, continuity, control points and weights. pure subroutine set2 ( this , Xth_dir , degree , continuity , Xc , Wc ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xth_dir (:) integer , intent ( in ) :: degree integer , intent ( in ), contiguous :: continuity (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( allocated ( this % knot )) deallocate ( this % knot ) if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % knot = compute_knot_vector ( Xth_dir , degree , continuity ) this % degree = degree this % Xc = Xc this % nc = size ( this % Xc , 1 ) if ( present ( Wc )) then if ( size ( Wc ) /= this % nc ) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set Bezier or Rational Bezier curve using control points and weights. pure subroutine set3 ( this , Xc , Wc ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( allocated ( this % knot )) deallocate ( this % knot ) if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % Xc = Xc this % nc = size ( this % Xc , 1 ) if ( allocated ( this % knot )) deallocate ( this % knot ) allocate ( this % knot ( 2 * this % nc )) this % knot ( 1 : this % nc ) = 0.0_rk this % knot ( this % nc + 1 : 2 * this % nc ) = 1.0_rk call this % cmp_degree () if ( present ( Wc )) then if ( size ( Wc ) /= this % nc ) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set4 ( this , degree , nc , Xc , Wc ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ) :: degree integer , intent ( in ) :: nc real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) integer :: m , i if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % Xc = Xc this % nc = nc this % degree = degree ! Size of knot vectors m = nc + degree + 1 if ( allocated ( this % knot )) deallocate ( this % knot ) allocate ( this % knot ( m )) this % knot ( 1 : degree + 1 ) = 0.0_rk this % knot ( degree + 2 : m - degree - 1 ) = [( real ( i , rk ) / ( m - 2 * degree - 1 ), i = 1 , m - 2 * degree - 2 )] this % knot ( m - degree : m ) = 1.0_rk if ( present ( Wc )) then if ( size ( Wc ) /= nc ) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine create ( this , res , Xt ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ), optional :: res real ( rk ), intent ( in ), contiguous , optional :: Xt (:) integer :: i ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % knot )) then error stop 'Knot vector is not set.' end if ! Set parameter values if ( present ( Xt )) then if ( allocated ( this % Xt )) deallocate ( this % Xt ) this % Xt = Xt elseif ( present ( res )) then if ( allocated ( this % Xt )) deallocate ( this % Xt ) allocate ( this % Xt ( res )) this % Xt = [( real ( i - 1 , rk ) / real ( res - 1 , rk ), i = 1 , res )] ! else ! this%Xt = this%Xt end if ! Set number of geometry points this % ng = size ( this % Xt ) ! Allocate memory for geometry points if ( allocated ( this % Xg )) deallocate ( this % Xg ) if ( this % is_rational ()) then ! NURBS this % Xg = compute_Xg (& this % Xt , this % knot , this % degree , this % nc , this % ng , this % Xc , this % Wc ) else ! B-Spline this % Xg = compute_Xg (& this % Xt , this % knot , this % degree , this % nc , this % ng , this % Xc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_Xg ( this , Xt ) result ( Xg ) class ( nurbs_curve ), intent ( in ) :: this real ( rk ), intent ( in ) :: Xt real ( rk ), allocatable :: Xg (:) ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % knot )) then error stop 'Knot vector is not set.' end if if ( this % is_rational ()) then ! NURBS Xg = compute_Xg ( Xt , this % knot , this % degree , this % nc , this % Xc , this % Wc ) else ! B-Spline Xg = compute_Xg ( Xt , this % knot , this % degree , this % nc , this % Xc ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xc_all ( this ) result ( Xc ) class ( nurbs_curve ), intent ( in ) :: this real ( rk ), allocatable :: Xc (:,:) if ( allocated ( this % Xc )) then Xc = this % Xc else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xci ( this , n ) result ( Xc ) class ( nurbs_curve ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ), allocatable :: Xc (:) if ( allocated ( this % Xc )) then if ( n < lbound ( this % Xc , 1 ) . or . n > ubound ( this % Xc , 1 )) then error stop 'Invalid index for control points.' end if Xc = this % Xc ( n ,:) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xcid ( this , n , dir ) result ( Xc ) class ( nurbs_curve ), intent ( in ) :: this integer , intent ( in ) :: n integer , intent ( in ) :: dir real ( rk ) :: Xc if ( allocated ( this % Xc )) then if ( n < lbound ( this % Xc , 1 ) . or . n > ubound ( this % Xc , 1 )) then error stop 'Invalid index for control points.' end if if ( dir < lbound ( this % Xc , 2 ) . or . dir > ubound ( this % Xc , 2 )) then error stop 'Invalid index for control points.' end if Xc = this % Xc ( n , dir ) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xg_all ( this ) result ( Xg ) class ( nurbs_curve ), intent ( in ) :: this real ( rk ), allocatable :: Xg (:,:) if ( allocated ( this % Xg )) then Xg = this % Xg else error stop 'Geometry points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xgi ( this , n ) result ( Xg ) class ( nurbs_curve ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ), allocatable :: Xg (:) if ( allocated ( this % Xg )) then if ( n < lbound ( this % Xg , 1 ) . or . n > ubound ( this % Xg , 1 )) then error stop 'Invalid index for geometry points.' end if Xg = this % Xg ( n ,:) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xgid ( this , n , dir ) result ( Xg ) class ( nurbs_curve ), intent ( in ) :: this integer , intent ( in ) :: n integer , intent ( in ) :: dir real ( rk ) :: Xg if ( allocated ( this % Xg )) then if ( n < lbound ( this % Xg , 1 ) . or . n > ubound ( this % Xg , 1 )) then error stop 'Invalid index for geometry points.' end if if ( dir < lbound ( this % Xg , 2 ) . or . dir > ubound ( this % Xg , 2 )) then error stop 'Invalid index for geometry points.' end if Xg = this % Xg ( n , dir ) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Wc_all ( this ) result ( Wc ) class ( nurbs_curve ), intent ( in ) :: this real ( rk ), allocatable :: Wc (:) if ( allocated ( this % Wc )) then Wc = this % Wc else error stop 'The NURBS curve is not rational or weights are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Wci ( this , n ) result ( Wc ) class ( nurbs_curve ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ) :: Wc if ( allocated ( this % Wc )) then if ( n < lbound ( this % Wc , 1 ) . or . n > ubound ( this % Wc , 1 )) then error stop 'Invalid index for weights.' end if Wc = this % Wc ( n ) else error stop 'The NURBS curve is not rational or weights are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xt ( this ) result ( Xt ) class ( nurbs_curve ), intent ( in ) :: this real ( rk ), allocatable :: Xt (:) if ( allocated ( this % Xt )) then Xt = this % Xt else error stop 'Parameter values are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_ng ( this ) result ( ng ) class ( nurbs_curve ), intent ( in ) :: this integer :: ng ng = this % ng end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_degree ( this ) class ( nurbs_curve ), intent ( inout ) :: this integer , allocatable :: m (:) m = this % get_multiplicity () this % degree = m ( 1 ) - 1 end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_degree ( this ) result ( degree ) class ( nurbs_curve ), intent ( in ) :: this integer :: degree degree = this % degree end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_knot_all ( this ) result ( knot ) class ( nurbs_curve ), intent ( in ) :: this real ( rk ), allocatable :: knot (:) if ( allocated ( this % knot )) then knot = this % knot else error stop 'Knot vector is not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_knoti ( this , i ) result ( knot ) class ( nurbs_curve ), intent ( in ) :: this integer , intent ( in ) :: i real ( rk ) :: knot if ( allocated ( this % knot )) then if ( i < 1 . or . i > size ( this % knot )) then error stop 'Invalid index for knot vector.' else knot = this % knot ( i ) end if else error stop 'Knot vector is not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine finalize ( this ) class ( nurbs_curve ), intent ( inout ) :: this if ( allocated ( this % Xc )) deallocate ( this % Xc ) if ( allocated ( this % Xg )) deallocate ( this % Xg ) if ( allocated ( this % Wc )) deallocate ( this % Wc ) if ( allocated ( this % Xt )) deallocate ( this % Xt ) if ( allocated ( this % knot )) deallocate ( this % knot ) if ( allocated ( this % elemConn_Xc_vis )) deallocate ( this % elemConn_Xc_vis ) if ( allocated ( this % elemConn_Xg_vis )) deallocate ( this % elemConn_Xg_vis ) if ( allocated ( this % elemConn )) deallocate ( this % elemConn ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem_Xc_vis ( this , p ) result ( elemConn ) class ( nurbs_curve ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) integer , intent ( in ), optional :: p if ( present ( p )) then elemConn = elemConn_C0 ( this % nc , p ) else elemConn = elemConn_C0 ( this % nc , 1 ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem_Xg_vis ( this , p ) result ( elemConn ) class ( nurbs_curve ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) integer , intent ( in ), optional :: p if ( present ( p )) then elemConn = elemConn_C0 ( this % ng , p ) else elemConn = elemConn_C0 ( this % ng , 1 ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine export_Xc ( this , filename ) class ( nurbs_curve ), intent ( in ) :: this character ( len =* ), intent ( in ) :: filename integer :: i , nc , nunit integer , allocatable :: elemConn (:,:) ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % elemConn_Xc_vis )) then elemConn = this % cmp_elem_Xc_vis () else elemConn = this % elemConn_Xc_vis end if nc = size ( this % Xc , 1 ) open ( newunit = nunit , file = filename , action = 'write' ) write ( nunit , '(a)' ) '# vtk DataFile Version 2.0' write ( nunit , '(a)' ) 'Generated by ForCAD' write ( nunit , '(a)' ) 'ASCII' write ( nunit , '(a)' ) 'DATASET UNSTRUCTURED_GRID' write ( nunit , '(a,\" \",g0,\" \",a)' ) 'POINTS' , nc , 'double' if ( size ( this % Xc , 2 ) == 2 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xc ( i , 1 ), this % Xc ( i , 2 ), 0.0_rk , i = 1 , nc ) elseif ( size ( this % Xc , 2 ) == 3 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xc ( i , 1 ), this % Xc ( i , 2 ), this % Xc ( i , 3 ) , i = 1 , nc ) else error stop 'Invalid dimension of the control points.' end if write ( nunit , '(a,\" \",g0,\" \",g0)' ) 'CELLS' , size ( elemConn , 1 ), size ( elemConn , 1 ) * ( size ( elemConn , 2 ) + 1 ) write ( nunit , '(g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0)' )& ( 2 , elemConn ( i , 1 ) - 1 , elemConn ( i , 2 ) - 1 , i = 1 , size ( elemConn , 1 )) write ( nunit , '(a,\" \",g0)' ) 'CELL_TYPES' , size ( elemConn , 1 ) write ( nunit , '(g0)' ) ( 3 , i = 1 , size ( elemConn , 1 )) close ( nunit ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine export_Xg ( this , filename ) class ( nurbs_curve ), intent ( in ) :: this character ( len =* ), intent ( in ) :: filename integer :: i , ng , nunit integer , allocatable :: elemConn (:,:) ! check if (. not . allocated ( this % Xg )) then error stop 'Geometry points are not set.' end if if (. not . allocated ( this % elemConn_Xg_vis )) then elemConn = this % cmp_elem_Xg_vis () else elemConn = this % elemConn_Xg_vis end if ng = size ( this % Xg , 1 ) open ( newunit = nunit , file = filename , action = 'write' ) write ( nunit , '(a)' ) '# vtk DataFile Version 2.0' write ( nunit , '(a)' ) 'Generated by ForCAD' write ( nunit , '(a)' ) 'ASCII' write ( nunit , '(a)' ) 'DATASET UNSTRUCTURED_GRID' write ( nunit , '(a,\" \",g0,\" \",a)' ) 'POINTS' , ng , 'double' if ( size ( this % Xg , 2 ) == 2 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xg ( i , 1 ), this % Xg ( i , 2 ), 0.0_rk , i = 1 , ng ) elseif ( size ( this % Xg , 2 ) == 3 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xg ( i , 1 ), this % Xg ( i , 2 ), this % Xg ( i , 3 ) , i = 1 , ng ) else error stop 'Invalid dimension of the geometry points.' end if write ( nunit , '(a,\" \",g0,\" \",g0)' ) 'CELLS' , size ( elemConn , 1 ), size ( elemConn , 1 ) * ( size ( elemConn , 2 ) + 1 ) write ( nunit , '(g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0)' )& ( 2 , elemConn ( i , 1 ) - 1 , elemConn ( i , 2 ) - 1 , i = 1 , size ( elemConn , 1 )) write ( nunit , '(a,\" \",g0)' ) 'CELL_TYPES' , size ( elemConn , 1 ) write ( nunit , '(g0)' ) ( 3 , i = 1 , size ( elemConn , 1 )) close ( nunit ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine modify_Xc ( this , X , num , dir ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: X integer , intent ( in ) :: num integer , intent ( in ) :: dir if ( allocated ( this % Xc )) then this % Xc ( num , dir ) = X if ( allocated ( this % Wc )) then call this % set ( knot = this % get_knot (), Xc = this % get_Xc (), Wc = this % get_Wc ()) else call this % set ( knot = this % get_knot (), Xc = this % get_Xc ()) end if else error stop 'Control points are not set.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine modify_Wc ( this , W , num ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: W integer , intent ( in ) :: num if ( allocated ( this % Wc )) then this % Wc ( num ) = W if ( allocated ( this % knot )) then call this % set ( knot = this % get_knot (), Xc = this % get_Xc (), Wc = this % get_Wc ()) else call this % set ( Xc = this % get_Xc (), Wc = this % get_Wc ()) end if else error stop 'The NURBS curve is not rational.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_multiplicity ( this ) result ( m ) class ( nurbs_curve ), intent ( in ) :: this integer , allocatable :: m (:) ! check if (. not . allocated ( this % knot )) then error stop 'Knot vector is not set.' else m = compute_multiplicity ( this % knot ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_continuity ( this ) result ( c ) class ( nurbs_curve ), intent ( in ) :: this integer , allocatable :: c (:) ! check if (. not . allocated ( this % knot )) then error stop 'Knot vector is not set.' else c = this % degree - compute_multiplicity ( this % knot ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_nc ( this ) class ( nurbs_curve ), intent ( inout ) :: this this % nc = sum ( compute_multiplicity ( this % knot )) - this % degree - 1 end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_nc ( this ) result ( nc ) class ( nurbs_curve ), intent ( in ) :: this integer :: nc nc = this % nc end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine insert_knots ( this , Xth , r ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xth (:) integer , intent ( in ), contiguous :: r (:) integer :: k , i , s , dim , j , n_new real ( rk ), allocatable :: Xcw (:,:), Xcw_new (:,:), Xc_new (:,:), Wc_new (:), knot_new (:) if ( this % is_rational ()) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc - 1 , this % degree , Xth ( i ), this % knot ) if ( this % knot ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) call insert_knot_A_5_1 (& this % degree ,& this % knot ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xcw_new ) allocate ( Xc_new ( 1 : n_new + 1 , 1 : dim )) allocate ( Wc_new ( 1 : n_new + 1 )) do j = 1 , n_new + 1 Xc_new ( j , 1 : dim ) = Xcw_new ( j - 1 , 1 : dim ) / Xcw_new ( j - 1 , dim + 1 ) Wc_new ( j ) = Xcw_new ( j - 1 , dim + 1 ) end do call this % set ( knot = knot_new , Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc - 1 , this % degree , Xth ( i ), this % knot ) if ( this % knot ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot , Xth ( i )) else s = 0 end if call insert_knot_A_5_1 (& this % degree ,& this % knot ,& this % Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xc_new ) call this % set ( knot = knot_new , Xc = Xc_new ) end do end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine elevate_degree ( this , t ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ) :: t real ( rk ), allocatable :: Xcw (:,:), Xcw_new (:,:), knot_new (:), Xc_new (:,:), Wc_new (:) integer :: dim , j , nc_new if ( this % is_rational ()) then ! NURBS dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) Xcw ( j , dim + 1 ) = this % Wc ( j ) end do call elevate_degree_A_5_9 ( t , this % knot , this % degree , Xcw , nc_new , knot_new , Xcw_new ) allocate ( Xc_new ( 1 : nc_new , 1 : dim )) allocate ( Wc_new ( 1 : nc_new )) do j = 1 , nc_new Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot = knot_new , Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) else ! B-Spline dim = size ( this % Xc , 2 ) call elevate_degree_A_5_9 ( t , this % knot , this % degree , this % Xc , nc_new , knot_new , Xc_new ) call this % set ( knot = knot_new , Xc = Xc_new ) deallocate ( Xc_new ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative_vector ( this , res , Xt , dTgc , Tgc ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ), optional :: res real ( rk ), intent ( in ), contiguous , optional :: Xt (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:,:) integer :: i ! Set parameter values if ( present ( Xt )) then if ( allocated ( this % Xt )) deallocate ( this % Xt ) this % Xt = Xt elseif ( present ( res )) then if ( allocated ( this % Xt )) deallocate ( this % Xt ) allocate ( this % Xt ( res )) this % Xt = [( real ( i - 1 , rk ) / real ( res - 1 , rk ), i = 1 , res )] ! else ! this%Xt = this%Xt end if ! Set number of geometry points this % ng = size ( this % Xt , 1 ) if ( this % is_rational ()) then ! NURBS call compute_dTgc ( this % Xt , this % knot , this % degree , this % nc , this % ng , this % Wc , dTgc , Tgc ) else ! B-Spline call compute_dTgc ( this % Xt , this % knot , this % degree , this % nc , this % ng , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative_scalar ( this , Xt , dTgc , Tgc , elem ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: Xt integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:) if ( this % is_rational ()) then ! NURBS call compute_dTgc ( Xt , this % knot , this % degree , this % nc , this % Wc , dTgc , Tgc , elem ) else ! B-Spline call compute_dTgc ( Xt , this % knot , this % degree , this % nc , dTgc , Tgc , elem ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative2_vector ( this , res , Xt , d2Tgc , dTgc , Tgc ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ), optional :: res real ( rk ), intent ( in ), contiguous , optional :: Xt (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: dTgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:,:) integer :: i ! Set parameter values if ( present ( Xt )) then if ( allocated ( this % Xt )) deallocate ( this % Xt ) this % Xt = Xt elseif ( present ( res )) then if ( allocated ( this % Xt )) deallocate ( this % Xt ) allocate ( this % Xt ( res )) this % Xt = [( real ( i - 1 , rk ) / real ( res - 1 , rk ), i = 1 , res )] ! else ! this%Xt = this%Xt end if ! Set number of geometry points this % ng = size ( this % Xt , 1 ) if ( this % is_rational ()) then ! NURBS call compute_d2Tgc ( this % Xt , this % knot , this % degree , this % nc , this % ng , this % Wc , d2Tgc , dTgc , Tgc ) else ! B-Spline call compute_d2Tgc ( this % Xt , this % knot , this % degree , this % nc , this % ng , d2Tgc , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative2_scalar ( this , Xt , d2Tgc , dTgc , Tgc ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: Xt real ( rk ), allocatable , intent ( out ) :: d2Tgc (:) real ( rk ), allocatable , intent ( out ), optional :: dTgc (:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:) if ( this % is_rational ()) then ! NURBS call compute_d2Tgc ( Xt , this % knot , this % degree , this % nc , this % Wc , d2Tgc , dTgc , Tgc ) else ! B-Spline call compute_d2Tgc ( Xt , this % knot , this % degree , this % nc , d2Tgc , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine basis_vector ( this , res , Xt , Tgc ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ), optional :: res real ( rk ), intent ( in ), contiguous , optional :: Xt (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) integer :: i ! Set parameter values if ( present ( Xt )) then if ( allocated ( this % Xt )) deallocate ( this % Xt ) this % Xt = Xt elseif ( present ( res )) then if ( allocated ( this % Xt )) deallocate ( this % Xt ) allocate ( this % Xt ( res )) this % Xt = [( real ( i - 1 , rk ) / real ( res - 1 , rk ), i = 1 , res )] ! else ! this%Xt = this%Xt end if ! Set number of geometry points this % ng = size ( this % Xt , 1 ) if ( this % is_rational ()) then ! NURBS Tgc = compute_Tgc ( this % Xt , this % knot , this % degree , this % nc , this % ng , this % Wc ) else ! B-Spline Tgc = compute_Tgc ( this % Xt , this % knot , this % degree , this % nc , this % ng ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine basis_scalar ( this , Xt , Tgc ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: Xt real ( rk ), allocatable , intent ( out ) :: Tgc (:) if ( this % is_rational ()) then ! NURBS Tgc = compute_Tgc ( Xt , this % knot , this % degree , this % nc , this % Wc ) else ! B-Spline Tgc = compute_Tgc ( Xt , this % knot , this % degree , this % nc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function is_rational ( this ) result ( r ) class ( nurbs_curve ), intent ( in ) :: this logical :: r r = . false . if ( allocated ( this % Wc )) then if ( any ( this % Wc /= this % Wc ( 1 ))) then r = . true . end if end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem_Xc_vis ( this , elemConn ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn_Xc_vis )) deallocate ( this % elemConn_Xc_vis ) this % elemConn_Xc_vis = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem_Xg_vis ( this , elemConn ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn_Xg_vis )) deallocate ( this % elemConn_Xg_vis ) this % elemConn_Xg_vis = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem ( this , elemConn ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn )) deallocate ( this % elemConn ) this % elemConn = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem_Xc_vis ( this ) result ( elemConn ) class ( nurbs_curve ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn_Xc_vis end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem_Xg_vis ( this ) result ( elemConn ) class ( nurbs_curve ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn_Xg_vis end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem ( this ) result ( elemConn ) class ( nurbs_curve ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine remove_knots ( this , Xth , r ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xth (:) integer , intent ( in ), contiguous :: r (:) integer :: k , i , s , dim , j , nc_new , t real ( rk ), allocatable :: Xcw (:,:), Xcw_new (:,:), Xc_new (:,:), Wc_new (:), knot_new (:) if ( this % is_rational ()) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc - 1 , this % degree , Xth ( i ), this % knot ) if ( this % knot ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) call remove_knots_A_5_8 (& this % degree ,& this % knot ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xcw_new ) if ( allocated ( Xcw )) deallocate ( Xcw ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) allocate ( Xc_new ( nc_new , dim )) allocate ( Wc_new ( nc_new )) do j = 1 , nc_new Xc_new ( j ,:) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot = knot_new , Xc = Xc_new , Wc = Wc_new ) if ( allocated ( Xcw_new )) deallocate ( Xcw_new ) if ( allocated ( Xc_new )) deallocate ( Xc_new ) if ( allocated ( Wc_new )) deallocate ( Wc_new ) end if end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc - 1 , this % degree , Xth ( i ), this % knot ) if ( this % knot ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot , Xth ( i )) else s = 0 end if k = k + 1 call remove_knots_A_5_8 (& this % degree ,& this % knot ,& this % Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xc_new ) if ( t == 0 ) then ! no change else call this % set ( knot = knot_new , Xc = Xc_new ) end if end do end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_circle ( this , center , radius ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius real ( rk ), allocatable :: Xc (:,:), Wc (:), knot (:) integer :: i ! Define control points for circle allocate ( Xc ( 7 , 3 )) Xc ( 1 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 3 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 6 ,:) = [ 1.0_rk , - sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 7 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] ! Scale and translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) * radius end do ! Define weights for the control points Wc = [ 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ] ! Define knot vector knot = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 3.0_rk , 1.0_rk / 3.0_rk , 2.0_rk / 3.0_rk , 2.0_rk / 3.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_C ( this , center , radius ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius real ( rk ), allocatable :: Xc (:,:), Wc (:), knot (:) integer :: i ! Define control points for C-shape allocate ( Xc ( 5 , 3 )) Xc ( 1 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 3 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] ! Scale and translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) * radius end do ! Define weights for the control points Wc = [ 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ] ! Define knot vector knot = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 2.0_rk , 1.0_rk / 2.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem ( this ) result ( elemConn ) class ( nurbs_curve ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) call elemConn_Cn ( this % nc , this % degree , unique ( this % knot ), this % get_multiplicity (),& elemConn ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine rotate_Xc ( this , alpha , beta , theta ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: alpha , beta , theta integer :: i do i = 1 , this % nc this % Xc ( i , :) = matmul ( rotation ( alpha , beta , theta ), this % Xc ( i , :)) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine rotate_Xg ( this , alpha , beta , theta ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: alpha , beta , theta integer :: i do i = 1 , this % ng this % Xg ( i , :) = matmul ( rotation ( alpha , beta , theta ), this % Xg ( i , :)) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine translate_Xc ( this , vec ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: vec (:) integer :: i do i = 1 , this % nc this % Xc ( i , :) = this % Xc ( i , :) + vec end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine translate_Xg ( this , vec ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: vec (:) integer :: i do i = 1 , this % nc this % Xg ( i , :) = this % Xg ( i , :) + vec end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine show ( this , vtkfile_Xc , vtkfile_Xg ) class ( nurbs_curve ), intent ( inout ) :: this character ( len =* ), intent ( in ) :: vtkfile_Xc , vtkfile_Xg character ( len = 3000 ) :: pyvista_script pyvista_script = & \"import pyvista as pv\" // achar ( 10 ) // & \"pv.global_theme.color = 'white'\" // achar ( 10 ) // & \"Xc = pv.read('\" // trim ( vtkfile_Xc ) // \"')\" // achar ( 10 ) // & \"Xg = pv.read('\" // trim ( vtkfile_Xg ) // \"')\" // achar ( 10 ) // & \"p = pv.Plotter(lighting='light kit')\" // achar ( 10 ) // & \"actor_Xcp = p.add_mesh(\" // achar ( 10 ) // & \"    Xc,\" // achar ( 10 ) // & \"    style='points',\" // achar ( 10 ) // & \"    point_size=10,\" // achar ( 10 ) // & \"    color='red',\" // achar ( 10 ) // & \"    render_points_as_spheres=True,\" // achar ( 10 ) // & \"    opacity=0.5,\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"actor_Xcw = p.add_mesh(\" // achar ( 10 ) // & \"    Xc,\" // achar ( 10 ) // & \"    show_edges=True,\" // achar ( 10 ) // & \"    color='yellow',\" // achar ( 10 ) // & \"    line_width=3,\" // achar ( 10 ) // & \"    style='wireframe',\" // achar ( 10 ) // & \"    opacity=0.2\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"actor_Xg = p.add_mesh(\" // achar ( 10 ) // & \"    Xg,\" // achar ( 10 ) // & \"    show_edges=False,\" // achar ( 10 ) // & \"    color='cyan',\" // achar ( 10 ) // & \"    line_width=7,\" // achar ( 10 ) // & \"    metallic=0.6,\" // achar ( 10 ) // & \"    pbr=True,\" // achar ( 10 ) // & \"    split_sharp_edges=True,\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_axes(interactive=False)\" // achar ( 10 ) // & \"def point_picker_callback(point):\" // achar ( 10 ) // & \"    mesh = Xc\" // achar ( 10 ) // & \"    point_id = mesh.find_closest_point(point)\" // achar ( 10 ) // & \"    point_coords = mesh.points[point_id]\" // achar ( 10 ) // & \"    label = f'ID: {point_id + 1}\\n({point_coords[0]:.3f}, {point_coords[1]:.3f}, {point_coords[2]:.3f})'\" // achar ( 10 ) // & \"    p.add_point_labels(\" // achar ( 10 ) // & \"        [point_coords],\" // achar ( 10 ) // & \"        [label],\" // achar ( 10 ) // & \"        font_size=14,\" // achar ( 10 ) // & \"        text_color='black',\" // achar ( 10 ) // & \"        show_points=False,\" // achar ( 10 ) // & \"        fill_shape=False,\" // achar ( 10 ) // & \"        shape=None,\" // achar ( 10 ) // & \"    )\" // achar ( 10 ) // & \"picker = p.enable_point_picking(callback=point_picker_callback, show_message=False)\" // achar ( 10 ) // & \"window_size = p.window_size\" // achar ( 10 ) // & \"y_pos = window_size[1]\" // achar ( 10 ) // & \"def Xcp_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xcp.SetVisibility(flag)\" // achar ( 10 ) // & \"def Xcw_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xcw.SetVisibility(flag)\" // achar ( 10 ) // & \"def Xg_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xg.SetVisibility(flag)\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xcp_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='red',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 1 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xcw_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='yellow',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 2 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xg_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='cyan',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 3 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xc (Points)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 1 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xc (Control geometry)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 2 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xg (Geometry)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 3 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text('ForCAD', position=(0.0, 10.0), font_size=14, color='black', font='times')\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'https://github.com/gha3mi/forcad',\" // achar ( 10 ) // & \"    position=(0.0, 0.0),\" // achar ( 10 ) // & \"    font_size=7,\" // achar ( 10 ) // & \"    color='blue',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.show(title='ForCAD', interactive=True)\" call execute_command_line ( 'python -c \"' // trim ( adjustl ( pyvista_script )) // '\"' ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_half_circle ( this , center , radius ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius real ( rk ), allocatable :: Xc (:,:), Wc (:), knot (:) integer :: i ! Define control points for half circle allocate ( Xc ( 5 , 3 )) Xc ( 1 ,:) = [ 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 3 ,:) = [ 0.0_rk , 0.5_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , 0.0_rk , 0.0_rk ] ! Scale and translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) * radius end do ! Define weights for the control points Wc = [ 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk ] ! Define knot vector knot = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 2.0_rk , & 1.0_rk / 2.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine nearest_point ( this , point_Xg , nearest_Xg , nearest_Xt , id ) class ( nurbs_curve ), intent ( in ) :: this real ( rk ), intent ( in ) :: point_Xg (:) real ( rk ), intent ( out ), allocatable , optional :: nearest_Xg (:) real ( rk ), intent ( out ), optional :: nearest_Xt integer , intent ( out ), optional :: id integer :: id_ real ( rk ), allocatable :: distances (:) allocate ( distances ( this % ng )) distances = nearest_point_help_1d ( this % ng , this % Xg , point_Xg ) id_ = minloc ( distances , dim = 1 ) if ( present ( id )) id = id_ if ( present ( nearest_Xg )) nearest_Xg = this % Xg ( id_ ,:) if ( present ( nearest_Xt )) nearest_Xt = this % Xt ( id_ ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine nearest_point2 ( this , point_Xg , tol , maxit , nearest_Xt , nearest_Xg ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: point_Xg (:) real ( rk ), intent ( in ) :: tol integer , intent ( in ) :: maxit real ( rk ), intent ( out ) :: nearest_Xt real ( rk ), allocatable , intent ( out ), optional :: nearest_Xg (:) real ( rk ) :: xk , obj , grad , hess , dk , alphak , tau , beta , lower_bounds , upper_bounds real ( rk ), allocatable :: Xg (:), Tgc (:), dTgc (:), d2Tgc (:) integer :: k , l logical :: convergenz type ( nurbs_curve ) :: copy_this k = 0 ! lower and upper bounds lower_bounds = minval ( this % knot ) upper_bounds = maxval ( this % knot ) ! guess initial point copy_this = this call copy_this % create ( 10 ) call copy_this % nearest_point ( point_Xg = point_Xg , nearest_Xt = xk ) call copy_this % finalize () ! Check if xk is within the knot vector range if ( xk < minval ( this % knot )) then xk = minval ( this % knot ) else if ( xk > maxval ( this % knot )) then xk = maxval ( this % knot ) end if convergenz = . false . allocate ( Xg ( size ( this % Xc , 2 ))) ! allocate(dTgc(size(this%Xc,1))) ! allocate(d2Tgc(size(this%Xc,1))) do while (. not . convergenz . and . k < maxit ) ! objection, gradient and hessian Xg = this % cmp_Xg ( xk ) call this % derivative2 ( Xt = xk , d2Tgc = d2Tgc , dTgc = dTgc , Tgc = Tgc ) ! Tgc is not needed obj = norm2 ( Xg - point_Xg ) + 0.001_rk ! add a small number to avoid division by zero grad = dot_product (( Xg - point_Xg ) / obj , matmul ( dTgc , this % Xc )) hess = dot_product ( matmul ( dTgc , this % Xc ) - ( Xg - point_Xg ) / obj * grad , matmul ( dTgc , this % Xc )) / obj & + dot_product (( Xg - point_Xg ) / obj , matmul ( d2Tgc , this % Xc )) ! debug print '(i3,1x,e20.10,1x,e20.10)' , k , xk , abs ( grad ) if ( abs ( grad ) <= tol ) then convergenz = . true . nearest_Xt = xk if ( present ( nearest_Xg )) nearest_Xg = this % cmp_Xg ( nearest_Xt ) else dk = - grad / hess ! Backtracking-Armijo Line Search alphak = 1.0_rk tau = 0.5_rk ! 0 < tau  < 1 beta = 1.0e-4_rk ! 0 < beta < 1 l = 0 do while (. not . norm2 ( this % cmp_Xg ( xk + alphak * dk ) - point_Xg ) <= obj + alphak * beta * grad * dk . and . l < 50 ) alphak = tau * alphak l = l + 1 end do xk = xk + alphak * dk ! Check if xk is within the knot vector range xk = max ( min ( xk , upper_bounds ), lower_bounds ) k = k + 1 end if end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine ansatz ( this , ie , ig , Tgc , dTgc_dXg , dL ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ) :: ie , ig real ( rk ), intent ( out ) :: dL real ( rk ), allocatable , intent ( out ) :: Tgc (:), dTgc_dXg (:,:) real ( rk ), allocatable :: Xth (:), Xth_e (:), Xc_eT (:,:), Xksi (:), Wksi (:) integer , allocatable :: elem_th (:,:), elem_c (:,:), elem_ce (:) type ( nurbs_curve ) :: th , th_e real ( rk ), allocatable :: dTtth_dXksi (:), Ttth (:), dTgc_dXt (:), dXg_dXt (:) real ( rk ) :: Xt , dXt_dXksi real ( rk ), allocatable :: dXg_dXksi (:) !! Jacobian matrix real ( rk ) :: det_dXg_dXksi !! Determinant of the Jacobian matrix call gauss_leg ([ 0.0_rk , 1.0_rk ], this % degree , Xksi , Wksi ) Xth = unique ( this % knot ) call th % set ([ 0.0_rk , Xth , 1.0_rk ], Xth ) elem_th = th % cmp_elem () elem_c = this % cmp_elem () Xth_e = Xth ( elem_th ( ie ,:)) call th_e % set ([ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ], Xth_e ) elem_ce = elem_c ( ie ,:) Xc_eT = transpose ( this % Xc ( elem_ce ,:)) call th_e % derivative ( Xksi ( ig ), dTtth_dXksi , Ttth ) Xt = dot_product ( Xth_e , Ttth ) dXt_dXksi = dot_product ( Xth_e , dTtth_dXksi ) call this % derivative ( Xt , dTgc_dXt , Tgc , elem_ce ) dXg_dXt = matmul ( Xc_eT , dTgc_dXt ) dTgc_dXg = dyad ( dTgc_dXt , dXg_dXt ) / norm2 ( dXg_dXt ) dXg_dXksi = dXg_dXt * dXt_dXksi det_dXg_dXksi = norm2 ( dXg_dXksi ) dL = det_dXg_dXksi * Wksi ( ig ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_length ( this , length ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( out ) :: length real ( rk ), allocatable :: Tgc (:), dTgc_dXg (:,:) integer :: ie , ig real ( rk ) :: dL , dL_ig length = 0.0_rk do ie = 1 , size ( this % cmp_elem (), 1 ) dL = 0.0_rk do ig = 1 , size ( this % cmp_elem (), 2 ) call this % ansatz ( ie , ig , Tgc , dTgc_dXg , dL_ig ) dL = dL + dL_ig end do length = length + dL end do end subroutine !=============================================================================== end module forcad_nurbs_curve !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_nurbs_1d ( Xt , knot , degree , nc , ng , Xc , Wc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ) :: ng real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Xg (:,:) real ( rk ), allocatable :: Tgc (:) integer :: i allocate ( Xg ( ng , size ( Xc , 2 ))) allocate ( Tgc ( nc )) !$OMP PARALLEL DO PRIVATE(Tgc) do i = 1 , ng Tgc = basis_bspline ( Xt ( i ), knot , nc , degree ) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) Xg ( i ,:) = matmul ( Tgc , Xc ) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_nurbs_1d_1point ( Xt , knot , degree , nc , Xc , Wc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline implicit none real ( rk ), intent ( in ) :: Xt real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Xg (:) real ( rk ), allocatable :: Tgc (:) allocate ( Xg ( size ( Xc ))) allocate ( Tgc ( nc )) Tgc = basis_bspline ( Xt , knot , nc , degree ) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) Xg = matmul ( Tgc , Xc ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_bspline_1d ( Xt , knot , degree , nc , ng , Xc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ) :: ng real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), allocatable :: Xg (:,:) integer :: i allocate ( Xg ( ng , size ( Xc , 2 ))) !$OMP PARALLEL DO do i = 1 , ng Xg ( i ,:) = matmul ( basis_bspline ( Xt ( i ), knot , nc , degree ), Xc ) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_bspline_1d_1point ( Xt , knot , degree , nc , Xc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline implicit none real ( rk ), intent ( in ) :: Xt real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), allocatable :: Xg (:) allocate ( Xg ( size ( Xc ))) Xg = matmul ( basis_bspline ( Xt , knot , nc , degree ), Xc ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_nurbs_1d_vector ( Xt , knot , degree , nc , ng , Wc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_der implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ) :: ng real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: dBi (:), Bi (:) integer :: i allocate ( dTgc ( ng , nc ), Tgc ( ng , nc ), dBi ( nc ), Bi ( nc )) do i = 1 , size ( Xt ) call basis_bspline_der ( Xt ( i ), knot , nc , degree , dBi , Bi ) Tgc ( i ,:) = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dTgc ( i ,:) = ( dBi * Wc - Tgc ( i ,:) * dot_product ( dBi , Wc ) ) / dot_product ( Bi , Wc ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_nurbs_1d_scalar ( Xt , knot , degree , nc , Wc , dTgc , Tgc , elem ) use forcad_utils , only : rk , basis_bspline_der implicit none real ( rk ), intent ( in ) :: Xt real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc real ( rk ), intent ( in ), contiguous :: Wc (:) integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: dBi (:), Bi (:) call basis_bspline_der ( Xt , knot , nc , degree , dBi , Bi ) if (. not . present ( elem )) then allocate ( dTgc ( nc ), Tgc ( nc )) Tgc = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dTgc = ( dBi * Wc - Tgc * dot_product ( dBi , Wc ) ) / dot_product ( Bi , Wc ) else allocate ( dTgc ( size ( elem )), Tgc ( size ( elem ))) Tgc = Bi ( elem ) * ( Wc ( elem ) / ( dot_product ( Bi ( elem ), Wc ( elem )))) dTgc = ( dBi ( elem ) * Wc ( elem ) - Tgc * dot_product ( dBi ( elem ), Wc ( elem )) ) / dot_product ( Bi ( elem ), Wc ( elem )) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_bspline_1d_vector ( Xt , knot , degree , nc , ng , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_der implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ) :: ng real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: dBi (:), Bi (:) integer :: i allocate ( dTgc ( ng , nc ), Tgc ( ng , nc ), dBi ( nc ), Bi ( nc )) do i = 1 , size ( Xt ) call basis_bspline_der ( Xt ( i ), knot , nc , degree , dBi , Bi ) Tgc ( i ,:) = Bi dTgc ( i ,:) = dBi end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_bspline_1d_scalar ( Xt , knot , degree , nc , dTgc , Tgc , elem ) use forcad_utils , only : rk , basis_bspline_der implicit none real ( rk ), intent ( in ) :: Xt real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: dB (:), B (:) if (. not . present ( elem )) then allocate ( dTgc ( nc ), Tgc ( nc )) call basis_bspline_der ( Xt , knot , nc , degree , dTgc , Tgc ) else allocate ( dB ( size ( elem )), B ( size ( elem ))) call basis_bspline_der ( Xt , knot , nc , degree , dB , B ) Tgc = B ( elem ) dTgc = dB ( elem ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_nurbs_1d_vector ( Xt , knot , degree , nc , ng , Wc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ) :: ng real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: d2Bi (:), dBi (:), Tgci (:), dTgci (:), Bi (:) integer :: i allocate ( d2Tgc ( ng , nc ), dTgc ( ng , nc ), Tgc ( ng , nc ), d2Bi ( nc ), dTgci ( nc ), dBi ( nc ), Tgci ( nc ), Bi ( nc )) do i = 1 , size ( Xt ) call basis_bspline_2der ( Xt ( i ), knot , nc , degree , d2Bi , dBi , Bi ) Tgci = Bi * ( Wc / ( dot_product ( Bi , Wc ))) Tgc ( i ,:) = Tgci dTgci = ( dBi * Wc - Tgci * dot_product ( dBi , Wc ) ) / dot_product ( Bi , Wc ) dTgc ( i ,:) = dTgci d2Tgc ( i ,:) = ( d2Bi * Wc - 2.0_rk * dTgci * dot_product ( dBi , Wc ) - Tgci * dot_product ( d2Bi , Wc )) / dot_product ( Bi , Wc ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_nurbs_1d_scalar ( Xt , knot , degree , nc , Wc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der implicit none real ( rk ), intent ( in ) :: Xt real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: d2Bi (:), dBi (:), Bi (:) allocate ( d2Tgc ( nc ), dTgc ( nc ), Tgc ( nc ), d2Bi ( nc ), dBi ( nc ), Bi ( nc )) call basis_bspline_2der ( Xt , knot , nc , degree , d2Bi , dBi , Bi ) Tgc = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dTgc = ( dBi * Wc - Tgc * dot_product ( dBi , Wc ) ) / dot_product ( Bi , Wc ) d2Tgc = ( d2Bi * Wc - 2.0_rk * dTgc * dot_product ( dBi , Wc ) - Tgc * dot_product ( d2Bi , Wc )) / dot_product ( Bi , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_bspline_1d_vector ( Xt , knot , degree , nc , ng , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ) :: ng real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: d2Tgci (:), dTgci (:), Tgci (:) integer :: i allocate ( d2Tgc ( ng , nc ), dTgc ( ng , nc ), Tgc ( ng , nc ), dTgci ( nc ), Tgci ( nc ), d2Tgci ( nc )) do i = 1 , size ( Xt ) call basis_bspline_2der ( Xt ( i ), knot , nc , degree , d2Tgci , dTgci , Tgci ) Tgc ( i ,:) = Tgci dTgc ( i ,:) = dTgci d2Tgc ( i ,:) = d2Tgci end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_bspline_1d_scalar ( Xt , knot , degree , nc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der implicit none real ( rk ), intent ( in ) :: Xt real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc real ( rk ), allocatable , intent ( out ) :: d2Tgc (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) allocate ( d2Tgc ( nc ), dTgc ( nc ), Tgc ( nc )) call basis_bspline_2der ( Xt , knot , nc , degree , d2Tgc , dTgc , Tgc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_nurbs_1d_vector ( Xt , knot , degree , nc , ng , Wc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ) :: ng real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Tgc (:,:) real ( rk ), allocatable :: Tgci (:) integer :: i allocate ( Tgc ( ng , nc ), Tgci ( nc )) !$OMP PARALLEL DO PRIVATE(Tgci) do i = 1 , size ( Xt , 1 ) Tgci = basis_bspline ( Xt ( i ), knot , nc , degree ) Tgc ( i ,:) = Tgci * ( Wc / ( dot_product ( Tgci , Wc ))) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_nurbs_1d_scalar ( Xt , knot , degree , nc , Wc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline implicit none real ( rk ), intent ( in ) :: Xt real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Tgc (:) allocate ( Tgc ( nc )) Tgc = basis_bspline ( Xt , knot , nc , degree ) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_bspline_1d_vector ( Xt , knot , degree , nc , ng ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ) :: ng real ( rk ), allocatable :: Tgc (:,:) integer :: i allocate ( Tgc ( ng , nc )) !$OMP PARALLEL DO do i = 1 , size ( Xt , 1 ) Tgc ( i ,:) = basis_bspline ( Xt ( i ), knot , nc , degree ) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_bspline_1d_scalar ( Xt , knot , degree , nc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline implicit none real ( rk ), intent ( in ) :: Xt real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc real ( rk ), allocatable :: Tgc (:) allocate ( Tgc ( nc )) Tgc = basis_bspline ( Xt , knot , nc , degree ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function nearest_point_help_1d ( ng , Xg , point_Xg ) result ( distances ) use forcad_utils , only : rk implicit none integer , intent ( in ) :: ng real ( rk ), intent ( in ), contiguous :: Xg (:,:) real ( rk ), intent ( in ), contiguous :: point_Xg (:) real ( rk ), allocatable :: distances (:) integer :: i allocate ( distances ( ng )) !$OMP PARALLEL DO do i = 1 , ng distances ( i ) = norm2 ( Xg ( i ,:) - point_Xg ) end do !$OMP END PARALLEL DO end function !===============================================================================","tags":"","loc":"sourcefile/forcad_nurbs_curve.f90.html"}]}
\ No newline at end of file
+var tipuesearch = {"pages":[{"title":" ForCAD ","text":"ForCAD ForCAD : A parallel Fortran library for geometric modeling using NURBS (Non-Uniform Rational B-Splines). ForCAD supports B-Spline , NURBS , Bezier , and Rational Bezier curves, surfaces, and volumes. Main Features Parallelized using OpenMP and do concurrent . Create NURBS objects by specifying control points, weights and knots. Refine NURBS objects by inserting or removing knots and elevating degree. Compute basis functions and derivatives of NURBS objects. Obtain IGA elements connectivity. Obtain visualized elements connectivity and coordinates for geometry and control geometry. Mesh insertion into a NURBS object. Export NURBS objects to VTK files for visualization. Includes predefined NURBS shapes: Circle, Half Circle, Tetragon, Hexahedron, 2D Ring, Half 2D Ring, 3D Ring, Half 3D Ring, C-shapes. Rotate and translate NURBS objects. Visualization using provided python PyVista scripts. Examples Installation Requirements A Fortran compiler, such as GNU Fortran ( gfortran ), Intel Fortran Compiler ( ifx/ifort ) or NVIDIA HPC SDK Fortran compiler ( nvfortran ). The Fortran Package Manager fpm . Optional: PyVista (Recommended) or ParaView for visualization. Clone the repository Clone the ForCAD repository from GitHub: git clone https://github.com/gha3mi/forcad.git cd forcad Install PyVista (Optional) To install PyVista, run the following command: pip install pyvista Running Examples with fpm fpm run --example <file name excluding the .f90 extension> After executing the examples, .vtk files will be generated in the vtk directory. To visualize these files, a show() method is provided which utilizes PyVista. Alternatively, other visualization tools like ParaView can also be used. Using ForCAD as a fpm Dependency If you want to use ForCAD as a dependency in your own fpm project,\nyou can easily include it by adding the following line to your fpm.toml file: [dependencies] forcad = { git = \"https://github.com/gha3mi/forcad.git\" } API documentation The most up-to-date API documentation for the master branch is available here .\nTo generate the API documentation for ForCAD using ford run the following\ncommand: ford ford.yml Roadmap For a detailed roadmap outlining upcoming features and enhancements, please refer to ROADMAP.md . Contributing To contribute to ForCAD, please review the CONTRIBUTING.md . Citation If you use ForCAD in your research, please cite it as follows: @software { seyed_ali_ghasemi_2024_10904447 , author = {Ghasemi, S. A.} , title = {gha3mi/ForCAD} , year = 2024 , publisher = {Zenodo} , doi = {10.5281/zenodo.10904447} , url = {https://doi.org/10.5281/zenodo.10904447} } References Piegl, L., & Tiller, W. (1995). The NURBS Book. In Monographs in Visual Communications. Springer Berlin Heidelberg. https://doi.org/10.1007/978-3-642-97385-7 An Introduction to NURBS. (2001). Elsevier. https://doi.org/10.1016/b978-1-55860-669-2.x5000-3 Sullivan et al., (2019). PyVista: 3D plotting and mesh analysis through a streamlined interface for the Visualization Toolkit (VTK). Journal of Open Source Software, 4(37), 1450, https://doi.org/10.21105/joss.01450 Ahrens, James, Geveci, Berk, Law, Charles, ParaView: An End-User Tool for Large Data Visualization, Visualization Handbook, Elsevier, 2005, ISBN-13: 9780123875822 Developer Info Seyed Ali Ghasemi","tags":"home","loc":"index.html"},{"title":"nurbs_curve – ForCAD ","text":"type, public :: nurbs_curve Components Type Visibility Attributes Name Initial real(kind=rk), private, allocatable :: Wc (:) Weights for control points (1D array: [nc]) real(kind=rk), private, allocatable :: Xc (:,:) Control points (2D array: [nc, dim]) real(kind=rk), private, allocatable :: Xg (:,:) Geometry points (2D array: [ng, dim]) real(kind=rk), private, allocatable :: Xt (:) Evaluation points (1D array: [ng]) integer, private :: degree Degree (order) of the curve integer, private, allocatable :: elemConn (:,:) IGA element connectivity integer, private, allocatable :: elemConn_Xc_vis (:,:) Connectivity for visualization of control points integer, private, allocatable :: elemConn_Xg_vis (:,:) Connectivity for visualization of geometry points real(kind=rk), private, allocatable :: knot (:) Knot vector (1D array) integer, private :: nc Number of control points integer, private :: ng Number of geometry points Type-Bound Procedures procedure, public :: ansatz Compute the shape functions, derivative of shape functions and dL private pure subroutine ansatz (this, ie, ig, Tgc, dTgc_dXg, dL) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dL generic, public :: basis => basis_vector , basis_scalar Compute the basis functions of the NURBS curve private pure subroutine basis_vector (this, res, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: Tgc (:) procedure, public :: cmp_Xg Compute geometry points private pure function cmp_Xg (this, Xt) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this real(kind=rk), intent(in) :: Xt Return Value real(kind=rk), allocatable, (:) procedure, public :: cmp_degree Compute degree of the NURBS curve private pure subroutine cmp_degree (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this procedure, public :: cmp_elem Generate IGA element connectivity private pure function cmp_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: cmp_elem_Xc_vis Generate connectivity for control points private pure function cmp_elem_Xc_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in), optional :: p Return Value integer, allocatable, (:,:) procedure, public :: cmp_elem_Xg_vis Generate connectivity for geometry points private pure function cmp_elem_Xg_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in), optional :: p Return Value integer, allocatable, (:,:) procedure, public :: cmp_length Compute the length of the NURBS curve private pure subroutine cmp_length (this, length) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(out) :: length procedure, public :: cmp_nc Compute number of required control points private pure subroutine cmp_nc (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this procedure, public :: create Generate geometry points private pure subroutine create (this, res, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) generic, public :: derivative => derivative_vector , derivative_scalar Compute the derivative of the NURBS curve private pure subroutine derivative_vector (this, res, Xt, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: dTgc (:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) generic, public :: derivative2 => derivative2_vector , derivative2_scalar Compute the second derivative of the NURBS curve private pure subroutine derivative2_vector (this, res, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: d2Tgc (:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) procedure, public :: elevate_degree Elevate the degree of the curve private pure subroutine elevate_degree (this, t) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: t procedure, public :: export_Xc Export control points to VTK file private impure subroutine export_Xc (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this character(len=*), intent(in) :: filename procedure, public :: export_Xg Export geometry points to VTK file private impure subroutine export_Xg (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this character(len=*), intent(in) :: filename procedure, public :: finalize Finalize the NURBS curve object private pure subroutine finalize (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this generic, public :: get_Wc => get_Wc_all , get_Wci Get weights private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) generic, public :: get_Xc => get_Xc_all , get_Xci , get_Xcid Get control points private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) generic, public :: get_Xg => get_Xg_all , get_Xgi , get_Xgid Get geometry points private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, public :: get_Xt Get parameter values private pure function get_Xt (this) result(Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) procedure, public :: get_continuity Compute and return the continuity of the curve private pure function get_continuity (this) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:) procedure, public :: get_degree Get degree of the NURBS curve private pure function get_degree (this) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer procedure, public :: get_elem Get IGA element connectivity private pure function get_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: get_elem_Xc_vis Get connectivity for control points private pure function get_elem_Xc_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: get_elem_Xg_vis Get connectivity for geometry points private pure function get_elem_Xg_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) generic, public :: get_knot => get_knoti , get_knot_all Get knot vector private pure function get_knoti (this, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: i Return Value real(kind=rk) private pure function get_knot_all (this) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) procedure, public :: get_multiplicity Compute and return the multiplicity of the knots private pure function get_multiplicity (this) result(m) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:) procedure, public :: get_nc Get number of control points private pure function get_nc (this) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer procedure, public :: get_ng Get number of geometry points private pure function get_ng (this) result(ng) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer procedure, public :: insert_knots Insert knots into the knot vector private pure subroutine insert_knots (this, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) procedure, public :: is_rational Check if the NURBS curve is rational private pure function is_rational (this) result(r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value logical procedure, public :: modify_Wc Modify weights private pure subroutine modify_Wc (this, W, num) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num procedure, public :: modify_Xc Modify control points private pure subroutine modify_Xc (this, X, num, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir procedure, public :: nearest_point Find the nearest point on the NURBS curve (Approximation) private pure subroutine nearest_point (this, point_Xg, nearest_Xg, nearest_Xt, id) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional :: nearest_Xt integer, intent(out), optional :: id procedure, public :: nearest_point2 Find the nearest point on the NURBS curve (Minimization - Newton's method) private impure subroutine nearest_point2 (this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) procedure, public :: remove_knots Remove knots from the knot vector private pure subroutine remove_knots (this, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) procedure, public :: rotate_Xc Rotate control points private pure subroutine rotate_Xc (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta procedure, public :: rotate_Xg Rotate geometry points private pure subroutine rotate_Xg (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta generic, public :: set => set1 , set1a , set2 , set3 , set4 Set NURBS curve private pure subroutine set1 (this, knot, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vector, control points and weights for the NURBS curve object. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set1a (this, knot, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vector, control points and weights for the NURBS curve object. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Xc (:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set2 (this, Xth_dir, degree, continuity, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set NURBS curve using nodes of parameter space (Xth), degree, continuity, control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir (:) integer, intent(in) :: degree integer, intent(in), contiguous :: continuity (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set3 (this, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier curve using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set1 Set knot vector, control points and weights for the NURBS curve object private pure subroutine set1 (this, knot, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vector, control points and weights for the NURBS curve object. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set1a private pure subroutine set1a (this, knot, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vector, control points and weights for the NURBS curve object. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Xc (:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set2 Set NURBS curve using nodes of parameter space, degree, continuity, control points and weights private pure subroutine set2 (this, Xth_dir, degree, continuity, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set NURBS curve using nodes of parameter space (Xth), degree, continuity, control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir (:) integer, intent(in) :: degree integer, intent(in), contiguous :: continuity (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set3 Set Bezier or Rational Bezier curve using control points and weights private pure subroutine set3 (this, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier curve using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set4 Set NURBS curve using degree, number of control points, control points and weights private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set_C Set a C-shape private pure subroutine set_C (this, center, radius) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius procedure, public :: set_circle Set a circle private pure subroutine set_circle (this, center, radius) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius procedure, public :: set_elem Set IGA element connectivity private pure subroutine set_elem (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_elem_Xc_vis Set connectivity for control points private pure subroutine set_elem_Xc_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_elem_Xg_vis Set connectivity for geometry points private pure subroutine set_elem_Xg_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_half_circle Set a half circle private pure subroutine set_half_circle (this, center, radius) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius procedure, public :: show Show the NURBS object using PyVista private impure subroutine show (this, vtkfile_Xc, vtkfile_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg procedure, public :: translate_Xc Translate control points private pure subroutine translate_Xc (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) procedure, public :: translate_Xg Translate geometry points private pure subroutine translate_Xg (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) procedure, private :: basis_scalar Compute the basis functions of the NURBS curve private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: Tgc (:) procedure, private :: basis_vector Compute the basis functions of the NURBS curve private pure subroutine basis_vector (this, res, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) procedure, private :: derivative2_scalar Compute the second derivative of the NURBS curve private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: d2Tgc (:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) procedure, private :: derivative2_vector Compute the second derivative of the NURBS curve private pure subroutine derivative2_vector (this, res, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) procedure, private :: derivative_scalar Compute the derivative of the NURBS curve private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: dTgc (:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) procedure, private :: derivative_vector Compute the derivative of the NURBS curve private pure subroutine derivative_vector (this, res, Xt, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) procedure, private :: get_Wc_all Get all weights private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Wci Get i-th weight private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) procedure, private :: get_Xc_all Get all control points private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) procedure, private :: get_Xci Get i-th control point private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Xcid Get i-th control point in a specific direction private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, private :: get_Xg_all Get all geometry points private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) procedure, private :: get_Xgi Get i-th geometry point private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Xgid Get i-th geometry point in a specific direction private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, private :: get_knot_all Get all knot vectors private pure function get_knot_all (this) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) procedure, private :: get_knoti Get i-th knot value private pure function get_knoti (this, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: i Return Value real(kind=rk)","tags":"","loc":"type/nurbs_curve.html"},{"title":"nurbs_volume – ForCAD ","text":"type, public :: nurbs_volume Components Type Visibility Attributes Name Initial real(kind=rk), private, allocatable :: Wc (:) Weights for the control points (1D array: [nc(1) nc(2) nc(3)]) real(kind=rk), private, allocatable :: Xc (:,:) Control points (2D array: [nc(1) nc(2) nc(3), dim]) real(kind=rk), private, allocatable :: Xg (:,:) Geometry points (2D array: [ng(1) ng(2) ng(3), dim]) real(kind=rk), private, allocatable :: Xt (:,:) Evaluation parameter values (2D array: [ng(1) ng(2) ng(3), dim] real(kind=rk), private, allocatable :: Xt1 (:) Evaluation parameter values in the first direction (1D array: [ng(1)]) real(kind=rk), private, allocatable :: Xt2 (:) Evaluation parameter values in the second direction (1D array: [ng(2)]) real(kind=rk), private, allocatable :: Xt3 (:) Evaluation parameter values in the third direction (1D array: [ng(3)]) integer, private :: degree (3) Degree (order) of the volume integer, private, allocatable :: elemConn (:,:) IGA element connectivity integer, private, allocatable :: elemConn_Xc_vis (:,:) Connectivity for visualization of control points integer, private, allocatable :: elemConn_Xg_vis (:,:) Connectivity for visualization of geometry points real(kind=rk), private, allocatable :: knot1 (:) Knot vector in the first direction (1D array) real(kind=rk), private, allocatable :: knot2 (:) Knot vector in the second direction (1D array) real(kind=rk), private, allocatable :: knot3 (:) Knot vector in the third direction (1D array) integer, private :: nc (3) Number of control points in each direction integer, private :: ng (3) Number of geometry points in each direction Type-Bound Procedures procedure, public :: ansatz Compute the shape functions, derivative of shape functions and dV private pure subroutine ansatz (this, ie, ig, Tgc, dTgc_dXg, dV) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dV generic, public :: basis => basis_vector , basis_scalar Compute the basis functions of the NURBS volume private pure subroutine basis_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:) procedure, public :: cmp_Xg Compute geometry points private pure function cmp_Xg (this, Xt) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this real(kind=rk), intent(in), contiguous :: Xt (:) Return Value real(kind=rk), allocatable, (:) procedure, public :: cmp_degree Compute degree of the NURBS volume private pure subroutine cmp_degree (this, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: dir procedure, public :: cmp_degreeFace Compute degrees of the faces private pure function cmp_degreeFace (this, face) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: face Return Value integer, (3) procedure, public :: cmp_elem Generate IGA element connectivity private pure function cmp_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: cmp_elemFace Compute faces of the IGA elements private pure function cmp_elemFace (this, elem, face) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause number of nodes in each direction Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:) procedure, public :: cmp_elemFace_Xc_vis Compute faces of the control points private pure function cmp_elemFace_Xc_vis (this, elem, face) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause number of nodes in each direction Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:) procedure, public :: cmp_elemFace_Xg_vis Compute faces of the geometry points private pure function cmp_elemFace_Xg_vis (this, elem, face) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause number of nodes in each direction Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:) procedure, public :: cmp_elem_Xc_vis Generate connectivity for control points private pure function cmp_elem_Xc_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) procedure, public :: cmp_elem_Xg_vis Generate connectivity for geometry points private pure function cmp_elem_Xg_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) procedure, public :: cmp_nc Compute number of required control points private pure subroutine cmp_nc (this, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: dir procedure, public :: cmp_volume Compute the volume of the NURBS volume private pure subroutine cmp_volume (this, volume) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(out) :: volume procedure, public :: create Generate geometry points private pure subroutine create (this, res1, res2, res3, Xt1, Xt2, Xt3, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(in), optional, contiguous :: Xt (:,:) generic, public :: derivative => derivative_vector , derivative_scalar Compute the derivative of the NURBS volume private pure subroutine derivative_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) generic, public :: derivative2 => derivative2_vector , derivative2_scalar Compute the second derivative of the NURBS volume private pure subroutine derivative2_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) procedure, public :: elevate_degree Elevate the degree of the NURBS volume private pure subroutine elevate_degree (this, dir, t) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir integer, intent(in) :: t procedure, public :: export_Xc Export control points to VTK file private impure subroutine export_Xc (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this character(len=*), intent(in) :: filename procedure, public :: export_Xg Export geometry points to VTK file private impure subroutine export_Xg (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this character(len=*), intent(in) :: filename procedure, public :: finalize Finalize the NURBS volume object private pure subroutine finalize (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this generic, public :: get_Wc => get_Wc_all , get_Wci Get weights private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) generic, public :: get_Xc => get_Xc_all , get_Xci , get_Xcid Get control points private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) generic, public :: get_Xg => get_Xg_all , get_Xgi , get_Xgid Get geometry points private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, public :: get_Xt Get parameter values private pure function get_Xt (this, dir) result(Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) procedure, public :: get_continuity Compute and return the continuity of the NURBS volume private pure function get_continuity (this, dir) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) generic, public :: get_degree => get_degree_all , get_degree_dir Get degree of the NURBS volume private pure function get_degree_all (this) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) private pure function get_degree_dir (this, dir) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer procedure, public :: get_elem Get IGA element connectivity private pure function get_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: get_elem_Xc_vis Get connectivity for control points private pure function get_elem_Xc_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: get_elem_Xg_vis Get connectivity for geometry points private pure function get_elem_Xg_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) generic, public :: get_knot => get_knoti , get_knot_all Get knot vector private pure function get_knoti (this, dir, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir integer, intent(in) :: i Return Value real(kind=rk) private pure function get_knot_all (this, dir) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) procedure, public :: get_multiplicity Compute and return the multiplicity of the knots private pure function get_multiplicity (this, dir) result(m) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) generic, public :: get_nc => get_nc_all , get_nc_dir Get number of control points private pure function get_nc_all (this) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) private pure function get_nc_dir (this, dir) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer procedure, public :: get_ng Get number of geometry points private pure function get_ng (this) result(ng) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) procedure, public :: insert_knots Insert knots into the knot vector private pure subroutine insert_knots (this, dir, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) procedure, public :: is_rational Check if the NURBS volume is rational private pure function is_rational (this) result(r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value logical procedure, public :: modify_Wc Modify weights private pure subroutine modify_Wc (this, W, num) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num procedure, public :: modify_Xc Modify control points private pure subroutine modify_Xc (this, X, num, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir procedure, public :: nearest_point Find the nearest point on the NURBS volume (Approximation) private pure subroutine nearest_point (this, point_Xg, nearest_Xg, nearest_Xt, id) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xt (:) integer, intent(out), optional :: id procedure, public :: nearest_point2 Find the nearest point on the NURBS volume (Minimization - Newton's method) private impure subroutine nearest_point2 (this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt (3) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) procedure, public :: put_to_nurbs Put a shape to a NURBS volume private pure subroutine put_to_nurbs (this, X, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: X (:,:) integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: remove_knots Remove knots from the knot vector private pure subroutine remove_knots (this, dir, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) procedure, public :: rotate_Xc Rotate control points private pure subroutine rotate_Xc (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta procedure, public :: rotate_Xg Rotate geometry points private pure subroutine rotate_Xg (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta generic, public :: set => set1 , set2 , set3 , set4 Set NURBS volume private pure subroutine set1 (this, knot1, knot2, knot3, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set control points and weights for the NURBS volume object. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set2 (this, Xth_dir1, Xth_dir2, Xth_dir3, degree, continuity1, continuity2, continuity3, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set control points and weights for the NURBS volume object. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir1 (:) real(kind=rk), intent(in), contiguous :: Xth_dir2 (:) real(kind=rk), intent(in), contiguous :: Xth_dir3 (:) integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: continuity1 (:) integer, intent(in), contiguous :: continuity2 (:) integer, intent(in), contiguous :: continuity3 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set3 (this, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier volume using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set1 Set knot vectors, control points and weights for the NURBS volume object private pure subroutine set1 (this, knot1, knot2, knot3, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set control points and weights for the NURBS volume object. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set2 Set NURBS volume using nodes of parameter space, degree, continuity, control points and weights private pure subroutine set2 (this, Xth_dir1, Xth_dir2, Xth_dir3, degree, continuity1, continuity2, continuity3, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set control points and weights for the NURBS volume object. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir1 (:) real(kind=rk), intent(in), contiguous :: Xth_dir2 (:) real(kind=rk), intent(in), contiguous :: Xth_dir3 (:) integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: continuity1 (:) integer, intent(in), contiguous :: continuity2 (:) integer, intent(in), contiguous :: continuity3 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set3 Set Bezier or Rational Bezier volume using control points and weights private pure subroutine set3 (this, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier volume using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set4 Set NURBS volume using degree, number of control points, control points and weights private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set_C Set a C-shape private pure subroutine set_C (this, center, radius1, radius2, length) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length procedure, public :: set_elem Set IGA element connectivity private pure subroutine set_elem (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_elem_Xc_vis Set connectivity for control points private pure subroutine set_elem_Xc_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_elem_Xg_vis Set connectivity for geometry points private pure subroutine set_elem_Xg_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_half_ring Set a half ring private pure subroutine set_half_ring (this, center, radius1, radius2, length) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length procedure, public :: set_hexahedron Set a hexahedron private pure subroutine set_hexahedron (this, L, nc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: L (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set_ring Set a ring private pure subroutine set_ring (this, center, radius1, radius2, length) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length procedure, public :: show Show the NURBS object using PyVista private impure subroutine show (this, vtkfile_Xc, vtkfile_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg procedure, public :: translate_Xc Translate control points private pure subroutine translate_Xc (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) procedure, public :: translate_Xg Translate geometry points private pure subroutine translate_Xg (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) procedure, private :: basis_scalar Compute the basis functions of the NURBS volume private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:) procedure, private :: basis_vector Compute the basis functions of the NURBS volume private pure subroutine basis_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) procedure, private :: derivative2_scalar Compute the second derivative of the NURBS volume private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) procedure, private :: derivative2_vector Compute the second derivative of the NURBS volume private pure subroutine derivative2_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) procedure, private :: derivative_scalar Compute the derivative of the NURBS volume private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) procedure, private :: derivative_vector Compute the derivative of the NURBS volume private pure subroutine derivative_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) procedure, private :: get_Wc_all Get all weights private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Wci Get i-th weight private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) procedure, private :: get_Xc_all Get all control points private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) procedure, private :: get_Xci Get i-th control point private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Xcid Get i-th control point in a specific direction private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, private :: get_Xg_all Get all geometry points private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) procedure, private :: get_Xgi Get i-th geometry point private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Xgid Get i-th geometry point in a specific direction private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, private :: get_degree_all Get degree of the NURBS volume in all directions private pure function get_degree_all (this) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) procedure, private :: get_degree_dir Get degree of the NURBS volume in a specific direction private pure function get_degree_dir (this, dir) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer procedure, private :: get_knot_all Get all knot vectors private pure function get_knot_all (this, dir) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) procedure, private :: get_knoti Get i-th knot value private pure function get_knoti (this, dir, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir integer, intent(in) :: i Return Value real(kind=rk) procedure, private :: get_nc_all Get number of control points in all directions private pure function get_nc_all (this) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) procedure, private :: get_nc_dir Get number of control points in a specific direction private pure function get_nc_dir (this, dir) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer","tags":"","loc":"type/nurbs_volume.html"},{"title":"nurbs_surface – ForCAD ","text":"type, public :: nurbs_surface Components Type Visibility Attributes Name Initial real(kind=rk), private, allocatable :: Wc (:) Weights for control points (1D array: [nc(1)*nc(2)]) real(kind=rk), private, allocatable :: Xc (:,:) Control points (2D array: [nc(1)*nc(2), dim]) real(kind=rk), private, allocatable :: Xg (:,:) Geometry points (2D array: [ng(1)*ng(2), dim]) real(kind=rk), private, allocatable :: Xt (:,:) Evaluation parameter values (2D array: [ng(1)*ng(2), 2]) real(kind=rk), private, allocatable :: Xt1 (:) Evaluation parameter values in the first direction (1D array: [ng(1)]) real(kind=rk), private, allocatable :: Xt2 (:) Evaluation parameter values in the second direction (1D array: [ng(2)]) integer, private :: degree (2) Degree (order) of the surface integer, private, allocatable :: elemConn (:,:) IGA element connectivity integer, private, allocatable :: elemConn_Xc_vis (:,:) Connectivity for visualization of control points integer, private, allocatable :: elemConn_Xg_vis (:,:) Connectivity for visualization of geometry points real(kind=rk), private, allocatable :: knot1 (:) Knot vector in the first direction (1D array) real(kind=rk), private, allocatable :: knot2 (:) Knot vector in the second direction (1D array) integer, private :: nc (2) Number of control points in each direction integer, private :: ng (2) Number of geometry points in each direction Type-Bound Procedures procedure, public :: ansatz Compute the shape functions, derivative of shape functions and dA private pure subroutine ansatz (this, ie, ig, Tgc, dTgc_dXg, dA) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dA generic, public :: basis => basis_vector , basis_scalar Compute the basis functions of the NURBS surface private pure subroutine basis_vector (this, res1, res2, Xt1, Xt2, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:) procedure, public :: cmp_Xg Compute geometry points private pure function cmp_Xg (this, Xt) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this real(kind=rk), intent(in), contiguous :: Xt (:) Return Value real(kind=rk), allocatable, (:) procedure, public :: cmp_area Compute the area of the NURBS surface private pure subroutine cmp_area (this, area) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(out) :: area procedure, public :: cmp_degree Compute degree of the NURBS surface private pure subroutine cmp_degree (this, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: dir procedure, public :: cmp_elem Generate IGA element connectivity private pure function cmp_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: cmp_elem_Xc_vis Generate connectivity for control points private pure function cmp_elem_Xc_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) procedure, public :: cmp_elem_Xg_vis Generate connectivity for geometry points private pure function cmp_elem_Xg_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) procedure, public :: cmp_nc Compute number of required control points private pure subroutine cmp_nc (this, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: dir procedure, public :: create Generate geometry points private pure subroutine create (this, res1, res2, Xt1, Xt2, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt (:,:) generic, public :: derivative => derivative_vector , derivative_scalar Compute the derivative of the NURBS surface private pure subroutine derivative_vector (this, res1, res2, Xt1, Xt2, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) generic, public :: derivative2 => derivative2_vector , derivative2_scalar Compute the second derivative of the NURBS surface private pure subroutine derivative2_vector (this, res1, res2, Xt1, Xt2, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) procedure, public :: elevate_degree Elevate degree private pure subroutine elevate_degree (this, dir, t) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir integer, intent(in) :: t procedure, public :: export_Xc Export control points to VTK file private impure subroutine export_Xc (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this character(len=*), intent(in) :: filename procedure, public :: export_Xg Export geometry points to VTK file private impure subroutine export_Xg (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this character(len=*), intent(in) :: filename procedure, public :: finalize Finalize the NURBS surface object private pure subroutine finalize (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this generic, public :: get_Wc => get_Wc_all , get_Wci Get weights private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) generic, public :: get_Xc => get_Xc_all , get_Xci , get_Xcid Get control points private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) generic, public :: get_Xg => get_Xg_all , get_Xgi , get_Xgid Get geometry points private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, public :: get_Xt Get parameter values private pure function get_Xt (this, dir) result(Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) procedure, public :: get_continuity Compute and return the continuity of the NURBS surface private pure function get_continuity (this, dir) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) generic, public :: get_degree => get_degree_all , get_degree_dir Get degree of the NURBS surface private pure function get_degree_all (this) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) private pure function get_degree_dir (this, dir) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer procedure, public :: get_elem Get IGA element connectivity private pure function get_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: get_elem_Xc_vis Get connectivity for control points private pure function get_elem_Xc_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) procedure, public :: get_elem_Xg_vis Get connectivity for geometry points private pure function get_elem_Xg_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) generic, public :: get_knot => get_knoti , get_knot_all Get knot vector private pure function get_knoti (this, dir, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir integer, intent(in) :: i Return Value real(kind=rk) private pure function get_knot_all (this, dir) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) procedure, public :: get_multiplicity Compute and return the multiplicity of the knot vector private pure function get_multiplicity (this, dir) result(m) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) generic, public :: get_nc => get_nc_all , get_nc_dir Get number of control points private pure function get_nc_all (this) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) private pure function get_nc_dir (this, dir) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer procedure, public :: get_ng Get number of geometry points private pure function get_ng (this) result(ng) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) procedure, public :: insert_knots Insert knots into the knot vector private pure subroutine insert_knots (this, dir, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) procedure, public :: is_rational Check if the NURBS surface is rational private pure function is_rational (this) result(r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value logical procedure, public :: modify_Wc Modify weights private pure subroutine modify_Wc (this, W, num) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num procedure, public :: modify_Xc Modify control points private pure subroutine modify_Xc (this, X, num, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir procedure, public :: nearest_point Find the nearest point on the NURBS surface (Approximation) private pure subroutine nearest_point (this, point_Xg, nearest_Xg, nearest_Xt, id) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xt (:) integer, intent(out), optional :: id procedure, public :: nearest_point2 Find the nearest point on the NURBS surface (Minimization - Newton's method) private impure subroutine nearest_point2 (this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt (2) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) procedure, public :: remove_knots Remove knots from the knot vector private pure subroutine remove_knots (this, dir, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) procedure, public :: rotate_Xc Rotate control points private pure subroutine rotate_Xc (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta procedure, public :: rotate_Xg Rotate geometry points private pure subroutine rotate_Xg (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta generic, public :: set => set1 , set2 , set3 , set4 Set NURBS surface private pure subroutine set1 (this, knot1, knot2, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vectors, control points and weights for the NURBS surface object. Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set2 (this, Xth_dir1, Xth_dir2, degree, continuity1, continuity2, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir1 (:) real(kind=rk), intent(in), contiguous :: Xth_dir2 (:) integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: continuity1 (:) integer, intent(in), contiguous :: continuity2 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set3 (this, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier surface using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set1 Set knot vectors, control points and weights for the NURBS surface object private pure subroutine set1 (this, knot1, knot2, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vectors, control points and weights for the NURBS surface object. Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set2 Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights private pure subroutine set2 (this, Xth_dir1, Xth_dir2, degree, continuity1, continuity2, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir1 (:) real(kind=rk), intent(in), contiguous :: Xth_dir2 (:) integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: continuity1 (:) integer, intent(in), contiguous :: continuity2 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set3 Set Bezier or Rational Bezier surface using control points and weights private pure subroutine set3 (this, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier surface using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set4 Set NURBS surface using degree, number of control points, control points and weights private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: set_C Set a C-shape private pure subroutine set_C (this, center, radius1, radius2) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 procedure, public :: set_elem Set IGA element connectivity private pure subroutine set_elem (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_elem_Xc_vis Set connectivity for control points private pure subroutine set_elem_Xc_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_elem_Xg_vis Set connectivity for geometry points private pure subroutine set_elem_Xg_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) procedure, public :: set_half_ring Set a half ring private pure subroutine set_half_ring (this, center, radius1, radius2) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 procedure, public :: set_ring Set a ring private pure subroutine set_ring (this, center, radius1, radius2) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 procedure, public :: set_tetragon Set a tetragon private pure subroutine set_tetragon (this, L, nc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: L (2) integer, intent(in) :: nc (2) real(kind=rk), intent(in), optional, contiguous :: Wc (:) procedure, public :: show Show the NURBS object using PyVista private impure subroutine show (this, vtkfile_Xc, vtkfile_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg procedure, public :: translate_Xc Translate control points private pure subroutine translate_Xc (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) procedure, public :: translate_Xg Translate geometry points private pure subroutine translate_Xg (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) procedure, private :: basis_scalar Compute the basis functions of the NURBS surface private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:) procedure, private :: basis_vector Compute the basis functions of the NURBS surface private pure subroutine basis_vector (this, res1, res2, Xt1, Xt2, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) procedure, private :: derivative2_scalar Compute the second derivative of the NURBS surface private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) procedure, private :: derivative2_vector Compute the second derivative of the NURBS surface private pure subroutine derivative2_vector (this, res1, res2, Xt1, Xt2, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) procedure, private :: derivative_scalar Compute the derivative of the NURBS surface private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) procedure, private :: derivative_vector Compute the derivative of the NURBS surface private pure subroutine derivative_vector (this, res1, res2, Xt1, Xt2, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) procedure, private :: get_Wc_all Get all weights private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Wci Get i-th weight private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) procedure, private :: get_Xc_all Get all control points private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) procedure, private :: get_Xci Get i-th control point private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Xcid Get i-th control point in a specific direction private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, private :: get_Xg_all Get all geometry points private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) procedure, private :: get_Xgi Get i-th geometry point private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) procedure, private :: get_Xgid Get i-th geometry point in a specific direction private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) procedure, private :: get_degree_all Get degree of the NURBS surface in both directions private pure function get_degree_all (this) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) procedure, private :: get_degree_dir Get degree of the NURBS surface in a specific direction private pure function get_degree_dir (this, dir) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer procedure, private :: get_knot_all Get all knot vectors private pure function get_knot_all (this, dir) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) procedure, private :: get_knoti Get i-th knot value private pure function get_knoti (this, dir, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir integer, intent(in) :: i Return Value real(kind=rk) procedure, private :: get_nc_all Get number of control points in all directions private pure function get_nc_all (this) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) procedure, private :: get_nc_dir Get number of control points in a specific direction private pure function get_nc_dir (this, dir) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer","tags":"","loc":"type/nurbs_surface.html"},{"title":"compute_Xg_nurbs_1d – ForCAD","text":"impure function compute_Xg_nurbs_1d(Xt, knot, degree, nc, ng, Xc, Wc) result(Xg) Uses forcad_utils proc~~compute_xg_nurbs_1d~~UsesGraph proc~compute_xg_nurbs_1d compute_Xg_nurbs_1d module~forcad_utils forcad_utils proc~compute_xg_nurbs_1d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc integer, intent(in) :: ng real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_xg_nurbs_1d~~CallsGraph proc~compute_xg_nurbs_1d compute_Xg_nurbs_1d proc~basis_bspline basis_bspline proc~compute_xg_nurbs_1d->proc~basis_bspline Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_nurbs_1d.html"},{"title":"compute_Xg_nurbs_1d_1point – ForCAD","text":"impure function compute_Xg_nurbs_1d_1point(Xt, knot, degree, nc, Xc, Wc) result(Xg) Uses forcad_utils proc~~compute_xg_nurbs_1d_1point~~UsesGraph proc~compute_xg_nurbs_1d_1point compute_Xg_nurbs_1d_1point module~forcad_utils forcad_utils proc~compute_xg_nurbs_1d_1point->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_xg_nurbs_1d_1point~~CallsGraph proc~compute_xg_nurbs_1d_1point compute_Xg_nurbs_1d_1point proc~basis_bspline basis_bspline proc~compute_xg_nurbs_1d_1point->proc~basis_bspline Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_nurbs_1d_1point.html"},{"title":"compute_Xg_bspline_1d – ForCAD","text":"impure function compute_Xg_bspline_1d(Xt, knot, degree, nc, ng, Xc) result(Xg) Uses forcad_utils proc~~compute_xg_bspline_1d~~UsesGraph proc~compute_xg_bspline_1d compute_Xg_bspline_1d module~forcad_utils forcad_utils proc~compute_xg_bspline_1d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc integer, intent(in) :: ng real(kind=rk), intent(in), contiguous :: Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_xg_bspline_1d~~CallsGraph proc~compute_xg_bspline_1d compute_Xg_bspline_1d proc~basis_bspline basis_bspline proc~compute_xg_bspline_1d->proc~basis_bspline Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_bspline_1d.html"},{"title":"compute_Xg_bspline_1d_1point – ForCAD","text":"impure function compute_Xg_bspline_1d_1point(Xt, knot, degree, nc, Xc) result(Xg) Uses forcad_utils proc~~compute_xg_bspline_1d_1point~~UsesGraph proc~compute_xg_bspline_1d_1point compute_Xg_bspline_1d_1point module~forcad_utils forcad_utils proc~compute_xg_bspline_1d_1point->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Xc (:,:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_xg_bspline_1d_1point~~CallsGraph proc~compute_xg_bspline_1d_1point compute_Xg_bspline_1d_1point proc~basis_bspline basis_bspline proc~compute_xg_bspline_1d_1point->proc~basis_bspline Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_bspline_1d_1point.html"},{"title":"compute_Tgc_nurbs_1d_vector – ForCAD","text":"impure function compute_Tgc_nurbs_1d_vector(Xt, knot, degree, nc, ng, Wc) result(Tgc) Uses forcad_utils proc~~compute_tgc_nurbs_1d_vector~~UsesGraph proc~compute_tgc_nurbs_1d_vector compute_Tgc_nurbs_1d_vector module~forcad_utils forcad_utils proc~compute_tgc_nurbs_1d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc integer, intent(in) :: ng real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_tgc_nurbs_1d_vector~~CallsGraph proc~compute_tgc_nurbs_1d_vector compute_Tgc_nurbs_1d_vector proc~basis_bspline basis_bspline proc~compute_tgc_nurbs_1d_vector->proc~basis_bspline Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_nurbs_1d_vector.html"},{"title":"compute_Tgc_nurbs_1d_scalar – ForCAD","text":"impure function compute_Tgc_nurbs_1d_scalar(Xt, knot, degree, nc, Wc) result(Tgc) Uses forcad_utils proc~~compute_tgc_nurbs_1d_scalar~~UsesGraph proc~compute_tgc_nurbs_1d_scalar compute_Tgc_nurbs_1d_scalar module~forcad_utils forcad_utils proc~compute_tgc_nurbs_1d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_tgc_nurbs_1d_scalar~~CallsGraph proc~compute_tgc_nurbs_1d_scalar compute_Tgc_nurbs_1d_scalar proc~basis_bspline basis_bspline proc~compute_tgc_nurbs_1d_scalar->proc~basis_bspline Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_nurbs_1d_scalar.html"},{"title":"compute_Tgc_bspline_1d_vector – ForCAD","text":"impure function compute_Tgc_bspline_1d_vector(Xt, knot, degree, nc, ng) result(Tgc) Uses forcad_utils proc~~compute_tgc_bspline_1d_vector~~UsesGraph proc~compute_tgc_bspline_1d_vector compute_Tgc_bspline_1d_vector module~forcad_utils forcad_utils proc~compute_tgc_bspline_1d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc integer, intent(in) :: ng Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_tgc_bspline_1d_vector~~CallsGraph proc~compute_tgc_bspline_1d_vector compute_Tgc_bspline_1d_vector proc~basis_bspline basis_bspline proc~compute_tgc_bspline_1d_vector->proc~basis_bspline Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_bspline_1d_vector.html"},{"title":"compute_Tgc_bspline_1d_scalar – ForCAD","text":"impure function compute_Tgc_bspline_1d_scalar(Xt, knot, degree, nc) result(Tgc) Uses forcad_utils proc~~compute_tgc_bspline_1d_scalar~~UsesGraph proc~compute_tgc_bspline_1d_scalar compute_Tgc_bspline_1d_scalar module~forcad_utils forcad_utils proc~compute_tgc_bspline_1d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_tgc_bspline_1d_scalar~~CallsGraph proc~compute_tgc_bspline_1d_scalar compute_Tgc_bspline_1d_scalar proc~basis_bspline basis_bspline proc~compute_tgc_bspline_1d_scalar->proc~basis_bspline Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_bspline_1d_scalar.html"},{"title":"nearest_point_help_1d – ForCAD","text":"impure function nearest_point_help_1d(ng, Xg, point_Xg) result(distances) Uses forcad_utils proc~~nearest_point_help_1d~~UsesGraph proc~nearest_point_help_1d nearest_point_help_1d module~forcad_utils forcad_utils proc~nearest_point_help_1d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name integer, intent(in) :: ng real(kind=rk), intent(in), contiguous :: Xg (:,:) real(kind=rk), intent(in), contiguous :: point_Xg (:) Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/nearest_point_help_1d.html"},{"title":"compute_dTgc_nurbs_1d_vector – ForCAD","text":"impure subroutine compute_dTgc_nurbs_1d_vector(Xt, knot, degree, nc, ng, Wc, dTgc, Tgc) Uses forcad_utils proc~~compute_dtgc_nurbs_1d_vector~~UsesGraph proc~compute_dtgc_nurbs_1d_vector compute_dTgc_nurbs_1d_vector module~forcad_utils forcad_utils proc~compute_dtgc_nurbs_1d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc integer, intent(in) :: ng real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_dtgc_nurbs_1d_vector~~CallsGraph proc~compute_dtgc_nurbs_1d_vector compute_dTgc_nurbs_1d_vector proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_nurbs_1d_vector->proc~basis_bspline_der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_nurbs_1d_vector.html"},{"title":"compute_dTgc_nurbs_1d_scalar – ForCAD","text":"impure subroutine compute_dTgc_nurbs_1d_scalar(Xt, knot, degree, nc, Wc, dTgc, Tgc, elem) Uses forcad_utils proc~~compute_dtgc_nurbs_1d_scalar~~UsesGraph proc~compute_dtgc_nurbs_1d_scalar compute_dTgc_nurbs_1d_scalar module~forcad_utils forcad_utils proc~compute_dtgc_nurbs_1d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: dTgc (:) real(kind=rk), intent(out), allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~compute_dtgc_nurbs_1d_scalar~~CallsGraph proc~compute_dtgc_nurbs_1d_scalar compute_dTgc_nurbs_1d_scalar proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_nurbs_1d_scalar->proc~basis_bspline_der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_nurbs_1d_scalar.html"},{"title":"compute_dTgc_bspline_1d_vector – ForCAD","text":"impure subroutine compute_dTgc_bspline_1d_vector(Xt, knot, degree, nc, ng, dTgc, Tgc) Uses forcad_utils proc~~compute_dtgc_bspline_1d_vector~~UsesGraph proc~compute_dtgc_bspline_1d_vector compute_dTgc_bspline_1d_vector module~forcad_utils forcad_utils proc~compute_dtgc_bspline_1d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc integer, intent(in) :: ng real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_dtgc_bspline_1d_vector~~CallsGraph proc~compute_dtgc_bspline_1d_vector compute_dTgc_bspline_1d_vector proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_bspline_1d_vector->proc~basis_bspline_der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_bspline_1d_vector.html"},{"title":"compute_dTgc_bspline_1d_scalar – ForCAD","text":"impure subroutine compute_dTgc_bspline_1d_scalar(Xt, knot, degree, nc, dTgc, Tgc, elem) Uses forcad_utils proc~~compute_dtgc_bspline_1d_scalar~~UsesGraph proc~compute_dtgc_bspline_1d_scalar compute_dTgc_bspline_1d_scalar module~forcad_utils forcad_utils proc~compute_dtgc_bspline_1d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(out), allocatable :: dTgc (:) real(kind=rk), intent(out), allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~compute_dtgc_bspline_1d_scalar~~CallsGraph proc~compute_dtgc_bspline_1d_scalar compute_dTgc_bspline_1d_scalar proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_bspline_1d_scalar->proc~basis_bspline_der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_bspline_1d_scalar.html"},{"title":"compute_d2Tgc_nurbs_1d_vector – ForCAD","text":"impure subroutine compute_d2Tgc_nurbs_1d_vector(Xt, knot, degree, nc, ng, Wc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_nurbs_1d_vector~~UsesGraph proc~compute_d2tgc_nurbs_1d_vector compute_d2Tgc_nurbs_1d_vector module~forcad_utils forcad_utils proc~compute_d2tgc_nurbs_1d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc integer, intent(in) :: ng real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_d2tgc_nurbs_1d_vector~~CallsGraph proc~compute_d2tgc_nurbs_1d_vector compute_d2Tgc_nurbs_1d_vector proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_nurbs_1d_vector->proc~basis_bspline_2der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_nurbs_1d_vector.html"},{"title":"compute_d2Tgc_nurbs_1d_scalar – ForCAD","text":"impure subroutine compute_d2Tgc_nurbs_1d_scalar(Xt, knot, degree, nc, Wc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_nurbs_1d_scalar~~UsesGraph proc~compute_d2tgc_nurbs_1d_scalar compute_d2Tgc_nurbs_1d_scalar module~forcad_utils forcad_utils proc~compute_d2tgc_nurbs_1d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc (:) real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~compute_d2tgc_nurbs_1d_scalar~~CallsGraph proc~compute_d2tgc_nurbs_1d_scalar compute_d2Tgc_nurbs_1d_scalar proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_nurbs_1d_scalar->proc~basis_bspline_2der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_nurbs_1d_scalar.html"},{"title":"compute_d2Tgc_bspline_1d_vector – ForCAD","text":"impure subroutine compute_d2Tgc_bspline_1d_vector(Xt, knot, degree, nc, ng, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_bspline_1d_vector~~UsesGraph proc~compute_d2tgc_bspline_1d_vector compute_d2Tgc_bspline_1d_vector module~forcad_utils forcad_utils proc~compute_d2tgc_bspline_1d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc integer, intent(in) :: ng real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_d2tgc_bspline_1d_vector~~CallsGraph proc~compute_d2tgc_bspline_1d_vector compute_d2Tgc_bspline_1d_vector proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_bspline_1d_vector->proc~basis_bspline_2der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_bspline_1d_vector.html"},{"title":"compute_d2Tgc_bspline_1d_scalar – ForCAD","text":"impure subroutine compute_d2Tgc_bspline_1d_scalar(Xt, knot, degree, nc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_bspline_1d_scalar~~UsesGraph proc~compute_d2tgc_bspline_1d_scalar compute_d2Tgc_bspline_1d_scalar module~forcad_utils forcad_utils proc~compute_d2tgc_bspline_1d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(out), allocatable :: d2Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc (:) real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~compute_d2tgc_bspline_1d_scalar~~CallsGraph proc~compute_d2tgc_bspline_1d_scalar compute_d2Tgc_bspline_1d_scalar proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_bspline_1d_scalar->proc~basis_bspline_2der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_bspline_1d_scalar.html"},{"title":"compute_Xg_nurbs_3d – ForCAD","text":"impure function compute_Xg_nurbs_3d(Xt, knot1, knot2, knot3, degree, nc, ng, Xc, Wc) result(Xg) Uses forcad_utils proc~~compute_xg_nurbs_3d~~UsesGraph proc~compute_xg_nurbs_3d compute_Xg_nurbs_3d module~forcad_utils forcad_utils proc~compute_xg_nurbs_3d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) integer, intent(in) :: ng (3) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_xg_nurbs_3d~~CallsGraph proc~compute_xg_nurbs_3d compute_Xg_nurbs_3d proc~basis_bspline basis_bspline proc~compute_xg_nurbs_3d->proc~basis_bspline proc~kron kron proc~compute_xg_nurbs_3d->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_nurbs_3d.html"},{"title":"compute_Xg_nurbs_3d_1point – ForCAD","text":"impure function compute_Xg_nurbs_3d_1point(Xt, knot1, knot2, knot3, degree, nc, Xc, Wc) result(Xg) Uses forcad_utils proc~~compute_xg_nurbs_3d_1point~~UsesGraph proc~compute_xg_nurbs_3d_1point compute_Xg_nurbs_3d_1point module~forcad_utils forcad_utils proc~compute_xg_nurbs_3d_1point->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_xg_nurbs_3d_1point~~CallsGraph proc~compute_xg_nurbs_3d_1point compute_Xg_nurbs_3d_1point proc~basis_bspline basis_bspline proc~compute_xg_nurbs_3d_1point->proc~basis_bspline proc~kron kron proc~compute_xg_nurbs_3d_1point->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_nurbs_3d_1point.html"},{"title":"compute_Xg_bspline_3d – ForCAD","text":"impure function compute_Xg_bspline_3d(Xt, knot1, knot2, knot3, degree, nc, ng, Xc) result(Xg) Uses forcad_utils proc~~compute_xg_bspline_3d~~UsesGraph proc~compute_xg_bspline_3d compute_Xg_bspline_3d module~forcad_utils forcad_utils proc~compute_xg_bspline_3d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) integer, intent(in) :: ng (3) real(kind=rk), intent(in), contiguous :: Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_xg_bspline_3d~~CallsGraph proc~compute_xg_bspline_3d compute_Xg_bspline_3d proc~basis_bspline basis_bspline proc~compute_xg_bspline_3d->proc~basis_bspline proc~kron kron proc~compute_xg_bspline_3d->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_bspline_3d.html"},{"title":"compute_Xg_bspline_3d_1point – ForCAD","text":"impure function compute_Xg_bspline_3d_1point(Xt, knot1, knot2, knot3, degree, nc, Xc) result(Xg) Uses forcad_utils proc~~compute_xg_bspline_3d_1point~~UsesGraph proc~compute_xg_bspline_3d_1point compute_Xg_bspline_3d_1point module~forcad_utils forcad_utils proc~compute_xg_bspline_3d_1point->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) real(kind=rk), intent(in), contiguous :: Xc (:,:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_xg_bspline_3d_1point~~CallsGraph proc~compute_xg_bspline_3d_1point compute_Xg_bspline_3d_1point proc~basis_bspline basis_bspline proc~compute_xg_bspline_3d_1point->proc~basis_bspline proc~kron kron proc~compute_xg_bspline_3d_1point->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_bspline_3d_1point.html"},{"title":"compute_Tgc_nurbs_3d_vector – ForCAD","text":"impure function compute_Tgc_nurbs_3d_vector(Xt, knot1, knot2, knot3, degree, nc, ng, Wc) result(Tgc) Uses forcad_utils proc~~compute_tgc_nurbs_3d_vector~~UsesGraph proc~compute_tgc_nurbs_3d_vector compute_Tgc_nurbs_3d_vector module~forcad_utils forcad_utils proc~compute_tgc_nurbs_3d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) integer, intent(in) :: ng (3) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_tgc_nurbs_3d_vector~~CallsGraph proc~compute_tgc_nurbs_3d_vector compute_Tgc_nurbs_3d_vector proc~basis_bspline basis_bspline proc~compute_tgc_nurbs_3d_vector->proc~basis_bspline proc~kron kron proc~compute_tgc_nurbs_3d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_nurbs_3d_vector.html"},{"title":"compute_Tgc_nurbs_3d_scalar – ForCAD","text":"impure function compute_Tgc_nurbs_3d_scalar(Xt, knot1, knot2, knot3, degree, nc, Wc) result(Tgc) Uses forcad_utils proc~~compute_tgc_nurbs_3d_scalar~~UsesGraph proc~compute_tgc_nurbs_3d_scalar compute_Tgc_nurbs_3d_scalar module~forcad_utils forcad_utils proc~compute_tgc_nurbs_3d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_tgc_nurbs_3d_scalar~~CallsGraph proc~compute_tgc_nurbs_3d_scalar compute_Tgc_nurbs_3d_scalar proc~basis_bspline basis_bspline proc~compute_tgc_nurbs_3d_scalar->proc~basis_bspline proc~kron kron proc~compute_tgc_nurbs_3d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_nurbs_3d_scalar.html"},{"title":"compute_Tgc_bspline_3d_vector – ForCAD","text":"impure function compute_Tgc_bspline_3d_vector(Xt, knot1, knot2, knot3, degree, nc, ng) result(Tgc) Uses forcad_utils proc~~compute_tgc_bspline_3d_vector~~UsesGraph proc~compute_tgc_bspline_3d_vector compute_Tgc_bspline_3d_vector module~forcad_utils forcad_utils proc~compute_tgc_bspline_3d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) integer, intent(in) :: ng (3) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_tgc_bspline_3d_vector~~CallsGraph proc~compute_tgc_bspline_3d_vector compute_Tgc_bspline_3d_vector proc~basis_bspline basis_bspline proc~compute_tgc_bspline_3d_vector->proc~basis_bspline proc~kron kron proc~compute_tgc_bspline_3d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_bspline_3d_vector.html"},{"title":"compute_Tgc_bspline_3d_scalar – ForCAD","text":"impure function compute_Tgc_bspline_3d_scalar(Xt, knot1, knot2, knot3, degree, nc) result(Tgc) Uses forcad_utils proc~~compute_tgc_bspline_3d_scalar~~UsesGraph proc~compute_tgc_bspline_3d_scalar compute_Tgc_bspline_3d_scalar module~forcad_utils forcad_utils proc~compute_tgc_bspline_3d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_tgc_bspline_3d_scalar~~CallsGraph proc~compute_tgc_bspline_3d_scalar compute_Tgc_bspline_3d_scalar proc~basis_bspline basis_bspline proc~compute_tgc_bspline_3d_scalar->proc~basis_bspline proc~kron kron proc~compute_tgc_bspline_3d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_bspline_3d_scalar.html"},{"title":"nearest_point_help_3d – ForCAD","text":"impure function nearest_point_help_3d(ng, Xg, point_Xg) result(distances) Uses forcad_utils proc~~nearest_point_help_3d~~UsesGraph proc~nearest_point_help_3d nearest_point_help_3d module~forcad_utils forcad_utils proc~nearest_point_help_3d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name integer, intent(in) :: ng (3) real(kind=rk), intent(in), contiguous :: Xg (:,:) real(kind=rk), intent(in), contiguous :: point_Xg (:) Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/nearest_point_help_3d.html"},{"title":"compute_dTgc_nurbs_3d_vector – ForCAD","text":"impure subroutine compute_dTgc_nurbs_3d_vector(Xt, knot1, knot2, knot3, degree, nc, ng, Wc, dTgc, Tgc) Uses forcad_utils proc~~compute_dtgc_nurbs_3d_vector~~UsesGraph proc~compute_dtgc_nurbs_3d_vector compute_dTgc_nurbs_3d_vector module~forcad_utils forcad_utils proc~compute_dtgc_nurbs_3d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) integer, intent(in) :: ng (3) real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_dtgc_nurbs_3d_vector~~CallsGraph proc~compute_dtgc_nurbs_3d_vector compute_dTgc_nurbs_3d_vector proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_nurbs_3d_vector->proc~basis_bspline_der proc~kron kron proc~compute_dtgc_nurbs_3d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_nurbs_3d_vector.html"},{"title":"compute_dTgc_nurbs_3d_scalar – ForCAD","text":"impure subroutine compute_dTgc_nurbs_3d_scalar(Xt, knot1, knot2, knot3, degree, nc, Wc, dTgc, Tgc, elem) Uses forcad_utils proc~~compute_dtgc_nurbs_3d_scalar~~UsesGraph proc~compute_dtgc_nurbs_3d_scalar compute_dTgc_nurbs_3d_scalar module~forcad_utils forcad_utils proc~compute_dtgc_nurbs_3d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~compute_dtgc_nurbs_3d_scalar~~CallsGraph proc~compute_dtgc_nurbs_3d_scalar compute_dTgc_nurbs_3d_scalar proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_nurbs_3d_scalar->proc~basis_bspline_der proc~kron kron proc~compute_dtgc_nurbs_3d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_nurbs_3d_scalar.html"},{"title":"compute_dTgc_bspline_3d_vector – ForCAD","text":"impure subroutine compute_dTgc_bspline_3d_vector(Xt, knot1, knot2, knot3, degree, nc, ng, dTgc, Tgc) Uses forcad_utils proc~~compute_dtgc_bspline_3d_vector~~UsesGraph proc~compute_dtgc_bspline_3d_vector compute_dTgc_bspline_3d_vector module~forcad_utils forcad_utils proc~compute_dtgc_bspline_3d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) integer, intent(in) :: ng (3) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_dtgc_bspline_3d_vector~~CallsGraph proc~compute_dtgc_bspline_3d_vector compute_dTgc_bspline_3d_vector proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_bspline_3d_vector->proc~basis_bspline_der proc~kron kron proc~compute_dtgc_bspline_3d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_bspline_3d_vector.html"},{"title":"compute_dTgc_bspline_3d_scalar – ForCAD","text":"impure subroutine compute_dTgc_bspline_3d_scalar(Xt, knot1, knot2, knot3, degree, nc, dTgc, Tgc, elem) Uses forcad_utils proc~~compute_dtgc_bspline_3d_scalar~~UsesGraph proc~compute_dtgc_bspline_3d_scalar compute_dTgc_bspline_3d_scalar module~forcad_utils forcad_utils proc~compute_dtgc_bspline_3d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~compute_dtgc_bspline_3d_scalar~~CallsGraph proc~compute_dtgc_bspline_3d_scalar compute_dTgc_bspline_3d_scalar proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_bspline_3d_scalar->proc~basis_bspline_der proc~kron kron proc~compute_dtgc_bspline_3d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_bspline_3d_scalar.html"},{"title":"compute_d2Tgc_nurbs_3d_vector – ForCAD","text":"impure subroutine compute_d2Tgc_nurbs_3d_vector(Xt, knot1, knot2, knot3, degree, nc, ng, Wc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_nurbs_3d_vector~~UsesGraph proc~compute_d2tgc_nurbs_3d_vector compute_d2Tgc_nurbs_3d_vector module~forcad_utils forcad_utils proc~compute_d2tgc_nurbs_3d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) integer, intent(in) :: ng (3) real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_d2tgc_nurbs_3d_vector~~CallsGraph proc~compute_d2tgc_nurbs_3d_vector compute_d2Tgc_nurbs_3d_vector proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_nurbs_3d_vector->proc~basis_bspline_2der proc~kron kron proc~compute_d2tgc_nurbs_3d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_nurbs_3d_vector.html"},{"title":"compute_d2Tgc_nurbs_3d_scalar – ForCAD","text":"impure subroutine compute_d2Tgc_nurbs_3d_scalar(Xt, knot1, knot2, knot3, degree, nc, Wc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_nurbs_3d_scalar~~UsesGraph proc~compute_d2tgc_nurbs_3d_scalar compute_d2Tgc_nurbs_3d_scalar module~forcad_utils forcad_utils proc~compute_d2tgc_nurbs_3d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~compute_d2tgc_nurbs_3d_scalar~~CallsGraph proc~compute_d2tgc_nurbs_3d_scalar compute_d2Tgc_nurbs_3d_scalar proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_nurbs_3d_scalar->proc~basis_bspline_2der proc~kron kron proc~compute_d2tgc_nurbs_3d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_nurbs_3d_scalar.html"},{"title":"compute_d2Tgc_bspline_3d_vector – ForCAD","text":"impure subroutine compute_d2Tgc_bspline_3d_vector(Xt, knot1, knot2, knot3, degree, nc, ng, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_bspline_3d_vector~~UsesGraph proc~compute_d2tgc_bspline_3d_vector compute_d2Tgc_bspline_3d_vector module~forcad_utils forcad_utils proc~compute_d2tgc_bspline_3d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) integer, intent(in) :: ng (3) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_d2tgc_bspline_3d_vector~~CallsGraph proc~compute_d2tgc_bspline_3d_vector compute_d2Tgc_bspline_3d_vector proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_bspline_3d_vector->proc~basis_bspline_2der proc~kron kron proc~compute_d2tgc_bspline_3d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_bspline_3d_vector.html"},{"title":"compute_d2Tgc_bspline_3d_scalar – ForCAD","text":"impure subroutine compute_d2Tgc_bspline_3d_scalar(Xt, knot1, knot2, knot3, degree, nc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_bspline_3d_scalar~~UsesGraph proc~compute_d2tgc_bspline_3d_scalar compute_d2Tgc_bspline_3d_scalar module~forcad_utils forcad_utils proc~compute_d2tgc_bspline_3d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) integer, intent(in) :: degree (3) integer, intent(in) :: nc (3) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~compute_d2tgc_bspline_3d_scalar~~CallsGraph proc~compute_d2tgc_bspline_3d_scalar compute_d2Tgc_bspline_3d_scalar proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_bspline_3d_scalar->proc~basis_bspline_2der proc~kron kron proc~compute_d2tgc_bspline_3d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_bspline_3d_scalar.html"},{"title":"compute_Xg_nurbs_2d – ForCAD","text":"impure function compute_Xg_nurbs_2d(Xt, knot1, knot2, degree, nc, ng, Xc, Wc) result(Xg) Uses forcad_utils proc~~compute_xg_nurbs_2d~~UsesGraph proc~compute_xg_nurbs_2d compute_Xg_nurbs_2d module~forcad_utils forcad_utils proc~compute_xg_nurbs_2d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: ng (2) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_xg_nurbs_2d~~CallsGraph proc~compute_xg_nurbs_2d compute_Xg_nurbs_2d proc~basis_bspline basis_bspline proc~compute_xg_nurbs_2d->proc~basis_bspline proc~kron kron proc~compute_xg_nurbs_2d->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_nurbs_2d.html"},{"title":"compute_Xg_nurbs_2d_1point – ForCAD","text":"impure function compute_Xg_nurbs_2d_1point(Xt, knot1, knot2, degree, nc, Xc, Wc) result(Xg) Uses forcad_utils proc~~compute_xg_nurbs_2d_1point~~UsesGraph proc~compute_xg_nurbs_2d_1point compute_Xg_nurbs_2d_1point module~forcad_utils forcad_utils proc~compute_xg_nurbs_2d_1point->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_xg_nurbs_2d_1point~~CallsGraph proc~compute_xg_nurbs_2d_1point compute_Xg_nurbs_2d_1point proc~basis_bspline basis_bspline proc~compute_xg_nurbs_2d_1point->proc~basis_bspline proc~kron kron proc~compute_xg_nurbs_2d_1point->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_nurbs_2d_1point.html"},{"title":"compute_Xg_bspline_2d – ForCAD","text":"impure function compute_Xg_bspline_2d(Xt, knot1, knot2, degree, nc, ng, Xc) result(Xg) Uses forcad_utils proc~~compute_xg_bspline_2d~~UsesGraph proc~compute_xg_bspline_2d compute_Xg_bspline_2d module~forcad_utils forcad_utils proc~compute_xg_bspline_2d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: ng (2) real(kind=rk), intent(in), contiguous :: Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_xg_bspline_2d~~CallsGraph proc~compute_xg_bspline_2d compute_Xg_bspline_2d proc~basis_bspline basis_bspline proc~compute_xg_bspline_2d->proc~basis_bspline proc~kron kron proc~compute_xg_bspline_2d->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_bspline_2d.html"},{"title":"compute_Xg_bspline_2d_1point – ForCAD","text":"impure function compute_Xg_bspline_2d_1point(Xt, knot1, knot2, degree, nc, Xc) result(Xg) Uses forcad_utils proc~~compute_xg_bspline_2d_1point~~UsesGraph proc~compute_xg_bspline_2d_1point compute_Xg_bspline_2d_1point module~forcad_utils forcad_utils proc~compute_xg_bspline_2d_1point->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(in), contiguous :: Xc (:,:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_xg_bspline_2d_1point~~CallsGraph proc~compute_xg_bspline_2d_1point compute_Xg_bspline_2d_1point proc~basis_bspline basis_bspline proc~compute_xg_bspline_2d_1point->proc~basis_bspline proc~kron kron proc~compute_xg_bspline_2d_1point->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_xg_bspline_2d_1point.html"},{"title":"compute_Tgc_nurbs_2d_vector – ForCAD","text":"impure function compute_Tgc_nurbs_2d_vector(Xt, knot1, knot2, degree, nc, ng, Wc) result(Tgc) Uses forcad_utils proc~~compute_tgc_nurbs_2d_vector~~UsesGraph proc~compute_tgc_nurbs_2d_vector compute_Tgc_nurbs_2d_vector module~forcad_utils forcad_utils proc~compute_tgc_nurbs_2d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: ng (2) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_tgc_nurbs_2d_vector~~CallsGraph proc~compute_tgc_nurbs_2d_vector compute_Tgc_nurbs_2d_vector proc~basis_bspline basis_bspline proc~compute_tgc_nurbs_2d_vector->proc~basis_bspline proc~kron kron proc~compute_tgc_nurbs_2d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_nurbs_2d_vector.html"},{"title":"compute_Tgc_nurbs_2d_scalar – ForCAD","text":"impure function compute_Tgc_nurbs_2d_scalar(Xt, knot1, knot2, degree, nc, Wc) result(Tgc) Uses forcad_utils proc~~compute_tgc_nurbs_2d_scalar~~UsesGraph proc~compute_tgc_nurbs_2d_scalar compute_Tgc_nurbs_2d_scalar module~forcad_utils forcad_utils proc~compute_tgc_nurbs_2d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(in), contiguous :: Wc (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_tgc_nurbs_2d_scalar~~CallsGraph proc~compute_tgc_nurbs_2d_scalar compute_Tgc_nurbs_2d_scalar proc~basis_bspline basis_bspline proc~compute_tgc_nurbs_2d_scalar->proc~basis_bspline proc~kron kron proc~compute_tgc_nurbs_2d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_nurbs_2d_scalar.html"},{"title":"compute_Tgc_bspline_2d_vector – ForCAD","text":"impure function compute_Tgc_bspline_2d_vector(Xt, knot1, knot2, degree, nc, ng) result(Tgc) Uses forcad_utils proc~~compute_tgc_bspline_2d_vector~~UsesGraph proc~compute_tgc_bspline_2d_vector compute_Tgc_bspline_2d_vector module~forcad_utils forcad_utils proc~compute_tgc_bspline_2d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: ng (2) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~compute_tgc_bspline_2d_vector~~CallsGraph proc~compute_tgc_bspline_2d_vector compute_Tgc_bspline_2d_vector proc~basis_bspline basis_bspline proc~compute_tgc_bspline_2d_vector->proc~basis_bspline proc~kron kron proc~compute_tgc_bspline_2d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_bspline_2d_vector.html"},{"title":"compute_Tgc_bspline_2d_scalar – ForCAD","text":"impure function compute_Tgc_bspline_2d_scalar(Xt, knot1, knot2, degree, nc) result(Tgc) Uses forcad_utils proc~~compute_tgc_bspline_2d_scalar~~UsesGraph proc~compute_tgc_bspline_2d_scalar compute_Tgc_bspline_2d_scalar module~forcad_utils forcad_utils proc~compute_tgc_bspline_2d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_tgc_bspline_2d_scalar~~CallsGraph proc~compute_tgc_bspline_2d_scalar compute_Tgc_bspline_2d_scalar proc~basis_bspline basis_bspline proc~compute_tgc_bspline_2d_scalar->proc~basis_bspline proc~kron kron proc~compute_tgc_bspline_2d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_tgc_bspline_2d_scalar.html"},{"title":"nearest_point_help_2d – ForCAD","text":"impure function nearest_point_help_2d(ng, Xg, point_Xg) result(distances) Uses forcad_utils proc~~nearest_point_help_2d~~UsesGraph proc~nearest_point_help_2d nearest_point_help_2d module~forcad_utils forcad_utils proc~nearest_point_help_2d->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name integer, intent(in) :: ng (2) real(kind=rk), intent(in), contiguous :: Xg (:,:) real(kind=rk), intent(in), contiguous :: point_Xg (:) Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/nearest_point_help_2d.html"},{"title":"compute_dTgc_nurbs_2d_vector – ForCAD","text":"impure subroutine compute_dTgc_nurbs_2d_vector(Xt, knot1, knot2, degree, nc, ng, Wc, dTgc, Tgc) Uses forcad_utils proc~~compute_dtgc_nurbs_2d_vector~~UsesGraph proc~compute_dtgc_nurbs_2d_vector compute_dTgc_nurbs_2d_vector module~forcad_utils forcad_utils proc~compute_dtgc_nurbs_2d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: ng (2) real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_dtgc_nurbs_2d_vector~~CallsGraph proc~compute_dtgc_nurbs_2d_vector compute_dTgc_nurbs_2d_vector proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_nurbs_2d_vector->proc~basis_bspline_der proc~kron kron proc~compute_dtgc_nurbs_2d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_nurbs_2d_vector.html"},{"title":"compute_dTgc_nurbs_2d_scalar – ForCAD","text":"impure subroutine compute_dTgc_nurbs_2d_scalar(Xt, knot1, knot2, degree, nc, Wc, dTgc, Tgc, elem) Uses forcad_utils proc~~compute_dtgc_nurbs_2d_scalar~~UsesGraph proc~compute_dtgc_nurbs_2d_scalar compute_dTgc_nurbs_2d_scalar module~forcad_utils forcad_utils proc~compute_dtgc_nurbs_2d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~compute_dtgc_nurbs_2d_scalar~~CallsGraph proc~compute_dtgc_nurbs_2d_scalar compute_dTgc_nurbs_2d_scalar proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_nurbs_2d_scalar->proc~basis_bspline_der proc~kron kron proc~compute_dtgc_nurbs_2d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_nurbs_2d_scalar.html"},{"title":"compute_dTgc_bspline_2d_vector – ForCAD","text":"impure subroutine compute_dTgc_bspline_2d_vector(Xt, knot1, knot2, degree, nc, ng, dTgc, Tgc) Uses forcad_utils proc~~compute_dtgc_bspline_2d_vector~~UsesGraph proc~compute_dtgc_bspline_2d_vector compute_dTgc_bspline_2d_vector module~forcad_utils forcad_utils proc~compute_dtgc_bspline_2d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: ng (2) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_dtgc_bspline_2d_vector~~CallsGraph proc~compute_dtgc_bspline_2d_vector compute_dTgc_bspline_2d_vector proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_bspline_2d_vector->proc~basis_bspline_der proc~kron kron proc~compute_dtgc_bspline_2d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_bspline_2d_vector.html"},{"title":"compute_dTgc_bspline_2d_scalar – ForCAD","text":"impure subroutine compute_dTgc_bspline_2d_scalar(Xt, knot1, knot2, degree, nc, dTgc, Tgc, elem) Uses forcad_utils proc~~compute_dtgc_bspline_2d_scalar~~UsesGraph proc~compute_dtgc_bspline_2d_scalar compute_dTgc_bspline_2d_scalar module~forcad_utils forcad_utils proc~compute_dtgc_bspline_2d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~compute_dtgc_bspline_2d_scalar~~CallsGraph proc~compute_dtgc_bspline_2d_scalar compute_dTgc_bspline_2d_scalar proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_bspline_2d_scalar->proc~basis_bspline_der proc~kron kron proc~compute_dtgc_bspline_2d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_dtgc_bspline_2d_scalar.html"},{"title":"compute_d2Tgc_nurbs_2d_vector – ForCAD","text":"impure subroutine compute_d2Tgc_nurbs_2d_vector(Xt, knot1, knot2, degree, nc, ng, Wc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_nurbs_2d_vector~~UsesGraph proc~compute_d2tgc_nurbs_2d_vector compute_d2Tgc_nurbs_2d_vector module~forcad_utils forcad_utils proc~compute_d2tgc_nurbs_2d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: ng (2) real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_d2tgc_nurbs_2d_vector~~CallsGraph proc~compute_d2tgc_nurbs_2d_vector compute_d2Tgc_nurbs_2d_vector proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_nurbs_2d_vector->proc~basis_bspline_2der proc~kron kron proc~compute_d2tgc_nurbs_2d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_nurbs_2d_vector.html"},{"title":"compute_d2Tgc_nurbs_2d_scalar – ForCAD","text":"impure subroutine compute_d2Tgc_nurbs_2d_scalar(Xt, knot1, knot2, degree, nc, Wc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_nurbs_2d_scalar~~UsesGraph proc~compute_d2tgc_nurbs_2d_scalar compute_d2Tgc_nurbs_2d_scalar module~forcad_utils forcad_utils proc~compute_d2tgc_nurbs_2d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(in), contiguous :: Wc (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~compute_d2tgc_nurbs_2d_scalar~~CallsGraph proc~compute_d2tgc_nurbs_2d_scalar compute_d2Tgc_nurbs_2d_scalar proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_nurbs_2d_scalar->proc~basis_bspline_2der proc~kron kron proc~compute_d2tgc_nurbs_2d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_nurbs_2d_scalar.html"},{"title":"compute_d2Tgc_bspline_2d_vector – ForCAD","text":"impure subroutine compute_d2Tgc_bspline_2d_vector(Xt, knot1, knot2, degree, nc, ng, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_bspline_2d_vector~~UsesGraph proc~compute_d2tgc_bspline_2d_vector compute_d2Tgc_bspline_2d_vector module~forcad_utils forcad_utils proc~compute_d2tgc_bspline_2d_vector->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:,:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: ng (2) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~compute_d2tgc_bspline_2d_vector~~CallsGraph proc~compute_d2tgc_bspline_2d_vector compute_d2Tgc_bspline_2d_vector proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_bspline_2d_vector->proc~basis_bspline_2der proc~kron kron proc~compute_d2tgc_bspline_2d_vector->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_bspline_2d_vector.html"},{"title":"compute_d2Tgc_bspline_2d_scalar – ForCAD","text":"impure subroutine compute_d2Tgc_bspline_2d_scalar(Xt, knot1, knot2, degree, nc, d2Tgc, dTgc, Tgc) Uses forcad_utils proc~~compute_d2tgc_bspline_2d_scalar~~UsesGraph proc~compute_d2tgc_bspline_2d_scalar compute_d2Tgc_bspline_2d_scalar module~forcad_utils forcad_utils proc~compute_d2tgc_bspline_2d_scalar->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) integer, intent(in) :: degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~compute_d2tgc_bspline_2d_scalar~~CallsGraph proc~compute_d2tgc_bspline_2d_scalar compute_d2Tgc_bspline_2d_scalar proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_bspline_2d_scalar->proc~basis_bspline_2der proc~kron kron proc~compute_d2tgc_bspline_2d_scalar->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_d2tgc_bspline_2d_scalar.html"},{"title":"generate_Xc – ForCAD","text":"function generate_Xc(num_coils, radius, height, num_points_per_coil) result(control_points) Arguments Type Intent Optional Attributes Name integer, intent(in) :: num_coils real(kind=rk), intent(in) :: radius real(kind=rk), intent(in) :: height integer, intent(in) :: num_points_per_coil Return Value real(kind=rk), allocatable, (:,:) Called by proc~~generate_xc~~CalledByGraph proc~generate_xc generate_Xc program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~generate_xc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/generate_xc.html"},{"title":"generate_Xc – ForCAD","text":"function generate_Xc(num_rows, num_cols, peak_height) result(control_points) Arguments Type Intent Optional Attributes Name integer, intent(in) :: num_rows integer, intent(in) :: num_cols real(kind=rk), intent(in) :: peak_height Return Value real(kind=rk), allocatable, (:,:) Called by proc~~generate_xc~2~~CalledByGraph proc~generate_xc~2 generate_Xc program~example3_surface example3_surface program~example3_surface->proc~generate_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/generate_xc~2.html"},{"title":"generate_Xc – ForCAD","text":"function generate_Xc(num_rows, num_cols, peak_height) result(control_points) Arguments Type Intent Optional Attributes Name integer, intent(in) :: num_rows integer, intent(in) :: num_cols real(kind=rk), intent(in) :: peak_height Return Value real(kind=rk), allocatable, (:,:) Called by proc~~generate_xc~3~~CalledByGraph proc~generate_xc~3 generate_Xc program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~generate_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/generate_xc~3.html"},{"title":"generate_Xc – ForCAD","text":"function generate_Xc(L) result(control_points) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: L Return Value real(kind=rk), allocatable, (:,:) Called by proc~~generate_xc~4~~CalledByGraph proc~generate_xc~4 generate_Xc program~example3_volume example3_volume program~example3_volume->proc~generate_xc~4 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/generate_xc~4.html"},{"title":"generate_Xc – ForCAD","text":"function generate_Xc(L) result(control_points) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: L Return Value real(kind=rk), allocatable, (:,:) Called by proc~~generate_xc~5~~CalledByGraph proc~generate_xc~5 generate_Xc program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~generate_xc~5 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/generate_xc~5.html"},{"title":"cmp_Xg – ForCAD","text":"private pure function cmp_Xg(this, Xt) result(Xg) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this real(kind=rk), intent(in) :: Xt Return Value real(kind=rk), allocatable, (:) Calls proc~~cmp_xg~~CallsGraph proc~cmp_xg nurbs_curve%cmp_Xg interface~compute_xg compute_Xg proc~cmp_xg->interface~compute_xg proc~is_rational nurbs_curve%is_rational proc~cmp_xg->proc~is_rational Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_xg~~CalledByGraph proc~cmp_xg nurbs_curve%cmp_Xg proc~nearest_point2 nurbs_curve%nearest_point2 proc~nearest_point2->proc~cmp_xg program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~nearest_point2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_xg.html"},{"title":"cmp_elem – ForCAD","text":"private pure function cmp_elem(this) result(elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem~~CallsGraph proc~cmp_elem nurbs_curve%cmp_elem interface~elemconn_cn elemConn_Cn proc~cmp_elem->interface~elemconn_cn interface~unique unique proc~cmp_elem->interface~unique proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_elem->proc~get_multiplicity proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem~~CalledByGraph proc~cmp_elem nurbs_curve%cmp_elem proc~ansatz nurbs_curve%ansatz proc~ansatz->proc~cmp_elem proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem proc~cmp_length->proc~ansatz program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem.html"},{"title":"cmp_elem_Xc_vis – ForCAD","text":"private pure function cmp_elem_Xc_vis(this, p) result(elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in), optional :: p Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem_xc_vis~~CallsGraph proc~cmp_elem_xc_vis nurbs_curve%cmp_elem_Xc_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem_xc_vis~~CalledByGraph proc~cmp_elem_xc_vis nurbs_curve%cmp_elem_Xc_vis proc~export_xc nurbs_curve%export_Xc proc~export_xc->proc~cmp_elem_xc_vis program~example1_curve example1_curve program~example1_curve->proc~export_xc program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~export_xc program~shape_c_1d shape_C_1d program~shape_c_1d->proc~export_xc program~shape_circle shape_circle program~shape_circle->proc~export_xc program~shape_half_circle shape_half_circle program~shape_half_circle->proc~export_xc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem_xc_vis.html"},{"title":"cmp_elem_Xg_vis – ForCAD","text":"private pure function cmp_elem_Xg_vis(this, p) result(elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in), optional :: p Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem_xg_vis~~CallsGraph proc~cmp_elem_xg_vis nurbs_curve%cmp_elem_Xg_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem_xg_vis~~CalledByGraph proc~cmp_elem_xg_vis nurbs_curve%cmp_elem_Xg_vis proc~export_xg nurbs_curve%export_Xg proc~export_xg->proc~cmp_elem_xg_vis program~example1_curve example1_curve program~example1_curve->proc~export_xg program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~export_xg program~shape_c_1d shape_C_1d program~shape_c_1d->proc~export_xg program~shape_circle shape_circle program~shape_circle->proc~export_xg program~shape_half_circle shape_half_circle program~shape_half_circle->proc~export_xg Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem_xg_vis.html"},{"title":"get_Wc_all – ForCAD","text":"private pure function get_Wc_all(this) result(Wc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) Called by proc~~get_wc_all~~CalledByGraph proc~get_wc_all nurbs_curve%get_Wc_all none~get_wc nurbs_curve%get_Wc none~get_wc->proc~get_wc_all proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~get_wc proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~get_wc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_wc_all.html"},{"title":"get_Wci – ForCAD","text":"private pure function get_Wci(this, n) result(Wc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) Called by proc~~get_wci~~CalledByGraph proc~get_wci nurbs_curve%get_Wci none~get_wc nurbs_curve%get_Wc none~get_wc->proc~get_wci proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~get_wc proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~get_wc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_wci.html"},{"title":"get_Xc_all – ForCAD","text":"private pure function get_Xc_all(this) result(Xc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) Called by proc~~get_xc_all~~CalledByGraph proc~get_xc_all nurbs_curve%get_Xc_all none~get_xc nurbs_curve%get_Xc none~get_xc->proc~get_xc_all proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~get_xc proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~get_xc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xc_all.html"},{"title":"get_Xci – ForCAD","text":"private pure function get_Xci(this, n) result(Xc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) Called by proc~~get_xci~~CalledByGraph proc~get_xci nurbs_curve%get_Xci none~get_xc nurbs_curve%get_Xc none~get_xc->proc~get_xci proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~get_xc proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~get_xc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xci.html"},{"title":"get_Xcid – ForCAD","text":"private pure function get_Xcid(this, n, dir) result(Xc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) Called by proc~~get_xcid~~CalledByGraph proc~get_xcid nurbs_curve%get_Xcid none~get_xc nurbs_curve%get_Xc none~get_xc->proc~get_xcid proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~get_xc proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~get_xc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xcid.html"},{"title":"get_Xg_all – ForCAD","text":"private pure function get_Xg_all(this) result(Xg) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:)","tags":"","loc":"proc/get_xg_all.html"},{"title":"get_Xgi – ForCAD","text":"private pure function get_Xgi(this, n) result(Xg) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/get_xgi.html"},{"title":"get_Xgid – ForCAD","text":"private pure function get_Xgid(this, n, dir) result(Xg) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk)","tags":"","loc":"proc/get_xgid.html"},{"title":"get_Xt – ForCAD","text":"private pure function get_Xt(this) result(Xt) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/get_xt.html"},{"title":"get_continuity – ForCAD","text":"private pure function get_continuity(this) result(c) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:) Calls proc~~get_continuity~~CallsGraph proc~get_continuity nurbs_curve%get_continuity interface~compute_multiplicity compute_multiplicity proc~get_continuity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_continuity.html"},{"title":"get_degree – ForCAD","text":"private pure function get_degree(this) result(degree) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer Called by proc~~get_degree~~CalledByGraph proc~get_degree nurbs_curve%get_degree program~example1_curve example1_curve program~example1_curve->proc~get_degree Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_degree.html"},{"title":"get_elem – ForCAD","text":"private pure function get_elem(this) result(elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem.html"},{"title":"get_elem_Xc_vis – ForCAD","text":"private pure function get_elem_Xc_vis(this) result(elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem_xc_vis.html"},{"title":"get_elem_Xg_vis – ForCAD","text":"private pure function get_elem_Xg_vis(this) result(elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem_xg_vis.html"},{"title":"get_knot_all – ForCAD","text":"private pure function get_knot_all(this) result(knot) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) Called by proc~~get_knot_all~~CalledByGraph proc~get_knot_all nurbs_curve%get_knot_all none~get_knot nurbs_curve%get_knot none~get_knot->proc~get_knot_all proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~get_knot proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~get_knot program~example1_curve example1_curve program~example1_curve->none~get_knot Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_knot_all.html"},{"title":"get_knoti – ForCAD","text":"private pure function get_knoti(this, i) result(knot) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: i Return Value real(kind=rk) Called by proc~~get_knoti~~CalledByGraph proc~get_knoti nurbs_curve%get_knoti none~get_knot nurbs_curve%get_knot none~get_knot->proc~get_knoti proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~get_knot proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~get_knot program~example1_curve example1_curve program~example1_curve->none~get_knot Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_knoti.html"},{"title":"get_multiplicity – ForCAD","text":"private pure function get_multiplicity(this) result(m) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:) Calls proc~~get_multiplicity~~CallsGraph proc~get_multiplicity nurbs_curve%get_multiplicity interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~get_multiplicity~~CalledByGraph proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree nurbs_curve%cmp_degree proc~cmp_degree->proc~get_multiplicity proc~cmp_elem nurbs_curve%cmp_elem proc~cmp_elem->proc~get_multiplicity proc~ansatz nurbs_curve%ansatz proc~ansatz->proc~cmp_elem none~set nurbs_curve%set proc~ansatz->none~set proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem proc~cmp_length->proc~ansatz proc~set1 nurbs_curve%set1 proc~set1->proc~cmp_degree proc~set1a nurbs_curve%set1a proc~set1a->proc~cmp_degree proc~set3 nurbs_curve%set3 proc~set3->proc~cmp_degree none~set->proc~set1 none~set->proc~set1a none~set->proc~set3 program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_length->none~set proc~elevate_degree nurbs_curve%elevate_degree proc~elevate_degree->none~set proc~insert_knots nurbs_curve%insert_knots proc~insert_knots->none~set proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~set proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~set proc~remove_knots nurbs_curve%remove_knots proc~remove_knots->none~set proc~set_c nurbs_curve%set_C proc~set_c->none~set proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set program~example1_curve example1_curve program~example1_curve->none~set program~example1_curve->proc~elevate_degree program~example1_curve->proc~insert_knots program~example1_curve->proc~remove_knots program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_multiplicity.html"},{"title":"get_nc – ForCAD","text":"private pure function get_nc(this) result(nc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer","tags":"","loc":"proc/get_nc.html"},{"title":"get_ng – ForCAD","text":"private pure function get_ng(this) result(ng) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer","tags":"","loc":"proc/get_ng.html"},{"title":"is_rational – ForCAD","text":"private pure function is_rational(this) result(r) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value logical Called by proc~~is_rational~~CalledByGraph proc~is_rational nurbs_curve%is_rational proc~basis_scalar nurbs_curve%basis_scalar proc~basis_scalar->proc~is_rational proc~basis_vector nurbs_curve%basis_vector proc~basis_vector->proc~is_rational proc~cmp_xg nurbs_curve%cmp_Xg proc~cmp_xg->proc~is_rational proc~create nurbs_curve%create proc~create->proc~is_rational proc~derivative2_scalar nurbs_curve%derivative2_scalar proc~derivative2_scalar->proc~is_rational proc~derivative2_vector nurbs_curve%derivative2_vector proc~derivative2_vector->proc~is_rational proc~derivative_scalar nurbs_curve%derivative_scalar proc~derivative_scalar->proc~is_rational proc~derivative_vector nurbs_curve%derivative_vector proc~derivative_vector->proc~is_rational proc~elevate_degree nurbs_curve%elevate_degree proc~elevate_degree->proc~is_rational proc~insert_knots nurbs_curve%insert_knots proc~insert_knots->proc~is_rational proc~remove_knots nurbs_curve%remove_knots proc~remove_knots->proc~is_rational none~derivative nurbs_curve%derivative none~derivative->proc~derivative_scalar none~derivative->proc~derivative_vector none~derivative2 nurbs_curve%derivative2 none~derivative2->proc~derivative2_scalar none~derivative2->proc~derivative2_vector proc~nearest_point2 nurbs_curve%nearest_point2 proc~nearest_point2->proc~cmp_xg proc~nearest_point2->proc~create proc~nearest_point2->none~derivative2 program~example1_curve example1_curve program~example1_curve->proc~create program~example1_curve->proc~elevate_degree program~example1_curve->proc~insert_knots program~example1_curve->proc~remove_knots program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~create program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~create program~nearest_point_1d->proc~nearest_point2 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~create program~shape_circle shape_circle program~shape_circle->proc~create program~shape_half_circle shape_half_circle program~shape_half_circle->proc~create proc~ansatz nurbs_curve%ansatz proc~ansatz->none~derivative proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/is_rational.html"},{"title":"ansatz – ForCAD","text":"private pure subroutine ansatz(this, ie, ig, Tgc, dTgc_dXg, dL) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dL Calls proc~~ansatz~~CallsGraph proc~ansatz nurbs_curve%ansatz interface~dyad dyad proc~ansatz->interface~dyad interface~gauss_leg gauss_leg proc~ansatz->interface~gauss_leg interface~unique unique proc~ansatz->interface~unique none~derivative nurbs_curve%derivative proc~ansatz->none~derivative none~set nurbs_curve%set proc~ansatz->none~set proc~cmp_elem nurbs_curve%cmp_elem proc~ansatz->proc~cmp_elem proc~dyad_t1_t1 dyad_t1_t1 interface~dyad->proc~dyad_t1_t1 proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar nurbs_curve%derivative_scalar none~derivative->proc~derivative_scalar proc~derivative_vector nurbs_curve%derivative_vector none~derivative->proc~derivative_vector proc~set1 nurbs_curve%set1 none~set->proc~set1 proc~set1a nurbs_curve%set1a none~set->proc~set1a proc~set2 nurbs_curve%set2 none~set->proc~set2 proc~set3 nurbs_curve%set3 none~set->proc~set3 proc~set4 nurbs_curve%set4 none~set->proc~set4 proc~cmp_elem->interface~unique interface~elemconn_cn elemConn_Cn proc~cmp_elem->interface~elemconn_cn proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_elem->proc~get_multiplicity proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v interface~compute_dtgc compute_dTgc proc~derivative_scalar->interface~compute_dtgc proc~is_rational nurbs_curve%is_rational proc~derivative_scalar->proc~is_rational proc~derivative_vector->interface~compute_dtgc proc~derivative_vector->proc~is_rational gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->gauss_legendre interface~ndgrid ndgrid proc~gauss_legendre_2d->interface~ndgrid proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->proc~kron interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~set1a->proc~cmp_degree proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~cmp_degree->proc~get_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~ansatz~~CalledByGraph proc~ansatz nurbs_curve%ansatz proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/ansatz.html"},{"title":"basis_scalar – ForCAD","text":"private pure subroutine basis_scalar(this, Xt, Tgc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~basis_scalar~~CallsGraph proc~basis_scalar nurbs_curve%basis_scalar interface~compute_tgc compute_Tgc proc~basis_scalar->interface~compute_tgc proc~is_rational nurbs_curve%is_rational proc~basis_scalar->proc~is_rational Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_scalar.html"},{"title":"basis_vector – ForCAD","text":"private pure subroutine basis_vector(this, res, Xt, Tgc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~basis_vector~~CallsGraph proc~basis_vector nurbs_curve%basis_vector interface~compute_tgc compute_Tgc proc~basis_vector->interface~compute_tgc proc~is_rational nurbs_curve%is_rational proc~basis_vector->proc~is_rational Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_vector.html"},{"title":"cmp_degree – ForCAD","text":"private pure subroutine cmp_degree(this) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this Calls proc~~cmp_degree~~CallsGraph proc~cmp_degree nurbs_curve%cmp_degree proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_degree~~CalledByGraph proc~cmp_degree nurbs_curve%cmp_degree proc~set1 nurbs_curve%set1 proc~set1->proc~cmp_degree proc~set1a nurbs_curve%set1a proc~set1a->proc~cmp_degree proc~set3 nurbs_curve%set3 proc~set3->proc~cmp_degree none~set nurbs_curve%set none~set->proc~set1 none~set->proc~set1a none~set->proc~set3 proc~ansatz nurbs_curve%ansatz proc~ansatz->none~set proc~elevate_degree nurbs_curve%elevate_degree proc~elevate_degree->none~set proc~insert_knots nurbs_curve%insert_knots proc~insert_knots->none~set proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~set proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~set proc~remove_knots nurbs_curve%remove_knots proc~remove_knots->none~set proc~set_c nurbs_curve%set_C proc~set_c->none~set proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set program~compute_length compute_length program~compute_length->none~set proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length program~example1_curve example1_curve program~example1_curve->none~set program~example1_curve->proc~elevate_degree program~example1_curve->proc~insert_knots program~example1_curve->proc~remove_knots program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set proc~cmp_length->proc~ansatz program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_degree.html"},{"title":"cmp_length – ForCAD","text":"private pure subroutine cmp_length(this, length) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(out) :: length Calls proc~~cmp_length~~CallsGraph proc~cmp_length nurbs_curve%cmp_length proc~ansatz nurbs_curve%ansatz proc~cmp_length->proc~ansatz proc~cmp_elem nurbs_curve%cmp_elem proc~cmp_length->proc~cmp_elem proc~ansatz->proc~cmp_elem interface~dyad dyad proc~ansatz->interface~dyad interface~gauss_leg gauss_leg proc~ansatz->interface~gauss_leg interface~unique unique proc~ansatz->interface~unique none~derivative nurbs_curve%derivative proc~ansatz->none~derivative none~set nurbs_curve%set proc~ansatz->none~set interface~elemconn_cn elemConn_Cn proc~cmp_elem->interface~elemconn_cn proc~cmp_elem->interface~unique proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_elem->proc~get_multiplicity proc~dyad_t1_t1 dyad_t1_t1 interface~dyad->proc~dyad_t1_t1 proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar nurbs_curve%derivative_scalar none~derivative->proc~derivative_scalar proc~derivative_vector nurbs_curve%derivative_vector none~derivative->proc~derivative_vector proc~set1 nurbs_curve%set1 none~set->proc~set1 proc~set1a nurbs_curve%set1a none~set->proc~set1a proc~set2 nurbs_curve%set2 none~set->proc~set2 proc~set3 nurbs_curve%set3 none~set->proc~set3 proc~set4 nurbs_curve%set4 none~set->proc~set4 interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 interface~compute_dtgc compute_dTgc proc~derivative_scalar->interface~compute_dtgc proc~is_rational nurbs_curve%is_rational proc~derivative_scalar->proc~is_rational proc~derivative_vector->interface~compute_dtgc proc~derivative_vector->proc~is_rational gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->gauss_legendre interface~ndgrid ndgrid proc~gauss_legendre_2d->interface~ndgrid proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->proc~kron proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~set1a->proc~cmp_degree proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~cmp_degree->proc~get_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_length~~CalledByGraph proc~cmp_length nurbs_curve%cmp_length program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_length.html"},{"title":"cmp_nc – ForCAD","text":"private pure subroutine cmp_nc(this) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this Calls proc~~cmp_nc~~CallsGraph proc~cmp_nc nurbs_curve%cmp_nc interface~compute_multiplicity compute_multiplicity proc~cmp_nc->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_nc.html"},{"title":"create – ForCAD","text":"private pure subroutine create(this, res, Xt) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) Calls proc~~create~~CallsGraph proc~create nurbs_curve%create interface~compute_xg compute_Xg proc~create->interface~compute_xg proc~is_rational nurbs_curve%is_rational proc~create->proc~is_rational Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~create~~CalledByGraph proc~create nurbs_curve%create proc~nearest_point2 nurbs_curve%nearest_point2 proc~nearest_point2->proc~create program~example1_curve example1_curve program~example1_curve->proc~create program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~create program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~create program~nearest_point_1d->proc~nearest_point2 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~create program~shape_circle shape_circle program~shape_circle->proc~create program~shape_half_circle shape_half_circle program~shape_half_circle->proc~create Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/create.html"},{"title":"derivative2_scalar – ForCAD","text":"private pure subroutine derivative2_scalar(this, Xt, d2Tgc, dTgc, Tgc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: d2Tgc (:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) Calls proc~~derivative2_scalar~~CallsGraph proc~derivative2_scalar nurbs_curve%derivative2_scalar interface~compute_d2tgc compute_d2Tgc proc~derivative2_scalar->interface~compute_d2tgc proc~is_rational nurbs_curve%is_rational proc~derivative2_scalar->proc~is_rational Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative2_scalar~~CalledByGraph proc~derivative2_scalar nurbs_curve%derivative2_scalar none~derivative2 nurbs_curve%derivative2 none~derivative2->proc~derivative2_scalar proc~nearest_point2 nurbs_curve%nearest_point2 proc~nearest_point2->none~derivative2 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~nearest_point2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative2_scalar.html"},{"title":"derivative2_vector – ForCAD","text":"private pure subroutine derivative2_vector(this, res, Xt, d2Tgc, dTgc, Tgc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) Calls proc~~derivative2_vector~~CallsGraph proc~derivative2_vector nurbs_curve%derivative2_vector interface~compute_d2tgc compute_d2Tgc proc~derivative2_vector->interface~compute_d2tgc proc~is_rational nurbs_curve%is_rational proc~derivative2_vector->proc~is_rational Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative2_vector~~CalledByGraph proc~derivative2_vector nurbs_curve%derivative2_vector none~derivative2 nurbs_curve%derivative2 none~derivative2->proc~derivative2_vector proc~nearest_point2 nurbs_curve%nearest_point2 proc~nearest_point2->none~derivative2 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~nearest_point2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative2_vector.html"},{"title":"derivative_scalar – ForCAD","text":"private pure subroutine derivative_scalar(this, Xt, dTgc, Tgc, elem) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: dTgc (:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~derivative_scalar~~CallsGraph proc~derivative_scalar nurbs_curve%derivative_scalar interface~compute_dtgc compute_dTgc proc~derivative_scalar->interface~compute_dtgc proc~is_rational nurbs_curve%is_rational proc~derivative_scalar->proc~is_rational Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative_scalar~~CalledByGraph proc~derivative_scalar nurbs_curve%derivative_scalar none~derivative nurbs_curve%derivative none~derivative->proc~derivative_scalar proc~ansatz nurbs_curve%ansatz proc~ansatz->none~derivative proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative_scalar.html"},{"title":"derivative_vector – ForCAD","text":"private pure subroutine derivative_vector(this, res, Xt, dTgc, Tgc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) Calls proc~~derivative_vector~~CallsGraph proc~derivative_vector nurbs_curve%derivative_vector interface~compute_dtgc compute_dTgc proc~derivative_vector->interface~compute_dtgc proc~is_rational nurbs_curve%is_rational proc~derivative_vector->proc~is_rational Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative_vector~~CalledByGraph proc~derivative_vector nurbs_curve%derivative_vector none~derivative nurbs_curve%derivative none~derivative->proc~derivative_vector proc~ansatz nurbs_curve%ansatz proc~ansatz->none~derivative proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative_vector.html"},{"title":"elevate_degree – ForCAD","text":"private pure subroutine elevate_degree(this, t) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: t Calls proc~~elevate_degree~~CallsGraph proc~elevate_degree nurbs_curve%elevate_degree none~set nurbs_curve%set proc~elevate_degree->none~set proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree->proc~elevate_degree_a_5_9 proc~is_rational nurbs_curve%is_rational proc~elevate_degree->proc~is_rational proc~set1 nurbs_curve%set1 none~set->proc~set1 proc~set1a nurbs_curve%set1a none~set->proc~set1a proc~set2 nurbs_curve%set2 none~set->proc~set2 proc~set3 nurbs_curve%set3 none~set->proc~set3 proc~set4 nurbs_curve%set4 none~set->proc~set4 interface~compute_multiplicity compute_multiplicity proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~bincoeff bincoeff proc~elevate_degree_a_5_9->proc~bincoeff proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~factln factln proc~bincoeff->proc~factln proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~set1a->proc~cmp_degree proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~elevate_degree~~CalledByGraph proc~elevate_degree nurbs_curve%elevate_degree program~example1_curve example1_curve program~example1_curve->proc~elevate_degree Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/elevate_degree.html"},{"title":"export_Xc – ForCAD","text":"private impure subroutine export_Xc(this, filename) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this character(len=*), intent(in) :: filename Calls proc~~export_xc~~CallsGraph proc~export_xc nurbs_curve%export_Xc proc~cmp_elem_xc_vis nurbs_curve%cmp_elem_Xc_vis proc~export_xc->proc~cmp_elem_xc_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~export_xc~~CalledByGraph proc~export_xc nurbs_curve%export_Xc program~example1_curve example1_curve program~example1_curve->proc~export_xc program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~export_xc program~shape_c_1d shape_C_1d program~shape_c_1d->proc~export_xc program~shape_circle shape_circle program~shape_circle->proc~export_xc program~shape_half_circle shape_half_circle program~shape_half_circle->proc~export_xc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/export_xc.html"},{"title":"export_Xg – ForCAD","text":"private impure subroutine export_Xg(this, filename) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this character(len=*), intent(in) :: filename Calls proc~~export_xg~~CallsGraph proc~export_xg nurbs_curve%export_Xg proc~cmp_elem_xg_vis nurbs_curve%cmp_elem_Xg_vis proc~export_xg->proc~cmp_elem_xg_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~export_xg~~CalledByGraph proc~export_xg nurbs_curve%export_Xg program~example1_curve example1_curve program~example1_curve->proc~export_xg program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~export_xg program~shape_c_1d shape_C_1d program~shape_c_1d->proc~export_xg program~shape_circle shape_circle program~shape_circle->proc~export_xg program~shape_half_circle shape_half_circle program~shape_half_circle->proc~export_xg Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/export_xg.html"},{"title":"finalize – ForCAD","text":"private pure subroutine finalize(this) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this Called by proc~~finalize~~CalledByGraph proc~finalize nurbs_curve%finalize proc~nearest_point2 nurbs_curve%nearest_point2 proc~nearest_point2->proc~finalize program~example1_curve example1_curve program~example1_curve->proc~finalize program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~finalize program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~finalize program~nearest_point_1d->proc~nearest_point2 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~finalize program~shape_circle shape_circle program~shape_circle->proc~finalize program~shape_half_circle shape_half_circle program~shape_half_circle->proc~finalize Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/finalize.html"},{"title":"insert_knots – ForCAD","text":"private pure subroutine insert_knots(this, Xth, r) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) Calls proc~~insert_knots~~CallsGraph proc~insert_knots nurbs_curve%insert_knots interface~compute_multiplicity compute_multiplicity proc~insert_knots->interface~compute_multiplicity none~set nurbs_curve%set proc~insert_knots->none~set proc~findspan findspan proc~insert_knots->proc~findspan proc~insert_knot_a_5_1 insert_knot_A_5_1 proc~insert_knots->proc~insert_knot_a_5_1 proc~is_rational nurbs_curve%is_rational proc~insert_knots->proc~is_rational proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~set1 nurbs_curve%set1 none~set->proc~set1 proc~set1a nurbs_curve%set1a none~set->proc~set1a proc~set2 nurbs_curve%set2 none~set->proc~set2 proc~set3 nurbs_curve%set3 none~set->proc~set3 proc~set4 nurbs_curve%set4 none~set->proc~set4 proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~set1a->proc~cmp_degree proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~insert_knots~~CalledByGraph proc~insert_knots nurbs_curve%insert_knots program~example1_curve example1_curve program~example1_curve->proc~insert_knots Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/insert_knots.html"},{"title":"modify_Wc – ForCAD","text":"private pure subroutine modify_Wc(this, W, num) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num Calls proc~~modify_wc~~CallsGraph proc~modify_wc nurbs_curve%modify_Wc none~get_knot nurbs_curve%get_knot proc~modify_wc->none~get_knot none~get_wc nurbs_curve%get_Wc proc~modify_wc->none~get_wc none~get_xc nurbs_curve%get_Xc proc~modify_wc->none~get_xc none~set nurbs_curve%set proc~modify_wc->none~set proc~get_knot_all nurbs_curve%get_knot_all none~get_knot->proc~get_knot_all proc~get_knoti nurbs_curve%get_knoti none~get_knot->proc~get_knoti proc~get_wc_all nurbs_curve%get_Wc_all none~get_wc->proc~get_wc_all proc~get_wci nurbs_curve%get_Wci none~get_wc->proc~get_wci proc~get_xc_all nurbs_curve%get_Xc_all none~get_xc->proc~get_xc_all proc~get_xci nurbs_curve%get_Xci none~get_xc->proc~get_xci proc~get_xcid nurbs_curve%get_Xcid none~get_xc->proc~get_xcid proc~set1 nurbs_curve%set1 none~set->proc~set1 proc~set1a nurbs_curve%set1a none~set->proc~set1a proc~set2 nurbs_curve%set2 none~set->proc~set2 proc~set3 nurbs_curve%set3 none~set->proc~set3 proc~set4 nurbs_curve%set4 none~set->proc~set4 proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~set1a->proc~cmp_degree proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/modify_wc.html"},{"title":"modify_Xc – ForCAD","text":"private pure subroutine modify_Xc(this, X, num, dir) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir Calls proc~~modify_xc~~CallsGraph proc~modify_xc nurbs_curve%modify_Xc none~get_knot nurbs_curve%get_knot proc~modify_xc->none~get_knot none~get_wc nurbs_curve%get_Wc proc~modify_xc->none~get_wc none~get_xc nurbs_curve%get_Xc proc~modify_xc->none~get_xc none~set nurbs_curve%set proc~modify_xc->none~set proc~get_knot_all nurbs_curve%get_knot_all none~get_knot->proc~get_knot_all proc~get_knoti nurbs_curve%get_knoti none~get_knot->proc~get_knoti proc~get_wc_all nurbs_curve%get_Wc_all none~get_wc->proc~get_wc_all proc~get_wci nurbs_curve%get_Wci none~get_wc->proc~get_wci proc~get_xc_all nurbs_curve%get_Xc_all none~get_xc->proc~get_xc_all proc~get_xci nurbs_curve%get_Xci none~get_xc->proc~get_xci proc~get_xcid nurbs_curve%get_Xcid none~get_xc->proc~get_xcid proc~set1 nurbs_curve%set1 none~set->proc~set1 proc~set1a nurbs_curve%set1a none~set->proc~set1a proc~set2 nurbs_curve%set2 none~set->proc~set2 proc~set3 nurbs_curve%set3 none~set->proc~set3 proc~set4 nurbs_curve%set4 none~set->proc~set4 proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~set1a->proc~cmp_degree proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/modify_xc.html"},{"title":"nearest_point – ForCAD","text":"private pure subroutine nearest_point(this, point_Xg, nearest_Xg, nearest_Xt, id) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional :: nearest_Xt integer, intent(out), optional :: id Calls proc~~nearest_point~~CallsGraph proc~nearest_point nurbs_curve%nearest_point interface~nearest_point_help_1d nearest_point_help_1d proc~nearest_point->interface~nearest_point_help_1d Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~nearest_point~~CalledByGraph proc~nearest_point nurbs_curve%nearest_point proc~nearest_point2 nurbs_curve%nearest_point2 proc~nearest_point2->proc~nearest_point program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~nearest_point program~nearest_point_1d->proc~nearest_point2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/nearest_point.html"},{"title":"nearest_point2 – ForCAD","text":"private impure subroutine nearest_point2(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) Calls proc~~nearest_point2~~CallsGraph proc~nearest_point2 nurbs_curve%nearest_point2 none~derivative2 nurbs_curve%derivative2 proc~nearest_point2->none~derivative2 proc~cmp_xg nurbs_curve%cmp_Xg proc~nearest_point2->proc~cmp_xg proc~create nurbs_curve%create proc~nearest_point2->proc~create proc~finalize nurbs_curve%finalize proc~nearest_point2->proc~finalize proc~nearest_point nurbs_curve%nearest_point proc~nearest_point2->proc~nearest_point proc~derivative2_scalar nurbs_curve%derivative2_scalar none~derivative2->proc~derivative2_scalar proc~derivative2_vector nurbs_curve%derivative2_vector none~derivative2->proc~derivative2_vector interface~compute_xg compute_Xg proc~cmp_xg->interface~compute_xg proc~is_rational nurbs_curve%is_rational proc~cmp_xg->proc~is_rational proc~create->interface~compute_xg proc~create->proc~is_rational interface~nearest_point_help_1d nearest_point_help_1d proc~nearest_point->interface~nearest_point_help_1d proc~derivative2_scalar->proc~is_rational interface~compute_d2tgc compute_d2Tgc proc~derivative2_scalar->interface~compute_d2tgc proc~derivative2_vector->proc~is_rational proc~derivative2_vector->interface~compute_d2tgc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~nearest_point2~~CalledByGraph proc~nearest_point2 nurbs_curve%nearest_point2 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~nearest_point2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/nearest_point2.html"},{"title":"remove_knots – ForCAD","text":"private pure subroutine remove_knots(this, Xth, r) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) Calls proc~~remove_knots~~CallsGraph proc~remove_knots nurbs_curve%remove_knots interface~compute_multiplicity compute_multiplicity proc~remove_knots->interface~compute_multiplicity none~set nurbs_curve%set proc~remove_knots->none~set proc~findspan findspan proc~remove_knots->proc~findspan proc~is_rational nurbs_curve%is_rational proc~remove_knots->proc~is_rational proc~remove_knots_a_5_8 remove_knots_A_5_8 proc~remove_knots->proc~remove_knots_a_5_8 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~set1 nurbs_curve%set1 none~set->proc~set1 proc~set1a nurbs_curve%set1a none~set->proc~set1a proc~set2 nurbs_curve%set2 none~set->proc~set2 proc~set3 nurbs_curve%set3 none~set->proc~set3 proc~set4 nurbs_curve%set4 none~set->proc~set4 proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~set1a->proc~cmp_degree proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~remove_knots~~CalledByGraph proc~remove_knots nurbs_curve%remove_knots program~example1_curve example1_curve program~example1_curve->proc~remove_knots Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/remove_knots.html"},{"title":"rotate_Xc – ForCAD","text":"private pure subroutine rotate_Xc(this, alpha, beta, theta) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta Calls proc~~rotate_xc~~CallsGraph proc~rotate_xc nurbs_curve%rotate_Xc proc~rotation rotation proc~rotate_xc->proc~rotation cosd cosd proc~rotation->cosd sind sind proc~rotation->sind Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~rotate_xc~~CalledByGraph proc~rotate_xc nurbs_curve%rotate_Xc program~example1_curve example1_curve program~example1_curve->proc~rotate_xc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/rotate_xc.html"},{"title":"rotate_Xg – ForCAD","text":"private pure subroutine rotate_Xg(this, alpha, beta, theta) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta Calls proc~~rotate_xg~~CallsGraph proc~rotate_xg nurbs_curve%rotate_Xg proc~rotation rotation proc~rotate_xg->proc~rotation cosd cosd proc~rotation->cosd sind sind proc~rotation->sind Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~rotate_xg~~CalledByGraph proc~rotate_xg nurbs_curve%rotate_Xg program~example1_curve example1_curve program~example1_curve->proc~rotate_xg Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/rotate_xg.html"},{"title":"set1 – ForCAD","text":"private pure subroutine set1(this, knot, Xc, Wc) Set knot vector, control points and weights for the NURBS curve object. Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set1~~CallsGraph proc~set1 nurbs_curve%set1 proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set1~~CalledByGraph proc~set1 nurbs_curve%set1 none~set nurbs_curve%set none~set->proc~set1 proc~ansatz nurbs_curve%ansatz proc~ansatz->none~set proc~elevate_degree nurbs_curve%elevate_degree proc~elevate_degree->none~set proc~insert_knots nurbs_curve%insert_knots proc~insert_knots->none~set proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~set proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~set proc~remove_knots nurbs_curve%remove_knots proc~remove_knots->none~set proc~set_c nurbs_curve%set_C proc~set_c->none~set proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set program~compute_length compute_length program~compute_length->none~set proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length program~example1_curve example1_curve program~example1_curve->none~set program~example1_curve->proc~elevate_degree program~example1_curve->proc~insert_knots program~example1_curve->proc~remove_knots program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set proc~cmp_length->proc~ansatz program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set1.html"},{"title":"set1a – ForCAD","text":"private pure subroutine set1a(this, knot, Xc, Wc) Set knot vector, control points and weights for the NURBS curve object. Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Xc (:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set1a~~CallsGraph proc~set1a nurbs_curve%set1a proc~cmp_degree nurbs_curve%cmp_degree proc~set1a->proc~cmp_degree proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set1a~~CalledByGraph proc~set1a nurbs_curve%set1a none~set nurbs_curve%set none~set->proc~set1a proc~ansatz nurbs_curve%ansatz proc~ansatz->none~set proc~elevate_degree nurbs_curve%elevate_degree proc~elevate_degree->none~set proc~insert_knots nurbs_curve%insert_knots proc~insert_knots->none~set proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~set proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~set proc~remove_knots nurbs_curve%remove_knots proc~remove_knots->none~set proc~set_c nurbs_curve%set_C proc~set_c->none~set proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set program~compute_length compute_length program~compute_length->none~set proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length program~example1_curve example1_curve program~example1_curve->none~set program~example1_curve->proc~elevate_degree program~example1_curve->proc~insert_knots program~example1_curve->proc~remove_knots program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set proc~cmp_length->proc~ansatz program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set1a.html"},{"title":"set2 – ForCAD","text":"private pure subroutine set2(this, Xth_dir, degree, continuity, Xc, Wc) Set NURBS curve using nodes of parameter space (Xth), degree, continuity, control points and weights. Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir (:) integer, intent(in) :: degree integer, intent(in), contiguous :: continuity (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set2~~CallsGraph proc~set2 nurbs_curve%set2 proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set2~~CalledByGraph proc~set2 nurbs_curve%set2 none~set nurbs_curve%set none~set->proc~set2 proc~ansatz nurbs_curve%ansatz proc~ansatz->none~set proc~elevate_degree nurbs_curve%elevate_degree proc~elevate_degree->none~set proc~insert_knots nurbs_curve%insert_knots proc~insert_knots->none~set proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~set proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~set proc~remove_knots nurbs_curve%remove_knots proc~remove_knots->none~set proc~set_c nurbs_curve%set_C proc~set_c->none~set proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set program~compute_length compute_length program~compute_length->none~set proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length program~example1_curve example1_curve program~example1_curve->none~set program~example1_curve->proc~elevate_degree program~example1_curve->proc~insert_knots program~example1_curve->proc~remove_knots program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set proc~cmp_length->proc~ansatz program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set2.html"},{"title":"set3 – ForCAD","text":"private pure subroutine set3(this, Xc, Wc) Set Bezier or Rational Bezier curve using control points and weights. Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set3~~CallsGraph proc~set3 nurbs_curve%set3 proc~cmp_degree nurbs_curve%cmp_degree proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set3~~CalledByGraph proc~set3 nurbs_curve%set3 none~set nurbs_curve%set none~set->proc~set3 proc~ansatz nurbs_curve%ansatz proc~ansatz->none~set proc~elevate_degree nurbs_curve%elevate_degree proc~elevate_degree->none~set proc~insert_knots nurbs_curve%insert_knots proc~insert_knots->none~set proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~set proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~set proc~remove_knots nurbs_curve%remove_knots proc~remove_knots->none~set proc~set_c nurbs_curve%set_C proc~set_c->none~set proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set program~compute_length compute_length program~compute_length->none~set proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length program~example1_curve example1_curve program~example1_curve->none~set program~example1_curve->proc~elevate_degree program~example1_curve->proc~insert_knots program~example1_curve->proc~remove_knots program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set proc~cmp_length->proc~ansatz program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set3.html"},{"title":"set4 – ForCAD","text":"private pure subroutine set4(this, degree, nc, Xc, Wc) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Called by proc~~set4~~CalledByGraph proc~set4 nurbs_curve%set4 none~set nurbs_curve%set none~set->proc~set4 proc~ansatz nurbs_curve%ansatz proc~ansatz->none~set proc~elevate_degree nurbs_curve%elevate_degree proc~elevate_degree->none~set proc~insert_knots nurbs_curve%insert_knots proc~insert_knots->none~set proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~set proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~set proc~remove_knots nurbs_curve%remove_knots proc~remove_knots->none~set proc~set_c nurbs_curve%set_C proc~set_c->none~set proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set program~compute_length compute_length program~compute_length->none~set proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length program~example1_curve example1_curve program~example1_curve->none~set program~example1_curve->proc~elevate_degree program~example1_curve->proc~insert_knots program~example1_curve->proc~remove_knots program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set proc~cmp_length->proc~ansatz program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set4.html"},{"title":"set_C – ForCAD","text":"private pure subroutine set_C(this, center, radius) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius Calls proc~~set_c~~CallsGraph proc~set_c nurbs_curve%set_C none~set nurbs_curve%set proc~set_c->none~set proc~set1 nurbs_curve%set1 none~set->proc~set1 proc~set1a nurbs_curve%set1a none~set->proc~set1a proc~set2 nurbs_curve%set2 none~set->proc~set2 proc~set3 nurbs_curve%set3 none~set->proc~set3 proc~set4 nurbs_curve%set4 none~set->proc~set4 proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~set1a->proc~cmp_degree proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_c~~CalledByGraph proc~set_c nurbs_curve%set_C program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_c.html"},{"title":"set_circle – ForCAD","text":"private pure subroutine set_circle(this, center, radius) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius Calls proc~~set_circle~~CallsGraph proc~set_circle nurbs_curve%set_circle none~set nurbs_curve%set proc~set_circle->none~set proc~set1 nurbs_curve%set1 none~set->proc~set1 proc~set1a nurbs_curve%set1a none~set->proc~set1a proc~set2 nurbs_curve%set2 none~set->proc~set2 proc~set3 nurbs_curve%set3 none~set->proc~set3 proc~set4 nurbs_curve%set4 none~set->proc~set4 proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~set1a->proc~cmp_degree proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_circle~~CalledByGraph proc~set_circle nurbs_curve%set_circle program~shape_circle shape_circle program~shape_circle->proc~set_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_circle.html"},{"title":"set_elem – ForCAD","text":"private pure subroutine set_elem(this, elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:)","tags":"","loc":"proc/set_elem.html"},{"title":"set_elem_Xc_vis – ForCAD","text":"private pure subroutine set_elem_Xc_vis(this, elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:)","tags":"","loc":"proc/set_elem_xc_vis.html"},{"title":"set_elem_Xg_vis – ForCAD","text":"private pure subroutine set_elem_Xg_vis(this, elemConn) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:)","tags":"","loc":"proc/set_elem_xg_vis.html"},{"title":"set_half_circle – ForCAD","text":"private pure subroutine set_half_circle(this, center, radius) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius Calls proc~~set_half_circle~~CallsGraph proc~set_half_circle nurbs_curve%set_half_circle none~set nurbs_curve%set proc~set_half_circle->none~set proc~set1 nurbs_curve%set1 none~set->proc~set1 proc~set1a nurbs_curve%set1a none~set->proc~set1a proc~set2 nurbs_curve%set2 none~set->proc~set2 proc~set3 nurbs_curve%set3 none~set->proc~set3 proc~set4 nurbs_curve%set4 none~set->proc~set4 proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~set1a->proc~cmp_degree proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_half_circle~~CalledByGraph proc~set_half_circle nurbs_curve%set_half_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_half_circle.html"},{"title":"show – ForCAD","text":"private impure subroutine show(this, vtkfile_Xc, vtkfile_Xg) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg Called by proc~~show~~CalledByGraph proc~show nurbs_curve%show program~example1_curve example1_curve program~example1_curve->proc~show program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~show program~shape_c_1d shape_C_1d program~shape_c_1d->proc~show program~shape_circle shape_circle program~shape_circle->proc~show program~shape_half_circle shape_half_circle program~shape_half_circle->proc~show Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/show.html"},{"title":"translate_Xc – ForCAD","text":"private pure subroutine translate_Xc(this, vec) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) Called by proc~~translate_xc~~CalledByGraph proc~translate_xc nurbs_curve%translate_Xc program~example1_curve example1_curve program~example1_curve->proc~translate_xc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/translate_xc.html"},{"title":"translate_Xg – ForCAD","text":"private pure subroutine translate_Xg(this, vec) Type Bound nurbs_curve Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) Called by proc~~translate_xg~~CalledByGraph proc~translate_xg nurbs_curve%translate_Xg program~example1_curve example1_curve program~example1_curve->proc~translate_xg Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/translate_xg.html"},{"title":"compute_Tgc – ForCAD","text":"private interface compute_Tgc Called by interface~~compute_tgc~~CalledByGraph interface~compute_tgc compute_Tgc proc~basis_scalar nurbs_curve%basis_scalar proc~basis_scalar->interface~compute_tgc proc~basis_vector nurbs_curve%basis_vector proc~basis_vector->interface~compute_tgc Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Functions private pure function compute_Tgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Tgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:)","tags":"","loc":"interface/compute_tgc.html"},{"title":"compute_Xg – ForCAD","text":"private interface compute_Xg Called by interface~~compute_xg~~CalledByGraph interface~compute_xg compute_Xg proc~cmp_xg nurbs_curve%cmp_Xg proc~cmp_xg->interface~compute_xg proc~create nurbs_curve%create proc~create->interface~compute_xg proc~nearest_point2 nurbs_curve%nearest_point2 proc~nearest_point2->proc~cmp_xg proc~nearest_point2->proc~create program~example1_curve example1_curve program~example1_curve->proc~create program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~create program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~create program~nearest_point_1d->proc~nearest_point2 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~create program~shape_circle shape_circle program~shape_circle->proc~create program~shape_half_circle shape_half_circle program~shape_half_circle->proc~create Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Functions private pure function compute_Xg_bspline_1d(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_bspline_1d_1point(f_Xt, f_knot, f_degree, f_nc, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Xg_nurbs_1d(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_nurbs_1d_1point(f_Xt, f_knot, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"interface/compute_xg.html"},{"title":"compute_d2Tgc – ForCAD","text":"private interface compute_d2Tgc Called by interface~~compute_d2tgc~~CalledByGraph interface~compute_d2tgc compute_d2Tgc proc~derivative2_scalar nurbs_curve%derivative2_scalar proc~derivative2_scalar->interface~compute_d2tgc proc~derivative2_vector nurbs_curve%derivative2_vector proc~derivative2_vector->interface~compute_d2tgc none~derivative2 nurbs_curve%derivative2 none~derivative2->proc~derivative2_scalar none~derivative2->proc~derivative2_vector proc~nearest_point2 nurbs_curve%nearest_point2 proc~nearest_point2->none~derivative2 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~nearest_point2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Subroutines private pure subroutine compute_d2Tgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(out), allocatable :: f_d2Tgc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_d2Tgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:)","tags":"","loc":"interface/compute_d2tgc.html"},{"title":"compute_dTgc – ForCAD","text":"private interface compute_dTgc Called by interface~~compute_dtgc~~CalledByGraph interface~compute_dtgc compute_dTgc proc~derivative_scalar nurbs_curve%derivative_scalar proc~derivative_scalar->interface~compute_dtgc proc~derivative_vector nurbs_curve%derivative_vector proc~derivative_vector->interface~compute_dtgc none~derivative nurbs_curve%derivative none~derivative->proc~derivative_scalar none~derivative->proc~derivative_vector proc~ansatz nurbs_curve%ansatz proc~ansatz->none~derivative proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Subroutines private pure subroutine compute_dTgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_dTgc, f_Tgc, f_elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(out), allocatable :: f_dTgc (:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in), optional :: f_elem (:) private pure subroutine compute_dTgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_dTgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, f_elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in), optional :: f_elem (:) private pure subroutine compute_dTgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:)","tags":"","loc":"interface/compute_dtgc.html"},{"title":"nearest_point_help_1d – ForCAD","text":"interface Called by interface~~nearest_point_help_1d~~CalledByGraph interface~nearest_point_help_1d nearest_point_help_1d proc~nearest_point nurbs_curve%nearest_point proc~nearest_point->interface~nearest_point_help_1d proc~nearest_point2 nurbs_curve%nearest_point2 proc~nearest_point2->proc~nearest_point program~nearest_point_1d nearest_point_1d program~nearest_point_1d->proc~nearest_point program~nearest_point_1d->proc~nearest_point2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. private pure function nearest_point_help_1d(f_ng, f_Xg, f_point_Xg) result(f_distances) Arguments Type Intent Optional Attributes Name integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Xg (:,:) real(kind=rk), intent(in), contiguous :: f_point_Xg (:) Return Value real(kind=rk),allocatable,(:)","tags":"","loc":"interface/nearest_point_help_1d.html"},{"title":"cmp_Xg – ForCAD","text":"private pure function cmp_Xg(this, Xt) result(Xg) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this real(kind=rk), intent(in), contiguous :: Xt (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~cmp_xg~2~~CallsGraph proc~cmp_xg~2 nurbs_volume%cmp_Xg interface~compute_xg~2 compute_Xg proc~cmp_xg~2->interface~compute_xg~2 proc~is_rational~2 nurbs_volume%is_rational proc~cmp_xg~2->proc~is_rational~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_xg~2~~CalledByGraph proc~cmp_xg~2 nurbs_volume%cmp_Xg proc~nearest_point2~2 nurbs_volume%nearest_point2 proc~nearest_point2~2->proc~cmp_xg~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point2~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_xg~2.html"},{"title":"cmp_degreeFace – ForCAD","text":"private pure function cmp_degreeFace(this, face) result(degree) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: face Return Value integer, (3) Called by proc~~cmp_degreeface~~CalledByGraph proc~cmp_degreeface nurbs_volume%cmp_degreeFace program~example3_volume example3_volume program~example3_volume->proc~cmp_degreeface Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_degreeface.html"},{"title":"cmp_elem – ForCAD","text":"private pure function cmp_elem(this) result(elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem~2~~CallsGraph proc~cmp_elem~2 nurbs_volume%cmp_elem interface~elemconn_cn elemConn_Cn proc~cmp_elem~2->interface~elemconn_cn interface~unique unique proc~cmp_elem~2->interface~unique proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_elem~2->proc~get_multiplicity~2 proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem~2~~CalledByGraph proc~cmp_elem~2 nurbs_volume%cmp_elem proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->proc~cmp_elem~2 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem~2 proc~cmp_volume->proc~ansatz~2 program~example3_volume example3_volume program~example3_volume->proc~cmp_elem~2 program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem~2.html"},{"title":"cmp_elemFace – ForCAD","text":"private pure function cmp_elemFace(this, elem, face) result(elemConn) number of nodes in each direction Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:) Called by proc~~cmp_elemface~~CalledByGraph proc~cmp_elemface nurbs_volume%cmp_elemFace program~example3_volume example3_volume program~example3_volume->proc~cmp_elemface Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elemface.html"},{"title":"cmp_elemFace_Xc_vis – ForCAD","text":"private pure function cmp_elemFace_Xc_vis(this, elem, face) result(elemConn) number of nodes in each direction Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:)","tags":"","loc":"proc/cmp_elemface_xc_vis.html"},{"title":"cmp_elemFace_Xg_vis – ForCAD","text":"private pure function cmp_elemFace_Xg_vis(this, elem, face) result(elemConn) number of nodes in each direction Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:)","tags":"","loc":"proc/cmp_elemface_xg_vis.html"},{"title":"cmp_elem_Xc_vis – ForCAD","text":"private pure function cmp_elem_Xc_vis(this, p) result(elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem_xc_vis~2~~CallsGraph proc~cmp_elem_xc_vis~2 nurbs_volume%cmp_elem_Xc_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem_xc_vis~2~~CalledByGraph proc~cmp_elem_xc_vis~2 nurbs_volume%cmp_elem_Xc_vis proc~export_xc~2 nurbs_volume%export_Xc proc~export_xc~2->proc~cmp_elem_xc_vis~2 program~example3_volume example3_volume program~example3_volume->proc~export_xc~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~export_xc~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~export_xc~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~export_xc~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~export_xc~2 program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~export_xc~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~export_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem_xc_vis~2.html"},{"title":"cmp_elem_Xg_vis – ForCAD","text":"private pure function cmp_elem_Xg_vis(this, p) result(elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem_xg_vis~2~~CallsGraph proc~cmp_elem_xg_vis~2 nurbs_volume%cmp_elem_Xg_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem_xg_vis~2~~CalledByGraph proc~cmp_elem_xg_vis~2 nurbs_volume%cmp_elem_Xg_vis proc~export_xg~2 nurbs_volume%export_Xg proc~export_xg~2->proc~cmp_elem_xg_vis~2 program~example3_volume example3_volume program~example3_volume->proc~export_xg~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~export_xg~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~export_xg~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~export_xg~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~export_xg~2 program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~export_xg~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~export_xg~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem_xg_vis~2.html"},{"title":"get_Wc_all – ForCAD","text":"private pure function get_Wc_all(this) result(Wc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) Called by proc~~get_wc_all~2~~CalledByGraph proc~get_wc_all~2 nurbs_volume%get_Wc_all none~get_wc~2 nurbs_volume%get_Wc none~get_wc~2->proc~get_wc_all~2 proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~get_wc~2 proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~get_wc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_wc_all~2.html"},{"title":"get_Wci – ForCAD","text":"private pure function get_Wci(this, n) result(Wc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) Called by proc~~get_wci~2~~CalledByGraph proc~get_wci~2 nurbs_volume%get_Wci none~get_wc~2 nurbs_volume%get_Wc none~get_wc~2->proc~get_wci~2 proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~get_wc~2 proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~get_wc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_wci~2.html"},{"title":"get_Xc_all – ForCAD","text":"private pure function get_Xc_all(this) result(Xc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) Called by proc~~get_xc_all~2~~CalledByGraph proc~get_xc_all~2 nurbs_volume%get_Xc_all none~get_xc~2 nurbs_volume%get_Xc none~get_xc~2->proc~get_xc_all~2 proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~get_xc~2 proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~get_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xc_all~2.html"},{"title":"get_Xci – ForCAD","text":"private pure function get_Xci(this, n) result(Xc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) Called by proc~~get_xci~2~~CalledByGraph proc~get_xci~2 nurbs_volume%get_Xci none~get_xc~2 nurbs_volume%get_Xc none~get_xc~2->proc~get_xci~2 proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~get_xc~2 proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~get_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xci~2.html"},{"title":"get_Xcid – ForCAD","text":"private pure function get_Xcid(this, n, dir) result(Xc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) Called by proc~~get_xcid~2~~CalledByGraph proc~get_xcid~2 nurbs_volume%get_Xcid none~get_xc~2 nurbs_volume%get_Xc none~get_xc~2->proc~get_xcid~2 proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~get_xc~2 proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~get_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xcid~2.html"},{"title":"get_Xg_all – ForCAD","text":"private pure function get_Xg_all(this) result(Xg) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:)","tags":"","loc":"proc/get_xg_all~2.html"},{"title":"get_Xgi – ForCAD","text":"private pure function get_Xgi(this, n) result(Xg) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/get_xgi~2.html"},{"title":"get_Xgid – ForCAD","text":"private pure function get_Xgid(this, n, dir) result(Xg) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk)","tags":"","loc":"proc/get_xgid~2.html"},{"title":"get_Xt – ForCAD","text":"private pure function get_Xt(this, dir) result(Xt) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/get_xt~2.html"},{"title":"get_continuity – ForCAD","text":"private pure function get_continuity(this, dir) result(c) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) Calls proc~~get_continuity~2~~CallsGraph proc~get_continuity~2 nurbs_volume%get_continuity interface~compute_multiplicity compute_multiplicity proc~get_continuity~2->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_continuity~2.html"},{"title":"get_degree_all – ForCAD","text":"private pure function get_degree_all(this) result(degree) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) Called by proc~~get_degree_all~~CalledByGraph proc~get_degree_all nurbs_volume%get_degree_all none~get_degree~2 nurbs_volume%get_degree none~get_degree~2->proc~get_degree_all program~example3_volume example3_volume program~example3_volume->none~get_degree~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_degree_all.html"},{"title":"get_degree_dir – ForCAD","text":"private pure function get_degree_dir(this, dir) result(degree) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer Called by proc~~get_degree_dir~~CalledByGraph proc~get_degree_dir nurbs_volume%get_degree_dir none~get_degree~2 nurbs_volume%get_degree none~get_degree~2->proc~get_degree_dir program~example3_volume example3_volume program~example3_volume->none~get_degree~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_degree_dir.html"},{"title":"get_elem – ForCAD","text":"private pure function get_elem(this) result(elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem~2.html"},{"title":"get_elem_Xc_vis – ForCAD","text":"private pure function get_elem_Xc_vis(this) result(elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem_xc_vis~2.html"},{"title":"get_elem_Xg_vis – ForCAD","text":"private pure function get_elem_Xg_vis(this) result(elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem_xg_vis~2.html"},{"title":"get_knot_all – ForCAD","text":"private pure function get_knot_all(this, dir) result(knot) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) Called by proc~~get_knot_all~2~~CalledByGraph proc~get_knot_all~2 nurbs_volume%get_knot_all none~get_knot~2 nurbs_volume%get_knot none~get_knot~2->proc~get_knot_all~2 proc~elevate_degree~2 nurbs_volume%elevate_degree proc~elevate_degree~2->none~get_knot~2 proc~insert_knots~2 nurbs_volume%insert_knots proc~insert_knots~2->none~get_knot~2 proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~get_knot~2 proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~get_knot~2 proc~remove_knots~2 nurbs_volume%remove_knots proc~remove_knots~2->none~get_knot~2 program~example3_volume example3_volume program~example3_volume->none~get_knot~2 program~example3_volume->proc~elevate_degree~2 program~example3_volume->proc~insert_knots~2 program~example3_volume->proc~remove_knots~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_knot_all~2.html"},{"title":"get_knoti – ForCAD","text":"private pure function get_knoti(this, dir, i) result(knot) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir integer, intent(in) :: i Return Value real(kind=rk) Called by proc~~get_knoti~2~~CalledByGraph proc~get_knoti~2 nurbs_volume%get_knoti none~get_knot~2 nurbs_volume%get_knot none~get_knot~2->proc~get_knoti~2 proc~elevate_degree~2 nurbs_volume%elevate_degree proc~elevate_degree~2->none~get_knot~2 proc~insert_knots~2 nurbs_volume%insert_knots proc~insert_knots~2->none~get_knot~2 proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~get_knot~2 proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~get_knot~2 proc~remove_knots~2 nurbs_volume%remove_knots proc~remove_knots~2->none~get_knot~2 program~example3_volume example3_volume program~example3_volume->none~get_knot~2 program~example3_volume->proc~elevate_degree~2 program~example3_volume->proc~insert_knots~2 program~example3_volume->proc~remove_knots~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_knoti~2.html"},{"title":"get_multiplicity – ForCAD","text":"private pure function get_multiplicity(this, dir) result(m) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) Calls proc~~get_multiplicity~2~~CallsGraph proc~get_multiplicity~2 nurbs_volume%get_multiplicity interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~get_multiplicity~2~~CalledByGraph proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2 nurbs_volume%cmp_degree proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_elem~2 nurbs_volume%cmp_elem proc~cmp_elem~2->proc~get_multiplicity~2 proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->proc~cmp_elem~2 none~set~2 nurbs_volume%set proc~ansatz~2->none~set~2 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem~2 proc~cmp_volume->proc~ansatz~2 proc~set1~2 nurbs_volume%set1 proc~set1~2->proc~cmp_degree~2 proc~set3~2 nurbs_volume%set3 proc~set3~2->proc~cmp_degree~2 program~example3_volume example3_volume program~example3_volume->proc~cmp_elem~2 program~example3_volume->none~set~2 proc~elevate_degree~2 nurbs_volume%elevate_degree program~example3_volume->proc~elevate_degree~2 proc~insert_knots~2 nurbs_volume%insert_knots program~example3_volume->proc~insert_knots~2 proc~remove_knots~2 nurbs_volume%remove_knots program~example3_volume->proc~remove_knots~2 none~set~2->proc~set1~2 none~set~2->proc~set3~2 program~compute_volume compute_volume program~compute_volume->proc~cmp_volume program~compute_volume->none~set~2 proc~elevate_degree~2->none~set~2 proc~insert_knots~2->none~set~2 proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~set~2 proc~remove_knots~2->none~set~2 proc~set_c~2 nurbs_volume%set_C proc~set_c~2->none~set~2 proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set~2 proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set~2 proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_multiplicity~2.html"},{"title":"get_nc_all – ForCAD","text":"private pure function get_nc_all(this) result(nc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3)","tags":"","loc":"proc/get_nc_all.html"},{"title":"get_nc_dir – ForCAD","text":"private pure function get_nc_dir(this, dir) result(nc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer Calls proc~~get_nc_dir~~CallsGraph proc~get_nc_dir nurbs_volume%get_nc_dir interface~compute_multiplicity compute_multiplicity proc~get_nc_dir->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_nc_dir.html"},{"title":"get_ng – ForCAD","text":"private pure function get_ng(this) result(ng) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3)","tags":"","loc":"proc/get_ng~2.html"},{"title":"is_rational – ForCAD","text":"private pure function is_rational(this) result(r) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value logical Called by proc~~is_rational~2~~CalledByGraph proc~is_rational~2 nurbs_volume%is_rational proc~basis_scalar~2 nurbs_volume%basis_scalar proc~basis_scalar~2->proc~is_rational~2 proc~basis_vector~2 nurbs_volume%basis_vector proc~basis_vector~2->proc~is_rational~2 proc~cmp_xg~2 nurbs_volume%cmp_Xg proc~cmp_xg~2->proc~is_rational~2 proc~create~2 nurbs_volume%create proc~create~2->proc~is_rational~2 proc~derivative2_scalar~2 nurbs_volume%derivative2_scalar proc~derivative2_scalar~2->proc~is_rational~2 proc~derivative2_vector~2 nurbs_volume%derivative2_vector proc~derivative2_vector~2->proc~is_rational~2 proc~derivative_scalar~2 nurbs_volume%derivative_scalar proc~derivative_scalar~2->proc~is_rational~2 proc~derivative_vector~2 nurbs_volume%derivative_vector proc~derivative_vector~2->proc~is_rational~2 none~derivative2~2 nurbs_volume%derivative2 none~derivative2~2->proc~derivative2_scalar~2 none~derivative2~2->proc~derivative2_vector~2 none~derivative~2 nurbs_volume%derivative none~derivative~2->proc~derivative_scalar~2 none~derivative~2->proc~derivative_vector~2 proc~nearest_point2~2 nurbs_volume%nearest_point2 proc~nearest_point2~2->proc~cmp_xg~2 proc~nearest_point2~2->proc~create~2 proc~nearest_point2~2->none~derivative2~2 program~example3_volume example3_volume program~example3_volume->proc~create~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~create~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~create~2 program~nearest_point_3d->proc~nearest_point2~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~create~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~create~2 program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~create~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~create~2 proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->none~derivative~2 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/is_rational~2.html"},{"title":"ansatz – ForCAD","text":"private pure subroutine ansatz(this, ie, ig, Tgc, dTgc_dXg, dV) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dV Calls proc~~ansatz~2~~CallsGraph proc~ansatz~2 nurbs_volume%ansatz interface~gauss_leg gauss_leg proc~ansatz~2->interface~gauss_leg interface~ndgrid ndgrid proc~ansatz~2->interface~ndgrid interface~unique unique proc~ansatz~2->interface~unique none~derivative~2 nurbs_volume%derivative proc~ansatz~2->none~derivative~2 none~set~2 nurbs_volume%set proc~ansatz~2->none~set~2 proc~cmp_elem~2 nurbs_volume%cmp_elem proc~ansatz~2->proc~cmp_elem~2 proc~det det proc~ansatz~2->proc~det proc~inv inv proc~ansatz~2->proc~inv proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar~2 nurbs_volume%derivative_scalar none~derivative~2->proc~derivative_scalar~2 proc~derivative_vector~2 nurbs_volume%derivative_vector none~derivative~2->proc~derivative_vector~2 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 proc~cmp_elem~2->interface~unique interface~elemconn_cn elemConn_Cn proc~cmp_elem~2->interface~elemconn_cn proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_elem~2->proc~get_multiplicity~2 proc~inv->proc~det proc~inv->proc~inv proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v interface~compute_dtgc~2 compute_dTgc proc~derivative_scalar~2->interface~compute_dtgc~2 proc~is_rational~2 nurbs_volume%is_rational proc~derivative_scalar~2->proc~is_rational~2 proc~derivative_vector~2->interface~ndgrid proc~derivative_vector~2->interface~compute_dtgc~2 proc~derivative_vector~2->proc~is_rational~2 gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_2d->gauss_legendre proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->proc~kron interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~ansatz~2~~CalledByGraph proc~ansatz~2 nurbs_volume%ansatz proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/ansatz~2.html"},{"title":"basis_scalar – ForCAD","text":"private pure subroutine basis_scalar(this, Xt, Tgc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~basis_scalar~2~~CallsGraph proc~basis_scalar~2 nurbs_volume%basis_scalar interface~compute_tgc~2 compute_Tgc proc~basis_scalar~2->interface~compute_tgc~2 proc~is_rational~2 nurbs_volume%is_rational proc~basis_scalar~2->proc~is_rational~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_scalar~2.html"},{"title":"basis_vector – ForCAD","text":"private pure subroutine basis_vector(this, res1, res2, res3, Xt1, Xt2, Xt3, Tgc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~basis_vector~2~~CallsGraph proc~basis_vector~2 nurbs_volume%basis_vector interface~compute_tgc~2 compute_Tgc proc~basis_vector~2->interface~compute_tgc~2 interface~ndgrid ndgrid proc~basis_vector~2->interface~ndgrid proc~is_rational~2 nurbs_volume%is_rational proc~basis_vector~2->proc~is_rational~2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_vector~2.html"},{"title":"cmp_degree – ForCAD","text":"private pure subroutine cmp_degree(this, dir) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: dir Calls proc~~cmp_degree~2~~CallsGraph proc~cmp_degree~2 nurbs_volume%cmp_degree proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_degree~2~~CalledByGraph proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2 nurbs_volume%set1 proc~set1~2->proc~cmp_degree~2 proc~set3~2 nurbs_volume%set3 proc~set3~2->proc~cmp_degree~2 none~set~2 nurbs_volume%set none~set~2->proc~set1~2 none~set~2->proc~set3~2 proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->none~set~2 proc~elevate_degree~2 nurbs_volume%elevate_degree proc~elevate_degree~2->none~set~2 proc~insert_knots~2 nurbs_volume%insert_knots proc~insert_knots~2->none~set~2 proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~set~2 proc~remove_knots~2 nurbs_volume%remove_knots proc~remove_knots~2->none~set~2 proc~set_c~2 nurbs_volume%set_C proc~set_c~2->none~set~2 proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set~2 proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set~2 proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set~2 program~compute_volume compute_volume program~compute_volume->none~set~2 proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume program~example3_volume example3_volume program~example3_volume->none~set~2 program~example3_volume->proc~elevate_degree~2 program~example3_volume->proc~insert_knots~2 program~example3_volume->proc~remove_knots~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set~2 proc~cmp_volume->proc~ansatz~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_degree~2.html"},{"title":"cmp_nc – ForCAD","text":"private pure subroutine cmp_nc(this, dir) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: dir Calls proc~~cmp_nc~2~~CallsGraph proc~cmp_nc~2 nurbs_volume%cmp_nc interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_nc~2~~CalledByGraph proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2 nurbs_volume%set1 proc~set1~2->proc~cmp_nc~2 proc~set2~2 nurbs_volume%set2 proc~set2~2->proc~cmp_nc~2 none~set~2 nurbs_volume%set none~set~2->proc~set1~2 none~set~2->proc~set2~2 proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->none~set~2 proc~elevate_degree~2 nurbs_volume%elevate_degree proc~elevate_degree~2->none~set~2 proc~insert_knots~2 nurbs_volume%insert_knots proc~insert_knots~2->none~set~2 proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~set~2 proc~remove_knots~2 nurbs_volume%remove_knots proc~remove_knots~2->none~set~2 proc~set_c~2 nurbs_volume%set_C proc~set_c~2->none~set~2 proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set~2 proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set~2 proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set~2 program~compute_volume compute_volume program~compute_volume->none~set~2 proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume program~example3_volume example3_volume program~example3_volume->none~set~2 program~example3_volume->proc~elevate_degree~2 program~example3_volume->proc~insert_knots~2 program~example3_volume->proc~remove_knots~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set~2 proc~cmp_volume->proc~ansatz~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_nc~2.html"},{"title":"cmp_volume – ForCAD","text":"private pure subroutine cmp_volume(this, volume) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(out) :: volume Calls proc~~cmp_volume~~CallsGraph proc~cmp_volume nurbs_volume%cmp_volume proc~ansatz~2 nurbs_volume%ansatz proc~cmp_volume->proc~ansatz~2 proc~cmp_elem~2 nurbs_volume%cmp_elem proc~cmp_volume->proc~cmp_elem~2 proc~ansatz~2->proc~cmp_elem~2 interface~gauss_leg gauss_leg proc~ansatz~2->interface~gauss_leg interface~ndgrid ndgrid proc~ansatz~2->interface~ndgrid interface~unique unique proc~ansatz~2->interface~unique none~derivative~2 nurbs_volume%derivative proc~ansatz~2->none~derivative~2 none~set~2 nurbs_volume%set proc~ansatz~2->none~set~2 proc~det det proc~ansatz~2->proc~det proc~inv inv proc~ansatz~2->proc~inv interface~elemconn_cn elemConn_Cn proc~cmp_elem~2->interface~elemconn_cn proc~cmp_elem~2->interface~unique proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_elem~2->proc~get_multiplicity~2 proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar~2 nurbs_volume%derivative_scalar none~derivative~2->proc~derivative_scalar~2 proc~derivative_vector~2 nurbs_volume%derivative_vector none~derivative~2->proc~derivative_vector~2 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~inv->proc~det proc~inv->proc~inv proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 interface~compute_dtgc~2 compute_dTgc proc~derivative_scalar~2->interface~compute_dtgc~2 proc~is_rational~2 nurbs_volume%is_rational proc~derivative_scalar~2->proc~is_rational~2 proc~derivative_vector~2->interface~ndgrid proc~derivative_vector~2->interface~compute_dtgc~2 proc~derivative_vector~2->proc~is_rational~2 gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_2d->gauss_legendre proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->proc~kron proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_volume~~CalledByGraph proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_volume.html"},{"title":"create – ForCAD","text":"private pure subroutine create(this, res1, res2, res3, Xt1, Xt2, Xt3, Xt) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(in), optional, contiguous :: Xt (:,:) Calls proc~~create~2~~CallsGraph proc~create~2 nurbs_volume%create interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_volume%is_rational proc~create~2->proc~is_rational~2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~create~2~~CalledByGraph proc~create~2 nurbs_volume%create proc~nearest_point2~2 nurbs_volume%nearest_point2 proc~nearest_point2~2->proc~create~2 program~example3_volume example3_volume program~example3_volume->proc~create~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~create~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~create~2 program~nearest_point_3d->proc~nearest_point2~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~create~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~create~2 program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~create~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~create~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/create~2.html"},{"title":"derivative2_scalar – ForCAD","text":"private pure subroutine derivative2_scalar(this, Xt, d2Tgc, dTgc, Tgc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) Calls proc~~derivative2_scalar~2~~CallsGraph proc~derivative2_scalar~2 nurbs_volume%derivative2_scalar interface~compute_d2tgc~2 compute_d2Tgc proc~derivative2_scalar~2->interface~compute_d2tgc~2 proc~is_rational~2 nurbs_volume%is_rational proc~derivative2_scalar~2->proc~is_rational~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative2_scalar~2~~CalledByGraph proc~derivative2_scalar~2 nurbs_volume%derivative2_scalar none~derivative2~2 nurbs_volume%derivative2 none~derivative2~2->proc~derivative2_scalar~2 proc~nearest_point2~2 nurbs_volume%nearest_point2 proc~nearest_point2~2->none~derivative2~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point2~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative2_scalar~2.html"},{"title":"derivative2_vector – ForCAD","text":"private pure subroutine derivative2_vector(this, res1, res2, res3, Xt1, Xt2, Xt3, d2Tgc, dTgc, Tgc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) Calls proc~~derivative2_vector~2~~CallsGraph proc~derivative2_vector~2 nurbs_volume%derivative2_vector interface~compute_d2tgc~2 compute_d2Tgc proc~derivative2_vector~2->interface~compute_d2tgc~2 interface~ndgrid ndgrid proc~derivative2_vector~2->interface~ndgrid proc~is_rational~2 nurbs_volume%is_rational proc~derivative2_vector~2->proc~is_rational~2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative2_vector~2~~CalledByGraph proc~derivative2_vector~2 nurbs_volume%derivative2_vector none~derivative2~2 nurbs_volume%derivative2 none~derivative2~2->proc~derivative2_vector~2 proc~nearest_point2~2 nurbs_volume%nearest_point2 proc~nearest_point2~2->none~derivative2~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point2~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative2_vector~2.html"},{"title":"derivative_scalar – ForCAD","text":"private pure subroutine derivative_scalar(this, Xt, dTgc, Tgc, elem) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~derivative_scalar~2~~CallsGraph proc~derivative_scalar~2 nurbs_volume%derivative_scalar interface~compute_dtgc~2 compute_dTgc proc~derivative_scalar~2->interface~compute_dtgc~2 proc~is_rational~2 nurbs_volume%is_rational proc~derivative_scalar~2->proc~is_rational~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative_scalar~2~~CalledByGraph proc~derivative_scalar~2 nurbs_volume%derivative_scalar none~derivative~2 nurbs_volume%derivative none~derivative~2->proc~derivative_scalar~2 proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->none~derivative~2 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative_scalar~2.html"},{"title":"derivative_vector – ForCAD","text":"private pure subroutine derivative_vector(this, res1, res2, res3, Xt1, Xt2, Xt3, dTgc, Tgc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) Calls proc~~derivative_vector~2~~CallsGraph proc~derivative_vector~2 nurbs_volume%derivative_vector interface~compute_dtgc~2 compute_dTgc proc~derivative_vector~2->interface~compute_dtgc~2 interface~ndgrid ndgrid proc~derivative_vector~2->interface~ndgrid proc~is_rational~2 nurbs_volume%is_rational proc~derivative_vector~2->proc~is_rational~2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative_vector~2~~CalledByGraph proc~derivative_vector~2 nurbs_volume%derivative_vector none~derivative~2 nurbs_volume%derivative none~derivative~2->proc~derivative_vector~2 proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->none~derivative~2 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative_vector~2.html"},{"title":"elevate_degree – ForCAD","text":"private pure subroutine elevate_degree(this, dir, t) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir integer, intent(in) :: t Calls proc~~elevate_degree~2~~CallsGraph proc~elevate_degree~2 nurbs_volume%elevate_degree none~get_knot~2 nurbs_volume%get_knot proc~elevate_degree~2->none~get_knot~2 none~set~2 nurbs_volume%set proc~elevate_degree~2->none~set~2 proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree~2->proc~elevate_degree_a_5_9 proc~get_knot_all~2 nurbs_volume%get_knot_all none~get_knot~2->proc~get_knot_all~2 proc~get_knoti~2 nurbs_volume%get_knoti none~get_knot~2->proc~get_knoti~2 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 interface~compute_multiplicity compute_multiplicity proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~bincoeff bincoeff proc~elevate_degree_a_5_9->proc~bincoeff proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~factln factln proc~bincoeff->proc~factln proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~elevate_degree~2~~CalledByGraph proc~elevate_degree~2 nurbs_volume%elevate_degree program~example3_volume example3_volume program~example3_volume->proc~elevate_degree~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/elevate_degree~2.html"},{"title":"export_Xc – ForCAD","text":"private impure subroutine export_Xc(this, filename) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this character(len=*), intent(in) :: filename Calls proc~~export_xc~2~~CallsGraph proc~export_xc~2 nurbs_volume%export_Xc proc~cmp_elem_xc_vis~2 nurbs_volume%cmp_elem_Xc_vis proc~export_xc~2->proc~cmp_elem_xc_vis~2 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~export_xc~2~~CalledByGraph proc~export_xc~2 nurbs_volume%export_Xc program~example3_volume example3_volume program~example3_volume->proc~export_xc~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~export_xc~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~export_xc~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~export_xc~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~export_xc~2 program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~export_xc~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~export_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/export_xc~2.html"},{"title":"export_Xg – ForCAD","text":"private impure subroutine export_Xg(this, filename) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this character(len=*), intent(in) :: filename Calls proc~~export_xg~2~~CallsGraph proc~export_xg~2 nurbs_volume%export_Xg proc~cmp_elem_xg_vis~2 nurbs_volume%cmp_elem_Xg_vis proc~export_xg~2->proc~cmp_elem_xg_vis~2 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~export_xg~2~~CalledByGraph proc~export_xg~2 nurbs_volume%export_Xg program~example3_volume example3_volume program~example3_volume->proc~export_xg~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~export_xg~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~export_xg~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~export_xg~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~export_xg~2 program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~export_xg~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~export_xg~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/export_xg~2.html"},{"title":"finalize – ForCAD","text":"private pure subroutine finalize(this) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this Called by proc~~finalize~2~~CalledByGraph proc~finalize~2 nurbs_volume%finalize proc~nearest_point2~2 nurbs_volume%nearest_point2 proc~nearest_point2~2->proc~finalize~2 program~example3_volume example3_volume program~example3_volume->proc~finalize~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~finalize~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~finalize~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~finalize~2 program~nearest_point_3d->proc~nearest_point2~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~finalize~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~finalize~2 program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~finalize~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~finalize~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/finalize~2.html"},{"title":"insert_knots – ForCAD","text":"private pure subroutine insert_knots(this, dir, Xth, r) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) Calls proc~~insert_knots~2~~CallsGraph proc~insert_knots~2 nurbs_volume%insert_knots interface~compute_multiplicity compute_multiplicity proc~insert_knots~2->interface~compute_multiplicity none~get_knot~2 nurbs_volume%get_knot proc~insert_knots~2->none~get_knot~2 none~set~2 nurbs_volume%set proc~insert_knots~2->none~set~2 proc~findspan findspan proc~insert_knots~2->proc~findspan proc~insert_knot_a_5_1 insert_knot_A_5_1 proc~insert_knots~2->proc~insert_knot_a_5_1 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_knot_all~2 nurbs_volume%get_knot_all none~get_knot~2->proc~get_knot_all~2 proc~get_knoti~2 nurbs_volume%get_knoti none~get_knot~2->proc~get_knoti~2 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~insert_knots~2~~CalledByGraph proc~insert_knots~2 nurbs_volume%insert_knots program~example3_volume example3_volume program~example3_volume->proc~insert_knots~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/insert_knots~2.html"},{"title":"modify_Wc – ForCAD","text":"private pure subroutine modify_Wc(this, W, num) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num Calls proc~~modify_wc~2~~CallsGraph proc~modify_wc~2 nurbs_volume%modify_Wc none~get_knot~2 nurbs_volume%get_knot proc~modify_wc~2->none~get_knot~2 none~get_wc~2 nurbs_volume%get_Wc proc~modify_wc~2->none~get_wc~2 none~get_xc~2 nurbs_volume%get_Xc proc~modify_wc~2->none~get_xc~2 none~set~2 nurbs_volume%set proc~modify_wc~2->none~set~2 proc~get_knot_all~2 nurbs_volume%get_knot_all none~get_knot~2->proc~get_knot_all~2 proc~get_knoti~2 nurbs_volume%get_knoti none~get_knot~2->proc~get_knoti~2 proc~get_wc_all~2 nurbs_volume%get_Wc_all none~get_wc~2->proc~get_wc_all~2 proc~get_wci~2 nurbs_volume%get_Wci none~get_wc~2->proc~get_wci~2 proc~get_xc_all~2 nurbs_volume%get_Xc_all none~get_xc~2->proc~get_xc_all~2 proc~get_xcid~2 nurbs_volume%get_Xcid none~get_xc~2->proc~get_xcid~2 proc~get_xci~2 nurbs_volume%get_Xci none~get_xc~2->proc~get_xci~2 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/modify_wc~2.html"},{"title":"modify_Xc – ForCAD","text":"private pure subroutine modify_Xc(this, X, num, dir) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir Calls proc~~modify_xc~2~~CallsGraph proc~modify_xc~2 nurbs_volume%modify_Xc none~get_knot~2 nurbs_volume%get_knot proc~modify_xc~2->none~get_knot~2 none~get_wc~2 nurbs_volume%get_Wc proc~modify_xc~2->none~get_wc~2 none~get_xc~2 nurbs_volume%get_Xc proc~modify_xc~2->none~get_xc~2 none~set~2 nurbs_volume%set proc~modify_xc~2->none~set~2 proc~get_knot_all~2 nurbs_volume%get_knot_all none~get_knot~2->proc~get_knot_all~2 proc~get_knoti~2 nurbs_volume%get_knoti none~get_knot~2->proc~get_knoti~2 proc~get_wc_all~2 nurbs_volume%get_Wc_all none~get_wc~2->proc~get_wc_all~2 proc~get_wci~2 nurbs_volume%get_Wci none~get_wc~2->proc~get_wci~2 proc~get_xc_all~2 nurbs_volume%get_Xc_all none~get_xc~2->proc~get_xc_all~2 proc~get_xcid~2 nurbs_volume%get_Xcid none~get_xc~2->proc~get_xcid~2 proc~get_xci~2 nurbs_volume%get_Xci none~get_xc~2->proc~get_xci~2 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/modify_xc~2.html"},{"title":"nearest_point – ForCAD","text":"private pure subroutine nearest_point(this, point_Xg, nearest_Xg, nearest_Xt, id) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xt (:) integer, intent(out), optional :: id Calls proc~~nearest_point~2~~CallsGraph proc~nearest_point~2 nurbs_volume%nearest_point interface~nearest_point_help_3d nearest_point_help_3d proc~nearest_point~2->interface~nearest_point_help_3d Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~nearest_point~2~~CalledByGraph proc~nearest_point~2 nurbs_volume%nearest_point proc~nearest_point2~2 nurbs_volume%nearest_point2 proc~nearest_point2~2->proc~nearest_point~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point~2 program~nearest_point_3d->proc~nearest_point2~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/nearest_point~2.html"},{"title":"nearest_point2 – ForCAD","text":"private impure subroutine nearest_point2(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt (3) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) Calls proc~~nearest_point2~2~~CallsGraph proc~nearest_point2~2 nurbs_volume%nearest_point2 none~derivative2~2 nurbs_volume%derivative2 proc~nearest_point2~2->none~derivative2~2 proc~cmp_xg~2 nurbs_volume%cmp_Xg proc~nearest_point2~2->proc~cmp_xg~2 proc~create~2 nurbs_volume%create proc~nearest_point2~2->proc~create~2 proc~finalize~2 nurbs_volume%finalize proc~nearest_point2~2->proc~finalize~2 proc~inv inv proc~nearest_point2~2->proc~inv proc~nearest_point~2 nurbs_volume%nearest_point proc~nearest_point2~2->proc~nearest_point~2 proc~derivative2_scalar~2 nurbs_volume%derivative2_scalar none~derivative2~2->proc~derivative2_scalar~2 proc~derivative2_vector~2 nurbs_volume%derivative2_vector none~derivative2~2->proc~derivative2_vector~2 interface~compute_xg~2 compute_Xg proc~cmp_xg~2->interface~compute_xg~2 proc~is_rational~2 nurbs_volume%is_rational proc~cmp_xg~2->proc~is_rational~2 proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~create~2->proc~is_rational~2 proc~inv->proc~inv proc~det det proc~inv->proc~det interface~nearest_point_help_3d nearest_point_help_3d proc~nearest_point~2->interface~nearest_point_help_3d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~derivative2_scalar~2->proc~is_rational~2 interface~compute_d2tgc~2 compute_d2Tgc proc~derivative2_scalar~2->interface~compute_d2tgc~2 proc~derivative2_vector~2->interface~ndgrid proc~derivative2_vector~2->proc~is_rational~2 proc~derivative2_vector~2->interface~compute_d2tgc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~nearest_point2~2~~CalledByGraph proc~nearest_point2~2 nurbs_volume%nearest_point2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point2~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/nearest_point2~2.html"},{"title":"put_to_nurbs – ForCAD","text":"private pure subroutine put_to_nurbs(this, X, elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: X (:,:) integer, intent(in), contiguous :: elemConn (:,:) Calls proc~~put_to_nurbs~~CallsGraph proc~put_to_nurbs nurbs_volume%put_to_nurbs proc~basis_bspline basis_bspline proc~put_to_nurbs->proc~basis_bspline proc~kron kron proc~put_to_nurbs->proc~kron proc~set_elem_xg_vis~2 nurbs_volume%set_elem_Xg_vis proc~put_to_nurbs->proc~set_elem_xg_vis~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~put_to_nurbs~~CalledByGraph proc~put_to_nurbs nurbs_volume%put_to_nurbs program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~put_to_nurbs Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/put_to_nurbs.html"},{"title":"remove_knots – ForCAD","text":"private pure subroutine remove_knots(this, dir, Xth, r) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) Calls proc~~remove_knots~2~~CallsGraph proc~remove_knots~2 nurbs_volume%remove_knots interface~compute_multiplicity compute_multiplicity proc~remove_knots~2->interface~compute_multiplicity none~get_knot~2 nurbs_volume%get_knot proc~remove_knots~2->none~get_knot~2 none~set~2 nurbs_volume%set proc~remove_knots~2->none~set~2 proc~findspan findspan proc~remove_knots~2->proc~findspan proc~remove_knots_a_5_8 remove_knots_A_5_8 proc~remove_knots~2->proc~remove_knots_a_5_8 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_knot_all~2 nurbs_volume%get_knot_all none~get_knot~2->proc~get_knot_all~2 proc~get_knoti~2 nurbs_volume%get_knoti none~get_knot~2->proc~get_knoti~2 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~remove_knots~2~~CalledByGraph proc~remove_knots~2 nurbs_volume%remove_knots program~example3_volume example3_volume program~example3_volume->proc~remove_knots~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/remove_knots~2.html"},{"title":"rotate_Xc – ForCAD","text":"private pure subroutine rotate_Xc(this, alpha, beta, theta) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta Calls proc~~rotate_xc~2~~CallsGraph proc~rotate_xc~2 nurbs_volume%rotate_Xc proc~rotation rotation proc~rotate_xc~2->proc~rotation cosd cosd proc~rotation->cosd sind sind proc~rotation->sind Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~rotate_xc~2~~CalledByGraph proc~rotate_xc~2 nurbs_volume%rotate_Xc program~example3_volume example3_volume program~example3_volume->proc~rotate_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/rotate_xc~2.html"},{"title":"rotate_Xg – ForCAD","text":"private pure subroutine rotate_Xg(this, alpha, beta, theta) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta Calls proc~~rotate_xg~2~~CallsGraph proc~rotate_xg~2 nurbs_volume%rotate_Xg proc~rotation rotation proc~rotate_xg~2->proc~rotation cosd cosd proc~rotation->cosd sind sind proc~rotation->sind Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~rotate_xg~2~~CalledByGraph proc~rotate_xg~2 nurbs_volume%rotate_Xg program~example3_volume example3_volume program~example3_volume->proc~rotate_xg~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/rotate_xg~2.html"},{"title":"set1 – ForCAD","text":"private pure subroutine set1(this, knot1, knot2, knot3, Xc, Wc) Set control points and weights for the NURBS volume object. Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set1~2~~CallsGraph proc~set1~2 nurbs_volume%set1 proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set1~2~~CalledByGraph proc~set1~2 nurbs_volume%set1 none~set~2 nurbs_volume%set none~set~2->proc~set1~2 proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->none~set~2 proc~elevate_degree~2 nurbs_volume%elevate_degree proc~elevate_degree~2->none~set~2 proc~insert_knots~2 nurbs_volume%insert_knots proc~insert_knots~2->none~set~2 proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~set~2 proc~remove_knots~2 nurbs_volume%remove_knots proc~remove_knots~2->none~set~2 proc~set_c~2 nurbs_volume%set_C proc~set_c~2->none~set~2 proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set~2 proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set~2 proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set~2 program~compute_volume compute_volume program~compute_volume->none~set~2 proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume program~example3_volume example3_volume program~example3_volume->none~set~2 program~example3_volume->proc~elevate_degree~2 program~example3_volume->proc~insert_knots~2 program~example3_volume->proc~remove_knots~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set~2 proc~cmp_volume->proc~ansatz~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set1~2.html"},{"title":"set2 – ForCAD","text":"private pure subroutine set2(this, Xth_dir1, Xth_dir2, Xth_dir3, degree, continuity1, continuity2, continuity3, Xc, Wc) Set control points and weights for the NURBS volume object. Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir1 (:) real(kind=rk), intent(in), contiguous :: Xth_dir2 (:) real(kind=rk), intent(in), contiguous :: Xth_dir3 (:) integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: continuity1 (:) integer, intent(in), contiguous :: continuity2 (:) integer, intent(in), contiguous :: continuity3 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set2~2~~CallsGraph proc~set2~2 nurbs_volume%set2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set2~2~~CalledByGraph proc~set2~2 nurbs_volume%set2 none~set~2 nurbs_volume%set none~set~2->proc~set2~2 proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->none~set~2 proc~elevate_degree~2 nurbs_volume%elevate_degree proc~elevate_degree~2->none~set~2 proc~insert_knots~2 nurbs_volume%insert_knots proc~insert_knots~2->none~set~2 proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~set~2 proc~remove_knots~2 nurbs_volume%remove_knots proc~remove_knots~2->none~set~2 proc~set_c~2 nurbs_volume%set_C proc~set_c~2->none~set~2 proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set~2 proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set~2 proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set~2 program~compute_volume compute_volume program~compute_volume->none~set~2 proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume program~example3_volume example3_volume program~example3_volume->none~set~2 program~example3_volume->proc~elevate_degree~2 program~example3_volume->proc~insert_knots~2 program~example3_volume->proc~remove_knots~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set~2 proc~cmp_volume->proc~ansatz~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set2~2.html"},{"title":"set3 – ForCAD","text":"private pure subroutine set3(this, nc, Xc, Wc) Set Bezier or Rational Bezier volume using control points and weights. Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set3~2~~CallsGraph proc~set3~2 nurbs_volume%set3 proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set3~2~~CalledByGraph proc~set3~2 nurbs_volume%set3 none~set~2 nurbs_volume%set none~set~2->proc~set3~2 proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->none~set~2 proc~elevate_degree~2 nurbs_volume%elevate_degree proc~elevate_degree~2->none~set~2 proc~insert_knots~2 nurbs_volume%insert_knots proc~insert_knots~2->none~set~2 proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~set~2 proc~remove_knots~2 nurbs_volume%remove_knots proc~remove_knots~2->none~set~2 proc~set_c~2 nurbs_volume%set_C proc~set_c~2->none~set~2 proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set~2 proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set~2 proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set~2 program~compute_volume compute_volume program~compute_volume->none~set~2 proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume program~example3_volume example3_volume program~example3_volume->none~set~2 program~example3_volume->proc~elevate_degree~2 program~example3_volume->proc~insert_knots~2 program~example3_volume->proc~remove_knots~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set~2 proc~cmp_volume->proc~ansatz~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set3~2.html"},{"title":"set4 – ForCAD","text":"private pure subroutine set4(this, degree, nc, Xc, Wc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Called by proc~~set4~2~~CalledByGraph proc~set4~2 nurbs_volume%set4 none~set~2 nurbs_volume%set none~set~2->proc~set4~2 proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->none~set~2 proc~elevate_degree~2 nurbs_volume%elevate_degree proc~elevate_degree~2->none~set~2 proc~insert_knots~2 nurbs_volume%insert_knots proc~insert_knots~2->none~set~2 proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~set~2 proc~remove_knots~2 nurbs_volume%remove_knots proc~remove_knots~2->none~set~2 proc~set_c~2 nurbs_volume%set_C proc~set_c~2->none~set~2 proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set~2 proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set~2 proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set~2 program~compute_volume compute_volume program~compute_volume->none~set~2 proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume program~example3_volume example3_volume program~example3_volume->none~set~2 program~example3_volume->proc~elevate_degree~2 program~example3_volume->proc~insert_knots~2 program~example3_volume->proc~remove_knots~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set~2 proc~cmp_volume->proc~ansatz~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set4~2.html"},{"title":"set_C – ForCAD","text":"private pure subroutine set_C(this, center, radius1, radius2, length) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length Calls proc~~set_c~2~~CallsGraph proc~set_c~2 nurbs_volume%set_C none~set~2 nurbs_volume%set proc~set_c~2->none~set~2 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_c~2~~CalledByGraph proc~set_c~2 nurbs_volume%set_C program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_c~2.html"},{"title":"set_elem – ForCAD","text":"private pure subroutine set_elem(this, elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) Called by proc~~set_elem~2~~CalledByGraph proc~set_elem~2 nurbs_volume%set_elem program~example3_volume example3_volume program~example3_volume->proc~set_elem~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_elem~2.html"},{"title":"set_elem_Xc_vis – ForCAD","text":"private pure subroutine set_elem_Xc_vis(this, elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:)","tags":"","loc":"proc/set_elem_xc_vis~2.html"},{"title":"set_elem_Xg_vis – ForCAD","text":"private pure subroutine set_elem_Xg_vis(this, elemConn) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) Called by proc~~set_elem_xg_vis~2~~CalledByGraph proc~set_elem_xg_vis~2 nurbs_volume%set_elem_Xg_vis proc~put_to_nurbs nurbs_volume%put_to_nurbs proc~put_to_nurbs->proc~set_elem_xg_vis~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~put_to_nurbs Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_elem_xg_vis~2.html"},{"title":"set_half_ring – ForCAD","text":"private pure subroutine set_half_ring(this, center, radius1, radius2, length) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length Calls proc~~set_half_ring~~CallsGraph proc~set_half_ring nurbs_volume%set_half_ring none~set~2 nurbs_volume%set proc~set_half_ring->none~set~2 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_half_ring~~CalledByGraph proc~set_half_ring nurbs_volume%set_half_ring program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_half_ring.html"},{"title":"set_hexahedron – ForCAD","text":"private pure subroutine set_hexahedron(this, L, nc, Wc) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: L (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set_hexahedron~~CallsGraph proc~set_hexahedron nurbs_volume%set_hexahedron none~set~2 nurbs_volume%set proc~set_hexahedron->none~set~2 proc~hexahedron_xc hexahedron_Xc proc~set_hexahedron->proc~hexahedron_xc proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_hexahedron~~CalledByGraph proc~set_hexahedron nurbs_volume%set_hexahedron program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_hexahedron.html"},{"title":"set_ring – ForCAD","text":"private pure subroutine set_ring(this, center, radius1, radius2, length) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length Calls proc~~set_ring~~CallsGraph proc~set_ring nurbs_volume%set_ring none~set~2 nurbs_volume%set proc~set_ring->none~set~2 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_ring~~CalledByGraph proc~set_ring nurbs_volume%set_ring program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_ring.html"},{"title":"show – ForCAD","text":"private impure subroutine show(this, vtkfile_Xc, vtkfile_Xg) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg Called by proc~~show~2~~CalledByGraph proc~show~2 nurbs_volume%show program~example3_volume example3_volume program~example3_volume->proc~show~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~show~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~show~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~show~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~show~2 program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~show~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~show~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/show~2.html"},{"title":"translate_Xc – ForCAD","text":"private pure subroutine translate_Xc(this, vec) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) Called by proc~~translate_xc~2~~CalledByGraph proc~translate_xc~2 nurbs_volume%translate_Xc program~example3_volume example3_volume program~example3_volume->proc~translate_xc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/translate_xc~2.html"},{"title":"translate_Xg – ForCAD","text":"private pure subroutine translate_Xg(this, vec) Type Bound nurbs_volume Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) Called by proc~~translate_xg~2~~CalledByGraph proc~translate_xg~2 nurbs_volume%translate_Xg program~example3_volume example3_volume program~example3_volume->proc~translate_xg~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/translate_xg~2.html"},{"title":"compute_Tgc – ForCAD","text":"private interface compute_Tgc Called by interface~~compute_tgc~2~~CalledByGraph interface~compute_tgc~2 compute_Tgc proc~basis_scalar~2 nurbs_volume%basis_scalar proc~basis_scalar~2->interface~compute_tgc~2 proc~basis_vector~2 nurbs_volume%basis_vector proc~basis_vector~2->interface~compute_tgc~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Functions private pure function compute_Tgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Tgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:)","tags":"","loc":"interface/compute_tgc~2.html"},{"title":"compute_Xg – ForCAD","text":"private interface compute_Xg Called by interface~~compute_xg~2~~CalledByGraph interface~compute_xg~2 compute_Xg proc~cmp_xg~2 nurbs_volume%cmp_Xg proc~cmp_xg~2->interface~compute_xg~2 proc~create~2 nurbs_volume%create proc~create~2->interface~compute_xg~2 proc~nearest_point2~2 nurbs_volume%nearest_point2 proc~nearest_point2~2->proc~cmp_xg~2 proc~nearest_point2~2->proc~create~2 program~example3_volume example3_volume program~example3_volume->proc~create~2 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~create~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~create~2 program~nearest_point_3d->proc~nearest_point2~2 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~create~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~create~2 program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~create~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~create~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Functions private pure function compute_Xg_bspline_3d(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_bspline_3d_1point(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Xg_nurbs_3d(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_nurbs_3d_1point(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"interface/compute_xg~2.html"},{"title":"compute_d2Tgc – ForCAD","text":"private interface compute_d2Tgc Called by interface~~compute_d2tgc~2~~CalledByGraph interface~compute_d2tgc~2 compute_d2Tgc proc~derivative2_scalar~2 nurbs_volume%derivative2_scalar proc~derivative2_scalar~2->interface~compute_d2tgc~2 proc~derivative2_vector~2 nurbs_volume%derivative2_vector proc~derivative2_vector~2->interface~compute_d2tgc~2 none~derivative2~2 nurbs_volume%derivative2 none~derivative2~2->proc~derivative2_scalar~2 none~derivative2~2->proc~derivative2_vector~2 proc~nearest_point2~2 nurbs_volume%nearest_point2 proc~nearest_point2~2->none~derivative2~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point2~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Subroutines private pure subroutine compute_d2Tgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_d2Tgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:)","tags":"","loc":"interface/compute_d2tgc~2.html"},{"title":"compute_dTgc – ForCAD","text":"private interface compute_dTgc Called by interface~~compute_dtgc~2~~CalledByGraph interface~compute_dtgc~2 compute_dTgc proc~derivative_scalar~2 nurbs_volume%derivative_scalar proc~derivative_scalar~2->interface~compute_dtgc~2 proc~derivative_vector~2 nurbs_volume%derivative_vector proc~derivative_vector~2->interface~compute_dtgc~2 none~derivative~2 nurbs_volume%derivative none~derivative~2->proc~derivative_scalar~2 none~derivative~2->proc~derivative_vector~2 proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->none~derivative~2 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Subroutines private pure subroutine compute_dTgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_dTgc, f_Tgc, f_elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in), optional :: f_elem (:) private pure subroutine compute_dTgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_dTgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, f_elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in), optional :: f_elem (:) private pure subroutine compute_dTgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:)","tags":"","loc":"interface/compute_dtgc~2.html"},{"title":"nearest_point_help_3d – ForCAD","text":"interface Called by interface~~nearest_point_help_3d~~CalledByGraph interface~nearest_point_help_3d nearest_point_help_3d proc~nearest_point~2 nurbs_volume%nearest_point proc~nearest_point~2->interface~nearest_point_help_3d proc~nearest_point2~2 nurbs_volume%nearest_point2 proc~nearest_point2~2->proc~nearest_point~2 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point~2 program~nearest_point_3d->proc~nearest_point2~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. private pure function nearest_point_help_3d(f_ng, f_Xg, f_point_Xg) result(f_distances) Arguments Type Intent Optional Attributes Name integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Xg (:,:) real(kind=rk), intent(in), contiguous :: f_point_Xg (:) Return Value real(kind=rk),allocatable,(:)","tags":"","loc":"interface/nearest_point_help_3d.html"},{"title":"basis_bernstein – ForCAD","text":"public pure function basis_bernstein(Xt, nc) result(B) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt integer, intent(in) :: nc Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/basis_bernstein.html"},{"title":"basis_bspline – ForCAD","text":"public pure function basis_bspline(Xt, knot, nc, degree) result(B) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: nc integer, intent(in) :: degree Return Value real(kind=rk), allocatable, (:) Called by proc~~basis_bspline~~CalledByGraph proc~basis_bspline basis_bspline proc~compute_tgc_bspline_1d_scalar compute_Tgc_bspline_1d_scalar proc~compute_tgc_bspline_1d_scalar->proc~basis_bspline proc~compute_tgc_bspline_1d_vector compute_Tgc_bspline_1d_vector proc~compute_tgc_bspline_1d_vector->proc~basis_bspline proc~compute_tgc_bspline_2d_scalar compute_Tgc_bspline_2d_scalar proc~compute_tgc_bspline_2d_scalar->proc~basis_bspline proc~compute_tgc_bspline_2d_vector compute_Tgc_bspline_2d_vector proc~compute_tgc_bspline_2d_vector->proc~basis_bspline proc~compute_tgc_bspline_3d_scalar compute_Tgc_bspline_3d_scalar proc~compute_tgc_bspline_3d_scalar->proc~basis_bspline proc~compute_tgc_bspline_3d_vector compute_Tgc_bspline_3d_vector proc~compute_tgc_bspline_3d_vector->proc~basis_bspline proc~compute_tgc_nurbs_1d_scalar compute_Tgc_nurbs_1d_scalar proc~compute_tgc_nurbs_1d_scalar->proc~basis_bspline proc~compute_tgc_nurbs_1d_vector compute_Tgc_nurbs_1d_vector proc~compute_tgc_nurbs_1d_vector->proc~basis_bspline proc~compute_tgc_nurbs_2d_scalar compute_Tgc_nurbs_2d_scalar proc~compute_tgc_nurbs_2d_scalar->proc~basis_bspline proc~compute_tgc_nurbs_2d_vector compute_Tgc_nurbs_2d_vector proc~compute_tgc_nurbs_2d_vector->proc~basis_bspline proc~compute_tgc_nurbs_3d_scalar compute_Tgc_nurbs_3d_scalar proc~compute_tgc_nurbs_3d_scalar->proc~basis_bspline proc~compute_tgc_nurbs_3d_vector compute_Tgc_nurbs_3d_vector proc~compute_tgc_nurbs_3d_vector->proc~basis_bspline proc~compute_xg_bspline_1d compute_Xg_bspline_1d proc~compute_xg_bspline_1d->proc~basis_bspline proc~compute_xg_bspline_1d_1point compute_Xg_bspline_1d_1point proc~compute_xg_bspline_1d_1point->proc~basis_bspline proc~compute_xg_bspline_2d compute_Xg_bspline_2d proc~compute_xg_bspline_2d->proc~basis_bspline proc~compute_xg_bspline_2d_1point compute_Xg_bspline_2d_1point proc~compute_xg_bspline_2d_1point->proc~basis_bspline proc~compute_xg_bspline_3d compute_Xg_bspline_3d proc~compute_xg_bspline_3d->proc~basis_bspline proc~compute_xg_bspline_3d_1point compute_Xg_bspline_3d_1point proc~compute_xg_bspline_3d_1point->proc~basis_bspline proc~compute_xg_nurbs_1d compute_Xg_nurbs_1d proc~compute_xg_nurbs_1d->proc~basis_bspline proc~compute_xg_nurbs_1d_1point compute_Xg_nurbs_1d_1point proc~compute_xg_nurbs_1d_1point->proc~basis_bspline proc~compute_xg_nurbs_2d compute_Xg_nurbs_2d proc~compute_xg_nurbs_2d->proc~basis_bspline proc~compute_xg_nurbs_2d_1point compute_Xg_nurbs_2d_1point proc~compute_xg_nurbs_2d_1point->proc~basis_bspline proc~compute_xg_nurbs_3d compute_Xg_nurbs_3d proc~compute_xg_nurbs_3d->proc~basis_bspline proc~compute_xg_nurbs_3d_1point compute_Xg_nurbs_3d_1point proc~compute_xg_nurbs_3d_1point->proc~basis_bspline proc~put_to_nurbs nurbs_volume%put_to_nurbs proc~put_to_nurbs->proc~basis_bspline program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~put_to_nurbs Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_bspline.html"},{"title":"compute_knot_vector – ForCAD","text":"public pure function compute_knot_vector(Xth_dir, degree, continuity) result(knot) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xth_dir (:) integer, intent(in) :: degree integer, intent(in), contiguous :: continuity (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~compute_knot_vector~~CallsGraph proc~compute_knot_vector compute_knot_vector proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~compute_knot_vector~~CalledByGraph proc~compute_knot_vector compute_knot_vector proc~set2 nurbs_curve%set2 proc~set2->proc~compute_knot_vector proc~set2~2 nurbs_volume%set2 proc~set2~2->proc~compute_knot_vector proc~set2~3 nurbs_surface%set2 proc~set2~3->proc~compute_knot_vector none~set nurbs_curve%set none~set->proc~set2 none~set~2 nurbs_volume%set none~set~2->proc~set2~2 none~set~3 nurbs_surface%set none~set~3->proc~set2~3 proc~ansatz nurbs_curve%ansatz proc~ansatz->none~set proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->none~set~2 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree nurbs_curve%elevate_degree proc~elevate_degree->none~set proc~elevate_degree~2 nurbs_volume%elevate_degree proc~elevate_degree~2->none~set~2 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots nurbs_curve%insert_knots proc~insert_knots->none~set proc~insert_knots~2 nurbs_volume%insert_knots proc~insert_knots~2->none~set~2 proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~set proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~set proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~set~2 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots nurbs_curve%remove_knots proc~remove_knots->none~set proc~remove_knots~2 nurbs_volume%remove_knots proc~remove_knots~2->none~set~2 proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->none~set~3 proc~set_c nurbs_curve%set_C proc~set_c->none~set proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set proc~set_c~2 nurbs_volume%set_C proc~set_c~2->none~set~2 proc~set_c~3 nurbs_surface%set_C proc~set_c~3->none~set~3 proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set~2 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~3 proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set~2 proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set~2 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~3 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~3 program~compute_area compute_area program~compute_area->none~set~3 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->none~set proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->none~set~2 proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume program~example1_curve example1_curve program~example1_curve->none~set program~example1_curve->proc~elevate_degree program~example1_curve->proc~insert_knots program~example1_curve->proc~remove_knots program~example3_surface example3_surface program~example3_surface->none~set~3 program~example3_surface->proc~elevate_degree~3 program~example3_surface->proc~insert_knots~3 program~example3_surface->proc~remove_knots~3 program~example3_volume example3_volume program~example3_volume->none~set~2 program~example3_volume->proc~elevate_degree~2 program~example3_volume->proc~insert_knots~2 program~example3_volume->proc~remove_knots~2 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~3 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set~2 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~3 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set~2 proc~cmp_area->proc~ansatz~3 proc~cmp_length->proc~ansatz proc~cmp_volume->proc~ansatz~2 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~3 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c~2 program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_knot_vector.html"},{"title":"det – ForCAD","text":"public pure function det(A) result(detA) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: A (:,:) Return Value real(kind=rk) Called by proc~~det~~CalledByGraph proc~det det proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->proc~det proc~inv inv proc~ansatz~2->proc~inv proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->proc~det proc~ansatz~3->proc~inv proc~inv->proc~det proc~inv->proc~inv proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 proc~nearest_point2~2 nurbs_volume%nearest_point2 proc~nearest_point2~2->proc~inv proc~nearest_point2~3 nurbs_surface%nearest_point2 proc~nearest_point2~3->proc~inv program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_volume compute_volume program~compute_volume->proc~cmp_volume program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point2~3 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point2~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/det.html"},{"title":"findspan – ForCAD","text":"public pure function findspan(n, degree, Xth, knot) result(s) Arguments Type Intent Optional Attributes Name integer, intent(in) :: n integer, intent(in) :: degree real(kind=rk), intent(in) :: Xth real(kind=rk), intent(in), contiguous :: knot (:) Return Value integer Called by proc~~findspan~~CalledByGraph proc~findspan findspan proc~insert_knots nurbs_curve%insert_knots proc~insert_knots->proc~findspan proc~insert_knots~2 nurbs_volume%insert_knots proc~insert_knots~2->proc~findspan proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->proc~findspan proc~remove_knots nurbs_curve%remove_knots proc~remove_knots->proc~findspan proc~remove_knots~2 nurbs_volume%remove_knots proc~remove_knots~2->proc~findspan proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->proc~findspan program~example1_curve example1_curve program~example1_curve->proc~insert_knots program~example1_curve->proc~remove_knots program~example3_surface example3_surface program~example3_surface->proc~insert_knots~3 program~example3_surface->proc~remove_knots~3 program~example3_volume example3_volume program~example3_volume->proc~insert_knots~2 program~example3_volume->proc~remove_knots~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/findspan.html"},{"title":"hexahedron_Xc – ForCAD","text":"public pure function hexahedron_Xc(L, nc) result(Xc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: L (3) integer, intent(in) :: nc (3) Return Value real(kind=rk), allocatable, (:,:) Called by proc~~hexahedron_xc~~CalledByGraph proc~hexahedron_xc hexahedron_Xc proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->proc~hexahedron_xc program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~hexahedron_xc program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/hexahedron_xc.html"},{"title":"inv – ForCAD","text":"public pure recursive function inv(A) result(A_inv) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: A (:,:) Return Value real(kind=rk), allocatable, (:,:) Calls proc~~inv~~CallsGraph proc~inv inv proc~inv->proc~inv proc~det det proc~inv->proc~det Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~inv~~CalledByGraph proc~inv inv proc~inv->proc~inv proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->proc~inv proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->proc~inv proc~nearest_point2~2 nurbs_volume%nearest_point2 proc~nearest_point2~2->proc~inv proc~nearest_point2~3 nurbs_surface%nearest_point2 proc~nearest_point2~3->proc~inv proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point2~3 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~nearest_point2~2 program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/inv.html"},{"title":"kron – ForCAD","text":"public pure function kron(u, v) result(w) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: u (:) real(kind=rk), intent(in), contiguous :: v (:) Return Value real(kind=rk), (size(u)*size(v)) Called by proc~~kron~~CalledByGraph proc~kron kron proc~compute_d2tgc_bspline_2d_scalar compute_d2Tgc_bspline_2d_scalar proc~compute_d2tgc_bspline_2d_scalar->proc~kron proc~compute_d2tgc_bspline_2d_vector compute_d2Tgc_bspline_2d_vector proc~compute_d2tgc_bspline_2d_vector->proc~kron proc~compute_d2tgc_bspline_3d_scalar compute_d2Tgc_bspline_3d_scalar proc~compute_d2tgc_bspline_3d_scalar->proc~kron proc~compute_d2tgc_bspline_3d_vector compute_d2Tgc_bspline_3d_vector proc~compute_d2tgc_bspline_3d_vector->proc~kron proc~compute_d2tgc_nurbs_2d_scalar compute_d2Tgc_nurbs_2d_scalar proc~compute_d2tgc_nurbs_2d_scalar->proc~kron proc~compute_d2tgc_nurbs_2d_vector compute_d2Tgc_nurbs_2d_vector proc~compute_d2tgc_nurbs_2d_vector->proc~kron proc~compute_d2tgc_nurbs_3d_scalar compute_d2Tgc_nurbs_3d_scalar proc~compute_d2tgc_nurbs_3d_scalar->proc~kron proc~compute_d2tgc_nurbs_3d_vector compute_d2Tgc_nurbs_3d_vector proc~compute_d2tgc_nurbs_3d_vector->proc~kron proc~compute_dtgc_bspline_2d_scalar compute_dTgc_bspline_2d_scalar proc~compute_dtgc_bspline_2d_scalar->proc~kron proc~compute_dtgc_bspline_2d_vector compute_dTgc_bspline_2d_vector proc~compute_dtgc_bspline_2d_vector->proc~kron proc~compute_dtgc_bspline_3d_scalar compute_dTgc_bspline_3d_scalar proc~compute_dtgc_bspline_3d_scalar->proc~kron proc~compute_dtgc_bspline_3d_vector compute_dTgc_bspline_3d_vector proc~compute_dtgc_bspline_3d_vector->proc~kron proc~compute_dtgc_nurbs_2d_scalar compute_dTgc_nurbs_2d_scalar proc~compute_dtgc_nurbs_2d_scalar->proc~kron proc~compute_dtgc_nurbs_2d_vector compute_dTgc_nurbs_2d_vector proc~compute_dtgc_nurbs_2d_vector->proc~kron proc~compute_dtgc_nurbs_3d_scalar compute_dTgc_nurbs_3d_scalar proc~compute_dtgc_nurbs_3d_scalar->proc~kron proc~compute_dtgc_nurbs_3d_vector compute_dTgc_nurbs_3d_vector proc~compute_dtgc_nurbs_3d_vector->proc~kron proc~compute_tgc_bspline_2d_scalar compute_Tgc_bspline_2d_scalar proc~compute_tgc_bspline_2d_scalar->proc~kron proc~compute_tgc_bspline_2d_vector compute_Tgc_bspline_2d_vector proc~compute_tgc_bspline_2d_vector->proc~kron proc~compute_tgc_bspline_3d_scalar compute_Tgc_bspline_3d_scalar proc~compute_tgc_bspline_3d_scalar->proc~kron proc~compute_tgc_bspline_3d_vector compute_Tgc_bspline_3d_vector proc~compute_tgc_bspline_3d_vector->proc~kron proc~compute_tgc_nurbs_2d_scalar compute_Tgc_nurbs_2d_scalar proc~compute_tgc_nurbs_2d_scalar->proc~kron proc~compute_tgc_nurbs_2d_vector compute_Tgc_nurbs_2d_vector proc~compute_tgc_nurbs_2d_vector->proc~kron proc~compute_tgc_nurbs_3d_scalar compute_Tgc_nurbs_3d_scalar proc~compute_tgc_nurbs_3d_scalar->proc~kron proc~compute_tgc_nurbs_3d_vector compute_Tgc_nurbs_3d_vector proc~compute_tgc_nurbs_3d_vector->proc~kron proc~compute_xg_bspline_2d compute_Xg_bspline_2d proc~compute_xg_bspline_2d->proc~kron proc~compute_xg_bspline_2d_1point compute_Xg_bspline_2d_1point proc~compute_xg_bspline_2d_1point->proc~kron proc~compute_xg_bspline_3d compute_Xg_bspline_3d proc~compute_xg_bspline_3d->proc~kron proc~compute_xg_bspline_3d_1point compute_Xg_bspline_3d_1point proc~compute_xg_bspline_3d_1point->proc~kron proc~compute_xg_nurbs_2d compute_Xg_nurbs_2d proc~compute_xg_nurbs_2d->proc~kron proc~compute_xg_nurbs_2d_1point compute_Xg_nurbs_2d_1point proc~compute_xg_nurbs_2d_1point->proc~kron proc~compute_xg_nurbs_3d compute_Xg_nurbs_3d proc~compute_xg_nurbs_3d->proc~kron proc~compute_xg_nurbs_3d_1point compute_Xg_nurbs_3d_1point proc~compute_xg_nurbs_3d_1point->proc~kron proc~gauss_legendre_2d gauss_legendre_2D proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d gauss_legendre_3D proc~gauss_legendre_3d->proc~kron proc~put_to_nurbs nurbs_volume%put_to_nurbs proc~put_to_nurbs->proc~kron interface~gauss_leg gauss_leg interface~gauss_leg->proc~gauss_legendre_2d interface~gauss_leg->proc~gauss_legendre_3d program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~put_to_nurbs proc~ansatz nurbs_curve%ansatz proc~ansatz->interface~gauss_leg proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->interface~gauss_leg proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->interface~gauss_leg proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/kron.html"},{"title":"rotation – ForCAD","text":"public pure function rotation(alpha, beta, theta) result(R) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta Return Value real(kind=rk), dimension(3,3) Calls proc~~rotation~~CallsGraph proc~rotation rotation cosd cosd proc~rotation->cosd sind sind proc~rotation->sind Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~rotation~~CalledByGraph proc~rotation rotation proc~rotate_xc nurbs_curve%rotate_Xc proc~rotate_xc->proc~rotation proc~rotate_xc~2 nurbs_volume%rotate_Xc proc~rotate_xc~2->proc~rotation proc~rotate_xc~3 nurbs_surface%rotate_Xc proc~rotate_xc~3->proc~rotation proc~rotate_xg nurbs_curve%rotate_Xg proc~rotate_xg->proc~rotation proc~rotate_xg~2 nurbs_volume%rotate_Xg proc~rotate_xg~2->proc~rotation proc~rotate_xg~3 nurbs_surface%rotate_Xg proc~rotate_xg~3->proc~rotation program~example1_curve example1_curve program~example1_curve->proc~rotate_xc program~example1_curve->proc~rotate_xg program~example3_surface example3_surface program~example3_surface->proc~rotate_xc~3 program~example3_surface->proc~rotate_xg~3 program~example3_volume example3_volume program~example3_volume->proc~rotate_xc~2 program~example3_volume->proc~rotate_xg~2 program~example_ppm2 example_ppm2 program~example_ppm2->proc~rotate_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/rotation.html"},{"title":"tetragon_Xc – ForCAD","text":"public pure function tetragon_Xc(L, nc) result(Xc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: L (2) integer, intent(in) :: nc (2) Return Value real(kind=rk), allocatable, (:,:) Called by proc~~tetragon_xc~~CalledByGraph proc~tetragon_xc tetragon_Xc proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->proc~tetragon_xc program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/tetragon_xc.html"},{"title":"bincoeff – ForCAD","text":"private pure function bincoeff(n, k) result(b) Arguments Type Intent Optional Attributes Name integer, intent(in) :: n integer, intent(in) :: k Return Value real(kind=rk) Calls proc~~bincoeff~~CallsGraph proc~bincoeff bincoeff proc~factln factln proc~bincoeff->proc~factln Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~bincoeff~~CalledByGraph proc~bincoeff bincoeff proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree_a_5_9->proc~bincoeff proc~elevate_degree nurbs_curve%elevate_degree proc~elevate_degree->proc~elevate_degree_a_5_9 proc~elevate_degree~2 nurbs_volume%elevate_degree proc~elevate_degree~2->proc~elevate_degree_a_5_9 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->proc~elevate_degree_a_5_9 program~example1_curve example1_curve program~example1_curve->proc~elevate_degree program~example3_surface example3_surface program~example3_surface->proc~elevate_degree~3 program~example3_volume example3_volume program~example3_volume->proc~elevate_degree~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/bincoeff.html"},{"title":"cmp_elemConn_C0_L – ForCAD","text":"private pure function cmp_elemConn_C0_L(nnode, p) result(elemConn) Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode integer, intent(in) :: p Return Value integer, allocatable, (:,:) Called by proc~~cmp_elemconn_c0_l~~CalledByGraph proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0 elemConn_C0 interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elem_xc_vis nurbs_curve%cmp_elem_Xc_vis proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xc_vis~2 nurbs_volume%cmp_elem_Xc_vis proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xc_vis~3 nurbs_surface%cmp_elem_Xc_vis proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis nurbs_curve%cmp_elem_Xg_vis proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis~2 nurbs_volume%cmp_elem_Xg_vis proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~3 nurbs_surface%cmp_elem_Xg_vis proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~export_xc nurbs_curve%export_Xc proc~export_xc->proc~cmp_elem_xc_vis proc~export_xc~2 nurbs_volume%export_Xc proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~export_xc~3 nurbs_surface%export_Xc proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~export_xg nurbs_curve%export_Xg proc~export_xg->proc~cmp_elem_xg_vis proc~export_xg~2 nurbs_volume%export_Xg proc~export_xg~2->proc~cmp_elem_xg_vis~2 proc~export_xg~3 nurbs_surface%export_Xg proc~export_xg~3->proc~cmp_elem_xg_vis~3 program~example1_curve example1_curve program~example1_curve->proc~export_xc program~example1_curve->proc~export_xg program~example3_surface example3_surface program~example3_surface->proc~export_xc~3 program~example3_surface->proc~export_xg~3 program~example3_volume example3_volume program~example3_volume->proc~export_xc~2 program~example3_volume->proc~export_xg~2 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~export_xc program~example_nurbs_curve->proc~export_xg program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~export_xc~3 program~example_nurbs_surface->proc~export_xg~3 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~export_xc~2 program~example_nurbs_volume->proc~export_xg~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~export_xc~2 program~example_put_to_nurbs->proc~export_xg~2 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~export_xc program~shape_c_1d->proc~export_xg program~shape_c_2d shape_C_2d program~shape_c_2d->proc~export_xc~3 program~shape_c_2d->proc~export_xg~3 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~export_xc~2 program~shape_c_3d->proc~export_xg~2 program~shape_circle shape_circle program~shape_circle->proc~export_xc program~shape_circle->proc~export_xg program~shape_half_circle shape_half_circle program~shape_half_circle->proc~export_xc program~shape_half_circle->proc~export_xg program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~export_xc~3 program~shape_half_ring_2d->proc~export_xg~3 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~export_xc~2 program~shape_half_ring_3d->proc~export_xg~2 program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~export_xc~2 program~shape_hexahedron->proc~export_xg~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~export_xc~3 program~shape_ring_2d->proc~export_xg~3 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~export_xc~2 program~shape_ring_3d->proc~export_xg~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~export_xc~3 program~shape_tetragon->proc~export_xg~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elemconn_c0_l.html"},{"title":"cmp_elemConn_C0_S – ForCAD","text":"private pure function cmp_elemConn_C0_S(nnode1, nnode2, p1, p2) result(elemConn) Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: p1 integer, intent(in) :: p2 Return Value integer, allocatable, (:,:) Called by proc~~cmp_elemconn_c0_s~~CalledByGraph proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0 elemConn_C0 interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elem_xc_vis nurbs_curve%cmp_elem_Xc_vis proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xc_vis~2 nurbs_volume%cmp_elem_Xc_vis proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xc_vis~3 nurbs_surface%cmp_elem_Xc_vis proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis nurbs_curve%cmp_elem_Xg_vis proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis~2 nurbs_volume%cmp_elem_Xg_vis proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~3 nurbs_surface%cmp_elem_Xg_vis proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~export_xc nurbs_curve%export_Xc proc~export_xc->proc~cmp_elem_xc_vis proc~export_xc~2 nurbs_volume%export_Xc proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~export_xc~3 nurbs_surface%export_Xc proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~export_xg nurbs_curve%export_Xg proc~export_xg->proc~cmp_elem_xg_vis proc~export_xg~2 nurbs_volume%export_Xg proc~export_xg~2->proc~cmp_elem_xg_vis~2 proc~export_xg~3 nurbs_surface%export_Xg proc~export_xg~3->proc~cmp_elem_xg_vis~3 program~example1_curve example1_curve program~example1_curve->proc~export_xc program~example1_curve->proc~export_xg program~example3_surface example3_surface program~example3_surface->proc~export_xc~3 program~example3_surface->proc~export_xg~3 program~example3_volume example3_volume program~example3_volume->proc~export_xc~2 program~example3_volume->proc~export_xg~2 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~export_xc program~example_nurbs_curve->proc~export_xg program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~export_xc~3 program~example_nurbs_surface->proc~export_xg~3 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~export_xc~2 program~example_nurbs_volume->proc~export_xg~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~export_xc~2 program~example_put_to_nurbs->proc~export_xg~2 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~export_xc program~shape_c_1d->proc~export_xg program~shape_c_2d shape_C_2d program~shape_c_2d->proc~export_xc~3 program~shape_c_2d->proc~export_xg~3 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~export_xc~2 program~shape_c_3d->proc~export_xg~2 program~shape_circle shape_circle program~shape_circle->proc~export_xc program~shape_circle->proc~export_xg program~shape_half_circle shape_half_circle program~shape_half_circle->proc~export_xc program~shape_half_circle->proc~export_xg program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~export_xc~3 program~shape_half_ring_2d->proc~export_xg~3 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~export_xc~2 program~shape_half_ring_3d->proc~export_xg~2 program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~export_xc~2 program~shape_hexahedron->proc~export_xg~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~export_xc~3 program~shape_ring_2d->proc~export_xg~3 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~export_xc~2 program~shape_ring_3d->proc~export_xg~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~export_xc~3 program~shape_tetragon->proc~export_xg~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elemconn_c0_s.html"},{"title":"cmp_elemConn_C0_V – ForCAD","text":"private pure function cmp_elemConn_C0_V(nnode1, nnode2, nnode3, p1, p2, p3) result(elemConn) Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: nnode3 integer, intent(in) :: p1 integer, intent(in) :: p2 integer, intent(in) :: p3 Return Value integer, allocatable, (:,:) Called by proc~~cmp_elemconn_c0_v~~CalledByGraph proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0 elemConn_C0 interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_elem_xc_vis nurbs_curve%cmp_elem_Xc_vis proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xc_vis~2 nurbs_volume%cmp_elem_Xc_vis proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xc_vis~3 nurbs_surface%cmp_elem_Xc_vis proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis nurbs_curve%cmp_elem_Xg_vis proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis~2 nurbs_volume%cmp_elem_Xg_vis proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~3 nurbs_surface%cmp_elem_Xg_vis proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~export_xc nurbs_curve%export_Xc proc~export_xc->proc~cmp_elem_xc_vis proc~export_xc~2 nurbs_volume%export_Xc proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~export_xc~3 nurbs_surface%export_Xc proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~export_xg nurbs_curve%export_Xg proc~export_xg->proc~cmp_elem_xg_vis proc~export_xg~2 nurbs_volume%export_Xg proc~export_xg~2->proc~cmp_elem_xg_vis~2 proc~export_xg~3 nurbs_surface%export_Xg proc~export_xg~3->proc~cmp_elem_xg_vis~3 program~example1_curve example1_curve program~example1_curve->proc~export_xc program~example1_curve->proc~export_xg program~example3_surface example3_surface program~example3_surface->proc~export_xc~3 program~example3_surface->proc~export_xg~3 program~example3_volume example3_volume program~example3_volume->proc~export_xc~2 program~example3_volume->proc~export_xg~2 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~export_xc program~example_nurbs_curve->proc~export_xg program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~export_xc~3 program~example_nurbs_surface->proc~export_xg~3 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~export_xc~2 program~example_nurbs_volume->proc~export_xg~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~export_xc~2 program~example_put_to_nurbs->proc~export_xg~2 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~export_xc program~shape_c_1d->proc~export_xg program~shape_c_2d shape_C_2d program~shape_c_2d->proc~export_xc~3 program~shape_c_2d->proc~export_xg~3 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~export_xc~2 program~shape_c_3d->proc~export_xg~2 program~shape_circle shape_circle program~shape_circle->proc~export_xc program~shape_circle->proc~export_xg program~shape_half_circle shape_half_circle program~shape_half_circle->proc~export_xc program~shape_half_circle->proc~export_xg program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~export_xc~3 program~shape_half_ring_2d->proc~export_xg~3 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~export_xc~2 program~shape_half_ring_3d->proc~export_xg~2 program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~export_xc~2 program~shape_hexahedron->proc~export_xg~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~export_xc~3 program~shape_ring_2d->proc~export_xg~3 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~export_xc~2 program~shape_ring_3d->proc~export_xg~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~export_xc~3 program~shape_tetragon->proc~export_xg~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elemconn_c0_v.html"},{"title":"compute_multiplicity1 – ForCAD","text":"private pure function compute_multiplicity1(knot) result(multiplicity) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: knot (:) Return Value integer, allocatable, (:) Called by proc~~compute_multiplicity1~~CalledByGraph proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity compute_multiplicity interface~compute_multiplicity->proc~compute_multiplicity1 proc~cmp_nc nurbs_curve%cmp_nc proc~cmp_nc->interface~compute_multiplicity proc~cmp_nc~2 nurbs_volume%cmp_nc proc~cmp_nc~2->interface~compute_multiplicity proc~cmp_nc~3 nurbs_surface%cmp_nc proc~cmp_nc~3->interface~compute_multiplicity proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~get_continuity nurbs_curve%get_continuity proc~get_continuity->interface~compute_multiplicity proc~get_continuity~2 nurbs_volume%get_continuity proc~get_continuity~2->interface~compute_multiplicity proc~get_continuity~3 nurbs_surface%get_continuity proc~get_continuity~3->interface~compute_multiplicity proc~get_multiplicity nurbs_curve%get_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~get_nc_dir nurbs_volume%get_nc_dir proc~get_nc_dir->interface~compute_multiplicity proc~get_nc_dir~2 nurbs_surface%get_nc_dir proc~get_nc_dir~2->interface~compute_multiplicity proc~insert_knots nurbs_curve%insert_knots proc~insert_knots->interface~compute_multiplicity none~set nurbs_curve%set proc~insert_knots->none~set proc~insert_knots~2 nurbs_volume%insert_knots proc~insert_knots~2->interface~compute_multiplicity none~set~2 nurbs_volume%set proc~insert_knots~2->none~set~2 proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->interface~compute_multiplicity none~set~3 nurbs_surface%set proc~insert_knots~3->none~set~3 proc~remove_knots nurbs_curve%remove_knots proc~remove_knots->interface~compute_multiplicity proc~remove_knots->none~set proc~remove_knots~2 nurbs_volume%remove_knots proc~remove_knots~2->interface~compute_multiplicity proc~remove_knots~2->none~set~2 proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->interface~compute_multiplicity proc~remove_knots~3->none~set~3 proc~cmp_degree nurbs_curve%cmp_degree proc~cmp_degree->proc~get_multiplicity proc~cmp_degree~2 nurbs_volume%cmp_degree proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~cmp_degree~3->proc~get_multiplicity~3 proc~cmp_elem nurbs_curve%cmp_elem proc~cmp_elem->proc~get_multiplicity proc~cmp_elem~2 nurbs_volume%cmp_elem proc~cmp_elem~2->proc~get_multiplicity~2 proc~cmp_elem~3 nurbs_surface%cmp_elem proc~cmp_elem~3->proc~get_multiplicity~3 proc~elevate_degree nurbs_curve%elevate_degree proc~elevate_degree->proc~elevate_degree_a_5_9 proc~elevate_degree->none~set proc~elevate_degree~2 nurbs_volume%elevate_degree proc~elevate_degree~2->proc~elevate_degree_a_5_9 proc~elevate_degree~2->none~set~2 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->proc~elevate_degree_a_5_9 proc~elevate_degree~3->none~set~3 proc~set1~2 nurbs_volume%set1 proc~set1~2->proc~cmp_nc~2 proc~set1~2->proc~cmp_degree~2 proc~set1~3 nurbs_surface%set1 proc~set1~3->proc~cmp_nc~3 proc~set1~3->proc~cmp_degree~3 proc~set2~2 nurbs_volume%set2 proc~set2~2->proc~cmp_nc~2 proc~set2~3 nurbs_surface%set2 proc~set2~3->proc~cmp_nc~3 program~example1_curve example1_curve program~example1_curve->proc~insert_knots program~example1_curve->proc~remove_knots program~example1_curve->proc~elevate_degree program~example1_curve->none~set program~example3_surface example3_surface program~example3_surface->proc~insert_knots~3 program~example3_surface->proc~remove_knots~3 program~example3_surface->proc~elevate_degree~3 program~example3_surface->none~set~3 program~example3_volume example3_volume program~example3_volume->proc~insert_knots~2 program~example3_volume->proc~remove_knots~2 program~example3_volume->proc~cmp_elem~2 program~example3_volume->proc~elevate_degree~2 program~example3_volume->none~set~2 none~set~2->proc~set1~2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 none~set~3->proc~set1~3 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~ansatz nurbs_curve%ansatz proc~ansatz->proc~cmp_elem proc~ansatz->none~set proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~2->none~set~2 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->proc~cmp_elem~3 proc~ansatz~3->none~set~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~3 proc~cmp_area->proc~ansatz~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem proc~cmp_length->proc~ansatz proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem~2 proc~cmp_volume->proc~ansatz~2 proc~set1 nurbs_curve%set1 proc~set1->proc~cmp_degree proc~set1a nurbs_curve%set1a proc~set1a->proc~cmp_degree proc~set3 nurbs_curve%set3 proc~set3->proc~cmp_degree proc~set3~2->proc~cmp_degree~2 proc~set3~3->proc~cmp_degree~3 none~set->proc~set1 none~set->proc~set1a none~set->proc~set3 proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~set~2 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~set~3 proc~set_c~2 nurbs_volume%set_C proc~set_c~2->none~set~2 proc~set_c~3 nurbs_surface%set_C proc~set_c~3->none~set~3 proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set~2 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~3 proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set~2 proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set~2 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~3 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~3 program~compute_area compute_area program~compute_area->none~set~3 program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_length->none~set program~compute_volume compute_volume program~compute_volume->none~set~2 program~compute_volume->proc~cmp_volume program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~3 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~3 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set~2 proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~set proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~set proc~set_c nurbs_curve%set_C proc~set_c->none~set proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 program~example_ppm3->proc~set_tetragon program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~3 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_multiplicity1.html"},{"title":"compute_multiplicity2 – ForCAD","text":"private pure function compute_multiplicity2(knot, Xth) result(multiplicity) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in) :: Xth Return Value integer Called by proc~~compute_multiplicity2~~CalledByGraph proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity compute_multiplicity interface~compute_multiplicity->proc~compute_multiplicity2 proc~cmp_nc nurbs_curve%cmp_nc proc~cmp_nc->interface~compute_multiplicity proc~cmp_nc~2 nurbs_volume%cmp_nc proc~cmp_nc~2->interface~compute_multiplicity proc~cmp_nc~3 nurbs_surface%cmp_nc proc~cmp_nc~3->interface~compute_multiplicity proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~get_continuity nurbs_curve%get_continuity proc~get_continuity->interface~compute_multiplicity proc~get_continuity~2 nurbs_volume%get_continuity proc~get_continuity~2->interface~compute_multiplicity proc~get_continuity~3 nurbs_surface%get_continuity proc~get_continuity~3->interface~compute_multiplicity proc~get_multiplicity nurbs_curve%get_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~get_nc_dir nurbs_volume%get_nc_dir proc~get_nc_dir->interface~compute_multiplicity proc~get_nc_dir~2 nurbs_surface%get_nc_dir proc~get_nc_dir~2->interface~compute_multiplicity proc~insert_knots nurbs_curve%insert_knots proc~insert_knots->interface~compute_multiplicity none~set nurbs_curve%set proc~insert_knots->none~set proc~insert_knots~2 nurbs_volume%insert_knots proc~insert_knots~2->interface~compute_multiplicity none~set~2 nurbs_volume%set proc~insert_knots~2->none~set~2 proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->interface~compute_multiplicity none~set~3 nurbs_surface%set proc~insert_knots~3->none~set~3 proc~remove_knots nurbs_curve%remove_knots proc~remove_knots->interface~compute_multiplicity proc~remove_knots->none~set proc~remove_knots~2 nurbs_volume%remove_knots proc~remove_knots~2->interface~compute_multiplicity proc~remove_knots~2->none~set~2 proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->interface~compute_multiplicity proc~remove_knots~3->none~set~3 proc~cmp_degree nurbs_curve%cmp_degree proc~cmp_degree->proc~get_multiplicity proc~cmp_degree~2 nurbs_volume%cmp_degree proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~cmp_degree~3->proc~get_multiplicity~3 proc~cmp_elem nurbs_curve%cmp_elem proc~cmp_elem->proc~get_multiplicity proc~cmp_elem~2 nurbs_volume%cmp_elem proc~cmp_elem~2->proc~get_multiplicity~2 proc~cmp_elem~3 nurbs_surface%cmp_elem proc~cmp_elem~3->proc~get_multiplicity~3 proc~elevate_degree nurbs_curve%elevate_degree proc~elevate_degree->proc~elevate_degree_a_5_9 proc~elevate_degree->none~set proc~elevate_degree~2 nurbs_volume%elevate_degree proc~elevate_degree~2->proc~elevate_degree_a_5_9 proc~elevate_degree~2->none~set~2 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->proc~elevate_degree_a_5_9 proc~elevate_degree~3->none~set~3 proc~set1~2 nurbs_volume%set1 proc~set1~2->proc~cmp_nc~2 proc~set1~2->proc~cmp_degree~2 proc~set1~3 nurbs_surface%set1 proc~set1~3->proc~cmp_nc~3 proc~set1~3->proc~cmp_degree~3 proc~set2~2 nurbs_volume%set2 proc~set2~2->proc~cmp_nc~2 proc~set2~3 nurbs_surface%set2 proc~set2~3->proc~cmp_nc~3 program~example1_curve example1_curve program~example1_curve->proc~insert_knots program~example1_curve->proc~remove_knots program~example1_curve->proc~elevate_degree program~example1_curve->none~set program~example3_surface example3_surface program~example3_surface->proc~insert_knots~3 program~example3_surface->proc~remove_knots~3 program~example3_surface->proc~elevate_degree~3 program~example3_surface->none~set~3 program~example3_volume example3_volume program~example3_volume->proc~insert_knots~2 program~example3_volume->proc~remove_knots~2 program~example3_volume->proc~cmp_elem~2 program~example3_volume->proc~elevate_degree~2 program~example3_volume->none~set~2 none~set~2->proc~set1~2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 none~set~3->proc~set1~3 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~ansatz nurbs_curve%ansatz proc~ansatz->proc~cmp_elem proc~ansatz->none~set proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~2->none~set~2 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->proc~cmp_elem~3 proc~ansatz~3->none~set~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~3 proc~cmp_area->proc~ansatz~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem proc~cmp_length->proc~ansatz proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem~2 proc~cmp_volume->proc~ansatz~2 proc~set1 nurbs_curve%set1 proc~set1->proc~cmp_degree proc~set1a nurbs_curve%set1a proc~set1a->proc~cmp_degree proc~set3 nurbs_curve%set3 proc~set3->proc~cmp_degree proc~set3~2->proc~cmp_degree~2 proc~set3~3->proc~cmp_degree~3 none~set->proc~set1 none~set->proc~set1a none~set->proc~set3 proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~set~2 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~set~3 proc~set_c~2 nurbs_volume%set_C proc~set_c~2->none~set~2 proc~set_c~3 nurbs_surface%set_C proc~set_c~3->none~set~3 proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set~2 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~3 proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set~2 proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set~2 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~3 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~3 program~compute_area compute_area program~compute_area->none~set~3 program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_length->none~set program~compute_volume compute_volume program~compute_volume->none~set~2 program~compute_volume->proc~cmp_volume program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~3 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~3 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set~2 proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~set proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~set proc~set_c nurbs_curve%set_C proc~set_c->none~set proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 program~example_ppm3->proc~set_tetragon program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~3 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/compute_multiplicity2.html"},{"title":"dyad_t1_t1 – ForCAD","text":"private pure function dyad_t1_t1(a, b) result(c) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: a (:) real(kind=rk), intent(in), contiguous :: b (:) Return Value real(kind=rk), allocatable, (:,:) Called by proc~~dyad_t1_t1~~CalledByGraph proc~dyad_t1_t1 dyad_t1_t1 interface~dyad dyad interface~dyad->proc~dyad_t1_t1 proc~ansatz nurbs_curve%ansatz proc~ansatz->interface~dyad proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/dyad_t1_t1.html"},{"title":"factln – ForCAD","text":"private pure function factln(n) result(f) Arguments Type Intent Optional Attributes Name integer, intent(in) :: n Return Value real(kind=rk) Called by proc~~factln~~CalledByGraph proc~factln factln proc~bincoeff bincoeff proc~bincoeff->proc~factln proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree_a_5_9->proc~bincoeff proc~elevate_degree nurbs_curve%elevate_degree proc~elevate_degree->proc~elevate_degree_a_5_9 proc~elevate_degree~2 nurbs_volume%elevate_degree proc~elevate_degree~2->proc~elevate_degree_a_5_9 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->proc~elevate_degree_a_5_9 program~example1_curve example1_curve program~example1_curve->proc~elevate_degree program~example3_surface example3_surface program~example3_surface->proc~elevate_degree~3 program~example3_volume example3_volume program~example3_volume->proc~elevate_degree~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/factln.html"},{"title":"isinf – ForCAD","text":"private pure elemental function isinf(x) result(output) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: x Return Value logical","tags":"","loc":"proc/isinf.html"},{"title":"isnan – ForCAD","text":"private pure elemental function isnan(x) result(output) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: x Return Value logical","tags":"","loc":"proc/isnan.html"},{"title":"repelem – ForCAD","text":"private pure function repelem(a, b) result(c) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: a (:) integer, intent(in), contiguous :: b (:) Return Value real(kind=rk), (sum(b)) Called by proc~~repelem~~CalledByGraph proc~repelem repelem proc~compute_knot_vector compute_knot_vector proc~compute_knot_vector->proc~repelem proc~set2 nurbs_curve%set2 proc~set2->proc~compute_knot_vector proc~set2~2 nurbs_volume%set2 proc~set2~2->proc~compute_knot_vector proc~set2~3 nurbs_surface%set2 proc~set2~3->proc~compute_knot_vector none~set nurbs_curve%set none~set->proc~set2 none~set~2 nurbs_volume%set none~set~2->proc~set2~2 none~set~3 nurbs_surface%set none~set~3->proc~set2~3 proc~ansatz nurbs_curve%ansatz proc~ansatz->none~set proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->none~set~2 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree nurbs_curve%elevate_degree proc~elevate_degree->none~set proc~elevate_degree~2 nurbs_volume%elevate_degree proc~elevate_degree~2->none~set~2 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots nurbs_curve%insert_knots proc~insert_knots->none~set proc~insert_knots~2 nurbs_volume%insert_knots proc~insert_knots~2->none~set~2 proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~set proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~set proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~set~2 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots nurbs_curve%remove_knots proc~remove_knots->none~set proc~remove_knots~2 nurbs_volume%remove_knots proc~remove_knots~2->none~set~2 proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->none~set~3 proc~set_c nurbs_curve%set_C proc~set_c->none~set proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set proc~set_c~2 nurbs_volume%set_C proc~set_c~2->none~set~2 proc~set_c~3 nurbs_surface%set_C proc~set_c~3->none~set~3 proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set~2 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~3 proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set~2 proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set~2 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~3 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~3 program~compute_area compute_area program~compute_area->none~set~3 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->none~set proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->none~set~2 proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume program~example1_curve example1_curve program~example1_curve->none~set program~example1_curve->proc~elevate_degree program~example1_curve->proc~insert_knots program~example1_curve->proc~remove_knots program~example3_surface example3_surface program~example3_surface->none~set~3 program~example3_surface->proc~elevate_degree~3 program~example3_surface->proc~insert_knots~3 program~example3_surface->proc~remove_knots~3 program~example3_volume example3_volume program~example3_volume->none~set~2 program~example3_volume->proc~elevate_degree~2 program~example3_volume->proc~insert_knots~2 program~example3_volume->proc~remove_knots~2 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~3 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set~2 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~3 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set~2 proc~cmp_area->proc~ansatz~3 proc~cmp_length->proc~ansatz proc~cmp_volume->proc~ansatz~2 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~3 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c~2 program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/repelem.html"},{"title":"unique_integer – ForCAD","text":"private pure function unique_integer(vec) result(output) Arguments Type Intent Optional Attributes Name integer, intent(in), dimension(:), contiguous :: vec Return Value integer, dimension(:), allocatable Called by proc~~unique_integer~~CalledByGraph proc~unique_integer unique_integer interface~unique unique interface~unique->proc~unique_integer proc~ansatz nurbs_curve%ansatz proc~ansatz->interface~unique proc~cmp_elem nurbs_curve%cmp_elem proc~ansatz->proc~cmp_elem proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->interface~unique proc~cmp_elem~2 nurbs_volume%cmp_elem proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->interface~unique proc~cmp_elem~3 nurbs_surface%cmp_elem proc~ansatz~3->proc~cmp_elem~3 proc~cmp_elem->interface~unique proc~cmp_elem~2->interface~unique proc~cmp_elem~3->interface~unique proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 proc~cmp_area->proc~cmp_elem~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz proc~cmp_length->proc~cmp_elem proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 proc~cmp_volume->proc~cmp_elem~2 program~example3_volume example3_volume program~example3_volume->proc~cmp_elem~2 program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/unique_integer.html"},{"title":"unique_real – ForCAD","text":"private pure function unique_real(vec) result(output) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), dimension(:), contiguous :: vec Return Value real(kind=rk), dimension(:), allocatable Called by proc~~unique_real~~CalledByGraph proc~unique_real unique_real interface~unique unique interface~unique->proc~unique_real proc~ansatz nurbs_curve%ansatz proc~ansatz->interface~unique proc~cmp_elem nurbs_curve%cmp_elem proc~ansatz->proc~cmp_elem proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->interface~unique proc~cmp_elem~2 nurbs_volume%cmp_elem proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->interface~unique proc~cmp_elem~3 nurbs_surface%cmp_elem proc~ansatz~3->proc~cmp_elem~3 proc~cmp_elem->interface~unique proc~cmp_elem~2->interface~unique proc~cmp_elem~3->interface~unique proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 proc~cmp_area->proc~cmp_elem~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz proc~cmp_length->proc~cmp_elem proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 proc~cmp_volume->proc~cmp_elem~2 program~example3_volume example3_volume program~example3_volume->proc~cmp_elem~2 program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/unique_real.html"},{"title":"basis_bspline_2der – ForCAD","text":"public pure subroutine basis_bspline_2der(Xt, knot, nc, degree, d2B, dB, B) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: nc integer, intent(in) :: degree real(kind=rk), intent(out), allocatable :: d2B (:) real(kind=rk), intent(out), optional, allocatable :: dB (:) real(kind=rk), intent(out), optional, allocatable :: B (:) Called by proc~~basis_bspline_2der~~CalledByGraph proc~basis_bspline_2der basis_bspline_2der proc~compute_d2tgc_bspline_1d_scalar compute_d2Tgc_bspline_1d_scalar proc~compute_d2tgc_bspline_1d_scalar->proc~basis_bspline_2der proc~compute_d2tgc_bspline_1d_vector compute_d2Tgc_bspline_1d_vector proc~compute_d2tgc_bspline_1d_vector->proc~basis_bspline_2der proc~compute_d2tgc_bspline_2d_scalar compute_d2Tgc_bspline_2d_scalar proc~compute_d2tgc_bspline_2d_scalar->proc~basis_bspline_2der proc~compute_d2tgc_bspline_2d_vector compute_d2Tgc_bspline_2d_vector proc~compute_d2tgc_bspline_2d_vector->proc~basis_bspline_2der proc~compute_d2tgc_bspline_3d_scalar compute_d2Tgc_bspline_3d_scalar proc~compute_d2tgc_bspline_3d_scalar->proc~basis_bspline_2der proc~compute_d2tgc_bspline_3d_vector compute_d2Tgc_bspline_3d_vector proc~compute_d2tgc_bspline_3d_vector->proc~basis_bspline_2der proc~compute_d2tgc_nurbs_1d_scalar compute_d2Tgc_nurbs_1d_scalar proc~compute_d2tgc_nurbs_1d_scalar->proc~basis_bspline_2der proc~compute_d2tgc_nurbs_1d_vector compute_d2Tgc_nurbs_1d_vector proc~compute_d2tgc_nurbs_1d_vector->proc~basis_bspline_2der proc~compute_d2tgc_nurbs_2d_scalar compute_d2Tgc_nurbs_2d_scalar proc~compute_d2tgc_nurbs_2d_scalar->proc~basis_bspline_2der proc~compute_d2tgc_nurbs_2d_vector compute_d2Tgc_nurbs_2d_vector proc~compute_d2tgc_nurbs_2d_vector->proc~basis_bspline_2der proc~compute_d2tgc_nurbs_3d_scalar compute_d2Tgc_nurbs_3d_scalar proc~compute_d2tgc_nurbs_3d_scalar->proc~basis_bspline_2der proc~compute_d2tgc_nurbs_3d_vector compute_d2Tgc_nurbs_3d_vector proc~compute_d2tgc_nurbs_3d_vector->proc~basis_bspline_2der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_bspline_2der.html"},{"title":"basis_bspline_der – ForCAD","text":"public pure subroutine basis_bspline_der(Xt, knot, nc, degree, dB, B) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: nc integer, intent(in) :: degree real(kind=rk), intent(out), allocatable :: dB (:) real(kind=rk), intent(out), optional, allocatable :: B (:) Called by proc~~basis_bspline_der~~CalledByGraph proc~basis_bspline_der basis_bspline_der proc~compute_dtgc_bspline_1d_scalar compute_dTgc_bspline_1d_scalar proc~compute_dtgc_bspline_1d_scalar->proc~basis_bspline_der proc~compute_dtgc_bspline_1d_vector compute_dTgc_bspline_1d_vector proc~compute_dtgc_bspline_1d_vector->proc~basis_bspline_der proc~compute_dtgc_bspline_2d_scalar compute_dTgc_bspline_2d_scalar proc~compute_dtgc_bspline_2d_scalar->proc~basis_bspline_der proc~compute_dtgc_bspline_2d_vector compute_dTgc_bspline_2d_vector proc~compute_dtgc_bspline_2d_vector->proc~basis_bspline_der proc~compute_dtgc_bspline_3d_scalar compute_dTgc_bspline_3d_scalar proc~compute_dtgc_bspline_3d_scalar->proc~basis_bspline_der proc~compute_dtgc_bspline_3d_vector compute_dTgc_bspline_3d_vector proc~compute_dtgc_bspline_3d_vector->proc~basis_bspline_der proc~compute_dtgc_nurbs_1d_scalar compute_dTgc_nurbs_1d_scalar proc~compute_dtgc_nurbs_1d_scalar->proc~basis_bspline_der proc~compute_dtgc_nurbs_1d_vector compute_dTgc_nurbs_1d_vector proc~compute_dtgc_nurbs_1d_vector->proc~basis_bspline_der proc~compute_dtgc_nurbs_2d_scalar compute_dTgc_nurbs_2d_scalar proc~compute_dtgc_nurbs_2d_scalar->proc~basis_bspline_der proc~compute_dtgc_nurbs_2d_vector compute_dTgc_nurbs_2d_vector proc~compute_dtgc_nurbs_2d_vector->proc~basis_bspline_der proc~compute_dtgc_nurbs_3d_scalar compute_dTgc_nurbs_3d_scalar proc~compute_dtgc_nurbs_3d_scalar->proc~basis_bspline_der proc~compute_dtgc_nurbs_3d_vector compute_dTgc_nurbs_3d_vector proc~compute_dtgc_nurbs_3d_vector->proc~basis_bspline_der Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_bspline_der.html"},{"title":"elevate_degree_A_5_9 – ForCAD","text":"public pure subroutine elevate_degree_A_5_9(t, knot, degree, Xcw, nc_new, knot_new, Xcw_new) Arguments Type Intent Optional Attributes Name integer, intent(in) :: t real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree real(kind=rk), intent(in), contiguous :: Xcw (:,:) integer, intent(out) :: nc_new real(kind=rk), intent(out), allocatable :: knot_new (:) real(kind=rk), intent(out), allocatable :: Xcw_new (:,:) Calls proc~~elevate_degree_a_5_9~~CallsGraph proc~elevate_degree_a_5_9 elevate_degree_A_5_9 interface~compute_multiplicity compute_multiplicity proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~bincoeff bincoeff proc~elevate_degree_a_5_9->proc~bincoeff proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~factln factln proc~bincoeff->proc~factln Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~elevate_degree_a_5_9~~CalledByGraph proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree nurbs_curve%elevate_degree proc~elevate_degree->proc~elevate_degree_a_5_9 proc~elevate_degree~2 nurbs_volume%elevate_degree proc~elevate_degree~2->proc~elevate_degree_a_5_9 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->proc~elevate_degree_a_5_9 program~example1_curve example1_curve program~example1_curve->proc~elevate_degree program~example3_surface example3_surface program~example3_surface->proc~elevate_degree~3 program~example3_volume example3_volume program~example3_volume->proc~elevate_degree~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/elevate_degree_a_5_9.html"},{"title":"insert_knot_A_5_1 – ForCAD","text":"public pure subroutine insert_knot_A_5_1(p, UP, Pw, u, k, s, r, nq, UQ, Qw) Arguments Type Intent Optional Attributes Name integer, intent(in) :: p real(kind=rk), intent(in), contiguous :: UP (0:) real(kind=rk), intent(in), contiguous :: Pw (0:,:) real(kind=rk), intent(in) :: u integer, intent(in) :: k integer, intent(in) :: s integer, intent(in) :: r integer, intent(out) :: nq real(kind=rk), intent(out), allocatable :: UQ (:) real(kind=rk), intent(out), allocatable :: Qw (:,:) Called by proc~~insert_knot_a_5_1~~CalledByGraph proc~insert_knot_a_5_1 insert_knot_A_5_1 proc~insert_knots nurbs_curve%insert_knots proc~insert_knots->proc~insert_knot_a_5_1 proc~insert_knots~2 nurbs_volume%insert_knots proc~insert_knots~2->proc~insert_knot_a_5_1 proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->proc~insert_knot_a_5_1 program~example1_curve example1_curve program~example1_curve->proc~insert_knots program~example3_surface example3_surface program~example3_surface->proc~insert_knots~3 program~example3_volume example3_volume program~example3_volume->proc~insert_knots~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/insert_knot_a_5_1.html"},{"title":"remove_knots_A_5_8 – ForCAD","text":"public pure subroutine remove_knots_A_5_8(p, knot, Pw, u, r, s, num, t, knot_new, Pw_new) Arguments Type Intent Optional Attributes Name integer, intent(in) :: p real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Pw (:,:) real(kind=rk), intent(in) :: u integer, intent(in) :: r integer, intent(in) :: s integer, intent(in) :: num integer, intent(out) :: t real(kind=rk), intent(out), allocatable :: knot_new (:) real(kind=rk), intent(out), allocatable :: Pw_new (:,:) Called by proc~~remove_knots_a_5_8~~CalledByGraph proc~remove_knots_a_5_8 remove_knots_A_5_8 proc~remove_knots nurbs_curve%remove_knots proc~remove_knots->proc~remove_knots_a_5_8 proc~remove_knots~2 nurbs_volume%remove_knots proc~remove_knots~2->proc~remove_knots_a_5_8 proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->proc~remove_knots_a_5_8 program~example1_curve example1_curve program~example1_curve->proc~remove_knots program~example3_surface example3_surface program~example3_surface->proc~remove_knots~3 program~example3_volume example3_volume program~example3_volume->proc~remove_knots~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/remove_knots_a_5_8.html"},{"title":"cmp_elemConn_Cn_L – ForCAD","text":"private pure subroutine cmp_elemConn_Cn_L(nnode, p, Xth, vecKnot_mul, elemConn) Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode integer, intent(in) :: p real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: vecKnot_mul (:) integer, intent(out), allocatable :: elemConn (:,:) Called by proc~~cmp_elemconn_cn_l~~CalledByGraph proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn elemConn_Cn interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elem nurbs_curve%cmp_elem proc~cmp_elem->interface~elemconn_cn proc~cmp_elem~2 nurbs_volume%cmp_elem proc~cmp_elem~2->interface~elemconn_cn proc~cmp_elem~3 nurbs_surface%cmp_elem proc~cmp_elem~3->interface~elemconn_cn proc~ansatz nurbs_curve%ansatz proc~ansatz->proc~cmp_elem proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->proc~cmp_elem~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~3 proc~cmp_area->proc~ansatz~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem proc~cmp_length->proc~ansatz proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem~2 proc~cmp_volume->proc~ansatz~2 program~example3_volume example3_volume program~example3_volume->proc~cmp_elem~2 program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elemconn_cn_l.html"},{"title":"cmp_elemConn_Cn_S – ForCAD","text":"private pure subroutine cmp_elemConn_Cn_S(nnode1, nnode2, p1, p2, Xth1, Xth2, vecKnot_mul1, vecKnot_mul2, elemConn) Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: p1 integer, intent(in) :: p2 real(kind=rk), intent(in), contiguous :: Xth1 (:) real(kind=rk), intent(in), contiguous :: Xth2 (:) integer, intent(in), contiguous :: vecKnot_mul1 (:) integer, intent(in), contiguous :: vecKnot_mul2 (:) integer, intent(out), allocatable :: elemConn (:,:) Called by proc~~cmp_elemconn_cn_s~~CalledByGraph proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn elemConn_Cn interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elem nurbs_curve%cmp_elem proc~cmp_elem->interface~elemconn_cn proc~cmp_elem~2 nurbs_volume%cmp_elem proc~cmp_elem~2->interface~elemconn_cn proc~cmp_elem~3 nurbs_surface%cmp_elem proc~cmp_elem~3->interface~elemconn_cn proc~ansatz nurbs_curve%ansatz proc~ansatz->proc~cmp_elem proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->proc~cmp_elem~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~3 proc~cmp_area->proc~ansatz~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem proc~cmp_length->proc~ansatz proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem~2 proc~cmp_volume->proc~ansatz~2 program~example3_volume example3_volume program~example3_volume->proc~cmp_elem~2 program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elemconn_cn_s.html"},{"title":"cmp_elemConn_Cn_V – ForCAD","text":"private pure subroutine cmp_elemConn_Cn_V(nnode1, nnode2, nnode3, p1, p2, p3, Xth1, Xth2, Xth3, vecKnot_mul1, vecKnot_mul2, vecKnot_mul3, elemConn) Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: nnode3 integer, intent(in) :: p1 integer, intent(in) :: p2 integer, intent(in) :: p3 real(kind=rk), intent(in), contiguous :: Xth1 (:) real(kind=rk), intent(in), contiguous :: Xth2 (:) real(kind=rk), intent(in), contiguous :: Xth3 (:) integer, intent(in), contiguous :: vecKnot_mul1 (:) integer, intent(in), contiguous :: vecKnot_mul2 (:) integer, intent(in), contiguous :: vecKnot_mul3 (:) integer, intent(out), allocatable :: elemConn (:,:) Called by proc~~cmp_elemconn_cn_v~~CalledByGraph proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn elemConn_Cn interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~cmp_elem nurbs_curve%cmp_elem proc~cmp_elem->interface~elemconn_cn proc~cmp_elem~2 nurbs_volume%cmp_elem proc~cmp_elem~2->interface~elemconn_cn proc~cmp_elem~3 nurbs_surface%cmp_elem proc~cmp_elem~3->interface~elemconn_cn proc~ansatz nurbs_curve%ansatz proc~ansatz->proc~cmp_elem proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->proc~cmp_elem~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~3 proc~cmp_area->proc~ansatz~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem proc~cmp_length->proc~ansatz proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem~2 proc~cmp_volume->proc~ansatz~2 program~example3_volume example3_volume program~example3_volume->proc~cmp_elem~2 program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elemconn_cn_v.html"},{"title":"gauss_legendre_1D – ForCAD","text":"private pure subroutine gauss_legendre_1D(interval, degree, Xksi, Wksi) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval (2) integer, intent(in) :: degree real(kind=rk), intent(out), allocatable :: Xksi (:) real(kind=rk), intent(out), allocatable :: Wksi (:) Calls proc~~gauss_legendre_1d~~CallsGraph proc~gauss_legendre_1d gauss_legendre_1D gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~gauss_legendre_1d~~CalledByGraph proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg gauss_leg interface~gauss_leg->proc~gauss_legendre_1d proc~ansatz nurbs_curve%ansatz proc~ansatz->interface~gauss_leg proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->interface~gauss_leg proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->interface~gauss_leg proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/gauss_legendre_1d.html"},{"title":"gauss_legendre_2D – ForCAD","text":"private pure subroutine gauss_legendre_2D(interval1, interval2, degree, Xksi, Wksi) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval1 (2) real(kind=rk), intent(in) :: interval2 (2) integer, intent(in) :: degree (2) real(kind=rk), intent(out), allocatable :: Xksi (:,:) real(kind=rk), intent(out), allocatable :: Wksi (:) Calls proc~~gauss_legendre_2d~~CallsGraph proc~gauss_legendre_2d gauss_legendre_2D gauss_legendre gauss_legendre proc~gauss_legendre_2d->gauss_legendre interface~ndgrid ndgrid proc~gauss_legendre_2d->interface~ndgrid proc~kron kron proc~gauss_legendre_2d->proc~kron proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~gauss_legendre_2d~~CalledByGraph proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg gauss_leg interface~gauss_leg->proc~gauss_legendre_2d proc~ansatz nurbs_curve%ansatz proc~ansatz->interface~gauss_leg proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->interface~gauss_leg proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->interface~gauss_leg proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/gauss_legendre_2d.html"},{"title":"gauss_legendre_3D – ForCAD","text":"private pure subroutine gauss_legendre_3D(interval1, interval2, interval3, degree, Xksi, Wksi) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval1 (2) real(kind=rk), intent(in) :: interval2 (2) real(kind=rk), intent(in) :: interval3 (2) integer, intent(in) :: degree (3) real(kind=rk), intent(out), allocatable :: Xksi (:,:) real(kind=rk), intent(out), allocatable :: Wksi (:) Calls proc~~gauss_legendre_3d~~CallsGraph proc~gauss_legendre_3d gauss_legendre_3D gauss_legendre gauss_legendre proc~gauss_legendre_3d->gauss_legendre interface~ndgrid ndgrid proc~gauss_legendre_3d->interface~ndgrid proc~kron kron proc~gauss_legendre_3d->proc~kron proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~gauss_legendre_3d~~CalledByGraph proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg gauss_leg interface~gauss_leg->proc~gauss_legendre_3d proc~ansatz nurbs_curve%ansatz proc~ansatz->interface~gauss_leg proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->interface~gauss_leg proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->interface~gauss_leg proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/gauss_legendre_3d.html"},{"title":"ndgrid2 – ForCAD","text":"private pure subroutine ndgrid2(X_dir1, X_dir2, Xt) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: X_dir1 (:) real(kind=rk), intent(in), contiguous :: X_dir2 (:) real(kind=rk), intent(out), allocatable :: Xt (:,:) Called by proc~~ndgrid2~~CalledByGraph proc~ndgrid2 ndgrid2 interface~ndgrid ndgrid interface~ndgrid->proc~ndgrid2 proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->interface~ndgrid interface~gauss_leg gauss_leg proc~ansatz~2->interface~gauss_leg none~derivative~2 nurbs_volume%derivative proc~ansatz~2->none~derivative~2 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->interface~ndgrid proc~ansatz~3->interface~gauss_leg none~derivative~3 nurbs_surface%derivative proc~ansatz~3->none~derivative~3 proc~basis_vector~2 nurbs_volume%basis_vector proc~basis_vector~2->interface~ndgrid proc~basis_vector~3 nurbs_surface%basis_vector proc~basis_vector~3->interface~ndgrid proc~create~2 nurbs_volume%create proc~create~2->interface~ndgrid proc~create~3 nurbs_surface%create proc~create~3->interface~ndgrid proc~derivative2_vector~2 nurbs_volume%derivative2_vector proc~derivative2_vector~2->interface~ndgrid proc~derivative2_vector~3 nurbs_surface%derivative2_vector proc~derivative2_vector~3->interface~ndgrid proc~derivative_vector~2 nurbs_volume%derivative_vector proc~derivative_vector~2->interface~ndgrid proc~derivative_vector~3 nurbs_surface%derivative_vector proc~derivative_vector~3->interface~ndgrid proc~gauss_legendre_2d gauss_legendre_2D proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_3d gauss_legendre_3D proc~gauss_legendre_3d->interface~ndgrid interface~gauss_leg->proc~gauss_legendre_2d interface~gauss_leg->proc~gauss_legendre_3d none~derivative2~2 nurbs_volume%derivative2 none~derivative2~2->proc~derivative2_vector~2 none~derivative2~3 nurbs_surface%derivative2 none~derivative2~3->proc~derivative2_vector~3 none~derivative~2->proc~derivative_vector~2 none~derivative~3->proc~derivative_vector~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 proc~nearest_point2~2 nurbs_volume%nearest_point2 proc~nearest_point2~2->proc~create~2 proc~nearest_point2~2->none~derivative2~2 proc~nearest_point2~3 nurbs_surface%nearest_point2 proc~nearest_point2~3->proc~create~3 proc~nearest_point2~3->none~derivative2~3 program~example3_surface example3_surface program~example3_surface->proc~create~3 program~example3_volume example3_volume program~example3_volume->proc~create~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~create~3 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~create~2 program~example_ppm1 example_ppm1 program~example_ppm1->proc~create~3 program~example_ppm2 example_ppm2 program~example_ppm2->proc~create~3 program~example_ppm3 example_ppm3 program~example_ppm3->proc~create~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~create~3 program~nearest_point_2d->proc~nearest_point2~3 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~create~3 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~create~2 program~nearest_point_3d->proc~nearest_point2~2 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~create~3 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~create~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~create~3 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~create~2 program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~create~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~create~3 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~create~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~create~3 proc~ansatz nurbs_curve%ansatz proc~ansatz->interface~gauss_leg program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_volume compute_volume program~compute_volume->proc~cmp_volume proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/ndgrid2.html"},{"title":"ndgrid3 – ForCAD","text":"private pure subroutine ndgrid3(X_dir1, X_dir2, X_dir3, Xt) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: X_dir1 (:) real(kind=rk), intent(in), contiguous :: X_dir2 (:) real(kind=rk), intent(in), contiguous :: X_dir3 (:) real(kind=rk), intent(out), allocatable :: Xt (:,:) Called by proc~~ndgrid3~~CalledByGraph proc~ndgrid3 ndgrid3 interface~ndgrid ndgrid interface~ndgrid->proc~ndgrid3 proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->interface~ndgrid interface~gauss_leg gauss_leg proc~ansatz~2->interface~gauss_leg none~derivative~2 nurbs_volume%derivative proc~ansatz~2->none~derivative~2 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->interface~ndgrid proc~ansatz~3->interface~gauss_leg none~derivative~3 nurbs_surface%derivative proc~ansatz~3->none~derivative~3 proc~basis_vector~2 nurbs_volume%basis_vector proc~basis_vector~2->interface~ndgrid proc~basis_vector~3 nurbs_surface%basis_vector proc~basis_vector~3->interface~ndgrid proc~create~2 nurbs_volume%create proc~create~2->interface~ndgrid proc~create~3 nurbs_surface%create proc~create~3->interface~ndgrid proc~derivative2_vector~2 nurbs_volume%derivative2_vector proc~derivative2_vector~2->interface~ndgrid proc~derivative2_vector~3 nurbs_surface%derivative2_vector proc~derivative2_vector~3->interface~ndgrid proc~derivative_vector~2 nurbs_volume%derivative_vector proc~derivative_vector~2->interface~ndgrid proc~derivative_vector~3 nurbs_surface%derivative_vector proc~derivative_vector~3->interface~ndgrid proc~gauss_legendre_2d gauss_legendre_2D proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_3d gauss_legendre_3D proc~gauss_legendre_3d->interface~ndgrid interface~gauss_leg->proc~gauss_legendre_2d interface~gauss_leg->proc~gauss_legendre_3d none~derivative2~2 nurbs_volume%derivative2 none~derivative2~2->proc~derivative2_vector~2 none~derivative2~3 nurbs_surface%derivative2 none~derivative2~3->proc~derivative2_vector~3 none~derivative~2->proc~derivative_vector~2 none~derivative~3->proc~derivative_vector~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 proc~nearest_point2~2 nurbs_volume%nearest_point2 proc~nearest_point2~2->proc~create~2 proc~nearest_point2~2->none~derivative2~2 proc~nearest_point2~3 nurbs_surface%nearest_point2 proc~nearest_point2~3->proc~create~3 proc~nearest_point2~3->none~derivative2~3 program~example3_surface example3_surface program~example3_surface->proc~create~3 program~example3_volume example3_volume program~example3_volume->proc~create~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~create~3 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~create~2 program~example_ppm1 example_ppm1 program~example_ppm1->proc~create~3 program~example_ppm2 example_ppm2 program~example_ppm2->proc~create~3 program~example_ppm3 example_ppm3 program~example_ppm3->proc~create~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~create~3 program~nearest_point_2d->proc~nearest_point2~3 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~create~3 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~create~2 program~nearest_point_3d->proc~nearest_point2~2 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~create~3 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~create~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~create~3 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~create~2 program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~create~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~create~3 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~create~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~create~3 proc~ansatz nurbs_curve%ansatz proc~ansatz->interface~gauss_leg program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_volume compute_volume program~compute_volume->proc~cmp_volume proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/ndgrid3.html"},{"title":"compute_multiplicity – ForCAD","text":"public interface compute_multiplicity Calls interface~~compute_multiplicity~~CallsGraph interface~compute_multiplicity compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by interface~~compute_multiplicity~~CalledByGraph interface~compute_multiplicity compute_multiplicity proc~cmp_nc nurbs_curve%cmp_nc proc~cmp_nc->interface~compute_multiplicity proc~cmp_nc~2 nurbs_volume%cmp_nc proc~cmp_nc~2->interface~compute_multiplicity proc~cmp_nc~3 nurbs_surface%cmp_nc proc~cmp_nc~3->interface~compute_multiplicity proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~get_continuity nurbs_curve%get_continuity proc~get_continuity->interface~compute_multiplicity proc~get_continuity~2 nurbs_volume%get_continuity proc~get_continuity~2->interface~compute_multiplicity proc~get_continuity~3 nurbs_surface%get_continuity proc~get_continuity~3->interface~compute_multiplicity proc~get_multiplicity nurbs_curve%get_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~get_multiplicity~2->interface~compute_multiplicity proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~get_nc_dir nurbs_volume%get_nc_dir proc~get_nc_dir->interface~compute_multiplicity proc~get_nc_dir~2 nurbs_surface%get_nc_dir proc~get_nc_dir~2->interface~compute_multiplicity proc~insert_knots nurbs_curve%insert_knots proc~insert_knots->interface~compute_multiplicity none~set nurbs_curve%set proc~insert_knots->none~set proc~insert_knots~2 nurbs_volume%insert_knots proc~insert_knots~2->interface~compute_multiplicity none~set~2 nurbs_volume%set proc~insert_knots~2->none~set~2 proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->interface~compute_multiplicity none~set~3 nurbs_surface%set proc~insert_knots~3->none~set~3 proc~remove_knots nurbs_curve%remove_knots proc~remove_knots->interface~compute_multiplicity proc~remove_knots->none~set proc~remove_knots~2 nurbs_volume%remove_knots proc~remove_knots~2->interface~compute_multiplicity proc~remove_knots~2->none~set~2 proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->interface~compute_multiplicity proc~remove_knots~3->none~set~3 proc~cmp_degree nurbs_curve%cmp_degree proc~cmp_degree->proc~get_multiplicity proc~cmp_degree~2 nurbs_volume%cmp_degree proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~cmp_degree~3->proc~get_multiplicity~3 proc~cmp_elem nurbs_curve%cmp_elem proc~cmp_elem->proc~get_multiplicity proc~cmp_elem~2 nurbs_volume%cmp_elem proc~cmp_elem~2->proc~get_multiplicity~2 proc~cmp_elem~3 nurbs_surface%cmp_elem proc~cmp_elem~3->proc~get_multiplicity~3 proc~elevate_degree nurbs_curve%elevate_degree proc~elevate_degree->proc~elevate_degree_a_5_9 proc~elevate_degree->none~set proc~elevate_degree~2 nurbs_volume%elevate_degree proc~elevate_degree~2->proc~elevate_degree_a_5_9 proc~elevate_degree~2->none~set~2 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->proc~elevate_degree_a_5_9 proc~elevate_degree~3->none~set~3 proc~set1~2 nurbs_volume%set1 proc~set1~2->proc~cmp_nc~2 proc~set1~2->proc~cmp_degree~2 proc~set1~3 nurbs_surface%set1 proc~set1~3->proc~cmp_nc~3 proc~set1~3->proc~cmp_degree~3 proc~set2~2 nurbs_volume%set2 proc~set2~2->proc~cmp_nc~2 proc~set2~3 nurbs_surface%set2 proc~set2~3->proc~cmp_nc~3 program~example1_curve example1_curve program~example1_curve->proc~insert_knots program~example1_curve->proc~remove_knots program~example1_curve->proc~elevate_degree program~example1_curve->none~set program~example3_surface example3_surface program~example3_surface->proc~insert_knots~3 program~example3_surface->proc~remove_knots~3 program~example3_surface->proc~elevate_degree~3 program~example3_surface->none~set~3 program~example3_volume example3_volume program~example3_volume->proc~insert_knots~2 program~example3_volume->proc~remove_knots~2 program~example3_volume->proc~cmp_elem~2 program~example3_volume->proc~elevate_degree~2 program~example3_volume->none~set~2 none~set~2->proc~set1~2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 none~set~3->proc~set1~3 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~ansatz nurbs_curve%ansatz proc~ansatz->proc~cmp_elem proc~ansatz->none~set proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~2->none~set~2 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->proc~cmp_elem~3 proc~ansatz~3->none~set~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~3 proc~cmp_area->proc~ansatz~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem proc~cmp_length->proc~ansatz proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem~2 proc~cmp_volume->proc~ansatz~2 proc~set1 nurbs_curve%set1 proc~set1->proc~cmp_degree proc~set1a nurbs_curve%set1a proc~set1a->proc~cmp_degree proc~set3 nurbs_curve%set3 proc~set3->proc~cmp_degree proc~set3~2->proc~cmp_degree~2 proc~set3~3->proc~cmp_degree~3 none~set->proc~set1 none~set->proc~set1a none~set->proc~set3 proc~modify_wc~2 nurbs_volume%modify_Wc proc~modify_wc~2->none~set~2 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~2 nurbs_volume%modify_Xc proc~modify_xc~2->none~set~2 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~set~3 proc~set_c~2 nurbs_volume%set_C proc~set_c~2->none~set~2 proc~set_c~3 nurbs_surface%set_C proc~set_c~3->none~set~3 proc~set_half_ring nurbs_volume%set_half_ring proc~set_half_ring->none~set~2 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~3 proc~set_hexahedron nurbs_volume%set_hexahedron proc~set_hexahedron->none~set~2 proc~set_ring nurbs_volume%set_ring proc~set_ring->none~set~2 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~3 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~3 program~compute_area compute_area program~compute_area->none~set~3 program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_length->none~set program~compute_volume compute_volume program~compute_volume->none~set~2 program~compute_volume->proc~cmp_volume program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~3 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->none~set~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->none~set~2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~3 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->none~set~2 proc~modify_wc nurbs_curve%modify_Wc proc~modify_wc->none~set proc~modify_xc nurbs_curve%modify_Xc proc~modify_xc->none~set proc~set_c nurbs_curve%set_C proc~set_c->none~set proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 program~example_ppm3->proc~set_tetragon program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~3 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~set_c~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~set_half_ring program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~set_hexahedron program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~set_ring program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Module Procedures private pure function compute_multiplicity1 (knot) result(multiplicity) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: knot (:) Return Value integer, allocatable, (:) private pure function compute_multiplicity2 (knot, Xth) result(multiplicity) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in) :: Xth Return Value integer","tags":"","loc":"interface/compute_multiplicity.html"},{"title":"dyad – ForCAD","text":"public interface dyad Calls interface~~dyad~~CallsGraph interface~dyad dyad proc~dyad_t1_t1 dyad_t1_t1 interface~dyad->proc~dyad_t1_t1 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by interface~~dyad~~CalledByGraph interface~dyad dyad proc~ansatz nurbs_curve%ansatz proc~ansatz->interface~dyad proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Module Procedures private pure function dyad_t1_t1 (a, b) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: a (:) real(kind=rk), intent(in), contiguous :: b (:) Return Value real(kind=rk), allocatable, (:,:)","tags":"","loc":"interface/dyad.html"},{"title":"elemConn_C0 – ForCAD","text":"public interface elemConn_C0 Calls interface~~elemconn_c0~~CallsGraph interface~elemconn_c0 elemConn_C0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by interface~~elemconn_c0~~CalledByGraph interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis nurbs_curve%cmp_elem_Xc_vis proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xc_vis~2 nurbs_volume%cmp_elem_Xc_vis proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xc_vis~3 nurbs_surface%cmp_elem_Xc_vis proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis nurbs_curve%cmp_elem_Xg_vis proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis~2 nurbs_volume%cmp_elem_Xg_vis proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~3 nurbs_surface%cmp_elem_Xg_vis proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~export_xc nurbs_curve%export_Xc proc~export_xc->proc~cmp_elem_xc_vis proc~export_xc~2 nurbs_volume%export_Xc proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~export_xc~3 nurbs_surface%export_Xc proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~export_xg nurbs_curve%export_Xg proc~export_xg->proc~cmp_elem_xg_vis proc~export_xg~2 nurbs_volume%export_Xg proc~export_xg~2->proc~cmp_elem_xg_vis~2 proc~export_xg~3 nurbs_surface%export_Xg proc~export_xg~3->proc~cmp_elem_xg_vis~3 program~example1_curve example1_curve program~example1_curve->proc~export_xc program~example1_curve->proc~export_xg program~example3_surface example3_surface program~example3_surface->proc~export_xc~3 program~example3_surface->proc~export_xg~3 program~example3_volume example3_volume program~example3_volume->proc~export_xc~2 program~example3_volume->proc~export_xg~2 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->proc~export_xc program~example_nurbs_curve->proc~export_xg program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~export_xc~3 program~example_nurbs_surface->proc~export_xg~3 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~export_xc~2 program~example_nurbs_volume->proc~export_xg~2 program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->proc~export_xc~2 program~example_put_to_nurbs->proc~export_xg~2 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~export_xc program~shape_c_1d->proc~export_xg program~shape_c_2d shape_C_2d program~shape_c_2d->proc~export_xc~3 program~shape_c_2d->proc~export_xg~3 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~export_xc~2 program~shape_c_3d->proc~export_xg~2 program~shape_circle shape_circle program~shape_circle->proc~export_xc program~shape_circle->proc~export_xg program~shape_half_circle shape_half_circle program~shape_half_circle->proc~export_xc program~shape_half_circle->proc~export_xg program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~export_xc~3 program~shape_half_ring_2d->proc~export_xg~3 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~export_xc~2 program~shape_half_ring_3d->proc~export_xg~2 program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~export_xc~2 program~shape_hexahedron->proc~export_xg~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~export_xc~3 program~shape_ring_2d->proc~export_xg~3 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~export_xc~2 program~shape_ring_3d->proc~export_xg~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~export_xc~3 program~shape_tetragon->proc~export_xg~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Module Procedures private pure function cmp_elemConn_C0_L (nnode, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode integer, intent(in) :: p Return Value integer, allocatable, (:,:) private pure function cmp_elemConn_C0_S (nnode1, nnode2, p1, p2) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: p1 integer, intent(in) :: p2 Return Value integer, allocatable, (:,:) private pure function cmp_elemConn_C0_V (nnode1, nnode2, nnode3, p1, p2, p3) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: nnode3 integer, intent(in) :: p1 integer, intent(in) :: p2 integer, intent(in) :: p3 Return Value integer, allocatable, (:,:)","tags":"","loc":"interface/elemconn_c0.html"},{"title":"elemConn_Cn – ForCAD","text":"public interface elemConn_Cn Calls interface~~elemconn_cn~~CallsGraph interface~elemconn_cn elemConn_Cn proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by interface~~elemconn_cn~~CalledByGraph interface~elemconn_cn elemConn_Cn proc~cmp_elem nurbs_curve%cmp_elem proc~cmp_elem->interface~elemconn_cn proc~cmp_elem~2 nurbs_volume%cmp_elem proc~cmp_elem~2->interface~elemconn_cn proc~cmp_elem~3 nurbs_surface%cmp_elem proc~cmp_elem~3->interface~elemconn_cn proc~ansatz nurbs_curve%ansatz proc~ansatz->proc~cmp_elem proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->proc~cmp_elem~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~3 proc~cmp_area->proc~ansatz~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~cmp_elem proc~cmp_length->proc~ansatz proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~cmp_elem~2 proc~cmp_volume->proc~ansatz~2 program~example3_volume example3_volume program~example3_volume->proc~cmp_elem~2 program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Module Procedures private pure subroutine cmp_elemConn_Cn_L (nnode, p, Xth, vecKnot_mul, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode integer, intent(in) :: p real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: vecKnot_mul (:) integer, intent(out), allocatable :: elemConn (:,:) private pure subroutine cmp_elemConn_Cn_S (nnode1, nnode2, p1, p2, Xth1, Xth2, vecKnot_mul1, vecKnot_mul2, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: p1 integer, intent(in) :: p2 real(kind=rk), intent(in), contiguous :: Xth1 (:) real(kind=rk), intent(in), contiguous :: Xth2 (:) integer, intent(in), contiguous :: vecKnot_mul1 (:) integer, intent(in), contiguous :: vecKnot_mul2 (:) integer, intent(out), allocatable :: elemConn (:,:) private pure subroutine cmp_elemConn_Cn_V (nnode1, nnode2, nnode3, p1, p2, p3, Xth1, Xth2, Xth3, vecKnot_mul1, vecKnot_mul2, vecKnot_mul3, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: nnode3 integer, intent(in) :: p1 integer, intent(in) :: p2 integer, intent(in) :: p3 real(kind=rk), intent(in), contiguous :: Xth1 (:) real(kind=rk), intent(in), contiguous :: Xth2 (:) real(kind=rk), intent(in), contiguous :: Xth3 (:) integer, intent(in), contiguous :: vecKnot_mul1 (:) integer, intent(in), contiguous :: vecKnot_mul2 (:) integer, intent(in), contiguous :: vecKnot_mul3 (:) integer, intent(out), allocatable :: elemConn (:,:)","tags":"","loc":"interface/elemconn_cn.html"},{"title":"gauss_leg – ForCAD","text":"public interface gauss_leg Calls interface~~gauss_leg~~CallsGraph interface~gauss_leg gauss_leg proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->gauss_legendre interface~ndgrid ndgrid proc~gauss_legendre_2d->interface~ndgrid proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->proc~kron proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by interface~~gauss_leg~~CalledByGraph interface~gauss_leg gauss_leg proc~ansatz nurbs_curve%ansatz proc~ansatz->interface~gauss_leg proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->interface~gauss_leg proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->interface~gauss_leg proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Module Procedures private pure subroutine gauss_legendre_1D (interval, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval (2) integer, intent(in) :: degree real(kind=rk), intent(out), allocatable :: Xksi (:) real(kind=rk), intent(out), allocatable :: Wksi (:) private pure subroutine gauss_legendre_2D (interval1, interval2, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval1 (2) real(kind=rk), intent(in) :: interval2 (2) integer, intent(in) :: degree (2) real(kind=rk), intent(out), allocatable :: Xksi (:,:) real(kind=rk), intent(out), allocatable :: Wksi (:) private pure subroutine gauss_legendre_3D (interval1, interval2, interval3, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval1 (2) real(kind=rk), intent(in) :: interval2 (2) real(kind=rk), intent(in) :: interval3 (2) integer, intent(in) :: degree (3) real(kind=rk), intent(out), allocatable :: Xksi (:,:) real(kind=rk), intent(out), allocatable :: Wksi (:)","tags":"","loc":"interface/gauss_leg.html"},{"title":"ndgrid – ForCAD","text":"public interface ndgrid Calls interface~~ndgrid~~CallsGraph interface~ndgrid ndgrid proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by interface~~ndgrid~~CalledByGraph interface~ndgrid ndgrid proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->interface~ndgrid interface~gauss_leg gauss_leg proc~ansatz~2->interface~gauss_leg none~derivative~2 nurbs_volume%derivative proc~ansatz~2->none~derivative~2 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->interface~ndgrid proc~ansatz~3->interface~gauss_leg none~derivative~3 nurbs_surface%derivative proc~ansatz~3->none~derivative~3 proc~basis_vector~2 nurbs_volume%basis_vector proc~basis_vector~2->interface~ndgrid proc~basis_vector~3 nurbs_surface%basis_vector proc~basis_vector~3->interface~ndgrid proc~create~2 nurbs_volume%create proc~create~2->interface~ndgrid proc~create~3 nurbs_surface%create proc~create~3->interface~ndgrid proc~derivative2_vector~2 nurbs_volume%derivative2_vector proc~derivative2_vector~2->interface~ndgrid proc~derivative2_vector~3 nurbs_surface%derivative2_vector proc~derivative2_vector~3->interface~ndgrid proc~derivative_vector~2 nurbs_volume%derivative_vector proc~derivative_vector~2->interface~ndgrid proc~derivative_vector~3 nurbs_surface%derivative_vector proc~derivative_vector~3->interface~ndgrid proc~gauss_legendre_2d gauss_legendre_2D proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_3d gauss_legendre_3D proc~gauss_legendre_3d->interface~ndgrid interface~gauss_leg->proc~gauss_legendre_2d interface~gauss_leg->proc~gauss_legendre_3d none~derivative2~2 nurbs_volume%derivative2 none~derivative2~2->proc~derivative2_vector~2 none~derivative2~3 nurbs_surface%derivative2 none~derivative2~3->proc~derivative2_vector~3 none~derivative~2->proc~derivative_vector~2 none~derivative~3->proc~derivative_vector~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 proc~nearest_point2~2 nurbs_volume%nearest_point2 proc~nearest_point2~2->proc~create~2 proc~nearest_point2~2->none~derivative2~2 proc~nearest_point2~3 nurbs_surface%nearest_point2 proc~nearest_point2~3->proc~create~3 proc~nearest_point2~3->none~derivative2~3 program~example3_surface example3_surface program~example3_surface->proc~create~3 program~example3_volume example3_volume program~example3_volume->proc~create~2 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~create~3 program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->proc~create~2 program~example_ppm1 example_ppm1 program~example_ppm1->proc~create~3 program~example_ppm2 example_ppm2 program~example_ppm2->proc~create~3 program~example_ppm3 example_ppm3 program~example_ppm3->proc~create~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~create~3 program~nearest_point_2d->proc~nearest_point2~3 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~create~3 program~nearest_point_3d nearest_point_3d program~nearest_point_3d->proc~create~2 program~nearest_point_3d->proc~nearest_point2~2 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~create~3 program~shape_c_3d shape_C_3d program~shape_c_3d->proc~create~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~create~3 program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->proc~create~2 program~shape_hexahedron shape_hexahedron program~shape_hexahedron->proc~create~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~create~3 program~shape_ring_3d shape_ring_3d program~shape_ring_3d->proc~create~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~create~3 proc~ansatz nurbs_curve%ansatz proc~ansatz->interface~gauss_leg program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_volume compute_volume program~compute_volume->proc~cmp_volume proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz program~compute_length compute_length program~compute_length->proc~cmp_length Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Module Procedures private pure subroutine ndgrid2 (X_dir1, X_dir2, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: X_dir1 (:) real(kind=rk), intent(in), contiguous :: X_dir2 (:) real(kind=rk), intent(out), allocatable :: Xt (:,:) private pure subroutine ndgrid3 (X_dir1, X_dir2, X_dir3, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: X_dir1 (:) real(kind=rk), intent(in), contiguous :: X_dir2 (:) real(kind=rk), intent(in), contiguous :: X_dir3 (:) real(kind=rk), intent(out), allocatable :: Xt (:,:)","tags":"","loc":"interface/ndgrid.html"},{"title":"unique – ForCAD","text":"public interface unique Calls interface~~unique~~CallsGraph interface~unique unique proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by interface~~unique~~CalledByGraph interface~unique unique proc~ansatz nurbs_curve%ansatz proc~ansatz->interface~unique proc~cmp_elem nurbs_curve%cmp_elem proc~ansatz->proc~cmp_elem proc~ansatz~2 nurbs_volume%ansatz proc~ansatz~2->interface~unique proc~cmp_elem~2 nurbs_volume%cmp_elem proc~ansatz~2->proc~cmp_elem~2 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->interface~unique proc~cmp_elem~3 nurbs_surface%cmp_elem proc~ansatz~3->proc~cmp_elem~3 proc~cmp_elem->interface~unique proc~cmp_elem~2->interface~unique proc~cmp_elem~3->interface~unique proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 proc~cmp_area->proc~cmp_elem~3 proc~cmp_length nurbs_curve%cmp_length proc~cmp_length->proc~ansatz proc~cmp_length->proc~cmp_elem proc~cmp_volume nurbs_volume%cmp_volume proc~cmp_volume->proc~ansatz~2 proc~cmp_volume->proc~cmp_elem~2 program~example3_volume example3_volume program~example3_volume->proc~cmp_elem~2 program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_length compute_length program~compute_length->proc~cmp_length program~compute_volume compute_volume program~compute_volume->proc~cmp_volume Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Module Procedures private pure function unique_integer (vec) result(output) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in), dimension(:), contiguous :: vec Return Value integer, dimension(:), allocatable private pure function unique_real (vec) result(output) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), dimension(:), contiguous :: vec Return Value real(kind=rk), dimension(:), allocatable","tags":"","loc":"interface/unique.html"},{"title":"cmp_Xg – ForCAD","text":"private pure function cmp_Xg(this, Xt) result(Xg) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this real(kind=rk), intent(in), contiguous :: Xt (:) Return Value real(kind=rk), allocatable, (:) Calls proc~~cmp_xg~3~~CallsGraph proc~cmp_xg~3 nurbs_surface%cmp_Xg interface~compute_xg~3 compute_Xg proc~cmp_xg~3->interface~compute_xg~3 proc~is_rational~3 nurbs_surface%is_rational proc~cmp_xg~3->proc~is_rational~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_xg~3~~CalledByGraph proc~cmp_xg~3 nurbs_surface%cmp_Xg proc~nearest_point2~3 nurbs_surface%nearest_point2 proc~nearest_point2~3->proc~cmp_xg~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point2~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_xg~3.html"},{"title":"cmp_elem – ForCAD","text":"private pure function cmp_elem(this) result(elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem~3~~CallsGraph proc~cmp_elem~3 nurbs_surface%cmp_elem interface~elemconn_cn elemConn_Cn proc~cmp_elem~3->interface~elemconn_cn interface~unique unique proc~cmp_elem~3->interface~unique proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_elem~3->proc~get_multiplicity~3 proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem~3~~CalledByGraph proc~cmp_elem~3 nurbs_surface%cmp_elem proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->proc~cmp_elem~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~3 proc~cmp_area->proc~ansatz~3 program~compute_area compute_area program~compute_area->proc~cmp_area Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem~3.html"},{"title":"cmp_elem_Xc_vis – ForCAD","text":"private pure function cmp_elem_Xc_vis(this, p) result(elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem_xc_vis~3~~CallsGraph proc~cmp_elem_xc_vis~3 nurbs_surface%cmp_elem_Xc_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem_xc_vis~3~~CalledByGraph proc~cmp_elem_xc_vis~3 nurbs_surface%cmp_elem_Xc_vis proc~export_xc~3 nurbs_surface%export_Xc proc~export_xc~3->proc~cmp_elem_xc_vis~3 program~example3_surface example3_surface program~example3_surface->proc~export_xc~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~export_xc~3 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~export_xc~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~export_xc~3 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~export_xc~3 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~export_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem_xc_vis~3.html"},{"title":"cmp_elem_Xg_vis – ForCAD","text":"private pure function cmp_elem_Xg_vis(this, p) result(elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) Calls proc~~cmp_elem_xg_vis~3~~CallsGraph proc~cmp_elem_xg_vis~3 nurbs_surface%cmp_elem_Xg_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_elem_xg_vis~3~~CalledByGraph proc~cmp_elem_xg_vis~3 nurbs_surface%cmp_elem_Xg_vis proc~export_xg~3 nurbs_surface%export_Xg proc~export_xg~3->proc~cmp_elem_xg_vis~3 program~example3_surface example3_surface program~example3_surface->proc~export_xg~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~export_xg~3 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~export_xg~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~export_xg~3 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~export_xg~3 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~export_xg~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_elem_xg_vis~3.html"},{"title":"get_Wc_all – ForCAD","text":"private pure function get_Wc_all(this) result(Wc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) Called by proc~~get_wc_all~3~~CalledByGraph proc~get_wc_all~3 nurbs_surface%get_Wc_all none~get_wc~3 nurbs_surface%get_Wc none~get_wc~3->proc~get_wc_all~3 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~get_wc~3 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~get_wc~3 program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_wc_all~3.html"},{"title":"get_Wci – ForCAD","text":"private pure function get_Wci(this, n) result(Wc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) Called by proc~~get_wci~3~~CalledByGraph proc~get_wci~3 nurbs_surface%get_Wci none~get_wc~3 nurbs_surface%get_Wc none~get_wc~3->proc~get_wci~3 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~get_wc~3 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~get_wc~3 program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_wci~3.html"},{"title":"get_Xc_all – ForCAD","text":"private pure function get_Xc_all(this) result(Xc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) Called by proc~~get_xc_all~3~~CalledByGraph proc~get_xc_all~3 nurbs_surface%get_Xc_all none~get_xc~3 nurbs_surface%get_Xc none~get_xc~3->proc~get_xc_all~3 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~get_xc~3 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~get_xc~3 program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xc_all~3.html"},{"title":"get_Xci – ForCAD","text":"private pure function get_Xci(this, n) result(Xc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) Called by proc~~get_xci~3~~CalledByGraph proc~get_xci~3 nurbs_surface%get_Xci none~get_xc~3 nurbs_surface%get_Xc none~get_xc~3->proc~get_xci~3 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~get_xc~3 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~get_xc~3 program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xci~3.html"},{"title":"get_Xcid – ForCAD","text":"private pure function get_Xcid(this, n, dir) result(Xc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) Called by proc~~get_xcid~3~~CalledByGraph proc~get_xcid~3 nurbs_surface%get_Xcid none~get_xc~3 nurbs_surface%get_Xc none~get_xc~3->proc~get_xcid~3 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~get_xc~3 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~get_xc~3 program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xcid~3.html"},{"title":"get_Xg_all – ForCAD","text":"private pure function get_Xg_all(this) result(Xg) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) Called by proc~~get_xg_all~3~~CalledByGraph proc~get_xg_all~3 nurbs_surface%get_Xg_all none~get_xg~3 nurbs_surface%get_Xg none~get_xg~3->proc~get_xg_all~3 program~example_ppm1 example_ppm1 program~example_ppm1->none~get_xg~3 program~example_ppm2 example_ppm2 program~example_ppm2->none~get_xg~3 program~example_ppm3 example_ppm3 program~example_ppm3->none~get_xg~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xg_all~3.html"},{"title":"get_Xgi – ForCAD","text":"private pure function get_Xgi(this, n) result(Xg) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) Called by proc~~get_xgi~3~~CalledByGraph proc~get_xgi~3 nurbs_surface%get_Xgi none~get_xg~3 nurbs_surface%get_Xg none~get_xg~3->proc~get_xgi~3 program~example_ppm1 example_ppm1 program~example_ppm1->none~get_xg~3 program~example_ppm2 example_ppm2 program~example_ppm2->none~get_xg~3 program~example_ppm3 example_ppm3 program~example_ppm3->none~get_xg~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xgi~3.html"},{"title":"get_Xgid – ForCAD","text":"private pure function get_Xgid(this, n, dir) result(Xg) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) Called by proc~~get_xgid~3~~CalledByGraph proc~get_xgid~3 nurbs_surface%get_Xgid none~get_xg~3 nurbs_surface%get_Xg none~get_xg~3->proc~get_xgid~3 program~example_ppm1 example_ppm1 program~example_ppm1->none~get_xg~3 program~example_ppm2 example_ppm2 program~example_ppm2->none~get_xg~3 program~example_ppm3 example_ppm3 program~example_ppm3->none~get_xg~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_xgid~3.html"},{"title":"get_Xt – ForCAD","text":"private pure function get_Xt(this, dir) result(Xt) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"proc/get_xt~3.html"},{"title":"get_continuity – ForCAD","text":"private pure function get_continuity(this, dir) result(c) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) Calls proc~~get_continuity~3~~CallsGraph proc~get_continuity~3 nurbs_surface%get_continuity interface~compute_multiplicity compute_multiplicity proc~get_continuity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_continuity~3.html"},{"title":"get_degree_all – ForCAD","text":"private pure function get_degree_all(this) result(degree) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) Called by proc~~get_degree_all~2~~CalledByGraph proc~get_degree_all~2 nurbs_surface%get_degree_all none~get_degree~3 nurbs_surface%get_degree none~get_degree~3->proc~get_degree_all~2 program~example3_surface example3_surface program~example3_surface->none~get_degree~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_degree_all~2.html"},{"title":"get_degree_dir – ForCAD","text":"private pure function get_degree_dir(this, dir) result(degree) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer Called by proc~~get_degree_dir~2~~CalledByGraph proc~get_degree_dir~2 nurbs_surface%get_degree_dir none~get_degree~3 nurbs_surface%get_degree none~get_degree~3->proc~get_degree_dir~2 program~example3_surface example3_surface program~example3_surface->none~get_degree~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_degree_dir~2.html"},{"title":"get_elem – ForCAD","text":"private pure function get_elem(this) result(elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem~3.html"},{"title":"get_elem_Xc_vis – ForCAD","text":"private pure function get_elem_Xc_vis(this) result(elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem_xc_vis~3.html"},{"title":"get_elem_Xg_vis – ForCAD","text":"private pure function get_elem_Xg_vis(this) result(elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:)","tags":"","loc":"proc/get_elem_xg_vis~3.html"},{"title":"get_knot_all – ForCAD","text":"private pure function get_knot_all(this, dir) result(knot) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) Called by proc~~get_knot_all~3~~CalledByGraph proc~get_knot_all~3 nurbs_surface%get_knot_all none~get_knot~3 nurbs_surface%get_knot none~get_knot~3->proc~get_knot_all~3 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->none~get_knot~3 proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->none~get_knot~3 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~get_knot~3 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~get_knot~3 proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->none~get_knot~3 program~example3_surface example3_surface program~example3_surface->none~get_knot~3 program~example3_surface->proc~elevate_degree~3 program~example3_surface->proc~insert_knots~3 program~example3_surface->proc~remove_knots~3 program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_knot_all~3.html"},{"title":"get_knoti – ForCAD","text":"private pure function get_knoti(this, dir, i) result(knot) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir integer, intent(in) :: i Return Value real(kind=rk) Called by proc~~get_knoti~3~~CalledByGraph proc~get_knoti~3 nurbs_surface%get_knoti none~get_knot~3 nurbs_surface%get_knot none~get_knot~3->proc~get_knoti~3 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->none~get_knot~3 proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->none~get_knot~3 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~get_knot~3 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~get_knot~3 proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->none~get_knot~3 program~example3_surface example3_surface program~example3_surface->none~get_knot~3 program~example3_surface->proc~elevate_degree~3 program~example3_surface->proc~insert_knots~3 program~example3_surface->proc~remove_knots~3 program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_knoti~3.html"},{"title":"get_multiplicity – ForCAD","text":"private pure function get_multiplicity(this, dir) result(m) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) Calls proc~~get_multiplicity~3~~CallsGraph proc~get_multiplicity~3 nurbs_surface%get_multiplicity interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~get_multiplicity~3~~CalledByGraph proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3 nurbs_surface%cmp_degree proc~cmp_degree~3->proc~get_multiplicity~3 proc~cmp_elem~3 nurbs_surface%cmp_elem proc~cmp_elem~3->proc~get_multiplicity~3 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->proc~cmp_elem~3 none~set~3 nurbs_surface%set proc~ansatz~3->none~set~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~cmp_elem~3 proc~cmp_area->proc~ansatz~3 proc~set1~3 nurbs_surface%set1 proc~set1~3->proc~cmp_degree~3 proc~set3~3 nurbs_surface%set3 proc~set3~3->proc~cmp_degree~3 none~set~3->proc~set1~3 none~set~3->proc~set3~3 program~compute_area compute_area program~compute_area->proc~cmp_area program~compute_area->none~set~3 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->none~set~3 proc~set_c~3 nurbs_surface%set_C proc~set_c~3->none~set~3 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~3 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~3 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~3 program~example3_surface example3_surface program~example3_surface->none~set~3 program~example3_surface->proc~elevate_degree~3 program~example3_surface->proc~insert_knots~3 program~example3_surface->proc~remove_knots~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~3 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_multiplicity~3.html"},{"title":"get_nc_all – ForCAD","text":"private pure function get_nc_all(this) result(nc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2)","tags":"","loc":"proc/get_nc_all~2.html"},{"title":"get_nc_dir – ForCAD","text":"private pure function get_nc_dir(this, dir) result(nc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer Calls proc~~get_nc_dir~2~~CallsGraph proc~get_nc_dir~2 nurbs_surface%get_nc_dir interface~compute_multiplicity compute_multiplicity proc~get_nc_dir~2->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_nc_dir~2.html"},{"title":"get_ng – ForCAD","text":"private pure function get_ng(this) result(ng) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) Called by proc~~get_ng~3~~CalledByGraph proc~get_ng~3 nurbs_surface%get_ng program~example_ppm1 example_ppm1 program~example_ppm1->proc~get_ng~3 program~example_ppm2 example_ppm2 program~example_ppm2->proc~get_ng~3 program~example_ppm3 example_ppm3 program~example_ppm3->proc~get_ng~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/get_ng~3.html"},{"title":"is_rational – ForCAD","text":"private pure function is_rational(this) result(r) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value logical Called by proc~~is_rational~3~~CalledByGraph proc~is_rational~3 nurbs_surface%is_rational proc~basis_scalar~3 nurbs_surface%basis_scalar proc~basis_scalar~3->proc~is_rational~3 proc~basis_vector~3 nurbs_surface%basis_vector proc~basis_vector~3->proc~is_rational~3 proc~cmp_xg~3 nurbs_surface%cmp_Xg proc~cmp_xg~3->proc~is_rational~3 proc~create~3 nurbs_surface%create proc~create~3->proc~is_rational~3 proc~derivative2_scalar~3 nurbs_surface%derivative2_scalar proc~derivative2_scalar~3->proc~is_rational~3 proc~derivative2_vector~3 nurbs_surface%derivative2_vector proc~derivative2_vector~3->proc~is_rational~3 proc~derivative_scalar~3 nurbs_surface%derivative_scalar proc~derivative_scalar~3->proc~is_rational~3 proc~derivative_vector~3 nurbs_surface%derivative_vector proc~derivative_vector~3->proc~is_rational~3 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->proc~is_rational~3 proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->proc~is_rational~3 proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->proc~is_rational~3 none~derivative2~3 nurbs_surface%derivative2 none~derivative2~3->proc~derivative2_scalar~3 none~derivative2~3->proc~derivative2_vector~3 none~derivative~3 nurbs_surface%derivative none~derivative~3->proc~derivative_scalar~3 none~derivative~3->proc~derivative_vector~3 proc~nearest_point2~3 nurbs_surface%nearest_point2 proc~nearest_point2~3->proc~cmp_xg~3 proc~nearest_point2~3->proc~create~3 proc~nearest_point2~3->none~derivative2~3 program~example3_surface example3_surface program~example3_surface->proc~create~3 program~example3_surface->proc~elevate_degree~3 program~example3_surface->proc~insert_knots~3 program~example3_surface->proc~remove_knots~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~create~3 program~example_ppm1 example_ppm1 program~example_ppm1->proc~create~3 program~example_ppm2 example_ppm2 program~example_ppm2->proc~create~3 program~example_ppm3 example_ppm3 program~example_ppm3->proc~create~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~create~3 program~nearest_point_2d->proc~nearest_point2~3 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~create~3 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~create~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~create~3 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~create~3 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~create~3 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->none~derivative~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 program~compute_area compute_area program~compute_area->proc~cmp_area Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/is_rational~3.html"},{"title":"ansatz – ForCAD","text":"private pure subroutine ansatz(this, ie, ig, Tgc, dTgc_dXg, dA) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dA Calls proc~~ansatz~3~~CallsGraph proc~ansatz~3 nurbs_surface%ansatz interface~gauss_leg gauss_leg proc~ansatz~3->interface~gauss_leg interface~ndgrid ndgrid proc~ansatz~3->interface~ndgrid interface~unique unique proc~ansatz~3->interface~unique none~derivative~3 nurbs_surface%derivative proc~ansatz~3->none~derivative~3 none~set~3 nurbs_surface%set proc~ansatz~3->none~set~3 proc~cmp_elem~3 nurbs_surface%cmp_elem proc~ansatz~3->proc~cmp_elem~3 proc~det det proc~ansatz~3->proc~det proc~inv inv proc~ansatz~3->proc~inv proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar~3 nurbs_surface%derivative_scalar none~derivative~3->proc~derivative_scalar~3 proc~derivative_vector~3 nurbs_surface%derivative_vector none~derivative~3->proc~derivative_vector~3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 proc~cmp_elem~3->interface~unique interface~elemconn_cn elemConn_Cn proc~cmp_elem~3->interface~elemconn_cn proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_elem~3->proc~get_multiplicity~3 proc~inv->proc~det proc~inv->proc~inv proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v interface~compute_dtgc~3 compute_dTgc proc~derivative_scalar~3->interface~compute_dtgc~3 proc~is_rational~3 nurbs_surface%is_rational proc~derivative_scalar~3->proc~is_rational~3 proc~derivative_vector~3->interface~ndgrid proc~derivative_vector~3->interface~compute_dtgc~3 proc~derivative_vector~3->proc~is_rational~3 gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_2d->gauss_legendre proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->proc~kron interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~cmp_degree~3->proc~get_multiplicity~3 proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~ansatz~3~~CalledByGraph proc~ansatz~3 nurbs_surface%ansatz proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 program~compute_area compute_area program~compute_area->proc~cmp_area Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/ansatz~3.html"},{"title":"basis_scalar – ForCAD","text":"private pure subroutine basis_scalar(this, Xt, Tgc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:) Calls proc~~basis_scalar~3~~CallsGraph proc~basis_scalar~3 nurbs_surface%basis_scalar interface~compute_tgc~3 compute_Tgc proc~basis_scalar~3->interface~compute_tgc~3 proc~is_rational~3 nurbs_surface%is_rational proc~basis_scalar~3->proc~is_rational~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_scalar~3.html"},{"title":"basis_vector – ForCAD","text":"private pure subroutine basis_vector(this, res1, res2, Xt1, Xt2, Tgc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) Calls proc~~basis_vector~3~~CallsGraph proc~basis_vector~3 nurbs_surface%basis_vector interface~compute_tgc~3 compute_Tgc proc~basis_vector~3->interface~compute_tgc~3 interface~ndgrid ndgrid proc~basis_vector~3->interface~ndgrid proc~is_rational~3 nurbs_surface%is_rational proc~basis_vector~3->proc~is_rational~3 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/basis_vector~3.html"},{"title":"cmp_area – ForCAD","text":"private pure subroutine cmp_area(this, area) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(out) :: area Calls proc~~cmp_area~~CallsGraph proc~cmp_area nurbs_surface%cmp_area proc~ansatz~3 nurbs_surface%ansatz proc~cmp_area->proc~ansatz~3 proc~cmp_elem~3 nurbs_surface%cmp_elem proc~cmp_area->proc~cmp_elem~3 proc~ansatz~3->proc~cmp_elem~3 interface~gauss_leg gauss_leg proc~ansatz~3->interface~gauss_leg interface~ndgrid ndgrid proc~ansatz~3->interface~ndgrid interface~unique unique proc~ansatz~3->interface~unique none~derivative~3 nurbs_surface%derivative proc~ansatz~3->none~derivative~3 none~set~3 nurbs_surface%set proc~ansatz~3->none~set~3 proc~det det proc~ansatz~3->proc~det proc~inv inv proc~ansatz~3->proc~inv interface~elemconn_cn elemConn_Cn proc~cmp_elem~3->interface~elemconn_cn proc~cmp_elem~3->interface~unique proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_elem~3->proc~get_multiplicity~3 proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar~3 nurbs_surface%derivative_scalar none~derivative~3->proc~derivative_scalar~3 proc~derivative_vector~3 nurbs_surface%derivative_vector none~derivative~3->proc~derivative_vector~3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~inv->proc~det proc~inv->proc~inv proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 interface~compute_dtgc~3 compute_dTgc proc~derivative_scalar~3->interface~compute_dtgc~3 proc~is_rational~3 nurbs_surface%is_rational proc~derivative_scalar~3->proc~is_rational~3 proc~derivative_vector~3->interface~ndgrid proc~derivative_vector~3->interface~compute_dtgc~3 proc~derivative_vector~3->proc~is_rational~3 gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_2d->gauss_legendre proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->proc~kron proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~cmp_degree~3->proc~get_multiplicity~3 proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_area~~CalledByGraph proc~cmp_area nurbs_surface%cmp_area program~compute_area compute_area program~compute_area->proc~cmp_area Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_area.html"},{"title":"cmp_degree – ForCAD","text":"private pure subroutine cmp_degree(this, dir) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: dir Calls proc~~cmp_degree~3~~CallsGraph proc~cmp_degree~3 nurbs_surface%cmp_degree proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_degree~3~~CalledByGraph proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3 nurbs_surface%set1 proc~set1~3->proc~cmp_degree~3 proc~set3~3 nurbs_surface%set3 proc~set3~3->proc~cmp_degree~3 none~set~3 nurbs_surface%set none~set~3->proc~set1~3 none~set~3->proc~set3~3 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->none~set~3 proc~set_c~3 nurbs_surface%set_C proc~set_c~3->none~set~3 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~3 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~3 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~3 program~compute_area compute_area program~compute_area->none~set~3 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area program~example3_surface example3_surface program~example3_surface->none~set~3 program~example3_surface->proc~elevate_degree~3 program~example3_surface->proc~insert_knots~3 program~example3_surface->proc~remove_knots~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~3 proc~cmp_area->proc~ansatz~3 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_degree~3.html"},{"title":"cmp_nc – ForCAD","text":"private pure subroutine cmp_nc(this, dir) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: dir Calls proc~~cmp_nc~3~~CallsGraph proc~cmp_nc~3 nurbs_surface%cmp_nc interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~cmp_nc~3~~CalledByGraph proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3 nurbs_surface%set1 proc~set1~3->proc~cmp_nc~3 proc~set2~3 nurbs_surface%set2 proc~set2~3->proc~cmp_nc~3 none~set~3 nurbs_surface%set none~set~3->proc~set1~3 none~set~3->proc~set2~3 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->none~set~3 proc~set_c~3 nurbs_surface%set_C proc~set_c~3->none~set~3 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~3 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~3 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~3 program~compute_area compute_area program~compute_area->none~set~3 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area program~example3_surface example3_surface program~example3_surface->none~set~3 program~example3_surface->proc~elevate_degree~3 program~example3_surface->proc~insert_knots~3 program~example3_surface->proc~remove_knots~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~3 proc~cmp_area->proc~ansatz~3 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/cmp_nc~3.html"},{"title":"create – ForCAD","text":"private pure subroutine create(this, res1, res2, Xt1, Xt2, Xt) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt (:,:) Calls proc~~create~3~~CallsGraph proc~create~3 nurbs_surface%create interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 interface~ndgrid ndgrid proc~create~3->interface~ndgrid proc~is_rational~3 nurbs_surface%is_rational proc~create~3->proc~is_rational~3 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~create~3~~CalledByGraph proc~create~3 nurbs_surface%create proc~nearest_point2~3 nurbs_surface%nearest_point2 proc~nearest_point2~3->proc~create~3 program~example3_surface example3_surface program~example3_surface->proc~create~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~create~3 program~example_ppm1 example_ppm1 program~example_ppm1->proc~create~3 program~example_ppm2 example_ppm2 program~example_ppm2->proc~create~3 program~example_ppm3 example_ppm3 program~example_ppm3->proc~create~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~create~3 program~nearest_point_2d->proc~nearest_point2~3 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~create~3 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~create~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~create~3 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~create~3 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~create~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/create~3.html"},{"title":"derivative2_scalar – ForCAD","text":"private pure subroutine derivative2_scalar(this, Xt, d2Tgc, dTgc, Tgc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) Calls proc~~derivative2_scalar~3~~CallsGraph proc~derivative2_scalar~3 nurbs_surface%derivative2_scalar interface~compute_d2tgc~3 compute_d2Tgc proc~derivative2_scalar~3->interface~compute_d2tgc~3 proc~is_rational~3 nurbs_surface%is_rational proc~derivative2_scalar~3->proc~is_rational~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative2_scalar~3~~CalledByGraph proc~derivative2_scalar~3 nurbs_surface%derivative2_scalar none~derivative2~3 nurbs_surface%derivative2 none~derivative2~3->proc~derivative2_scalar~3 proc~nearest_point2~3 nurbs_surface%nearest_point2 proc~nearest_point2~3->none~derivative2~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point2~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative2_scalar~3.html"},{"title":"derivative2_vector – ForCAD","text":"private pure subroutine derivative2_vector(this, res1, res2, Xt1, Xt2, d2Tgc, dTgc, Tgc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) Calls proc~~derivative2_vector~3~~CallsGraph proc~derivative2_vector~3 nurbs_surface%derivative2_vector interface~compute_d2tgc~3 compute_d2Tgc proc~derivative2_vector~3->interface~compute_d2tgc~3 interface~ndgrid ndgrid proc~derivative2_vector~3->interface~ndgrid proc~is_rational~3 nurbs_surface%is_rational proc~derivative2_vector~3->proc~is_rational~3 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative2_vector~3~~CalledByGraph proc~derivative2_vector~3 nurbs_surface%derivative2_vector none~derivative2~3 nurbs_surface%derivative2 none~derivative2~3->proc~derivative2_vector~3 proc~nearest_point2~3 nurbs_surface%nearest_point2 proc~nearest_point2~3->none~derivative2~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point2~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative2_vector~3.html"},{"title":"derivative_scalar – ForCAD","text":"private pure subroutine derivative_scalar(this, Xt, dTgc, Tgc, elem) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) Calls proc~~derivative_scalar~3~~CallsGraph proc~derivative_scalar~3 nurbs_surface%derivative_scalar interface~compute_dtgc~3 compute_dTgc proc~derivative_scalar~3->interface~compute_dtgc~3 proc~is_rational~3 nurbs_surface%is_rational proc~derivative_scalar~3->proc~is_rational~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative_scalar~3~~CalledByGraph proc~derivative_scalar~3 nurbs_surface%derivative_scalar none~derivative~3 nurbs_surface%derivative none~derivative~3->proc~derivative_scalar~3 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->none~derivative~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 program~compute_area compute_area program~compute_area->proc~cmp_area Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative_scalar~3.html"},{"title":"derivative_vector – ForCAD","text":"private pure subroutine derivative_vector(this, res1, res2, Xt1, Xt2, dTgc, Tgc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) Calls proc~~derivative_vector~3~~CallsGraph proc~derivative_vector~3 nurbs_surface%derivative_vector interface~compute_dtgc~3 compute_dTgc proc~derivative_vector~3->interface~compute_dtgc~3 interface~ndgrid ndgrid proc~derivative_vector~3->interface~ndgrid proc~is_rational~3 nurbs_surface%is_rational proc~derivative_vector~3->proc~is_rational~3 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~derivative_vector~3~~CalledByGraph proc~derivative_vector~3 nurbs_surface%derivative_vector none~derivative~3 nurbs_surface%derivative none~derivative~3->proc~derivative_vector~3 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->none~derivative~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 program~compute_area compute_area program~compute_area->proc~cmp_area Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/derivative_vector~3.html"},{"title":"elevate_degree – ForCAD","text":"private pure subroutine elevate_degree(this, dir, t) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir integer, intent(in) :: t Calls proc~~elevate_degree~3~~CallsGraph proc~elevate_degree~3 nurbs_surface%elevate_degree none~get_knot~3 nurbs_surface%get_knot proc~elevate_degree~3->none~get_knot~3 none~set~3 nurbs_surface%set proc~elevate_degree~3->none~set~3 proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree~3->proc~elevate_degree_a_5_9 proc~is_rational~3 nurbs_surface%is_rational proc~elevate_degree~3->proc~is_rational~3 proc~get_knot_all~3 nurbs_surface%get_knot_all none~get_knot~3->proc~get_knot_all~3 proc~get_knoti~3 nurbs_surface%get_knoti none~get_knot~3->proc~get_knoti~3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 interface~compute_multiplicity compute_multiplicity proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~bincoeff bincoeff proc~elevate_degree_a_5_9->proc~bincoeff proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~factln factln proc~bincoeff->proc~factln proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~elevate_degree~3~~CalledByGraph proc~elevate_degree~3 nurbs_surface%elevate_degree program~example3_surface example3_surface program~example3_surface->proc~elevate_degree~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/elevate_degree~3.html"},{"title":"export_Xc – ForCAD","text":"private impure subroutine export_Xc(this, filename) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this character(len=*), intent(in) :: filename Calls proc~~export_xc~3~~CallsGraph proc~export_xc~3 nurbs_surface%export_Xc proc~cmp_elem_xc_vis~3 nurbs_surface%cmp_elem_Xc_vis proc~export_xc~3->proc~cmp_elem_xc_vis~3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~export_xc~3~~CalledByGraph proc~export_xc~3 nurbs_surface%export_Xc program~example3_surface example3_surface program~example3_surface->proc~export_xc~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~export_xc~3 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~export_xc~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~export_xc~3 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~export_xc~3 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~export_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/export_xc~3.html"},{"title":"export_Xg – ForCAD","text":"private impure subroutine export_Xg(this, filename) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this character(len=*), intent(in) :: filename Calls proc~~export_xg~3~~CallsGraph proc~export_xg~3 nurbs_surface%export_Xg proc~cmp_elem_xg_vis~3 nurbs_surface%cmp_elem_Xg_vis proc~export_xg~3->proc~cmp_elem_xg_vis~3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~export_xg~3~~CalledByGraph proc~export_xg~3 nurbs_surface%export_Xg program~example3_surface example3_surface program~example3_surface->proc~export_xg~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~export_xg~3 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~export_xg~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~export_xg~3 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~export_xg~3 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~export_xg~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/export_xg~3.html"},{"title":"finalize – ForCAD","text":"private pure subroutine finalize(this) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this Called by proc~~finalize~3~~CalledByGraph proc~finalize~3 nurbs_surface%finalize proc~nearest_point2~3 nurbs_surface%nearest_point2 proc~nearest_point2~3->proc~finalize~3 program~example3_surface example3_surface program~example3_surface->proc~finalize~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~finalize~3 program~example_ppm1 example_ppm1 program~example_ppm1->proc~finalize~3 program~example_ppm2 example_ppm2 program~example_ppm2->proc~finalize~3 program~example_ppm3 example_ppm3 program~example_ppm3->proc~finalize~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~finalize~3 program~nearest_point_2d->proc~nearest_point2~3 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~finalize~3 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~finalize~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~finalize~3 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~finalize~3 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~finalize~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/finalize~3.html"},{"title":"insert_knots – ForCAD","text":"private pure subroutine insert_knots(this, dir, Xth, r) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) Calls proc~~insert_knots~3~~CallsGraph proc~insert_knots~3 nurbs_surface%insert_knots interface~compute_multiplicity compute_multiplicity proc~insert_knots~3->interface~compute_multiplicity none~get_knot~3 nurbs_surface%get_knot proc~insert_knots~3->none~get_knot~3 none~set~3 nurbs_surface%set proc~insert_knots~3->none~set~3 proc~findspan findspan proc~insert_knots~3->proc~findspan proc~insert_knot_a_5_1 insert_knot_A_5_1 proc~insert_knots~3->proc~insert_knot_a_5_1 proc~is_rational~3 nurbs_surface%is_rational proc~insert_knots~3->proc~is_rational~3 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_knot_all~3 nurbs_surface%get_knot_all none~get_knot~3->proc~get_knot_all~3 proc~get_knoti~3 nurbs_surface%get_knoti none~get_knot~3->proc~get_knoti~3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~insert_knots~3~~CalledByGraph proc~insert_knots~3 nurbs_surface%insert_knots program~example3_surface example3_surface program~example3_surface->proc~insert_knots~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/insert_knots~3.html"},{"title":"modify_Wc – ForCAD","text":"private pure subroutine modify_Wc(this, W, num) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num Calls proc~~modify_wc~3~~CallsGraph proc~modify_wc~3 nurbs_surface%modify_Wc none~get_knot~3 nurbs_surface%get_knot proc~modify_wc~3->none~get_knot~3 none~get_wc~3 nurbs_surface%get_Wc proc~modify_wc~3->none~get_wc~3 none~get_xc~3 nurbs_surface%get_Xc proc~modify_wc~3->none~get_xc~3 none~set~3 nurbs_surface%set proc~modify_wc~3->none~set~3 proc~get_knot_all~3 nurbs_surface%get_knot_all none~get_knot~3->proc~get_knot_all~3 proc~get_knoti~3 nurbs_surface%get_knoti none~get_knot~3->proc~get_knoti~3 proc~get_wc_all~3 nurbs_surface%get_Wc_all none~get_wc~3->proc~get_wc_all~3 proc~get_wci~3 nurbs_surface%get_Wci none~get_wc~3->proc~get_wci~3 proc~get_xc_all~3 nurbs_surface%get_Xc_all none~get_xc~3->proc~get_xc_all~3 proc~get_xcid~3 nurbs_surface%get_Xcid none~get_xc~3->proc~get_xcid~3 proc~get_xci~3 nurbs_surface%get_Xci none~get_xc~3->proc~get_xci~3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/modify_wc~3.html"},{"title":"modify_Xc – ForCAD","text":"private pure subroutine modify_Xc(this, X, num, dir) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir Calls proc~~modify_xc~3~~CallsGraph proc~modify_xc~3 nurbs_surface%modify_Xc none~get_knot~3 nurbs_surface%get_knot proc~modify_xc~3->none~get_knot~3 none~get_wc~3 nurbs_surface%get_Wc proc~modify_xc~3->none~get_wc~3 none~get_xc~3 nurbs_surface%get_Xc proc~modify_xc~3->none~get_xc~3 none~set~3 nurbs_surface%set proc~modify_xc~3->none~set~3 proc~get_knot_all~3 nurbs_surface%get_knot_all none~get_knot~3->proc~get_knot_all~3 proc~get_knoti~3 nurbs_surface%get_knoti none~get_knot~3->proc~get_knoti~3 proc~get_wc_all~3 nurbs_surface%get_Wc_all none~get_wc~3->proc~get_wc_all~3 proc~get_wci~3 nurbs_surface%get_Wci none~get_wc~3->proc~get_wci~3 proc~get_xc_all~3 nurbs_surface%get_Xc_all none~get_xc~3->proc~get_xc_all~3 proc~get_xcid~3 nurbs_surface%get_Xcid none~get_xc~3->proc~get_xcid~3 proc~get_xci~3 nurbs_surface%get_Xci none~get_xc~3->proc~get_xci~3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~modify_xc~3~~CalledByGraph proc~modify_xc~3 nurbs_surface%modify_Xc program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/modify_xc~3.html"},{"title":"nearest_point – ForCAD","text":"private pure subroutine nearest_point(this, point_Xg, nearest_Xg, nearest_Xt, id) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xt (:) integer, intent(out), optional :: id Calls proc~~nearest_point~3~~CallsGraph proc~nearest_point~3 nurbs_surface%nearest_point interface~nearest_point_help_2d nearest_point_help_2d proc~nearest_point~3->interface~nearest_point_help_2d Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~nearest_point~3~~CalledByGraph proc~nearest_point~3 nurbs_surface%nearest_point proc~nearest_point2~3 nurbs_surface%nearest_point2 proc~nearest_point2~3->proc~nearest_point~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point~3 program~nearest_point_2d->proc~nearest_point2~3 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~nearest_point~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/nearest_point~3.html"},{"title":"nearest_point2 – ForCAD","text":"private impure subroutine nearest_point2(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt (2) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) Calls proc~~nearest_point2~3~~CallsGraph proc~nearest_point2~3 nurbs_surface%nearest_point2 none~derivative2~3 nurbs_surface%derivative2 proc~nearest_point2~3->none~derivative2~3 proc~cmp_xg~3 nurbs_surface%cmp_Xg proc~nearest_point2~3->proc~cmp_xg~3 proc~create~3 nurbs_surface%create proc~nearest_point2~3->proc~create~3 proc~finalize~3 nurbs_surface%finalize proc~nearest_point2~3->proc~finalize~3 proc~inv inv proc~nearest_point2~3->proc~inv proc~nearest_point~3 nurbs_surface%nearest_point proc~nearest_point2~3->proc~nearest_point~3 proc~derivative2_scalar~3 nurbs_surface%derivative2_scalar none~derivative2~3->proc~derivative2_scalar~3 proc~derivative2_vector~3 nurbs_surface%derivative2_vector none~derivative2~3->proc~derivative2_vector~3 interface~compute_xg~3 compute_Xg proc~cmp_xg~3->interface~compute_xg~3 proc~is_rational~3 nurbs_surface%is_rational proc~cmp_xg~3->proc~is_rational~3 proc~create~3->interface~compute_xg~3 interface~ndgrid ndgrid proc~create~3->interface~ndgrid proc~create~3->proc~is_rational~3 proc~inv->proc~inv proc~det det proc~inv->proc~det interface~nearest_point_help_2d nearest_point_help_2d proc~nearest_point~3->interface~nearest_point_help_2d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~derivative2_scalar~3->proc~is_rational~3 interface~compute_d2tgc~3 compute_d2Tgc proc~derivative2_scalar~3->interface~compute_d2tgc~3 proc~derivative2_vector~3->interface~ndgrid proc~derivative2_vector~3->proc~is_rational~3 proc~derivative2_vector~3->interface~compute_d2tgc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~nearest_point2~3~~CalledByGraph proc~nearest_point2~3 nurbs_surface%nearest_point2 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point2~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/nearest_point2~3.html"},{"title":"remove_knots – ForCAD","text":"private pure subroutine remove_knots(this, dir, Xth, r) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) Calls proc~~remove_knots~3~~CallsGraph proc~remove_knots~3 nurbs_surface%remove_knots interface~compute_multiplicity compute_multiplicity proc~remove_knots~3->interface~compute_multiplicity none~get_knot~3 nurbs_surface%get_knot proc~remove_knots~3->none~get_knot~3 none~set~3 nurbs_surface%set proc~remove_knots~3->none~set~3 proc~findspan findspan proc~remove_knots~3->proc~findspan proc~is_rational~3 nurbs_surface%is_rational proc~remove_knots~3->proc~is_rational~3 proc~remove_knots_a_5_8 remove_knots_A_5_8 proc~remove_knots~3->proc~remove_knots_a_5_8 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_knot_all~3 nurbs_surface%get_knot_all none~get_knot~3->proc~get_knot_all~3 proc~get_knoti~3 nurbs_surface%get_knoti none~get_knot~3->proc~get_knoti~3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~remove_knots~3~~CalledByGraph proc~remove_knots~3 nurbs_surface%remove_knots program~example3_surface example3_surface program~example3_surface->proc~remove_knots~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/remove_knots~3.html"},{"title":"rotate_Xc – ForCAD","text":"private pure subroutine rotate_Xc(this, alpha, beta, theta) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta Calls proc~~rotate_xc~3~~CallsGraph proc~rotate_xc~3 nurbs_surface%rotate_Xc proc~rotation rotation proc~rotate_xc~3->proc~rotation cosd cosd proc~rotation->cosd sind sind proc~rotation->sind Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~rotate_xc~3~~CalledByGraph proc~rotate_xc~3 nurbs_surface%rotate_Xc program~example3_surface example3_surface program~example3_surface->proc~rotate_xc~3 program~example_ppm2 example_ppm2 program~example_ppm2->proc~rotate_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/rotate_xc~3.html"},{"title":"rotate_Xg – ForCAD","text":"private pure subroutine rotate_Xg(this, alpha, beta, theta) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta Calls proc~~rotate_xg~3~~CallsGraph proc~rotate_xg~3 nurbs_surface%rotate_Xg proc~rotation rotation proc~rotate_xg~3->proc~rotation cosd cosd proc~rotation->cosd sind sind proc~rotation->sind Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~rotate_xg~3~~CalledByGraph proc~rotate_xg~3 nurbs_surface%rotate_Xg program~example3_surface example3_surface program~example3_surface->proc~rotate_xg~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/rotate_xg~3.html"},{"title":"set1 – ForCAD","text":"private pure subroutine set1(this, knot1, knot2, Xc, Wc) Set knot vectors, control points and weights for the NURBS surface object. Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set1~3~~CallsGraph proc~set1~3 nurbs_surface%set1 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set1~3~~CalledByGraph proc~set1~3 nurbs_surface%set1 none~set~3 nurbs_surface%set none~set~3->proc~set1~3 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->none~set~3 proc~set_c~3 nurbs_surface%set_C proc~set_c~3->none~set~3 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~3 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~3 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~3 program~compute_area compute_area program~compute_area->none~set~3 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area program~example3_surface example3_surface program~example3_surface->none~set~3 program~example3_surface->proc~elevate_degree~3 program~example3_surface->proc~insert_knots~3 program~example3_surface->proc~remove_knots~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~3 proc~cmp_area->proc~ansatz~3 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set1~3.html"},{"title":"set2 – ForCAD","text":"private pure subroutine set2(this, Xth_dir1, Xth_dir2, degree, continuity1, continuity2, Xc, Wc) Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir1 (:) real(kind=rk), intent(in), contiguous :: Xth_dir2 (:) integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: continuity1 (:) integer, intent(in), contiguous :: continuity2 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set2~3~~CallsGraph proc~set2~3 nurbs_surface%set2 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set2~3~~CalledByGraph proc~set2~3 nurbs_surface%set2 none~set~3 nurbs_surface%set none~set~3->proc~set2~3 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->none~set~3 proc~set_c~3 nurbs_surface%set_C proc~set_c~3->none~set~3 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~3 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~3 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~3 program~compute_area compute_area program~compute_area->none~set~3 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area program~example3_surface example3_surface program~example3_surface->none~set~3 program~example3_surface->proc~elevate_degree~3 program~example3_surface->proc~insert_knots~3 program~example3_surface->proc~remove_knots~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~3 proc~cmp_area->proc~ansatz~3 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set2~3.html"},{"title":"set3 – ForCAD","text":"private pure subroutine set3(this, nc, Xc, Wc) Set Bezier or Rational Bezier surface using control points and weights. Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set3~3~~CallsGraph proc~set3~3 nurbs_surface%set3 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~get_multiplicity~3->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set3~3~~CalledByGraph proc~set3~3 nurbs_surface%set3 none~set~3 nurbs_surface%set none~set~3->proc~set3~3 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->none~set~3 proc~set_c~3 nurbs_surface%set_C proc~set_c~3->none~set~3 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~3 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~3 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~3 program~compute_area compute_area program~compute_area->none~set~3 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area program~example3_surface example3_surface program~example3_surface->none~set~3 program~example3_surface->proc~elevate_degree~3 program~example3_surface->proc~insert_knots~3 program~example3_surface->proc~remove_knots~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~3 proc~cmp_area->proc~ansatz~3 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set3~3.html"},{"title":"set4 – ForCAD","text":"private pure subroutine set4(this, degree, nc, Xc, Wc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Called by proc~~set4~3~~CalledByGraph proc~set4~3 nurbs_surface%set4 none~set~3 nurbs_surface%set none~set~3->proc~set4~3 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->none~set~3 proc~set_c~3 nurbs_surface%set_C proc~set_c~3->none~set~3 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~3 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~3 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~3 program~compute_area compute_area program~compute_area->none~set~3 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area program~example3_surface example3_surface program~example3_surface->none~set~3 program~example3_surface->proc~elevate_degree~3 program~example3_surface->proc~insert_knots~3 program~example3_surface->proc~remove_knots~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~3 proc~cmp_area->proc~ansatz~3 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set4~3.html"},{"title":"set_C – ForCAD","text":"private pure subroutine set_C(this, center, radius1, radius2) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 Calls proc~~set_c~3~~CallsGraph proc~set_c~3 nurbs_surface%set_C none~set~3 nurbs_surface%set proc~set_c~3->none~set~3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_c~3~~CalledByGraph proc~set_c~3 nurbs_surface%set_C program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_c~3.html"},{"title":"set_elem – ForCAD","text":"private pure subroutine set_elem(this, elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:)","tags":"","loc":"proc/set_elem~3.html"},{"title":"set_elem_Xc_vis – ForCAD","text":"private pure subroutine set_elem_Xc_vis(this, elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:)","tags":"","loc":"proc/set_elem_xc_vis~3.html"},{"title":"set_elem_Xg_vis – ForCAD","text":"private pure subroutine set_elem_Xg_vis(this, elemConn) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:)","tags":"","loc":"proc/set_elem_xg_vis~3.html"},{"title":"set_half_ring – ForCAD","text":"private pure subroutine set_half_ring(this, center, radius1, radius2) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 Calls proc~~set_half_ring~2~~CallsGraph proc~set_half_ring~2 nurbs_surface%set_half_ring none~set~3 nurbs_surface%set proc~set_half_ring~2->none~set~3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_half_ring~2~~CalledByGraph proc~set_half_ring~2 nurbs_surface%set_half_ring program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_half_ring~2.html"},{"title":"set_ring – ForCAD","text":"private pure subroutine set_ring(this, center, radius1, radius2) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 Calls proc~~set_ring~2~~CallsGraph proc~set_ring~2 nurbs_surface%set_ring none~set~3 nurbs_surface%set proc~set_ring~2->none~set~3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_ring~2~~CalledByGraph proc~set_ring~2 nurbs_surface%set_ring program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_ring~2.html"},{"title":"set_tetragon – ForCAD","text":"private pure subroutine set_tetragon(this, L, nc, Wc) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: L (2) integer, intent(in) :: nc (2) real(kind=rk), intent(in), optional, contiguous :: Wc (:) Calls proc~~set_tetragon~~CallsGraph proc~set_tetragon nurbs_surface%set_tetragon none~set~3 nurbs_surface%set proc~set_tetragon->none~set~3 proc~tetragon_xc tetragon_Xc proc~set_tetragon->proc~tetragon_xc proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Called by proc~~set_tetragon~~CalledByGraph proc~set_tetragon nurbs_surface%set_tetragon program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/set_tetragon.html"},{"title":"show – ForCAD","text":"private impure subroutine show(this, vtkfile_Xc, vtkfile_Xg) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg Called by proc~~show~3~~CalledByGraph proc~show~3 nurbs_surface%show program~example3_surface example3_surface program~example3_surface->proc~show~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~show~3 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~show~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~show~3 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~show~3 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~show~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/show~3.html"},{"title":"translate_Xc – ForCAD","text":"private pure subroutine translate_Xc(this, vec) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) Called by proc~~translate_xc~3~~CalledByGraph proc~translate_xc~3 nurbs_surface%translate_Xc program~example3_surface example3_surface program~example3_surface->proc~translate_xc~3 program~example_ppm2 example_ppm2 program~example_ppm2->proc~translate_xc~3 program~example_ppm3 example_ppm3 program~example_ppm3->proc~translate_xc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/translate_xc~3.html"},{"title":"translate_Xg – ForCAD","text":"private pure subroutine translate_Xg(this, vec) Type Bound nurbs_surface Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) Called by proc~~translate_xg~3~~CalledByGraph proc~translate_xg~3 nurbs_surface%translate_Xg program~example3_surface example3_surface program~example3_surface->proc~translate_xg~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"proc/translate_xg~3.html"},{"title":"compute_Tgc – ForCAD","text":"private interface compute_Tgc Called by interface~~compute_tgc~3~~CalledByGraph interface~compute_tgc~3 compute_Tgc proc~basis_scalar~3 nurbs_surface%basis_scalar proc~basis_scalar~3->interface~compute_tgc~3 proc~basis_vector~3 nurbs_surface%basis_vector proc~basis_vector~3->interface~compute_tgc~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Functions private pure function compute_Tgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Tgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:)","tags":"","loc":"interface/compute_tgc~3.html"},{"title":"compute_Xg – ForCAD","text":"private interface compute_Xg Called by interface~~compute_xg~3~~CalledByGraph interface~compute_xg~3 compute_Xg proc~cmp_xg~3 nurbs_surface%cmp_Xg proc~cmp_xg~3->interface~compute_xg~3 proc~create~3 nurbs_surface%create proc~create~3->interface~compute_xg~3 proc~nearest_point2~3 nurbs_surface%nearest_point2 proc~nearest_point2~3->proc~cmp_xg~3 proc~nearest_point2~3->proc~create~3 program~example3_surface example3_surface program~example3_surface->proc~create~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->proc~create~3 program~example_ppm1 example_ppm1 program~example_ppm1->proc~create~3 program~example_ppm2 example_ppm2 program~example_ppm2->proc~create~3 program~example_ppm3 example_ppm3 program~example_ppm3->proc~create~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~create~3 program~nearest_point_2d->proc~nearest_point2~3 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~create~3 program~shape_c_2d shape_C_2d program~shape_c_2d->proc~create~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~create~3 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~create~3 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~create~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Functions private pure function compute_Xg_bspline_2d(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_bspline_2d_1point(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Xg_nurbs_2d(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_nurbs_2d_1point(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:)","tags":"","loc":"interface/compute_xg~3.html"},{"title":"compute_d2Tgc – ForCAD","text":"private interface compute_d2Tgc Called by interface~~compute_d2tgc~3~~CalledByGraph interface~compute_d2tgc~3 compute_d2Tgc proc~derivative2_scalar~3 nurbs_surface%derivative2_scalar proc~derivative2_scalar~3->interface~compute_d2tgc~3 proc~derivative2_vector~3 nurbs_surface%derivative2_vector proc~derivative2_vector~3->interface~compute_d2tgc~3 none~derivative2~3 nurbs_surface%derivative2 none~derivative2~3->proc~derivative2_scalar~3 none~derivative2~3->proc~derivative2_vector~3 proc~nearest_point2~3 nurbs_surface%nearest_point2 proc~nearest_point2~3->none~derivative2~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point2~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Subroutines private pure subroutine compute_d2Tgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, nc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_d2Tgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:)","tags":"","loc":"interface/compute_d2tgc~3.html"},{"title":"compute_dTgc – ForCAD","text":"private interface compute_dTgc Called by interface~~compute_dtgc~3~~CalledByGraph interface~compute_dtgc~3 compute_dTgc proc~derivative_scalar~3 nurbs_surface%derivative_scalar proc~derivative_scalar~3->interface~compute_dtgc~3 proc~derivative_vector~3 nurbs_surface%derivative_vector proc~derivative_vector~3->interface~compute_dtgc~3 none~derivative~3 nurbs_surface%derivative none~derivative~3->proc~derivative_scalar~3 none~derivative~3->proc~derivative_vector~3 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->none~derivative~3 proc~cmp_area nurbs_surface%cmp_area proc~cmp_area->proc~ansatz~3 program~compute_area compute_area program~compute_area->proc~cmp_area Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Subroutines private pure subroutine compute_dTgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, nc, f_dTgc, f_Tgc, elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in) :: elem (:) private pure subroutine compute_dTgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, nc, f_ng, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_dTgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in) :: elem (:) private pure subroutine compute_dTgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:)","tags":"","loc":"interface/compute_dtgc~3.html"},{"title":"nearest_point_help_2d – ForCAD","text":"interface Called by interface~~nearest_point_help_2d~~CalledByGraph interface~nearest_point_help_2d nearest_point_help_2d proc~nearest_point~3 nurbs_surface%nearest_point proc~nearest_point~3->interface~nearest_point_help_2d proc~nearest_point2~3 nurbs_surface%nearest_point2 proc~nearest_point2~3->proc~nearest_point~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->proc~nearest_point~3 program~nearest_point_2d->proc~nearest_point2~3 program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~nearest_point~3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. private pure function nearest_point_help_2d(f_ng, f_Xg, f_point_Xg) result(f_distances) Arguments Type Intent Optional Attributes Name integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Xg (:,:) real(kind=rk), intent(in), contiguous :: f_point_Xg (:) Return Value real(kind=rk),allocatable,(:)","tags":"","loc":"interface/nearest_point_help_2d.html"},{"title":"forcad – ForCAD","text":"Uses forcad_nurbs_surface forcad_utils forcad_nurbs_curve forcad_nurbs_volume module~~forcad~~UsesGraph module~forcad forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Used by module~~forcad~~UsedByGraph module~forcad forcad program~compute_area compute_area program~compute_area->module~forcad program~compute_length compute_length program~compute_length->module~forcad program~compute_volume compute_volume program~compute_volume->module~forcad program~example1_curve example1_curve program~example1_curve->module~forcad program~example3_surface example3_surface program~example3_surface->module~forcad program~example3_volume example3_volume program~example3_volume->module~forcad program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->module~forcad program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->module~forcad program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->module~forcad program~example_ppm1 example_ppm1 program~example_ppm1->module~forcad program~example_ppm2 example_ppm2 program~example_ppm2->module~forcad program~example_ppm3 example_ppm3 program~example_ppm3->module~forcad program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->module~forcad program~nearest_point_1d nearest_point_1d program~nearest_point_1d->module~forcad program~nearest_point_2d nearest_point_2d program~nearest_point_2d->module~forcad program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->module~forcad program~nearest_point_3d nearest_point_3d program~nearest_point_3d->module~forcad program~shape_c_1d shape_C_1d program~shape_c_1d->module~forcad program~shape_c_2d shape_C_2d program~shape_c_2d->module~forcad program~shape_c_3d shape_C_3d program~shape_c_3d->module~forcad program~shape_circle shape_circle program~shape_circle->module~forcad program~shape_half_circle shape_half_circle program~shape_half_circle->module~forcad program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->module~forcad program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->module~forcad program~shape_hexahedron shape_hexahedron program~shape_hexahedron->module~forcad program~shape_ring_2d shape_ring_2d program~shape_ring_2d->module~forcad program~shape_ring_3d shape_ring_3d program~shape_ring_3d->module~forcad program~shape_tetragon shape_tetragon program~shape_tetragon->module~forcad Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs.","tags":"","loc":"module/forcad.html"},{"title":"forcad_nurbs_curve – ForCAD","text":"This module defines the 'nurbs_curve' type for representing a Non-Uniform Rational B-Spline (NURBS) curve. Uses forcad_utils module~~forcad_nurbs_curve~~UsesGraph module~forcad_nurbs_curve forcad_nurbs_curve module~forcad_utils forcad_utils module~forcad_nurbs_curve->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Used by module~~forcad_nurbs_curve~~UsedByGraph module~forcad_nurbs_curve forcad_nurbs_curve module~forcad forcad module~forcad->module~forcad_nurbs_curve program~compute_area compute_area program~compute_area->module~forcad program~compute_length compute_length program~compute_length->module~forcad program~compute_volume compute_volume program~compute_volume->module~forcad program~example1_curve example1_curve program~example1_curve->module~forcad program~example3_surface example3_surface program~example3_surface->module~forcad program~example3_volume example3_volume program~example3_volume->module~forcad program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->module~forcad program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->module~forcad program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->module~forcad program~example_ppm1 example_ppm1 program~example_ppm1->module~forcad program~example_ppm2 example_ppm2 program~example_ppm2->module~forcad program~example_ppm3 example_ppm3 program~example_ppm3->module~forcad program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->module~forcad program~nearest_point_1d nearest_point_1d program~nearest_point_1d->module~forcad program~nearest_point_2d nearest_point_2d program~nearest_point_2d->module~forcad program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->module~forcad program~nearest_point_3d nearest_point_3d program~nearest_point_3d->module~forcad program~shape_c_1d shape_C_1d program~shape_c_1d->module~forcad program~shape_c_2d shape_C_2d program~shape_c_2d->module~forcad program~shape_c_3d shape_C_3d program~shape_c_3d->module~forcad program~shape_circle shape_circle program~shape_circle->module~forcad program~shape_half_circle shape_half_circle program~shape_half_circle->module~forcad program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->module~forcad program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->module~forcad program~shape_hexahedron shape_hexahedron program~shape_hexahedron->module~forcad program~shape_ring_2d shape_ring_2d program~shape_ring_2d->module~forcad program~shape_ring_3d shape_ring_3d program~shape_ring_3d->module~forcad program~shape_tetragon shape_tetragon program~shape_tetragon->module~forcad Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Interfaces private        interface compute_Tgc private pure function compute_Tgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Tgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private        interface compute_Xg private pure function compute_Xg_bspline_1d(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_bspline_1d_1point(f_Xt, f_knot, f_degree, f_nc, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Xg_nurbs_1d(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_nurbs_1d_1point(f_Xt, f_knot, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private        interface compute_d2Tgc private pure subroutine compute_d2Tgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(out), allocatable :: f_d2Tgc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_d2Tgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private        interface compute_dTgc private pure subroutine compute_dTgc_bspline_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_dTgc, f_Tgc, f_elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(out), allocatable :: f_dTgc (:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in), optional :: f_elem (:) private pure subroutine compute_dTgc_bspline_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_dTgc_nurbs_1d_scalar(f_Xt, f_knot, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, f_elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: f_Xt real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in), optional :: f_elem (:) private pure subroutine compute_dTgc_nurbs_1d_vector(f_Xt, f_knot, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot (:) integer, intent(in) :: f_degree integer, intent(in) :: f_nc integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) interface private pure function nearest_point_help_1d(f_ng, f_Xg, f_point_Xg) result(f_distances) Arguments Type Intent Optional Attributes Name integer, intent(in) :: f_ng real(kind=rk), intent(in), contiguous :: f_Xg (:,:) real(kind=rk), intent(in), contiguous :: f_point_Xg (:) Return Value real(kind=rk), allocatable, (:) Derived Types type, public :: nurbs_curve Components Type Visibility Attributes Name Initial real(kind=rk), private, allocatable :: Wc (:) Weights for control points (1D array: [nc]) real(kind=rk), private, allocatable :: Xc (:,:) Control points (2D array: [nc, dim]) real(kind=rk), private, allocatable :: Xg (:,:) Geometry points (2D array: [ng, dim]) real(kind=rk), private, allocatable :: Xt (:) Evaluation points (1D array: [ng]) integer, private :: degree Degree (order) of the curve integer, private, allocatable :: elemConn (:,:) IGA element connectivity integer, private, allocatable :: elemConn_Xc_vis (:,:) Connectivity for visualization of control points integer, private, allocatable :: elemConn_Xg_vis (:,:) Connectivity for visualization of geometry points real(kind=rk), private, allocatable :: knot (:) Knot vector (1D array) integer, private :: nc Number of control points integer, private :: ng Number of geometry points Type-Bound Procedures procedure, public :: ansatz Compute the shape functions, derivative of shape functions and dL Read more… generic, public :: basis => basis_vector , basis_scalar Compute the basis functions of the NURBS curve Read more… procedure, public :: cmp_Xg Compute geometry points Read more… procedure, public :: cmp_degree Compute degree of the NURBS curve Read more… procedure, public :: cmp_elem Generate IGA element connectivity Read more… procedure, public :: cmp_elem_Xc_vis Generate connectivity for control points Read more… procedure, public :: cmp_elem_Xg_vis Generate connectivity for geometry points Read more… procedure, public :: cmp_length Compute the length of the NURBS curve Read more… procedure, public :: cmp_nc Compute number of required control points Read more… procedure, public :: create Generate geometry points Read more… generic, public :: derivative => derivative_vector , derivative_scalar Compute the derivative of the NURBS curve Read more… generic, public :: derivative2 => derivative2_vector , derivative2_scalar Compute the second derivative of the NURBS curve Read more… procedure, public :: elevate_degree Elevate the degree of the curve Read more… procedure, public :: export_Xc Export control points to VTK file Read more… procedure, public :: export_Xg Export geometry points to VTK file Read more… procedure, public :: finalize Finalize the NURBS curve object Read more… generic, public :: get_Wc => get_Wc_all , get_Wci Get weights Read more… generic, public :: get_Xc => get_Xc_all , get_Xci , get_Xcid Get control points Read more… generic, public :: get_Xg => get_Xg_all , get_Xgi , get_Xgid Get geometry points Read more… procedure, public :: get_Xt Get parameter values Read more… procedure, public :: get_continuity Compute and return the continuity of the curve Read more… procedure, public :: get_degree Get degree of the NURBS curve Read more… procedure, public :: get_elem Get IGA element connectivity Read more… procedure, public :: get_elem_Xc_vis Get connectivity for control points Read more… procedure, public :: get_elem_Xg_vis Get connectivity for geometry points Read more… generic, public :: get_knot => get_knoti , get_knot_all Get knot vector Read more… procedure, public :: get_multiplicity Compute and return the multiplicity of the knots Read more… procedure, public :: get_nc Get number of control points Read more… procedure, public :: get_ng Get number of geometry points Read more… procedure, public :: insert_knots Insert knots into the knot vector Read more… procedure, public :: is_rational Check if the NURBS curve is rational Read more… procedure, public :: modify_Wc Modify weights Read more… procedure, public :: modify_Xc Modify control points Read more… procedure, public :: nearest_point Find the nearest point on the NURBS curve (Approximation) Read more… procedure, public :: nearest_point2 Find the nearest point on the NURBS curve (Minimization - Newton's method) Read more… procedure, public :: remove_knots Remove knots from the knot vector Read more… procedure, public :: rotate_Xc Rotate control points Read more… procedure, public :: rotate_Xg Rotate geometry points Read more… generic, public :: set => set1 , set1a , set2 , set3 , set4 Set NURBS curve Read more… procedure, public :: set1 Set knot vector, control points and weights for the NURBS curve object Read more… procedure, public :: set1a procedure, public :: set2 Set NURBS curve using nodes of parameter space, degree, continuity, control points and weights Read more… procedure, public :: set3 Set Bezier or Rational Bezier curve using control points and weights Read more… procedure, public :: set4 Set NURBS curve using degree, number of control points, control points and weights Read more… procedure, public :: set_C Set a C-shape Read more… procedure, public :: set_circle Set a circle Read more… procedure, public :: set_elem Set IGA element connectivity Read more… procedure, public :: set_elem_Xc_vis Set connectivity for control points Read more… procedure, public :: set_elem_Xg_vis Set connectivity for geometry points Read more… procedure, public :: set_half_circle Set a half circle Read more… procedure, public :: show Show the NURBS object using PyVista Read more… procedure, public :: translate_Xc Translate control points Read more… procedure, public :: translate_Xg Translate geometry points Read more… procedure, private :: basis_scalar Compute the basis functions of the NURBS curve Read more… procedure, private :: basis_vector Compute the basis functions of the NURBS curve Read more… procedure, private :: derivative2_scalar Compute the second derivative of the NURBS curve Read more… procedure, private :: derivative2_vector Compute the second derivative of the NURBS curve Read more… procedure, private :: derivative_scalar Compute the derivative of the NURBS curve Read more… procedure, private :: derivative_vector Compute the derivative of the NURBS curve Read more… procedure, private :: get_Wc_all Get all weights Read more… procedure, private :: get_Wci Get i-th weight Read more… procedure, private :: get_Xc_all Get all control points Read more… procedure, private :: get_Xci Get i-th control point Read more… procedure, private :: get_Xcid Get i-th control point in a specific direction Read more… procedure, private :: get_Xg_all Get all geometry points Read more… procedure, private :: get_Xgi Get i-th geometry point Read more… procedure, private :: get_Xgid Get i-th geometry point in a specific direction Read more… procedure, private :: get_knot_all Get all knot vectors Read more… procedure, private :: get_knoti Get i-th knot value Read more… Functions private pure function cmp_Xg (this, Xt) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this real(kind=rk), intent(in) :: Xt Return Value real(kind=rk), allocatable, (:) private pure function cmp_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function cmp_elem_Xc_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in), optional :: p Return Value integer, allocatable, (:,:) private pure function cmp_elem_Xg_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in), optional :: p Return Value integer, allocatable, (:,:) private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) private pure function get_Xt (this) result(Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) private pure function get_continuity (this) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:) private pure function get_degree (this) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer private pure function get_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_elem_Xc_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_elem_Xg_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_knot_all (this) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) private pure function get_knoti (this, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this integer, intent(in) :: i Return Value real(kind=rk) private pure function get_multiplicity (this) result(m) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer, allocatable, (:) private pure function get_nc (this) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer private pure function get_ng (this) result(ng) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value integer private pure function is_rational (this) result(r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this Return Value logical Subroutines private pure subroutine ansatz (this, ie, ig, Tgc, dTgc_dXg, dL) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dL private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: Tgc (:) private pure subroutine basis_vector (this, res, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) private pure subroutine cmp_degree (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this private pure subroutine cmp_length (this, length) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(out) :: length private pure subroutine cmp_nc (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this private pure subroutine create (this, res, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: d2Tgc (:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) private pure subroutine derivative2_vector (this, res, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: Xt real(kind=rk), intent(out), allocatable :: dTgc (:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) private pure subroutine derivative_vector (this, res, Xt, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), optional :: res real(kind=rk), intent(in), optional, contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine elevate_degree (this, t) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: t private impure subroutine export_Xc (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this character(len=*), intent(in) :: filename private impure subroutine export_Xg (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this character(len=*), intent(in) :: filename private pure subroutine finalize (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this private pure subroutine insert_knots (this, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) private pure subroutine modify_Wc (this, W, num) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num private pure subroutine modify_Xc (this, X, num, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir private pure subroutine nearest_point (this, point_Xg, nearest_Xg, nearest_Xt, id) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional :: nearest_Xt integer, intent(out), optional :: id private impure subroutine nearest_point2 (this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) private pure subroutine remove_knots (this, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) private pure subroutine rotate_Xc (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta private pure subroutine rotate_Xg (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta private pure subroutine set1 (this, knot, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vector, control points and weights for the NURBS curve object. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set1a (this, knot, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vector, control points and weights for the NURBS curve object. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Xc (:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set2 (this, Xth_dir, degree, continuity, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set NURBS curve using nodes of parameter space (Xth), degree, continuity, control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir (:) integer, intent(in) :: degree integer, intent(in), contiguous :: continuity (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set3 (this, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier curve using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in) :: degree integer, intent(in) :: nc real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set_C (this, center, radius) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius private pure subroutine set_circle (this, center, radius) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius private pure subroutine set_elem (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_elem_Xc_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_elem_Xg_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_half_circle (this, center, radius) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius private impure subroutine show (this, vtkfile_Xc, vtkfile_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg private pure subroutine translate_Xc (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) private pure subroutine translate_Xg (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_curve ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:)","tags":"","loc":"module/forcad_nurbs_curve.html"},{"title":"forcad_nurbs_volume – ForCAD","text":"This module defines the 'nurbs_volume' type for representing a Non-Uniform Rational B-Spline (NURBS) volume. Uses forcad_utils module~~forcad_nurbs_volume~~UsesGraph module~forcad_nurbs_volume forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Used by module~~forcad_nurbs_volume~~UsedByGraph module~forcad_nurbs_volume forcad_nurbs_volume module~forcad forcad module~forcad->module~forcad_nurbs_volume program~compute_area compute_area program~compute_area->module~forcad program~compute_length compute_length program~compute_length->module~forcad program~compute_volume compute_volume program~compute_volume->module~forcad program~example1_curve example1_curve program~example1_curve->module~forcad program~example3_surface example3_surface program~example3_surface->module~forcad program~example3_volume example3_volume program~example3_volume->module~forcad program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->module~forcad program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->module~forcad program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->module~forcad program~example_ppm1 example_ppm1 program~example_ppm1->module~forcad program~example_ppm2 example_ppm2 program~example_ppm2->module~forcad program~example_ppm3 example_ppm3 program~example_ppm3->module~forcad program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->module~forcad program~nearest_point_1d nearest_point_1d program~nearest_point_1d->module~forcad program~nearest_point_2d nearest_point_2d program~nearest_point_2d->module~forcad program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->module~forcad program~nearest_point_3d nearest_point_3d program~nearest_point_3d->module~forcad program~shape_c_1d shape_C_1d program~shape_c_1d->module~forcad program~shape_c_2d shape_C_2d program~shape_c_2d->module~forcad program~shape_c_3d shape_C_3d program~shape_c_3d->module~forcad program~shape_circle shape_circle program~shape_circle->module~forcad program~shape_half_circle shape_half_circle program~shape_half_circle->module~forcad program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->module~forcad program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->module~forcad program~shape_hexahedron shape_hexahedron program~shape_hexahedron->module~forcad program~shape_ring_2d shape_ring_2d program~shape_ring_2d->module~forcad program~shape_ring_3d shape_ring_3d program~shape_ring_3d->module~forcad program~shape_tetragon shape_tetragon program~shape_tetragon->module~forcad Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Interfaces private        interface compute_Tgc private pure function compute_Tgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Tgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private        interface compute_Xg private pure function compute_Xg_bspline_3d(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_bspline_3d_1point(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Xg_nurbs_3d(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_nurbs_3d_1point(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private        interface compute_d2Tgc private pure subroutine compute_d2Tgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_d2Tgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private        interface compute_dTgc private pure subroutine compute_dTgc_bspline_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_dTgc, f_Tgc, f_elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in), optional :: f_elem (:) private pure subroutine compute_dTgc_bspline_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_dTgc_nurbs_3d_scalar(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, f_elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in), optional :: f_elem (:) private pure subroutine compute_dTgc_nurbs_3d_vector(f_Xt, f_knot1, f_knot2, f_knot3, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) real(kind=rk), intent(in), contiguous :: f_knot3 (:) integer, intent(in) :: f_degree (3) integer, intent(in) :: f_nc (3) integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) interface private pure function nearest_point_help_3d(f_ng, f_Xg, f_point_Xg) result(f_distances) Arguments Type Intent Optional Attributes Name integer, intent(in) :: f_ng (3) real(kind=rk), intent(in), contiguous :: f_Xg (:,:) real(kind=rk), intent(in), contiguous :: f_point_Xg (:) Return Value real(kind=rk), allocatable, (:) Derived Types type, public :: nurbs_volume Components Type Visibility Attributes Name Initial real(kind=rk), private, allocatable :: Wc (:) Weights for the control points (1D array: [nc(1) nc(2) nc(3)]) real(kind=rk), private, allocatable :: Xc (:,:) Control points (2D array: [nc(1) nc(2) nc(3), dim]) real(kind=rk), private, allocatable :: Xg (:,:) Geometry points (2D array: [ng(1) ng(2) ng(3), dim]) real(kind=rk), private, allocatable :: Xt (:,:) Evaluation parameter values (2D array: [ng(1) ng(2) ng(3), dim] real(kind=rk), private, allocatable :: Xt1 (:) Evaluation parameter values in the first direction (1D array: [ng(1)]) real(kind=rk), private, allocatable :: Xt2 (:) Evaluation parameter values in the second direction (1D array: [ng(2)]) real(kind=rk), private, allocatable :: Xt3 (:) Evaluation parameter values in the third direction (1D array: [ng(3)]) integer, private :: degree (3) Degree (order) of the volume integer, private, allocatable :: elemConn (:,:) IGA element connectivity integer, private, allocatable :: elemConn_Xc_vis (:,:) Connectivity for visualization of control points integer, private, allocatable :: elemConn_Xg_vis (:,:) Connectivity for visualization of geometry points real(kind=rk), private, allocatable :: knot1 (:) Knot vector in the first direction (1D array) real(kind=rk), private, allocatable :: knot2 (:) Knot vector in the second direction (1D array) real(kind=rk), private, allocatable :: knot3 (:) Knot vector in the third direction (1D array) integer, private :: nc (3) Number of control points in each direction integer, private :: ng (3) Number of geometry points in each direction Type-Bound Procedures procedure, public :: ansatz Compute the shape functions, derivative of shape functions and dV Read more… generic, public :: basis => basis_vector , basis_scalar Compute the basis functions of the NURBS volume Read more… procedure, public :: cmp_Xg Compute geometry points Read more… procedure, public :: cmp_degree Compute degree of the NURBS volume Read more… procedure, public :: cmp_degreeFace Compute degrees of the faces Read more… procedure, public :: cmp_elem Generate IGA element connectivity Read more… procedure, public :: cmp_elemFace Compute faces of the IGA elements Read more… procedure, public :: cmp_elemFace_Xc_vis Compute faces of the control points Read more… procedure, public :: cmp_elemFace_Xg_vis Compute faces of the geometry points Read more… procedure, public :: cmp_elem_Xc_vis Generate connectivity for control points Read more… procedure, public :: cmp_elem_Xg_vis Generate connectivity for geometry points Read more… procedure, public :: cmp_nc Compute number of required control points Read more… procedure, public :: cmp_volume Compute the volume of the NURBS volume Read more… procedure, public :: create Generate geometry points Read more… generic, public :: derivative => derivative_vector , derivative_scalar Compute the derivative of the NURBS volume Read more… generic, public :: derivative2 => derivative2_vector , derivative2_scalar Compute the second derivative of the NURBS volume Read more… procedure, public :: elevate_degree Elevate the degree of the NURBS volume Read more… procedure, public :: export_Xc Export control points to VTK file Read more… procedure, public :: export_Xg Export geometry points to VTK file Read more… procedure, public :: finalize Finalize the NURBS volume object Read more… generic, public :: get_Wc => get_Wc_all , get_Wci Get weights Read more… generic, public :: get_Xc => get_Xc_all , get_Xci , get_Xcid Get control points Read more… generic, public :: get_Xg => get_Xg_all , get_Xgi , get_Xgid Get geometry points Read more… procedure, public :: get_Xt Get parameter values Read more… procedure, public :: get_continuity Compute and return the continuity of the NURBS volume Read more… generic, public :: get_degree => get_degree_all , get_degree_dir Get degree of the NURBS volume Read more… procedure, public :: get_elem Get IGA element connectivity Read more… procedure, public :: get_elem_Xc_vis Get connectivity for control points Read more… procedure, public :: get_elem_Xg_vis Get connectivity for geometry points Read more… generic, public :: get_knot => get_knoti , get_knot_all Get knot vector Read more… procedure, public :: get_multiplicity Compute and return the multiplicity of the knots Read more… generic, public :: get_nc => get_nc_all , get_nc_dir Get number of control points Read more… procedure, public :: get_ng Get number of geometry points Read more… procedure, public :: insert_knots Insert knots into the knot vector Read more… procedure, public :: is_rational Check if the NURBS volume is rational Read more… procedure, public :: modify_Wc Modify weights Read more… procedure, public :: modify_Xc Modify control points Read more… procedure, public :: nearest_point Find the nearest point on the NURBS volume (Approximation) Read more… procedure, public :: nearest_point2 Find the nearest point on the NURBS volume (Minimization - Newton's method) Read more… procedure, public :: put_to_nurbs Put a shape to a NURBS volume Read more… procedure, public :: remove_knots Remove knots from the knot vector Read more… procedure, public :: rotate_Xc Rotate control points Read more… procedure, public :: rotate_Xg Rotate geometry points Read more… generic, public :: set => set1 , set2 , set3 , set4 Set NURBS volume Read more… procedure, public :: set1 Set knot vectors, control points and weights for the NURBS volume object Read more… procedure, public :: set2 Set NURBS volume using nodes of parameter space, degree, continuity, control points and weights Read more… procedure, public :: set3 Set Bezier or Rational Bezier volume using control points and weights Read more… procedure, public :: set4 Set NURBS volume using degree, number of control points, control points and weights Read more… procedure, public :: set_C Set a C-shape Read more… procedure, public :: set_elem Set IGA element connectivity Read more… procedure, public :: set_elem_Xc_vis Set connectivity for control points Read more… procedure, public :: set_elem_Xg_vis Set connectivity for geometry points Read more… procedure, public :: set_half_ring Set a half ring Read more… procedure, public :: set_hexahedron Set a hexahedron Read more… procedure, public :: set_ring Set a ring Read more… procedure, public :: show Show the NURBS object using PyVista Read more… procedure, public :: translate_Xc Translate control points Read more… procedure, public :: translate_Xg Translate geometry points Read more… procedure, private :: basis_scalar Compute the basis functions of the NURBS volume Read more… procedure, private :: basis_vector Compute the basis functions of the NURBS volume Read more… procedure, private :: derivative2_scalar Compute the second derivative of the NURBS volume Read more… procedure, private :: derivative2_vector Compute the second derivative of the NURBS volume Read more… procedure, private :: derivative_scalar Compute the derivative of the NURBS volume Read more… procedure, private :: derivative_vector Compute the derivative of the NURBS volume Read more… procedure, private :: get_Wc_all Get all weights Read more… procedure, private :: get_Wci Get i-th weight Read more… procedure, private :: get_Xc_all Get all control points Read more… procedure, private :: get_Xci Get i-th control point Read more… procedure, private :: get_Xcid Get i-th control point in a specific direction Read more… procedure, private :: get_Xg_all Get all geometry points Read more… procedure, private :: get_Xgi Get i-th geometry point Read more… procedure, private :: get_Xgid Get i-th geometry point in a specific direction Read more… procedure, private :: get_degree_all Get degree of the NURBS volume in all directions Read more… procedure, private :: get_degree_dir Get degree of the NURBS volume in a specific direction Read more… procedure, private :: get_knot_all Get all knot vectors Read more… procedure, private :: get_knoti Get i-th knot value Read more… procedure, private :: get_nc_all Get number of control points in all directions Read more… procedure, private :: get_nc_dir Get number of control points in a specific direction Read more… Functions private pure function cmp_Xg (this, Xt) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this real(kind=rk), intent(in), contiguous :: Xt (:) Return Value real(kind=rk), allocatable, (:) private pure function cmp_degreeFace (this, face) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: face Return Value integer, (3) private pure function cmp_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function cmp_elemFace (this, elem, face) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause number of nodes in each direction Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:) private pure function cmp_elemFace_Xc_vis (this, elem, face) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause number of nodes in each direction Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:) private pure function cmp_elemFace_Xg_vis (this, elem, face) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause number of nodes in each direction Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: elem integer, intent(in) :: face Return Value integer, allocatable, (:) private pure function cmp_elem_Xc_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) private pure function cmp_elem_Xg_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) private pure function get_Xt (this, dir) result(Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) private pure function get_continuity (this, dir) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) private pure function get_degree_all (this) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) private pure function get_degree_dir (this, dir) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer private pure function get_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_elem_Xc_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_elem_Xg_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_knot_all (this, dir) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) private pure function get_knoti (this, dir, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir integer, intent(in) :: i Return Value real(kind=rk) private pure function get_multiplicity (this, dir) result(m) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) private pure function get_nc_all (this) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) private pure function get_nc_dir (this, dir) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this integer, intent(in) :: dir Return Value integer private pure function get_ng (this) result(ng) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value integer, (3) private pure function is_rational (this) result(r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this Return Value logical Subroutines private pure subroutine ansatz (this, ie, ig, Tgc, dTgc_dXg, dV) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dV private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:) private pure subroutine basis_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) private pure subroutine cmp_degree (this, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: dir private pure subroutine cmp_nc (this, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: dir private pure subroutine cmp_volume (this, volume) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(out) :: volume private pure subroutine create (this, res1, res2, res3, Xt1, Xt2, Xt3, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(in), optional, contiguous :: Xt (:,:) private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) private pure subroutine derivative2_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) private pure subroutine derivative_vector (this, res1, res2, res3, Xt1, Xt2, Xt3, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 integer, intent(in), optional :: res3 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt3 (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine elevate_degree (this, dir, t) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir integer, intent(in) :: t private impure subroutine export_Xc (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this character(len=*), intent(in) :: filename private impure subroutine export_Xg (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this character(len=*), intent(in) :: filename private pure subroutine finalize (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this private pure subroutine insert_knots (this, dir, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) private pure subroutine modify_Wc (this, W, num) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num private pure subroutine modify_Xc (this, X, num, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir private pure subroutine nearest_point (this, point_Xg, nearest_Xg, nearest_Xt, id) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xt (:) integer, intent(out), optional :: id private impure subroutine nearest_point2 (this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt (3) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) private pure subroutine put_to_nurbs (this, X, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: X (:,:) integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine remove_knots (this, dir, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) private pure subroutine rotate_Xc (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta private pure subroutine rotate_Xg (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta private pure subroutine set1 (this, knot1, knot2, knot3, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set control points and weights for the NURBS volume object. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: knot3 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set2 (this, Xth_dir1, Xth_dir2, Xth_dir3, degree, continuity1, continuity2, continuity3, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set control points and weights for the NURBS volume object. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir1 (:) real(kind=rk), intent(in), contiguous :: Xth_dir2 (:) real(kind=rk), intent(in), contiguous :: Xth_dir3 (:) integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: continuity1 (:) integer, intent(in), contiguous :: continuity2 (:) integer, intent(in), contiguous :: continuity3 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set3 (this, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier volume using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set_C (this, center, radius1, radius2, length) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length private pure subroutine set_elem (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_elem_Xc_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_elem_Xg_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_half_ring (this, center, radius1, radius2, length) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length private pure subroutine set_hexahedron (this, L, nc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: L (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set_ring (this, center, radius1, radius2, length) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 real(kind=rk), intent(in) :: length private impure subroutine show (this, vtkfile_Xc, vtkfile_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg private pure subroutine translate_Xc (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) private pure subroutine translate_Xg (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_volume ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:)","tags":"","loc":"module/forcad_nurbs_volume.html"},{"title":"forcad_utils – ForCAD","text":"This module contains parameters, functions and subroutines that are used in the library. Uses stdlib_quadrature module~~forcad_utils~~UsesGraph module~forcad_utils forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Used by module~~forcad_utils~~UsedByGraph module~forcad_utils forcad_utils module~forcad forcad module~forcad->module~forcad_utils module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils proc~compute_d2tgc_bspline_1d_scalar compute_d2Tgc_bspline_1d_scalar proc~compute_d2tgc_bspline_1d_scalar->module~forcad_utils proc~compute_d2tgc_bspline_1d_vector compute_d2Tgc_bspline_1d_vector proc~compute_d2tgc_bspline_1d_vector->module~forcad_utils proc~compute_d2tgc_bspline_2d_scalar compute_d2Tgc_bspline_2d_scalar proc~compute_d2tgc_bspline_2d_scalar->module~forcad_utils proc~compute_d2tgc_bspline_2d_vector compute_d2Tgc_bspline_2d_vector proc~compute_d2tgc_bspline_2d_vector->module~forcad_utils proc~compute_d2tgc_bspline_3d_scalar compute_d2Tgc_bspline_3d_scalar proc~compute_d2tgc_bspline_3d_scalar->module~forcad_utils proc~compute_d2tgc_bspline_3d_vector compute_d2Tgc_bspline_3d_vector proc~compute_d2tgc_bspline_3d_vector->module~forcad_utils proc~compute_d2tgc_nurbs_1d_scalar compute_d2Tgc_nurbs_1d_scalar proc~compute_d2tgc_nurbs_1d_scalar->module~forcad_utils proc~compute_d2tgc_nurbs_1d_vector compute_d2Tgc_nurbs_1d_vector proc~compute_d2tgc_nurbs_1d_vector->module~forcad_utils proc~compute_d2tgc_nurbs_2d_scalar compute_d2Tgc_nurbs_2d_scalar proc~compute_d2tgc_nurbs_2d_scalar->module~forcad_utils proc~compute_d2tgc_nurbs_2d_vector compute_d2Tgc_nurbs_2d_vector proc~compute_d2tgc_nurbs_2d_vector->module~forcad_utils proc~compute_d2tgc_nurbs_3d_scalar compute_d2Tgc_nurbs_3d_scalar proc~compute_d2tgc_nurbs_3d_scalar->module~forcad_utils proc~compute_d2tgc_nurbs_3d_vector compute_d2Tgc_nurbs_3d_vector proc~compute_d2tgc_nurbs_3d_vector->module~forcad_utils proc~compute_dtgc_bspline_1d_scalar compute_dTgc_bspline_1d_scalar proc~compute_dtgc_bspline_1d_scalar->module~forcad_utils proc~compute_dtgc_bspline_1d_vector compute_dTgc_bspline_1d_vector proc~compute_dtgc_bspline_1d_vector->module~forcad_utils proc~compute_dtgc_bspline_2d_scalar compute_dTgc_bspline_2d_scalar proc~compute_dtgc_bspline_2d_scalar->module~forcad_utils proc~compute_dtgc_bspline_2d_vector compute_dTgc_bspline_2d_vector proc~compute_dtgc_bspline_2d_vector->module~forcad_utils proc~compute_dtgc_bspline_3d_scalar compute_dTgc_bspline_3d_scalar proc~compute_dtgc_bspline_3d_scalar->module~forcad_utils proc~compute_dtgc_bspline_3d_vector compute_dTgc_bspline_3d_vector proc~compute_dtgc_bspline_3d_vector->module~forcad_utils proc~compute_dtgc_nurbs_1d_scalar compute_dTgc_nurbs_1d_scalar proc~compute_dtgc_nurbs_1d_scalar->module~forcad_utils proc~compute_dtgc_nurbs_1d_vector compute_dTgc_nurbs_1d_vector proc~compute_dtgc_nurbs_1d_vector->module~forcad_utils proc~compute_dtgc_nurbs_2d_scalar compute_dTgc_nurbs_2d_scalar proc~compute_dtgc_nurbs_2d_scalar->module~forcad_utils proc~compute_dtgc_nurbs_2d_vector compute_dTgc_nurbs_2d_vector proc~compute_dtgc_nurbs_2d_vector->module~forcad_utils proc~compute_dtgc_nurbs_3d_scalar compute_dTgc_nurbs_3d_scalar proc~compute_dtgc_nurbs_3d_scalar->module~forcad_utils proc~compute_dtgc_nurbs_3d_vector compute_dTgc_nurbs_3d_vector proc~compute_dtgc_nurbs_3d_vector->module~forcad_utils proc~compute_tgc_bspline_1d_scalar compute_Tgc_bspline_1d_scalar proc~compute_tgc_bspline_1d_scalar->module~forcad_utils proc~compute_tgc_bspline_1d_vector compute_Tgc_bspline_1d_vector proc~compute_tgc_bspline_1d_vector->module~forcad_utils proc~compute_tgc_bspline_2d_scalar compute_Tgc_bspline_2d_scalar proc~compute_tgc_bspline_2d_scalar->module~forcad_utils proc~compute_tgc_bspline_2d_vector compute_Tgc_bspline_2d_vector proc~compute_tgc_bspline_2d_vector->module~forcad_utils proc~compute_tgc_bspline_3d_scalar compute_Tgc_bspline_3d_scalar proc~compute_tgc_bspline_3d_scalar->module~forcad_utils proc~compute_tgc_bspline_3d_vector compute_Tgc_bspline_3d_vector proc~compute_tgc_bspline_3d_vector->module~forcad_utils proc~compute_tgc_nurbs_1d_scalar compute_Tgc_nurbs_1d_scalar proc~compute_tgc_nurbs_1d_scalar->module~forcad_utils proc~compute_tgc_nurbs_1d_vector compute_Tgc_nurbs_1d_vector proc~compute_tgc_nurbs_1d_vector->module~forcad_utils proc~compute_tgc_nurbs_2d_scalar compute_Tgc_nurbs_2d_scalar proc~compute_tgc_nurbs_2d_scalar->module~forcad_utils proc~compute_tgc_nurbs_2d_vector compute_Tgc_nurbs_2d_vector proc~compute_tgc_nurbs_2d_vector->module~forcad_utils proc~compute_tgc_nurbs_3d_scalar compute_Tgc_nurbs_3d_scalar proc~compute_tgc_nurbs_3d_scalar->module~forcad_utils proc~compute_tgc_nurbs_3d_vector compute_Tgc_nurbs_3d_vector proc~compute_tgc_nurbs_3d_vector->module~forcad_utils proc~compute_xg_bspline_1d compute_Xg_bspline_1d proc~compute_xg_bspline_1d->module~forcad_utils proc~compute_xg_bspline_1d_1point compute_Xg_bspline_1d_1point proc~compute_xg_bspline_1d_1point->module~forcad_utils proc~compute_xg_bspline_2d compute_Xg_bspline_2d proc~compute_xg_bspline_2d->module~forcad_utils proc~compute_xg_bspline_2d_1point compute_Xg_bspline_2d_1point proc~compute_xg_bspline_2d_1point->module~forcad_utils proc~compute_xg_bspline_3d compute_Xg_bspline_3d proc~compute_xg_bspline_3d->module~forcad_utils proc~compute_xg_bspline_3d_1point compute_Xg_bspline_3d_1point proc~compute_xg_bspline_3d_1point->module~forcad_utils proc~compute_xg_nurbs_1d compute_Xg_nurbs_1d proc~compute_xg_nurbs_1d->module~forcad_utils proc~compute_xg_nurbs_1d_1point compute_Xg_nurbs_1d_1point proc~compute_xg_nurbs_1d_1point->module~forcad_utils proc~compute_xg_nurbs_2d compute_Xg_nurbs_2d proc~compute_xg_nurbs_2d->module~forcad_utils proc~compute_xg_nurbs_2d_1point compute_Xg_nurbs_2d_1point proc~compute_xg_nurbs_2d_1point->module~forcad_utils proc~compute_xg_nurbs_3d compute_Xg_nurbs_3d proc~compute_xg_nurbs_3d->module~forcad_utils proc~compute_xg_nurbs_3d_1point compute_Xg_nurbs_3d_1point proc~compute_xg_nurbs_3d_1point->module~forcad_utils proc~nearest_point_help_1d nearest_point_help_1d proc~nearest_point_help_1d->module~forcad_utils proc~nearest_point_help_2d nearest_point_help_2d proc~nearest_point_help_2d->module~forcad_utils proc~nearest_point_help_3d nearest_point_help_3d proc~nearest_point_help_3d->module~forcad_utils program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->module~forcad_utils program~example_put_to_nurbs->module~forcad program~compute_area compute_area program~compute_area->module~forcad program~compute_length compute_length program~compute_length->module~forcad program~compute_volume compute_volume program~compute_volume->module~forcad program~example1_curve example1_curve program~example1_curve->module~forcad program~example3_surface example3_surface program~example3_surface->module~forcad program~example3_volume example3_volume program~example3_volume->module~forcad program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->module~forcad program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->module~forcad program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->module~forcad program~example_ppm1 example_ppm1 program~example_ppm1->module~forcad program~example_ppm2 example_ppm2 program~example_ppm2->module~forcad program~example_ppm3 example_ppm3 program~example_ppm3->module~forcad program~nearest_point_1d nearest_point_1d program~nearest_point_1d->module~forcad program~nearest_point_2d nearest_point_2d program~nearest_point_2d->module~forcad program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->module~forcad program~nearest_point_3d nearest_point_3d program~nearest_point_3d->module~forcad program~shape_c_1d shape_C_1d program~shape_c_1d->module~forcad program~shape_c_2d shape_C_2d program~shape_c_2d->module~forcad program~shape_c_3d shape_C_3d program~shape_c_3d->module~forcad program~shape_circle shape_circle program~shape_circle->module~forcad program~shape_half_circle shape_half_circle program~shape_half_circle->module~forcad program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->module~forcad program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->module~forcad program~shape_hexahedron shape_hexahedron program~shape_hexahedron->module~forcad program~shape_ring_2d shape_ring_2d program~shape_ring_2d->module~forcad program~shape_ring_3d shape_ring_3d program~shape_ring_3d->module~forcad program~shape_tetragon shape_tetragon program~shape_tetragon->module~forcad Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Visibility Attributes Name Initial integer, public, parameter :: rk = kind(1.0d0) Interfaces public        interface compute_multiplicity private pure function compute_multiplicity1 (knot) result(multiplicity) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: knot (:) Return Value integer, allocatable, (:) private pure function compute_multiplicity2 (knot, Xth) result(multiplicity) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in) :: Xth Return Value integer public        interface dyad private pure function dyad_t1_t1 (a, b) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: a (:) real(kind=rk), intent(in), contiguous :: b (:) Return Value real(kind=rk), allocatable, (:,:) public        interface elemConn_C0 private pure function cmp_elemConn_C0_L (nnode, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode integer, intent(in) :: p Return Value integer, allocatable, (:,:) private pure function cmp_elemConn_C0_S (nnode1, nnode2, p1, p2) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: p1 integer, intent(in) :: p2 Return Value integer, allocatable, (:,:) private pure function cmp_elemConn_C0_V (nnode1, nnode2, nnode3, p1, p2, p3) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: nnode3 integer, intent(in) :: p1 integer, intent(in) :: p2 integer, intent(in) :: p3 Return Value integer, allocatable, (:,:) public        interface elemConn_Cn private pure subroutine cmp_elemConn_Cn_L (nnode, p, Xth, vecKnot_mul, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode integer, intent(in) :: p real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: vecKnot_mul (:) integer, intent(out), allocatable :: elemConn (:,:) private pure subroutine cmp_elemConn_Cn_S (nnode1, nnode2, p1, p2, Xth1, Xth2, vecKnot_mul1, vecKnot_mul2, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: p1 integer, intent(in) :: p2 real(kind=rk), intent(in), contiguous :: Xth1 (:) real(kind=rk), intent(in), contiguous :: Xth2 (:) integer, intent(in), contiguous :: vecKnot_mul1 (:) integer, intent(in), contiguous :: vecKnot_mul2 (:) integer, intent(out), allocatable :: elemConn (:,:) private pure subroutine cmp_elemConn_Cn_V (nnode1, nnode2, nnode3, p1, p2, p3, Xth1, Xth2, Xth3, vecKnot_mul1, vecKnot_mul2, vecKnot_mul3, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: nnode3 integer, intent(in) :: p1 integer, intent(in) :: p2 integer, intent(in) :: p3 real(kind=rk), intent(in), contiguous :: Xth1 (:) real(kind=rk), intent(in), contiguous :: Xth2 (:) real(kind=rk), intent(in), contiguous :: Xth3 (:) integer, intent(in), contiguous :: vecKnot_mul1 (:) integer, intent(in), contiguous :: vecKnot_mul2 (:) integer, intent(in), contiguous :: vecKnot_mul3 (:) integer, intent(out), allocatable :: elemConn (:,:) public        interface gauss_leg private pure subroutine gauss_legendre_1D (interval, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval (2) integer, intent(in) :: degree real(kind=rk), intent(out), allocatable :: Xksi (:) real(kind=rk), intent(out), allocatable :: Wksi (:) private pure subroutine gauss_legendre_2D (interval1, interval2, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval1 (2) real(kind=rk), intent(in) :: interval2 (2) integer, intent(in) :: degree (2) real(kind=rk), intent(out), allocatable :: Xksi (:,:) real(kind=rk), intent(out), allocatable :: Wksi (:) private pure subroutine gauss_legendre_3D (interval1, interval2, interval3, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval1 (2) real(kind=rk), intent(in) :: interval2 (2) real(kind=rk), intent(in) :: interval3 (2) integer, intent(in) :: degree (3) real(kind=rk), intent(out), allocatable :: Xksi (:,:) real(kind=rk), intent(out), allocatable :: Wksi (:) public        interface ndgrid private pure subroutine ndgrid2 (X_dir1, X_dir2, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: X_dir1 (:) real(kind=rk), intent(in), contiguous :: X_dir2 (:) real(kind=rk), intent(out), allocatable :: Xt (:,:) private pure subroutine ndgrid3 (X_dir1, X_dir2, X_dir3, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: X_dir1 (:) real(kind=rk), intent(in), contiguous :: X_dir2 (:) real(kind=rk), intent(in), contiguous :: X_dir3 (:) real(kind=rk), intent(out), allocatable :: Xt (:,:) public        interface unique private pure function unique_integer (vec) result(output) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in), dimension(:), contiguous :: vec Return Value integer, dimension(:), allocatable private pure function unique_real (vec) result(output) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), dimension(:), contiguous :: vec Return Value real(kind=rk), dimension(:), allocatable Functions public pure function basis_bernstein (Xt, nc) result(B) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt integer, intent(in) :: nc Return Value real(kind=rk), allocatable, (:) public pure function basis_bspline (Xt, knot, nc, degree) result(B) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: nc integer, intent(in) :: degree Return Value real(kind=rk), allocatable, (:) public pure function compute_knot_vector (Xth_dir, degree, continuity) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: Xth_dir (:) integer, intent(in) :: degree integer, intent(in), contiguous :: continuity (:) Return Value real(kind=rk), allocatable, (:) public pure function det (A) result(detA) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: A (:,:) Return Value real(kind=rk) public pure function findspan (n, degree, Xth, knot) result(s) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: n integer, intent(in) :: degree real(kind=rk), intent(in) :: Xth real(kind=rk), intent(in), contiguous :: knot (:) Return Value integer public pure function hexahedron_Xc (L, nc) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: L (3) integer, intent(in) :: nc (3) Return Value real(kind=rk), allocatable, (:,:) public pure recursive function inv (A) result(A_inv) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: A (:,:) Return Value real(kind=rk), allocatable, (:,:) public pure function kron (u, v) result(w) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: u (:) real(kind=rk), intent(in), contiguous :: v (:) Return Value real(kind=rk), (size(u)*size(v)) public pure function rotation (alpha, beta, theta) result(R) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta Return Value real(kind=rk), dimension(3,3) public pure function tetragon_Xc (L, nc) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: L (2) integer, intent(in) :: nc (2) Return Value real(kind=rk), allocatable, (:,:) private pure function bincoeff (n, k) result(b) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: n integer, intent(in) :: k Return Value real(kind=rk) private pure function cmp_elemConn_C0_L (nnode, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode integer, intent(in) :: p Return Value integer, allocatable, (:,:) private pure function cmp_elemConn_C0_S (nnode1, nnode2, p1, p2) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: p1 integer, intent(in) :: p2 Return Value integer, allocatable, (:,:) private pure function cmp_elemConn_C0_V (nnode1, nnode2, nnode3, p1, p2, p3) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: nnode3 integer, intent(in) :: p1 integer, intent(in) :: p2 integer, intent(in) :: p3 Return Value integer, allocatable, (:,:) private pure function compute_multiplicity1 (knot) result(multiplicity) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: knot (:) Return Value integer, allocatable, (:) private pure function compute_multiplicity2 (knot, Xth) result(multiplicity) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in) :: Xth Return Value integer private pure function dyad_t1_t1 (a, b) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: a (:) real(kind=rk), intent(in), contiguous :: b (:) Return Value real(kind=rk), allocatable, (:,:) private pure function factln (n) result(f) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: n Return Value real(kind=rk) private pure elemental function isinf (x) result(output) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: x Return Value logical private pure elemental function isnan (x) result(output) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: x Return Value logical private pure function repelem (a, b) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: a (:) integer, intent(in), contiguous :: b (:) Return Value real(kind=rk), (sum(b)) private pure function unique_integer (vec) result(output) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in), dimension(:), contiguous :: vec Return Value integer, dimension(:), allocatable private pure function unique_real (vec) result(output) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), dimension(:), contiguous :: vec Return Value real(kind=rk), dimension(:), allocatable Subroutines public pure subroutine basis_bspline_2der (Xt, knot, nc, degree, d2B, dB, B) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: nc integer, intent(in) :: degree real(kind=rk), intent(out), allocatable :: d2B (:) real(kind=rk), intent(out), optional, allocatable :: dB (:) real(kind=rk), intent(out), optional, allocatable :: B (:) public pure subroutine basis_bspline_der (Xt, knot, nc, degree, dB, B) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: Xt real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: nc integer, intent(in) :: degree real(kind=rk), intent(out), allocatable :: dB (:) real(kind=rk), intent(out), optional, allocatable :: B (:) public pure subroutine elevate_degree_A_5_9 (t, knot, degree, Xcw, nc_new, knot_new, Xcw_new) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: t real(kind=rk), intent(in), contiguous :: knot (:) integer, intent(in) :: degree real(kind=rk), intent(in), contiguous :: Xcw (:,:) integer, intent(out) :: nc_new real(kind=rk), intent(out), allocatable :: knot_new (:) real(kind=rk), intent(out), allocatable :: Xcw_new (:,:) public pure subroutine insert_knot_A_5_1 (p, UP, Pw, u, k, s, r, nq, UQ, Qw) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: p real(kind=rk), intent(in), contiguous :: UP (0:) real(kind=rk), intent(in), contiguous :: Pw (0:,:) real(kind=rk), intent(in) :: u integer, intent(in) :: k integer, intent(in) :: s integer, intent(in) :: r integer, intent(out) :: nq real(kind=rk), intent(out), allocatable :: UQ (:) real(kind=rk), intent(out), allocatable :: Qw (:,:) public pure subroutine remove_knots_A_5_8 (p, knot, Pw, u, r, s, num, t, knot_new, Pw_new) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: p real(kind=rk), intent(in), contiguous :: knot (:) real(kind=rk), intent(in), contiguous :: Pw (:,:) real(kind=rk), intent(in) :: u integer, intent(in) :: r integer, intent(in) :: s integer, intent(in) :: num integer, intent(out) :: t real(kind=rk), intent(out), allocatable :: knot_new (:) real(kind=rk), intent(out), allocatable :: Pw_new (:,:) private pure subroutine cmp_elemConn_Cn_L (nnode, p, Xth, vecKnot_mul, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode integer, intent(in) :: p real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: vecKnot_mul (:) integer, intent(out), allocatable :: elemConn (:,:) private pure subroutine cmp_elemConn_Cn_S (nnode1, nnode2, p1, p2, Xth1, Xth2, vecKnot_mul1, vecKnot_mul2, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: p1 integer, intent(in) :: p2 real(kind=rk), intent(in), contiguous :: Xth1 (:) real(kind=rk), intent(in), contiguous :: Xth2 (:) integer, intent(in), contiguous :: vecKnot_mul1 (:) integer, intent(in), contiguous :: vecKnot_mul2 (:) integer, intent(out), allocatable :: elemConn (:,:) private pure subroutine cmp_elemConn_Cn_V (nnode1, nnode2, nnode3, p1, p2, p3, Xth1, Xth2, Xth3, vecKnot_mul1, vecKnot_mul2, vecKnot_mul3, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name integer, intent(in) :: nnode1 integer, intent(in) :: nnode2 integer, intent(in) :: nnode3 integer, intent(in) :: p1 integer, intent(in) :: p2 integer, intent(in) :: p3 real(kind=rk), intent(in), contiguous :: Xth1 (:) real(kind=rk), intent(in), contiguous :: Xth2 (:) real(kind=rk), intent(in), contiguous :: Xth3 (:) integer, intent(in), contiguous :: vecKnot_mul1 (:) integer, intent(in), contiguous :: vecKnot_mul2 (:) integer, intent(in), contiguous :: vecKnot_mul3 (:) integer, intent(out), allocatable :: elemConn (:,:) private pure subroutine gauss_legendre_1D (interval, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval (2) integer, intent(in) :: degree real(kind=rk), intent(out), allocatable :: Xksi (:) real(kind=rk), intent(out), allocatable :: Wksi (:) private pure subroutine gauss_legendre_2D (interval1, interval2, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval1 (2) real(kind=rk), intent(in) :: interval2 (2) integer, intent(in) :: degree (2) real(kind=rk), intent(out), allocatable :: Xksi (:,:) real(kind=rk), intent(out), allocatable :: Wksi (:) private pure subroutine gauss_legendre_3D (interval1, interval2, interval3, degree, Xksi, Wksi) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: interval1 (2) real(kind=rk), intent(in) :: interval2 (2) real(kind=rk), intent(in) :: interval3 (2) integer, intent(in) :: degree (3) real(kind=rk), intent(out), allocatable :: Xksi (:,:) real(kind=rk), intent(out), allocatable :: Wksi (:) private pure subroutine ndgrid2 (X_dir1, X_dir2, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: X_dir1 (:) real(kind=rk), intent(in), contiguous :: X_dir2 (:) real(kind=rk), intent(out), allocatable :: Xt (:,:) private pure subroutine ndgrid3 (X_dir1, X_dir2, X_dir3, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: X_dir1 (:) real(kind=rk), intent(in), contiguous :: X_dir2 (:) real(kind=rk), intent(in), contiguous :: X_dir3 (:) real(kind=rk), intent(out), allocatable :: Xt (:,:)","tags":"","loc":"module/forcad_utils.html"},{"title":"forcad_nurbs_surface – ForCAD","text":"This module defines the 'nurbs_surface' type for representing a Non-Uniform Rational B-Spline (NURBS) surface. Uses forcad_utils module~~forcad_nurbs_surface~~UsesGraph module~forcad_nurbs_surface forcad_nurbs_surface module~forcad_utils forcad_utils module~forcad_nurbs_surface->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Used by module~~forcad_nurbs_surface~~UsedByGraph module~forcad_nurbs_surface forcad_nurbs_surface module~forcad forcad module~forcad->module~forcad_nurbs_surface program~compute_area compute_area program~compute_area->module~forcad program~compute_length compute_length program~compute_length->module~forcad program~compute_volume compute_volume program~compute_volume->module~forcad program~example1_curve example1_curve program~example1_curve->module~forcad program~example3_surface example3_surface program~example3_surface->module~forcad program~example3_volume example3_volume program~example3_volume->module~forcad program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->module~forcad program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->module~forcad program~example_nurbs_volume example_nurbs_volume program~example_nurbs_volume->module~forcad program~example_ppm1 example_ppm1 program~example_ppm1->module~forcad program~example_ppm2 example_ppm2 program~example_ppm2->module~forcad program~example_ppm3 example_ppm3 program~example_ppm3->module~forcad program~example_put_to_nurbs example_put_to_nurbs program~example_put_to_nurbs->module~forcad program~nearest_point_1d nearest_point_1d program~nearest_point_1d->module~forcad program~nearest_point_2d nearest_point_2d program~nearest_point_2d->module~forcad program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->module~forcad program~nearest_point_3d nearest_point_3d program~nearest_point_3d->module~forcad program~shape_c_1d shape_C_1d program~shape_c_1d->module~forcad program~shape_c_2d shape_C_2d program~shape_c_2d->module~forcad program~shape_c_3d shape_C_3d program~shape_c_3d->module~forcad program~shape_circle shape_circle program~shape_circle->module~forcad program~shape_half_circle shape_half_circle program~shape_half_circle->module~forcad program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->module~forcad program~shape_half_ring_3d shape_half_ring_3d program~shape_half_ring_3d->module~forcad program~shape_hexahedron shape_hexahedron program~shape_hexahedron->module~forcad program~shape_ring_2d shape_ring_2d program~shape_ring_2d->module~forcad program~shape_ring_3d shape_ring_3d program~shape_ring_3d->module~forcad program~shape_tetragon shape_tetragon program~shape_tetragon->module~forcad Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Interfaces private        interface compute_Tgc private pure function compute_Tgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Tgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Tgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc) result(f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private        interface compute_Xg private pure function compute_Xg_bspline_2d(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_bspline_2d_1point(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Xc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) Return Value real(kind=rk), allocatable, (:) private pure function compute_Xg_nurbs_2d(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:,:) private pure function compute_Xg_nurbs_2d_1point(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Xc, f_Wc) result(f_Xg) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Xc (:,:) real(kind=rk), intent(in), contiguous :: f_Wc (:) Return Value real(kind=rk), allocatable, (:) private        interface compute_d2Tgc private pure subroutine compute_d2Tgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, nc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, nc, f_ng, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_d2Tgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) private pure subroutine compute_d2Tgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc, f_d2Tgc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_d2Tgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private        interface compute_dTgc private pure subroutine compute_dTgc_bspline_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, nc, f_dTgc, f_Tgc, elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: nc (2) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in) :: elem (:) private pure subroutine compute_dTgc_bspline_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, nc, f_ng, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) private pure subroutine compute_dTgc_nurbs_2d_scalar(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_Wc, f_dTgc, f_Tgc, elem) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:) integer, intent(in) :: elem (:) private pure subroutine compute_dTgc_nurbs_2d_vector(f_Xt, f_knot1, f_knot2, f_degree, f_nc, f_ng, f_Wc, f_dTgc, f_Tgc) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in), contiguous :: f_Xt (:,:) real(kind=rk), intent(in), contiguous :: f_knot1 (:) real(kind=rk), intent(in), contiguous :: f_knot2 (:) integer, intent(in) :: f_degree (2) integer, intent(in) :: f_nc (2) integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Wc (:) real(kind=rk), intent(out), allocatable :: f_dTgc (:,:,:) real(kind=rk), intent(out), allocatable :: f_Tgc (:,:) interface private pure function nearest_point_help_2d(f_ng, f_Xg, f_point_Xg) result(f_distances) Arguments Type Intent Optional Attributes Name integer, intent(in) :: f_ng (2) real(kind=rk), intent(in), contiguous :: f_Xg (:,:) real(kind=rk), intent(in), contiguous :: f_point_Xg (:) Return Value real(kind=rk), allocatable, (:) Derived Types type, public :: nurbs_surface Components Type Visibility Attributes Name Initial real(kind=rk), private, allocatable :: Wc (:) Weights for control points (1D array: [nc(1)*nc(2)]) real(kind=rk), private, allocatable :: Xc (:,:) Control points (2D array: [nc(1)*nc(2), dim]) real(kind=rk), private, allocatable :: Xg (:,:) Geometry points (2D array: [ng(1)*ng(2), dim]) real(kind=rk), private, allocatable :: Xt (:,:) Evaluation parameter values (2D array: [ng(1)*ng(2), 2]) real(kind=rk), private, allocatable :: Xt1 (:) Evaluation parameter values in the first direction (1D array: [ng(1)]) real(kind=rk), private, allocatable :: Xt2 (:) Evaluation parameter values in the second direction (1D array: [ng(2)]) integer, private :: degree (2) Degree (order) of the surface integer, private, allocatable :: elemConn (:,:) IGA element connectivity integer, private, allocatable :: elemConn_Xc_vis (:,:) Connectivity for visualization of control points integer, private, allocatable :: elemConn_Xg_vis (:,:) Connectivity for visualization of geometry points real(kind=rk), private, allocatable :: knot1 (:) Knot vector in the first direction (1D array) real(kind=rk), private, allocatable :: knot2 (:) Knot vector in the second direction (1D array) integer, private :: nc (2) Number of control points in each direction integer, private :: ng (2) Number of geometry points in each direction Type-Bound Procedures procedure, public :: ansatz Compute the shape functions, derivative of shape functions and dA Read more… generic, public :: basis => basis_vector , basis_scalar Compute the basis functions of the NURBS surface Read more… procedure, public :: cmp_Xg Compute geometry points Read more… procedure, public :: cmp_area Compute the area of the NURBS surface Read more… procedure, public :: cmp_degree Compute degree of the NURBS surface Read more… procedure, public :: cmp_elem Generate IGA element connectivity Read more… procedure, public :: cmp_elem_Xc_vis Generate connectivity for control points Read more… procedure, public :: cmp_elem_Xg_vis Generate connectivity for geometry points Read more… procedure, public :: cmp_nc Compute number of required control points Read more… procedure, public :: create Generate geometry points Read more… generic, public :: derivative => derivative_vector , derivative_scalar Compute the derivative of the NURBS surface Read more… generic, public :: derivative2 => derivative2_vector , derivative2_scalar Compute the second derivative of the NURBS surface Read more… procedure, public :: elevate_degree Elevate degree Read more… procedure, public :: export_Xc Export control points to VTK file Read more… procedure, public :: export_Xg Export geometry points to VTK file Read more… procedure, public :: finalize Finalize the NURBS surface object Read more… generic, public :: get_Wc => get_Wc_all , get_Wci Get weights Read more… generic, public :: get_Xc => get_Xc_all , get_Xci , get_Xcid Get control points Read more… generic, public :: get_Xg => get_Xg_all , get_Xgi , get_Xgid Get geometry points Read more… procedure, public :: get_Xt Get parameter values Read more… procedure, public :: get_continuity Compute and return the continuity of the NURBS surface Read more… generic, public :: get_degree => get_degree_all , get_degree_dir Get degree of the NURBS surface Read more… procedure, public :: get_elem Get IGA element connectivity Read more… procedure, public :: get_elem_Xc_vis Get connectivity for control points Read more… procedure, public :: get_elem_Xg_vis Get connectivity for geometry points Read more… generic, public :: get_knot => get_knoti , get_knot_all Get knot vector Read more… procedure, public :: get_multiplicity Compute and return the multiplicity of the knot vector Read more… generic, public :: get_nc => get_nc_all , get_nc_dir Get number of control points Read more… procedure, public :: get_ng Get number of geometry points Read more… procedure, public :: insert_knots Insert knots into the knot vector Read more… procedure, public :: is_rational Check if the NURBS surface is rational Read more… procedure, public :: modify_Wc Modify weights Read more… procedure, public :: modify_Xc Modify control points Read more… procedure, public :: nearest_point Find the nearest point on the NURBS surface (Approximation) Read more… procedure, public :: nearest_point2 Find the nearest point on the NURBS surface (Minimization - Newton's method) Read more… procedure, public :: remove_knots Remove knots from the knot vector Read more… procedure, public :: rotate_Xc Rotate control points Read more… procedure, public :: rotate_Xg Rotate geometry points Read more… generic, public :: set => set1 , set2 , set3 , set4 Set NURBS surface Read more… procedure, public :: set1 Set knot vectors, control points and weights for the NURBS surface object Read more… procedure, public :: set2 Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights Read more… procedure, public :: set3 Set Bezier or Rational Bezier surface using control points and weights Read more… procedure, public :: set4 Set NURBS surface using degree, number of control points, control points and weights Read more… procedure, public :: set_C Set a C-shape Read more… procedure, public :: set_elem Set IGA element connectivity Read more… procedure, public :: set_elem_Xc_vis Set connectivity for control points Read more… procedure, public :: set_elem_Xg_vis Set connectivity for geometry points Read more… procedure, public :: set_half_ring Set a half ring Read more… procedure, public :: set_ring Set a ring Read more… procedure, public :: set_tetragon Set a tetragon Read more… procedure, public :: show Show the NURBS object using PyVista Read more… procedure, public :: translate_Xc Translate control points Read more… procedure, public :: translate_Xg Translate geometry points Read more… procedure, private :: basis_scalar Compute the basis functions of the NURBS surface Read more… procedure, private :: basis_vector Compute the basis functions of the NURBS surface Read more… procedure, private :: derivative2_scalar Compute the second derivative of the NURBS surface Read more… procedure, private :: derivative2_vector Compute the second derivative of the NURBS surface Read more… procedure, private :: derivative_scalar Compute the derivative of the NURBS surface Read more… procedure, private :: derivative_vector Compute the derivative of the NURBS surface Read more… procedure, private :: get_Wc_all Get all weights Read more… procedure, private :: get_Wci Get i-th weight Read more… procedure, private :: get_Xc_all Get all control points Read more… procedure, private :: get_Xci Get i-th control point Read more… procedure, private :: get_Xcid Get i-th control point in a specific direction Read more… procedure, private :: get_Xg_all Get all geometry points Read more… procedure, private :: get_Xgi Get i-th geometry point Read more… procedure, private :: get_Xgid Get i-th geometry point in a specific direction Read more… procedure, private :: get_degree_all Get degree of the NURBS surface in both directions Read more… procedure, private :: get_degree_dir Get degree of the NURBS surface in a specific direction Read more… procedure, private :: get_knot_all Get all knot vectors Read more… procedure, private :: get_knoti Get i-th knot value Read more… procedure, private :: get_nc_all Get number of control points in all directions Read more… procedure, private :: get_nc_dir Get number of control points in a specific direction Read more… Functions private pure function cmp_Xg (this, Xt) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this real(kind=rk), intent(in), contiguous :: Xt (:) Return Value real(kind=rk), allocatable, (:) private pure function cmp_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function cmp_elem_Xc_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) private pure function cmp_elem_Xg_vis (this, p) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in), optional, contiguous :: p (:) Return Value integer, allocatable, (:,:) private pure function get_Wc_all (this) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:) private pure function get_Wci (this, n) result(Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk) private pure function get_Xc_all (this) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xci (this, n) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xcid (this, n, dir) result(Xc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) private pure function get_Xg_all (this) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value real(kind=rk), allocatable, (:,:) private pure function get_Xgi (this, n) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n Return Value real(kind=rk), allocatable, (:) private pure function get_Xgid (this, n, dir) result(Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: n integer, intent(in) :: dir Return Value real(kind=rk) private pure function get_Xt (this, dir) result(Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) private pure function get_continuity (this, dir) result(c) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) private pure function get_degree_all (this) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) private pure function get_degree_dir (this, dir) result(degree) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer private pure function get_elem (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_elem_Xc_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_elem_Xg_vis (this) result(elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, allocatable, (:,:) private pure function get_knot_all (this, dir) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value real(kind=rk), allocatable, (:) private pure function get_knoti (this, dir, i) result(knot) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir integer, intent(in) :: i Return Value real(kind=rk) private pure function get_multiplicity (this, dir) result(m) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer, allocatable, (:) private pure function get_nc_all (this) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) private pure function get_nc_dir (this, dir) result(nc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this integer, intent(in) :: dir Return Value integer private pure function get_ng (this) result(ng) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value integer, (2) private pure function is_rational (this) result(r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this Return Value logical Subroutines private pure subroutine ansatz (this, ie, ig, Tgc, dTgc_dXg, dA) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: ie integer, intent(in) :: ig real(kind=rk), intent(out), allocatable :: Tgc (:) real(kind=rk), intent(out), allocatable :: dTgc_dXg (:,:) real(kind=rk), intent(out) :: dA private pure subroutine basis_scalar (this, Xt, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: Xt (:) real(kind=rk), intent(out), allocatable :: Tgc (:) private pure subroutine basis_vector (this, res1, res2, Xt1, Xt2, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: Tgc (:,:) private pure subroutine cmp_area (this, area) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(out) :: area private pure subroutine cmp_degree (this, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: dir private pure subroutine cmp_nc (this, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: dir private pure subroutine create (this, res1, res2, Xt1, Xt2, Xt) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(in), optional, contiguous :: Xt (:,:) private pure subroutine derivative2_scalar (this, Xt, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) private pure subroutine derivative2_vector (this, res1, res2, Xt1, Xt2, d2Tgc, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: d2Tgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine derivative_scalar (this, Xt, dTgc, Tgc, elem) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xt (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:) integer, intent(in), optional :: elem (:) private pure subroutine derivative_vector (this, res1, res2, Xt1, Xt2, dTgc, Tgc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), optional :: res1 integer, intent(in), optional :: res2 real(kind=rk), intent(in), optional, contiguous :: Xt1 (:) real(kind=rk), intent(in), optional, contiguous :: Xt2 (:) real(kind=rk), intent(out), allocatable :: dTgc (:,:,:) real(kind=rk), intent(out), optional, allocatable :: Tgc (:,:) private pure subroutine elevate_degree (this, dir, t) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir integer, intent(in) :: t private impure subroutine export_Xc (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this character(len=*), intent(in) :: filename private impure subroutine export_Xg (this, filename) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this character(len=*), intent(in) :: filename private pure subroutine finalize (this) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this private pure subroutine insert_knots (this, dir, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) private pure subroutine modify_Wc (this, W, num) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: W integer, intent(in) :: num private pure subroutine modify_Xc (this, X, num, dir) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: X integer, intent(in) :: num integer, intent(in) :: dir private pure subroutine nearest_point (this, point_Xg, nearest_Xg, nearest_Xt, id) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(in) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) real(kind=rk), intent(out), optional, allocatable :: nearest_Xt (:) integer, intent(out), optional :: id private impure subroutine nearest_point2 (this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: point_Xg (:) real(kind=rk), intent(in) :: tol integer, intent(in) :: maxit real(kind=rk), intent(out) :: nearest_Xt (2) real(kind=rk), intent(out), optional, allocatable :: nearest_Xg (:) private pure subroutine remove_knots (this, dir, Xth, r) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in) :: dir real(kind=rk), intent(in), contiguous :: Xth (:) integer, intent(in), contiguous :: r (:) private pure subroutine rotate_Xc (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta private pure subroutine rotate_Xg (this, alpha, beta, theta) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: alpha real(kind=rk), intent(in) :: beta real(kind=rk), intent(in) :: theta private pure subroutine set1 (this, knot1, knot2, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set knot vectors, control points and weights for the NURBS surface object. Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: knot1 (:) real(kind=rk), intent(in), contiguous :: knot2 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set2 (this, Xth_dir1, Xth_dir2, degree, continuity1, continuity2, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: Xth_dir1 (:) real(kind=rk), intent(in), contiguous :: Xth_dir2 (:) integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: continuity1 (:) integer, intent(in), contiguous :: continuity2 (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set3 (this, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Set Bezier or Rational Bezier surface using control points and weights. Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set4 (this, degree, nc, Xc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: degree (:) integer, intent(in), contiguous :: nc (:) real(kind=rk), intent(in), contiguous :: Xc (:,:) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private pure subroutine set_C (this, center, radius1, radius2) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 private pure subroutine set_elem (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_elem_Xc_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_elem_Xg_vis (this, elemConn) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this integer, intent(in), contiguous :: elemConn (:,:) private pure subroutine set_half_ring (this, center, radius1, radius2) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 private pure subroutine set_ring (this, center, radius1, radius2) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in), contiguous :: center (:) real(kind=rk), intent(in) :: radius1 real(kind=rk), intent(in) :: radius2 private pure subroutine set_tetragon (this, L, nc, Wc) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: L (2) integer, intent(in) :: nc (2) real(kind=rk), intent(in), optional, contiguous :: Wc (:) private impure subroutine show (this, vtkfile_Xc, vtkfile_Xg) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this character(len=*), intent(in) :: vtkfile_Xc character(len=*), intent(in) :: vtkfile_Xg private pure subroutine translate_Xc (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:) private pure subroutine translate_Xg (this, vec) Author Seyed Ali Ghasemi License BSD 3-Clause Arguments Type Intent Optional Attributes Name class( nurbs_surface ), intent(inout) :: this real(kind=rk), intent(in) :: vec (:)","tags":"","loc":"module/forcad_nurbs_surface.html"},{"title":"example_put_to_nurbs – ForCAD","text":"Uses forcad_utils forcad program~~example_put_to_nurbs~~UsesGraph program~example_put_to_nurbs example_put_to_nurbs module~forcad forcad program~example_put_to_nurbs->module~forcad module~forcad_utils forcad_utils program~example_put_to_nurbs->module~forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. You can create your shape or use a predefined one\nRead coordinates from file\nRead element connectivities from file\nSet a control shape that will be used to put the shape into\nThe contol shape is a hexahedron with 100x40x10 with 10x5x3 number of control points\nBy modifying the control shape you can modify the shape Map the shape into the shape Deallocate local variables Export the shape and the control shape to vtk files\nShow the control geometry and geometry using PyVista Finalize the control shape Calls program~~example_put_to_nurbs~~CallsGraph program~example_put_to_nurbs example_put_to_nurbs none~set~2 nurbs_volume%set program~example_put_to_nurbs->none~set~2 proc~export_xc~2 nurbs_volume%export_Xc program~example_put_to_nurbs->proc~export_xc~2 proc~export_xg~2 nurbs_volume%export_Xg program~example_put_to_nurbs->proc~export_xg~2 proc~finalize~2 nurbs_volume%finalize program~example_put_to_nurbs->proc~finalize~2 proc~hexahedron_xc hexahedron_Xc program~example_put_to_nurbs->proc~hexahedron_xc proc~put_to_nurbs nurbs_volume%put_to_nurbs program~example_put_to_nurbs->proc~put_to_nurbs proc~show~2 nurbs_volume%show program~example_put_to_nurbs->proc~show~2 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 proc~cmp_elem_xc_vis~2 nurbs_volume%cmp_elem_Xc_vis proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~cmp_elem_xg_vis~2 nurbs_volume%cmp_elem_Xg_vis proc~export_xg~2->proc~cmp_elem_xg_vis~2 proc~basis_bspline basis_bspline proc~put_to_nurbs->proc~basis_bspline proc~kron kron proc~put_to_nurbs->proc~kron proc~set_elem_xg_vis~2 nurbs_volume%set_elem_Xg_vis proc~put_to_nurbs->proc~set_elem_xg_vis~2 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: X (:,:) type( nurbs_volume ) :: control_shape integer, allocatable :: elem (:,:) integer :: i integer :: nunit","tags":"","loc":"program/example_put_to_nurbs.html"},{"title":"example_nurbs_curve – ForCAD","text":"Uses forcad program~~example_nurbs_curve~~UsesGraph program~example_nurbs_curve example_nurbs_curve module~forcad forcad program~example_nurbs_curve->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. This program demonstrates the usage of a NURBS curve object to create, and finalize a NURBS curve.\nIt sets up control points and weights, generates the curve, and exports the control points\nand the curve to VTK files at various stages. Define control points for the NURBS curve Define weights for the control points Set control points and weights for the NURBS curve object Deallocate local arrays Export initial control points to a VTK file Generate the NURBS curve with a resolution of 500 Export the generated curve to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS curve object Calls program~~example_nurbs_curve~~CallsGraph program~example_nurbs_curve example_nurbs_curve none~set nurbs_curve%set program~example_nurbs_curve->none~set proc~create nurbs_curve%create program~example_nurbs_curve->proc~create proc~export_xc nurbs_curve%export_Xc program~example_nurbs_curve->proc~export_xc proc~export_xg nurbs_curve%export_Xg program~example_nurbs_curve->proc~export_xg proc~finalize nurbs_curve%finalize program~example_nurbs_curve->proc~finalize proc~generate_xc generate_Xc program~example_nurbs_curve->proc~generate_xc proc~show nurbs_curve%show program~example_nurbs_curve->proc~show proc~set1 nurbs_curve%set1 none~set->proc~set1 proc~set1a nurbs_curve%set1a none~set->proc~set1a proc~set2 nurbs_curve%set2 none~set->proc~set2 proc~set3 nurbs_curve%set3 none~set->proc~set3 proc~set4 nurbs_curve%set4 none~set->proc~set4 interface~compute_xg compute_Xg proc~create->interface~compute_xg proc~is_rational nurbs_curve%is_rational proc~create->proc~is_rational proc~cmp_elem_xc_vis nurbs_curve%cmp_elem_Xc_vis proc~export_xc->proc~cmp_elem_xc_vis proc~cmp_elem_xg_vis nurbs_curve%cmp_elem_Xg_vis proc~export_xg->proc~cmp_elem_xg_vis interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~set1a->proc~cmp_degree proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Wc (:) Arrays for control points and weights real(kind=rk), allocatable :: Xc (:,:) Arrays for control points and weights type( nurbs_curve ) :: nurbs Declare a NURBS curve object Functions function generate_Xc (num_coils, radius, height, num_points_per_coil) result(control_points) Arguments Type Intent Optional Attributes Name integer, intent(in) :: num_coils real(kind=rk), intent(in) :: radius real(kind=rk), intent(in) :: height integer, intent(in) :: num_points_per_coil Return Value real(kind=rk), allocatable, (:,:) Source Code program example_nurbs_curve use forcad , only : rk , nurbs_curve implicit none type ( nurbs_curve ) :: nurbs !! Declare a NURBS curve object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights !----------------------------------------------------------------------------- ! Setting up the NURBS curve !----------------------------------------------------------------------------- !> Define control points for the NURBS curve Xc = generate_Xc ( 5 , 1.0_rk , 2.0_rk , 20 ) !> Define weights for the control points allocate ( Wc ( size ( Xc , 1 )), source = 1.0_rk ) !> Set control points and weights for the NURBS curve object call nurbs % set ( Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export initial control points to a VTK file call nurbs % export_Xc ( 'vtk/demo_curve_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS curve !----------------------------------------------------------------------------- !> Generate the NURBS curve with a resolution of 500 call nurbs % create ( res = 500 ) !> Export the generated curve to a VTK file call nurbs % export_Xg ( 'vtk/demo_curve_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/demo_curve_Xc.vtk' , 'vtk/demo_curve_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( num_coils , radius , height , num_points_per_coil ) result ( control_points ) integer , intent ( in ) :: num_coils , num_points_per_coil real ( rk ), intent ( in ) :: radius , height real ( rk ), allocatable :: control_points (:,:) integer :: coil , i real ( rk ) :: theta , coil_height allocate ( control_points ( num_coils * num_points_per_coil , 3 )) do coil = 1 , num_coils coil_height = height * real ( coil - 1 , rk ) / real ( num_coils - 1 , rk ) theta = 0.0_rk do i = 1 , num_points_per_coil theta = theta + 2.0_rk * acos ( - 1.0_rk ) / real ( num_points_per_coil , rk ) control_points (( coil - 1 ) * num_points_per_coil + i , 1 ) = radius * cos ( theta ) control_points (( coil - 1 ) * num_points_per_coil + i , 2 ) = radius * sin ( theta ) control_points (( coil - 1 ) * num_points_per_coil + i , 3 ) = coil_height end do end do end function !----------------------------------------------------------------------------- end program example_nurbs_curve","tags":"","loc":"program/example_nurbs_curve.html"},{"title":"shape_half_ring_3d – ForCAD","text":"Uses forcad program~~shape_half_ring_3d~~UsesGraph program~shape_half_ring_3d shape_half_ring_3d module~forcad forcad program~shape_half_ring_3d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set up a half ring centered at 0,0,0 with inner radius 1, outer radius 2, and length 1. Export the control points to a VTK file for visualization. Create the shape using the specified number of elements in each direction. Export the geometry to a VTK file for visualization. Show the control geometry and geometry using PyVista Finalize and clean up the shape object. Calls program~~shape_half_ring_3d~~CallsGraph program~shape_half_ring_3d shape_half_ring_3d proc~create~2 nurbs_volume%create program~shape_half_ring_3d->proc~create~2 proc~export_xc~2 nurbs_volume%export_Xc program~shape_half_ring_3d->proc~export_xc~2 proc~export_xg~2 nurbs_volume%export_Xg program~shape_half_ring_3d->proc~export_xg~2 proc~finalize~2 nurbs_volume%finalize program~shape_half_ring_3d->proc~finalize~2 proc~set_half_ring nurbs_volume%set_half_ring program~shape_half_ring_3d->proc~set_half_ring proc~show~2 nurbs_volume%show program~shape_half_ring_3d->proc~show~2 interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_volume%is_rational proc~create~2->proc~is_rational~2 proc~cmp_elem_xc_vis~2 nurbs_volume%cmp_elem_Xc_vis proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~cmp_elem_xg_vis~2 nurbs_volume%cmp_elem_Xg_vis proc~export_xg~2->proc~cmp_elem_xg_vis~2 none~set~2 nurbs_volume%set proc~set_half_ring->none~set~2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_volume ) :: shape","tags":"","loc":"program/shape_half_ring_3d.html"},{"title":"example3_surface – ForCAD","text":"Uses forcad program~~example3_surface~~UsesGraph program~example3_surface example3_surface module~forcad forcad program~example3_surface->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. This program demonstrates the usage of a NURBS (Non-Uniform Rational B-Spline) surface object to create  and finalize a NURBS surface.\nIt sets up control points, weights, and knot vectors for all three dimensions, generates the surface, and exports the control points and the surface to VTK files. Define control points for the NURBS surface Define weights for the control points\nDefine knot vectors for both dimensions\nSet knot vectors, control points, and weights for the NURBS surface object Deallocate local arrays Export the control points to a VTK file Generate the NURBS surface with resolutions of 30 in both dimensions Export the generated surface to a VTK file Show the control geometry and geometry using PyVista Print size of the knot vectors\nInsert knots 0.25, twice and 0.75, once in both directions\nPrint size of the knot vectors after inserting knots\nPrint the degrees Elevate degree by 2 in both directions\nPrint the degrees after elevating Print size of the knot vectors\nRemove knots 0.25, twice and 0.75, once in both directions\nPrint size of the knot vectors after removing knots\nGenerate the refined NURBS surface with resolutions of 30 in both dimensions Export updated control points to a VTK file Export the refined generated surface to a VTK file Show the control geometry and geometry using PyVista Rotate the control points Rotate the generated curve Translate the control points Translate the generated curve Export the transformed control points to a VTK file Export the transformed generated volume to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS surface object Calls program~~example3_surface~~CallsGraph program~example3_surface example3_surface none~get_degree~3 nurbs_surface%get_degree program~example3_surface->none~get_degree~3 none~get_knot~3 nurbs_surface%get_knot program~example3_surface->none~get_knot~3 none~set~3 nurbs_surface%set program~example3_surface->none~set~3 proc~create~3 nurbs_surface%create program~example3_surface->proc~create~3 proc~elevate_degree~3 nurbs_surface%elevate_degree program~example3_surface->proc~elevate_degree~3 proc~export_xc~3 nurbs_surface%export_Xc program~example3_surface->proc~export_xc~3 proc~export_xg~3 nurbs_surface%export_Xg program~example3_surface->proc~export_xg~3 proc~finalize~3 nurbs_surface%finalize program~example3_surface->proc~finalize~3 proc~generate_xc~2 generate_Xc program~example3_surface->proc~generate_xc~2 proc~insert_knots~3 nurbs_surface%insert_knots program~example3_surface->proc~insert_knots~3 proc~remove_knots~3 nurbs_surface%remove_knots program~example3_surface->proc~remove_knots~3 proc~rotate_xc~3 nurbs_surface%rotate_Xc program~example3_surface->proc~rotate_xc~3 proc~rotate_xg~3 nurbs_surface%rotate_Xg program~example3_surface->proc~rotate_xg~3 proc~show~3 nurbs_surface%show program~example3_surface->proc~show~3 proc~translate_xc~3 nurbs_surface%translate_Xc program~example3_surface->proc~translate_xc~3 proc~translate_xg~3 nurbs_surface%translate_Xg program~example3_surface->proc~translate_xg~3 proc~get_degree_all~2 nurbs_surface%get_degree_all none~get_degree~3->proc~get_degree_all~2 proc~get_degree_dir~2 nurbs_surface%get_degree_dir none~get_degree~3->proc~get_degree_dir~2 proc~get_knot_all~3 nurbs_surface%get_knot_all none~get_knot~3->proc~get_knot_all~3 proc~get_knoti~3 nurbs_surface%get_knoti none~get_knot~3->proc~get_knoti~3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 interface~ndgrid ndgrid proc~create~3->interface~ndgrid proc~is_rational~3 nurbs_surface%is_rational proc~create~3->proc~is_rational~3 proc~elevate_degree~3->none~get_knot~3 proc~elevate_degree~3->none~set~3 proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree~3->proc~elevate_degree_a_5_9 proc~elevate_degree~3->proc~is_rational~3 proc~cmp_elem_xc_vis~3 nurbs_surface%cmp_elem_Xc_vis proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~cmp_elem_xg_vis~3 nurbs_surface%cmp_elem_Xg_vis proc~export_xg~3->proc~cmp_elem_xg_vis~3 proc~insert_knots~3->none~get_knot~3 proc~insert_knots~3->none~set~3 interface~compute_multiplicity compute_multiplicity proc~insert_knots~3->interface~compute_multiplicity proc~findspan findspan proc~insert_knots~3->proc~findspan proc~insert_knot_a_5_1 insert_knot_A_5_1 proc~insert_knots~3->proc~insert_knot_a_5_1 proc~insert_knots~3->proc~is_rational~3 proc~remove_knots~3->none~get_knot~3 proc~remove_knots~3->none~set~3 proc~remove_knots~3->interface~compute_multiplicity proc~remove_knots~3->proc~findspan proc~remove_knots~3->proc~is_rational~3 proc~remove_knots_a_5_8 remove_knots_A_5_8 proc~remove_knots~3->proc~remove_knots_a_5_8 proc~rotation rotation proc~rotate_xc~3->proc~rotation proc~rotate_xg~3->proc~rotation proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~bincoeff bincoeff proc~elevate_degree_a_5_9->proc~bincoeff cosd cosd proc~rotation->cosd sind sind proc~rotation->sind proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~factln factln proc~bincoeff->proc~factln proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Wc (:) Arrays for control points and weights real(kind=rk), allocatable :: Xc (:,:) Arrays for control points and weights real(kind=rk) :: knot1 (6) Arrays for knot vectors in both dimensions real(kind=rk) :: knot2 (6) Arrays for knot vectors in both dimensions type( nurbs_surface ) :: nurbs Declare a NURBS surface object Functions function generate_Xc (num_rows, num_cols, peak_height) result(control_points) Arguments Type Intent Optional Attributes Name integer, intent(in) :: num_rows integer, intent(in) :: num_cols real(kind=rk), intent(in) :: peak_height Return Value real(kind=rk), allocatable, (:,:) Source Code program example3_surface use forcad implicit none type ( nurbs_surface ) :: nurbs !! Declare a NURBS surface object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights real ( rk ) :: knot1 ( 6 ), knot2 ( 6 ) !! Arrays for knot vectors in both dimensions !----------------------------------------------------------------------------- ! Setting up the NURBS surface !----------------------------------------------------------------------------- !> Define control points for the NURBS surface Xc = generate_Xc ( 3 , 3 , 1.0_rk ) !> Define weights for the control points allocate ( Wc ( size ( Xc , 1 ))) Wc = 1.0_rk Wc ( 2 ) = 2.0_rk !> Define knot vectors for both dimensions knot1 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] !> Set knot vectors, control points, and weights for the NURBS surface object call nurbs % set ( knot1 , knot2 , Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export the control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_surface_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS surface !----------------------------------------------------------------------------- !> Generate the NURBS surface with resolutions of 30 in both dimensions call nurbs % create ( 30 , 30 ) !> Export the generated surface to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_surface_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_surface_Xc.vtk' , 'vtk/nurbs_surface_Xg.vtk' ) !----------------------------------------------------------------------------- ! Refinements !----------------------------------------------------------------------------- !> Print size of the knot vectors print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) !> Insert knots 0.25, twice and 0.75, once in both directions call nurbs % insert_knots ( 1 , [ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) ! direction 1 call nurbs % insert_knots ( 2 , [ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) ! direction 2 !> Print size of the knot vectors after inserting knots print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) !> Print the degrees print * , nurbs % get_degree () !> Elevate degree by 2 in both directions call nurbs % elevate_degree ( 1 , 2 ) ! direction 1 call nurbs % elevate_degree ( 2 , 2 ) ! direction 2 !> Print the degrees after elevating print * , nurbs % get_degree () !> Print size of the knot vectors print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) !> Remove knots 0.25, twice and 0.75, once in both directions call nurbs % remove_knots ( 1 , [ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) ! direction 1 call nurbs % remove_knots ( 2 , [ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) ! direction 2 !> Print size of the knot vectors after removing knots print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) !> Generate the refined NURBS surface with resolutions of 30 in both dimensions call nurbs % create () !> Export updated control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_surface_Xc2.vtk' ) !> Export the refined generated surface to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_surface_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_surface_Xc2.vtk' , 'vtk/nurbs_surface_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Transformations !----------------------------------------------------------------------------- !> Rotate the control points call nurbs % rotate_Xc ( alpha = 4 5.0_rk , beta = 0.0_rk , theta = 9 0.0_rk ) !> Rotate the generated curve call nurbs % rotate_Xg ( alpha =- 4 5.0_rk , beta = 0.0_rk , theta =- 9 0.0_rk ) !> Translate the control points call nurbs % translate_Xc ([ 1.0_rk , 2.0_rk , - 3.0_rk ]) !> Translate the generated curve call nurbs % translate_Xg ([ - 1.0_rk , - 2.0_rk , 3.0_rk ]) !> Export the transformed control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_surface_Xc3.vtk' ) !> Export the transformed generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_surface_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_surface_Xc3.vtk' , 'vtk/nurbs_surface_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS surface object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( num_rows , num_cols , peak_height ) result ( control_points ) integer , intent ( in ) :: num_rows , num_cols real ( rk ), intent ( in ) :: peak_height real ( rk ), allocatable :: control_points (:,:) integer :: i , j real ( rk ) :: x_spacing , y_spacing , x_offset , y_offset x_spacing = 1.0_rk / real ( num_cols - 1 , rk ) y_spacing = 1.0_rk / real ( num_rows - 1 , rk ) x_offset = - 0.5_rk y_offset = - 0.5_rk allocate ( control_points ( num_rows * num_cols , 3 )) do i = 1 , num_rows do j = 1 , num_cols control_points (( i - 1 ) * num_cols + j , 1 ) = x_offset + real ( j - 1 , rk ) * x_spacing control_points (( i - 1 ) * num_cols + j , 2 ) = y_offset + real ( i - 1 , rk ) * y_spacing control_points (( i - 1 ) * num_cols + j , 3 ) = & peak_height * exp ( - (( control_points (( i - 1 ) * num_cols + j , 1 ) ** 2 ) & + ( control_points (( i - 1 ) * num_cols + j , 2 ) ** 2 ))) + 0.5_rk * peak_height * 0.2_rk end do end do end function !----------------------------------------------------------------------------- end program example3_surface","tags":"","loc":"program/example3_surface.html"},{"title":"nearest_point_1d – ForCAD","text":"Uses forcad program~~nearest_point_1d~~UsesGraph program~nearest_point_1d nearest_point_1d module~forcad forcad program~nearest_point_1d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Define control points for the NURBS curve\nDefine weights for the control points (optional)\nDefine knot vector Set knot vector, control points, and weights for the NURBS curve object.\nWc is optional Generate the NURBS curve with a resolution of 20 Find the nearest point on the curve to a given point\nFind the nearest point on the curve to a given point\nThe optimization method is used to find the nearest point\nThe optimization method is based on the Newton-Raphson method\nFinalize the NURBS curve object Calls program~~nearest_point_1d~~CallsGraph program~nearest_point_1d nearest_point_1d none~set nurbs_curve%set program~nearest_point_1d->none~set proc~create nurbs_curve%create program~nearest_point_1d->proc~create proc~finalize nurbs_curve%finalize program~nearest_point_1d->proc~finalize proc~nearest_point nurbs_curve%nearest_point program~nearest_point_1d->proc~nearest_point proc~nearest_point2 nurbs_curve%nearest_point2 program~nearest_point_1d->proc~nearest_point2 proc~set1 nurbs_curve%set1 none~set->proc~set1 proc~set1a nurbs_curve%set1a none~set->proc~set1a proc~set2 nurbs_curve%set2 none~set->proc~set2 proc~set3 nurbs_curve%set3 none~set->proc~set3 proc~set4 nurbs_curve%set4 none~set->proc~set4 interface~compute_xg compute_Xg proc~create->interface~compute_xg proc~is_rational nurbs_curve%is_rational proc~create->proc~is_rational interface~nearest_point_help_1d nearest_point_help_1d proc~nearest_point->interface~nearest_point_help_1d proc~nearest_point2->proc~create proc~nearest_point2->proc~finalize proc~nearest_point2->proc~nearest_point none~derivative2 nurbs_curve%derivative2 proc~nearest_point2->none~derivative2 proc~cmp_xg nurbs_curve%cmp_Xg proc~nearest_point2->proc~cmp_xg proc~derivative2_scalar nurbs_curve%derivative2_scalar none~derivative2->proc~derivative2_scalar proc~derivative2_vector nurbs_curve%derivative2_vector none~derivative2->proc~derivative2_vector proc~cmp_xg->interface~compute_xg proc~cmp_xg->proc~is_rational proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~set1a->proc~cmp_degree proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~derivative2_scalar->proc~is_rational interface~compute_d2tgc compute_d2Tgc proc~derivative2_scalar->interface~compute_d2tgc proc~derivative2_vector->proc~is_rational proc~derivative2_vector->interface~compute_d2tgc interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Wc (:) Arrays for control points and weights real(kind=rk), allocatable :: Xc (:,:) Arrays for control points and weights integer :: id Variable for the id of the nearest point real(kind=rk) :: knot (6) Array for knot vector real(kind=rk), allocatable :: nearest_Xg (:) Array for the nearest point on the curve real(kind=rk) :: nearest_Xt Array for the parametric coordinates of the nearest point type( nurbs_curve ) :: shape Declare a NURBS curve object","tags":"","loc":"program/nearest_point_1d.html"},{"title":"example_nurbs_surface – ForCAD","text":"Uses forcad program~~example_nurbs_surface~~UsesGraph program~example_nurbs_surface example_nurbs_surface module~forcad forcad program~example_nurbs_surface->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. This program demonstrates the usage of a NURBS surface object to create, and finalize a NURBS surface.\nIt sets up control points and weights, generates the surface, and exports the control points\nand the surface to VTK files at various stages. Define control points for the NURBS surface Define weights for the control points Set control points and weights for the NURBS surface object Deallocate local arrays Export initial control points to a VTK file Generate the NURBS surface with a resolution of 30x30 Export the generated surface to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS surface object Calls program~~example_nurbs_surface~~CallsGraph program~example_nurbs_surface example_nurbs_surface none~set~3 nurbs_surface%set program~example_nurbs_surface->none~set~3 proc~create~3 nurbs_surface%create program~example_nurbs_surface->proc~create~3 proc~export_xc~3 nurbs_surface%export_Xc program~example_nurbs_surface->proc~export_xc~3 proc~export_xg~3 nurbs_surface%export_Xg program~example_nurbs_surface->proc~export_xg~3 proc~finalize~3 nurbs_surface%finalize program~example_nurbs_surface->proc~finalize~3 proc~generate_xc~3 generate_Xc program~example_nurbs_surface->proc~generate_xc~3 proc~show~3 nurbs_surface%show program~example_nurbs_surface->proc~show~3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 interface~ndgrid ndgrid proc~create~3->interface~ndgrid proc~is_rational~3 nurbs_surface%is_rational proc~create~3->proc~is_rational~3 proc~cmp_elem_xc_vis~3 nurbs_surface%cmp_elem_Xc_vis proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~cmp_elem_xg_vis~3 nurbs_surface%cmp_elem_Xg_vis proc~export_xg~3->proc~cmp_elem_xg_vis~3 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Wc (:) Arrays for control points and weights real(kind=rk), allocatable :: Xc (:,:) Arrays for control points and weights type( nurbs_surface ) :: nurbs Declare a NURBS surface object Functions function generate_Xc (num_rows, num_cols, peak_height) result(control_points) Arguments Type Intent Optional Attributes Name integer, intent(in) :: num_rows integer, intent(in) :: num_cols real(kind=rk), intent(in) :: peak_height Return Value real(kind=rk), allocatable, (:,:) Source Code program example_nurbs_surface use forcad , only : rk , nurbs_surface implicit none type ( nurbs_surface ) :: nurbs !! Declare a NURBS surface object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights !----------------------------------------------------------------------------- ! Setting up the NURBS surface !----------------------------------------------------------------------------- !> Define control points for the NURBS surface Xc = generate_Xc ( 10 , 10 , 1.5_rk ) !> Define weights for the control points allocate ( Wc ( size ( Xc , 1 )), source = 1.0_rk ) !> Set control points and weights for the NURBS surface object call nurbs % set ([ 10 , 10 ], Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export initial control points to a VTK file call nurbs % export_Xc ( 'vtk/demo_surface_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS surface !----------------------------------------------------------------------------- !> Generate the NURBS surface with a resolution of 30x30 call nurbs % create ( res1 = 30 , res2 = 30 ) !> Export the generated surface to a VTK file call nurbs % export_Xg ( 'vtk/demo_surface_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/demo_surface_Xc.vtk' , 'vtk/demo_surface_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS surface object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( num_rows , num_cols , peak_height ) result ( control_points ) integer , intent ( in ) :: num_rows , num_cols real ( rk ), intent ( in ) :: peak_height real ( rk ), allocatable :: control_points (:,:) integer :: i , j real ( rk ) :: x_spacing , y_spacing , x_offset , y_offset x_spacing = 1.0_rk / real ( num_cols - 1 , rk ) y_spacing = 1.0_rk / real ( num_rows - 1 , rk ) x_offset = - 0.5_rk y_offset = - 0.5_rk allocate ( control_points ( num_rows * num_cols , 3 )) do i = 1 , num_rows do j = 1 , num_cols control_points (( i - 1 ) * num_cols + j , 1 ) = x_offset + real ( j - 1 , rk ) * x_spacing control_points (( i - 1 ) * num_cols + j , 2 ) = y_offset + real ( i - 1 , rk ) * y_spacing control_points (( i - 1 ) * num_cols + j , 3 ) = & peak_height * exp ( - (( control_points (( i - 1 ) * num_cols + j , 1 ) ** 2 ) & + ( control_points (( i - 1 ) * num_cols + j , 2 ) ** 2 ))) + 0.5_rk * peak_height * 0.2_rk end do end do end function !----------------------------------------------------------------------------- end program example_nurbs_surface","tags":"","loc":"program/example_nurbs_surface.html"},{"title":"example3_volume – ForCAD","text":"Uses forcad program~~example3_volume~~UsesGraph program~example3_volume example3_volume module~forcad forcad program~example3_volume->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. This program demonstrates the usage of a NURBS (Non-Uniform Rational B-Spline) volume object to create  and finalize a NURBS volume.\nIt sets up control points, weights, and knot vectors for all three dimensions, generates the volume, and exports the control points and the volume to VTK files. Define the control points for the NURBS volume Define weights for the control points (optional)\nDefine knot vectors for all three dimensions\nSet knot vectors, control points, and weights for the NURBS volume object\nWc is optional. Deallocate local arrays Export the control points to a VTK file Generate the NURBS volume with resolutions of 20, 20, and 20 in the three dimensions Export the generated volume to a VTK file Show the control geometry and geometry using PyVista Print size of knot vectors\nInsert knots 0.25 and 0.75 in all three directions\nPrint size of knot vectors after inserting knots\nPrint degrees Elevate degree by 2 in all three directions\nPrint degrees after elevating Print size of knot vectors\nPrint size of knot vectors after removing knots\nGenerate the refined NURBS volume with resolutions of 40, 40, and 40 in the three dimensions Export updated control points to a VTK file Export the refined generated volume to a VTK file Show the control geometry and geometry using PyVista Rotate the control points Rotate the generated curve Translate the control points Translate the generated curve Export the transformed control points to a VTK file Export the transformed generated volume to a VTK file Show the control geometry and geometry using PyVista first compute and set the connectivities of volume elements get the connectivity of the face1 of the first element\nget the degree of the faces\nFinalize the NURBS volume object Calls program~~example3_volume~~CallsGraph program~example3_volume example3_volume none~get_degree~2 nurbs_volume%get_degree program~example3_volume->none~get_degree~2 none~get_knot~2 nurbs_volume%get_knot program~example3_volume->none~get_knot~2 none~set~2 nurbs_volume%set program~example3_volume->none~set~2 proc~cmp_degreeface nurbs_volume%cmp_degreeFace program~example3_volume->proc~cmp_degreeface proc~cmp_elemface nurbs_volume%cmp_elemFace program~example3_volume->proc~cmp_elemface proc~cmp_elem~2 nurbs_volume%cmp_elem program~example3_volume->proc~cmp_elem~2 proc~create~2 nurbs_volume%create program~example3_volume->proc~create~2 proc~elevate_degree~2 nurbs_volume%elevate_degree program~example3_volume->proc~elevate_degree~2 proc~export_xc~2 nurbs_volume%export_Xc program~example3_volume->proc~export_xc~2 proc~export_xg~2 nurbs_volume%export_Xg program~example3_volume->proc~export_xg~2 proc~finalize~2 nurbs_volume%finalize program~example3_volume->proc~finalize~2 proc~generate_xc~4 generate_Xc program~example3_volume->proc~generate_xc~4 proc~insert_knots~2 nurbs_volume%insert_knots program~example3_volume->proc~insert_knots~2 proc~remove_knots~2 nurbs_volume%remove_knots program~example3_volume->proc~remove_knots~2 proc~rotate_xc~2 nurbs_volume%rotate_Xc program~example3_volume->proc~rotate_xc~2 proc~rotate_xg~2 nurbs_volume%rotate_Xg program~example3_volume->proc~rotate_xg~2 proc~set_elem~2 nurbs_volume%set_elem program~example3_volume->proc~set_elem~2 proc~show~2 nurbs_volume%show program~example3_volume->proc~show~2 proc~translate_xc~2 nurbs_volume%translate_Xc program~example3_volume->proc~translate_xc~2 proc~translate_xg~2 nurbs_volume%translate_Xg program~example3_volume->proc~translate_xg~2 proc~get_degree_all nurbs_volume%get_degree_all none~get_degree~2->proc~get_degree_all proc~get_degree_dir nurbs_volume%get_degree_dir none~get_degree~2->proc~get_degree_dir proc~get_knot_all~2 nurbs_volume%get_knot_all none~get_knot~2->proc~get_knot_all~2 proc~get_knoti~2 nurbs_volume%get_knoti none~get_knot~2->proc~get_knoti~2 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 interface~elemconn_cn elemConn_Cn proc~cmp_elem~2->interface~elemconn_cn interface~unique unique proc~cmp_elem~2->interface~unique proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_elem~2->proc~get_multiplicity~2 interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_volume%is_rational proc~create~2->proc~is_rational~2 proc~elevate_degree~2->none~get_knot~2 proc~elevate_degree~2->none~set~2 proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree~2->proc~elevate_degree_a_5_9 proc~cmp_elem_xc_vis~2 nurbs_volume%cmp_elem_Xc_vis proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~cmp_elem_xg_vis~2 nurbs_volume%cmp_elem_Xg_vis proc~export_xg~2->proc~cmp_elem_xg_vis~2 proc~insert_knots~2->none~get_knot~2 proc~insert_knots~2->none~set~2 interface~compute_multiplicity compute_multiplicity proc~insert_knots~2->interface~compute_multiplicity proc~findspan findspan proc~insert_knots~2->proc~findspan proc~insert_knot_a_5_1 insert_knot_A_5_1 proc~insert_knots~2->proc~insert_knot_a_5_1 proc~remove_knots~2->none~get_knot~2 proc~remove_knots~2->none~set~2 proc~remove_knots~2->interface~compute_multiplicity proc~remove_knots~2->proc~findspan proc~remove_knots_a_5_8 remove_knots_A_5_8 proc~remove_knots~2->proc~remove_knots_a_5_8 proc~rotation rotation proc~rotate_xc~2->proc~rotation proc~rotate_xg~2->proc~rotation proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~bincoeff bincoeff proc~elevate_degree_a_5_9->proc~bincoeff proc~get_multiplicity~2->interface~compute_multiplicity cosd cosd proc~rotation->cosd sind sind proc~rotation->sind proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~factln factln proc~bincoeff->proc~factln proc~cmp_degree~2->proc~get_multiplicity~2 proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Wc (:) Arrays for control points and weights real(kind=rk), allocatable :: Xc (:,:) Arrays for control points and weights real(kind=rk) :: knot1 (4) Arrays for knot vectors in all three dimensions real(kind=rk) :: knot2 (4) Arrays for knot vectors in all three dimensions real(kind=rk) :: knot3 (4) Arrays for knot vectors in all three dimensions type( nurbs_volume ) :: nurbs Declare a NURBS volume object Functions function generate_Xc (L) result(control_points) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: L Return Value real(kind=rk), allocatable, (:,:) Source Code program example3_volume use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: nurbs !! Declare a NURBS volume object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights real ( rk ) :: knot1 ( 4 ), knot2 ( 4 ), knot3 ( 4 ) !! Arrays for knot vectors in all three dimensions !----------------------------------------------------------------------------- ! Setting up the NURBS volume !----------------------------------------------------------------------------- !> Define the control points for the NURBS volume Xc = generate_Xc ( 5.0_rk ) !> Define weights for the control points (optional) allocate ( Wc ( size ( Xc , 1 )), source = 1.0_rk ) Wc ( 2 ) = 5.0_rk !> Define knot vectors for all three dimensions knot1 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] knot3 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] !> Set knot vectors, control points, and weights for the NURBS volume object !> Wc is optional. call nurbs % set ( knot1 , knot2 , knot3 , Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export the control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_volume_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS volume !----------------------------------------------------------------------------- !> Generate the NURBS volume with resolutions of 20, 20, and 20 in the three dimensions call nurbs % create ( 20 , 20 , 20 ) !> Export the generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_volume_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_volume_Xc.vtk' , 'vtk/nurbs_volume_Xg.vtk' ) !----------------------------------------------------------------------------- ! Refinements !----------------------------------------------------------------------------- !> Print size of knot vectors print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) print * , size ( nurbs % get_knot ( 3 )) !> Insert knots 0.25 and 0.75 in all three directions call nurbs % insert_knots ( 1 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 1 call nurbs % insert_knots ( 2 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 2 call nurbs % insert_knots ( 3 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 3 !> Print size of knot vectors after inserting knots print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) print * , size ( nurbs % get_knot ( 3 )) !> Print degrees print * , nurbs % get_degree () !> Elevate degree by 2 in all three directions call nurbs % elevate_degree ( 1 , 2 ) ! direction 1 call nurbs % elevate_degree ( 2 , 2 ) ! direction 2 call nurbs % elevate_degree ( 3 , 2 ) ! direction 3 !> Print degrees after elevating print * , nurbs % get_degree () !> Print size of knot vectors print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) print * , size ( nurbs % get_knot ( 3 )) call nurbs % remove_knots ( 1 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 1 call nurbs % remove_knots ( 2 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 2 call nurbs % remove_knots ( 3 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 3 !> Print size of knot vectors after removing knots print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) print * , size ( nurbs % get_knot ( 3 )) !> Generate the refined NURBS volume with resolutions of 40, 40, and 40 in the three dimensions call nurbs % create () !> Export updated control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_volume_Xc2.vtk' ) !> Export the refined generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_volume_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_volume_Xc2.vtk' , 'vtk/nurbs_volume_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Transformations !----------------------------------------------------------------------------- !> Rotate the control points call nurbs % rotate_Xc ( alpha =- 4 5.0_rk , beta = 0.0_rk , theta = 9 0.0_rk ) !> Rotate the generated curve call nurbs % rotate_Xg ( alpha =- 4 5.0_rk , beta = 0.0_rk , theta = 9 0.0_rk ) !> Translate the control points call nurbs % translate_Xc ([ 1.0_rk , 2.0_rk , - 3.0_rk ]) !> Translate the generated curve call nurbs % translate_Xg ([ 1.0_rk , 2.0_rk , - 3.0_rk ]) !> Export the transformed control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_volume_Xc3.vtk' ) !> Export the transformed generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_volume_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_volume_Xc3.vtk' , 'vtk/nurbs_volume_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Extract faces !----------------------------------------------------------------------------- !> first compute and set the connectivities of volume elements call nurbs % set_elem ( nurbs % cmp_elem ()) !> get the connectivity of the face1 of the first element print * , 'Face 1 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 1 ) print * , 'Face 2 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 2 ) print * , 'Face 3 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 3 ) print * , 'Face 4 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 4 ) print * , 'Face 5 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 5 ) print * , 'Face 6 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 6 ) !> get the degree of the faces print * , 'Degree of face 1:' , nurbs % cmp_degreeFace ( face = 1 ) print * , 'Degree of face 2:' , nurbs % cmp_degreeFace ( face = 2 ) print * , 'Degree of face 3:' , nurbs % cmp_degreeFace ( face = 3 ) print * , 'Degree of face 4:' , nurbs % cmp_degreeFace ( face = 4 ) print * , 'Degree of face 5:' , nurbs % cmp_degreeFace ( face = 5 ) print * , 'Degree of face 6:' , nurbs % cmp_degreeFace ( face = 6 ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS volume object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( L ) result ( control_points ) implicit none real ( rk ), intent ( in ) :: L real ( rk ), allocatable :: control_points (:,:) real ( rk ) :: L2 L2 = L / 2.0_rk allocate ( control_points ( 8 , 3 )) control_points ( 1 ,:) = [ L2 , - L2 , L2 ] control_points ( 2 ,:) = [ L2 , - L2 , - L2 ] control_points ( 3 ,:) = [ - L2 , - L2 , L2 ] control_points ( 4 ,:) = [ - L2 , - L2 , - L2 ] control_points ( 5 ,:) = [ L2 , L2 , L2 ] control_points ( 6 ,:) = [ L2 , L2 , - L2 ] control_points ( 7 ,:) = [ - L2 , L2 , L2 ] control_points ( 8 ,:) = [ - L2 , L2 , - L2 ] end function !----------------------------------------------------------------------------- end program example3_volume","tags":"","loc":"program/example3_volume.html"},{"title":"example_nurbs_volume – ForCAD","text":"Uses forcad program~~example_nurbs_volume~~UsesGraph program~example_nurbs_volume example_nurbs_volume module~forcad forcad program~example_nurbs_volume->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. This program demonstrates the usage of a NURBS volume object to create, and finalize a NURBS volume.\nIt sets up control points and weights, generates the volume, and exports the control points\nand the volume to VTK files at various stages. Define control points for the NURBS volume Define weights for the control points Set control points and weights for the NURBS volume object Deallocate local arrays Export initial control points to a VTK file Generate the NURBS volume with a resolution of 15X15X15 Export the generated volume to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS volume object Calls program~~example_nurbs_volume~~CallsGraph program~example_nurbs_volume example_nurbs_volume none~set~2 nurbs_volume%set program~example_nurbs_volume->none~set~2 proc~create~2 nurbs_volume%create program~example_nurbs_volume->proc~create~2 proc~export_xc~2 nurbs_volume%export_Xc program~example_nurbs_volume->proc~export_xc~2 proc~export_xg~2 nurbs_volume%export_Xg program~example_nurbs_volume->proc~export_xg~2 proc~finalize~2 nurbs_volume%finalize program~example_nurbs_volume->proc~finalize~2 proc~generate_xc~5 generate_Xc program~example_nurbs_volume->proc~generate_xc~5 proc~show~2 nurbs_volume%show program~example_nurbs_volume->proc~show~2 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_volume%is_rational proc~create~2->proc~is_rational~2 proc~cmp_elem_xc_vis~2 nurbs_volume%cmp_elem_Xc_vis proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~cmp_elem_xg_vis~2 nurbs_volume%cmp_elem_Xg_vis proc~export_xg~2->proc~cmp_elem_xg_vis~2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Wc (:) Arrays for control points and weights real(kind=rk), allocatable :: Xc (:,:) Arrays for control points and weights type( nurbs_volume ) :: nurbs Declare a NURBS volume object Functions function generate_Xc (L) result(control_points) Arguments Type Intent Optional Attributes Name real(kind=rk), intent(in) :: L Return Value real(kind=rk), allocatable, (:,:) Source Code program example_nurbs_volume use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: nurbs !! Declare a NURBS volume object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights !----------------------------------------------------------------------------- ! Setting up the NURBS volume !----------------------------------------------------------------------------- !> Define control points for the NURBS volume Xc = generate_Xc ( 1.0_rk ) !> Define weights for the control points allocate ( Wc ( size ( Xc , 1 )), source = 1.0_rk ) !> Set control points and weights for the NURBS volume object call nurbs % set ([ 2 , 2 , 2 ], Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export initial control points to a VTK file call nurbs % export_Xc ( 'vtk/demo_volume_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS volume !----------------------------------------------------------------------------- !> Generate the NURBS volume with a resolution of 15X15X15 call nurbs % create ( 15 , 15 , 15 ) !> Export the generated volume to a VTK file call nurbs % export_Xg ( 'vtk/demo_volume_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/demo_volume_Xc.vtk' , 'vtk/demo_volume_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS volume object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( L ) result ( control_points ) implicit none real ( rk ), intent ( in ) :: L real ( rk ), allocatable :: control_points (:,:) real ( rk ) :: L2 L2 = L / 2.0_rk allocate ( control_points ( 8 , 3 )) control_points ( 1 ,:) = [ L2 , - L2 , L2 ] control_points ( 2 ,:) = [ L2 , - L2 , - L2 ] control_points ( 3 ,:) = [ - L2 , - L2 , L2 ] control_points ( 4 ,:) = [ - L2 , - L2 , - L2 ] control_points ( 5 ,:) = [ L2 , L2 , L2 ] control_points ( 6 ,:) = [ L2 , L2 , - L2 ] control_points ( 7 ,:) = [ - L2 , L2 , L2 ] control_points ( 8 ,:) = [ - L2 , L2 , - L2 ] end function !----------------------------------------------------------------------------- end program example_nurbs_volume","tags":"","loc":"program/example_nurbs_volume.html"},{"title":"shape_hexahedron – ForCAD","text":"Uses forcad program~~shape_hexahedron~~UsesGraph program~shape_hexahedron shape_hexahedron module~forcad forcad program~shape_hexahedron->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set up a hexahedron shape with dimensions L = [2.0, 4.0, 8.0] and a specified number of control points nc = [4, 6, 8].\nThe weights of the control points (Wc) are optional. Export the control points to a VTK file for visualization. Create the shape using the specified number of elements in each direction. Export the geometry to a VTK file for visualization. Show the control geometry and geometry using PyVista Finalize and clean up the shape object. Calls program~~shape_hexahedron~~CallsGraph program~shape_hexahedron shape_hexahedron proc~create~2 nurbs_volume%create program~shape_hexahedron->proc~create~2 proc~export_xc~2 nurbs_volume%export_Xc program~shape_hexahedron->proc~export_xc~2 proc~export_xg~2 nurbs_volume%export_Xg program~shape_hexahedron->proc~export_xg~2 proc~finalize~2 nurbs_volume%finalize program~shape_hexahedron->proc~finalize~2 proc~set_hexahedron nurbs_volume%set_hexahedron program~shape_hexahedron->proc~set_hexahedron proc~show~2 nurbs_volume%show program~shape_hexahedron->proc~show~2 interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_volume%is_rational proc~create~2->proc~is_rational~2 proc~cmp_elem_xc_vis~2 nurbs_volume%cmp_elem_Xc_vis proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~cmp_elem_xg_vis~2 nurbs_volume%cmp_elem_Xg_vis proc~export_xg~2->proc~cmp_elem_xg_vis~2 none~set~2 nurbs_volume%set proc~set_hexahedron->none~set~2 proc~hexahedron_xc hexahedron_Xc proc~set_hexahedron->proc~hexahedron_xc proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_volume ) :: shape","tags":"","loc":"program/shape_hexahedron.html"},{"title":"example_ppm3 – ForCAD","text":"Uses fortime forcad forimage forcolormap program~~example_ppm3~~UsesGraph program~example_ppm3 example_ppm3 forcolormap forcolormap program~example_ppm3->forcolormap forimage forimage program~example_ppm3->forimage fortime fortime program~example_ppm3->fortime module~forcad forcad program~example_ppm3->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Visualization of NURBS surfaces using ForCAD, ForImage and ForColorMap libraries\nThis example converts NURBS surfaces (vector) to an image (raster) using ForCAD, ForImage and ForColorMap libraries. Set the shape parameters for a tetragon Calls program~~example_ppm3~~CallsGraph program~example_ppm3 example_ppm3 compute_rgb compute_rgb program~example_ppm3->compute_rgb export_pnm export_pnm program~example_ppm3->export_pnm get_b get_b program~example_ppm3->get_b get_g get_g program~example_ppm3->get_g get_r get_r program~example_ppm3->get_r none~get_xg~3 nurbs_surface%get_Xg program~example_ppm3->none~get_xg~3 proc~create~3 nurbs_surface%create program~example_ppm3->proc~create~3 proc~finalize~3 nurbs_surface%finalize program~example_ppm3->proc~finalize~3 proc~get_ng~3 nurbs_surface%get_ng program~example_ppm3->proc~get_ng~3 proc~modify_xc~3 nurbs_surface%modify_Xc program~example_ppm3->proc~modify_xc~3 proc~set_tetragon nurbs_surface%set_tetragon program~example_ppm3->proc~set_tetragon proc~translate_xc~3 nurbs_surface%translate_Xc program~example_ppm3->proc~translate_xc~3 set set program~example_ppm3->set set_pnm set_pnm program~example_ppm3->set_pnm timer_start timer_start program~example_ppm3->timer_start timer_stop timer_stop program~example_ppm3->timer_stop proc~get_xg_all~3 nurbs_surface%get_Xg_all none~get_xg~3->proc~get_xg_all~3 proc~get_xgid~3 nurbs_surface%get_Xgid none~get_xg~3->proc~get_xgid~3 proc~get_xgi~3 nurbs_surface%get_Xgi none~get_xg~3->proc~get_xgi~3 interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 interface~ndgrid ndgrid proc~create~3->interface~ndgrid proc~is_rational~3 nurbs_surface%is_rational proc~create~3->proc~is_rational~3 none~get_knot~3 nurbs_surface%get_knot proc~modify_xc~3->none~get_knot~3 none~get_wc~3 nurbs_surface%get_Wc proc~modify_xc~3->none~get_wc~3 none~get_xc~3 nurbs_surface%get_Xc proc~modify_xc~3->none~get_xc~3 none~set~3 nurbs_surface%set proc~modify_xc~3->none~set~3 proc~set_tetragon->none~set~3 proc~tetragon_xc tetragon_Xc proc~set_tetragon->proc~tetragon_xc proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~get_knot_all~3 nurbs_surface%get_knot_all none~get_knot~3->proc~get_knot_all~3 proc~get_knoti~3 nurbs_surface%get_knoti none~get_knot~3->proc~get_knoti~3 proc~get_wc_all~3 nurbs_surface%get_Wc_all none~get_wc~3->proc~get_wc_all~3 proc~get_wci~3 nurbs_surface%get_Wci none~get_wc~3->proc~get_wci~3 proc~get_xc_all~3 nurbs_surface%get_Xc_all none~get_xc~3->proc~get_xc_all~3 proc~get_xcid~3 nurbs_surface%get_Xcid none~get_xc~3->proc~get_xcid~3 proc~get_xci~3 nurbs_surface%get_Xci none~get_xc~3->proc~get_xci~3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Xg (:,:) real(kind=rk) :: aspect_ratio type(color) :: background_color integer :: blue type(colormap) :: cmap integer :: green integer :: height integer :: i integer, allocatable :: idx (:,:) type(format_pnm) :: image integer :: ng (2) integer(kind=ik), allocatable :: px (:,:) integer :: red integer :: res1 integer :: res2 type( nurbs_surface ) :: shape type(timer) :: t integer :: width real(kind=rk), allocatable :: z_values (:)","tags":"","loc":"program/example_ppm3.html"},{"title":"example_ppm2 – ForCAD","text":"Uses fortime forcad forimage forcolormap program~~example_ppm2~~UsesGraph program~example_ppm2 example_ppm2 forcolormap forcolormap program~example_ppm2->forcolormap forimage forimage program~example_ppm2->forimage fortime fortime program~example_ppm2->fortime module~forcad forcad program~example_ppm2->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Visualization of NURBS surfaces using ForCAD, ForImage and ForColorMap libraries\nThis example converts NURBS surfaces (vector) to an image (raster) using ForCAD, ForImage and ForColorMap libraries. Set the shape parameters for a tetragon\nSet the shape parameters for a ring\nSet the shape parameters for a ring\nSet the shape parameters for a ring\nSet the shape parameters for a ring Calls program~~example_ppm2~~CallsGraph program~example_ppm2 example_ppm2 compute_rgb compute_rgb program~example_ppm2->compute_rgb export_pnm export_pnm program~example_ppm2->export_pnm get_b get_b program~example_ppm2->get_b get_g get_g program~example_ppm2->get_g get_r get_r program~example_ppm2->get_r none~get_xg~3 nurbs_surface%get_Xg program~example_ppm2->none~get_xg~3 proc~create~3 nurbs_surface%create program~example_ppm2->proc~create~3 proc~finalize~3 nurbs_surface%finalize program~example_ppm2->proc~finalize~3 proc~get_ng~3 nurbs_surface%get_ng program~example_ppm2->proc~get_ng~3 proc~rotate_xc~3 nurbs_surface%rotate_Xc program~example_ppm2->proc~rotate_xc~3 proc~set_half_ring~2 nurbs_surface%set_half_ring program~example_ppm2->proc~set_half_ring~2 proc~set_tetragon nurbs_surface%set_tetragon program~example_ppm2->proc~set_tetragon proc~translate_xc~3 nurbs_surface%translate_Xc program~example_ppm2->proc~translate_xc~3 set set program~example_ppm2->set set_pnm set_pnm program~example_ppm2->set_pnm timer_start timer_start program~example_ppm2->timer_start timer_stop timer_stop program~example_ppm2->timer_stop proc~get_xg_all~3 nurbs_surface%get_Xg_all none~get_xg~3->proc~get_xg_all~3 proc~get_xgid~3 nurbs_surface%get_Xgid none~get_xg~3->proc~get_xgid~3 proc~get_xgi~3 nurbs_surface%get_Xgi none~get_xg~3->proc~get_xgi~3 interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 interface~ndgrid ndgrid proc~create~3->interface~ndgrid proc~is_rational~3 nurbs_surface%is_rational proc~create~3->proc~is_rational~3 proc~rotation rotation proc~rotate_xc~3->proc~rotation none~set~3 nurbs_surface%set proc~set_half_ring~2->none~set~3 proc~set_tetragon->none~set~3 proc~tetragon_xc tetragon_Xc proc~set_tetragon->proc~tetragon_xc proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 cosd cosd proc~rotation->cosd sind sind proc~rotation->sind proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Xg (:,:) real(kind=rk) :: aspect_ratio type(color) :: background_color integer :: blue real(kind=rk) :: center (3) type(colormap) :: cmap integer :: green integer :: height integer :: i integer, allocatable :: idx (:,:) type(format_pnm) :: image real(kind=rk) :: inner_radius integer :: ng (2) real(kind=rk) :: outer_radius integer(kind=ik), allocatable :: px (:,:) integer :: red integer :: res1 integer :: res2 type( nurbs_surface ) :: shape type(timer) :: t integer :: width real(kind=rk), allocatable :: z_values (:)","tags":"","loc":"program/example_ppm2.html"},{"title":"shape_ring_2d – ForCAD","text":"Uses forcad program~~shape_ring_2d~~UsesGraph program~shape_ring_2d shape_ring_2d module~forcad forcad program~shape_ring_2d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set up a ring shape with inner radius 1.0 and outer radius 2.0. Export the control points to a VTK file for visualization. Create the shape using the specified number of elements in each direction. Export the geometry to a VTK file for visualization. Show the control geometry and geometry using PyVista Finalize and clean up the shape object. Calls program~~shape_ring_2d~~CallsGraph program~shape_ring_2d shape_ring_2d proc~create~3 nurbs_surface%create program~shape_ring_2d->proc~create~3 proc~export_xc~3 nurbs_surface%export_Xc program~shape_ring_2d->proc~export_xc~3 proc~export_xg~3 nurbs_surface%export_Xg program~shape_ring_2d->proc~export_xg~3 proc~finalize~3 nurbs_surface%finalize program~shape_ring_2d->proc~finalize~3 proc~set_ring~2 nurbs_surface%set_ring program~shape_ring_2d->proc~set_ring~2 proc~show~3 nurbs_surface%show program~shape_ring_2d->proc~show~3 interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 interface~ndgrid ndgrid proc~create~3->interface~ndgrid proc~is_rational~3 nurbs_surface%is_rational proc~create~3->proc~is_rational~3 proc~cmp_elem_xc_vis~3 nurbs_surface%cmp_elem_Xc_vis proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~cmp_elem_xg_vis~3 nurbs_surface%cmp_elem_Xg_vis proc~export_xg~3->proc~cmp_elem_xg_vis~3 none~set~3 nurbs_surface%set proc~set_ring~2->none~set~3 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_surface ) :: shape","tags":"","loc":"program/shape_ring_2d.html"},{"title":"nearest_point_2d_bench – ForCAD","text":"Uses fortime forcad program~~nearest_point_2d_bench~~UsesGraph program~nearest_point_2d_bench nearest_point_2d_bench fortime fortime program~nearest_point_2d_bench->fortime module~forcad forcad program~nearest_point_2d_bench->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set a tetragon with lengths of 2.0 and 3.0 and 3 and 4 control points in each direction\nThe weights of the control points (Wc) are optional. Generate the NURBS surface with resolutions of 30 in both dimensions Find the nearest point on the surface to a given point\nFinalize the NURBS surface object Calls program~~nearest_point_2d_bench~~CallsGraph program~nearest_point_2d_bench nearest_point_2d_bench proc~create~3 nurbs_surface%create program~nearest_point_2d_bench->proc~create~3 proc~finalize~3 nurbs_surface%finalize program~nearest_point_2d_bench->proc~finalize~3 proc~nearest_point~3 nurbs_surface%nearest_point program~nearest_point_2d_bench->proc~nearest_point~3 proc~set_tetragon nurbs_surface%set_tetragon program~nearest_point_2d_bench->proc~set_tetragon timer_start timer_start program~nearest_point_2d_bench->timer_start timer_stop timer_stop program~nearest_point_2d_bench->timer_stop interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 interface~ndgrid ndgrid proc~create~3->interface~ndgrid proc~is_rational~3 nurbs_surface%is_rational proc~create~3->proc~is_rational~3 interface~nearest_point_help_2d nearest_point_help_2d proc~nearest_point~3->interface~nearest_point_help_2d none~set~3 nurbs_surface%set proc~set_tetragon->none~set~3 proc~tetragon_xc tetragon_Xc proc~set_tetragon->proc~tetragon_xc proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial integer :: i integer :: id id of the nearest point integer :: j real(kind=rk), allocatable :: nearest_Xg (:) Coordinates of the nearest point on the surface real(kind=rk), allocatable :: nearest_Xt (:) Corresponding parametric coordinates of the nearest point real(kind=rk), allocatable :: points (:,:) type( nurbs_surface ) :: shape Declare a NURBS surface object type(timer) :: t","tags":"","loc":"program/nearest_point_2d_bench.html"},{"title":"compute_volume – ForCAD","text":"Uses forcad program~~compute_volume~~UsesGraph program~compute_volume compute_volume module~forcad forcad program~compute_volume->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Calls program~~compute_volume~~CallsGraph program~compute_volume compute_volume none~set~2 nurbs_volume%set program~compute_volume->none~set~2 proc~cmp_volume nurbs_volume%cmp_volume program~compute_volume->proc~cmp_volume proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 proc~ansatz~2 nurbs_volume%ansatz proc~cmp_volume->proc~ansatz~2 proc~cmp_elem~2 nurbs_volume%cmp_elem proc~cmp_volume->proc~cmp_elem~2 proc~ansatz~2->none~set~2 proc~ansatz~2->proc~cmp_elem~2 interface~gauss_leg gauss_leg proc~ansatz~2->interface~gauss_leg interface~ndgrid ndgrid proc~ansatz~2->interface~ndgrid interface~unique unique proc~ansatz~2->interface~unique none~derivative~2 nurbs_volume%derivative proc~ansatz~2->none~derivative~2 proc~det det proc~ansatz~2->proc~det proc~inv inv proc~ansatz~2->proc~inv interface~elemconn_cn elemConn_Cn proc~cmp_elem~2->interface~elemconn_cn proc~cmp_elem~2->interface~unique proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_elem~2->proc~get_multiplicity~2 proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar~2 nurbs_volume%derivative_scalar none~derivative~2->proc~derivative_scalar~2 proc~derivative_vector~2 nurbs_volume%derivative_vector none~derivative~2->proc~derivative_vector~2 proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~2->interface~compute_multiplicity proc~inv->proc~det proc~inv->proc~inv proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 interface~compute_dtgc~2 compute_dTgc proc~derivative_scalar~2->interface~compute_dtgc~2 proc~is_rational~2 nurbs_volume%is_rational proc~derivative_scalar~2->proc~is_rational~2 proc~derivative_vector~2->interface~ndgrid proc~derivative_vector~2->interface~compute_dtgc~2 proc~derivative_vector~2->proc~is_rational~2 gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_2d->gauss_legendre proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk) :: Xc (8,3) type( nurbs_volume ) :: shape real(kind=rk) :: volume","tags":"","loc":"program/compute_volume.html"},{"title":"nearest_point_3d – ForCAD","text":"Uses forcad program~~nearest_point_3d~~UsesGraph program~nearest_point_3d nearest_point_3d module~forcad forcad program~nearest_point_3d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. The weights of the control points (Wc) are optional. Generate the NURBS volume with resolutions of 20, 20, 20 Find the nearest point on the volume to a given point\nFind the nearest point on the volume to a given point\nThe optimization method is used to find the nearest point\nThe optimization method is based on the Newton-Raphson method\nFinalize the NURBS volume object Calls program~~nearest_point_3d~~CallsGraph program~nearest_point_3d nearest_point_3d none~set~2 nurbs_volume%set program~nearest_point_3d->none~set~2 proc~create~2 nurbs_volume%create program~nearest_point_3d->proc~create~2 proc~finalize~2 nurbs_volume%finalize program~nearest_point_3d->proc~finalize~2 proc~nearest_point2~2 nurbs_volume%nearest_point2 program~nearest_point_3d->proc~nearest_point2~2 proc~nearest_point~2 nurbs_volume%nearest_point program~nearest_point_3d->proc~nearest_point~2 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_volume%is_rational proc~create~2->proc~is_rational~2 proc~nearest_point2~2->proc~create~2 proc~nearest_point2~2->proc~finalize~2 proc~nearest_point2~2->proc~nearest_point~2 none~derivative2~2 nurbs_volume%derivative2 proc~nearest_point2~2->none~derivative2~2 proc~cmp_xg~2 nurbs_volume%cmp_Xg proc~nearest_point2~2->proc~cmp_xg~2 proc~inv inv proc~nearest_point2~2->proc~inv interface~nearest_point_help_3d nearest_point_help_3d proc~nearest_point~2->interface~nearest_point_help_3d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~derivative2_scalar~2 nurbs_volume%derivative2_scalar none~derivative2~2->proc~derivative2_scalar~2 proc~derivative2_vector~2 nurbs_volume%derivative2_vector none~derivative2~2->proc~derivative2_vector~2 proc~cmp_xg~2->interface~compute_xg~2 proc~cmp_xg~2->proc~is_rational~2 proc~inv->proc~inv proc~det det proc~inv->proc~det proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~derivative2_scalar~2->proc~is_rational~2 interface~compute_d2tgc~2 compute_d2Tgc proc~derivative2_scalar~2->interface~compute_d2tgc~2 proc~derivative2_vector~2->interface~ndgrid proc~derivative2_vector~2->proc~is_rational~2 proc~derivative2_vector~2->interface~compute_d2tgc~2 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk) :: Wc (8) Weights of the control points real(kind=rk) :: Xc (8,3) Control points integer :: id id of the nearest point real(kind=rk), allocatable :: nearest_Xg (:) Coordinates of the nearest point on the volume real(kind=rk), allocatable :: nearest_Xt (:) Corresponding parametric coordinates of the nearest point type( nurbs_volume ) :: shape Declare a NURBS volume object","tags":"","loc":"program/nearest_point_3d.html"},{"title":"shape_half_circle – ForCAD","text":"Uses forcad program~~shape_half_circle~~UsesGraph program~shape_half_circle shape_half_circle module~forcad forcad program~shape_half_circle->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set up a half circle shape centered at the 0,0,0 with a radius of 1 Export the control points to a VTK file for visualization. Create the shape using the specified number of elements in each direction. Export the geometry to a VTK file for visualization. Show the control geometry and geometry using PyVista Finalize and clean up the shape object. Calls program~~shape_half_circle~~CallsGraph program~shape_half_circle shape_half_circle proc~create nurbs_curve%create program~shape_half_circle->proc~create proc~export_xc nurbs_curve%export_Xc program~shape_half_circle->proc~export_xc proc~export_xg nurbs_curve%export_Xg program~shape_half_circle->proc~export_xg proc~finalize nurbs_curve%finalize program~shape_half_circle->proc~finalize proc~set_half_circle nurbs_curve%set_half_circle program~shape_half_circle->proc~set_half_circle proc~show nurbs_curve%show program~shape_half_circle->proc~show interface~compute_xg compute_Xg proc~create->interface~compute_xg proc~is_rational nurbs_curve%is_rational proc~create->proc~is_rational proc~cmp_elem_xc_vis nurbs_curve%cmp_elem_Xc_vis proc~export_xc->proc~cmp_elem_xc_vis proc~cmp_elem_xg_vis nurbs_curve%cmp_elem_Xg_vis proc~export_xg->proc~cmp_elem_xg_vis none~set nurbs_curve%set proc~set_half_circle->none~set proc~set1 nurbs_curve%set1 none~set->proc~set1 proc~set1a nurbs_curve%set1a none~set->proc~set1a proc~set2 nurbs_curve%set2 none~set->proc~set2 proc~set3 nurbs_curve%set3 none~set->proc~set3 proc~set4 nurbs_curve%set4 none~set->proc~set4 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~set1a->proc~cmp_degree proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_curve ) :: shape","tags":"","loc":"program/shape_half_circle.html"},{"title":"shape_tetragon – ForCAD","text":"Uses forcad program~~shape_tetragon~~UsesGraph program~shape_tetragon shape_tetragon module~forcad forcad program~shape_tetragon->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set a tetragon with lengths of 2.0 and 3.0 and 3 and 4 control points in each direction\nThe weights of the control points (Wc) are optional. Export the control points to a VTK file Generate the NURBS surface with resolutions of 30 in both dimensions Export the generated surface to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS surface object Calls program~~shape_tetragon~~CallsGraph program~shape_tetragon shape_tetragon proc~create~3 nurbs_surface%create program~shape_tetragon->proc~create~3 proc~export_xc~3 nurbs_surface%export_Xc program~shape_tetragon->proc~export_xc~3 proc~export_xg~3 nurbs_surface%export_Xg program~shape_tetragon->proc~export_xg~3 proc~finalize~3 nurbs_surface%finalize program~shape_tetragon->proc~finalize~3 proc~set_tetragon nurbs_surface%set_tetragon program~shape_tetragon->proc~set_tetragon proc~show~3 nurbs_surface%show program~shape_tetragon->proc~show~3 interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 interface~ndgrid ndgrid proc~create~3->interface~ndgrid proc~is_rational~3 nurbs_surface%is_rational proc~create~3->proc~is_rational~3 proc~cmp_elem_xc_vis~3 nurbs_surface%cmp_elem_Xc_vis proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~cmp_elem_xg_vis~3 nurbs_surface%cmp_elem_Xg_vis proc~export_xg~3->proc~cmp_elem_xg_vis~3 none~set~3 nurbs_surface%set proc~set_tetragon->none~set~3 proc~tetragon_xc tetragon_Xc proc~set_tetragon->proc~tetragon_xc proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_surface ) :: shape Declare a NURBS surface object","tags":"","loc":"program/shape_tetragon.html"},{"title":"shape_C_3d – ForCAD","text":"Uses forcad program~~shape_c_3d~~UsesGraph program~shape_c_3d shape_C_3d module~forcad forcad program~shape_c_3d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set a C-shape with radius 2.0 and center at [0.0, 0.0, 0.0] Export control points to a VTK file Generate the NURBS C-shape with a resolution of 100 Export the generated cirlce to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS curve object Calls program~~shape_c_3d~~CallsGraph program~shape_c_3d shape_C_3d proc~create~2 nurbs_volume%create program~shape_c_3d->proc~create~2 proc~export_xc~2 nurbs_volume%export_Xc program~shape_c_3d->proc~export_xc~2 proc~export_xg~2 nurbs_volume%export_Xg program~shape_c_3d->proc~export_xg~2 proc~finalize~2 nurbs_volume%finalize program~shape_c_3d->proc~finalize~2 proc~set_c~2 nurbs_volume%set_C program~shape_c_3d->proc~set_c~2 proc~show~2 nurbs_volume%show program~shape_c_3d->proc~show~2 interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_volume%is_rational proc~create~2->proc~is_rational~2 proc~cmp_elem_xc_vis~2 nurbs_volume%cmp_elem_Xc_vis proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~cmp_elem_xg_vis~2 nurbs_volume%cmp_elem_Xg_vis proc~export_xg~2->proc~cmp_elem_xg_vis~2 none~set~2 nurbs_volume%set proc~set_c~2->none~set~2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_volume ) :: shape","tags":"","loc":"program/shape_c_3d.html"},{"title":"compute_area – ForCAD","text":"Uses forcad program~~compute_area~~UsesGraph program~compute_area compute_area module~forcad forcad program~compute_area->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Calls program~~compute_area~~CallsGraph program~compute_area compute_area none~set~3 nurbs_surface%set program~compute_area->none~set~3 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 proc~ansatz~3 nurbs_surface%ansatz proc~cmp_area->proc~ansatz~3 proc~cmp_elem~3 nurbs_surface%cmp_elem proc~cmp_area->proc~cmp_elem~3 proc~ansatz~3->none~set~3 proc~ansatz~3->proc~cmp_elem~3 interface~gauss_leg gauss_leg proc~ansatz~3->interface~gauss_leg interface~ndgrid ndgrid proc~ansatz~3->interface~ndgrid interface~unique unique proc~ansatz~3->interface~unique none~derivative~3 nurbs_surface%derivative proc~ansatz~3->none~derivative~3 proc~det det proc~ansatz~3->proc~det proc~inv inv proc~ansatz~3->proc~inv interface~elemconn_cn elemConn_Cn proc~cmp_elem~3->interface~elemconn_cn proc~cmp_elem~3->interface~unique proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_elem~3->proc~get_multiplicity~3 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar~3 nurbs_surface%derivative_scalar none~derivative~3->proc~derivative_scalar~3 proc~derivative_vector~3 nurbs_surface%derivative_vector none~derivative~3->proc~derivative_vector~3 proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity~3->interface~compute_multiplicity proc~inv->proc~det proc~inv->proc~inv proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 interface~compute_dtgc~3 compute_dTgc proc~derivative_scalar~3->interface~compute_dtgc~3 proc~is_rational~3 nurbs_surface%is_rational proc~derivative_scalar~3->proc~is_rational~3 proc~derivative_vector~3->interface~ndgrid proc~derivative_vector~3->interface~compute_dtgc~3 proc~derivative_vector~3->proc~is_rational~3 gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->interface~ndgrid proc~gauss_legendre_2d->gauss_legendre proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->proc~kron Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk) :: Xc (4,3) real(kind=rk) :: area type( nurbs_surface ) :: shape","tags":"","loc":"program/compute_area.html"},{"title":"shape_C_2d – ForCAD","text":"Uses forcad program~~shape_c_2d~~UsesGraph program~shape_c_2d shape_C_2d module~forcad forcad program~shape_c_2d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set a C-shape with radius 2.0 and center at [0.0, 0.0, 0.0] Export control points to a VTK file Generate the NURBS C-shape with a resolution of 100 Export the generated cirlce to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS curve object Calls program~~shape_c_2d~~CallsGraph program~shape_c_2d shape_C_2d proc~create~3 nurbs_surface%create program~shape_c_2d->proc~create~3 proc~export_xc~3 nurbs_surface%export_Xc program~shape_c_2d->proc~export_xc~3 proc~export_xg~3 nurbs_surface%export_Xg program~shape_c_2d->proc~export_xg~3 proc~finalize~3 nurbs_surface%finalize program~shape_c_2d->proc~finalize~3 proc~set_c~3 nurbs_surface%set_C program~shape_c_2d->proc~set_c~3 proc~show~3 nurbs_surface%show program~shape_c_2d->proc~show~3 interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 interface~ndgrid ndgrid proc~create~3->interface~ndgrid proc~is_rational~3 nurbs_surface%is_rational proc~create~3->proc~is_rational~3 proc~cmp_elem_xc_vis~3 nurbs_surface%cmp_elem_Xc_vis proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~cmp_elem_xg_vis~3 nurbs_surface%cmp_elem_Xg_vis proc~export_xg~3->proc~cmp_elem_xg_vis~3 none~set~3 nurbs_surface%set proc~set_c~3->none~set~3 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_surface ) :: shape","tags":"","loc":"program/shape_c_2d.html"},{"title":"shape_circle – ForCAD","text":"Uses forcad program~~shape_circle~~UsesGraph program~shape_circle shape_circle module~forcad forcad program~shape_circle->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set a circle with radius 2.0 and center at [0.0, 0.0, 0.0] Export control points to a VTK file Generate the NURBS circle with a resolution of 100 Export the generated cirlce to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS curve object Calls program~~shape_circle~~CallsGraph program~shape_circle shape_circle proc~create nurbs_curve%create program~shape_circle->proc~create proc~export_xc nurbs_curve%export_Xc program~shape_circle->proc~export_xc proc~export_xg nurbs_curve%export_Xg program~shape_circle->proc~export_xg proc~finalize nurbs_curve%finalize program~shape_circle->proc~finalize proc~set_circle nurbs_curve%set_circle program~shape_circle->proc~set_circle proc~show nurbs_curve%show program~shape_circle->proc~show interface~compute_xg compute_Xg proc~create->interface~compute_xg proc~is_rational nurbs_curve%is_rational proc~create->proc~is_rational proc~cmp_elem_xc_vis nurbs_curve%cmp_elem_Xc_vis proc~export_xc->proc~cmp_elem_xc_vis proc~cmp_elem_xg_vis nurbs_curve%cmp_elem_Xg_vis proc~export_xg->proc~cmp_elem_xg_vis none~set nurbs_curve%set proc~set_circle->none~set proc~set1 nurbs_curve%set1 none~set->proc~set1 proc~set1a nurbs_curve%set1a none~set->proc~set1a proc~set2 nurbs_curve%set2 none~set->proc~set2 proc~set3 nurbs_curve%set3 none~set->proc~set3 proc~set4 nurbs_curve%set4 none~set->proc~set4 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~set1a->proc~cmp_degree proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_curve ) :: shape","tags":"","loc":"program/shape_circle.html"},{"title":"shape_half_ring_2d – ForCAD","text":"Uses forcad program~~shape_half_ring_2d~~UsesGraph program~shape_half_ring_2d shape_half_ring_2d module~forcad forcad program~shape_half_ring_2d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set up a half ring shape centered at 0,0,0 with inner radius 1 and outer radius 2. Export the control points to a VTK file for visualization. Create the shape using the specified number of elements in each direction. Export the geometry to a VTK file for visualization. Show the control geometry and geometry using PyVista Finalize and clean up the shape object. Calls program~~shape_half_ring_2d~~CallsGraph program~shape_half_ring_2d shape_half_ring_2d proc~create~3 nurbs_surface%create program~shape_half_ring_2d->proc~create~3 proc~export_xc~3 nurbs_surface%export_Xc program~shape_half_ring_2d->proc~export_xc~3 proc~export_xg~3 nurbs_surface%export_Xg program~shape_half_ring_2d->proc~export_xg~3 proc~finalize~3 nurbs_surface%finalize program~shape_half_ring_2d->proc~finalize~3 proc~set_half_ring~2 nurbs_surface%set_half_ring program~shape_half_ring_2d->proc~set_half_ring~2 proc~show~3 nurbs_surface%show program~shape_half_ring_2d->proc~show~3 interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 interface~ndgrid ndgrid proc~create~3->interface~ndgrid proc~is_rational~3 nurbs_surface%is_rational proc~create~3->proc~is_rational~3 proc~cmp_elem_xc_vis~3 nurbs_surface%cmp_elem_Xc_vis proc~export_xc~3->proc~cmp_elem_xc_vis~3 proc~cmp_elem_xg_vis~3 nurbs_surface%cmp_elem_Xg_vis proc~export_xg~3->proc~cmp_elem_xg_vis~3 none~set~3 nurbs_surface%set proc~set_half_ring~2->none~set~3 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~3->interface~elemconn_c0 proc~cmp_elem_xg_vis~3->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_surface ) :: shape","tags":"","loc":"program/shape_half_ring_2d.html"},{"title":"nearest_point_2d – ForCAD","text":"Uses forcad program~~nearest_point_2d~~UsesGraph program~nearest_point_2d nearest_point_2d module~forcad forcad program~nearest_point_2d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set a surface with 4 control points\nThe weights of the control points (Wc) are optional. Generate the NURBS surface with resolutions of 30 in both dimensions Find the nearest point on the surface to a given point\nFind the nearest point on the surface to a given point\nThe optimization method is used to find the nearest point\nThe optimization method is based on the Newton-Raphson method\nFinalize the NURBS surface object Calls program~~nearest_point_2d~~CallsGraph program~nearest_point_2d nearest_point_2d none~set~3 nurbs_surface%set program~nearest_point_2d->none~set~3 proc~create~3 nurbs_surface%create program~nearest_point_2d->proc~create~3 proc~finalize~3 nurbs_surface%finalize program~nearest_point_2d->proc~finalize~3 proc~nearest_point2~3 nurbs_surface%nearest_point2 program~nearest_point_2d->proc~nearest_point2~3 proc~nearest_point~3 nurbs_surface%nearest_point program~nearest_point_2d->proc~nearest_point~3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 interface~ndgrid ndgrid proc~create~3->interface~ndgrid proc~is_rational~3 nurbs_surface%is_rational proc~create~3->proc~is_rational~3 proc~nearest_point2~3->proc~create~3 proc~nearest_point2~3->proc~finalize~3 proc~nearest_point2~3->proc~nearest_point~3 none~derivative2~3 nurbs_surface%derivative2 proc~nearest_point2~3->none~derivative2~3 proc~cmp_xg~3 nurbs_surface%cmp_Xg proc~nearest_point2~3->proc~cmp_xg~3 proc~inv inv proc~nearest_point2~3->proc~inv interface~nearest_point_help_2d nearest_point_help_2d proc~nearest_point~3->interface~nearest_point_help_2d proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~derivative2_scalar~3 nurbs_surface%derivative2_scalar none~derivative2~3->proc~derivative2_scalar~3 proc~derivative2_vector~3 nurbs_surface%derivative2_vector none~derivative2~3->proc~derivative2_vector~3 proc~cmp_xg~3->interface~compute_xg~3 proc~cmp_xg~3->proc~is_rational~3 proc~inv->proc~inv proc~det det proc~inv->proc~det proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~derivative2_scalar~3->proc~is_rational~3 interface~compute_d2tgc~3 compute_d2Tgc proc~derivative2_scalar~3->interface~compute_d2tgc~3 proc~derivative2_vector~3->interface~ndgrid proc~derivative2_vector~3->proc~is_rational~3 proc~derivative2_vector~3->interface~compute_d2tgc~3 proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk) :: Wc (4) Weights of the control points real(kind=rk) :: Xc (4,3) Control points integer :: id id of the nearest point real(kind=rk), allocatable :: nearest_Xg (:) Coordinates of the nearest point on the surface real(kind=rk), allocatable :: nearest_Xt (:) Corresponding parametric coordinates of the nearest point type( nurbs_surface ) :: shape Declare a NURBS surface object","tags":"","loc":"program/nearest_point_2d.html"},{"title":"compute_length – ForCAD","text":"Uses forcad program~~compute_length~~UsesGraph program~compute_length compute_length module~forcad forcad program~compute_length->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Calls program~~compute_length~~CallsGraph program~compute_length compute_length none~set nurbs_curve%set program~compute_length->none~set proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length proc~set1 nurbs_curve%set1 none~set->proc~set1 proc~set1a nurbs_curve%set1a none~set->proc~set1a proc~set2 nurbs_curve%set2 none~set->proc~set2 proc~set3 nurbs_curve%set3 none~set->proc~set3 proc~set4 nurbs_curve%set4 none~set->proc~set4 proc~ansatz nurbs_curve%ansatz proc~cmp_length->proc~ansatz proc~cmp_elem nurbs_curve%cmp_elem proc~cmp_length->proc~cmp_elem proc~ansatz->none~set proc~ansatz->proc~cmp_elem interface~dyad dyad proc~ansatz->interface~dyad interface~gauss_leg gauss_leg proc~ansatz->interface~gauss_leg interface~unique unique proc~ansatz->interface~unique none~derivative nurbs_curve%derivative proc~ansatz->none~derivative interface~elemconn_cn elemConn_Cn proc~cmp_elem->interface~elemconn_cn proc~cmp_elem->interface~unique proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_elem->proc~get_multiplicity proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~set1a->proc~cmp_degree proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~dyad_t1_t1 dyad_t1_t1 interface~dyad->proc~dyad_t1_t1 proc~cmp_elemconn_cn_l cmp_elemConn_Cn_L interface~elemconn_cn->proc~cmp_elemconn_cn_l proc~cmp_elemconn_cn_s cmp_elemConn_Cn_S interface~elemconn_cn->proc~cmp_elemconn_cn_s proc~cmp_elemconn_cn_v cmp_elemConn_Cn_V interface~elemconn_cn->proc~cmp_elemconn_cn_v proc~gauss_legendre_1d gauss_legendre_1D interface~gauss_leg->proc~gauss_legendre_1d proc~gauss_legendre_2d gauss_legendre_2D interface~gauss_leg->proc~gauss_legendre_2d proc~gauss_legendre_3d gauss_legendre_3D interface~gauss_leg->proc~gauss_legendre_3d proc~unique_integer unique_integer interface~unique->proc~unique_integer proc~unique_real unique_real interface~unique->proc~unique_real proc~derivative_scalar nurbs_curve%derivative_scalar none~derivative->proc~derivative_scalar proc~derivative_vector nurbs_curve%derivative_vector none~derivative->proc~derivative_vector proc~cmp_degree->proc~get_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 interface~compute_dtgc compute_dTgc proc~derivative_scalar->interface~compute_dtgc proc~is_rational nurbs_curve%is_rational proc~derivative_scalar->proc~is_rational proc~derivative_vector->interface~compute_dtgc proc~derivative_vector->proc~is_rational gauss_legendre gauss_legendre proc~gauss_legendre_1d->gauss_legendre proc~gauss_legendre_2d->gauss_legendre interface~ndgrid ndgrid proc~gauss_legendre_2d->interface~ndgrid proc~kron kron proc~gauss_legendre_2d->proc~kron proc~gauss_legendre_3d->gauss_legendre proc~gauss_legendre_3d->interface~ndgrid proc~gauss_legendre_3d->proc~kron proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk) :: Xc (2,3) real(kind=rk) :: length type( nurbs_curve ) :: shape","tags":"","loc":"program/compute_length.html"},{"title":"shape_C_1d – ForCAD","text":"Uses forcad program~~shape_c_1d~~UsesGraph program~shape_c_1d shape_C_1d module~forcad forcad program~shape_c_1d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set a C-shape with radius 2.0 and center at [0.0, 0.0, 0.0] Export control points to a VTK file Generate the NURBS C-shape with a resolution of 100 Export the generated cirlce to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS curve object Calls program~~shape_c_1d~~CallsGraph program~shape_c_1d shape_C_1d proc~create nurbs_curve%create program~shape_c_1d->proc~create proc~export_xc nurbs_curve%export_Xc program~shape_c_1d->proc~export_xc proc~export_xg nurbs_curve%export_Xg program~shape_c_1d->proc~export_xg proc~finalize nurbs_curve%finalize program~shape_c_1d->proc~finalize proc~set_c nurbs_curve%set_C program~shape_c_1d->proc~set_c proc~show nurbs_curve%show program~shape_c_1d->proc~show interface~compute_xg compute_Xg proc~create->interface~compute_xg proc~is_rational nurbs_curve%is_rational proc~create->proc~is_rational proc~cmp_elem_xc_vis nurbs_curve%cmp_elem_Xc_vis proc~export_xc->proc~cmp_elem_xc_vis proc~cmp_elem_xg_vis nurbs_curve%cmp_elem_Xg_vis proc~export_xg->proc~cmp_elem_xg_vis none~set nurbs_curve%set proc~set_c->none~set proc~set1 nurbs_curve%set1 none~set->proc~set1 proc~set1a nurbs_curve%set1a none~set->proc~set1a proc~set2 nurbs_curve%set2 none~set->proc~set2 proc~set3 nurbs_curve%set3 none~set->proc~set3 proc~set4 nurbs_curve%set4 none~set->proc~set4 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~set1a->proc~cmp_degree proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem interface~compute_multiplicity compute_multiplicity proc~get_multiplicity->interface~compute_multiplicity proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_curve ) :: shape","tags":"","loc":"program/shape_c_1d.html"},{"title":"shape_ring_3d – ForCAD","text":"Uses forcad program~~shape_ring_3d~~UsesGraph program~shape_ring_3d shape_ring_3d module~forcad forcad program~shape_ring_3d->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Set up a ring shape centered at 0,0,0 with inner radius 1, outer radius 2, and length 1. Export the control points to a VTK file for visualization. Create the shape using the specified number of elements in each direction. Export the geometry to a VTK file for visualization. Show the control geometry and geometry using PyVista Finalize and clean up the shape object. Calls program~~shape_ring_3d~~CallsGraph program~shape_ring_3d shape_ring_3d proc~create~2 nurbs_volume%create program~shape_ring_3d->proc~create~2 proc~export_xc~2 nurbs_volume%export_Xc program~shape_ring_3d->proc~export_xc~2 proc~export_xg~2 nurbs_volume%export_Xg program~shape_ring_3d->proc~export_xg~2 proc~finalize~2 nurbs_volume%finalize program~shape_ring_3d->proc~finalize~2 proc~set_ring nurbs_volume%set_ring program~shape_ring_3d->proc~set_ring proc~show~2 nurbs_volume%show program~shape_ring_3d->proc~show~2 interface~compute_xg~2 compute_Xg proc~create~2->interface~compute_xg~2 interface~ndgrid ndgrid proc~create~2->interface~ndgrid proc~is_rational~2 nurbs_volume%is_rational proc~create~2->proc~is_rational~2 proc~cmp_elem_xc_vis~2 nurbs_volume%cmp_elem_Xc_vis proc~export_xc~2->proc~cmp_elem_xc_vis~2 proc~cmp_elem_xg_vis~2 nurbs_volume%cmp_elem_Xg_vis proc~export_xg~2->proc~cmp_elem_xg_vis~2 none~set~2 nurbs_volume%set proc~set_ring->none~set~2 proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~2 nurbs_volume%set1 none~set~2->proc~set1~2 proc~set2~2 nurbs_volume%set2 none~set~2->proc~set2~2 proc~set3~2 nurbs_volume%set3 none~set~2->proc~set3~2 proc~set4~2 nurbs_volume%set4 none~set~2->proc~set4~2 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis~2->interface~elemconn_c0 proc~cmp_elem_xg_vis~2->interface~elemconn_c0 proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~cmp_degree~2 nurbs_volume%cmp_degree proc~set1~2->proc~cmp_degree~2 proc~cmp_nc~2 nurbs_volume%cmp_nc proc~set1~2->proc~cmp_nc~2 proc~set2~2->proc~cmp_nc~2 proc~compute_knot_vector compute_knot_vector proc~set2~2->proc~compute_knot_vector proc~set3~2->proc~cmp_degree~2 proc~get_multiplicity~2 nurbs_volume%get_multiplicity proc~cmp_degree~2->proc~get_multiplicity~2 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~2->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~2->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial type( nurbs_volume ) :: shape","tags":"","loc":"program/shape_ring_3d.html"},{"title":"example_ppm1 – ForCAD","text":"Uses fortime forcad forimage forcolormap program~~example_ppm1~~UsesGraph program~example_ppm1 example_ppm1 forcolormap forcolormap program~example_ppm1->forcolormap forimage forimage program~example_ppm1->forimage fortime fortime program~example_ppm1->fortime module~forcad forcad program~example_ppm1->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Visualization of NURBS surfaces using ForCAD, ForImage and ForColorMap libraries\nThis example converts NURBS surfaces (vector) to an image (raster) using ForCAD, ForImage and ForColorMap libraries. Set the shape parameters for a tetragon\nSet the shape parameters for a ring\nSet the shape parameters for a ring\nSet the shape parameters for a ring\nSet the shape parameters for a ring Calls program~~example_ppm1~~CallsGraph program~example_ppm1 example_ppm1 compute_rgb compute_rgb program~example_ppm1->compute_rgb export_pnm export_pnm program~example_ppm1->export_pnm get_b get_b program~example_ppm1->get_b get_g get_g program~example_ppm1->get_g get_r get_r program~example_ppm1->get_r none~get_xg~3 nurbs_surface%get_Xg program~example_ppm1->none~get_xg~3 proc~create~3 nurbs_surface%create program~example_ppm1->proc~create~3 proc~finalize~3 nurbs_surface%finalize program~example_ppm1->proc~finalize~3 proc~get_ng~3 nurbs_surface%get_ng program~example_ppm1->proc~get_ng~3 proc~set_ring~2 nurbs_surface%set_ring program~example_ppm1->proc~set_ring~2 proc~set_tetragon nurbs_surface%set_tetragon program~example_ppm1->proc~set_tetragon set set program~example_ppm1->set set_pnm set_pnm program~example_ppm1->set_pnm timer_start timer_start program~example_ppm1->timer_start timer_stop timer_stop program~example_ppm1->timer_stop proc~get_xg_all~3 nurbs_surface%get_Xg_all none~get_xg~3->proc~get_xg_all~3 proc~get_xgid~3 nurbs_surface%get_Xgid none~get_xg~3->proc~get_xgid~3 proc~get_xgi~3 nurbs_surface%get_Xgi none~get_xg~3->proc~get_xgi~3 interface~compute_xg~3 compute_Xg proc~create~3->interface~compute_xg~3 interface~ndgrid ndgrid proc~create~3->interface~ndgrid proc~is_rational~3 nurbs_surface%is_rational proc~create~3->proc~is_rational~3 none~set~3 nurbs_surface%set proc~set_ring~2->none~set~3 proc~set_tetragon->none~set~3 proc~tetragon_xc tetragon_Xc proc~set_tetragon->proc~tetragon_xc proc~ndgrid2 ndgrid2 interface~ndgrid->proc~ndgrid2 proc~ndgrid3 ndgrid3 interface~ndgrid->proc~ndgrid3 proc~set1~3 nurbs_surface%set1 none~set~3->proc~set1~3 proc~set2~3 nurbs_surface%set2 none~set~3->proc~set2~3 proc~set3~3 nurbs_surface%set3 none~set~3->proc~set3~3 proc~set4~3 nurbs_surface%set4 none~set~3->proc~set4~3 proc~cmp_degree~3 nurbs_surface%cmp_degree proc~set1~3->proc~cmp_degree~3 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set1~3->proc~cmp_nc~3 proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector proc~set3~3->proc~cmp_degree~3 proc~get_multiplicity~3 nurbs_surface%get_multiplicity proc~cmp_degree~3->proc~get_multiplicity~3 interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 proc~get_multiplicity~3->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Xg (:,:) real(kind=rk) :: aspect_ratio type(color) :: background_color integer :: blue real(kind=rk) :: center (3) type(colormap) :: cmap integer :: green integer :: height integer :: i integer, allocatable :: idx (:,:) type(format_pnm) :: image real(kind=rk) :: inner_radius integer :: ng (2) real(kind=rk) :: outer_radius integer(kind=ik), allocatable :: px (:,:) integer :: red integer :: res1 integer :: res2 type( nurbs_surface ) :: shape type(timer) :: t integer :: width real(kind=rk), allocatable :: z_values (:)","tags":"","loc":"program/example_ppm1.html"},{"title":"example1_curve – ForCAD","text":"Uses forcad program~~example1_curve~~UsesGraph program~example1_curve example1_curve module~forcad forcad program~example1_curve->module~forcad module~forcad_nurbs_curve forcad_nurbs_curve module~forcad->module~forcad_nurbs_curve module~forcad_nurbs_surface forcad_nurbs_surface module~forcad->module~forcad_nurbs_surface module~forcad_nurbs_volume forcad_nurbs_volume module~forcad->module~forcad_nurbs_volume module~forcad_utils forcad_utils module~forcad->module~forcad_utils module~forcad_nurbs_curve->module~forcad_utils module~forcad_nurbs_surface->module~forcad_utils module~forcad_nurbs_volume->module~forcad_utils stdlib_quadrature stdlib_quadrature module~forcad_utils->stdlib_quadrature Help Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\ndescended from. Dashed arrows point from a module or program unit to \nmodules which it uses. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. This program demonstrates the usage of a NURBS (Non-Uniform Rational B-Spline) curve object to create  and finalize a NURBS curve.\nIt sets up control points, weights, and knot vectors for all three dimensions, generates the curve, and exports the control points and the curve to VTK files. Define control points for the NURBS curve\nDefine weights for the control points (optional)\nDefine knot vector Set knot vector, control points, and weights for the NURBS curve object.\nWc is optional Deallocate local arrays Export control points to a VTK file Generate the NURBS curve with a resolution of 20 Export the generated curve to a VTK file Show the control geometry and geometry using PyVista Print size of the knot vector Insert knots 0.25, twice and 0.75, once Print size of the updated knot vector Print the degree of the curve Elevate the degree of the curve (2 times) Print the updated degree of the curve Print size of the knot vector Remove knots 0.25, twice and 0.75, once Print size of the updated knot vector Generate the refined curve with a resolution of 20 Export updated control points to a VTK file Export the refined generated curve to a VTK file Show the control geometry and geometry using PyVista Rotate the control points Rotate the generated curve Translate the control points Translate the generated curve Export the transformed control points to a VTK file Export the transformed generated volume to a VTK file Show the control geometry and geometry using PyVista Finalize the NURBS curve object Calls program~~example1_curve~~CallsGraph program~example1_curve example1_curve none~get_knot nurbs_curve%get_knot program~example1_curve->none~get_knot none~set nurbs_curve%set program~example1_curve->none~set proc~create nurbs_curve%create program~example1_curve->proc~create proc~elevate_degree nurbs_curve%elevate_degree program~example1_curve->proc~elevate_degree proc~export_xc nurbs_curve%export_Xc program~example1_curve->proc~export_xc proc~export_xg nurbs_curve%export_Xg program~example1_curve->proc~export_xg proc~finalize nurbs_curve%finalize program~example1_curve->proc~finalize proc~get_degree nurbs_curve%get_degree program~example1_curve->proc~get_degree proc~insert_knots nurbs_curve%insert_knots program~example1_curve->proc~insert_knots proc~remove_knots nurbs_curve%remove_knots program~example1_curve->proc~remove_knots proc~rotate_xc nurbs_curve%rotate_Xc program~example1_curve->proc~rotate_xc proc~rotate_xg nurbs_curve%rotate_Xg program~example1_curve->proc~rotate_xg proc~show nurbs_curve%show program~example1_curve->proc~show proc~translate_xc nurbs_curve%translate_Xc program~example1_curve->proc~translate_xc proc~translate_xg nurbs_curve%translate_Xg program~example1_curve->proc~translate_xg proc~get_knot_all nurbs_curve%get_knot_all none~get_knot->proc~get_knot_all proc~get_knoti nurbs_curve%get_knoti none~get_knot->proc~get_knoti proc~set1 nurbs_curve%set1 none~set->proc~set1 proc~set1a nurbs_curve%set1a none~set->proc~set1a proc~set2 nurbs_curve%set2 none~set->proc~set2 proc~set3 nurbs_curve%set3 none~set->proc~set3 proc~set4 nurbs_curve%set4 none~set->proc~set4 interface~compute_xg compute_Xg proc~create->interface~compute_xg proc~is_rational nurbs_curve%is_rational proc~create->proc~is_rational proc~elevate_degree->none~set proc~elevate_degree_a_5_9 elevate_degree_A_5_9 proc~elevate_degree->proc~elevate_degree_a_5_9 proc~elevate_degree->proc~is_rational proc~cmp_elem_xc_vis nurbs_curve%cmp_elem_Xc_vis proc~export_xc->proc~cmp_elem_xc_vis proc~cmp_elem_xg_vis nurbs_curve%cmp_elem_Xg_vis proc~export_xg->proc~cmp_elem_xg_vis proc~insert_knots->none~set interface~compute_multiplicity compute_multiplicity proc~insert_knots->interface~compute_multiplicity proc~findspan findspan proc~insert_knots->proc~findspan proc~insert_knot_a_5_1 insert_knot_A_5_1 proc~insert_knots->proc~insert_knot_a_5_1 proc~insert_knots->proc~is_rational proc~remove_knots->none~set proc~remove_knots->interface~compute_multiplicity proc~remove_knots->proc~findspan proc~remove_knots->proc~is_rational proc~remove_knots_a_5_8 remove_knots_A_5_8 proc~remove_knots->proc~remove_knots_a_5_8 proc~rotation rotation proc~rotate_xc->proc~rotation proc~rotate_xg->proc~rotation proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2 interface~elemconn_c0 elemConn_C0 proc~cmp_elem_xc_vis->interface~elemconn_c0 proc~cmp_elem_xg_vis->interface~elemconn_c0 proc~elevate_degree_a_5_9->interface~compute_multiplicity proc~bincoeff bincoeff proc~elevate_degree_a_5_9->proc~bincoeff cosd cosd proc~rotation->cosd sind sind proc~rotation->sind proc~cmp_degree nurbs_curve%cmp_degree proc~set1->proc~cmp_degree proc~set1a->proc~cmp_degree proc~compute_knot_vector compute_knot_vector proc~set2->proc~compute_knot_vector proc~set3->proc~cmp_degree proc~cmp_elemconn_c0_l cmp_elemConn_C0_L interface~elemconn_c0->proc~cmp_elemconn_c0_l proc~cmp_elemconn_c0_s cmp_elemConn_C0_S interface~elemconn_c0->proc~cmp_elemconn_c0_s proc~cmp_elemconn_c0_v cmp_elemConn_C0_V interface~elemconn_c0->proc~cmp_elemconn_c0_v proc~factln factln proc~bincoeff->proc~factln proc~get_multiplicity nurbs_curve%get_multiplicity proc~cmp_degree->proc~get_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~get_multiplicity->interface~compute_multiplicity Help Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Type Bound Procedure Type Bound Procedure Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \narrows point from an interface to procedures which implement that interface.\nThis could include the module procedures in a generic interface or the\nimplementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Variables Type Attributes Name Initial real(kind=rk), allocatable :: Wc (:) Arrays for control points and weights real(kind=rk), allocatable :: Xc (:,:) Arrays for control points and weights real(kind=rk) :: knot (6) Array for knot vector type( nurbs_curve ) :: nurbs Declare a NURBS curve object Source Code program example1_curve use forcad , only : rk , nurbs_curve implicit none type ( nurbs_curve ) :: nurbs !! Declare a NURBS curve object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights real ( rk ) :: knot ( 6 ) !! Array for knot vector !----------------------------------------------------------------------------- ! Setting up the NURBS curve !----------------------------------------------------------------------------- !> Define control points for the NURBS curve allocate ( Xc ( 3 , 3 )) Xc ( 1 ,:) = [ 0.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 0.0_rk , 5.0_rk , 0.0_rk ] Xc ( 3 ,:) = [ 5.0_rk , 5.0_rk , 0.0_rk ] !> Define weights for the control points (optional) allocate ( Wc ( 3 )) Wc = [ 1.0_rk , 2.0_rk , 0.3_rk ] !> Define knot vector knot = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] !> Set knot vector, control points, and weights for the NURBS curve object. !> Wc is optional call nurbs % set ( knot , Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_curve_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS curve !----------------------------------------------------------------------------- !> Generate the NURBS curve with a resolution of 20 call nurbs % create ( res = 20 ) !> Export the generated curve to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_curve_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_curve_Xc.vtk' , 'vtk/nurbs_curve_Xg.vtk' ) !----------------------------------------------------------------------------- ! Refinements !----------------------------------------------------------------------------- !> Print size of the knot vector print * , size ( nurbs % get_knot ()) !> Insert knots 0.25, twice and 0.75, once call nurbs % insert_knots ([ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) !> Print size of the updated knot vector print * , size ( nurbs % get_knot ()) !> Print the degree of the curve print * , nurbs % get_degree () !> Elevate the degree of the curve (2 times) call nurbs % elevate_degree ( 2 ) !> Print the updated degree of the curve print * , nurbs % get_degree () !> Print size of the knot vector print * , size ( nurbs % get_knot ()) !> Remove knots 0.25, twice and 0.75, once call nurbs % remove_knots ([ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) !> Print size of the updated knot vector print * , size ( nurbs % get_knot ()) !> Generate the refined curve with a resolution of 20 call nurbs % create () !> Export updated control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_curve_Xc2.vtk' ) !> Export the refined generated curve to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_curve_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_curve_Xc2.vtk' , 'vtk/nurbs_curve_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Transformations !----------------------------------------------------------------------------- !> Rotate the control points call nurbs % rotate_Xc ( alpha = 4 5.0_rk , beta = 0.0_rk , theta = 9 0.0_rk ) !> Rotate the generated curve call nurbs % rotate_Xg ( alpha =- 4 5.0_rk , beta = 0.0_rk , theta =- 9 0.0_rk ) !> Translate the control points call nurbs % translate_Xc ([ 1.0_rk , 2.0_rk , - 3.0_rk ]) !> Translate the generated curve call nurbs % translate_Xg ([ - 1.0_rk , - 2.0_rk , 3.0_rk ]) !> Export the transformed control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_curve_Xc3.vtk' ) !> Export the transformed generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_curve_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_curve_Xc3.vtk' , 'vtk/nurbs_curve_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call nurbs % finalize () end program example1_curve","tags":"","loc":"program/example1_curve.html"},{"title":"put_to_nurbs.f90 – ForCAD","text":"This file depends on sourcefile~~put_to_nurbs.f90~~EfferentGraph sourcefile~put_to_nurbs.f90 put_to_nurbs.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~put_to_nurbs.f90->sourcefile~forcad.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~put_to_nurbs.f90->sourcefile~forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program example_put_to_nurbs use forcad use forcad_utils , only : hexahedron_Xc implicit none type ( nurbs_volume ) :: control_shape real ( rk ), allocatable :: X (:,:) integer , allocatable :: elem (:,:) integer :: i , nunit !> You can create your shape or use a predefined one !> Read coordinates from file allocate ( X ( 23200 , 3 )) open ( newunit = nunit , file = 'example/put_to_nurbs_X.txt' ) do i = 1 , 23200 read ( nunit , * ) X ( i , 1 ), X ( i , 2 ), X ( i , 3 ) end do close ( nunit ) !> Read element connectivities from file allocate ( elem ( 20577 , 8 )) open ( newunit = nunit , file = 'example/put_to_nurbs_elem.txt' ) do i = 1 , 20577 read ( nunit , * ) elem ( i , 1 ), elem ( i , 2 ), elem ( i , 4 ), elem ( i , 3 ), elem ( i , 5 ), elem ( i , 6 ), elem ( i , 8 ), elem ( i , 7 ) end do close ( nunit ) !> Set a control shape that will be used to put the shape into !> The contol shape is a hexahedron with 100x40x10 with 10x5x3 number of control points !> By modifying the control shape you can modify the shape call control_shape % set ( nc = [ 10 , 5 , 3 ], Xc = hexahedron_Xc ( L = [ 10 0.0_rk , 4 0.0_rk , 1 0.0_rk ], nc = [ 10 , 5 , 3 ])) !> Map the shape into the shape call control_shape % put_to_nurbs ( X , elem ) !> Deallocate local variables deallocate ( X , elem ) !> Export the shape and the control shape to vtk files call control_shape % export_Xc ( 'vtk/control_shape.vtk' ) call control_shape % export_Xg ( 'vtk/shape.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call control_shape % show ( 'vtk/control_shape.vtk' , 'vtk/shape.vtk' ) !> Finalize the control shape call control_shape % finalize () end program","tags":"","loc":"sourcefile/put_to_nurbs.f90.html"},{"title":"forcad.f90 – ForCAD","text":"This file depends on sourcefile~~forcad.f90~~EfferentGraph sourcefile~forcad.f90 forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Files dependent on this one sourcefile~~forcad.f90~~AfferentGraph sourcefile~forcad.f90 forcad.f90 sourcefile~cmp_area.f90 cmp_area.f90 sourcefile~cmp_area.f90->sourcefile~forcad.f90 sourcefile~cmp_length.f90 cmp_length.f90 sourcefile~cmp_length.f90->sourcefile~forcad.f90 sourcefile~cmp_volume.f90 cmp_volume.f90 sourcefile~cmp_volume.f90->sourcefile~forcad.f90 sourcefile~demo_curve.f90 demo_curve.f90 sourcefile~demo_curve.f90->sourcefile~forcad.f90 sourcefile~demo_surface.f90 demo_surface.f90 sourcefile~demo_surface.f90->sourcefile~forcad.f90 sourcefile~demo_volume.f90 demo_volume.f90 sourcefile~demo_volume.f90->sourcefile~forcad.f90 sourcefile~example_curve_1.f90 example_curve_1.f90 sourcefile~example_curve_1.f90->sourcefile~forcad.f90 sourcefile~example_ppm1.f90 example_ppm1.f90 sourcefile~example_ppm1.f90->sourcefile~forcad.f90 sourcefile~example_ppm2.f90 example_ppm2.f90 sourcefile~example_ppm2.f90->sourcefile~forcad.f90 sourcefile~example_ppm3.f90 example_ppm3.f90 sourcefile~example_ppm3.f90->sourcefile~forcad.f90 sourcefile~example_surface_1.f90 example_surface_1.f90 sourcefile~example_surface_1.f90->sourcefile~forcad.f90 sourcefile~example_volume_1.f90 example_volume_1.f90 sourcefile~example_volume_1.f90->sourcefile~forcad.f90 sourcefile~nearest_point_1d.f90 nearest_point_1d.f90 sourcefile~nearest_point_1d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d.f90 nearest_point_2d.f90 sourcefile~nearest_point_2d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d_bench.f90 nearest_point_2d_bench.f90 sourcefile~nearest_point_2d_bench.f90->sourcefile~forcad.f90 sourcefile~nearest_point_3d.f90 nearest_point_3d.f90 sourcefile~nearest_point_3d.f90->sourcefile~forcad.f90 sourcefile~put_to_nurbs.f90 put_to_nurbs.f90 sourcefile~put_to_nurbs.f90->sourcefile~forcad.f90 sourcefile~shape_c_1d.f90 shape_C_1d.f90 sourcefile~shape_c_1d.f90->sourcefile~forcad.f90 sourcefile~shape_c_2d.f90 shape_C_2d.f90 sourcefile~shape_c_2d.f90->sourcefile~forcad.f90 sourcefile~shape_c_3d.f90 shape_C_3d.f90 sourcefile~shape_c_3d.f90->sourcefile~forcad.f90 sourcefile~shape_circle.f90 shape_circle.f90 sourcefile~shape_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_circle.f90 shape_half_circle.f90 sourcefile~shape_half_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_2d.f90 shape_half_ring_2d.f90 sourcefile~shape_half_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_3d.f90 shape_half_ring_3d.f90 sourcefile~shape_half_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_hexahedron.f90 shape_hexahedron.f90 sourcefile~shape_hexahedron.f90->sourcefile~forcad.f90 sourcefile~shape_ring_2d.f90 shape_ring_2d.f90 sourcefile~shape_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_ring_3d.f90 shape_ring_3d.f90 sourcefile~shape_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_tetragon.f90 shape_tetragon.f90 sourcefile~shape_tetragon.f90->sourcefile~forcad.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause module forcad use forcad_utils use forcad_nurbs_curve use forcad_nurbs_surface use forcad_nurbs_volume private public rk , nurbs_curve , nurbs_surface , nurbs_volume end module forcad","tags":"","loc":"sourcefile/forcad.f90.html"},{"title":"demo_curve.f90 – ForCAD","text":"This file depends on sourcefile~~demo_curve.f90~~EfferentGraph sourcefile~demo_curve.f90 demo_curve.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~demo_curve.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> This program demonstrates the usage of a NURBS curve object to create, and finalize a NURBS curve. !> It sets up control points and weights, generates the curve, and exports the control points !> and the curve to VTK files at various stages. program example_nurbs_curve use forcad , only : rk , nurbs_curve implicit none type ( nurbs_curve ) :: nurbs !! Declare a NURBS curve object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights !----------------------------------------------------------------------------- ! Setting up the NURBS curve !----------------------------------------------------------------------------- !> Define control points for the NURBS curve Xc = generate_Xc ( 5 , 1.0_rk , 2.0_rk , 20 ) !> Define weights for the control points allocate ( Wc ( size ( Xc , 1 )), source = 1.0_rk ) !> Set control points and weights for the NURBS curve object call nurbs % set ( Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export initial control points to a VTK file call nurbs % export_Xc ( 'vtk/demo_curve_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS curve !----------------------------------------------------------------------------- !> Generate the NURBS curve with a resolution of 500 call nurbs % create ( res = 500 ) !> Export the generated curve to a VTK file call nurbs % export_Xg ( 'vtk/demo_curve_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/demo_curve_Xc.vtk' , 'vtk/demo_curve_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( num_coils , radius , height , num_points_per_coil ) result ( control_points ) integer , intent ( in ) :: num_coils , num_points_per_coil real ( rk ), intent ( in ) :: radius , height real ( rk ), allocatable :: control_points (:,:) integer :: coil , i real ( rk ) :: theta , coil_height allocate ( control_points ( num_coils * num_points_per_coil , 3 )) do coil = 1 , num_coils coil_height = height * real ( coil - 1 , rk ) / real ( num_coils - 1 , rk ) theta = 0.0_rk do i = 1 , num_points_per_coil theta = theta + 2.0_rk * acos ( - 1.0_rk ) / real ( num_points_per_coil , rk ) control_points (( coil - 1 ) * num_points_per_coil + i , 1 ) = radius * cos ( theta ) control_points (( coil - 1 ) * num_points_per_coil + i , 2 ) = radius * sin ( theta ) control_points (( coil - 1 ) * num_points_per_coil + i , 3 ) = coil_height end do end do end function !----------------------------------------------------------------------------- end program example_nurbs_curve","tags":"","loc":"sourcefile/demo_curve.f90.html"},{"title":"shape_half_ring_3d.f90 – ForCAD","text":"This file depends on sourcefile~~shape_half_ring_3d.f90~~EfferentGraph sourcefile~shape_half_ring_3d.f90 shape_half_ring_3d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_half_ring_3d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_half_ring_3d use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: shape !> Set up a half ring centered at 0,0,0 with inner radius 1, outer radius 2, and length 1. call shape % set_half_ring ([ 0.0_rk , 0.0_rk , 0.0_rk ], 1.0_rk , 2.0_rk , 1.0_rk ) !> Export the control points to a VTK file for visualization. call shape % export_Xc ( 'vtk/shape_half_ring_3d_Xc.vtk' ) !> Create the shape using the specified number of elements in each direction. call shape % create ( 60 , 15 , 10 ) !> Export the geometry to a VTK file for visualization. call shape % export_Xg ( 'vtk/shape_half_ring_3d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_half_ring_3d_Xc.vtk' , 'vtk/shape_half_ring_3d_Xg.vtk' ) !> Finalize and clean up the shape object. call shape % finalize () end program","tags":"","loc":"sourcefile/shape_half_ring_3d.f90.html"},{"title":"example_surface_1.f90 – ForCAD","text":"This file depends on sourcefile~~example_surface_1.f90~~EfferentGraph sourcefile~example_surface_1.f90 example_surface_1.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~example_surface_1.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> This program demonstrates the usage of a NURBS (Non-Uniform Rational B-Spline) surface object to create  and finalize a NURBS surface. !> It sets up control points, weights, and knot vectors for all three dimensions, generates the surface, and exports the control points and the surface to VTK files. program example3_surface use forcad implicit none type ( nurbs_surface ) :: nurbs !! Declare a NURBS surface object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights real ( rk ) :: knot1 ( 6 ), knot2 ( 6 ) !! Arrays for knot vectors in both dimensions !----------------------------------------------------------------------------- ! Setting up the NURBS surface !----------------------------------------------------------------------------- !> Define control points for the NURBS surface Xc = generate_Xc ( 3 , 3 , 1.0_rk ) !> Define weights for the control points allocate ( Wc ( size ( Xc , 1 ))) Wc = 1.0_rk Wc ( 2 ) = 2.0_rk !> Define knot vectors for both dimensions knot1 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] !> Set knot vectors, control points, and weights for the NURBS surface object call nurbs % set ( knot1 , knot2 , Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export the control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_surface_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS surface !----------------------------------------------------------------------------- !> Generate the NURBS surface with resolutions of 30 in both dimensions call nurbs % create ( 30 , 30 ) !> Export the generated surface to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_surface_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_surface_Xc.vtk' , 'vtk/nurbs_surface_Xg.vtk' ) !----------------------------------------------------------------------------- ! Refinements !----------------------------------------------------------------------------- !> Print size of the knot vectors print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) !> Insert knots 0.25, twice and 0.75, once in both directions call nurbs % insert_knots ( 1 , [ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) ! direction 1 call nurbs % insert_knots ( 2 , [ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) ! direction 2 !> Print size of the knot vectors after inserting knots print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) !> Print the degrees print * , nurbs % get_degree () !> Elevate degree by 2 in both directions call nurbs % elevate_degree ( 1 , 2 ) ! direction 1 call nurbs % elevate_degree ( 2 , 2 ) ! direction 2 !> Print the degrees after elevating print * , nurbs % get_degree () !> Print size of the knot vectors print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) !> Remove knots 0.25, twice and 0.75, once in both directions call nurbs % remove_knots ( 1 , [ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) ! direction 1 call nurbs % remove_knots ( 2 , [ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) ! direction 2 !> Print size of the knot vectors after removing knots print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) !> Generate the refined NURBS surface with resolutions of 30 in both dimensions call nurbs % create () !> Export updated control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_surface_Xc2.vtk' ) !> Export the refined generated surface to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_surface_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_surface_Xc2.vtk' , 'vtk/nurbs_surface_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Transformations !----------------------------------------------------------------------------- !> Rotate the control points call nurbs % rotate_Xc ( alpha = 4 5.0_rk , beta = 0.0_rk , theta = 9 0.0_rk ) !> Rotate the generated curve call nurbs % rotate_Xg ( alpha =- 4 5.0_rk , beta = 0.0_rk , theta =- 9 0.0_rk ) !> Translate the control points call nurbs % translate_Xc ([ 1.0_rk , 2.0_rk , - 3.0_rk ]) !> Translate the generated curve call nurbs % translate_Xg ([ - 1.0_rk , - 2.0_rk , 3.0_rk ]) !> Export the transformed control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_surface_Xc3.vtk' ) !> Export the transformed generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_surface_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_surface_Xc3.vtk' , 'vtk/nurbs_surface_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS surface object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( num_rows , num_cols , peak_height ) result ( control_points ) integer , intent ( in ) :: num_rows , num_cols real ( rk ), intent ( in ) :: peak_height real ( rk ), allocatable :: control_points (:,:) integer :: i , j real ( rk ) :: x_spacing , y_spacing , x_offset , y_offset x_spacing = 1.0_rk / real ( num_cols - 1 , rk ) y_spacing = 1.0_rk / real ( num_rows - 1 , rk ) x_offset = - 0.5_rk y_offset = - 0.5_rk allocate ( control_points ( num_rows * num_cols , 3 )) do i = 1 , num_rows do j = 1 , num_cols control_points (( i - 1 ) * num_cols + j , 1 ) = x_offset + real ( j - 1 , rk ) * x_spacing control_points (( i - 1 ) * num_cols + j , 2 ) = y_offset + real ( i - 1 , rk ) * y_spacing control_points (( i - 1 ) * num_cols + j , 3 ) = & peak_height * exp ( - (( control_points (( i - 1 ) * num_cols + j , 1 ) ** 2 ) & + ( control_points (( i - 1 ) * num_cols + j , 2 ) ** 2 ))) + 0.5_rk * peak_height * 0.2_rk end do end do end function !----------------------------------------------------------------------------- end program example3_surface","tags":"","loc":"sourcefile/example_surface_1.f90.html"},{"title":"nearest_point_1d.f90 – ForCAD","text":"This file depends on sourcefile~~nearest_point_1d.f90~~EfferentGraph sourcefile~nearest_point_1d.f90 nearest_point_1d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~nearest_point_1d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program nearest_point_1d use forcad , only : rk , nurbs_curve implicit none type ( nurbs_curve ) :: shape !! Declare a NURBS curve object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights real ( rk ) :: knot ( 6 ) !! Array for knot vector real ( rk ), allocatable :: nearest_Xg (:) !! Array for the nearest point on the curve real ( rk ) :: nearest_Xt !! Array for the parametric coordinates of the nearest point integer :: id !! Variable for the id of the nearest point !----------------------------------------------------------------------------- ! Setting up the NURBS curve !----------------------------------------------------------------------------- !> Define control points for the NURBS curve allocate ( Xc ( 3 , 3 )) Xc ( 1 ,:) = [ 0.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 0.0_rk , 5.0_rk , 0.0_rk ] Xc ( 3 ,:) = [ 5.0_rk , 5.0_rk , 0.0_rk ] !> Define weights for the control points (optional) allocate ( Wc ( 3 )) Wc = [ 1.0_rk , 1.1_rk , 1.0_rk ] !> Define knot vector knot = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] !> Set knot vector, control points, and weights for the NURBS curve object. !> Wc is optional call shape % set ( knot , Xc , Wc ) !----------------------------------------------------------------------------- ! Creating the NURBS curve !----------------------------------------------------------------------------- !> Generate the NURBS curve with a resolution of 20 call shape % create ( 20 ) !----------------------------------------------------------------------------- ! Nearest point on the curve !----------------------------------------------------------------------------- !> Find the nearest point on the curve to a given point ! nearest_Xg: Coordinates of the nearest point on the curve (optional) ! nearest_Xt: Corresponding parametric coordinates of the nearest point (optional) ! id: id of the nearest point (optional) call shape % nearest_point ([ 4.5_rk , 4.5_rk , 5.0_rk ], nearest_Xg , nearest_Xt , id ) print '(a,1x,g0,2x,g0,2x,g0,a,2x,g0,2x,a,1x,g0)' ,& 'Nearest point on the curve:' , nearest_Xg , ' with parametric coordinates:' , nearest_Xt , ' and id:' , id !----------------------------------------------------------------------------- ! Nearest point on the curve (Optimization) !----------------------------------------------------------------------------- !> Find the nearest point on the curve to a given point !> The optimization method is used to find the nearest point !> The optimization method is based on the Newton-Raphson method ! nearest_Xt: Corresponding parametric coordinates of the nearest point ! nearest_Xg: Coordinates of the nearest point on the curve (optional) call shape % nearest_point2 ([ 4.5_rk , 4.5_rk , 5.0_rk ], 1.0e-11_rk , 30 , nearest_Xt , nearest_Xg ) print '(a,1x,g0,2x,g0,a,2x,g0,2x,g0)' ,& 'Nearest point on the curve:' , nearest_Xg , ' with parametric coordinates:' , nearest_Xt !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call shape % finalize () deallocate ( nearest_Xg , Xc , Wc ) end program","tags":"","loc":"sourcefile/nearest_point_1d.f90.html"},{"title":"demo_surface.f90 – ForCAD","text":"This file depends on sourcefile~~demo_surface.f90~~EfferentGraph sourcefile~demo_surface.f90 demo_surface.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~demo_surface.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> This program demonstrates the usage of a NURBS surface object to create, and finalize a NURBS surface. !> It sets up control points and weights, generates the surface, and exports the control points !> and the surface to VTK files at various stages. program example_nurbs_surface use forcad , only : rk , nurbs_surface implicit none type ( nurbs_surface ) :: nurbs !! Declare a NURBS surface object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights !----------------------------------------------------------------------------- ! Setting up the NURBS surface !----------------------------------------------------------------------------- !> Define control points for the NURBS surface Xc = generate_Xc ( 10 , 10 , 1.5_rk ) !> Define weights for the control points allocate ( Wc ( size ( Xc , 1 )), source = 1.0_rk ) !> Set control points and weights for the NURBS surface object call nurbs % set ([ 10 , 10 ], Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export initial control points to a VTK file call nurbs % export_Xc ( 'vtk/demo_surface_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS surface !----------------------------------------------------------------------------- !> Generate the NURBS surface with a resolution of 30x30 call nurbs % create ( res1 = 30 , res2 = 30 ) !> Export the generated surface to a VTK file call nurbs % export_Xg ( 'vtk/demo_surface_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/demo_surface_Xc.vtk' , 'vtk/demo_surface_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS surface object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( num_rows , num_cols , peak_height ) result ( control_points ) integer , intent ( in ) :: num_rows , num_cols real ( rk ), intent ( in ) :: peak_height real ( rk ), allocatable :: control_points (:,:) integer :: i , j real ( rk ) :: x_spacing , y_spacing , x_offset , y_offset x_spacing = 1.0_rk / real ( num_cols - 1 , rk ) y_spacing = 1.0_rk / real ( num_rows - 1 , rk ) x_offset = - 0.5_rk y_offset = - 0.5_rk allocate ( control_points ( num_rows * num_cols , 3 )) do i = 1 , num_rows do j = 1 , num_cols control_points (( i - 1 ) * num_cols + j , 1 ) = x_offset + real ( j - 1 , rk ) * x_spacing control_points (( i - 1 ) * num_cols + j , 2 ) = y_offset + real ( i - 1 , rk ) * y_spacing control_points (( i - 1 ) * num_cols + j , 3 ) = & peak_height * exp ( - (( control_points (( i - 1 ) * num_cols + j , 1 ) ** 2 ) & + ( control_points (( i - 1 ) * num_cols + j , 2 ) ** 2 ))) + 0.5_rk * peak_height * 0.2_rk end do end do end function !----------------------------------------------------------------------------- end program example_nurbs_surface","tags":"","loc":"sourcefile/demo_surface.f90.html"},{"title":"example_volume_1.f90 – ForCAD","text":"This file depends on sourcefile~~example_volume_1.f90~~EfferentGraph sourcefile~example_volume_1.f90 example_volume_1.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~example_volume_1.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> This program demonstrates the usage of a NURBS (Non-Uniform Rational B-Spline) volume object to create  and finalize a NURBS volume. !> It sets up control points, weights, and knot vectors for all three dimensions, generates the volume, and exports the control points and the volume to VTK files. program example3_volume use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: nurbs !! Declare a NURBS volume object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights real ( rk ) :: knot1 ( 4 ), knot2 ( 4 ), knot3 ( 4 ) !! Arrays for knot vectors in all three dimensions !----------------------------------------------------------------------------- ! Setting up the NURBS volume !----------------------------------------------------------------------------- !> Define the control points for the NURBS volume Xc = generate_Xc ( 5.0_rk ) !> Define weights for the control points (optional) allocate ( Wc ( size ( Xc , 1 )), source = 1.0_rk ) Wc ( 2 ) = 5.0_rk !> Define knot vectors for all three dimensions knot1 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] knot3 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] !> Set knot vectors, control points, and weights for the NURBS volume object !> Wc is optional. call nurbs % set ( knot1 , knot2 , knot3 , Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export the control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_volume_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS volume !----------------------------------------------------------------------------- !> Generate the NURBS volume with resolutions of 20, 20, and 20 in the three dimensions call nurbs % create ( 20 , 20 , 20 ) !> Export the generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_volume_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_volume_Xc.vtk' , 'vtk/nurbs_volume_Xg.vtk' ) !----------------------------------------------------------------------------- ! Refinements !----------------------------------------------------------------------------- !> Print size of knot vectors print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) print * , size ( nurbs % get_knot ( 3 )) !> Insert knots 0.25 and 0.75 in all three directions call nurbs % insert_knots ( 1 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 1 call nurbs % insert_knots ( 2 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 2 call nurbs % insert_knots ( 3 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 3 !> Print size of knot vectors after inserting knots print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) print * , size ( nurbs % get_knot ( 3 )) !> Print degrees print * , nurbs % get_degree () !> Elevate degree by 2 in all three directions call nurbs % elevate_degree ( 1 , 2 ) ! direction 1 call nurbs % elevate_degree ( 2 , 2 ) ! direction 2 call nurbs % elevate_degree ( 3 , 2 ) ! direction 3 !> Print degrees after elevating print * , nurbs % get_degree () !> Print size of knot vectors print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) print * , size ( nurbs % get_knot ( 3 )) call nurbs % remove_knots ( 1 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 1 call nurbs % remove_knots ( 2 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 2 call nurbs % remove_knots ( 3 , [ 0.25_rk , 0.75_rk ], [ 1 , 1 ]) ! direction 3 !> Print size of knot vectors after removing knots print * , size ( nurbs % get_knot ( 1 )) print * , size ( nurbs % get_knot ( 2 )) print * , size ( nurbs % get_knot ( 3 )) !> Generate the refined NURBS volume with resolutions of 40, 40, and 40 in the three dimensions call nurbs % create () !> Export updated control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_volume_Xc2.vtk' ) !> Export the refined generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_volume_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_volume_Xc2.vtk' , 'vtk/nurbs_volume_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Transformations !----------------------------------------------------------------------------- !> Rotate the control points call nurbs % rotate_Xc ( alpha =- 4 5.0_rk , beta = 0.0_rk , theta = 9 0.0_rk ) !> Rotate the generated curve call nurbs % rotate_Xg ( alpha =- 4 5.0_rk , beta = 0.0_rk , theta = 9 0.0_rk ) !> Translate the control points call nurbs % translate_Xc ([ 1.0_rk , 2.0_rk , - 3.0_rk ]) !> Translate the generated curve call nurbs % translate_Xg ([ 1.0_rk , 2.0_rk , - 3.0_rk ]) !> Export the transformed control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_volume_Xc3.vtk' ) !> Export the transformed generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_volume_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_volume_Xc3.vtk' , 'vtk/nurbs_volume_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Extract faces !----------------------------------------------------------------------------- !> first compute and set the connectivities of volume elements call nurbs % set_elem ( nurbs % cmp_elem ()) !> get the connectivity of the face1 of the first element print * , 'Face 1 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 1 ) print * , 'Face 2 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 2 ) print * , 'Face 3 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 3 ) print * , 'Face 4 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 4 ) print * , 'Face 5 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 5 ) print * , 'Face 6 of element 1:' , nurbs % cmp_elemFace ( elem = 1 , face = 6 ) !> get the degree of the faces print * , 'Degree of face 1:' , nurbs % cmp_degreeFace ( face = 1 ) print * , 'Degree of face 2:' , nurbs % cmp_degreeFace ( face = 2 ) print * , 'Degree of face 3:' , nurbs % cmp_degreeFace ( face = 3 ) print * , 'Degree of face 4:' , nurbs % cmp_degreeFace ( face = 4 ) print * , 'Degree of face 5:' , nurbs % cmp_degreeFace ( face = 5 ) print * , 'Degree of face 6:' , nurbs % cmp_degreeFace ( face = 6 ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS volume object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( L ) result ( control_points ) implicit none real ( rk ), intent ( in ) :: L real ( rk ), allocatable :: control_points (:,:) real ( rk ) :: L2 L2 = L / 2.0_rk allocate ( control_points ( 8 , 3 )) control_points ( 1 ,:) = [ L2 , - L2 , L2 ] control_points ( 2 ,:) = [ L2 , - L2 , - L2 ] control_points ( 3 ,:) = [ - L2 , - L2 , L2 ] control_points ( 4 ,:) = [ - L2 , - L2 , - L2 ] control_points ( 5 ,:) = [ L2 , L2 , L2 ] control_points ( 6 ,:) = [ L2 , L2 , - L2 ] control_points ( 7 ,:) = [ - L2 , L2 , L2 ] control_points ( 8 ,:) = [ - L2 , L2 , - L2 ] end function !----------------------------------------------------------------------------- end program example3_volume","tags":"","loc":"sourcefile/example_volume_1.f90.html"},{"title":"demo_volume.f90 – ForCAD","text":"This file depends on sourcefile~~demo_volume.f90~~EfferentGraph sourcefile~demo_volume.f90 demo_volume.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~demo_volume.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> This program demonstrates the usage of a NURBS volume object to create, and finalize a NURBS volume. !> It sets up control points and weights, generates the volume, and exports the control points !> and the volume to VTK files at various stages. program example_nurbs_volume use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: nurbs !! Declare a NURBS volume object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights !----------------------------------------------------------------------------- ! Setting up the NURBS volume !----------------------------------------------------------------------------- !> Define control points for the NURBS volume Xc = generate_Xc ( 1.0_rk ) !> Define weights for the control points allocate ( Wc ( size ( Xc , 1 )), source = 1.0_rk ) !> Set control points and weights for the NURBS volume object call nurbs % set ([ 2 , 2 , 2 ], Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export initial control points to a VTK file call nurbs % export_Xc ( 'vtk/demo_volume_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS volume !----------------------------------------------------------------------------- !> Generate the NURBS volume with a resolution of 15X15X15 call nurbs % create ( 15 , 15 , 15 ) !> Export the generated volume to a VTK file call nurbs % export_Xg ( 'vtk/demo_volume_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/demo_volume_Xc.vtk' , 'vtk/demo_volume_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS volume object call nurbs % finalize () contains !----------------------------------------------------------------------------- function generate_Xc ( L ) result ( control_points ) implicit none real ( rk ), intent ( in ) :: L real ( rk ), allocatable :: control_points (:,:) real ( rk ) :: L2 L2 = L / 2.0_rk allocate ( control_points ( 8 , 3 )) control_points ( 1 ,:) = [ L2 , - L2 , L2 ] control_points ( 2 ,:) = [ L2 , - L2 , - L2 ] control_points ( 3 ,:) = [ - L2 , - L2 , L2 ] control_points ( 4 ,:) = [ - L2 , - L2 , - L2 ] control_points ( 5 ,:) = [ L2 , L2 , L2 ] control_points ( 6 ,:) = [ L2 , L2 , - L2 ] control_points ( 7 ,:) = [ - L2 , L2 , L2 ] control_points ( 8 ,:) = [ - L2 , L2 , - L2 ] end function !----------------------------------------------------------------------------- end program example_nurbs_volume","tags":"","loc":"sourcefile/demo_volume.f90.html"},{"title":"forcad_nurbs_curve.f90 – ForCAD","text":"This file depends on sourcefile~~forcad_nurbs_curve.f90~~EfferentGraph sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Files dependent on this one sourcefile~~forcad_nurbs_curve.f90~~AfferentGraph sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~cmp_area.f90 cmp_area.f90 sourcefile~cmp_area.f90->sourcefile~forcad.f90 sourcefile~cmp_length.f90 cmp_length.f90 sourcefile~cmp_length.f90->sourcefile~forcad.f90 sourcefile~cmp_volume.f90 cmp_volume.f90 sourcefile~cmp_volume.f90->sourcefile~forcad.f90 sourcefile~demo_curve.f90 demo_curve.f90 sourcefile~demo_curve.f90->sourcefile~forcad.f90 sourcefile~demo_surface.f90 demo_surface.f90 sourcefile~demo_surface.f90->sourcefile~forcad.f90 sourcefile~demo_volume.f90 demo_volume.f90 sourcefile~demo_volume.f90->sourcefile~forcad.f90 sourcefile~example_curve_1.f90 example_curve_1.f90 sourcefile~example_curve_1.f90->sourcefile~forcad.f90 sourcefile~example_ppm1.f90 example_ppm1.f90 sourcefile~example_ppm1.f90->sourcefile~forcad.f90 sourcefile~example_ppm2.f90 example_ppm2.f90 sourcefile~example_ppm2.f90->sourcefile~forcad.f90 sourcefile~example_ppm3.f90 example_ppm3.f90 sourcefile~example_ppm3.f90->sourcefile~forcad.f90 sourcefile~example_surface_1.f90 example_surface_1.f90 sourcefile~example_surface_1.f90->sourcefile~forcad.f90 sourcefile~example_volume_1.f90 example_volume_1.f90 sourcefile~example_volume_1.f90->sourcefile~forcad.f90 sourcefile~nearest_point_1d.f90 nearest_point_1d.f90 sourcefile~nearest_point_1d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d.f90 nearest_point_2d.f90 sourcefile~nearest_point_2d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d_bench.f90 nearest_point_2d_bench.f90 sourcefile~nearest_point_2d_bench.f90->sourcefile~forcad.f90 sourcefile~nearest_point_3d.f90 nearest_point_3d.f90 sourcefile~nearest_point_3d.f90->sourcefile~forcad.f90 sourcefile~put_to_nurbs.f90 put_to_nurbs.f90 sourcefile~put_to_nurbs.f90->sourcefile~forcad.f90 sourcefile~shape_c_1d.f90 shape_C_1d.f90 sourcefile~shape_c_1d.f90->sourcefile~forcad.f90 sourcefile~shape_c_2d.f90 shape_C_2d.f90 sourcefile~shape_c_2d.f90->sourcefile~forcad.f90 sourcefile~shape_c_3d.f90 shape_C_3d.f90 sourcefile~shape_c_3d.f90->sourcefile~forcad.f90 sourcefile~shape_circle.f90 shape_circle.f90 sourcefile~shape_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_circle.f90 shape_half_circle.f90 sourcefile~shape_half_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_2d.f90 shape_half_ring_2d.f90 sourcefile~shape_half_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_3d.f90 shape_half_ring_3d.f90 sourcefile~shape_half_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_hexahedron.f90 shape_hexahedron.f90 sourcefile~shape_hexahedron.f90->sourcefile~forcad.f90 sourcefile~shape_ring_2d.f90 shape_ring_2d.f90 sourcefile~shape_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_ring_3d.f90 shape_ring_3d.f90 sourcefile~shape_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_tetragon.f90 shape_tetragon.f90 sourcefile~shape_tetragon.f90->sourcefile~forcad.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> This module defines the 'nurbs_curve' type for representing a Non-Uniform Rational B-Spline (NURBS) curve. module forcad_nurbs_curve use forcad_utils , only : rk , basis_bspline , elemConn_C0 , compute_multiplicity , compute_knot_vector , basis_bspline_der ,& insert_knot_A_5_1 , findspan , elevate_degree_A_5_9 , remove_knots_A_5_8 , & elemConn_Cn , unique , rotation , dyad , gauss_leg implicit none private public nurbs_curve !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause type nurbs_curve real ( rk ), allocatable , private :: Xc (:,:) !! Control points (2D array: [nc, dim]) real ( rk ), allocatable , private :: Xg (:,:) !! Geometry points (2D array: [ng, dim]) real ( rk ), allocatable , private :: Wc (:) !! Weights for control points (1D array: [nc]) real ( rk ), allocatable , private :: Xt (:) !! Evaluation points (1D array: [ng]) real ( rk ), allocatable , private :: knot (:) !! Knot vector (1D array) integer , private :: degree !! Degree (order) of the curve integer , private :: nc !! Number of control points integer , private :: ng !! Number of geometry points integer , allocatable , private :: elemConn_Xc_vis (:,:) !! Connectivity for visualization of control points integer , allocatable , private :: elemConn_Xg_vis (:,:) !! Connectivity for visualization of geometry points integer , allocatable , private :: elemConn (:,:) !! IGA element connectivity contains procedure :: set1 !!> Set knot vector, control points and weights for the NURBS curve object procedure :: set1a procedure :: set2 !!> Set NURBS curve using nodes of parameter space, degree, continuity, control points and weights procedure :: set3 !!> Set Bezier or Rational Bezier curve using control points and weights procedure :: set4 !!> Set NURBS curve using degree, number of control points, control points and weights generic :: set => set1 , set1a , set2 , set3 , set4 !!> Set NURBS curve procedure :: create !!> Generate geometry points procedure :: cmp_Xg !!> Compute geometry points procedure , private :: get_Xc_all !!> Get all control points procedure , private :: get_Xci !!> Get i-th control point procedure , private :: get_Xcid !!> Get i-th control point in a specific direction generic :: get_Xc => get_Xc_all , get_Xci , get_Xcid !!> Get control points procedure , private :: get_Xg_all !!> Get all geometry points procedure , private :: get_Xgi !!> Get i-th geometry point procedure , private :: get_Xgid !!> Get i-th geometry point in a specific direction generic :: get_Xg => get_Xg_all , get_Xgi , get_Xgid !!> Get geometry points procedure , private :: get_Wc_all !!> Get all weights procedure , private :: get_Wci !!> Get i-th weight generic :: get_Wc => get_Wc_all , get_Wci !!> Get weights procedure :: get_Xt !!> Get parameter values procedure , private :: get_knot_all !!> Get all knot vectors procedure , private :: get_knoti !!> Get i-th knot value generic :: get_knot => get_knoti , get_knot_all !!> Get knot vector procedure :: get_ng !!> Get number of geometry points procedure :: cmp_degree !!> Compute degree of the NURBS curve procedure :: get_degree !!> Get degree of the NURBS curve procedure :: finalize !!> Finalize the NURBS curve object procedure :: cmp_elem_Xc_vis !!> Generate connectivity for control points procedure :: cmp_elem_Xg_vis !!> Generate connectivity for geometry points procedure :: cmp_elem !!> Generate IGA element connectivity procedure :: get_elem_Xc_vis !!> Get connectivity for control points procedure :: get_elem_Xg_vis !!> Get connectivity for geometry points procedure :: get_elem !!> Get IGA element connectivity procedure :: set_elem_Xc_vis !!> Set connectivity for control points procedure :: set_elem_Xg_vis !!> Set connectivity for geometry points procedure :: set_elem !!> Set IGA element connectivity procedure :: export_Xc !!> Export control points to VTK file procedure :: export_Xg !!> Export geometry points to VTK file procedure :: modify_Xc !!> Modify control points procedure :: modify_Wc !!> Modify weights procedure :: get_multiplicity !!> Compute and return the multiplicity of the knots procedure :: get_continuity !!> Compute and return the continuity of the curve procedure :: cmp_nc !!> Compute number of required control points procedure :: get_nc !!> Get number of control points procedure :: insert_knots !!> Insert knots into the knot vector procedure :: elevate_degree !!> Elevate the degree of the curve procedure , private :: basis_vector !!> Compute the basis functions of the NURBS curve procedure , private :: basis_scalar !!> Compute the basis functions of the NURBS curve generic :: basis => basis_vector , basis_scalar !!> Compute the basis functions of the NURBS curve procedure , private :: derivative_vector !!> Compute the derivative of the NURBS curve procedure , private :: derivative_scalar !!> Compute the derivative of the NURBS curve generic :: derivative => derivative_vector , derivative_scalar !!> Compute the derivative of the NURBS curve procedure , private :: derivative2_vector !!> Compute the second derivative of the NURBS curve procedure , private :: derivative2_scalar !!> Compute the second derivative of the NURBS curve generic :: derivative2 => derivative2_vector , derivative2_scalar !!> Compute the second derivative of the NURBS curve procedure :: is_rational !!> Check if the NURBS curve is rational procedure :: remove_knots !!> Remove knots from the knot vector procedure :: rotate_Xc !!> Rotate control points procedure :: rotate_Xg !!> Rotate geometry points procedure :: translate_Xc !!> Translate control points procedure :: translate_Xg !!> Translate geometry points procedure :: show !!> Show the NURBS object using PyVista procedure :: nearest_point !!> Find the nearest point on the NURBS curve (Approximation) procedure :: nearest_point2 !!> Find the nearest point on the NURBS curve (Minimization - Newton's method) procedure :: ansatz !!> Compute the shape functions, derivative of shape functions and dL procedure :: cmp_length !!> Compute the length of the NURBS curve ! Shapes procedure :: set_circle !!> Set a circle procedure :: set_half_circle !!> Set a half circle procedure :: set_C !!> Set a C-shape end type !=============================================================================== interface compute_Xg pure function compute_Xg_nurbs_1d ( f_Xt , f_knot , f_degree , f_nc , f_ng , f_Xc , f_Wc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc integer , intent ( in ) :: f_ng real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Xg (:,:) end function pure function compute_Xg_bspline_1d ( f_Xt , f_knot , f_degree , f_nc , f_ng , f_Xc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc integer , intent ( in ) :: f_ng real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), allocatable :: f_Xg (:,:) end function pure function compute_Xg_nurbs_1d_1point ( f_Xt , f_knot , f_degree , f_nc , f_Xc , f_Wc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ) :: f_Xt real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Xg (:) end function pure function compute_Xg_bspline_1d_1point ( f_Xt , f_knot , f_degree , f_nc , f_Xc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ) :: f_Xt real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), allocatable :: f_Xg (:) end function end interface interface compute_d2Tgc pure subroutine compute_d2Tgc_nurbs_1d_vector ( f_Xt , f_knot , f_degree , f_nc , f_ng , f_Wc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc integer , intent ( in ) :: f_ng real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_d2Tgc_bspline_1d_vector ( f_Xt , f_knot , f_degree , f_nc , f_ng , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc integer , intent ( in ) :: f_ng real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_d2Tgc_nurbs_1d_scalar ( f_Xt , f_knot , f_degree , f_nc , f_Wc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ) :: f_Xt real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) end subroutine pure subroutine compute_d2Tgc_bspline_1d_scalar ( f_Xt , f_knot , f_degree , f_nc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ) :: f_Xt real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) end subroutine end interface interface compute_dTgc pure subroutine compute_dTgc_nurbs_1d_vector ( f_Xt , f_knot , f_degree , f_nc , f_ng , f_Wc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc integer , intent ( in ) :: f_ng real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_dTgc_bspline_1d_vector ( f_Xt , f_knot , f_degree , f_nc , f_ng , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc integer , intent ( in ) :: f_ng real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_dTgc_nurbs_1d_scalar ( f_Xt , f_knot , f_degree , f_nc , f_Wc , f_dTgc , f_Tgc , f_elem ) import :: rk real ( rk ), intent ( in ) :: f_Xt real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) integer , intent ( in ), optional :: f_elem (:) end subroutine pure subroutine compute_dTgc_bspline_1d_scalar ( f_Xt , f_knot , f_degree , f_nc , f_dTgc , f_Tgc , f_elem ) import :: rk real ( rk ), intent ( in ) :: f_Xt real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc real ( rk ), allocatable , intent ( out ) :: f_dTgc (:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) integer , intent ( in ), optional :: f_elem (:) end subroutine end interface interface compute_Tgc pure function compute_Tgc_nurbs_1d_vector ( f_Xt , f_knot , f_degree , f_nc , f_ng , f_Wc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc integer , intent ( in ) :: f_ng real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Tgc (:,:) end function pure function compute_Tgc_bspline_1d_vector ( f_Xt , f_knot , f_degree , f_nc , f_ng ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc integer , intent ( in ) :: f_ng real ( rk ), allocatable :: f_Tgc (:,:) end function pure function compute_Tgc_nurbs_1d_scalar ( f_Xt , f_knot , f_degree , f_nc , f_Wc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ) :: f_Xt real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Tgc (:) end function pure function compute_Tgc_bspline_1d_scalar ( f_Xt , f_knot , f_degree , f_nc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ) :: f_Xt real ( rk ), intent ( in ), contiguous :: f_knot (:) integer , intent ( in ) :: f_degree integer , intent ( in ) :: f_nc real ( rk ), allocatable :: f_Tgc (:) end function end interface interface pure function nearest_point_help_1d ( f_ng , f_Xg , f_point_Xg ) result ( f_distances ) import :: rk integer , intent ( in ) :: f_ng real ( rk ), intent ( in ), contiguous :: f_Xg (:,:) real ( rk ), intent ( in ), contiguous :: f_point_Xg (:) real ( rk ), allocatable :: f_distances (:) end function end interface contains !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set knot vector, control points and weights for the NURBS curve object. pure subroutine set1 ( this , knot , Xc , Wc ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: knot (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( allocated ( this % knot )) deallocate ( this % knot ) if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % knot = knot call this % cmp_degree () this % Xc = Xc this % nc = size ( this % Xc , 1 ) if ( present ( Wc )) then if ( size ( Wc ) /= this % nc ) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set knot vector, control points and weights for the NURBS curve object. pure subroutine set1a ( this , knot , Xc , Wc ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: knot (:) real ( rk ), intent ( in ), contiguous :: Xc (:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( allocated ( this % knot )) deallocate ( this % knot ) if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % knot = knot call this % cmp_degree () allocate ( this % Xc ( size ( Xc ), 3 ), source = 0.0_rk ) this % Xc (:, 1 ) = Xc this % nc = size ( this % Xc , 1 ) if ( present ( Wc )) then if ( size ( Wc ) /= this % nc ) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set NURBS curve using nodes of parameter space (Xth), degree, continuity, control points and weights. pure subroutine set2 ( this , Xth_dir , degree , continuity , Xc , Wc ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xth_dir (:) integer , intent ( in ) :: degree integer , intent ( in ), contiguous :: continuity (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( allocated ( this % knot )) deallocate ( this % knot ) if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % knot = compute_knot_vector ( Xth_dir , degree , continuity ) this % degree = degree this % Xc = Xc this % nc = size ( this % Xc , 1 ) if ( present ( Wc )) then if ( size ( Wc ) /= this % nc ) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set Bezier or Rational Bezier curve using control points and weights. pure subroutine set3 ( this , Xc , Wc ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( allocated ( this % knot )) deallocate ( this % knot ) if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % Xc = Xc this % nc = size ( this % Xc , 1 ) if ( allocated ( this % knot )) deallocate ( this % knot ) allocate ( this % knot ( 2 * this % nc )) this % knot ( 1 : this % nc ) = 0.0_rk this % knot ( this % nc + 1 : 2 * this % nc ) = 1.0_rk call this % cmp_degree () if ( present ( Wc )) then if ( size ( Wc ) /= this % nc ) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set4 ( this , degree , nc , Xc , Wc ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ) :: degree integer , intent ( in ) :: nc real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) integer :: m , i if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % Xc = Xc this % nc = nc this % degree = degree ! Size of knot vectors m = nc + degree + 1 if ( allocated ( this % knot )) deallocate ( this % knot ) allocate ( this % knot ( m )) this % knot ( 1 : degree + 1 ) = 0.0_rk this % knot ( degree + 2 : m - degree - 1 ) = [( real ( i , rk ) / ( m - 2 * degree - 1 ), i = 1 , m - 2 * degree - 2 )] this % knot ( m - degree : m ) = 1.0_rk if ( present ( Wc )) then if ( size ( Wc ) /= nc ) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine create ( this , res , Xt ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ), optional :: res real ( rk ), intent ( in ), contiguous , optional :: Xt (:) integer :: i ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % knot )) then error stop 'Knot vector is not set.' end if ! Set parameter values if ( present ( Xt )) then if ( allocated ( this % Xt )) deallocate ( this % Xt ) this % Xt = Xt elseif ( present ( res )) then if ( allocated ( this % Xt )) deallocate ( this % Xt ) allocate ( this % Xt ( res )) this % Xt = [( real ( i - 1 , rk ) / real ( res - 1 , rk ), i = 1 , res )] ! else ! this%Xt = this%Xt end if ! Set number of geometry points this % ng = size ( this % Xt ) ! Allocate memory for geometry points if ( allocated ( this % Xg )) deallocate ( this % Xg ) if ( this % is_rational ()) then ! NURBS this % Xg = compute_Xg (& this % Xt , this % knot , this % degree , this % nc , this % ng , this % Xc , this % Wc ) else ! B-Spline this % Xg = compute_Xg (& this % Xt , this % knot , this % degree , this % nc , this % ng , this % Xc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_Xg ( this , Xt ) result ( Xg ) class ( nurbs_curve ), intent ( in ) :: this real ( rk ), intent ( in ) :: Xt real ( rk ), allocatable :: Xg (:) ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % knot )) then error stop 'Knot vector is not set.' end if if ( this % is_rational ()) then ! NURBS Xg = compute_Xg ( Xt , this % knot , this % degree , this % nc , this % Xc , this % Wc ) else ! B-Spline Xg = compute_Xg ( Xt , this % knot , this % degree , this % nc , this % Xc ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xc_all ( this ) result ( Xc ) class ( nurbs_curve ), intent ( in ) :: this real ( rk ), allocatable :: Xc (:,:) if ( allocated ( this % Xc )) then Xc = this % Xc else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xci ( this , n ) result ( Xc ) class ( nurbs_curve ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ), allocatable :: Xc (:) if ( allocated ( this % Xc )) then if ( n < lbound ( this % Xc , 1 ) . or . n > ubound ( this % Xc , 1 )) then error stop 'Invalid index for control points.' end if Xc = this % Xc ( n ,:) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xcid ( this , n , dir ) result ( Xc ) class ( nurbs_curve ), intent ( in ) :: this integer , intent ( in ) :: n integer , intent ( in ) :: dir real ( rk ) :: Xc if ( allocated ( this % Xc )) then if ( n < lbound ( this % Xc , 1 ) . or . n > ubound ( this % Xc , 1 )) then error stop 'Invalid index for control points.' end if if ( dir < lbound ( this % Xc , 2 ) . or . dir > ubound ( this % Xc , 2 )) then error stop 'Invalid index for control points.' end if Xc = this % Xc ( n , dir ) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xg_all ( this ) result ( Xg ) class ( nurbs_curve ), intent ( in ) :: this real ( rk ), allocatable :: Xg (:,:) if ( allocated ( this % Xg )) then Xg = this % Xg else error stop 'Geometry points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xgi ( this , n ) result ( Xg ) class ( nurbs_curve ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ), allocatable :: Xg (:) if ( allocated ( this % Xg )) then if ( n < lbound ( this % Xg , 1 ) . or . n > ubound ( this % Xg , 1 )) then error stop 'Invalid index for geometry points.' end if Xg = this % Xg ( n ,:) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xgid ( this , n , dir ) result ( Xg ) class ( nurbs_curve ), intent ( in ) :: this integer , intent ( in ) :: n integer , intent ( in ) :: dir real ( rk ) :: Xg if ( allocated ( this % Xg )) then if ( n < lbound ( this % Xg , 1 ) . or . n > ubound ( this % Xg , 1 )) then error stop 'Invalid index for geometry points.' end if if ( dir < lbound ( this % Xg , 2 ) . or . dir > ubound ( this % Xg , 2 )) then error stop 'Invalid index for geometry points.' end if Xg = this % Xg ( n , dir ) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Wc_all ( this ) result ( Wc ) class ( nurbs_curve ), intent ( in ) :: this real ( rk ), allocatable :: Wc (:) if ( allocated ( this % Wc )) then Wc = this % Wc else error stop 'The NURBS curve is not rational or weights are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Wci ( this , n ) result ( Wc ) class ( nurbs_curve ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ) :: Wc if ( allocated ( this % Wc )) then if ( n < lbound ( this % Wc , 1 ) . or . n > ubound ( this % Wc , 1 )) then error stop 'Invalid index for weights.' end if Wc = this % Wc ( n ) else error stop 'The NURBS curve is not rational or weights are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xt ( this ) result ( Xt ) class ( nurbs_curve ), intent ( in ) :: this real ( rk ), allocatable :: Xt (:) if ( allocated ( this % Xt )) then Xt = this % Xt else error stop 'Parameter values are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_ng ( this ) result ( ng ) class ( nurbs_curve ), intent ( in ) :: this integer :: ng ng = this % ng end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_degree ( this ) class ( nurbs_curve ), intent ( inout ) :: this integer , allocatable :: m (:) m = this % get_multiplicity () this % degree = m ( 1 ) - 1 end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_degree ( this ) result ( degree ) class ( nurbs_curve ), intent ( in ) :: this integer :: degree degree = this % degree end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_knot_all ( this ) result ( knot ) class ( nurbs_curve ), intent ( in ) :: this real ( rk ), allocatable :: knot (:) if ( allocated ( this % knot )) then knot = this % knot else error stop 'Knot vector is not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_knoti ( this , i ) result ( knot ) class ( nurbs_curve ), intent ( in ) :: this integer , intent ( in ) :: i real ( rk ) :: knot if ( allocated ( this % knot )) then if ( i < 1 . or . i > size ( this % knot )) then error stop 'Invalid index for knot vector.' else knot = this % knot ( i ) end if else error stop 'Knot vector is not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine finalize ( this ) class ( nurbs_curve ), intent ( inout ) :: this if ( allocated ( this % Xc )) deallocate ( this % Xc ) if ( allocated ( this % Xg )) deallocate ( this % Xg ) if ( allocated ( this % Wc )) deallocate ( this % Wc ) if ( allocated ( this % Xt )) deallocate ( this % Xt ) if ( allocated ( this % knot )) deallocate ( this % knot ) if ( allocated ( this % elemConn_Xc_vis )) deallocate ( this % elemConn_Xc_vis ) if ( allocated ( this % elemConn_Xg_vis )) deallocate ( this % elemConn_Xg_vis ) if ( allocated ( this % elemConn )) deallocate ( this % elemConn ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem_Xc_vis ( this , p ) result ( elemConn ) class ( nurbs_curve ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) integer , intent ( in ), optional :: p if ( present ( p )) then elemConn = elemConn_C0 ( this % nc , p ) else elemConn = elemConn_C0 ( this % nc , 1 ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem_Xg_vis ( this , p ) result ( elemConn ) class ( nurbs_curve ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) integer , intent ( in ), optional :: p if ( present ( p )) then elemConn = elemConn_C0 ( this % ng , p ) else elemConn = elemConn_C0 ( this % ng , 1 ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine export_Xc ( this , filename ) class ( nurbs_curve ), intent ( in ) :: this character ( len =* ), intent ( in ) :: filename integer :: i , nc , nunit integer , allocatable :: elemConn (:,:) ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % elemConn_Xc_vis )) then elemConn = this % cmp_elem_Xc_vis () else elemConn = this % elemConn_Xc_vis end if nc = size ( this % Xc , 1 ) open ( newunit = nunit , file = filename , action = 'write' ) write ( nunit , '(a)' ) '# vtk DataFile Version 2.0' write ( nunit , '(a)' ) 'Generated by ForCAD' write ( nunit , '(a)' ) 'ASCII' write ( nunit , '(a)' ) 'DATASET UNSTRUCTURED_GRID' write ( nunit , '(a,\" \",g0,\" \",a)' ) 'POINTS' , nc , 'double' if ( size ( this % Xc , 2 ) == 2 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xc ( i , 1 ), this % Xc ( i , 2 ), 0.0_rk , i = 1 , nc ) elseif ( size ( this % Xc , 2 ) == 3 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xc ( i , 1 ), this % Xc ( i , 2 ), this % Xc ( i , 3 ) , i = 1 , nc ) else error stop 'Invalid dimension of the control points.' end if write ( nunit , '(a,\" \",g0,\" \",g0)' ) 'CELLS' , size ( elemConn , 1 ), size ( elemConn , 1 ) * ( size ( elemConn , 2 ) + 1 ) write ( nunit , '(g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0)' )& ( 2 , elemConn ( i , 1 ) - 1 , elemConn ( i , 2 ) - 1 , i = 1 , size ( elemConn , 1 )) write ( nunit , '(a,\" \",g0)' ) 'CELL_TYPES' , size ( elemConn , 1 ) write ( nunit , '(g0)' ) ( 3 , i = 1 , size ( elemConn , 1 )) close ( nunit ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine export_Xg ( this , filename ) class ( nurbs_curve ), intent ( in ) :: this character ( len =* ), intent ( in ) :: filename integer :: i , ng , nunit integer , allocatable :: elemConn (:,:) ! check if (. not . allocated ( this % Xg )) then error stop 'Geometry points are not set.' end if if (. not . allocated ( this % elemConn_Xg_vis )) then elemConn = this % cmp_elem_Xg_vis () else elemConn = this % elemConn_Xg_vis end if ng = size ( this % Xg , 1 ) open ( newunit = nunit , file = filename , action = 'write' ) write ( nunit , '(a)' ) '# vtk DataFile Version 2.0' write ( nunit , '(a)' ) 'Generated by ForCAD' write ( nunit , '(a)' ) 'ASCII' write ( nunit , '(a)' ) 'DATASET UNSTRUCTURED_GRID' write ( nunit , '(a,\" \",g0,\" \",a)' ) 'POINTS' , ng , 'double' if ( size ( this % Xg , 2 ) == 2 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xg ( i , 1 ), this % Xg ( i , 2 ), 0.0_rk , i = 1 , ng ) elseif ( size ( this % Xg , 2 ) == 3 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xg ( i , 1 ), this % Xg ( i , 2 ), this % Xg ( i , 3 ) , i = 1 , ng ) else error stop 'Invalid dimension of the geometry points.' end if write ( nunit , '(a,\" \",g0,\" \",g0)' ) 'CELLS' , size ( elemConn , 1 ), size ( elemConn , 1 ) * ( size ( elemConn , 2 ) + 1 ) write ( nunit , '(g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0)' )& ( 2 , elemConn ( i , 1 ) - 1 , elemConn ( i , 2 ) - 1 , i = 1 , size ( elemConn , 1 )) write ( nunit , '(a,\" \",g0)' ) 'CELL_TYPES' , size ( elemConn , 1 ) write ( nunit , '(g0)' ) ( 3 , i = 1 , size ( elemConn , 1 )) close ( nunit ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine modify_Xc ( this , X , num , dir ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: X integer , intent ( in ) :: num integer , intent ( in ) :: dir if ( allocated ( this % Xc )) then this % Xc ( num , dir ) = X if ( allocated ( this % Wc )) then call this % set ( knot = this % get_knot (), Xc = this % get_Xc (), Wc = this % get_Wc ()) else call this % set ( knot = this % get_knot (), Xc = this % get_Xc ()) end if else error stop 'Control points are not set.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine modify_Wc ( this , W , num ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: W integer , intent ( in ) :: num if ( allocated ( this % Wc )) then this % Wc ( num ) = W if ( allocated ( this % knot )) then call this % set ( knot = this % get_knot (), Xc = this % get_Xc (), Wc = this % get_Wc ()) else call this % set ( Xc = this % get_Xc (), Wc = this % get_Wc ()) end if else error stop 'The NURBS curve is not rational.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_multiplicity ( this ) result ( m ) class ( nurbs_curve ), intent ( in ) :: this integer , allocatable :: m (:) ! check if (. not . allocated ( this % knot )) then error stop 'Knot vector is not set.' else m = compute_multiplicity ( this % knot ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_continuity ( this ) result ( c ) class ( nurbs_curve ), intent ( in ) :: this integer , allocatable :: c (:) ! check if (. not . allocated ( this % knot )) then error stop 'Knot vector is not set.' else c = this % degree - compute_multiplicity ( this % knot ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_nc ( this ) class ( nurbs_curve ), intent ( inout ) :: this this % nc = sum ( compute_multiplicity ( this % knot )) - this % degree - 1 end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_nc ( this ) result ( nc ) class ( nurbs_curve ), intent ( in ) :: this integer :: nc nc = this % nc end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine insert_knots ( this , Xth , r ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xth (:) integer , intent ( in ), contiguous :: r (:) integer :: k , i , s , dim , j , n_new real ( rk ), allocatable :: Xcw (:,:), Xcw_new (:,:), Xc_new (:,:), Wc_new (:), knot_new (:) if ( this % is_rational ()) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc - 1 , this % degree , Xth ( i ), this % knot ) if ( this % knot ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) call insert_knot_A_5_1 (& this % degree ,& this % knot ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xcw_new ) allocate ( Xc_new ( 1 : n_new + 1 , 1 : dim )) allocate ( Wc_new ( 1 : n_new + 1 )) do j = 1 , n_new + 1 Xc_new ( j , 1 : dim ) = Xcw_new ( j - 1 , 1 : dim ) / Xcw_new ( j - 1 , dim + 1 ) Wc_new ( j ) = Xcw_new ( j - 1 , dim + 1 ) end do call this % set ( knot = knot_new , Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc - 1 , this % degree , Xth ( i ), this % knot ) if ( this % knot ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot , Xth ( i )) else s = 0 end if call insert_knot_A_5_1 (& this % degree ,& this % knot ,& this % Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xc_new ) call this % set ( knot = knot_new , Xc = Xc_new ) end do end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine elevate_degree ( this , t ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ) :: t real ( rk ), allocatable :: Xcw (:,:), Xcw_new (:,:), knot_new (:), Xc_new (:,:), Wc_new (:) integer :: dim , j , nc_new if ( this % is_rational ()) then ! NURBS dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) Xcw ( j , dim + 1 ) = this % Wc ( j ) end do call elevate_degree_A_5_9 ( t , this % knot , this % degree , Xcw , nc_new , knot_new , Xcw_new ) allocate ( Xc_new ( 1 : nc_new , 1 : dim )) allocate ( Wc_new ( 1 : nc_new )) do j = 1 , nc_new Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot = knot_new , Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) else ! B-Spline dim = size ( this % Xc , 2 ) call elevate_degree_A_5_9 ( t , this % knot , this % degree , this % Xc , nc_new , knot_new , Xc_new ) call this % set ( knot = knot_new , Xc = Xc_new ) deallocate ( Xc_new ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative_vector ( this , res , Xt , dTgc , Tgc ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ), optional :: res real ( rk ), intent ( in ), contiguous , optional :: Xt (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:,:) integer :: i ! Set parameter values if ( present ( Xt )) then if ( allocated ( this % Xt )) deallocate ( this % Xt ) this % Xt = Xt elseif ( present ( res )) then if ( allocated ( this % Xt )) deallocate ( this % Xt ) allocate ( this % Xt ( res )) this % Xt = [( real ( i - 1 , rk ) / real ( res - 1 , rk ), i = 1 , res )] ! else ! this%Xt = this%Xt end if ! Set number of geometry points this % ng = size ( this % Xt , 1 ) if ( this % is_rational ()) then ! NURBS call compute_dTgc ( this % Xt , this % knot , this % degree , this % nc , this % ng , this % Wc , dTgc , Tgc ) else ! B-Spline call compute_dTgc ( this % Xt , this % knot , this % degree , this % nc , this % ng , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative_scalar ( this , Xt , dTgc , Tgc , elem ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: Xt integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:) if ( this % is_rational ()) then ! NURBS call compute_dTgc ( Xt , this % knot , this % degree , this % nc , this % Wc , dTgc , Tgc , elem ) else ! B-Spline call compute_dTgc ( Xt , this % knot , this % degree , this % nc , dTgc , Tgc , elem ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative2_vector ( this , res , Xt , d2Tgc , dTgc , Tgc ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ), optional :: res real ( rk ), intent ( in ), contiguous , optional :: Xt (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: dTgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:,:) integer :: i ! Set parameter values if ( present ( Xt )) then if ( allocated ( this % Xt )) deallocate ( this % Xt ) this % Xt = Xt elseif ( present ( res )) then if ( allocated ( this % Xt )) deallocate ( this % Xt ) allocate ( this % Xt ( res )) this % Xt = [( real ( i - 1 , rk ) / real ( res - 1 , rk ), i = 1 , res )] ! else ! this%Xt = this%Xt end if ! Set number of geometry points this % ng = size ( this % Xt , 1 ) if ( this % is_rational ()) then ! NURBS call compute_d2Tgc ( this % Xt , this % knot , this % degree , this % nc , this % ng , this % Wc , d2Tgc , dTgc , Tgc ) else ! B-Spline call compute_d2Tgc ( this % Xt , this % knot , this % degree , this % nc , this % ng , d2Tgc , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative2_scalar ( this , Xt , d2Tgc , dTgc , Tgc ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: Xt real ( rk ), allocatable , intent ( out ) :: d2Tgc (:) real ( rk ), allocatable , intent ( out ), optional :: dTgc (:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:) if ( this % is_rational ()) then ! NURBS call compute_d2Tgc ( Xt , this % knot , this % degree , this % nc , this % Wc , d2Tgc , dTgc , Tgc ) else ! B-Spline call compute_d2Tgc ( Xt , this % knot , this % degree , this % nc , d2Tgc , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine basis_vector ( this , res , Xt , Tgc ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ), optional :: res real ( rk ), intent ( in ), contiguous , optional :: Xt (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) integer :: i ! Set parameter values if ( present ( Xt )) then if ( allocated ( this % Xt )) deallocate ( this % Xt ) this % Xt = Xt elseif ( present ( res )) then if ( allocated ( this % Xt )) deallocate ( this % Xt ) allocate ( this % Xt ( res )) this % Xt = [( real ( i - 1 , rk ) / real ( res - 1 , rk ), i = 1 , res )] ! else ! this%Xt = this%Xt end if ! Set number of geometry points this % ng = size ( this % Xt , 1 ) if ( this % is_rational ()) then ! NURBS Tgc = compute_Tgc ( this % Xt , this % knot , this % degree , this % nc , this % ng , this % Wc ) else ! B-Spline Tgc = compute_Tgc ( this % Xt , this % knot , this % degree , this % nc , this % ng ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine basis_scalar ( this , Xt , Tgc ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: Xt real ( rk ), allocatable , intent ( out ) :: Tgc (:) if ( this % is_rational ()) then ! NURBS Tgc = compute_Tgc ( Xt , this % knot , this % degree , this % nc , this % Wc ) else ! B-Spline Tgc = compute_Tgc ( Xt , this % knot , this % degree , this % nc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function is_rational ( this ) result ( r ) class ( nurbs_curve ), intent ( in ) :: this logical :: r r = . false . if ( allocated ( this % Wc )) then if ( any ( this % Wc /= this % Wc ( 1 ))) then r = . true . end if end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem_Xc_vis ( this , elemConn ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn_Xc_vis )) deallocate ( this % elemConn_Xc_vis ) this % elemConn_Xc_vis = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem_Xg_vis ( this , elemConn ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn_Xg_vis )) deallocate ( this % elemConn_Xg_vis ) this % elemConn_Xg_vis = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem ( this , elemConn ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn )) deallocate ( this % elemConn ) this % elemConn = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem_Xc_vis ( this ) result ( elemConn ) class ( nurbs_curve ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn_Xc_vis end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem_Xg_vis ( this ) result ( elemConn ) class ( nurbs_curve ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn_Xg_vis end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem ( this ) result ( elemConn ) class ( nurbs_curve ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine remove_knots ( this , Xth , r ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xth (:) integer , intent ( in ), contiguous :: r (:) integer :: k , i , s , dim , j , nc_new , t real ( rk ), allocatable :: Xcw (:,:), Xcw_new (:,:), Xc_new (:,:), Wc_new (:), knot_new (:) if ( this % is_rational ()) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc - 1 , this % degree , Xth ( i ), this % knot ) if ( this % knot ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) call remove_knots_A_5_8 (& this % degree ,& this % knot ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xcw_new ) if ( allocated ( Xcw )) deallocate ( Xcw ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) allocate ( Xc_new ( nc_new , dim )) allocate ( Wc_new ( nc_new )) do j = 1 , nc_new Xc_new ( j ,:) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot = knot_new , Xc = Xc_new , Wc = Wc_new ) if ( allocated ( Xcw_new )) deallocate ( Xcw_new ) if ( allocated ( Xc_new )) deallocate ( Xc_new ) if ( allocated ( Wc_new )) deallocate ( Wc_new ) end if end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc - 1 , this % degree , Xth ( i ), this % knot ) if ( this % knot ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot , Xth ( i )) else s = 0 end if k = k + 1 call remove_knots_A_5_8 (& this % degree ,& this % knot ,& this % Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xc_new ) if ( t == 0 ) then ! no change else call this % set ( knot = knot_new , Xc = Xc_new ) end if end do end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_circle ( this , center , radius ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius real ( rk ), allocatable :: Xc (:,:), Wc (:), knot (:) integer :: i ! Define control points for circle allocate ( Xc ( 7 , 3 )) Xc ( 1 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 3 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 6 ,:) = [ 1.0_rk , - sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 7 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] ! Scale and translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) * radius end do ! Define weights for the control points Wc = [ 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ] ! Define knot vector knot = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 3.0_rk , 1.0_rk / 3.0_rk , 2.0_rk / 3.0_rk , 2.0_rk / 3.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_C ( this , center , radius ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius real ( rk ), allocatable :: Xc (:,:), Wc (:), knot (:) integer :: i ! Define control points for C-shape allocate ( Xc ( 5 , 3 )) Xc ( 1 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 3 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] ! Scale and translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) * radius end do ! Define weights for the control points Wc = [ 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ] ! Define knot vector knot = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 2.0_rk , 1.0_rk / 2.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem ( this ) result ( elemConn ) class ( nurbs_curve ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) call elemConn_Cn ( this % nc , this % degree , unique ( this % knot ), this % get_multiplicity (),& elemConn ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine rotate_Xc ( this , alpha , beta , theta ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: alpha , beta , theta integer :: i do i = 1 , this % nc this % Xc ( i , :) = matmul ( rotation ( alpha , beta , theta ), this % Xc ( i , :)) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine rotate_Xg ( this , alpha , beta , theta ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: alpha , beta , theta integer :: i do i = 1 , this % ng this % Xg ( i , :) = matmul ( rotation ( alpha , beta , theta ), this % Xg ( i , :)) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine translate_Xc ( this , vec ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: vec (:) integer :: i do i = 1 , this % nc this % Xc ( i , :) = this % Xc ( i , :) + vec end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine translate_Xg ( this , vec ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: vec (:) integer :: i do i = 1 , this % nc this % Xg ( i , :) = this % Xg ( i , :) + vec end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine show ( this , vtkfile_Xc , vtkfile_Xg ) class ( nurbs_curve ), intent ( inout ) :: this character ( len =* ), intent ( in ) :: vtkfile_Xc , vtkfile_Xg character ( len = 3000 ) :: pyvista_script pyvista_script = & \"import pyvista as pv\" // achar ( 10 ) // & \"pv.global_theme.color = 'white'\" // achar ( 10 ) // & \"Xc = pv.read('\" // trim ( vtkfile_Xc ) // \"')\" // achar ( 10 ) // & \"Xg = pv.read('\" // trim ( vtkfile_Xg ) // \"')\" // achar ( 10 ) // & \"p = pv.Plotter(lighting='light kit')\" // achar ( 10 ) // & \"actor_Xcp = p.add_mesh(\" // achar ( 10 ) // & \"    Xc,\" // achar ( 10 ) // & \"    style='points',\" // achar ( 10 ) // & \"    point_size=10,\" // achar ( 10 ) // & \"    color='red',\" // achar ( 10 ) // & \"    render_points_as_spheres=True,\" // achar ( 10 ) // & \"    opacity=0.5,\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"actor_Xcw = p.add_mesh(\" // achar ( 10 ) // & \"    Xc,\" // achar ( 10 ) // & \"    show_edges=True,\" // achar ( 10 ) // & \"    color='yellow',\" // achar ( 10 ) // & \"    line_width=3,\" // achar ( 10 ) // & \"    style='wireframe',\" // achar ( 10 ) // & \"    opacity=0.2\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"actor_Xg = p.add_mesh(\" // achar ( 10 ) // & \"    Xg,\" // achar ( 10 ) // & \"    show_edges=False,\" // achar ( 10 ) // & \"    color='cyan',\" // achar ( 10 ) // & \"    line_width=7,\" // achar ( 10 ) // & \"    metallic=0.6,\" // achar ( 10 ) // & \"    pbr=True,\" // achar ( 10 ) // & \"    split_sharp_edges=True,\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_axes(interactive=False)\" // achar ( 10 ) // & \"def point_picker_callback(point):\" // achar ( 10 ) // & \"    mesh = Xc\" // achar ( 10 ) // & \"    point_id = mesh.find_closest_point(point)\" // achar ( 10 ) // & \"    point_coords = mesh.points[point_id]\" // achar ( 10 ) // & \"    label = f'ID: {point_id + 1}\\n({point_coords[0]:.3f}, {point_coords[1]:.3f}, {point_coords[2]:.3f})'\" // achar ( 10 ) // & \"    p.add_point_labels(\" // achar ( 10 ) // & \"        [point_coords],\" // achar ( 10 ) // & \"        [label],\" // achar ( 10 ) // & \"        font_size=14,\" // achar ( 10 ) // & \"        text_color='black',\" // achar ( 10 ) // & \"        show_points=False,\" // achar ( 10 ) // & \"        fill_shape=False,\" // achar ( 10 ) // & \"        shape=None,\" // achar ( 10 ) // & \"    )\" // achar ( 10 ) // & \"picker = p.enable_point_picking(callback=point_picker_callback, show_message=False)\" // achar ( 10 ) // & \"window_size = p.window_size\" // achar ( 10 ) // & \"y_pos = window_size[1]\" // achar ( 10 ) // & \"def Xcp_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xcp.SetVisibility(flag)\" // achar ( 10 ) // & \"def Xcw_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xcw.SetVisibility(flag)\" // achar ( 10 ) // & \"def Xg_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xg.SetVisibility(flag)\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xcp_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='red',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 1 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xcw_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='yellow',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 2 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xg_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='cyan',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 3 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xc (Points)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 1 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xc (Control geometry)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 2 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xg (Geometry)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 3 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text('ForCAD', position=(0.0, 10.0), font_size=14, color='black', font='times')\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'https://github.com/gha3mi/forcad',\" // achar ( 10 ) // & \"    position=(0.0, 0.0),\" // achar ( 10 ) // & \"    font_size=7,\" // achar ( 10 ) // & \"    color='blue',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.show(title='ForCAD', interactive=True)\" call execute_command_line ( 'python -c \"' // trim ( adjustl ( pyvista_script )) // '\"' ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_half_circle ( this , center , radius ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius real ( rk ), allocatable :: Xc (:,:), Wc (:), knot (:) integer :: i ! Define control points for half circle allocate ( Xc ( 5 , 3 )) Xc ( 1 ,:) = [ 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 3 ,:) = [ 0.0_rk , 0.5_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , 0.0_rk , 0.0_rk ] ! Scale and translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) * radius end do ! Define weights for the control points Wc = [ 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk ] ! Define knot vector knot = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 2.0_rk , & 1.0_rk / 2.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine nearest_point ( this , point_Xg , nearest_Xg , nearest_Xt , id ) class ( nurbs_curve ), intent ( in ) :: this real ( rk ), intent ( in ) :: point_Xg (:) real ( rk ), intent ( out ), allocatable , optional :: nearest_Xg (:) real ( rk ), intent ( out ), optional :: nearest_Xt integer , intent ( out ), optional :: id integer :: id_ real ( rk ), allocatable :: distances (:) allocate ( distances ( this % ng )) distances = nearest_point_help_1d ( this % ng , this % Xg , point_Xg ) id_ = minloc ( distances , dim = 1 ) if ( present ( id )) id = id_ if ( present ( nearest_Xg )) nearest_Xg = this % Xg ( id_ ,:) if ( present ( nearest_Xt )) nearest_Xt = this % Xt ( id_ ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine nearest_point2 ( this , point_Xg , tol , maxit , nearest_Xt , nearest_Xg ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( in ) :: point_Xg (:) real ( rk ), intent ( in ) :: tol integer , intent ( in ) :: maxit real ( rk ), intent ( out ) :: nearest_Xt real ( rk ), allocatable , intent ( out ), optional :: nearest_Xg (:) real ( rk ) :: xk , obj , grad , hess , dk , alphak , tau , beta , lower_bounds , upper_bounds real ( rk ), allocatable :: Xg (:), Tgc (:), dTgc (:), d2Tgc (:) integer :: k , l logical :: convergenz type ( nurbs_curve ) :: copy_this k = 0 ! lower and upper bounds lower_bounds = minval ( this % knot ) upper_bounds = maxval ( this % knot ) ! guess initial point copy_this = this call copy_this % create ( 10 ) call copy_this % nearest_point ( point_Xg = point_Xg , nearest_Xt = xk ) call copy_this % finalize () ! Check if xk is within the knot vector range if ( xk < minval ( this % knot )) then xk = minval ( this % knot ) else if ( xk > maxval ( this % knot )) then xk = maxval ( this % knot ) end if convergenz = . false . allocate ( Xg ( size ( this % Xc , 2 ))) ! allocate(dTgc(size(this%Xc,1))) ! allocate(d2Tgc(size(this%Xc,1))) do while (. not . convergenz . and . k < maxit ) ! objection, gradient and hessian Xg = this % cmp_Xg ( xk ) call this % derivative2 ( Xt = xk , d2Tgc = d2Tgc , dTgc = dTgc , Tgc = Tgc ) ! Tgc is not needed obj = norm2 ( Xg - point_Xg ) + 0.001_rk ! add a small number to avoid division by zero grad = dot_product (( Xg - point_Xg ) / obj , matmul ( dTgc , this % Xc )) hess = dot_product ( matmul ( dTgc , this % Xc ) - ( Xg - point_Xg ) / obj * grad , matmul ( dTgc , this % Xc )) / obj & + dot_product (( Xg - point_Xg ) / obj , matmul ( d2Tgc , this % Xc )) ! debug print '(i3,1x,e20.10,1x,e20.10)' , k , xk , abs ( grad ) if ( abs ( grad ) <= tol ) then convergenz = . true . nearest_Xt = xk if ( present ( nearest_Xg )) nearest_Xg = this % cmp_Xg ( nearest_Xt ) else dk = - grad / hess ! Backtracking-Armijo Line Search alphak = 1.0_rk tau = 0.5_rk ! 0 < tau  < 1 beta = 1.0e-4_rk ! 0 < beta < 1 l = 0 do while (. not . norm2 ( this % cmp_Xg ( xk + alphak * dk ) - point_Xg ) <= obj + alphak * beta * grad * dk . and . l < 50 ) alphak = tau * alphak l = l + 1 end do xk = xk + alphak * dk ! Check if xk is within the knot vector range xk = max ( min ( xk , upper_bounds ), lower_bounds ) k = k + 1 end if end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine ansatz ( this , ie , ig , Tgc , dTgc_dXg , dL ) class ( nurbs_curve ), intent ( inout ) :: this integer , intent ( in ) :: ie , ig real ( rk ), intent ( out ) :: dL real ( rk ), allocatable , intent ( out ) :: Tgc (:), dTgc_dXg (:,:) real ( rk ), allocatable :: Xth (:), Xth_e (:), Xc_eT (:,:), Xksi (:), Wksi (:) integer , allocatable :: elem_th (:,:), elem_c (:,:), elem_ce (:) type ( nurbs_curve ) :: th , th_e real ( rk ), allocatable :: dTtth_dXksi (:), Ttth (:), dTgc_dXt (:), dXg_dXt (:) real ( rk ) :: Xt , dXt_dXksi real ( rk ), allocatable :: dXg_dXksi (:) !! Jacobian matrix real ( rk ) :: det_dXg_dXksi !! Determinant of the Jacobian matrix call gauss_leg ([ 0.0_rk , 1.0_rk ], this % degree , Xksi , Wksi ) Xth = unique ( this % knot ) call th % set ([ 0.0_rk , Xth , 1.0_rk ], Xth ) elem_th = th % cmp_elem () elem_c = this % cmp_elem () Xth_e = Xth ( elem_th ( ie ,:)) call th_e % set ([ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ], Xth_e ) elem_ce = elem_c ( ie ,:) Xc_eT = transpose ( this % Xc ( elem_ce ,:)) call th_e % derivative ( Xksi ( ig ), dTtth_dXksi , Ttth ) Xt = dot_product ( Xth_e , Ttth ) dXt_dXksi = dot_product ( Xth_e , dTtth_dXksi ) call this % derivative ( Xt , dTgc_dXt , Tgc , elem_ce ) dXg_dXt = matmul ( Xc_eT , dTgc_dXt ) dTgc_dXg = dyad ( dTgc_dXt , dXg_dXt ) / norm2 ( dXg_dXt ) dXg_dXksi = dXg_dXt * dXt_dXksi det_dXg_dXksi = norm2 ( dXg_dXksi ) dL = det_dXg_dXksi * Wksi ( ig ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_length ( this , length ) class ( nurbs_curve ), intent ( inout ) :: this real ( rk ), intent ( out ) :: length real ( rk ), allocatable :: Tgc (:), dTgc_dXg (:,:) integer :: ie , ig real ( rk ) :: dL , dL_ig length = 0.0_rk do ie = 1 , size ( this % cmp_elem (), 1 ) dL = 0.0_rk do ig = 1 , size ( this % cmp_elem (), 2 ) call this % ansatz ( ie , ig , Tgc , dTgc_dXg , dL_ig ) dL = dL + dL_ig end do length = length + dL end do end subroutine !=============================================================================== end module forcad_nurbs_curve !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_nurbs_1d ( Xt , knot , degree , nc , ng , Xc , Wc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ) :: ng real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Xg (:,:) real ( rk ), allocatable :: Tgc (:) integer :: i allocate ( Xg ( ng , size ( Xc , 2 ))) allocate ( Tgc ( nc )) !$OMP PARALLEL DO PRIVATE(Tgc) do i = 1 , ng Tgc = basis_bspline ( Xt ( i ), knot , nc , degree ) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) Xg ( i ,:) = matmul ( Tgc , Xc ) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_nurbs_1d_1point ( Xt , knot , degree , nc , Xc , Wc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline implicit none real ( rk ), intent ( in ) :: Xt real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Xg (:) real ( rk ), allocatable :: Tgc (:) allocate ( Xg ( size ( Xc ))) allocate ( Tgc ( nc )) Tgc = basis_bspline ( Xt , knot , nc , degree ) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) Xg = matmul ( Tgc , Xc ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_bspline_1d ( Xt , knot , degree , nc , ng , Xc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ) :: ng real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), allocatable :: Xg (:,:) integer :: i allocate ( Xg ( ng , size ( Xc , 2 ))) !$OMP PARALLEL DO do i = 1 , ng Xg ( i ,:) = matmul ( basis_bspline ( Xt ( i ), knot , nc , degree ), Xc ) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_bspline_1d_1point ( Xt , knot , degree , nc , Xc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline implicit none real ( rk ), intent ( in ) :: Xt real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), allocatable :: Xg (:) allocate ( Xg ( size ( Xc ))) Xg = matmul ( basis_bspline ( Xt , knot , nc , degree ), Xc ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_nurbs_1d_vector ( Xt , knot , degree , nc , ng , Wc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_der implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ) :: ng real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: dBi (:), Bi (:) integer :: i allocate ( dTgc ( ng , nc ), Tgc ( ng , nc ), dBi ( nc ), Bi ( nc )) do i = 1 , size ( Xt ) call basis_bspline_der ( Xt ( i ), knot , nc , degree , dBi , Bi ) Tgc ( i ,:) = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dTgc ( i ,:) = ( dBi * Wc - Tgc ( i ,:) * dot_product ( dBi , Wc ) ) / dot_product ( Bi , Wc ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_nurbs_1d_scalar ( Xt , knot , degree , nc , Wc , dTgc , Tgc , elem ) use forcad_utils , only : rk , basis_bspline_der implicit none real ( rk ), intent ( in ) :: Xt real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc real ( rk ), intent ( in ), contiguous :: Wc (:) integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: dBi (:), Bi (:) call basis_bspline_der ( Xt , knot , nc , degree , dBi , Bi ) if (. not . present ( elem )) then allocate ( dTgc ( nc ), Tgc ( nc )) Tgc = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dTgc = ( dBi * Wc - Tgc * dot_product ( dBi , Wc ) ) / dot_product ( Bi , Wc ) else allocate ( dTgc ( size ( elem )), Tgc ( size ( elem ))) Tgc = Bi ( elem ) * ( Wc ( elem ) / ( dot_product ( Bi ( elem ), Wc ( elem )))) dTgc = ( dBi ( elem ) * Wc ( elem ) - Tgc * dot_product ( dBi ( elem ), Wc ( elem )) ) / dot_product ( Bi ( elem ), Wc ( elem )) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_bspline_1d_vector ( Xt , knot , degree , nc , ng , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_der implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ) :: ng real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: dBi (:), Bi (:) integer :: i allocate ( dTgc ( ng , nc ), Tgc ( ng , nc ), dBi ( nc ), Bi ( nc )) do i = 1 , size ( Xt ) call basis_bspline_der ( Xt ( i ), knot , nc , degree , dBi , Bi ) Tgc ( i ,:) = Bi dTgc ( i ,:) = dBi end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_bspline_1d_scalar ( Xt , knot , degree , nc , dTgc , Tgc , elem ) use forcad_utils , only : rk , basis_bspline_der implicit none real ( rk ), intent ( in ) :: Xt real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: dB (:), B (:) if (. not . present ( elem )) then allocate ( dTgc ( nc ), Tgc ( nc )) call basis_bspline_der ( Xt , knot , nc , degree , dTgc , Tgc ) else allocate ( dB ( size ( elem )), B ( size ( elem ))) call basis_bspline_der ( Xt , knot , nc , degree , dB , B ) Tgc = B ( elem ) dTgc = dB ( elem ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_nurbs_1d_vector ( Xt , knot , degree , nc , ng , Wc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ) :: ng real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: d2Bi (:), dBi (:), Tgci (:), dTgci (:), Bi (:) integer :: i allocate ( d2Tgc ( ng , nc ), dTgc ( ng , nc ), Tgc ( ng , nc ), d2Bi ( nc ), dTgci ( nc ), dBi ( nc ), Tgci ( nc ), Bi ( nc )) do i = 1 , size ( Xt ) call basis_bspline_2der ( Xt ( i ), knot , nc , degree , d2Bi , dBi , Bi ) Tgci = Bi * ( Wc / ( dot_product ( Bi , Wc ))) Tgc ( i ,:) = Tgci dTgci = ( dBi * Wc - Tgci * dot_product ( dBi , Wc ) ) / dot_product ( Bi , Wc ) dTgc ( i ,:) = dTgci d2Tgc ( i ,:) = ( d2Bi * Wc - 2.0_rk * dTgci * dot_product ( dBi , Wc ) - Tgci * dot_product ( d2Bi , Wc )) / dot_product ( Bi , Wc ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_nurbs_1d_scalar ( Xt , knot , degree , nc , Wc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der implicit none real ( rk ), intent ( in ) :: Xt real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: d2Bi (:), dBi (:), Bi (:) allocate ( d2Tgc ( nc ), dTgc ( nc ), Tgc ( nc ), d2Bi ( nc ), dBi ( nc ), Bi ( nc )) call basis_bspline_2der ( Xt , knot , nc , degree , d2Bi , dBi , Bi ) Tgc = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dTgc = ( dBi * Wc - Tgc * dot_product ( dBi , Wc ) ) / dot_product ( Bi , Wc ) d2Tgc = ( d2Bi * Wc - 2.0_rk * dTgc * dot_product ( dBi , Wc ) - Tgc * dot_product ( d2Bi , Wc )) / dot_product ( Bi , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_bspline_1d_vector ( Xt , knot , degree , nc , ng , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ) :: ng real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: d2Tgci (:), dTgci (:), Tgci (:) integer :: i allocate ( d2Tgc ( ng , nc ), dTgc ( ng , nc ), Tgc ( ng , nc ), dTgci ( nc ), Tgci ( nc ), d2Tgci ( nc )) do i = 1 , size ( Xt ) call basis_bspline_2der ( Xt ( i ), knot , nc , degree , d2Tgci , dTgci , Tgci ) Tgc ( i ,:) = Tgci dTgc ( i ,:) = dTgci d2Tgc ( i ,:) = d2Tgci end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_bspline_1d_scalar ( Xt , knot , degree , nc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der implicit none real ( rk ), intent ( in ) :: Xt real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc real ( rk ), allocatable , intent ( out ) :: d2Tgc (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) allocate ( d2Tgc ( nc ), dTgc ( nc ), Tgc ( nc )) call basis_bspline_2der ( Xt , knot , nc , degree , d2Tgc , dTgc , Tgc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_nurbs_1d_vector ( Xt , knot , degree , nc , ng , Wc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ) :: ng real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Tgc (:,:) real ( rk ), allocatable :: Tgci (:) integer :: i allocate ( Tgc ( ng , nc ), Tgci ( nc )) !$OMP PARALLEL DO PRIVATE(Tgci) do i = 1 , size ( Xt , 1 ) Tgci = basis_bspline ( Xt ( i ), knot , nc , degree ) Tgc ( i ,:) = Tgci * ( Wc / ( dot_product ( Tgci , Wc ))) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_nurbs_1d_scalar ( Xt , knot , degree , nc , Wc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline implicit none real ( rk ), intent ( in ) :: Xt real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Tgc (:) allocate ( Tgc ( nc )) Tgc = basis_bspline ( Xt , knot , nc , degree ) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_bspline_1d_vector ( Xt , knot , degree , nc , ng ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc integer , intent ( in ) :: ng real ( rk ), allocatable :: Tgc (:,:) integer :: i allocate ( Tgc ( ng , nc )) !$OMP PARALLEL DO do i = 1 , size ( Xt , 1 ) Tgc ( i ,:) = basis_bspline ( Xt ( i ), knot , nc , degree ) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_bspline_1d_scalar ( Xt , knot , degree , nc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline implicit none real ( rk ), intent ( in ) :: Xt real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: degree integer , intent ( in ) :: nc real ( rk ), allocatable :: Tgc (:) allocate ( Tgc ( nc )) Tgc = basis_bspline ( Xt , knot , nc , degree ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function nearest_point_help_1d ( ng , Xg , point_Xg ) result ( distances ) use forcad_utils , only : rk implicit none integer , intent ( in ) :: ng real ( rk ), intent ( in ), contiguous :: Xg (:,:) real ( rk ), intent ( in ), contiguous :: point_Xg (:) real ( rk ), allocatable :: distances (:) integer :: i allocate ( distances ( ng )) !$OMP PARALLEL DO do i = 1 , ng distances ( i ) = norm2 ( Xg ( i ,:) - point_Xg ) end do !$OMP END PARALLEL DO end function !===============================================================================","tags":"","loc":"sourcefile/forcad_nurbs_curve.f90.html"},{"title":"shape_hexahedron.f90 – ForCAD","text":"This file depends on sourcefile~~shape_hexahedron.f90~~EfferentGraph sourcefile~shape_hexahedron.f90 shape_hexahedron.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_hexahedron.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_hexahedron use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: shape !> Set up a hexahedron shape with dimensions L = [2.0, 4.0, 8.0] and a specified number of control points nc = [4, 6, 8]. !> The weights of the control points (Wc) are optional. call shape % set_hexahedron ( L = [ 2.0_rk , 4.0_rk , 8.0_rk ], nc = [ 4 , 6 , 8 ]) ! Additional modifications can be made to control points and weights, or the NURBS can be refined using knot insertion or degree elevation. ! call shape%insert_knots(...) ! call shape%elevate_degree(...) ! ... !> Export the control points to a VTK file for visualization. call shape % export_Xc ( 'vtk/shape_hexahedron_Xc.vtk' ) !> Create the shape using the specified number of elements in each direction. call shape % create ( 8 , 16 , 32 ) !> Export the geometry to a VTK file for visualization. call shape % export_Xg ( 'vtk/shape_hexahedron_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_hexahedron_Xc.vtk' , 'vtk/shape_hexahedron_Xg.vtk' ) !> Finalize and clean up the shape object. call shape % finalize () end program","tags":"","loc":"sourcefile/shape_hexahedron.f90.html"},{"title":"example_ppm3.f90 – ForCAD","text":"This file depends on sourcefile~~example_ppm3.f90~~EfferentGraph sourcefile~example_ppm3.f90 example_ppm3.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~example_ppm3.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> Visualization of NURBS surfaces using ForCAD, ForImage and ForColorMap libraries !> This example converts NURBS surfaces (vector) to an image (raster) using ForCAD, ForImage and ForColorMap libraries. program example_ppm3 use forcad , only : rk , nurbs_surface use forimage , only : ik , format_pnm , color use forcolormap , only : colormap use fortime , only : timer implicit none type ( nurbs_surface ) :: shape type ( format_pnm ) :: image type ( color ) :: background_color type ( colormap ) :: cmap integer ( ik ), allocatable :: px (:, :) real ( rk ), allocatable :: Xg (:,:), z_values (:) real ( rk ) :: aspect_ratio integer :: height , width , ng ( 2 ), red , green , blue , res1 , res2 , i integer , allocatable :: idx (:,:) type ( timer ) :: t !----------------------------------------------------------------------------- ! Set the image size and calculate the aspect ratio !----------------------------------------------------------------------------- width = 2000 height = 2000 aspect_ratio = real ( width , rk ) / real ( height , rk ) allocate ( px ( height , 3 * width )) !----------------------------------------------------------------------------- ! Set the background color using ForColor class of ForImage !----------------------------------------------------------------------------- call t % timer_start () call background_color % set ( 'white' , use_library = . true .) do i = 1 , width px (:, 3 * ( i - 1 ) + 1 ) = background_color % get_r () px (:, 3 * ( i - 1 ) + 2 ) = background_color % get_g () px (:, 3 * ( i - 1 ) + 3 ) = background_color % get_b () end do call t % timer_stop ( message = 'Setting the background color' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a tetragon res1 = 2000 res2 = 2000 call shape % set_tetragon ( L = [ 1.0_rk , 1.0_rk ], nc = [ 2 , 2 ]) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a tetragon' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! circular gradient z_values = (( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 )))) ** 2 & + (( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) ** 2 ) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'buda' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () res1 = 2000 res2 = 2000 call shape % set_tetragon ( L = [ 0.48_rk , 0.48_rk ], nc = [ 2 , 2 ]) call shape % translate_Xc ([ 0.01_rk , 0.01_rk , 0.0_rk ]) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! circular gradient z_values = (( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 )))) ** 2 & + (( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) ** 2 ) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'managua' , 0.0_rk , 2.2_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () res1 = 2000 res2 = 2000 call shape % set_tetragon ( L = [ 0.48_rk , 0.48_rk ], nc = [ 3 , 2 ]) call shape % translate_Xc ([ 0.51_rk , 0.01_rk , 0.0_rk ]) call shape % modify_Xc ( 0.24_rk , 2 , 2 ) call shape % modify_Xc ( 0.26_rk , 5 , 2 ) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the y-direction z_values = ( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'lipari' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () res1 = 2000 res2 = 2000 call shape % set_tetragon ( L = [ 0.48_rk , 0.48_rk ], nc = [ 2 , 3 ]) call shape % translate_Xc ([ 0.01_rk , 0.51_rk , 0.0_rk ]) call shape % modify_Xc ( 0.26_rk , 3 , 1 ) call shape % modify_Xc ( 0.24_rk , 4 , 1 ) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the x-direction z_values = ( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'oslo10' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () res1 = 2000 res2 = 2000 call shape % set_tetragon ( L = [ 0.48_rk , 0.48_rk ], nc = [ 3 , 3 ]) call shape % translate_Xc ([ 0.51_rk , 0.51_rk , 0.0_rk ]) call shape % modify_Xc ( 0.7_rk , 1 , 2 ) call shape % modify_Xc ( 0.7_rk , 3 , 2 ) call shape % modify_Xc ( 0.8_rk , 7 , 2 ) call shape % modify_Xc ( 0.8_rk , 9 , 2 ) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the x-direction z_values = ( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- red = 255 green = 215 blue = 0 !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Save the image to a PPM file using ForImage library !----------------------------------------------------------------------------- call t % timer_start () call image % set_pnm (& encoding = 'binary' , & file_format = 'ppm' , & width = width , & height = height , & max_color = 255 , & comment = 'example: ForCAD + ForImage + ForColor + ForColormap' , & pixels = px & ) call image % export_pnm ( 'ppm/example_ppm3' ) call image % finalize () call t % timer_stop ( message = 'Saving the image' ) ! Clean up call cmap % finalize () deallocate ( px , Xg , z_values ) end program","tags":"","loc":"sourcefile/example_ppm3.f90.html"},{"title":"example_ppm2.f90 – ForCAD","text":"This file depends on sourcefile~~example_ppm2.f90~~EfferentGraph sourcefile~example_ppm2.f90 example_ppm2.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~example_ppm2.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> Visualization of NURBS surfaces using ForCAD, ForImage and ForColorMap libraries !> This example converts NURBS surfaces (vector) to an image (raster) using ForCAD, ForImage and ForColorMap libraries. program example_ppm2 use forcad , only : rk , nurbs_surface use forimage , only : ik , format_pnm , color use forcolormap , only : colormap use fortime , only : timer implicit none type ( nurbs_surface ) :: shape type ( format_pnm ) :: image type ( color ) :: background_color type ( colormap ) :: cmap integer ( ik ), allocatable :: px (:, :) real ( rk ), allocatable :: Xg (:,:), z_values (:) real ( rk ) :: center ( 3 ), inner_radius , outer_radius , aspect_ratio integer :: height , width , ng ( 2 ), red , green , blue , res1 , res2 , i integer , allocatable :: idx (:,:) type ( timer ) :: t !----------------------------------------------------------------------------- ! Set the image size and calculate the aspect ratio !----------------------------------------------------------------------------- width = 2000 height = 2000 aspect_ratio = real ( width , rk ) / real ( height , rk ) allocate ( px ( height , 3 * width )) !----------------------------------------------------------------------------- ! Set the background color using ForColor class of ForImage !----------------------------------------------------------------------------- call t % timer_start () call background_color % set ( 'white' , use_library = . true .) do i = 1 , width px (:, 3 * ( i - 1 ) + 1 ) = background_color % get_r () px (:, 3 * ( i - 1 ) + 2 ) = background_color % get_g () px (:, 3 * ( i - 1 ) + 3 ) = background_color % get_b () end do call t % timer_stop ( message = 'Setting the background color' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a tetragon res1 = 2000 res2 = 2000 call shape % set_tetragon ( L = [ 1.0_rk , 1.0_rk ], nc = [ 2 , 2 ]) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a tetragon' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! circular gradient z_values = (( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 )))) ** 2 & + (( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) ** 2 ) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'buda' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting the colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- !> Set the shape parameters for a ring call t % timer_start () center = [ 0.0_rk , 0.0_rk , 0.0_rk ] outer_radius = 0.24_rk * 2.0_rk inner_radius = 0.0_rk * 2.0_rk res1 = 3500 res2 = 1000 center ( 2 ) = center ( 2 ) / aspect_ratio call shape % set_half_ring ( center , inner_radius , outer_radius ) call shape % rotate_Xc ( 0.0_rk , 0.0_rk , 4 5.0_rk ) call shape % translate_Xc ([ 0.25_rk , 0.25_rk , 0.0_rk ]) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! circular gradient z_values = (( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 )))) ** 2 & + (( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) ** 2 ) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'managua' , 0.0_rk , 2.2_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting the colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- !> Set the shape parameters for a ring call t % timer_start () center = [ 0.0_rk , 0.0_rk , 0.0_rk ] outer_radius = 0.24_rk * 2.0_rk inner_radius = 0.08_rk * 2.0_rk res1 = 3500 res2 = 1000 center ( 2 ) = center ( 2 ) / aspect_ratio call shape % set_half_ring ( center , inner_radius , outer_radius ) call shape % rotate_Xc ( 0.0_rk , 0.0_rk , - 4 5.0_rk ) call shape % translate_Xc ([ 0.75_rk , 0.25_rk , 0.0_rk ]) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the y-direction z_values = ( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'lipari' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting the colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a ring center = [ 0.0_rk , 0.0_rk , 0.0_rk ] outer_radius = 0.24_rk * 2.0_rk inner_radius = 0.01_rk * 2.0_rk res1 = 3500 res2 = 1000 center ( 2 ) = center ( 2 ) / aspect_ratio call shape % set_half_ring ( center , inner_radius , outer_radius ) call shape % rotate_Xc ( 0.0_rk , 0.0_rk , - 9 0.0_rk ) call shape % translate_Xc ([ 0.25_rk , 0.75_rk , 0.0_rk ]) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the x-direction z_values = ( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'oslo10' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting the colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a ring center = [ 0.0_rk , 0.0_rk , 0.0_rk ] outer_radius = 0.24_rk * 2.0_rk inner_radius = 0.22_rk * 2.0_rk res1 = 3500 res2 = 1000 center ( 2 ) = center ( 2 ) / aspect_ratio call shape % set_half_ring ( center , inner_radius , outer_radius ) call shape % rotate_Xc ( 0.0_rk , 0.0_rk , 0.0_rk ) call shape % translate_Xc ([ 0.75_rk , 0.75_rk , 0.0_rk ]) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the x-direction z_values = ( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- red = 255 green = 215 blue = 0 !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting the colors' ) !----------------------------------------------------------------------------- ! Save the image to a PPM file using ForImage library !----------------------------------------------------------------------------- call t % timer_start () call image % set_pnm (& encoding = 'binary' , & file_format = 'ppm' , & width = width , & height = height , & max_color = 255 , & comment = 'example: ForCAD + ForImage + ForColor + ForColormap' , & pixels = px & ) call image % export_pnm ( 'ppm/example_ppm2' ) call image % finalize () call t % timer_stop ( message = 'Saving the image' ) ! Clean up call cmap % finalize () deallocate ( px , Xg , z_values ) end program","tags":"","loc":"sourcefile/example_ppm2.f90.html"},{"title":"shape_ring_2d.f90 – ForCAD","text":"This file depends on sourcefile~~shape_ring_2d.f90~~EfferentGraph sourcefile~shape_ring_2d.f90 shape_ring_2d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_ring_2d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_ring_2d use forcad , only : rk , nurbs_surface implicit none type ( nurbs_surface ) :: shape !> Set up a ring shape with inner radius 1.0 and outer radius 2.0. call shape % set_ring ([ 0.0_rk , 0.0_rk , 0.0_rk ], 1.0_rk , 2.0_rk ) !> Export the control points to a VTK file for visualization. call shape % export_Xc ( 'vtk/shape_ring_2d_Xc.vtk' ) !> Create the shape using the specified number of elements in each direction. call shape % create ( 60 , 15 ) !> Export the geometry to a VTK file for visualization. call shape % export_Xg ( 'vtk/shape_ring_2d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_ring_2d_Xc.vtk' , 'vtk/shape_ring_2d_Xg.vtk' ) !> Finalize and clean up the shape object. call shape % finalize () end program","tags":"","loc":"sourcefile/shape_ring_2d.f90.html"},{"title":"forcad_nurbs_volume.f90 – ForCAD","text":"This file depends on sourcefile~~forcad_nurbs_volume.f90~~EfferentGraph sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Files dependent on this one sourcefile~~forcad_nurbs_volume.f90~~AfferentGraph sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~cmp_area.f90 cmp_area.f90 sourcefile~cmp_area.f90->sourcefile~forcad.f90 sourcefile~cmp_length.f90 cmp_length.f90 sourcefile~cmp_length.f90->sourcefile~forcad.f90 sourcefile~cmp_volume.f90 cmp_volume.f90 sourcefile~cmp_volume.f90->sourcefile~forcad.f90 sourcefile~demo_curve.f90 demo_curve.f90 sourcefile~demo_curve.f90->sourcefile~forcad.f90 sourcefile~demo_surface.f90 demo_surface.f90 sourcefile~demo_surface.f90->sourcefile~forcad.f90 sourcefile~demo_volume.f90 demo_volume.f90 sourcefile~demo_volume.f90->sourcefile~forcad.f90 sourcefile~example_curve_1.f90 example_curve_1.f90 sourcefile~example_curve_1.f90->sourcefile~forcad.f90 sourcefile~example_ppm1.f90 example_ppm1.f90 sourcefile~example_ppm1.f90->sourcefile~forcad.f90 sourcefile~example_ppm2.f90 example_ppm2.f90 sourcefile~example_ppm2.f90->sourcefile~forcad.f90 sourcefile~example_ppm3.f90 example_ppm3.f90 sourcefile~example_ppm3.f90->sourcefile~forcad.f90 sourcefile~example_surface_1.f90 example_surface_1.f90 sourcefile~example_surface_1.f90->sourcefile~forcad.f90 sourcefile~example_volume_1.f90 example_volume_1.f90 sourcefile~example_volume_1.f90->sourcefile~forcad.f90 sourcefile~nearest_point_1d.f90 nearest_point_1d.f90 sourcefile~nearest_point_1d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d.f90 nearest_point_2d.f90 sourcefile~nearest_point_2d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d_bench.f90 nearest_point_2d_bench.f90 sourcefile~nearest_point_2d_bench.f90->sourcefile~forcad.f90 sourcefile~nearest_point_3d.f90 nearest_point_3d.f90 sourcefile~nearest_point_3d.f90->sourcefile~forcad.f90 sourcefile~put_to_nurbs.f90 put_to_nurbs.f90 sourcefile~put_to_nurbs.f90->sourcefile~forcad.f90 sourcefile~shape_c_1d.f90 shape_C_1d.f90 sourcefile~shape_c_1d.f90->sourcefile~forcad.f90 sourcefile~shape_c_2d.f90 shape_C_2d.f90 sourcefile~shape_c_2d.f90->sourcefile~forcad.f90 sourcefile~shape_c_3d.f90 shape_C_3d.f90 sourcefile~shape_c_3d.f90->sourcefile~forcad.f90 sourcefile~shape_circle.f90 shape_circle.f90 sourcefile~shape_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_circle.f90 shape_half_circle.f90 sourcefile~shape_half_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_2d.f90 shape_half_ring_2d.f90 sourcefile~shape_half_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_3d.f90 shape_half_ring_3d.f90 sourcefile~shape_half_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_hexahedron.f90 shape_hexahedron.f90 sourcefile~shape_hexahedron.f90->sourcefile~forcad.f90 sourcefile~shape_ring_2d.f90 shape_ring_2d.f90 sourcefile~shape_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_ring_3d.f90 shape_ring_3d.f90 sourcefile~shape_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_tetragon.f90 shape_tetragon.f90 sourcefile~shape_tetragon.f90->sourcefile~forcad.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> This module defines the 'nurbs_volume' type for representing a Non-Uniform Rational B-Spline (NURBS) volume. module forcad_nurbs_volume use forcad_utils , only : rk , basis_bspline , elemConn_C0 , kron , ndgrid , compute_multiplicity , compute_knot_vector , & basis_bspline_der , insert_knot_A_5_1 , findspan , elevate_degree_A_5_9 , hexahedron_Xc , remove_knots_A_5_8 , & elemConn_Cn , unique , rotation , det , inv , gauss_leg implicit none private public nurbs_volume !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause type nurbs_volume real ( rk ), allocatable , private :: Xc (:,:) !! Control points (2D array: [nc(1)*nc(2)*nc(3), dim]) real ( rk ), allocatable , private :: Xg (:,:) !! Geometry points (2D array: [ng(1)*ng(2)*ng(3), dim]) real ( rk ), allocatable , private :: Wc (:) !! Weights for the control points (1D array: [nc(1)*nc(2)*nc(3)]) real ( rk ), allocatable , private :: Xt1 (:) !! Evaluation parameter values in the first direction (1D array: [ng(1)]) real ( rk ), allocatable , private :: Xt2 (:) !! Evaluation parameter values in the second direction (1D array: [ng(2)]) real ( rk ), allocatable , private :: Xt3 (:) !! Evaluation parameter values in the third direction (1D array: [ng(3)]) real ( rk ), allocatable , private :: Xt (:,:) !! Evaluation parameter values (2D array: [ng(1)*ng(2)*ng(3), dim] real ( rk ), allocatable , private :: knot1 (:) !! Knot vector in the first direction (1D array) real ( rk ), allocatable , private :: knot2 (:) !! Knot vector in the second direction (1D array) real ( rk ), allocatable , private :: knot3 (:) !! Knot vector in the third direction (1D array) integer , private :: degree ( 3 ) !! Degree (order) of the volume integer , private :: nc ( 3 ) !! Number of control points in each direction integer , private :: ng ( 3 ) !! Number of geometry points in each direction integer , allocatable , private :: elemConn_Xc_vis (:,:) !! Connectivity for visualization of control points integer , allocatable , private :: elemConn_Xg_vis (:,:) !! Connectivity for visualization of geometry points integer , allocatable , private :: elemConn (:,:) !! IGA element connectivity contains procedure :: set1 !!> Set knot vectors, control points and weights for the NURBS volume object procedure :: set2 !!> Set NURBS volume using nodes of parameter space, degree, continuity, control points and weights procedure :: set3 !!> Set Bezier or Rational Bezier volume using control points and weights procedure :: set4 !!> Set NURBS volume using degree, number of control points, control points and weights generic :: set => set1 , set2 , set3 , set4 !!> Set NURBS volume procedure :: create !!> Generate geometry points procedure :: cmp_Xg !!> Compute geometry points procedure , private :: get_Xc_all !!> Get all control points procedure , private :: get_Xci !!> Get i-th control point procedure , private :: get_Xcid !!> Get i-th control point in a specific direction generic :: get_Xc => get_Xc_all , get_Xci , get_Xcid !!> Get control points procedure , private :: get_Xg_all !!> Get all geometry points procedure , private :: get_Xgi !!> Get i-th geometry point procedure , private :: get_Xgid !!> Get i-th geometry point in a specific direction generic :: get_Xg => get_Xg_all , get_Xgi , get_Xgid !!> Get geometry points procedure , private :: get_Wc_all !!> Get all weights procedure , private :: get_Wci !!> Get i-th weight generic :: get_Wc => get_Wc_all , get_Wci !!> Get weights procedure :: get_Xt !!> Get parameter values procedure , private :: get_knot_all !!> Get all knot vectors procedure , private :: get_knoti !!> Get i-th knot value generic :: get_knot => get_knoti , get_knot_all !!> Get knot vector procedure :: get_ng !!> Get number of geometry points procedure , private :: get_nc_dir !!> Get number of control points in a specific direction procedure , private :: get_nc_all !!> Get number of control points in all directions generic :: get_nc => get_nc_all , get_nc_dir !!> Get number of control points procedure :: cmp_degree !!> Compute degree of the NURBS volume procedure , private :: get_degree_all !!> Get degree of the NURBS volume in all directions procedure , private :: get_degree_dir !!> Get degree of the NURBS volume in a specific direction generic :: get_degree => get_degree_all , get_degree_dir !!> Get degree of the NURBS volume procedure :: finalize !!> Finalize the NURBS volume object procedure :: cmp_elem_Xc_vis !!> Generate connectivity for control points procedure :: cmp_elem_Xg_vis !!> Generate connectivity for geometry points procedure :: cmp_elem !!> Generate IGA element connectivity procedure :: get_elem_Xc_vis !!> Get connectivity for control points procedure :: get_elem_Xg_vis !!> Get connectivity for geometry points procedure :: get_elem !!> Get IGA element connectivity procedure :: set_elem_Xc_vis !!> Set connectivity for control points procedure :: set_elem_Xg_vis !!> Set connectivity for geometry points procedure :: set_elem !!> Set IGA element connectivity procedure :: export_Xc !!> Export control points to VTK file procedure :: export_Xg !!> Export geometry points to VTK file procedure :: modify_Xc !!> Modify control points procedure :: modify_Wc !!> Modify weights procedure :: get_multiplicity !!> Compute and return the multiplicity of the knots procedure :: get_continuity !!> Compute and return the continuity of the NURBS volume procedure :: cmp_nc !!> Compute number of required control points procedure , private :: basis_vector !!> Compute the basis functions of the NURBS volume procedure , private :: basis_scalar !!> Compute the basis functions of the NURBS volume generic :: basis => basis_vector , basis_scalar !!> Compute the basis functions of the NURBS volume procedure , private :: derivative_vector !!> Compute the derivative of the NURBS volume procedure , private :: derivative_scalar !!> Compute the derivative of the NURBS volume generic :: derivative => derivative_vector , derivative_scalar !!> Compute the derivative of the NURBS volume procedure , private :: derivative2_vector !!> Compute the second derivative of the NURBS volume procedure , private :: derivative2_scalar !!> Compute the second derivative of the NURBS volume generic :: derivative2 => derivative2_vector , derivative2_scalar !!> Compute the second derivative of the NURBS volume procedure :: insert_knots !!> Insert knots into the knot vector procedure :: elevate_degree !!> Elevate the degree of the NURBS volume procedure :: is_rational !!> Check if the NURBS volume is rational procedure :: put_to_nurbs !!> Put a shape to a NURBS volume procedure :: remove_knots !!> Remove knots from the knot vector procedure :: rotate_Xc !!> Rotate control points procedure :: rotate_Xg !!> Rotate geometry points procedure :: translate_Xc !!> Translate control points procedure :: translate_Xg !!> Translate geometry points procedure :: show !!> Show the NURBS object using PyVista procedure :: nearest_point !!> Find the nearest point on the NURBS volume (Approximation) procedure :: nearest_point2 !!> Find the nearest point on the NURBS volume (Minimization - Newton's method) procedure :: ansatz !!> Compute the shape functions, derivative of shape functions and dV procedure :: cmp_volume !!> Compute the volume of the NURBS volume ! Faces procedure :: cmp_elemFace_Xc_vis !!> Compute faces of the control points procedure :: cmp_elemFace_Xg_vis !!> Compute faces of the geometry points procedure :: cmp_elemFace !!> Compute faces of the IGA elements procedure :: cmp_degreeFace !!> Compute degrees of the faces ! Shapes procedure :: set_hexahedron !!> Set a hexahedron procedure :: set_ring !!> Set a ring procedure :: set_half_ring !!> Set a half ring procedure :: set_C !!> Set a C-shape end type !=============================================================================== interface compute_Xg pure function compute_Xg_nurbs_3d ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_ng , f_Xc , f_Wc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Xg (:,:) end function pure function compute_Xg_bspline_3d ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_ng , f_Xc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), allocatable :: f_Xg (:,:) end function pure function compute_Xg_nurbs_3d_1point ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_Xc , f_Wc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Xg (:) end function pure function compute_Xg_bspline_3d_1point ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_Xc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), allocatable :: f_Xg (:) end function end interface interface compute_dTgc pure subroutine compute_dTgc_nurbs_3d_vector ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_ng , f_Wc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_dTgc_bspline_3d_vector ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_ng , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_dTgc_nurbs_3d_scalar ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_Wc , f_dTgc , f_Tgc , f_elem ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) integer , intent ( in ), optional :: f_elem (:) end subroutine pure subroutine compute_dTgc_bspline_3d_scalar ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_dTgc , f_Tgc , f_elem ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) integer , intent ( in ), optional :: f_elem (:) end subroutine end interface interface compute_d2Tgc pure subroutine compute_d2Tgc_nurbs_3d_vector (& f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_ng , f_Wc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_d2Tgc_bspline_3d_vector (& f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_ng , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_d2Tgc_nurbs_3d_scalar ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_Wc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) end subroutine pure subroutine compute_d2Tgc_bspline_3d_scalar ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) end subroutine end interface interface compute_Tgc pure function compute_Tgc_nurbs_3d_vector ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_ng , f_Wc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Tgc (:,:) end function pure function compute_Tgc_bspline_3d_vector ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_ng ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), allocatable :: f_Tgc (:,:) end function pure function compute_Tgc_nurbs_3d_scalar ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc , f_Wc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Tgc (:) end function pure function compute_Tgc_bspline_3d_scalar ( f_Xt , f_knot1 , f_knot2 , f_knot3 , f_degree , f_nc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:), f_knot3 (:) integer , intent ( in ) :: f_degree ( 3 ) integer , intent ( in ) :: f_nc ( 3 ) real ( rk ), allocatable :: f_Tgc (:) end function end interface interface pure function nearest_point_help_3d ( f_ng , f_Xg , f_point_Xg ) result ( f_distances ) import :: rk integer , intent ( in ) :: f_ng ( 3 ) real ( rk ), intent ( in ), contiguous :: f_Xg (:,:) real ( rk ), intent ( in ), contiguous :: f_point_Xg (:) real ( rk ), allocatable :: f_distances (:) end function end interface contains !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set control points and weights for the NURBS volume object. pure subroutine set1 ( this , knot1 , knot2 , knot3 , Xc , Wc ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( allocated ( this % knot1 )) deallocate ( this % knot1 ) if ( allocated ( this % knot2 )) deallocate ( this % knot2 ) if ( allocated ( this % knot3 )) deallocate ( this % knot3 ) if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % knot1 = knot1 this % knot2 = knot2 this % knot3 = knot3 call this % cmp_degree () call this % cmp_nc () this % Xc = Xc if ( present ( Wc )) then if ( size ( Wc ) /= this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 )) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set control points and weights for the NURBS volume object. pure subroutine set2 ( this , Xth_dir1 , Xth_dir2 , Xth_dir3 , degree , continuity1 , continuity2 , continuity3 , Xc , Wc ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xth_dir1 (:), Xth_dir2 (:), Xth_dir3 (:) integer , intent ( in ), contiguous :: degree (:) integer , intent ( in ), contiguous :: continuity1 (:), continuity2 (:), continuity3 (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) this % knot1 = compute_knot_vector ( Xth_dir1 , degree ( 1 ), continuity1 ) this % knot2 = compute_knot_vector ( Xth_dir2 , degree ( 2 ), continuity2 ) this % knot3 = compute_knot_vector ( Xth_dir3 , degree ( 3 ), continuity3 ) this % degree ( 1 ) = degree ( 1 ) this % degree ( 2 ) = degree ( 2 ) this % degree ( 3 ) = degree ( 3 ) call this % cmp_nc () this % Xc = Xc if ( present ( Wc )) this % Wc = Wc end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set Bezier or Rational Bezier volume using control points and weights. pure subroutine set3 ( this , nc , Xc , Wc ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), contiguous :: nc (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % Xc = Xc this % nc = nc if ( allocated ( this % knot1 )) deallocate ( this % knot1 ) allocate ( this % knot1 ( 2 * this % nc ( 1 ))) this % knot1 ( 1 : this % nc ( 1 )) = 0.0_rk this % knot1 ( this % nc ( 1 ) + 1 : 2 * this % nc ( 1 )) = 1.0_rk if ( allocated ( this % knot2 )) deallocate ( this % knot2 ) allocate ( this % knot2 ( 2 * this % nc ( 2 ))) this % knot2 ( 1 : this % nc ( 2 )) = 0.0_rk this % knot2 ( this % nc ( 2 ) + 1 : 2 * this % nc ( 2 )) = 1.0_rk if ( allocated ( this % knot3 )) deallocate ( this % knot3 ) allocate ( this % knot3 ( 2 * this % nc ( 3 ))) this % knot3 ( 1 : this % nc ( 3 )) = 0.0_rk this % knot3 ( this % nc ( 3 ) + 1 : 2 * this % nc ( 3 )) = 1.0_rk call this % cmp_degree () if ( present ( Wc )) then if ( size ( Wc ) /= this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 )) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set4 ( this , degree , nc , Xc , Wc ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), contiguous :: degree (:) integer , intent ( in ), contiguous :: nc (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) integer :: m ( 3 ), i if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % Xc = Xc this % nc = nc this % degree = degree ! Size of knot vectors m = nc + degree + 1 if ( allocated ( this % knot1 )) deallocate ( this % knot1 ) allocate ( this % knot1 ( m ( 1 ))) this % knot1 ( 1 : degree ( 1 ) + 1 ) = 0.0_rk this % knot1 ( degree ( 1 ) + 2 : m ( 1 ) - degree ( 1 ) - 1 ) = [( real ( i , rk ) / ( m ( 1 ) - 2 * degree ( 1 ) - 1 ), i = 1 , m ( 1 ) - 2 * degree ( 1 ) - 2 )] this % knot1 ( m ( 1 ) - degree ( 1 ): m ( 1 )) = 1.0_rk if ( allocated ( this % knot2 )) deallocate ( this % knot2 ) allocate ( this % knot2 ( m ( 2 ))) this % knot2 ( 1 : degree ( 2 ) + 1 ) = 0.0_rk this % knot2 ( degree ( 2 ) + 2 : m ( 2 ) - degree ( 2 ) - 1 ) = [( real ( i , rk ) / ( m ( 2 ) - 2 * degree ( 2 ) - 1 ), i = 1 , m ( 2 ) - 2 * degree ( 2 ) - 2 )] this % knot2 ( m ( 2 ) - degree ( 2 ): m ( 2 )) = 1.0_rk if ( allocated ( this % knot3 )) deallocate ( this % knot3 ) allocate ( this % knot3 ( m ( 3 ))) this % knot3 ( 1 : degree ( 3 ) + 1 ) = 0.0_rk this % knot3 ( degree ( 3 ) + 2 : m ( 3 ) - degree ( 3 ) - 1 ) = [( real ( i , rk ) / ( m ( 3 ) - 2 * degree ( 3 ) - 1 ), i = 1 , m ( 3 ) - 2 * degree ( 3 ) - 2 )] this % knot3 ( m ( 3 ) - degree ( 3 ): m ( 3 )) = 1.0_rk if ( present ( Wc )) then if ( size ( Wc ) /= nc ( 1 ) * nc ( 2 ) * nc ( 3 )) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine create ( this , res1 , res2 , res3 , Xt1 , Xt2 , Xt3 , Xt ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), optional :: res1 , res2 , res3 real ( rk ), intent ( in ), contiguous , optional :: Xt1 (:), Xt2 (:), Xt3 (:) real ( rk ), intent ( in ), contiguous , optional :: Xt (:,:) integer :: i ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % knot1 ) . or . . not . allocated ( this % knot2 ) . or . . not . allocated ( this % knot3 )) then error stop 'Knot vector(s) is/are not set.' end if ! Set parameter values if ( present ( Xt1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) this % Xt1 = Xt1 elseif ( present ( res1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) allocate ( this % Xt1 ( res1 )) this % Xt1 = [( real ( i - 1 , rk ) / real ( res1 - 1 , rk ), i = 1 , res1 )] ! else ! this%Xt1 = this%Xt1 end if ! Set parameter values if ( present ( Xt2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) this % Xt2 = Xt2 elseif ( present ( res2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) allocate ( this % Xt2 ( res2 )) this % Xt2 = [( real ( i - 1 , rk ) / real ( res2 - 1 , rk ), i = 1 , res2 )] ! else ! this%Xt2 = this%Xt2 end if ! Set parameter values if ( present ( Xt3 )) then if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) this % Xt3 = Xt3 elseif ( present ( res3 )) then if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) allocate ( this % Xt3 ( res3 )) this % Xt3 = [( real ( i - 1 , rk ) / real ( res3 - 1 , rk ), i = 1 , res3 )] ! else ! this%Xt3 = this%Xt3 end if if ( present ( Xt )) then this % Xt = Xt else ! Set number of geometry points this % ng ( 1 ) = size ( this % Xt1 , 1 ) this % ng ( 2 ) = size ( this % Xt2 , 1 ) this % ng ( 3 ) = size ( this % Xt3 , 1 ) call ndgrid ( this % Xt1 , this % Xt2 , this % Xt3 , this % Xt ) end if if ( allocated ( this % Xg )) deallocate ( this % Xg ) allocate ( this % Xg ( this % ng ( 1 ) * this % ng ( 2 ) * this % ng ( 3 ), size ( this % Xc , 2 ))) if ( this % is_rational ()) then ! NURBS this % Xg = compute_Xg (& this % Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % ng , this % Xc , this % Wc ) else ! B-Spline this % Xg = compute_Xg (& this % Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % ng , this % Xc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_Xg ( this , Xt ) result ( Xg ) class ( nurbs_volume ), intent ( in ) :: this real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), allocatable :: Xg (:) ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % knot1 ) . or . . not . allocated ( this % knot2 ) . or . . not . allocated ( this % knot3 )) then error stop 'Knot vector(s) is/are not set.' end if if ( this % is_rational ()) then ! NURBS Xg = compute_Xg ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % Xc , this % Wc ) else ! B-Spline Xg = compute_Xg ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % Xc ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xc_all ( this ) result ( Xc ) class ( nurbs_volume ), intent ( in ) :: this real ( rk ), allocatable :: Xc (:,:) if ( allocated ( this % Xc )) then Xc = this % Xc else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xci ( this , n ) result ( Xc ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ), allocatable :: Xc (:) if ( allocated ( this % Xc )) then if ( n < lbound ( this % Xc , 1 ) . or . n > ubound ( this % Xc , 1 )) then error stop 'Invalid index for control points.' end if Xc = this % Xc ( n ,:) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xcid ( this , n , dir ) result ( Xc ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: n integer , intent ( in ) :: dir real ( rk ) :: Xc if ( allocated ( this % Xc )) then if ( n < lbound ( this % Xc , 1 ) . or . n > ubound ( this % Xc , 1 )) then error stop 'Invalid index for control points.' end if if ( dir < lbound ( this % Xc , 2 ) . or . dir > ubound ( this % Xc , 2 )) then error stop 'Invalid direction for control points.' end if Xc = this % Xc ( n , dir ) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xg_all ( this ) result ( Xg ) class ( nurbs_volume ), intent ( in ) :: this real ( rk ), allocatable :: Xg (:,:) if ( allocated ( this % Xg )) then Xg = this % Xg else error stop 'Geometry points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xgi ( this , n ) result ( Xg ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ), allocatable :: Xg (:) if ( allocated ( this % Xg )) then if ( n < lbound ( this % Xg , 1 ) . or . n > ubound ( this % Xg , 1 )) then error stop 'Invalid index for geometry points.' end if Xg = this % Xg ( n ,:) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xgid ( this , n , dir ) result ( Xg ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: n integer , intent ( in ) :: dir real ( rk ) :: Xg if ( allocated ( this % Xg )) then if ( n < lbound ( this % Xg , 1 ) . or . n > ubound ( this % Xg , 1 )) then error stop 'Invalid index for geometry points.' end if if ( dir < lbound ( this % Xg , 2 ) . or . dir > ubound ( this % Xg , 2 )) then error stop 'Invalid direction for geometry points.' end if Xg = this % Xg ( n , dir ) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Wc_all ( this ) result ( Wc ) class ( nurbs_volume ), intent ( in ) :: this real ( rk ), allocatable :: Wc (:) if ( allocated ( this % Wc )) then Wc = this % Wc else error stop 'The NURBS volume is not rational or weights are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Wci ( this , n ) result ( Wc ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ) :: Wc if ( allocated ( this % Wc )) then if ( n < lbound ( this % Wc , 1 ) . or . n > ubound ( this % Wc , 1 )) then error stop 'Invalid index for weights.' end if Wc = this % Wc ( n ) else error stop 'The NURBS volume is not rational or weights are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xt ( this , dir ) result ( Xt ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: dir real ( rk ), allocatable :: Xt (:) if ( dir == 1 ) then if ( allocated ( this % Xt1 )) then Xt = this % Xt1 else error stop 'Parameter values are not set.' end if elseif ( dir == 2 ) then if ( allocated ( this % Xt2 )) then Xt = this % Xt2 else error stop 'Parameter values are not set.' end if elseif ( dir == 3 ) then if ( allocated ( this % Xt3 )) then Xt = this % Xt3 else error stop 'Parameter values are not set.' end if else error stop 'Invalid direction for parameter values.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_ng ( this ) result ( ng ) class ( nurbs_volume ), intent ( in ) :: this integer :: ng ( 3 ) ng = this % ng end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_degree ( this , dir ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), optional :: dir integer , allocatable :: m1 (:), m2 (:), m3 (:) if ( present ( dir )) then if ( dir == 1 ) then m1 = this % get_multiplicity ( 1 ) this % degree ( 1 ) = m1 ( 1 ) - 1 else if ( dir == 2 ) then m2 = this % get_multiplicity ( 2 ) this % degree ( 2 ) = m2 ( 1 ) - 1 else if ( dir == 3 ) then m3 = this % get_multiplicity ( 3 ) this % degree ( 3 ) = m3 ( 1 ) - 1 else error stop 'Invalid direction for degree.' end if else m1 = this % get_multiplicity ( 1 ) this % degree ( 1 ) = m1 ( 1 ) - 1 m2 = this % get_multiplicity ( 2 ) this % degree ( 2 ) = m2 ( 1 ) - 1 m3 = this % get_multiplicity ( 3 ) this % degree ( 3 ) = m3 ( 1 ) - 1 end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_degree_all ( this ) result ( degree ) class ( nurbs_volume ), intent ( in ) :: this integer :: degree ( 3 ) degree ( 1 ) = this % degree ( 1 ) degree ( 2 ) = this % degree ( 2 ) degree ( 3 ) = this % degree ( 3 ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_degree_dir ( this , dir ) result ( degree ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: dir integer :: degree if ( dir == 1 ) then degree = this % degree ( 1 ) else if ( dir == 2 ) then degree = this % degree ( 2 ) else if ( dir == 3 ) then degree = this % degree ( 3 ) else error stop 'Invalid direction for degree.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_knot_all ( this , dir ) result ( knot ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: dir real ( rk ), allocatable :: knot (:) if ( dir == 1 ) then if ( allocated ( this % knot1 )) then knot = this % knot1 else error stop 'Knot vector is not set.' end if elseif ( dir == 2 ) then if ( allocated ( this % knot2 )) then knot = this % knot2 else error stop 'Knot vector is not set.' end if elseif ( dir == 3 ) then if ( allocated ( this % knot3 )) then knot = this % knot3 else error stop 'Knot vector is not set.' end if else error stop 'Invalid direction for knot vector.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_knoti ( this , dir , i ) result ( knot ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: dir integer , intent ( in ) :: i real ( rk ) :: knot if ( dir == 1 ) then if ( allocated ( this % knot1 )) then if ( i < 1 . or . i > size ( this % knot1 )) then error stop 'Invalid index for knot vector.' else knot = this % knot1 ( i ) end if else error stop 'Knot vector is not set.' end if elseif ( dir == 2 ) then if ( allocated ( this % knot2 )) then if ( i < 1 . or . i > size ( this % knot2 )) then error stop 'Invalid index for knot vector.' else knot = this % knot2 ( i ) end if else error stop 'Knot vector is not set.' end if elseif ( dir == 3 ) then if ( allocated ( this % knot3 )) then if ( i < 1 . or . i > size ( this % knot3 )) then error stop 'Invalid index for knot vector.' else knot = this % knot3 ( i ) end if else error stop 'Knot vector is not set.' end if else error stop 'Invalid direction for knot vector.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine finalize ( this ) class ( nurbs_volume ), intent ( inout ) :: this if ( allocated ( this % Xc )) deallocate ( this % Xc ) if ( allocated ( this % Xg )) deallocate ( this % Xg ) if ( allocated ( this % Wc )) deallocate ( this % Wc ) if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) if ( allocated ( this % Xt )) deallocate ( this % Xt ) if ( allocated ( this % knot1 )) deallocate ( this % knot1 ) if ( allocated ( this % knot2 )) deallocate ( this % knot2 ) if ( allocated ( this % knot3 )) deallocate ( this % knot3 ) if ( allocated ( this % elemConn_Xc_vis )) deallocate ( this % elemConn_Xc_vis ) if ( allocated ( this % elemConn_Xg_vis )) deallocate ( this % elemConn_Xg_vis ) if ( allocated ( this % elemConn )) deallocate ( this % elemConn ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem_Xc_vis ( this , p ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) integer , intent ( in ), contiguous , optional :: p (:) if ( present ( p )) then elemConn = elemConn_C0 ( this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), p ( 1 ), p ( 2 ), p ( 3 )) else elemConn = elemConn_C0 ( this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), 1 , 1 , 1 ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem_Xg_vis ( this , p ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) integer , intent ( in ), contiguous , optional :: p (:) if ( present ( p )) then elemConn = elemConn_C0 ( this % ng ( 1 ), this % ng ( 2 ), this % ng ( 3 ), p ( 1 ), p ( 2 ), p ( 3 )) else elemConn = elemConn_C0 ( this % ng ( 1 ), this % ng ( 2 ), this % ng ( 3 ), 1 , 1 , 1 ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine export_Xc ( this , filename ) class ( nurbs_volume ), intent ( in ) :: this character ( len =* ), intent ( in ) :: filename integer :: i , nc , nunit integer , allocatable :: elemConn (:,:) ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % elemConn_Xc_vis )) then elemConn = this % cmp_elem_Xc_vis () else elemConn = this % elemConn_Xc_vis end if nc = size ( this % Xc , 1 ) open ( newunit = nunit , file = filename , action = 'write' ) write ( nunit , '(a)' ) '# vtk DataFile Version 2.0' write ( nunit , '(a)' ) 'Generated by ForCAD' write ( nunit , '(a)' ) 'ASCII' write ( nunit , '(a)' ) 'DATASET UNSTRUCTURED_GRID' write ( nunit , '(a,\" \",g0,\" \",a)' ) 'POINTS' , nc , 'double' if ( size ( this % Xc , 2 ) == 2 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xc ( i , 1 ), this % Xc ( i , 2 ), 0.0_rk , i = 1 , nc ) elseif ( size ( this % Xc , 2 ) == 3 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xc ( i , 1 ), this % Xc ( i , 2 ), this % Xc ( i , 3 ) , i = 1 , nc ) else error stop 'Invalid dimension for control points.' end if write ( nunit , '(a,\" \",g0,\" \",g0)' ) 'CELLS' , size ( elemConn , 1 ), size ( elemConn , 1 ) * ( size ( elemConn , 2 ) + 1 ) write ( nunit , '(g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0)' )& ( 8 , elemConn ( i , 1 ) - 1 , elemConn ( i , 2 ) - 1 , elemConn ( i , 4 ) - 1 , elemConn ( i , 3 ) - 1 ,& elemConn ( i , 5 ) - 1 , elemConn ( i , 6 ) - 1 , elemConn ( i , 8 ) - 1 , elemConn ( i , 7 ) - 1 , i = 1 , size ( elemConn , 1 )) write ( nunit , '(a,\" \",g0)' ) 'CELL_TYPES' , size ( elemConn , 1 ) write ( nunit , '(g0)' ) ( 12 , i = 1 , size ( elemConn , 1 )) close ( nunit ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine export_Xg ( this , filename ) class ( nurbs_volume ), intent ( in ) :: this character ( len =* ), intent ( in ) :: filename integer :: i , ng , nunit integer , allocatable :: elemConn (:,:) ! check if (. not . allocated ( this % Xg )) then error stop 'Geometry points are not set.' end if if (. not . allocated ( this % elemConn_Xg_vis )) then elemConn = this % cmp_elem_Xg_vis () else elemConn = this % elemConn_Xg_vis end if ng = size ( this % Xg , 1 ) open ( newunit = nunit , file = filename , action = 'write' ) write ( nunit , '(a)' ) '# vtk DataFile Version 2.0' write ( nunit , '(a)' ) 'Generated by ForCAD' write ( nunit , '(a)' ) 'ASCII' write ( nunit , '(a)' ) 'DATASET UNSTRUCTURED_GRID' write ( nunit , '(a,\" \",g0,\" \",a)' ) 'POINTS' , ng , 'double' if ( size ( this % Xg , 2 ) == 2 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xg ( i , 1 ), this % Xg ( i , 2 ), 0.0_rk , i = 1 , ng ) elseif ( size ( this % Xg , 2 ) == 3 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xg ( i , 1 ), this % Xg ( i , 2 ), this % Xg ( i , 3 ) , i = 1 , ng ) else error stop 'Invalid dimension for geometry points.' end if write ( nunit , '(a,\" \",g0,\" \",g0)' ) 'CELLS' , size ( elemConn , 1 ), size ( elemConn , 1 ) * ( size ( elemConn , 2 ) + 1 ) write ( nunit , '(g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0)' )& ( 8 , elemConn ( i , 1 ) - 1 , elemConn ( i , 2 ) - 1 , elemConn ( i , 4 ) - 1 , elemConn ( i , 3 ) - 1 ,& elemConn ( i , 5 ) - 1 , elemConn ( i , 6 ) - 1 , elemConn ( i , 8 ) - 1 , elemConn ( i , 7 ) - 1 , i = 1 , size ( elemConn , 1 )) write ( nunit , '(a,\" \",g0)' ) 'CELL_TYPES' , size ( elemConn , 1 ) write ( nunit , '(g0)' ) ( 12 , i = 1 , size ( elemConn , 1 )) close ( nunit ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine modify_Xc ( this , X , num , dir ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ) :: X integer , intent ( in ) :: num integer , intent ( in ) :: dir if ( allocated ( this % Xc )) then this % Xc ( num , dir ) = X if ( allocated ( this % Wc )) then call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ),& Xc = this % get_Xc (), Wc = this % get_Wc ()) else call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ),& Xc = this % get_Xc ()) end if else error stop 'Control points are not set.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine modify_Wc ( this , W , num ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ) :: W integer , intent ( in ) :: num if ( allocated ( this % Wc )) then this % Wc ( num ) = W if ( allocated ( this % knot1 ) . and . allocated ( this % knot2 ) . and . allocated ( this % knot3 )) then call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ),& Xc = this % get_Xc (), Wc = this % get_Wc ()) else call this % set ( nc = this % nc , Xc = this % get_Xc (), Wc = this % get_Wc ()) end if else error stop 'The NURBS volume is not rational.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_multiplicity ( this , dir ) result ( m ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: dir integer , allocatable :: m (:) if ( dir == 1 ) then ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else m = compute_multiplicity ( this % knot1 ) end if elseif ( dir == 2 ) then ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else m = compute_multiplicity ( this % knot2 ) end if elseif ( dir == 3 ) then ! check if (. not . allocated ( this % knot3 )) then error stop 'Knot vector is not set.' else m = compute_multiplicity ( this % knot3 ) end if else error stop 'Invalid direction.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_continuity ( this , dir ) result ( c ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: dir integer , allocatable :: c (:) if ( dir == 1 ) then ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else c = this % degree ( 1 ) - compute_multiplicity ( this % knot1 ) end if elseif ( dir == 2 ) then ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else c = this % degree ( 2 ) - compute_multiplicity ( this % knot2 ) end if elseif ( dir == 3 ) then ! check if (. not . allocated ( this % knot3 )) then error stop 'Knot vector is not set.' else c = this % degree ( 3 ) - compute_multiplicity ( this % knot3 ) end if else error stop 'Invalid direction.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_nc ( this , dir ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), optional :: dir if ( present ( dir )) then if ( dir == 1 ) then ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else this % nc ( 1 ) = sum ( compute_multiplicity ( this % knot1 )) - this % degree ( 1 ) - 1 end if elseif ( dir == 2 ) then ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else this % nc ( 2 ) = sum ( compute_multiplicity ( this % knot2 )) - this % degree ( 2 ) - 1 end if elseif ( dir == 3 ) then ! check if (. not . allocated ( this % knot3 )) then error stop 'Knot vector is not set.' else this % nc ( 3 ) = sum ( compute_multiplicity ( this % knot3 )) - this % degree ( 3 ) - 1 end if else error stop 'Invalid direction.' end if else ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else this % nc ( 1 ) = sum ( compute_multiplicity ( this % knot1 )) - this % degree ( 1 ) - 1 end if ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else this % nc ( 2 ) = sum ( compute_multiplicity ( this % knot2 )) - this % degree ( 2 ) - 1 end if ! check if (. not . allocated ( this % knot3 )) then error stop 'Knot vector is not set.' else this % nc ( 3 ) = sum ( compute_multiplicity ( this % knot3 )) - this % degree ( 3 ) - 1 end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_nc_all ( this ) result ( nc ) class ( nurbs_volume ), intent ( in ) :: this integer :: nc ( 3 ) nc = this % nc end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_nc_dir ( this , dir ) result ( nc ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: dir integer :: nc if ( dir == 1 ) then ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else nc = sum ( compute_multiplicity ( this % knot1 )) - this % degree ( 1 ) - 1 end if elseif ( dir == 2 ) then ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else nc = sum ( compute_multiplicity ( this % knot2 )) - this % degree ( 2 ) - 1 end if elseif ( dir == 3 ) then ! check if (. not . allocated ( this % knot3 )) then error stop 'Knot vector is not set.' else nc = sum ( compute_multiplicity ( this % knot3 )) - this % degree ( 3 ) - 1 end if else error stop 'Invalid direction.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative_vector ( this , res1 , res2 , res3 , Xt1 , Xt2 , Xt3 , dTgc , Tgc ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), optional :: res1 , res2 , res3 real ( rk ), intent ( in ), contiguous , optional :: Xt1 (:), Xt2 (:), Xt3 (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:,:) integer :: i real ( rk ), allocatable :: Xt (:,:) ! Set parameter values if ( present ( Xt1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) this % Xt1 = Xt1 elseif ( present ( res1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) allocate ( this % Xt1 ( res1 )) this % Xt1 = [( real ( i - 1 , rk ) / real ( res1 - 1 , rk ), i = 1 , res1 )] ! else ! this%Xt1 = this%Xt1 end if ! Set parameter values if ( present ( Xt2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) this % Xt2 = Xt2 elseif ( present ( res2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) allocate ( this % Xt2 ( res2 )) this % Xt2 = [( real ( i - 1 , rk ) / real ( res2 - 1 , rk ), i = 1 , res2 )] ! else ! this%Xt2 = this%Xt2 end if ! Set parameter values if ( present ( Xt3 )) then if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) this % Xt3 = Xt3 elseif ( present ( res3 )) then if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) allocate ( this % Xt3 ( res3 )) this % Xt3 = [( real ( i - 1 , rk ) / real ( res3 - 1 , rk ), i = 1 , res3 )] ! else ! this%Xt3 = this%Xt3 end if ! Set number of geometry points this % ng ( 1 ) = size ( this % Xt1 , 1 ) this % ng ( 2 ) = size ( this % Xt2 , 1 ) this % ng ( 3 ) = size ( this % Xt3 , 1 ) call ndgrid ( this % Xt1 , this % Xt2 , this % Xt3 , Xt ) if ( this % is_rational ()) then ! NURBS call compute_dTgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % ng , this % Wc , dTgc , Tgc ) else call compute_dTgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % ng , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative_scalar ( this , Xt , dTgc , Tgc , elem ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xt (:) integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:) if ( this % is_rational ()) then ! NURBS call compute_dTgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % Wc , dTgc , Tgc , elem ) else call compute_dTgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , dTgc , Tgc , elem ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative2_vector ( this , res1 , res2 , res3 , Xt1 , Xt2 , Xt3 , d2Tgc , dTgc , Tgc ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), optional :: res1 , res2 , res3 real ( rk ), intent ( in ), contiguous , optional :: Xt1 (:), Xt2 (:), Xt3 (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ), optional :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:,:) integer :: i real ( rk ), allocatable :: Xt (:,:) ! Set parameter values if ( present ( Xt1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) this % Xt1 = Xt1 elseif ( present ( res1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) allocate ( this % Xt1 ( res1 )) this % Xt1 = [( real ( i - 1 , rk ) / real ( res1 - 1 , rk ), i = 1 , res1 )] ! else ! this%Xt1 = this%Xt1 end if ! Set parameter values if ( present ( Xt2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) this % Xt2 = Xt2 elseif ( present ( res2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) allocate ( this % Xt2 ( res2 )) this % Xt2 = [( real ( i - 1 , rk ) / real ( res2 - 1 , rk ), i = 1 , res2 )] ! else ! this%Xt2 = this%Xt2 end if ! Set parameter values if ( present ( Xt3 )) then if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) this % Xt3 = Xt3 elseif ( present ( res3 )) then if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) allocate ( this % Xt3 ( res3 )) this % Xt3 = [( real ( i - 1 , rk ) / real ( res3 - 1 , rk ), i = 1 , res3 )] ! else ! this%Xt3 = this%Xt3 end if ! Set number of geometry points this % ng ( 1 ) = size ( this % Xt1 , 1 ) this % ng ( 2 ) = size ( this % Xt2 , 1 ) this % ng ( 3 ) = size ( this % Xt3 , 1 ) call ndgrid ( this % Xt1 , this % Xt2 , this % Xt3 , Xt ) if ( this % is_rational ()) then ! NURBS call compute_d2Tgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % ng , this % Wc , d2Tgc , dTgc , Tgc ) else call compute_d2Tgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % ng , d2Tgc , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative2_scalar ( this , Xt , d2Tgc , dTgc , Tgc ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: dTgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:) if ( this % is_rational ()) then ! NURBS call compute_d2Tgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % Wc , d2Tgc , dTgc , Tgc ) else call compute_d2Tgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , d2Tgc , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine basis_vector ( this , res1 , res2 , res3 , Xt1 , Xt2 , Xt3 , Tgc ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), optional :: res1 , res2 , res3 real ( rk ), intent ( in ), contiguous , optional :: Xt1 (:), Xt2 (:), Xt3 (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) integer :: i real ( rk ), allocatable :: Xt (:,:) ! Set parameter values if ( present ( Xt1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) this % Xt1 = Xt1 elseif ( present ( res1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) allocate ( this % Xt1 ( res1 )) this % Xt1 = [( real ( i - 1 , rk ) / real ( res1 - 1 , rk ), i = 1 , res1 )] ! else ! this%Xt1 = this%Xt1 end if ! Set parameter values if ( present ( Xt2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) this % Xt2 = Xt2 elseif ( present ( res2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) allocate ( this % Xt2 ( res2 )) this % Xt2 = [( real ( i - 1 , rk ) / real ( res2 - 1 , rk ), i = 1 , res2 )] ! else ! this%Xt2 = this%Xt2 end if ! Set parameter values if ( present ( Xt3 )) then if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) this % Xt3 = Xt3 elseif ( present ( res3 )) then if ( allocated ( this % Xt3 )) deallocate ( this % Xt3 ) allocate ( this % Xt3 ( res3 )) this % Xt3 = [( real ( i - 1 , rk ) / real ( res3 - 1 , rk ), i = 1 , res3 )] ! else ! this%Xt3 = this%Xt3 end if ! Set number of geometry points this % ng ( 1 ) = size ( this % Xt1 , 1 ) this % ng ( 2 ) = size ( this % Xt2 , 1 ) this % ng ( 3 ) = size ( this % Xt3 , 1 ) call ndgrid ( this % Xt1 , this % Xt2 , this % Xt3 , Xt ) if ( this % is_rational ()) then ! NURBS Tgc = compute_Tgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % ng , this % Wc ) else Tgc = compute_Tgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % ng ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine basis_scalar ( this , Xt , Tgc ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) if ( this % is_rational ()) then ! NURBS Tgc = compute_Tgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc , this % Wc ) else Tgc = compute_Tgc ( Xt , this % knot1 , this % knot2 , this % knot3 , this % degree , this % nc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine insert_knots ( this , dir , Xth , r ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ) :: dir real ( rk ), intent ( in ), contiguous :: Xth (:) integer , intent ( in ), contiguous :: r (:) integer :: k , i , s , dim , j , n_new real ( rk ), allocatable :: Xc (:,:), Xcw (:,:), Xcw_new (:,:), Xc_new (:,:), Wc_new (:), knot_new (:) real ( rk ), allocatable :: Xc4 (:,:,:,:) if ( dir == 1 ) then ! direction 1 if ( allocated ( this % Wc )) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 1 ) - 1 , this % degree ( 1 ), Xth ( i ), this % knot1 ) if ( this % knot1 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot1 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xcw = reshape ( Xcw ,[ this % nc ( 1 ), this % nc ( 2 ) * this % nc ( 3 ) * ( dim + 1 )]) call insert_knot_A_5_1 (& this % degree ( 1 ),& this % knot1 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xcw_new ) Xcw_new = reshape ( Xcw_new ,[( n_new + 1 ) * this % nc ( 2 ) * this % nc ( 3 ), dim + 1 ]) allocate ( Xc_new ( 1 :( n_new + 1 ) * this % nc ( 2 ) * this % nc ( 3 ), 1 : dim )) allocate ( Wc_new ( 1 :( n_new + 1 ) * this % nc ( 2 ) * this % nc ( 3 ))) do j = 1 , ( n_new + 1 ) * this % nc ( 2 ) * this % nc ( 3 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 1 ) - 1 , this % degree ( 1 ), Xth ( i ), this % knot1 ) if ( this % knot1 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot1 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) Xc = reshape ( this % Xc ,[ this % nc ( 1 ), this % nc ( 2 ) * this % nc ( 3 ) * dim ]) call insert_knot_A_5_1 (& this % degree ( 1 ),& this % knot1 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xc_new ) Xc_new = reshape ( Xc_new ,[( n_new + 1 ) * this % nc ( 2 ) * this % nc ( 3 ), dim ]) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ), Xc = Xc_new ) end do end if elseif ( dir == 2 ) then ! direction 2 if ( allocated ( this % Wc )) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 2 ) - 1 , this % degree ( 2 ), Xth ( i ), this % knot2 ) if ( this % knot2 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot2 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc4 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 2 ), this % nc ( 1 ), this % nc ( 3 ), dim + 1 ], order = [ 2 , 1 , 3 , 4 ]) Xcw = reshape ( Xc4 ,[ this % nc ( 2 ), this % nc ( 1 ) * this % nc ( 3 ) * ( dim + 1 )]) call insert_knot_A_5_1 (& this % degree ( 2 ),& this % knot2 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xcw_new ) Xc4 = reshape ( Xcw_new , [ n_new + 1 , this % nc ( 1 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), n_new + 1 , this % nc ( 3 ), dim + 1 ], order = [ 2 , 1 , 3 , 4 ]) Xcw_new = reshape ( Xc4 ,[ this % nc ( 1 ) * ( n_new + 1 ) * this % nc ( 3 ), dim + 1 ]) allocate ( Xc_new ( 1 : this % nc ( 1 ) * ( n_new + 1 ) * this % nc ( 3 ), 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 1 ) * ( n_new + 1 ) * this % nc ( 3 ))) do j = 1 , this % nc ( 1 ) * ( n_new + 1 ) * this % nc ( 3 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , knot3 = this % get_knot ( 3 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 2 ) - 1 , this % degree ( 2 ), Xth ( i ), this % knot2 ) if ( this % knot2 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot2 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) Xc4 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 2 ), this % nc ( 1 ), this % nc ( 3 ), dim ], order = [ 2 , 1 , 3 , 4 ]) Xc = reshape ( Xc4 ,[ this % nc ( 2 ), this % nc ( 1 ) * this % nc ( 3 ) * dim ]) call insert_knot_A_5_1 (& this % degree ( 2 ),& this % knot2 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xc_new ) Xc4 = reshape ( Xc_new , [ n_new + 1 , this % nc ( 1 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), n_new + 1 , this % nc ( 3 ), dim ], order = [ 2 , 1 , 3 , 4 ]) Xc_new = reshape ( Xc4 ,[ this % nc ( 1 ) * ( n_new + 1 ) * this % nc ( 3 ), dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , knot3 = this % get_knot ( 3 ), Xc = Xc_new ) end do end if elseif ( dir == 3 ) then ! direction 3 if ( allocated ( this % Wc )) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 3 ) - 1 , this % degree ( 3 ), Xth ( i ), this % knot3 ) if ( this % knot3 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot3 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc4 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 3 ), this % nc ( 2 ), this % nc ( 1 ), dim + 1 ], order = [ 3 , 2 , 1 , 4 ]) Xcw = reshape ( Xc4 ,[ this % nc ( 3 ), this % nc ( 2 ) * this % nc ( 1 ) * ( dim + 1 )]) call insert_knot_A_5_1 (& this % degree ( 3 ),& this % knot3 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xcw_new ) Xc4 = reshape ( Xcw_new , [ n_new + 1 , this % nc ( 2 ), this % nc ( 1 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), this % nc ( 2 ), n_new + 1 , dim + 1 ], order = [ 3 , 2 , 1 , 4 ]) Xcw_new = reshape ( Xc4 ,[ this % nc ( 1 ) * this % nc ( 2 ) * ( n_new + 1 ), dim + 1 ]) allocate ( Xc_new ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * ( n_new + 1 ), 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * ( n_new + 1 ))) do j = 1 , this % nc ( 1 ) * this % nc ( 2 ) * ( n_new + 1 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = knot_new , Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 3 ) - 1 , this % degree ( 3 ), Xth ( i ), this % knot3 ) if ( this % knot3 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot3 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) Xc4 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 3 ), this % nc ( 2 ), this % nc ( 1 ), dim ], order = [ 3 , 2 , 1 , 4 ]) Xc = reshape ( Xc4 ,[ this % nc ( 3 ), this % nc ( 2 ) * this % nc ( 1 ) * dim ]) call insert_knot_A_5_1 (& this % degree ( 3 ),& this % knot3 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xc_new ) Xc4 = reshape ( Xc_new , [ n_new + 1 , this % nc ( 2 ), this % nc ( 1 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), this % nc ( 2 ), n_new + 1 , dim ], order = [ 3 , 2 , 1 , 4 ]) Xc_new = reshape ( Xc4 , [ this % nc ( 1 ) * this % nc ( 2 ) * ( n_new + 1 ), dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = knot_new , Xc = Xc_new ) end do end if else error stop 'Invalid direction.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine elevate_degree ( this , dir , t ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ) :: dir integer , intent ( in ) :: t real ( rk ), allocatable :: Xc (:,:), Xcw (:,:), Xcw_new (:,:), Xc_new (:,:), Wc_new (:), knot_new (:) integer :: nc_new , dim , j real ( rk ), allocatable :: Xc4 (:,:,:,:) if ( dir == 1 ) then ! direction 1 if ( allocated ( this % Wc )) then ! NURBS dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xcw = reshape ( Xcw ,[ this % nc ( 1 ), this % nc ( 2 ) * this % nc ( 3 ) * ( dim + 1 )], order = [ 1 , 2 ]) call elevate_degree_A_5_9 ( t , this % knot1 , this % degree ( 1 ), Xcw , nc_new , knot_new , Xcw_new ) Xcw_new = reshape ( Xcw_new ,[ nc_new * this % nc ( 2 ) * this % nc ( 3 ), dim + 1 ], order = [ 1 , 2 ]) allocate ( Xc_new ( 1 : nc_new * this % nc ( 2 ) * this % nc ( 3 ), 1 : dim )) allocate ( Wc_new ( 1 : nc_new * this % nc ( 2 ) * this % nc ( 3 ))) do j = 1 , nc_new * this % nc ( 2 ) * this % nc ( 3 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) else ! B-Spline dim = size ( this % Xc , 2 ) Xc = reshape ( this % Xc ,[ this % nc ( 1 ), this % nc ( 2 ) * this % nc ( 3 ) * dim ], order = [ 1 , 2 ]) call elevate_degree_A_5_9 ( t , this % knot1 , this % degree ( 1 ), Xc , nc_new , knot_new , Xc_new ) Xc_new = reshape ( Xc_new ,[ nc_new * this % nc ( 2 ) * this % nc ( 3 ), dim ], order = [ 1 , 2 ]) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ), Xc = Xc_new ) end if elseif ( dir == 2 ) then ! direction 2 if ( allocated ( this % Wc )) then ! NURBS dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc4 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 2 ), this % nc ( 1 ), this % nc ( 3 ), dim + 1 ], order = [ 2 , 1 , 3 , 4 ]) Xcw = reshape ( Xc4 ,[ this % nc ( 2 ), this % nc ( 1 ) * this % nc ( 3 ) * ( dim + 1 )]) call elevate_degree_A_5_9 ( t , this % knot2 , this % degree ( 2 ), Xcw , nc_new , knot_new , Xcw_new ) Xc4 = reshape ( Xcw_new , [ nc_new , this % nc ( 1 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), nc_new , this % nc ( 3 ), dim + 1 ], order = [ 2 , 1 , 3 , 4 ]) Xcw_new = reshape ( Xc4 ,[ this % nc ( 1 ) * nc_new * this % nc ( 3 ), dim + 1 ]) allocate ( Xc_new ( 1 : this % nc ( 1 ) * nc_new * this % nc ( 3 ), 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 1 ) * nc_new * this % nc ( 3 ))) do j = 1 , this % nc ( 1 ) * nc_new * this % nc ( 3 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , knot3 = this % get_knot ( 3 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) else ! B-Spline dim = size ( this % Xc , 2 ) Xc4 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 2 ), this % nc ( 1 ), this % nc ( 3 ), dim ], order = [ 2 , 1 , 3 , 4 ]) Xc = reshape ( Xc4 ,[ this % nc ( 2 ), this % nc ( 1 ) * this % nc ( 3 ) * dim ]) call elevate_degree_A_5_9 ( t , this % knot2 , this % degree ( 2 ), Xc , nc_new , knot_new , Xc_new ) Xc4 = reshape ( Xc_new , [ nc_new , this % nc ( 1 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), nc_new , this % nc ( 3 ), dim ], order = [ 2 , 1 , 3 , 4 ]) Xc_new = reshape ( Xc4 ,[ this % nc ( 1 ) * nc_new * this % nc ( 3 ), dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , knot3 = this % get_knot ( 3 ), Xc = Xc_new ) end if elseif ( dir == 3 ) then ! direction 3 if ( allocated ( this % Wc )) then ! NURBS dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc4 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 3 ), this % nc ( 2 ), this % nc ( 1 ), dim + 1 ], order = [ 3 , 2 , 1 , 4 ]) Xcw = reshape ( Xc4 ,[ this % nc ( 3 ), this % nc ( 2 ) * this % nc ( 1 ) * ( dim + 1 )]) call elevate_degree_A_5_9 ( t , this % knot3 , this % degree ( 3 ), Xcw , nc_new , knot_new , Xcw_new ) Xc4 = reshape ( Xcw_new , [ nc_new , this % nc ( 2 ), this % nc ( 1 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), this % nc ( 2 ), nc_new , dim + 1 ], order = [ 3 , 2 , 1 , 4 ]) Xcw_new = reshape ( Xc4 ,[ this % nc ( 1 ) * this % nc ( 2 ) * nc_new , dim + 1 ]) allocate ( Xc_new ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * nc_new , 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * nc_new )) do j = 1 , this % nc ( 1 ) * this % nc ( 2 ) * nc_new Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = knot_new , Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) else ! B-Spline dim = size ( this % Xc , 2 ) Xc4 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 3 ), this % nc ( 2 ), this % nc ( 1 ), dim ], order = [ 3 , 2 , 1 , 4 ]) Xc = reshape ( Xc4 ,[ this % nc ( 3 ), this % nc ( 2 ) * this % nc ( 1 ) * dim ]) call elevate_degree_A_5_9 ( t , this % knot3 , this % degree ( 3 ), Xc , nc_new , knot_new , Xc_new ) Xc4 = reshape ( Xc_new , [ nc_new , this % nc ( 2 ), this % nc ( 1 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), this % nc ( 2 ), nc_new , dim ], order = [ 3 , 2 , 1 , 4 ]) Xc_new = reshape ( Xc4 ,[ this % nc ( 1 ) * this % nc ( 2 ) * nc_new , dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = knot_new , Xc = Xc_new ) end if else error stop 'Invalid direction.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function is_rational ( this ) result ( r ) class ( nurbs_volume ), intent ( in ) :: this logical :: r r = . false . if ( allocated ( this % Wc )) then if ( any ( this % Wc /= this % Wc ( 1 ))) then r = . true . end if end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem_Xc_vis ( this , elemConn ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn_Xc_vis )) deallocate ( this % elemConn_Xc_vis ) this % elemConn_Xc_vis = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem_Xg_vis ( this , elemConn ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn_Xg_vis )) deallocate ( this % elemConn_Xg_vis ) this % elemConn_Xg_vis = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem ( this , elemConn ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn )) deallocate ( this % elemConn ) this % elemConn = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem_Xc_vis ( this ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn_Xc_vis end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem_Xg_vis ( this ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn_Xg_vis end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem ( this ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_hexahedron ( this , L , nc , Wc ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: L (:) integer , intent ( in ), contiguous :: nc (:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( present ( Wc )) then call this % set ( nc , hexahedron_Xc ( L , nc ), Wc ) else call this % set ( nc , hexahedron_Xc ( L , nc )) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine put_to_nurbs ( this , X , elemConn ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: X (:,:) integer , intent ( in ), contiguous :: elemConn (:,:) integer :: i real ( rk ), allocatable :: Tgc1 (:), Tgc2 (:), Tgc3 (:), Tgc (:) real ( rk ), allocatable :: Xt (:,:) real ( rk ) :: min_X1 , max_X1 , min_X2 , max_X2 , min_X3 , max_X3 ! Assuming knot vectors are in the range [0,1] ! Normalize the X coordinates to the range [0,1] allocate ( Xt ( size ( X , 1 ), size ( X , 2 ))) min_X1 = minval ( X (:, 1 )) max_X1 = maxval ( X (:, 1 )) min_X2 = minval ( X (:, 2 )) max_X2 = maxval ( X (:, 2 )) min_X3 = minval ( X (:, 3 )) max_X3 = maxval ( X (:, 3 )) Xt (:, 1 ) = ( X (:, 1 ) - min_X1 ) / ( max_X1 - min_X1 ) Xt (:, 2 ) = ( X (:, 2 ) - min_X2 ) / ( max_X2 - min_X2 ) Xt (:, 3 ) = ( X (:, 3 ) - min_X3 ) / ( max_X3 - min_X3 ) allocate ( this % Xg ( size ( Xt , 1 ), size ( this % Xc , 2 ))) allocate ( Tgc ( this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ))) if ( allocated ( this % Wc )) then ! NURBS volume do i = 1 , size ( Xt , 1 ) Tgc1 = basis_bspline ( Xt ( i , 1 ), this % knot1 , this % nc ( 1 ), this % degree ( 1 )) Tgc2 = basis_bspline ( Xt ( i , 2 ), this % knot2 , this % nc ( 2 ), this % degree ( 2 )) Tgc3 = basis_bspline ( Xt ( i , 3 ), this % knot3 , this % nc ( 3 ), this % degree ( 3 )) Tgc = kron ( Tgc3 , kron ( Tgc2 , Tgc1 )) Tgc = Tgc * ( this % Wc / ( dot_product ( Tgc , this % Wc ))) this % Xg ( i ,:) = matmul ( Tgc , this % Xc ) end do else ! B-Spline volume do i = 1 , size ( Xt , 1 ) Tgc1 = basis_bspline ( Xt ( i , 1 ), this % knot1 , this % nc ( 1 ), this % degree ( 1 )) Tgc2 = basis_bspline ( Xt ( i , 2 ), this % knot2 , this % nc ( 2 ), this % degree ( 2 )) Tgc3 = basis_bspline ( Xt ( i , 3 ), this % knot3 , this % nc ( 3 ), this % degree ( 3 )) Tgc = kron ( Tgc3 , kron ( Tgc2 , Tgc1 )) this % Xg ( i ,:) = matmul ( Tgc , this % Xc ) end do end if call this % set_elem_Xg_vis ( elemConn ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine remove_knots ( this , dir , Xth , r ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ) :: dir real ( rk ), intent ( in ), contiguous :: Xth (:) integer , intent ( in ), contiguous :: r (:) integer :: k , i , s , dim , j , nc_new , t real ( rk ), allocatable :: Xc (:,:), Xcw (:,:), Xcw_new (:,:), Xc_new (:,:), Wc_new (:), knot_new (:) real ( rk ), allocatable :: Xc4 (:,:,:,:) if ( dir == 1 ) then ! direction 1 if ( allocated ( this % Wc )) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 1 ) - 1 , this % degree ( 1 ), Xth ( i ), this % knot1 ) if ( this % knot1 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot1 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xcw = reshape ( Xcw ,[ this % nc ( 1 ), this % nc ( 2 ) * this % nc ( 3 ) * ( dim + 1 )], order = [ 1 , 2 ]) call remove_knots_A_5_8 (& this % degree ( 1 ),& this % knot1 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xcw_new ) if ( allocated ( Xcw )) deallocate ( Xcw ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) Xcw_new = reshape ( Xcw_new ,[( nc_new ) * this % nc ( 2 ) * this % nc ( 3 ), dim + 1 ], order = [ 1 , 2 ]) allocate ( Xc_new ( 1 :( nc_new ) * this % nc ( 2 ) * this % nc ( 3 ), 1 : dim )) allocate ( Wc_new ( 1 :( nc_new ) * this % nc ( 2 ) * this % nc ( 3 ))) do j = 1 , ( nc_new ) * this % nc ( 2 ) * this % nc ( 3 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw_new , Xc_new , Wc_new ) end if end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 1 ) - 1 , this % degree ( 1 ), Xth ( i ), this % knot1 ) if ( this % knot1 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot1 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) Xc = reshape ( this % Xc ,[ this % nc ( 1 ), this % nc ( 2 ) * this % nc ( 3 ) * dim ]) call remove_knots_A_5_8 (& this % degree ( 1 ),& this % knot1 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xc_new ) if ( allocated ( Xc )) deallocate ( Xc ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) Xc_new = reshape ( Xc_new ,[( nc_new ) * this % nc ( 2 ) * this % nc ( 3 ), dim ]) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), knot3 = this % get_knot ( 3 ), Xc = Xc_new ) end if end do end if elseif ( dir == 2 ) then ! direction 2 if ( allocated ( this % Wc )) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 2 ) - 1 , this % degree ( 2 ), Xth ( i ), this % knot2 ) if ( this % knot2 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot2 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc4 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 2 ), this % nc ( 1 ), this % nc ( 3 ), dim + 1 ], order = [ 2 , 1 , 3 , 4 ]) Xcw = reshape ( Xc4 ,[ this % nc ( 2 ), this % nc ( 1 ) * this % nc ( 3 ) * ( dim + 1 )]) call remove_knots_A_5_8 (& this % degree ( 2 ),& this % knot2 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xcw_new ) if ( allocated ( Xcw )) deallocate ( Xcw ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) Xc4 = reshape ( Xcw_new , [ nc_new , this % nc ( 1 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), nc_new , this % nc ( 3 ), dim + 1 ], order = [ 2 , 1 , 3 , 4 ]) Xcw_new = reshape ( Xc4 ,[ this % nc ( 1 ) * ( nc_new ) * this % nc ( 3 ), dim + 1 ]) allocate ( Xc_new ( 1 : this % nc ( 1 ) * ( nc_new ) * this % nc ( 3 ), 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 1 ) * ( nc_new ) * this % nc ( 3 ))) do j = 1 , this % nc ( 1 ) * ( nc_new ) * this % nc ( 3 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , knot3 = this % get_knot ( 3 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw_new , Xc_new , Wc_new ) end if end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 2 ) - 1 , this % degree ( 2 ), Xth ( i ), this % knot2 ) if ( this % knot2 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot2 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) Xc4 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 2 ), this % nc ( 1 ), this % nc ( 3 ), dim ], order = [ 2 , 1 , 3 , 4 ]) Xc = reshape ( Xc4 , [ this % nc ( 2 ), this % nc ( 1 ) * this % nc ( 3 ) * dim ]) call remove_knots_A_5_8 (& this % degree ( 2 ),& this % knot2 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xc_new ) if ( allocated ( Xc )) deallocate ( Xc ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) Xc4 = reshape ( Xc_new , [ nc_new , this % nc ( 1 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), nc_new , this % nc ( 3 ), dim ], order = [ 2 , 1 , 3 , 4 ]) Xc_new = reshape ( Xc4 , [ this % nc ( 1 ) * ( nc_new ) * this % nc ( 3 ), dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , knot3 = this % get_knot ( 3 ), Xc = Xc_new ) end if end do end if elseif ( dir == 3 ) then ! direction 3 if ( allocated ( this % Wc )) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 3 ) - 1 , this % degree ( 3 ), Xth ( i ), this % knot3 ) if ( this % knot3 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot3 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc4 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 3 ), this % nc ( 2 ), this % nc ( 1 ), dim + 1 ], order = [ 3 , 2 , 1 , 4 ]) Xcw = reshape ( Xc4 , [ this % nc ( 3 ), this % nc ( 2 ) * this % nc ( 1 ) * ( dim + 1 )]) call remove_knots_A_5_8 (& this % degree ( 3 ),& this % knot3 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xcw_new ) if ( allocated ( Xcw )) deallocate ( Xcw ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) Xc4 = reshape ( Xcw_new , [ nc_new , this % nc ( 2 ), this % nc ( 1 ), dim + 1 ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), this % nc ( 2 ), nc_new , dim + 1 ], order = [ 3 , 2 , 1 , 4 ]) Xcw_new = reshape ( Xc4 , [ this % nc ( 1 ) * this % nc ( 2 ) * ( nc_new ), dim + 1 ]) allocate ( Xc_new ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * ( nc_new ), 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * ( nc_new ))) do j = 1 , this % nc ( 1 ) * this % nc ( 2 ) * ( nc_new ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = knot_new , Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw_new , Xc_new , Wc_new ) end if end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 3 ) - 1 , this % degree ( 3 ), Xth ( i ), this % knot3 ) if ( this % knot3 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot3 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) Xc4 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 3 ), this % nc ( 2 ), this % nc ( 1 ), dim ], order = [ 3 , 2 , 1 , 4 ]) Xc = reshape ( Xc4 , [ this % nc ( 3 ), this % nc ( 2 ) * this % nc ( 1 ) * dim ]) call remove_knots_A_5_8 (& this % degree ( 3 ),& this % knot3 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xc_new ) if ( allocated ( Xc )) deallocate ( Xc ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) Xc4 = reshape ( Xc_new , [ nc_new , this % nc ( 2 ), this % nc ( 1 ), dim ]) Xc4 = reshape ( Xc4 , [ this % nc ( 1 ), this % nc ( 2 ), nc_new , dim ], order = [ 3 , 2 , 1 , 4 ]) Xc_new = reshape ( Xc4 , [ this % nc ( 1 ) * this % nc ( 2 ) * ( nc_new ), dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), knot3 = knot_new , Xc = Xc_new ) end if end do end if else error stop 'Invalid direction.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem ( this ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) call elemConn_Cn ( this % nc ( 1 ), this % nc ( 2 ), this % nc ( 3 ),& this % degree ( 1 ), this % degree ( 2 ), this % degree ( 3 ),& unique ( this % knot1 ), unique ( this % knot2 ), unique ( this % knot3 ),& this % get_multiplicity ( 1 ), this % get_multiplicity ( 2 ), this % get_multiplicity ( 3 ),& elemConn ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine rotate_Xc ( this , alpha , beta , theta ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ) :: alpha , beta , theta integer :: i do i = 1 , this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) this % Xc ( i , :) = matmul ( rotation ( alpha , beta , theta ), this % Xc ( i , :)) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine rotate_Xg ( this , alpha , beta , theta ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ) :: alpha , beta , theta integer :: i do i = 1 , this % ng ( 1 ) * this % ng ( 2 ) * this % ng ( 3 ) this % Xg ( i , :) = matmul ( rotation ( alpha , beta , theta ), this % Xg ( i , :)) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine translate_Xc ( this , vec ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ) :: vec (:) integer :: i do i = 1 , this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) this % Xc ( i , :) = this % Xc ( i , :) + vec end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine translate_Xg ( this , vec ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ) :: vec (:) integer :: i do i = 1 , this % ng ( 1 ) * this % ng ( 2 ) * this % ng ( 3 ) this % Xg ( i , :) = this % Xg ( i , :) + vec end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine show ( this , vtkfile_Xc , vtkfile_Xg ) class ( nurbs_volume ), intent ( inout ) :: this character ( len =* ), intent ( in ) :: vtkfile_Xc , vtkfile_Xg character ( len = 3000 ) :: pyvista_script pyvista_script = & \"import pyvista as pv\" // achar ( 10 ) // & \"pv.global_theme.color = 'white'\" // achar ( 10 ) // & \"Xc = pv.read('\" // trim ( vtkfile_Xc ) // \"')\" // achar ( 10 ) // & \"Xg = pv.read('\" // trim ( vtkfile_Xg ) // \"')\" // achar ( 10 ) // & \"p = pv.Plotter(lighting='light kit')\" // achar ( 10 ) // & \"actor_Xcp = p.add_mesh(\" // achar ( 10 ) // & \"    Xc,\" // achar ( 10 ) // & \"    style='points',\" // achar ( 10 ) // & \"    point_size=10,\" // achar ( 10 ) // & \"    color='red',\" // achar ( 10 ) // & \"    render_points_as_spheres=True,\" // achar ( 10 ) // & \"    opacity=0.5,\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"actor_Xcw = p.add_mesh(\" // achar ( 10 ) // & \"    Xc,\" // achar ( 10 ) // & \"    show_edges=True,\" // achar ( 10 ) // & \"    color='yellow',\" // achar ( 10 ) // & \"    line_width=3,\" // achar ( 10 ) // & \"    style='wireframe',\" // achar ( 10 ) // & \"    opacity=0.2\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"actor_Xg = p.add_mesh(\" // achar ( 10 ) // & \"    Xg,\" // achar ( 10 ) // & \"    show_edges=False,\" // achar ( 10 ) // & \"    color='cyan',\" // achar ( 10 ) // & \"    line_width=7,\" // achar ( 10 ) // & \"    metallic=0.6,\" // achar ( 10 ) // & \"    pbr=True,\" // achar ( 10 ) // & \"    split_sharp_edges=True,\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_axes(interactive=False)\" // achar ( 10 ) // & \"def point_picker_callback(point):\" // achar ( 10 ) // & \"    mesh = Xc\" // achar ( 10 ) // & \"    point_id = mesh.find_closest_point(point)\" // achar ( 10 ) // & \"    point_coords = mesh.points[point_id]\" // achar ( 10 ) // & \"    label = f'ID: {point_id + 1}\\n({point_coords[0]:.3f}, {point_coords[1]:.3f}, {point_coords[2]:.3f})'\" // achar ( 10 ) // & \"    p.add_point_labels(\" // achar ( 10 ) // & \"        [point_coords],\" // achar ( 10 ) // & \"        [label],\" // achar ( 10 ) // & \"        font_size=14,\" // achar ( 10 ) // & \"        text_color='black',\" // achar ( 10 ) // & \"        show_points=False,\" // achar ( 10 ) // & \"        fill_shape=False,\" // achar ( 10 ) // & \"        shape=None,\" // achar ( 10 ) // & \"    )\" // achar ( 10 ) // & \"picker = p.enable_point_picking(callback=point_picker_callback, show_message=False)\" // achar ( 10 ) // & \"window_size = p.window_size\" // achar ( 10 ) // & \"y_pos = window_size[1]\" // achar ( 10 ) // & \"def Xcp_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xcp.SetVisibility(flag)\" // achar ( 10 ) // & \"def Xcw_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xcw.SetVisibility(flag)\" // achar ( 10 ) // & \"def Xg_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xg.SetVisibility(flag)\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xcp_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='red',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 1 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xcw_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='yellow',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 2 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xg_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='cyan',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 3 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xc (Points)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 1 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xc (Control geometry)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 2 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xg (Geometry)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 3 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text('ForCAD', position=(0.0, 10.0), font_size=14, color='black', font='times')\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'https://github.com/gha3mi/forcad',\" // achar ( 10 ) // & \"    position=(0.0, 0.0),\" // achar ( 10 ) // & \"    font_size=7,\" // achar ( 10 ) // & \"    color='blue',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.show(title='ForCAD', interactive=True)\" call execute_command_line ( 'python -c \"' // trim ( adjustl ( pyvista_script )) // '\"' ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_ring ( this , center , radius1 , radius2 , length ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius1 , radius2 , length real ( rk ), allocatable :: Xc (:,:), Wc (:), knot1 (:), knot2 (:), knot3 (:) integer :: i ! Define control points for ring allocate ( Xc ( 28 , 3 )) Xc ( 1 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 3 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 6 ,:) = [ 1.0_rk , - sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 7 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 1 : 7 , 1 : 2 ) = Xc ( 1 : 7 , 1 : 2 ) * radius1 Xc ( 8 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 9 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 10 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 11 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 12 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 13 ,:) = [ 1.0_rk , - sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 14 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 8 : 14 , 1 : 2 ) = Xc ( 8 : 14 , 1 : 2 ) * radius2 Xc ( 15 ,:) = [ 1.0_rk , 0.0_rk , length ] Xc ( 16 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), length ] Xc ( 17 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , length ] Xc ( 18 ,:) = [ - 2.0_rk , 0.0_rk , length ] Xc ( 19 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , length ] Xc ( 20 ,:) = [ 1.0_rk , - sqrt ( 3.0_rk ), length ] Xc ( 21 ,:) = [ 1.0_rk , 0.0_rk , length ] Xc ( 15 : 21 , 1 : 2 ) = Xc ( 15 : 21 , 1 : 2 ) * radius1 Xc ( 22 ,:) = [ 1.0_rk , 0.0_rk , length ] Xc ( 23 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), length ] Xc ( 24 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , length ] Xc ( 25 ,:) = [ - 2.0_rk , 0.0_rk , length ] Xc ( 26 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , length ] Xc ( 27 ,:) = [ 1.0_rk , - sqrt ( 3.0_rk ), length ] Xc ( 28 ,:) = [ 1.0_rk , 0.0_rk , length ] Xc ( 22 : 28 , 1 : 2 ) = Xc ( 22 : 28 , 1 : 2 ) * radius2 ! Translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) end do ! Define weights for the control points Wc = [ 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ,& 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ,& 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ,& 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ] ! Define knot vector knot1 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 3.0_rk , 1.0_rk / 3.0_rk , 2.0_rk / 3.0_rk , 2.0_rk / 3.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] knot3 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot1 , knot2 , knot3 , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_C ( this , center , radius1 , radius2 , length ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius1 , radius2 , length real ( rk ), allocatable :: Xc (:,:), Wc (:), knot1 (:), knot2 (:), knot3 (:) integer :: i ! Define control points for C-shape allocate ( Xc ( 20 , 3 )) Xc ( 1 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 3 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 1 : 5 , 1 : 2 ) = Xc ( 1 : 5 , 1 : 2 ) * radius1 Xc ( 6 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 7 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 8 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 9 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 10 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 6 : 10 , 1 : 2 ) = Xc ( 6 : 10 , 1 : 2 ) * radius2 Xc ( 11 ,:) = [ 1.0_rk , 0.0_rk , length ] Xc ( 12 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), length ] Xc ( 13 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , length ] Xc ( 14 ,:) = [ - 2.0_rk , 0.0_rk , length ] Xc ( 15 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , length ] Xc ( 11 : 15 , 1 : 2 ) = Xc ( 11 : 15 , 1 : 2 ) * radius1 Xc ( 16 ,:) = [ 1.0_rk , 0.0_rk , length ] Xc ( 17 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), length ] Xc ( 18 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , length ] Xc ( 19 ,:) = [ - 2.0_rk , 0.0_rk , length ] Xc ( 20 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , length ] Xc ( 16 : 20 , 1 : 2 ) = Xc ( 16 : 20 , 1 : 2 ) * radius2 ! Translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) end do ! Define weights for the control points Wc = [ 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ,& 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ,& 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ,& 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ] ! Define knot vector knot1 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 2.0_rk , 1.0_rk / 2.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] knot3 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot1 , knot2 , knot3 , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_half_ring ( this , center , radius1 , radius2 , length ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius1 , radius2 , length real ( rk ), allocatable :: Xc (:,:), Wc (:), knot1 (:), knot2 (:), knot3 (:) integer :: i ! Define control points for half ring allocate ( Xc ( 20 , 3 )) Xc ( 1 ,:) = [ 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 3 ,:) = [ 0.0_rk , 0.5_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 1 : 5 , 1 : 2 ) = Xc ( 1 : 5 , 1 : 2 ) * radius1 Xc ( 6 ,:) = [ 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 7 ,:) = [ 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 8 ,:) = [ 0.0_rk , 0.5_rk , 0.0_rk ] Xc ( 9 ,:) = [ - 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 10 ,:) = [ - 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 6 : 10 , 1 : 2 ) = Xc ( 6 : 10 , 1 : 2 ) * radius2 Xc ( 11 ,:) = [ 0.5_rk , 0.0_rk , length ] Xc ( 12 ,:) = [ 0.5_rk , 0.5_rk , length ] Xc ( 13 ,:) = [ 0.0_rk , 0.5_rk , length ] Xc ( 14 ,:) = [ - 0.5_rk , 0.5_rk , length ] Xc ( 15 ,:) = [ - 0.5_rk , 0.0_rk , length ] Xc ( 11 : 15 , 1 : 2 ) = Xc ( 11 : 15 , 1 : 2 ) * radius1 Xc ( 16 ,:) = [ 0.5_rk , 0.0_rk , length ] Xc ( 17 ,:) = [ 0.5_rk , 0.5_rk , length ] Xc ( 18 ,:) = [ 0.0_rk , 0.5_rk , length ] Xc ( 19 ,:) = [ - 0.5_rk , 0.5_rk , length ] Xc ( 20 ,:) = [ - 0.5_rk , 0.0_rk , length ] Xc ( 16 : 20 , 1 : 2 ) = Xc ( 16 : 20 , 1 : 2 ) * radius2 ! Translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) end do ! Define weights for the control points Wc = [ 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk ,& 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk ,& 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk ,& 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk ] ! Define knot vector knot1 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 2.0_rk , & 1.0_rk / 2.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] knot3 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot1 , knot2 , knot3 , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine nearest_point ( this , point_Xg , nearest_Xg , nearest_Xt , id ) class ( nurbs_volume ), intent ( in ) :: this real ( rk ), intent ( in ) :: point_Xg (:) real ( rk ), intent ( out ), allocatable , optional :: nearest_Xg (:) real ( rk ), intent ( out ), allocatable , optional :: nearest_Xt (:) integer , intent ( out ), optional :: id integer :: id_ real ( rk ), allocatable :: distances (:) allocate ( distances ( this % ng ( 1 ) * this % ng ( 2 ) * this % ng ( 3 ))) distances = nearest_point_help_3d ( this % ng , this % Xg , point_Xg ) id_ = minloc ( distances , dim = 1 ) if ( present ( id )) id = id_ if ( present ( nearest_Xg )) nearest_Xg = this % Xg ( id_ ,:) if ( present ( nearest_Xt )) nearest_Xt = this % Xt ( id_ ,:) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine nearest_point2 ( this , point_Xg , tol , maxit , nearest_Xt , nearest_Xg ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( in ) :: point_Xg (:) real ( rk ), intent ( in ) :: tol integer , intent ( in ) :: maxit real ( rk ), intent ( out ) :: nearest_Xt ( 3 ) real ( rk ), allocatable , intent ( out ), optional :: nearest_Xg (:) real ( rk ) :: obj , grad ( 3 ), hess ( 3 , 3 ), dk ( 3 ), alphak , tau , beta , lower_bounds ( 3 ), upper_bounds ( 3 ) real ( rk ), allocatable :: Xg (:), xk (:), Tgc (:), dTgc (:,:), d2Tgc (:,:) integer :: k , l logical :: convergenz type ( nurbs_volume ) :: copy_this k = 0 ! lower and upper bounds lower_bounds = [ minval ( this % knot1 ), minval ( this % knot2 ), minval ( this % knot3 )] upper_bounds = [ maxval ( this % knot1 ), maxval ( this % knot2 ), maxval ( this % knot3 )] ! guess initial point copy_this = this call copy_this % create ( 50 , 50 , 50 ) call copy_this % nearest_point ( point_Xg = point_Xg , nearest_Xt = xk ) call copy_this % finalize () ! Check if xk is within the knot vector range if ( xk ( 1 ) < minval ( this % knot1 )) then xk ( 1 ) = minval ( this % knot1 ) else if ( xk ( 1 ) > maxval ( this % knot1 )) then xk ( 1 ) = maxval ( this % knot1 ) end if if ( xk ( 2 ) < minval ( this % knot2 )) then xk ( 2 ) = minval ( this % knot2 ) else if ( xk ( 2 ) > maxval ( this % knot2 )) then xk ( 2 ) = maxval ( this % knot2 ) end if if ( xk ( 3 ) < minval ( this % knot3 )) then xk ( 3 ) = minval ( this % knot3 ) else if ( xk ( 3 ) > maxval ( this % knot3 )) then xk ( 3 ) = maxval ( this % knot3 ) end if convergenz = . false . allocate ( Xg ( size ( this % Xc , 2 ))) ! allocate(dTgc(size(this%Xc,1), 2)) ! allocate(d2Tgc(size(this%Xc,1), 2)) do while (. not . convergenz . and . k < maxit ) ! objection, gradient and hessian Xg = this % cmp_Xg ( xk ) call this % derivative2 ( Xt = xk , d2Tgc = d2Tgc , dTgc = dTgc , Tgc = Tgc ) ! Tgc is not needed obj = norm2 ( Xg - point_Xg ) + 0.001_rk ! add a small number to avoid division by zero grad ( 1 ) = dot_product (( Xg - point_Xg ) / obj , matmul ( dTgc (:, 1 ), this % Xc )) grad ( 2 ) = dot_product (( Xg - point_Xg ) / obj , matmul ( dTgc (:, 2 ), this % Xc )) grad ( 3 ) = dot_product (( Xg - point_Xg ) / obj , matmul ( dTgc (:, 3 ), this % Xc )) hess ( 1 , 1 ) = ( dot_product ( matmul ( dTgc (:, 1 ), this % Xc ), matmul ( dTgc (:, 1 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 1 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 1 ), this % Xc )) * grad ( 1 ) ) / obj ** 2 hess ( 2 , 1 ) = ( dot_product ( matmul ( dTgc (:, 1 ), this % Xc ), matmul ( dTgc (:, 2 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) + 1 : 2 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 1 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 2 ), this % Xc )) * grad ( 1 ) ) / obj ** 2 hess ( 3 , 1 ) = ( dot_product ( matmul ( dTgc (:, 1 ), this % Xc ), matmul ( dTgc (:, 3 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( 2 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) + 1 : 3 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 1 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 3 ), this % Xc )) * grad ( 1 ) ) / obj ** 2 hess ( 1 , 2 ) = ( dot_product ( matmul ( dTgc (:, 2 ), this % Xc ), matmul ( dTgc (:, 1 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 2 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 1 ), this % Xc )) * grad ( 2 ) ) / obj ** 2 hess ( 2 , 2 ) = ( dot_product ( matmul ( dTgc (:, 2 ), this % Xc ), matmul ( dTgc (:, 2 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) + 1 : 2 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 2 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 2 ), this % Xc )) * grad ( 2 ) ) / obj ** 2 hess ( 3 , 2 ) = ( dot_product ( matmul ( dTgc (:, 2 ), this % Xc ), matmul ( dTgc (:, 3 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( 2 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) + 1 : 3 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 2 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 3 ), this % Xc )) * grad ( 2 ) ) / obj ** 2 hess ( 1 , 3 ) = ( dot_product ( matmul ( dTgc (:, 3 ), this % Xc ), matmul ( dTgc (:, 1 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( 1 : this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 3 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 1 ), this % Xc )) * grad ( 3 ) ) / obj ** 2 hess ( 2 , 3 ) = ( dot_product ( matmul ( dTgc (:, 3 ), this % Xc ), matmul ( dTgc (:, 2 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) + 1 : 2 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 3 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 2 ), this % Xc )) * grad ( 3 ) ) / obj ** 2 hess ( 3 , 3 ) = ( dot_product ( matmul ( dTgc (:, 3 ), this % Xc ), matmul ( dTgc (:, 3 ), this % Xc )) + dot_product (( Xg - point_Xg ), & matmul ( d2Tgc ( 2 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) + 1 : 3 * this % nc ( 1 ) * this % nc ( 2 ) * this % nc ( 3 ) , 3 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 3 ), this % Xc )) * grad ( 3 ) ) / obj ** 2 ! debug print '(i3,1x,3e20.10,1x,e20.10)' , k , xk , norm2 ( grad ) if ( norm2 ( grad ) <= tol ) then convergenz = . true . nearest_Xt = xk if ( present ( nearest_Xg )) nearest_Xg = this % cmp_Xg ( nearest_Xt ) else dk = - matmul ( inv ( hess ), grad ) ! Backtracking-Armijo Line Search alphak = 1.0_rk tau = 0.5_rk ! 0 < tau  < 1 beta = 1.0e-4_rk ! 0 < beta < 1 l = 0 do while (. not . norm2 ( this % cmp_Xg ( xk + alphak * dk ) - point_Xg ) <= obj + alphak * beta * dot_product ( grad , dk ) . and . l < 50 ) alphak = tau * alphak l = l + 1 end do xk = xk + alphak * dk ! Check if xk is within the knot vector range xk = max ( min ( xk , upper_bounds ), lower_bounds ) k = k + 1 end if end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elemFace ( this , elem , face ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: elem integer , intent ( in ) :: face integer , allocatable :: elemConn (:) integer :: n ( 3 ), ii , jj , k !> number of nodes in each direction n = this % degree + 1 select case ( face ) case ( 1 ) allocate ( elemConn ( n ( 1 ) * n ( 2 ))) elemConn = this % elemConn ( elem , 1 : n ( 1 ) * n ( 2 )) case ( 2 ) allocate ( elemConn ( n ( 1 ) * n ( 2 ))) elemConn = this % elemConn ( elem , n ( 1 ) * n ( 2 ) * n ( 3 ) - n ( 1 ) * n ( 2 ) + 1 : n ( 1 ) * n ( 2 ) * n ( 3 )) case ( 3 ) allocate ( elemConn ( n ( 1 ) * n ( 3 ))) k = 0 do jj = 1 , n ( 3 ) do ii = 1 , n ( 1 ) k = k + 1 elemConn ( k ) = this % elemConn ( elem , n ( 1 ) * n ( 2 ) * jj + ii - n ( 1 ) * n ( 2 )) end do end do case ( 4 ) allocate ( elemConn ( n ( 1 ) * n ( 3 ))) k = 0 do jj = 1 , n ( 3 ) do ii = 1 , n ( 1 ) k = k + 1 elemConn ( k ) = this % elemConn ( elem , n ( 1 ) * n ( 2 ) * jj + ii - n ( 1 )) end do end do case ( 5 ) allocate ( elemConn ( n ( 2 ) * n ( 3 ))) do ii = 1 , n ( 2 ) * n ( 3 ) elemConn ( ii ) = this % elemConn ( elem , n ( 1 ) * ii - n ( 1 ) + 1 ) end do case ( 6 ) allocate ( elemConn ( n ( 2 ) * n ( 3 ))) do ii = 1 , n ( 2 ) * n ( 3 ) elemConn ( ii ) = this % elemConn ( elem , n ( 1 ) * ii ) end do end select end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elemFace_Xc_vis ( this , elem , face ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: elem integer , intent ( in ) :: face integer , allocatable :: elemConn (:) integer :: n ( 3 ), ii , jj , k !> number of nodes in each direction n = [ 2 , 2 , 2 ] select case ( face ) case ( 1 ) allocate ( elemConn ( n ( 1 ) * n ( 2 ))) elemConn = this % elemConn_Xc_vis ( elem , 1 : n ( 1 ) * n ( 2 )) case ( 2 ) allocate ( elemConn ( n ( 1 ) * n ( 2 ))) elemConn = this % elemConn_Xc_vis ( elem , n ( 1 ) * n ( 2 ) * n ( 3 ) - n ( 1 ) * n ( 2 ) + 1 : n ( 1 ) * n ( 2 ) * n ( 3 )) case ( 3 ) allocate ( elemConn ( n ( 1 ) * n ( 3 ))) k = 0 do jj = 1 , n ( 3 ) do ii = 1 , n ( 1 ) k = k + 1 elemConn ( k ) = this % elemConn_Xc_vis ( elem , n ( 1 ) * n ( 2 ) * jj + ii - n ( 1 ) * n ( 2 )) end do end do case ( 4 ) allocate ( elemConn ( n ( 1 ) * n ( 3 ))) k = 0 do jj = 1 , n ( 3 ) do ii = 1 , n ( 1 ) k = k + 1 elemConn ( k ) = this % elemConn_Xc_vis ( elem , n ( 1 ) * n ( 2 ) * jj + ii - n ( 1 )) end do end do case ( 5 ) allocate ( elemConn ( n ( 2 ) * n ( 3 ))) do ii = 1 , n ( 2 ) * n ( 3 ) elemConn ( ii ) = this % elemConn_Xc_vis ( elem , n ( 1 ) * ii - n ( 1 ) + 1 ) end do case ( 6 ) allocate ( elemConn ( n ( 2 ) * n ( 3 ))) do ii = 1 , n ( 2 ) * n ( 3 ) elemConn ( ii ) = this % elemConn_Xc_vis ( elem , n ( 1 ) * ii ) end do end select end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elemFace_Xg_vis ( this , elem , face ) result ( elemConn ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: elem integer , intent ( in ) :: face integer , allocatable :: elemConn (:) integer :: n ( 3 ), ii , jj , k !> number of nodes in each direction n = [ 2 , 2 , 2 ] select case ( face ) case ( 1 ) allocate ( elemConn ( n ( 1 ) * n ( 2 ))) elemConn = this % elemConn_Xg_vis ( elem , 1 : n ( 1 ) * n ( 2 )) case ( 2 ) allocate ( elemConn ( n ( 1 ) * n ( 2 ))) elemConn = this % elemConn_Xg_vis ( elem , n ( 1 ) * n ( 2 ) * n ( 3 ) - n ( 1 ) * n ( 2 ) + 1 : n ( 1 ) * n ( 2 ) * n ( 3 )) case ( 3 ) allocate ( elemConn ( n ( 1 ) * n ( 3 ))) k = 0 do jj = 1 , n ( 3 ) do ii = 1 , n ( 1 ) k = k + 1 elemConn ( k ) = this % elemConn_Xg_vis ( elem , n ( 1 ) * n ( 2 ) * jj + ii - n ( 1 ) * n ( 2 )) end do end do case ( 4 ) allocate ( elemConn ( n ( 1 ) * n ( 3 ))) k = 0 do jj = 1 , n ( 3 ) do ii = 1 , n ( 1 ) k = k + 1 elemConn ( k ) = this % elemConn_Xg_vis ( elem , n ( 1 ) * n ( 2 ) * jj + ii - n ( 1 )) end do end do case ( 5 ) allocate ( elemConn ( n ( 2 ) * n ( 3 ))) do ii = 1 , n ( 2 ) * n ( 3 ) elemConn ( ii ) = this % elemConn_Xg_vis ( elem , n ( 1 ) * ii - n ( 1 ) + 1 ) end do case ( 6 ) allocate ( elemConn ( n ( 2 ) * n ( 3 ))) do ii = 1 , n ( 2 ) * n ( 3 ) elemConn ( ii ) = this % elemConn_Xg_vis ( elem , n ( 1 ) * ii ) end do end select end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_degreeFace ( this , face ) result ( degree ) class ( nurbs_volume ), intent ( in ) :: this integer , intent ( in ) :: face integer :: degree ( 3 ) select case ( face ) case ( 1 ) degree = [ this % degree ( 1 ), this % degree ( 2 ), 0 ] case ( 2 ) degree = [ this % degree ( 1 ), this % degree ( 2 ), 0 ] case ( 3 ) degree = [ this % degree ( 1 ), 0 , this % degree ( 3 )] case ( 4 ) degree = [ this % degree ( 1 ), 0 , this % degree ( 3 )] case ( 5 ) degree = [ 0 , this % degree ( 2 ), this % degree ( 3 )] case ( 6 ) degree = [ 0 , this % degree ( 2 ), this % degree ( 3 )] case default error stop 'Invalid face number' end select end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine ansatz ( this , ie , ig , Tgc , dTgc_dXg , dV ) class ( nurbs_volume ), intent ( inout ) :: this integer , intent ( in ) :: ie , ig real ( rk ), intent ( out ) :: dV real ( rk ), allocatable , intent ( out ) :: Tgc (:), dTgc_dXg (:,:) real ( rk ), allocatable :: Xth (:,:), Xth_e (:,:), Xth_eT (:,:), Xc_eT (:,:), Xth1 (:), Xth2 (:), Xth3 (:), Xksi (:,:), Wksi (:) integer , allocatable :: elem_th (:,:), elem_c (:,:), elem_ce (:) type ( nurbs_volume ) :: th , th_e real ( rk ), allocatable :: dTtth_dXksi (:,:), Ttth (:), dTgc_dXt (:,:), Xt (:), dXt_dXksi (:,:), dXg_dXt (:,:) real ( rk ), allocatable :: dXg_dXksi (:,:) !! Jacobian matrix real ( rk ) :: det_dXg_dXksi !! Determinant of the Jacobian matrix call gauss_leg ([ 0.0_rk , 1.0_rk ], [ 0.0_rk , 1.0_rk ], [ 0.0_rk , 1.0_rk ], this % degree , Xksi , Wksi ) Xth1 = unique ( this % knot1 ) Xth2 = unique ( this % knot2 ) Xth3 = unique ( this % knot3 ) call ndgrid ( Xth1 , Xth2 , Xth3 , Xth ) call th % set ([ 0.0_rk , Xth1 , 1.0_rk ], [ 0.0_rk , Xth2 , 1.0_rk ], [ 0.0_rk , Xth3 , 1.0_rk ], Xth ) elem_th = th % cmp_elem () elem_c = this % cmp_elem () Xth_e = Xth ( elem_th ( ie ,:),:) call th_e % set ([ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ], [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ], [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ], Xth_e ) Xth_eT = transpose ( Xth_e ) elem_ce = elem_c ( ie ,:) Xc_eT = transpose ( this % Xc ( elem_ce ,:)) call th_e % derivative ( Xksi ( ig ,:), dTtth_dXksi , Ttth ) Xt = matmul ( Xth_eT , Ttth ) dXt_dXksi = matmul ( Xth_eT , dTtth_dXksi ) call this % derivative ( Xt , dTgc_dXt , Tgc , elem_ce ) dXg_dXt = matmul ( Xc_eT , dTgc_dXt ) dTgc_dXg = matmul ( dTgc_dXt , inv ( dXg_dXt )) dXg_dXksi = matmul ( dXg_dXt , dXt_dXksi ) det_dXg_dXksi = det ( dXg_dXksi ) dV = det_dXg_dXksi * Wksi ( ig ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_volume ( this , volume ) class ( nurbs_volume ), intent ( inout ) :: this real ( rk ), intent ( out ) :: volume real ( rk ), allocatable :: Tgc (:), dTgc_dXg (:,:) integer :: ie , ig real ( rk ) :: dV , dV_ig volume = 0.0_rk do ie = 1 , size ( this % cmp_elem (), 1 ) dV = 0.0_rk do ig = 1 , size ( this % cmp_elem (), 2 ) call this % ansatz ( ie , ig , Tgc , dTgc_dXg , dV_ig ) dV = dV + dV_ig end do volume = volume + dV end do end subroutine !=============================================================================== end module forcad_nurbs_volume !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_nurbs_3d ( Xt , knot1 , knot2 , knot3 , degree , nc , ng , Xc , Wc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ) :: ng ( 3 ) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Xg (:,:) real ( rk ), allocatable :: Tgc (:) integer :: i allocate ( Xg ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), size ( Xc , 2 ))) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) !$OMP PARALLEL DO PRIVATE(Tgc) do i = 1 , ng ( 1 ) * ng ( 2 ) * ng ( 3 ) Tgc = kron ( basis_bspline ( Xt ( i , 3 ), knot3 , nc ( 3 ), degree ( 3 )),& kron (& basis_bspline ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 )))) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) Xg ( i ,:) = matmul ( Tgc , Xc ) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_nurbs_3d_1point ( Xt , knot1 , knot2 , knot3 , degree , nc , Xc , Wc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Xg (:) real ( rk ), allocatable :: Tgc (:) allocate ( Xg ( size ( Xc , 2 ))) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) Tgc = kron ( basis_bspline ( Xt ( 3 ), knot3 , nc ( 3 ), degree ( 3 )),& kron (& basis_bspline ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 )))) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) Xg = matmul ( Tgc , Xc ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_bspline_3d ( Xt , knot1 , knot2 , knot3 , degree , nc , ng , Xc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ) :: ng ( 3 ) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), allocatable :: Xg (:,:) integer :: i allocate ( Xg ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), size ( Xc , 2 ))) !$OMP PARALLEL DO do i = 1 , ng ( 1 ) * ng ( 2 ) * ng ( 3 ) Xg ( i ,:) = matmul ( kron ( basis_bspline ( Xt ( i , 3 ), knot3 , nc ( 3 ), degree ( 3 )), kron (& basis_bspline ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 )))),& Xc ) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_bspline_3d_1point ( Xt , knot1 , knot2 , knot3 , degree , nc , Xc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), allocatable :: Xg (:) allocate ( Xg ( size ( Xc , 2 ))) Xg = matmul ( kron ( basis_bspline ( Xt ( 3 ), knot3 , nc ( 3 ), degree ( 3 )), kron (& basis_bspline ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 )))),& Xc ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_nurbs_3d_vector ( Xt , knot1 , knot2 , knot3 , degree , nc , ng , Wc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ) :: ng ( 3 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: dBi (:,:), dB1 (:), dB2 (:), dB3 (:) real ( rk ), allocatable :: Bi (:), B1 (:), B2 (:), B3 (:) integer :: i allocate ( dTgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) allocate ( Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 )), dBi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) do i = 1 , size ( Xt , 1 ) call basis_bspline_der ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ), dB1 , B1 ) call basis_bspline_der ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 ), dB2 , B2 ) call basis_bspline_der ( Xt ( i , 3 ), knot3 , nc ( 3 ), degree ( 3 ), dB3 , B3 ) Bi = kron ( B3 , kron ( B2 , B1 )) Tgc ( i ,:) = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dBi (:, 1 ) = kron ( kron ( B3 , B2 ), dB1 ) dBi (:, 2 ) = kron ( kron ( B3 , dB2 ), B1 ) dBi (:, 3 ) = kron ( kron ( dB3 , B2 ), B1 ) dTgc ( i ,:, 1 ) = ( dBi (:, 1 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 1 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc ( i ,:, 2 ) = ( dBi (:, 2 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 2 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc ( i ,:, 3 ) = ( dBi (:, 3 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 3 ), Wc ) ) / dot_product ( Bi , Wc ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_nurbs_3d_scalar ( Xt , knot1 , knot2 , knot3 , degree , nc , Wc , dTgc , Tgc , elem ) use forcad_utils , only : rk , basis_bspline_der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) real ( rk ), intent ( in ), contiguous :: Wc (:) integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: dB1 (:), dB2 (:), dB3 (:), dBi (:,:) real ( rk ), allocatable :: B1 (:), B2 (:), B3 (:), Bi (:) call basis_bspline_der ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ), dB1 , B1 ) call basis_bspline_der ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 ), dB2 , B2 ) call basis_bspline_der ( Xt ( 3 ), knot3 , nc ( 3 ), degree ( 3 ), dB3 , B3 ) if (. not . present ( elem )) then allocate ( dTgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) allocate ( dBi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 ), Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) Bi = kron ( B3 , kron ( B2 , B1 )) Tgc = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dBi (:, 1 ) = kron ( kron ( B3 , B2 ), dB1 ) dBi (:, 2 ) = kron ( kron ( B3 , dB2 ), B1 ) dBi (:, 3 ) = kron ( kron ( dB3 , B2 ), B1 ) dTgc (:, 1 ) = ( dBi (:, 1 ) * Wc - Tgc * dot_product ( dBi (:, 1 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc (:, 2 ) = ( dBi (:, 2 ) * Wc - Tgc * dot_product ( dBi (:, 2 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc (:, 3 ) = ( dBi (:, 3 ) * Wc - Tgc * dot_product ( dBi (:, 3 ), Wc ) ) / dot_product ( Bi , Wc ) else allocate ( dTgc ( size ( elem ), 3 )) allocate ( Tgc ( size ( elem ))) allocate ( dBi ( size ( elem ), 3 ), Bi ( size ( elem ))) associate ( Biall => kron ( B3 , kron ( B2 , B1 ))) Bi = Biall ( elem ) Tgc = Bi * ( Wc ( elem ) / ( dot_product ( Bi , Wc ( elem )))) end associate associate ( dB1all => kron ( kron ( B3 , B2 ), dB1 ), dB2all => kron ( kron ( B3 , dB2 ), B1 ), dB3all => kron ( kron ( dB3 , B2 ), B1 )) dBi (:, 1 ) = dB1all ( elem ) dBi (:, 2 ) = dB2all ( elem ) dBi (:, 3 ) = dB3all ( elem ) end associate dTgc (:, 1 ) = ( dBi (:, 1 ) * Wc ( elem ) - Tgc * dot_product ( dBi (:, 1 ), Wc ( elem )) ) / dot_product ( Bi , Wc ( elem )) dTgc (:, 2 ) = ( dBi (:, 2 ) * Wc ( elem ) - Tgc * dot_product ( dBi (:, 2 ), Wc ( elem )) ) / dot_product ( Bi , Wc ( elem )) dTgc (:, 3 ) = ( dBi (:, 3 ) * Wc ( elem ) - Tgc * dot_product ( dBi (:, 3 ), Wc ( elem )) ) / dot_product ( Bi , Wc ( elem )) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_bspline_3d_vector ( Xt , knot1 , knot2 , knot3 , degree , nc , ng , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ) :: ng ( 3 ) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: dB1 (:), dB2 (:), dB3 (:) real ( rk ), allocatable :: B1 (:), B2 (:), B3 (:) integer :: i allocate ( dTgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) !$OMP PARALLEL DO PRIVATE(dB1, dB2, dB3) do i = 1 , size ( Xt , 1 ) call basis_bspline_der ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ), dB1 , B1 ) call basis_bspline_der ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 ), dB2 , B2 ) call basis_bspline_der ( Xt ( i , 3 ), knot3 , nc ( 3 ), degree ( 3 ), dB3 , B3 ) Tgc ( i ,:) = kron ( B3 , kron ( B2 , B1 )) dTgc ( i ,:, 1 ) = kron ( kron ( B3 , B2 ), dB1 ) dTgc ( i ,:, 2 ) = kron ( kron ( B3 , dB2 ), B1 ) dTgc ( i ,:, 3 ) = kron ( kron ( dB3 , B2 ), B1 ) end do !$OMP END PARALLEL DO end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_bspline_3d_scalar ( Xt , knot1 , knot2 , knot3 , degree , nc , dTgc , Tgc , elem ) use forcad_utils , only : rk , basis_bspline_der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: dB1 (:), dB2 (:), dB3 (:) real ( rk ), allocatable :: B1 (:), B2 (:), B3 (:) call basis_bspline_der ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ), dB1 , B1 ) call basis_bspline_der ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 ), dB2 , B2 ) call basis_bspline_der ( Xt ( 3 ), knot3 , nc ( 3 ), degree ( 3 ), dB3 , B3 ) if (. not . present ( elem )) then allocate ( dTgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) Tgc = kron ( B3 , kron ( B2 , B1 )) dTgc (:, 1 ) = kron ( kron ( B3 , B2 ), dB1 ) dTgc (:, 2 ) = kron ( kron ( B3 , dB2 ), B1 ) dTgc (:, 3 ) = kron ( kron ( dB3 , B2 ), B1 ) else allocate ( dTgc ( size ( elem ), 3 )) allocate ( Tgc ( size ( elem ))) associate ( B => kron ( B3 , kron ( B2 , B1 ))) Tgc = B ( elem ) end associate associate ( dB1 => kron ( kron ( B3 , B2 ), dB1 ), dB2 => kron ( kron ( B3 , dB2 ), B1 ), dB3 => kron ( kron ( dB3 , B2 ), B1 )) dTgc (:, 1 ) = dB1 ( elem ) dTgc (:, 2 ) = dB2 ( elem ) dTgc (:, 3 ) = dB3 ( elem ) end associate end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_nurbs_3d_vector ( Xt , knot1 , knot2 , knot3 , degree , nc , ng , Wc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ) :: ng ( 3 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: d2Bi (:,:), d2B1 (:), d2B2 (:), d2B3 (:) real ( rk ), allocatable :: dBi (:,:), dB1 (:), dB2 (:), dB3 (:) real ( rk ), allocatable :: Bi (:), B1 (:), B2 (:), B3 (:) real ( rk ), allocatable :: Tgci (:), dTgci (:) integer :: i allocate ( B1 ( nc ( 1 )), B2 ( nc ( 2 )), B3 ( nc ( 3 ))) allocate ( dB1 ( nc ( 1 )), dB2 ( nc ( 2 )), dB3 ( nc ( 3 ))) allocate ( d2B1 ( nc ( 1 )), d2B2 ( nc ( 2 )), d2B3 ( nc ( 3 ))) allocate ( Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 )), dBi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 ), d2Bi ( 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgci ( nc ( 1 ) * nc ( 2 ) * nc ( 3 )), dTgci ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) allocate ( d2Tgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( dTgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) do i = 1 , size ( Xt , 1 ) call basis_bspline_2der ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ), d2B1 , dB1 , B1 ) call basis_bspline_2der ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 ), d2B2 , dB2 , B2 ) call basis_bspline_2der ( Xt ( i , 3 ), knot3 , nc ( 3 ), degree ( 3 ), d2B3 , dB3 , B3 ) Bi = kron ( B3 , kron ( B2 , B1 )) Tgc ( i ,:) = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dBi (:, 1 ) = kron ( kron ( B3 , B2 ), dB1 ) dBi (:, 2 ) = kron ( kron ( B3 , dB2 ), B1 ) dBi (:, 3 ) = kron ( kron ( dB3 , B2 ), B1 ) dTgc ( i ,:, 1 ) = ( dBi (:, 1 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 1 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc ( i ,:, 2 ) = ( dBi (:, 2 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 2 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc ( i ,:, 3 ) = ( dBi (:, 3 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 3 ), Wc ) ) / dot_product ( Bi , Wc ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( B3 , B2 ), d2B1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( B3 , dB2 ), dB1 ) d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( dB3 , B2 ), dB1 ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( B3 , dB2 ), dB1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( B3 , d2B2 ), B1 ) d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( dB3 , dB2 ), B1 ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( dB3 , B2 ), dB1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( dB3 , dB2 ), B1 ) d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( d2B3 , B2 ), B1 ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) * Wc & - 2.0_rk * dTgc ( i , :, 1 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) * Wc & - dTgc ( i , :, 1 ) * dot_product ( dBi (:, 2 ), Wc ) - dTgc ( i , :, 2 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) * Wc & - dTgc ( i , :, 1 ) * dot_product ( dBi (:, 3 ), Wc ) - dTgc ( i , :, 3 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) * Wc & - dTgc ( i , :, 1 ) * dot_product ( dBi (:, 2 ), Wc ) - dTgc ( i , :, 2 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) * Wc & - 2.0_rk * dTgc ( i , :, 2 ) * dot_product ( dBi (:, 2 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) * Wc & - dTgc ( i , :, 2 ) * dot_product ( dBi (:, 3 ), Wc ) - dTgc ( i , :, 3 ) * dot_product ( dBi (:, 2 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) * Wc & - dTgc ( i , :, 1 ) * dot_product ( dBi (:, 3 ), Wc ) - dTgc ( i , :, 3 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) * Wc & - dTgc ( i , :, 2 ) * dot_product ( dBi (:, 3 ), Wc ) - dTgc ( i , :, 3 ) * dot_product ( dBi (:, 2 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) * Wc & - 2.0_rk * dTgc ( i , :, 3 ) * dot_product ( dBi (:, 3 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ), Wc )) / dot_product ( Bi , Wc ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_nurbs_3d_scalar ( Xt , knot1 , knot2 , knot3 , degree , nc , Wc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: d2Bi (:,:), d2B1 (:), d2B2 (:), d2B3 (:) real ( rk ), allocatable :: dBi (:,:), dB1 (:), dB2 (:), dB3 (:) real ( rk ), allocatable :: Bi (:), B1 (:), B2 (:), B3 (:) allocate ( B1 ( nc ( 1 )), B2 ( nc ( 2 )), B3 ( nc ( 3 ))) allocate ( dB1 ( nc ( 1 )), dB2 ( nc ( 2 )), dB3 ( nc ( 3 ))) allocate ( d2B1 ( nc ( 1 )), d2B2 ( nc ( 2 )), d2B3 ( nc ( 3 ))) allocate ( Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 )), dBi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 ), d2Bi ( 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( d2Tgc ( 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( dTgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) call basis_bspline_2der ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ), d2B1 , dB1 , B1 ) call basis_bspline_2der ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 ), d2B2 , dB2 , B2 ) call basis_bspline_2der ( Xt ( 3 ), knot3 , nc ( 3 ), degree ( 3 ), d2B3 , dB3 , B3 ) Bi = kron ( B3 , kron ( B2 , B1 )) Tgc = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dBi (:, 1 ) = kron ( kron ( B3 , B2 ), dB1 ) dBi (:, 2 ) = kron ( kron ( B3 , dB2 ), B1 ) dBi (:, 3 ) = kron ( kron ( dB3 , B2 ), B1 ) dTgc (:, 1 ) = ( dBi (:, 1 ) * Wc - Tgc * dot_product ( dBi (:, 1 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc (:, 2 ) = ( dBi (:, 2 ) * Wc - Tgc * dot_product ( dBi (:, 2 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc (:, 3 ) = ( dBi (:, 3 ) * Wc - Tgc * dot_product ( dBi (:, 3 ), Wc ) ) / dot_product ( Bi , Wc ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( B3 , B2 ), d2B1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( B3 , dB2 ), dB1 ) d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( dB3 , B2 ), dB1 ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( B3 , dB2 ), dB1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( B3 , d2B2 ), B1 ) d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( dB3 , dB2 ), B1 ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( dB3 , B2 ), dB1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( dB3 , dB2 ), B1 ) d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( d2B3 , B2 ), B1 ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) * Wc & - 2.0_rk * dTgc (:, 1 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) * Wc & - dTgc (:, 1 ) * dot_product ( dBi (:, 2 ), Wc ) - dTgc (:, 2 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) * Wc & - dTgc (:, 1 ) * dot_product ( dBi (:, 3 ), Wc ) - dTgc (:, 3 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc * dot_product ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) * Wc & - dTgc (:, 1 ) * dot_product ( dBi (:, 2 ), Wc ) - dTgc (:, 2 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) * Wc & - 2.0_rk * dTgc (:, 2 ) * dot_product ( dBi (:, 2 ), Wc ) & - Tgc * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) * Wc & - dTgc (:, 2 ) * dot_product ( dBi (:, 3 ), Wc ) - dTgc (:, 3 ) * dot_product ( dBi (:, 2 ), Wc ) & - Tgc * dot_product ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) * Wc & - dTgc (:, 1 ) * dot_product ( dBi (:, 3 ), Wc ) - dTgc (:, 3 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) * Wc & - dTgc (:, 2 ) * dot_product ( dBi (:, 3 ), Wc ) - dTgc (:, 3 ) * dot_product ( dBi (:, 2 ), Wc ) & - Tgc * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) * Wc & - 2.0_rk * dTgc (:, 3 ) * dot_product ( dBi (:, 3 ), Wc ) & - Tgc * dot_product ( d2Bi ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ), Wc )) / dot_product ( Bi , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_bspline_3d_vector ( Xt , knot1 , knot2 , knot3 , degree , nc , ng , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ) :: ng ( 3 ) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: d2B1 (:), d2B2 (:), d2B3 (:) real ( rk ), allocatable :: dB1 (:), dB2 (:), dB3 (:) real ( rk ), allocatable :: B1 (:), B2 (:), B3 (:) integer :: i allocate ( d2Tgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( dTgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) do i = 1 , size ( Xt , 1 ) call basis_bspline_2der ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ), d2B1 , dB1 , B1 ) call basis_bspline_2der ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 ), d2B2 , dB2 , B2 ) call basis_bspline_2der ( Xt ( i , 3 ), knot3 , nc ( 3 ), degree ( 3 ), d2B3 , dB3 , B3 ) Tgc ( i ,:) = kron ( B3 , kron ( B2 , B1 )) dTgc ( i ,:, 1 ) = kron ( kron ( B3 , B2 ), dB1 ) dTgc ( i ,:, 2 ) = kron ( kron ( B3 , dB2 ), B1 ) dTgc ( i ,:, 3 ) = kron ( kron ( dB3 , B2 ), B1 ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( B3 , B2 ), d2B1 ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( B3 , dB2 ), dB1 ) d2Tgc ( i , 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( dB3 , B2 ), dB1 ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( B3 , dB2 ), dB1 ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( B3 , d2B2 ), B1 ) d2Tgc ( i , 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( dB3 , dB2 ), B1 ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( dB3 , B2 ), dB1 ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( dB3 , dB2 ), B1 ) d2Tgc ( i , 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( d2B3 , B2 ), B1 ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_bspline_3d_scalar ( Xt , knot1 , knot2 , knot3 , degree , nc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: d2B1 (:), d2B2 (:), d2B3 (:) real ( rk ), allocatable :: dB1 (:), dB2 (:), dB3 (:) real ( rk ), allocatable :: B1 (:), B2 (:), B3 (:) allocate ( d2Tgc ( 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( dTgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) call basis_bspline_2der ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ), d2B1 , dB1 , B1 ) call basis_bspline_2der ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 ), d2B2 , dB2 , B2 ) call basis_bspline_2der ( Xt ( 3 ), knot3 , nc ( 3 ), degree ( 3 ), d2B3 , dB3 , B3 ) Tgc = kron ( B3 , kron ( B2 , B1 )) dTgc (:, 1 ) = kron ( kron ( B3 , B2 ), dB1 ) dTgc (:, 2 ) = kron ( kron ( B3 , dB2 ), B1 ) dTgc (:, 3 ) = kron ( kron ( dB3 , B2 ), B1 ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( B3 , B2 ), d2B1 ) d2Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( B3 , dB2 ), dB1 ) d2Tgc ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 1 ) = kron ( kron ( dB3 , B2 ), dB1 ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( B3 , dB2 ), dB1 ) d2Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( B3 , d2B2 ), B1 ) d2Tgc ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 2 ) = kron ( kron ( dB3 , dB2 ), B1 ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( dB3 , B2 ), dB1 ) d2Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( dB3 , dB2 ), B1 ) d2Tgc ( 2 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) + 1 : 3 * nc ( 1 ) * nc ( 2 ) * nc ( 3 ) , 3 ) = kron ( kron ( d2B3 , B2 ), B1 ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_nurbs_3d_vector ( Xt , knot1 , knot2 , knot3 , degree , nc , ng , Wc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ) :: ng ( 3 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Tgc (:,:) real ( rk ), allocatable :: Tgci (:) integer :: i allocate ( Tgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) allocate ( Tgci ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) !$OMP PARALLEL DO PRIVATE(Tgci) do i = 1 , size ( Xt , 1 ) Tgci = kron ( basis_bspline ( Xt ( i , 3 ), knot3 , nc ( 3 ), degree ( 3 )), kron (& basis_bspline ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 )))) Tgc ( i ,:) = Tgci * ( Wc / ( dot_product ( Tgci , Wc ))) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_nurbs_3d_scalar ( Xt , knot1 , knot2 , knot3 , degree , nc , Wc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Tgc (:) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) Tgc = kron ( basis_bspline ( Xt ( 3 ), knot3 , nc ( 3 ), degree ( 3 )), kron (& basis_bspline ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 )))) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_bspline_3d_vector ( Xt , knot1 , knot2 , knot3 , degree , nc , ng ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) integer , intent ( in ) :: ng ( 3 ) real ( rk ), allocatable :: Tgc (:,:) integer :: i allocate ( Tgc ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ), nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) !$OMP PARALLEL DO do i = 1 , size ( Xt , 1 ) Tgc ( i ,:) = kron ( basis_bspline ( Xt ( i , 3 ), knot3 , nc ( 3 ), degree ( 3 )), kron (& basis_bspline ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 )))) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_bspline_3d_scalar ( Xt , knot1 , knot2 , knot3 , degree , nc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:), knot3 (:) integer , intent ( in ) :: degree ( 3 ) integer , intent ( in ) :: nc ( 3 ) real ( rk ), allocatable :: Tgc (:) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ))) Tgc = kron ( basis_bspline ( Xt ( 3 ), knot3 , nc ( 3 ), degree ( 3 )), kron (& basis_bspline ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 )))) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function nearest_point_help_3d ( ng , Xg , point_Xg ) result ( distances ) use forcad_utils , only : rk implicit none integer , intent ( in ) :: ng ( 3 ) real ( rk ), intent ( in ), contiguous :: Xg (:,:) real ( rk ), intent ( in ), contiguous :: point_Xg (:) real ( rk ), allocatable :: distances (:) integer :: i allocate ( distances ( ng ( 1 ) * ng ( 2 ) * ng ( 3 ))) !$OMP PARALLEL DO do i = 1 , ng ( 1 ) * ng ( 2 ) * ng ( 3 ) distances ( i ) = norm2 ( Xg ( i ,:) - point_Xg ) end do !$OMP END PARALLEL DO end function !===============================================================================","tags":"","loc":"sourcefile/forcad_nurbs_volume.f90.html"},{"title":"nearest_point_2d_bench.f90 – ForCAD","text":"This file depends on sourcefile~~nearest_point_2d_bench.f90~~EfferentGraph sourcefile~nearest_point_2d_bench.f90 nearest_point_2d_bench.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~nearest_point_2d_bench.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program nearest_point_2d_bench use forcad , only : rk , nurbs_surface use fortime implicit none type ( nurbs_surface ) :: shape !! Declare a NURBS surface object real ( rk ), allocatable :: nearest_Xg (:) !! Coordinates of the nearest point on the surface real ( rk ), allocatable :: nearest_Xt (:) !! Corresponding parametric coordinates of the nearest point integer :: id !! id of the nearest point real ( rk ), allocatable :: points (:,:) integer :: i , j type ( timer ) :: t !----------------------------------------------------------------------------- ! Setting up the NURBS tetrangon !----------------------------------------------------------------------------- !> Set a tetragon with lengths of 2.0 and 3.0 and 3 and 4 control points in each direction !> The weights of the control points (Wc) are optional. call shape % set_tetragon ( L = [ 2.0_rk , 3.0_rk ], nc = [ 3 , 4 ]) !----------------------------------------------------------------------------- ! Creating the NURBS surface !----------------------------------------------------------------------------- !> Generate the NURBS surface with resolutions of 30 in both dimensions call shape % create ( 100 , 100 ) !----------------------------------------------------------------------------- ! Nearest point on the surface !----------------------------------------------------------------------------- !> Find the nearest point on the surface to a given point ! nearest_Xg: Coordinates of the nearest point on the surface (optional) ! nearest_Xt: Corresponding parametric coordinates of the nearest point (optional) ! id: id of the nearest point (optional) do j = 1 , 40 allocate ( points ( j * 1000 , 3 )) print * , j * 1000 call random_number ( points ) call t % timer_start () do concurrent ( i = 1 : size ( points , 1 )) call shape % nearest_point ( points ( i ,:), nearest_Xg , nearest_Xt , id ) end do call t % timer_stop () deallocate ( points ) end do !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS surface object call shape % finalize () deallocate ( nearest_Xg , nearest_Xt ) end program","tags":"","loc":"sourcefile/nearest_point_2d_bench.f90.html"},{"title":"cmp_volume.f90 – ForCAD","text":"This file depends on sourcefile~~cmp_volume.f90~~EfferentGraph sourcefile~cmp_volume.f90 cmp_volume.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~cmp_volume.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program compute_volume use forcad implicit none type ( nurbs_volume ) :: shape real ( rk ) :: volume real ( rk ) :: Xc ( 8 , 3 ) Xc ( 1 ,:) = [ 0.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 3 ,:) = [ 0.0_rk , 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ 2.0_rk , 2.0_rk , 0.0_rk ] Xc ( 5 ,:) = [ 0.0_rk , 0.0_rk , 2.0_rk ] Xc ( 6 ,:) = [ 2.0_rk , 0.0_rk , 2.0_rk ] Xc ( 7 ,:) = [ 0.0_rk , 2.0_rk , 2.0_rk ] Xc ( 8 ,:) = [ 2.0_rk , 2.0_rk , 2.0_rk ] call shape % set (& knot1 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& knot3 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& Xc = Xc ) call shape % cmp_volume ( volume ) print * , volume end program","tags":"","loc":"sourcefile/cmp_volume.f90.html"},{"title":"nearest_point_3d.f90 – ForCAD","text":"This file depends on sourcefile~~nearest_point_3d.f90~~EfferentGraph sourcefile~nearest_point_3d.f90 nearest_point_3d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~nearest_point_3d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program nearest_point_3d use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: shape !! Declare a NURBS volume object real ( rk ), allocatable :: nearest_Xg (:) !! Coordinates of the nearest point on the volume real ( rk ), allocatable :: nearest_Xt (:) !! Corresponding parametric coordinates of the nearest point integer :: id !! id of the nearest point real ( rk ) :: Xc ( 8 , 3 ) !! Control points real ( rk ) :: Wc ( 8 ) !! Weights of the control points !----------------------------------------------------------------------------- ! Setting up the NURBS hexahedron !----------------------------------------------------------------------------- Xc ( 1 ,:) = [ 0.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 3 ,:) = [ 0.0_rk , 4.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ 2.0_rk , 4.0_rk , 0.0_rk ] Xc ( 5 ,:) = [ 0.0_rk , 0.0_rk , 2.0_rk ] Xc ( 6 ,:) = [ 2.0_rk , 0.0_rk , 2.0_rk ] Xc ( 7 ,:) = [ 0.0_rk , 4.0_rk , 2.0_rk ] Xc ( 8 ,:) = [ 2.0_rk , 4.0_rk , 2.0_rk ] !> The weights of the control points (Wc) are optional. Wc = [ 1.0_rk , 1.1_rk , 1.11_rk , 1.0_rk , 0.5_rk , 0.5_rk , 1.2_rk , 1.0_rk ] call shape % set (& knot1 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& knot3 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& Xc = Xc , Wc = Wc ) !----------------------------------------------------------------------------- ! Creating the NURBS volume !----------------------------------------------------------------------------- !> Generate the NURBS volume with resolutions of 20, 20, 20 call shape % create ( 30 , 30 , 30 ) !----------------------------------------------------------------------------- ! Nearest point on the volume !----------------------------------------------------------------------------- !> Find the nearest point on the volume to a given point ! nearest_Xg: Coordinates of the nearest point on the volume (optional) ! nearest_Xt: Corresponding parametric coordinates of the nearest point (optional) ! id: id of the nearest point (optional) call shape % nearest_point ([ 1.5_rk , 3.5_rk , 1.1_rk ], nearest_Xg , nearest_Xt , id ) print '(a,1x,g0,2x,g0,2x,g0,a,2x,g0,2x,g0,2x,g0,2x,a,1x,g0)' ,& 'Nearest point on the volume:' , nearest_Xg , ' with parametric coordinates:' , nearest_Xt , ' and id:' , id !----------------------------------------------------------------------------- ! Nearest point on the volume (Optimization) !----------------------------------------------------------------------------- !> Find the nearest point on the volume to a given point !> The optimization method is used to find the nearest point !> The optimization method is based on the Newton-Raphson method ! nearest_Xt: Corresponding parametric coordinates of the nearest point ! nearest_Xg: Coordinates of the nearest point on the volume (optional) call shape % nearest_point2 ([ 1.5_rk , 3.5_rk , 1.1_rk ], 1.0e-11_rk , 500 , nearest_Xt , nearest_Xg ) print '(a,1x,g0,2x,g0,2x,g0,a,2x,g0,2x,g0,2x,g0)' ,& 'Nearest point on the volume:' , nearest_Xg , ' with parametric coordinates:' , nearest_Xt !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS volume object call shape % finalize () ! deallocate(nearest_Xg, nearest_Xt) end program","tags":"","loc":"sourcefile/nearest_point_3d.f90.html"},{"title":"shape_half_circle.f90 – ForCAD","text":"This file depends on sourcefile~~shape_half_circle.f90~~EfferentGraph sourcefile~shape_half_circle.f90 shape_half_circle.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_half_circle.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_half_circle use forcad , only : rk , nurbs_curve implicit none type ( nurbs_curve ) :: shape !> Set up a half circle shape centered at the 0,0,0 with a radius of 1 call shape % set_half_circle ([ 0.0_rk , 0.0_rk , 0.0_rk ], 1.0_rk ) !> Export the control points to a VTK file for visualization. call shape % export_Xc ( 'vtk/shape_half_circle_Xc.vtk' ) !> Create the shape using the specified number of elements in each direction. call shape % create ( 60 ) !> Export the geometry to a VTK file for visualization. call shape % export_Xg ( 'vtk/shape_half_circle_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_half_circle_Xc.vtk' , 'vtk/shape_half_circle_Xg.vtk' ) !> Finalize and clean up the shape object. call shape % finalize () end program","tags":"","loc":"sourcefile/shape_half_circle.f90.html"},{"title":"forcad_utils.f90 – ForCAD","text":"Files dependent on this one sourcefile~~forcad_utils.f90~~AfferentGraph sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 sourcefile~put_to_nurbs.f90 put_to_nurbs.f90 sourcefile~put_to_nurbs.f90->sourcefile~forcad_utils.f90 sourcefile~put_to_nurbs.f90->sourcefile~forcad.f90 sourcefile~cmp_area.f90 cmp_area.f90 sourcefile~cmp_area.f90->sourcefile~forcad.f90 sourcefile~cmp_length.f90 cmp_length.f90 sourcefile~cmp_length.f90->sourcefile~forcad.f90 sourcefile~cmp_volume.f90 cmp_volume.f90 sourcefile~cmp_volume.f90->sourcefile~forcad.f90 sourcefile~demo_curve.f90 demo_curve.f90 sourcefile~demo_curve.f90->sourcefile~forcad.f90 sourcefile~demo_surface.f90 demo_surface.f90 sourcefile~demo_surface.f90->sourcefile~forcad.f90 sourcefile~demo_volume.f90 demo_volume.f90 sourcefile~demo_volume.f90->sourcefile~forcad.f90 sourcefile~example_curve_1.f90 example_curve_1.f90 sourcefile~example_curve_1.f90->sourcefile~forcad.f90 sourcefile~example_ppm1.f90 example_ppm1.f90 sourcefile~example_ppm1.f90->sourcefile~forcad.f90 sourcefile~example_ppm2.f90 example_ppm2.f90 sourcefile~example_ppm2.f90->sourcefile~forcad.f90 sourcefile~example_ppm3.f90 example_ppm3.f90 sourcefile~example_ppm3.f90->sourcefile~forcad.f90 sourcefile~example_surface_1.f90 example_surface_1.f90 sourcefile~example_surface_1.f90->sourcefile~forcad.f90 sourcefile~example_volume_1.f90 example_volume_1.f90 sourcefile~example_volume_1.f90->sourcefile~forcad.f90 sourcefile~nearest_point_1d.f90 nearest_point_1d.f90 sourcefile~nearest_point_1d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d.f90 nearest_point_2d.f90 sourcefile~nearest_point_2d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d_bench.f90 nearest_point_2d_bench.f90 sourcefile~nearest_point_2d_bench.f90->sourcefile~forcad.f90 sourcefile~nearest_point_3d.f90 nearest_point_3d.f90 sourcefile~nearest_point_3d.f90->sourcefile~forcad.f90 sourcefile~shape_c_1d.f90 shape_C_1d.f90 sourcefile~shape_c_1d.f90->sourcefile~forcad.f90 sourcefile~shape_c_2d.f90 shape_C_2d.f90 sourcefile~shape_c_2d.f90->sourcefile~forcad.f90 sourcefile~shape_c_3d.f90 shape_C_3d.f90 sourcefile~shape_c_3d.f90->sourcefile~forcad.f90 sourcefile~shape_circle.f90 shape_circle.f90 sourcefile~shape_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_circle.f90 shape_half_circle.f90 sourcefile~shape_half_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_2d.f90 shape_half_ring_2d.f90 sourcefile~shape_half_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_3d.f90 shape_half_ring_3d.f90 sourcefile~shape_half_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_hexahedron.f90 shape_hexahedron.f90 sourcefile~shape_hexahedron.f90->sourcefile~forcad.f90 sourcefile~shape_ring_2d.f90 shape_ring_2d.f90 sourcefile~shape_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_ring_3d.f90 shape_ring_3d.f90 sourcefile~shape_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_tetragon.f90 shape_tetragon.f90 sourcefile~shape_tetragon.f90->sourcefile~forcad.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> This module contains parameters, functions and subroutines that are used in the library. module forcad_utils use stdlib_quadrature , only : gauss_legendre implicit none private public :: rk , basis_bernstein , basis_bspline , elemConn_C0 , kron , ndgrid , compute_multiplicity , compute_knot_vector , & basis_bspline_der , insert_knot_A_5_1 , findspan , elevate_degree_A_5_9 , hexahedron_Xc , tetragon_Xc , remove_knots_A_5_8 , & elemConn_Cn , unique , rotation , basis_bspline_2der , det , inv , dyad , gauss_leg integer , parameter :: rk = kind ( 1.0d0 ) !=============================================================================== interface elemConn_C0 module procedure cmp_elemConn_C0_L module procedure cmp_elemConn_C0_S module procedure cmp_elemConn_C0_V end interface !=============================================================================== !=============================================================================== interface elemConn_Cn module procedure cmp_elemConn_Cn_L module procedure cmp_elemConn_Cn_S module procedure cmp_elemConn_Cn_V end interface !=============================================================================== !=============================================================================== interface ndgrid module procedure ndgrid2 module procedure ndgrid3 end interface !=============================================================================== !=============================================================================== interface compute_multiplicity module procedure compute_multiplicity1 module procedure compute_multiplicity2 end interface !=============================================================================== !=============================================================================== interface unique module procedure unique_integer module procedure unique_real end interface !=============================================================================== !=============================================================================== interface dyad module procedure dyad_t1_t1 end interface !=============================================================================== !=============================================================================== interface gauss_leg module procedure gauss_legendre_1D module procedure gauss_legendre_2D module procedure gauss_legendre_3D end interface !=============================================================================== contains !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function basis_bspline ( Xt , knot , nc , degree ) result ( B ) integer , intent ( in ) :: degree real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: nc real ( rk ), intent ( in ) :: Xt real ( rk ) :: temp , Xth_i , Xth_i1 , Xth_ip , Xth_ip1 real ( rk ), allocatable :: Nt (:,:) integer :: i , p real ( rk ), allocatable :: B (:) temp = abs ( Xt - knot ( size ( knot ))) allocate ( Nt ( nc , 0 : degree ), source = 0.0_rk ) do p = 0 , degree do concurrent ( i = 1 : nc ) Xth_i = knot ( i ) Xth_i1 = knot ( i + 1 ) Xth_ip = knot ( i + p ) Xth_ip1 = knot ( i + p + 1 ) if ( temp /= tiny ( 0.0_rk ) . and . Xt >= Xth_i . and . Xt <= Xth_i1 ) Nt ( i , 0 ) = 1.0_rk if ( Xth_ip /= Xth_i ) Nt ( i , p ) = ( Xt - Xth_i ) / ( Xth_ip - Xth_i ) * Nt ( i , p - 1 ) if ( Xth_ip1 /= Xth_i1 ) Nt ( i , p ) = Nt ( i , p ) + ( Xth_ip1 - Xt ) / ( Xth_ip1 - Xth_i1 ) * Nt ( i + 1 , p - 1 ) end do end do B = Nt (:, degree ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine basis_bspline_der ( Xt , knot , nc , degree , dB , B ) integer , intent ( in ) :: degree real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: nc real ( rk ), intent ( in ) :: Xt real ( rk ), allocatable , intent ( out ) :: dB (:) real ( rk ), allocatable , intent ( out ), optional :: B (:) real ( rk ), allocatable :: N (:,:), dN_dXt (:,:) real ( rk ) :: temp , Xth_i , Xth_i1 , Xth_ip , Xth_ip1 integer :: i , p temp = abs ( Xt - knot ( size ( knot ))) allocate ( N ( nc , 0 : degree ), source = 0.0_rk ) allocate ( dN_dXt ( nc , 0 : degree ), source = 0.0_rk ) do p = 0 , degree do concurrent ( i = 1 : nc ) Xth_i = knot ( i ) Xth_i1 = knot ( i + 1 ) Xth_ip = knot ( i + p ) Xth_ip1 = knot ( i + p + 1 ) if ( temp /= tiny ( 0.0_rk ) . and . Xth_i <= Xt . and . Xt <= Xth_i1 ) then N ( i , 0 ) = 1.0_rk dN_dXt ( i , 0 ) = 0.0_rk end if if ( Xth_ip /= Xth_i ) then N ( i , p ) = ( Xt - Xth_i ) / ( Xth_ip - Xth_i ) * N ( i , p - 1 ) dN_dXt ( i , p ) = ( N ( i , p - 1 ) + ( Xt - Xth_i ) * dN_dXt ( i , p - 1 ) ) / ( Xth_ip - Xth_i ) end if if ( Xth_ip1 /= Xth_i1 ) then N ( i , p ) = N ( i , p ) + ( Xth_ip1 - Xt ) / ( Xth_ip1 - Xth_i1 ) * N ( i + 1 , p - 1 ) dN_dXt ( i , p ) = dN_dXt ( i , p ) - ( N ( i + 1 , p - 1 ) - ( Xth_ip1 - Xt ) * dN_dXt ( i + 1 , p - 1 ) ) / ( Xth_ip1 - Xth_i1 ) end if end do end do dB = dN_dXt (:, degree ) if ( present ( B )) B = N (:, degree ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine basis_bspline_2der ( Xt , knot , nc , degree , d2B , dB , B ) integer , intent ( in ) :: degree real ( rk ), intent ( in ), contiguous :: knot (:) integer , intent ( in ) :: nc real ( rk ), intent ( in ) :: Xt real ( rk ), allocatable , intent ( out ) :: d2B (:) real ( rk ), allocatable , intent ( out ), optional :: dB (:) real ( rk ), allocatable , intent ( out ), optional :: B (:) real ( rk ), allocatable :: N (:,:), dN_dXt (:,:), d2N_dXt2 (:,:) real ( rk ) :: temp , Xth_i , Xth_i1 , Xth_ip , Xth_ip1 integer :: i , p temp = abs ( Xt - knot ( size ( knot ))) allocate ( N ( nc , 0 : degree ), source = 0.0_rk ) allocate ( dN_dXt ( nc , 0 : degree ), source = 0.0_rk ) allocate ( d2N_dXt2 ( nc , 0 : degree ), source = 0.0_rk ) do p = 0 , degree do concurrent ( i = 1 : nc ) Xth_i = knot ( i ) Xth_i1 = knot ( i + 1 ) Xth_ip = knot ( i + p ) Xth_ip1 = knot ( i + p + 1 ) if ( temp /= tiny ( 0.0_rk ) . and . Xth_i <= Xt . and . Xt <= Xth_i1 ) then N ( i , 0 ) = 1.0_rk dN_dXt ( i , 0 ) = 0.0_rk d2N_dXt2 ( i , 0 ) = 0.0_rk end if if ( Xth_ip /= Xth_i ) then N ( i , p ) = ( Xt - Xth_i ) / ( Xth_ip - Xth_i ) * N ( i , p - 1 ) ! dN_dXt(i,p) = p*(N(i,p-1)/(Xth_ip - Xth_i)) dN_dXt ( i , p ) = ( N ( i , p - 1 ) + ( Xt - Xth_i ) * dN_dXt ( i , p - 1 ) ) / ( Xth_ip - Xth_i ) d2N_dXt2 ( i , p ) = ( 2 * dN_dXt ( i , p - 1 ) + ( Xt - Xth_i ) * d2N_dXt2 ( i , p - 1 )) / ( Xth_ip - Xth_i ) end if if ( Xth_ip1 /= Xth_i1 ) then N ( i , p ) = N ( i , p ) + ( Xth_ip1 - Xt ) / ( Xth_ip1 - Xth_i1 ) * N ( i + 1 , p - 1 ) ! dN_dXt(i,p) = dN_dXt(i,p) - p*( N(i+1,p-1)/(Xth_ip1 - Xth_i1)) dN_dXt ( i , p ) = dN_dXt ( i , p ) - ( N ( i + 1 , p - 1 ) - ( Xth_ip1 - Xt ) * dN_dXt ( i + 1 , p - 1 ) ) / ( Xth_ip1 - Xth_i1 ) d2N_dXt2 ( i , p ) = d2N_dXt2 ( i , p ) - ( 2 * dN_dXt ( i + 1 , p - 1 ) - ( Xth_ip1 - Xt ) * d2N_dXt2 ( i + 1 , p - 1 )) / ( Xth_ip1 - Xth_i1 ) end if end do end do d2B = d2N_dXt2 (:, degree ) if ( present ( dB )) dB = dN_dXt (:, degree ) if ( present ( B )) B = N (:, degree ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function basis_bernstein ( Xt , nc ) result ( B ) real ( rk ), intent ( in ) :: Xt integer , intent ( in ) :: nc real ( rk ), allocatable :: B (:) integer :: p , degree degree = nc - 1 allocate ( B ( nc ), source = 0.0_rk ) do concurrent ( p = 0 : degree ) B ( p + 1 ) = gamma ( real ( nc , kind = rk )) / ( gamma ( real ( p + 1 , kind = rk )) * gamma ( real ( nc - p , kind = rk ))) if ( Xt == 0.0_rk . and . p == 0 ) then B ( p + 1 ) = B ( p + 1 ) * ( 1.0_rk - Xt ) ** ( degree - p ) else if ( Xt == 0.0_rk . and . degree - p == 0 ) then B ( p + 1 ) = B ( p + 1 ) * ( Xt ** p ) else B ( p + 1 ) = B ( p + 1 ) * ( Xt ** p ) * ( 1.0_rk - Xt ) ** ( degree - p ) end if end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function kron ( u , v ) result ( w ) real ( rk ), intent ( in ), contiguous :: u (:), v (:) real ( rk ) :: w ( size ( u ) * size ( v )) integer :: i , j , n n = size ( v ) do concurrent ( i = 1 : size ( u ), j = 1 : n ) w (( i - 1 ) * n + j ) = u ( i ) * v ( j ) end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine ndgrid2 ( X_dir1 , X_dir2 , Xt ) real ( rk ), intent ( in ), contiguous :: X_dir1 (:), X_dir2 (:) real ( rk ), allocatable , intent ( out ) :: Xt (:,:) integer :: s1 , s2 , i , j s1 = size ( X_dir1 ) s2 = size ( X_dir2 ) allocate ( Xt ( s1 * s2 , 2 )) do concurrent ( j = 1 : s2 , i = 1 : s1 ) Xt (( j - 1 ) * s1 + i , 1 ) = X_dir1 ( i ) Xt (( j - 1 ) * s1 + i , 2 ) = X_dir2 ( j ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine ndgrid3 ( X_dir1 , X_dir2 , X_dir3 , Xt ) real ( rk ), intent ( in ), contiguous :: X_dir1 (:), X_dir2 (:), X_dir3 (:) real ( rk ), allocatable , intent ( out ) :: Xt (:,:) integer :: s1 , s2 , s3 , i , j , k s1 = size ( X_dir1 ) s2 = size ( X_dir2 ) s3 = size ( X_dir3 ) allocate ( Xt ( s1 * s2 * s3 , 3 )) do concurrent ( k = 1 : s3 , j = 1 : s2 , i = 1 : s1 ) Xt ((( k - 1 ) * s2 + ( j - 1 )) * s1 + i , 1 ) = X_dir1 ( i ) Xt ((( k - 1 ) * s2 + ( j - 1 )) * s1 + i , 2 ) = X_dir2 ( j ) Xt ((( k - 1 ) * s2 + ( j - 1 )) * s1 + i , 3 ) = X_dir3 ( k ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function repelem ( a , b ) result ( c ) real ( rk ), intent ( in ), contiguous :: a (:) integer , intent ( in ), contiguous :: b (:) real ( rk ) :: c ( sum ( b )) integer :: i , l , n l = 0 do i = 1 , size ( a ) n = b ( i ) c ( l + 1 : l + n ) = a ( i ) l = l + n end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elemConn_C0_L ( nnode , p ) result ( elemConn ) integer , intent ( in ) :: nnode integer , intent ( in ) :: p integer , allocatable :: elemConn (:,:) integer :: i , l integer , allocatable :: nodes (:) if ( mod ( nnode - 1 , p ) /= 0 ) error stop 'cmp_elemConn_C0_L: nnode-1 must be divisible by p' allocate ( elemConn ( ( nnode - 1 ) / p , p + 1 )) nodes = [( i , i = 1 , nnode )] l = 0 do i = 1 , nnode - p , p l = l + 1 elemConn ( l ,:) = reshape ( nodes ( i : i + p ),[( p + 1 )]) end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elemConn_C0_S ( nnode1 , nnode2 , p1 , p2 ) result ( elemConn ) integer , intent ( in ) :: nnode1 , nnode2 integer , intent ( in ) :: p1 , p2 integer , allocatable :: elemConn (:,:) integer :: i , j , l integer , allocatable :: nodes (:,:) if ( mod ( nnode1 - 1 , p1 ) /= 0 ) error stop 'cmp_elemConn_C0_S: nnode1-1 must be divisible by p1' if ( mod ( nnode2 - 1 , p2 ) /= 0 ) error stop 'cmp_elemConn_C0_S: nnode2-1 must be divisible by p2' allocate ( elemConn ( (( nnode1 - 1 ) / p1 ) * (( nnode2 - 1 ) / p2 ), ( p1 + 1 ) * ( p2 + 1 ))) nodes = reshape ([( i , i = 1 , nnode1 * nnode2 )], [ nnode1 , nnode2 ]) l = 0 do j = 1 , nnode2 - p2 , p2 do i = 1 , nnode1 - p1 , p1 l = l + 1 elemConn ( l ,:) = reshape ( nodes ( i : i + p1 , j : j + p2 ),[( p1 + 1 ) * ( p2 + 1 )]) end do end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elemConn_C0_V ( nnode1 , nnode2 , nnode3 , p1 , p2 , p3 ) result ( elemConn ) integer , intent ( in ) :: nnode1 , nnode2 , nnode3 integer , intent ( in ) :: p1 , p2 , p3 integer , allocatable :: elemConn (:,:) integer :: i , j , k , l integer , allocatable :: nodes (:,:,:) if ( mod ( nnode1 - 1 , p1 ) /= 0 ) error stop 'cmp_elemConn_C0_V: nnode1-1 must be divisible by p1' if ( mod ( nnode2 - 1 , p2 ) /= 0 ) error stop 'cmp_elemConn_C0_V: nnode2-1 must be divisible by p2' if ( mod ( nnode3 - 1 , p3 ) /= 0 ) error stop 'cmp_elemConn_C0_V: nnode3-1 must be divisible by p3' allocate ( elemConn ( (( nnode1 - 1 ) / p1 ) * (( nnode2 - 1 ) / p2 ) * (( nnode3 - 1 ) / p3 ) ,( p1 + 1 ) * ( p2 + 1 ) * ( p3 + 1 ))) nodes = reshape ([( i , i = 1 , nnode1 * nnode2 * nnode3 )], [ nnode1 , nnode2 , nnode3 ]) l = 0 do k = 1 , nnode3 - p3 , p3 do j = 1 , nnode2 - p2 , p2 do i = 1 , nnode1 - p1 , p1 l = l + 1 elemConn ( l ,:) = reshape ( nodes ( i : i + p1 , j : j + p2 , k : k + p3 ),[( p1 + 1 ) * ( p2 + 1 ) * ( p3 + 1 )]) end do end do end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_elemConn_Cn_L ( nnode , p , Xth , vecKnot_mul , elemConn ) integer , intent ( in ) :: p , nnode integer , intent ( in ), contiguous :: vecKnot_mul (:) real ( rk ), intent ( in ), contiguous :: Xth (:) integer , allocatable , intent ( out ) :: elemConn (:,:) integer , allocatable :: nodes (:) integer :: i , nnel , m , nelem nnel = p + 1 nodes = [( i , i = 1 , nnode )] nelem = size ( Xth ) - 1 allocate ( elemConn ( nelem , nnel )) m = - p do i = 1 , nelem m = m + vecKnot_mul ( i ) elemConn ( i ,:) = nodes ( m : m + p ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_elemConn_Cn_S ( nnode1 , nnode2 , p1 , p2 ,& Xth1 , Xth2 , vecKnot_mul1 , vecKnot_mul2 , elemConn ) integer , intent ( in ) :: p1 , p2 , nnode1 , nnode2 integer , intent ( in ), contiguous :: vecKnot_mul1 (:), vecKnot_mul2 (:) real ( rk ), intent ( in ), contiguous :: Xth1 (:), Xth2 (:) integer , allocatable , intent ( out ) :: elemConn (:,:) integer , allocatable :: nodes (:,:), nodes_vec (:) integer :: nnd_total , i , j , l , nnel1 , nnel2 , m , n , nelem1 , nelem2 , nelem nnel1 = p1 + 1 nnel2 = p2 + 1 nnd_total = nnode1 * nnode2 allocate ( nodes_vec ( nnd_total )) Nodes_vec = [( i , i = 1 , nnd_total )] nodes = reshape ( nodes_vec ,[ nnode1 , nnode2 ]) nelem1 = size ( Xth1 ) - 1 nelem2 = size ( Xth2 ) - 1 nelem = nelem1 * nelem2 allocate ( elemConn ( nelem , nnel1 * nnel2 )) l = 0 n = - p2 do j = 1 , nelem2 n = n + vecKnot_mul2 ( j ) m = - p1 do i = 1 , nelem1 m = m + vecKnot_mul1 ( i ) l = l + 1 elemConn ( l ,:) = reshape ( nodes ( m : m + p1 , n : n + p2 ), [ nnel1 * nnel2 ]) end do end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_elemConn_Cn_V ( nnode1 , nnode2 , nnode3 , p1 , p2 , p3 ,& Xth1 , Xth2 , Xth3 , vecKnot_mul1 , vecKnot_mul2 , vecKnot_mul3 , elemConn ) integer , intent ( in ) :: p1 , p2 , p3 , nnode1 , nnode2 , nnode3 integer , intent ( in ), contiguous :: vecKnot_mul1 (:), vecKnot_mul2 (:), vecKnot_mul3 (:) real ( rk ), intent ( in ), contiguous :: Xth1 (:), Xth2 (:), Xth3 (:) integer , allocatable , intent ( out ) :: elemConn (:,:) integer , allocatable :: nodes (:,:,:), nodes_vec (:) integer :: nnd_total , i , j , k , l , nnel1 , nnel2 , nnel3 , m , n , o , nelem1 , nelem2 , nelem3 , nelem nnel1 = p1 + 1 nnel2 = p2 + 1 nnel3 = p3 + 1 nnd_total = nnode1 * nnode2 * nnode3 allocate ( nodes_vec ( nnd_total )) Nodes_vec = [( i , i = 1 , nnd_total )] nodes = reshape ( nodes_vec ,[ nnode1 , nnode2 , nnode3 ]) nelem1 = size ( Xth1 ) - 1 nelem2 = size ( Xth2 ) - 1 nelem3 = size ( Xth3 ) - 1 nelem = nelem1 * nelem2 * nelem3 allocate ( elemConn ( nelem , nnel1 * nnel2 * nnel3 )) l = 0 o = - p3 do k = 1 , nelem3 o = o + vecKnot_mul3 ( k ) n = - p2 do j = 1 , nelem2 n = n + vecKnot_mul2 ( j ) m = - p1 do i = 1 , nelem1 m = m + vecKnot_mul1 ( i ) l = l + 1 elemConn ( l ,:) = reshape ( nodes ( m : m + p1 , n : n + p2 , o : o + p3 ), [ nnel1 * nnel2 * nnel3 ]) end do end do end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function compute_multiplicity1 ( knot ) result ( multiplicity ) real ( rk ), intent ( in ), contiguous :: knot (:) integer , allocatable :: multiplicity (:) integer :: i , count count = 1 do i = 2 , size ( knot ) if ( knot ( i ) /= knot ( i - 1 )) count = count + 1 end do allocate ( multiplicity ( count )) multiplicity ( 1 ) = 1 count = 1 do i = 2 , size ( knot ) if ( knot ( i ) /= knot ( i - 1 )) then count = count + 1 multiplicity ( count ) = 1 else multiplicity ( count ) = multiplicity ( count ) + 1 end if end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function compute_multiplicity2 ( knot , Xth ) result ( multiplicity ) real ( rk ), intent ( in ), contiguous :: knot (:) real ( rk ), intent ( in ) :: Xth integer :: multiplicity integer :: i , count , size_knot size_knot = size ( knot ) multiplicity = 0 i = 1 do while ( i <= size_knot ) if ( knot ( i ) == Xth ) then count = 1 do while ( i + count <= size_knot . and . knot ( i + count ) == Xth ) count = count + 1 end do if ( count > multiplicity ) then multiplicity = count end if i = i + count else i = i + 1 end if end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function compute_knot_vector ( Xth_dir , degree , continuity ) result ( knot ) real ( rk ), intent ( in ), contiguous :: Xth_dir (:) integer , intent ( in ) :: degree integer , intent ( in ), contiguous :: continuity (:) real ( rk ), allocatable :: knot (:) knot = repelem ( Xth_dir , ( degree - continuity )) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause elemental pure function isinf ( x ) result ( output ) real ( rk ), intent ( in ) :: x logical :: output output = . false . if ( x > huge ( x )) output = . true . if ( x < - huge ( x )) output = . true . end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause elemental pure function isnan ( x ) result ( output ) real ( rk ), intent ( in ) :: x logical :: output output = . false . if ( x /= x ) output = . true . end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine insert_knot_A_5_1 ( p , UP , Pw , u , k , s , r , nq , UQ , Qw ) integer , intent ( in ) :: p , k , s , r real ( rk ), intent ( in ), contiguous :: UP ( 0 :), Pw ( 0 :,:) real ( rk ), intent ( in ) :: u real ( rk ), allocatable , intent ( out ) :: UQ (:), Qw (:,:) integer , intent ( out ) :: nq integer :: i , j , L , mp , dim , np real ( rk ), allocatable :: Rw (:,:) real ( rk ) :: alpha dim = size ( Pw , 2 ) np = size ( Pw , 1 ) - 1 mp = np + p + 1 nq = np + r allocate ( UQ ( 0 : mp + r )) allocate ( Qw ( 0 : nq , 1 : dim )) allocate ( Rw ( 0 : p , 1 : dim )) UQ ( 0 : k ) = UP ( 0 : k ) UQ ( k + 1 : k + r ) = u UQ ( k + 1 + r : mp + r ) = UP ( k + 1 : mp ) Qw ( 0 : k - p ,:) = Pw ( 0 : k - p ,:) Qw ( k - s + r : np + r ,:) = Pw ( k - s : np ,:) Rw ( 0 : p - s ,:) = Pw ( k - p : k - s ,:) do j = 1 , r L = k - p + j do i = 0 , p - j - s alpha = ( u - UP ( L + i )) / ( UP ( i + k + 1 ) - UP ( L + i )) Rw ( i ,:) = alpha * Rw ( i + 1 ,:) + ( 1.0_rk - alpha ) * Rw ( i ,:) end do Qw ( L ,:) = Rw ( 0 ,:) Qw ( k + r - j - s ,:) = Rw ( p - j - s ,:) end do Qw ( L + 1 : k - s - 1 ,:) = Rw ( 1 : k - s - 1 - L ,:) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function findspan ( n , degree , Xth , knot ) result ( s ) integer , intent ( in ) :: n , degree real ( rk ), intent ( in ) :: Xth real ( rk ), intent ( in ), contiguous :: knot (:) integer :: s integer :: low , high , mid if ( Xth == knot ( n + 2 )) then s = n return end if low = degree high = n + 1 mid = ( low + high ) / 2 do while ( Xth < knot ( mid + 1 ) . or . Xth >= knot ( mid + 2 )) if ( Xth < knot ( mid + 1 )) then high = mid else low = mid end if mid = ( low + high ) / 2 end do s = mid end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine elevate_degree_A_5_9 ( t , knot , degree , Xcw , nc_new , knot_new , Xcw_new ) integer , intent ( in ) :: t real ( rk ), intent ( in ), contiguous :: Xcw (:,:), knot (:) integer , intent ( in ) :: degree integer , intent ( out ) :: nc_new real ( rk ), allocatable , intent ( out ) :: Xcw_new (:,:), knot_new (:) real ( rk ), allocatable :: bezalfs (:,:), bpts (:,:), ebpts (:,:), Nextbpts (:,:), alfs (:) real ( rk ) :: inv , alpha1 , alpha2 , Xth1 , Xth2 , numer , den integer :: n , lbz , rbz , sv , tr , kj , first , knoti , last , alpha3 , dim , nc integer :: i , j , q , s , m , ph , ph2 , mpi , mh , r , a , b , Xcwi , oldr , mul integer , allocatable :: mlp (:) nc = size ( Xcw , 1 ) dim = size ( Xcw , 2 ) mlp = compute_multiplicity ( knot ) mlp = mlp + t nc_new = sum ( mlp ) - ( mlp ( 1 ) - 1 ) - 1 allocate ( Xcw_new ( nc_new , dim ), source = 0.0_rk ) allocate ( bezalfs ( degree + 1 , degree + t + 1 ), source = 0.0_rk ) allocate ( bpts ( degree + 1 , dim ), source = 0.0_rk ) allocate ( ebpts ( degree + t + 1 , dim ), source = 0.0_rk ) allocate ( Nextbpts ( degree + 1 , dim ), source = 0.0_rk ) allocate ( alfs ( degree ), source = 0.0_rk ) n = nc - 1 m = n + degree + 1 ph = degree + t ph2 = ph / 2 bezalfs ( 1 , 1 ) = 1.0_rk bezalfs ( degree + 1 , ph + 1 ) = 1.0_rk do i = 1 , ph2 inv = 1.0_rk / bincoeff ( ph , i ) mpi = min ( degree , i ) do j = max ( 0 , i - t ), mpi bezalfs ( j + 1 , i + 1 ) = inv * bincoeff ( degree , j ) * bincoeff ( t , i - j ) end do end do do i = ph2 + 1 , ph - 1 mpi = min ( degree , i ) do j = max ( 0 , i - t ), mpi bezalfs ( j + 1 , i + 1 ) = bezalfs ( degree - j + 1 , ph - i + 1 ) end do end do mh = ph knoti = ph + 1 r = - 1 a = degree b = degree + 1 Xcwi = 1 Xth1 = knot ( 1 ) Xcw_new ( 1 ,:) = Xcw ( 1 ,:) allocate ( knot_new ( sum ( mlp )), source = 0.0_rk ) knot_new ( 1 : ph + 1 ) = Xth1 do i = 0 , degree bpts ( i + 1 ,:) = Xcw ( i + 1 ,:) end do do while ( b < m ) i = b do while ( b < m . and . knot ( b + 1 ) == knot ( b + 2 )) b = b + 1 if ( b + 2 > size ( knot )) then exit end if end do mul = b - i + 1 mh = mh + mul + t Xth2 = knot ( b + 1 ) oldr = r r = degree - mul if ( oldr > 0 ) then lbz = ( oldr + 2 ) / 2 else lbz = 1 end if if ( r > 0 ) then rbz = ph - ( r + 1 ) / 2 else rbz = ph end if if ( r > 0 ) then numer = Xth2 - Xth1 do q = degree , mul + 1 , - 1 alfs ( q - mul ) = numer / ( knot ( a + q + 1 ) - Xth1 ) end do do j = 1 , r sv = r - j s = mul + j do q = degree , s , - 1 bpts ( q + 1 ,:) = ( 1.0_rk - alfs ( q - s + 1 )) * bpts ( q ,:) + alfs ( q - s + 1 ) * bpts ( q + 1 ,:) end do Nextbpts ( sv + 1 ,:) = bpts ( degree + 1 ,:) end do end if do i = lbz , ph ebpts ( i + 1 ,:) = 0.0_rk mpi = min ( degree , i ) do j = max ( 0 , i - t ), mpi ebpts ( i + 1 ,:) = bezalfs ( j + 1 , i + 1 ) * bpts ( j + 1 ,:) + ebpts ( i + 1 ,:) end do end do if ( oldr > 1 ) then first = knoti - 2 last = knoti den = Xth2 - Xth1 alpha3 = floor (( Xth2 - knot ( knoti )) / den ) do tr = 1 , oldr - 1 i = first j = last kj = j - knoti + 1 do while ( j - i > tr ) if ( i < Xcwi ) then alpha1 = ( Xth2 - knot ( i + 1 )) / ( Xth1 - knot ( i + 1 )) Xcw_new ( i + 1 ,:) = ( 1 - alpha1 ) * Xcw_new ( i ,:) + alpha1 * Xcw_new ( i + 1 ,:) end if if ( j >= lbz ) then if ( j - tr <= knoti - ph + oldr ) then alpha2 = ( Xth2 - knot_new ( j - tr + 1 )) / den ebpts ( kj + 1 ,:) = alpha2 * ebpts ( kj + 1 ,:) + ( 1 - alpha2 ) * ebpts ( kj + 2 ,:) else ebpts ( kj + 1 ,:) = ( 1 - alpha3 ) * ebpts (:, kj + 2 ) + alpha3 * ebpts ( kj + 1 ,:) end if end if i = i + 1 j = j - 1 kj = kj - 1 end do first = first - 1 last = last + 1 end do end if if ( a /= degree ) then do i = 0 , ph - oldr - 1 knot_new ( knoti + 1 ) = Xth1 knoti = knoti + 1 end do end if do j = lbz , rbz Xcw_new ( Xcwi + 1 ,:) = ebpts ( j + 1 ,:) Xcwi = Xcwi + 1 end do if ( b < m ) then do j = 0 , r - 1 bpts ( j + 1 ,:) = Nextbpts ( j + 1 ,:) end do do j = r , degree bpts ( j + 1 ,:) = Xcw ( b - degree + j + 1 ,:) end do a = b b = b + 1 Xth1 = Xth2 else do i = 0 , ph knot_new ( knoti + i + 1 ) = Xth2 end do end if end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function bincoeff ( n , k ) result ( b ) integer , intent ( in ) :: n , k real ( rk ) :: b b = floor ( 0.5_rk + exp ( factln ( n ) - factln ( k ) - factln ( n - k ))) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function factln ( n ) result ( f ) integer , intent ( in ) :: n real ( rk ) :: f if ( n <= 1 ) then f = 0.0_rk return end if f = log ( gamma ( real ( n + 1 , rk ))) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function hexahedron_Xc ( L , nc ) result ( Xc ) real ( rk ), intent ( in ) :: L ( 3 ) integer , intent ( in ) :: nc ( 3 ) real ( rk ), allocatable :: Xc (:,:) real ( rk ) :: dx , dy , dz integer :: i , j , k , nci dx = L ( 1 ) / real ( nc ( 1 ) - 1 , rk ) dy = L ( 2 ) / real ( nc ( 2 ) - 1 , rk ) dz = L ( 3 ) / real ( nc ( 3 ) - 1 , rk ) allocate ( Xc ( nc ( 1 ) * nc ( 2 ) * nc ( 3 ), 3 )) nci = 1 do k = 0 , nc ( 3 ) - 1 do j = 0 , nc ( 2 ) - 1 do i = 0 , nc ( 1 ) - 1 Xc ( nci , 1 ) = real ( i , rk ) * dx Xc ( nci , 2 ) = real ( j , rk ) * dy Xc ( nci , 3 ) = real ( k , rk ) * dz nci = nci + 1 end do end do end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function tetragon_Xc ( L , nc ) result ( Xc ) real ( rk ), intent ( in ) :: L ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), allocatable :: Xc (:,:) real ( rk ) :: dx , dy integer :: i , j , nci dx = L ( 1 ) / real ( nc ( 1 ) - 1 , rk ) dy = L ( 2 ) / real ( nc ( 2 ) - 1 , rk ) allocate ( Xc ( nc ( 1 ) * nc ( 2 ), 3 )) nci = 1 do j = 0 , nc ( 2 ) - 1 do i = 0 , nc ( 1 ) - 1 Xc ( nci , 1 ) = real ( i , rk ) * dx Xc ( nci , 2 ) = real ( j , rk ) * dy Xc ( nci , 3 ) = 0.0_rk nci = nci + 1 end do end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine remove_knots_A_5_8 ( p , knot , Pw , u , r , s , num , t , knot_new , Pw_new ) real ( rk ), intent ( in ) :: u integer , intent ( in ) :: p , r , s , num real ( rk ), intent ( in ), contiguous :: knot (:) real ( rk ), intent ( in ), contiguous :: Pw (:,:) real ( rk ), allocatable , intent ( out ) :: knot_new (:) real ( rk ), allocatable , intent ( out ) :: Pw_new (:,:) real ( rk ), allocatable :: Pw_copy (:,:), knot_copy (:) integer , intent ( out ) :: t real ( rk ) :: tol , alfi , alfj real ( rk ), allocatable :: temp (:,:) integer :: i , j , ii , jj , remflag , off , first , last , ord , fout , m , k , n , nc , dim , tt dim = size ( Pw , 2 ) nc = size ( Pw , 1 ) n = nc m = n + p + 1 ord = p + 1 fout = ( 2 * r - s - p ) / 2 last = r - s first = r - p Pw_copy = Pw knot_copy = knot ! TODO: tol = 1.0e-6_rk * minval ( Pw (:, dim )) / ( 1.0_rk + maxval ( sqrt ( sum ( Pw ** 2 , 2 )))) allocate ( temp ( 2 * p + 1 , dim ), source = 0.0_rk ) t = 0 do tt = 0 , num - 1 off = first - 1 temp ( 1 ,:) = Pw_copy ( off ,:) temp ( last + 1 - off + 1 ,:) = Pw_copy ( last + 1 ,:) i = first j = last ii = 1 jj = last - off remflag = 0 do while ( j - i > t ) alfi = ( u - knot_copy ( i )) / ( knot_copy ( i + ord + t ) - knot_copy ( i )) alfj = ( u - knot_copy ( j - t )) / ( knot_copy ( j + ord ) - knot_copy ( j - t )) temp ( ii + 1 ,:) = ( Pw_copy ( i ,:) - ( 1.0_rk - alfi ) * temp ( ii - 1 + 1 ,:)) / alfi temp ( jj + 1 ,:) = ( Pw_copy ( j ,:) - alfj * temp ( jj + 1 + 1 ,:)) / ( 1.0_rk - alfj ) i = i + 1 ii = ii + 1 j = j - 1 jj = jj - 1 end do if ( j - i <= t ) then if ( norm2 ( temp ( ii - 1 + 1 ,:) - temp ( jj + 1 + 1 ,:)) <= tol ) then remflag = 1 else alfi = ( u - knot_copy ( i )) / ( knot_copy ( i + ord + t ) - knot_copy ( i )) if ( norm2 ( Pw_copy ( i ,:) - ( alfi * temp ( ii + t + 1 + 1 ,:) + ( 1.0_rk - alfi ) * temp ( ii - 1 + 1 ,:))) <= tol ) then remflag = 1 end if end if end if if ( remflag == 0 ) then exit else i = first j = last do while ( j - i > t ) Pw_copy ( i ,:) = temp ( i - off + 1 ,:) Pw_copy ( j ,:) = temp ( j - off + 1 ,:) i = i + 1 j = j - 1 end do end if first = first - 1 last = last + 1 t = t + 1 end do if ( t == 0 ) then return end if do k = r + 1 , m knot_copy ( k - t ) = knot_copy ( k ) end do j = fout i = j do k = 1 , t - 1 if ( mod ( k , 2 ) == 1 ) then i = i + 1 else j = j - 1 end if end do do k = i + 1 , n Pw_copy ( j ,:) = Pw_copy ( k ,:) j = j + 1 end do knot_new = knot_copy ( 1 : size ( knot_copy ) - t ) Pw_new = Pw_copy ( 1 : size ( Pw_copy , 1 ) - t ,:) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function unique_integer ( vec ) result ( output ) integer , dimension (:), intent ( in ), contiguous :: vec integer , dimension (:), allocatable :: output integer :: i , j , k allocate ( output ( 0 )) do i = 1 , size ( vec ) k = 0 do j = 1 , size ( output ) if ( vec ( i ) == output ( j )) then k = k + 1 exit end if end do if ( k == 0 ) then output = [ output , vec ( i )] end if end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function unique_real ( vec ) result ( output ) real ( rk ), dimension (:), intent ( in ), contiguous :: vec real ( rk ), dimension (:), allocatable :: output integer :: i , j , k allocate ( output ( 0 )) do i = 1 , size ( vec ) k = 0 do j = 1 , size ( output ) if ( vec ( i ) == output ( j )) then k = k + 1 exit end if end do if ( k == 0 ) then output = [ output , vec ( i )] end if end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function rotation ( alpha , beta , theta ) result ( R ) real ( rk ), intent ( in ) :: alpha , beta , theta real ( rk ), dimension ( 3 , 3 ) :: R R ( 1 , 1 ) = cosd ( beta ) * cosd ( theta ) R ( 2 , 1 ) = cosd ( beta ) * sind ( theta ) R ( 3 , 1 ) = - sind ( beta ) R ( 1 , 2 ) = sind ( alpha ) * sind ( beta ) * cosd ( theta ) - cosd ( alpha ) * sind ( theta ) R ( 2 , 2 ) = sind ( alpha ) * sind ( beta ) * sind ( theta ) + cosd ( alpha ) * cosd ( theta ) R ( 3 , 2 ) = sind ( alpha ) * cosd ( beta ) R ( 1 , 3 ) = cosd ( alpha ) * sind ( beta ) * cosd ( theta ) + sind ( alpha ) * sind ( theta ) R ( 2 , 3 ) = cosd ( alpha ) * sind ( beta ) * sind ( theta ) - sind ( alpha ) * cosd ( theta ) R ( 3 , 3 ) = cosd ( alpha ) * cosd ( beta ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function det ( A ) result ( detA ) real ( rk ), intent ( in ) :: A (:,:) real ( rk ) :: detA if ( size ( A , 1 ) == size ( A , 2 )) then select case ( size ( A , 1 )) case ( 2 ) detA = A ( 1 , 1 ) * A ( 2 , 2 ) - A ( 1 , 2 ) * A ( 2 , 1 ) case ( 3 ) detA = & + A ( 1 , 1 ) * ( A ( 2 , 2 ) * A ( 3 , 3 ) - A ( 2 , 3 ) * A ( 3 , 2 ) )& - A ( 1 , 2 ) * ( A ( 2 , 1 ) * A ( 3 , 3 ) - A ( 2 , 3 ) * A ( 3 , 1 ) )& + A ( 1 , 3 ) * ( A ( 2 , 1 ) * A ( 3 , 2 ) - A ( 2 , 2 ) * A ( 3 , 1 ) ) end select elseif ( size ( A , 1 ) == 3 . and . size ( A , 2 ) == 2 ) then detA = & + A ( 1 , 1 ) * ( A ( 2 , 2 ) * 1.0_rk - A ( 3 , 2 ) * 1.0_rk )& - A ( 1 , 2 ) * ( A ( 2 , 1 ) * 1.0_rk - A ( 3 , 1 ) * 1.0_rk )& + 1.0_rk * ( A ( 2 , 1 ) * A ( 3 , 2 ) - A ( 3 , 1 ) * A ( 2 , 2 ) ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause recursive pure function inv ( A ) result ( A_inv ) real ( rk ), intent ( in ) :: A (:,:) real ( rk ), allocatable :: A_inv (:,:) if ( size ( A , 1 ) == size ( A , 2 )) then select case ( size ( A , 1 )) case ( 2 ) allocate ( A_inv ( size ( A , 1 ), size ( A , 2 ))) A_inv ( 1 , 1 ) = A ( 2 , 2 ) A_inv ( 1 , 2 ) = - A ( 1 , 2 ) A_inv ( 2 , 1 ) = - A ( 2 , 1 ) A_inv ( 2 , 2 ) = A ( 1 , 1 ) A_inv = A_inv / det ( A ) case ( 3 ) allocate ( A_inv ( size ( A , 1 ), size ( A , 2 ))) A_inv ( 1 , 1 ) = A ( 2 , 2 ) * A ( 3 , 3 ) - A ( 2 , 3 ) * A ( 3 , 2 ) A_inv ( 1 , 2 ) = A ( 1 , 3 ) * A ( 3 , 2 ) - A ( 1 , 2 ) * A ( 3 , 3 ) A_inv ( 1 , 3 ) = A ( 1 , 2 ) * A ( 2 , 3 ) - A ( 1 , 3 ) * A ( 2 , 2 ) A_inv ( 2 , 1 ) = A ( 2 , 3 ) * A ( 3 , 1 ) - A ( 2 , 1 ) * A ( 3 , 3 ) A_inv ( 2 , 2 ) = A ( 1 , 1 ) * A ( 3 , 3 ) - A ( 1 , 3 ) * A ( 3 , 1 ) A_inv ( 2 , 3 ) = A ( 1 , 3 ) * A ( 2 , 1 ) - A ( 1 , 1 ) * A ( 2 , 3 ) A_inv ( 3 , 1 ) = A ( 2 , 1 ) * A ( 3 , 2 ) - A ( 2 , 2 ) * A ( 3 , 1 ) A_inv ( 3 , 2 ) = A ( 1 , 2 ) * A ( 3 , 1 ) - A ( 1 , 1 ) * A ( 3 , 2 ) A_inv ( 3 , 3 ) = A ( 1 , 1 ) * A ( 2 , 2 ) - A ( 1 , 2 ) * A ( 2 , 1 ) A_inv = A_inv / det ( A ) end select elseif ( size ( A , 1 ) > size ( A , 2 )) then allocate ( A_inv ( size ( A , 2 ), size ( A , 1 ))) A_inv = transpose ( A ) A_inv = matmul ( inv ( matmul ( A_inv , A )), A_inv ) elseif ( size ( A , 1 ) < size ( A , 2 )) then allocate ( A_inv ( size ( A , 2 ), size ( A , 1 ))) A_inv = transpose ( A ) A_inv = matmul ( A_inv , inv ( matmul ( A , A_inv ))) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function dyad_t1_t1 ( a , b ) result ( c ) real ( rk ), intent ( in ), contiguous :: a (:) real ( rk ), intent ( in ), contiguous :: b (:) real ( rk ), allocatable :: c (:,:) integer :: i allocate ( c ( size ( a ), size ( b ))) do concurrent ( i = 1 : size ( c , 1 )) c ( i , :) = a ( i ) * b (:) end do end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine gauss_legendre_1D ( interval , degree , Xksi , Wksi ) real ( rk ), intent ( in ) :: interval ( 2 ) integer , intent ( in ) :: degree real ( rk ), allocatable , intent ( out ) :: Xksi (:), Wksi (:) allocate ( Xksi ( degree + 1 ), Wksi ( degree + 1 )) call gauss_legendre ( Xksi , Wksi , interval ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine gauss_legendre_2D ( interval1 , interval2 , degree , Xksi , Wksi ) real ( rk ), intent ( in ) :: interval1 ( 2 ), interval2 ( 2 ) integer , intent ( in ) :: degree ( 2 ) real ( rk ), allocatable , intent ( out ) :: Xksi (:,:), Wksi (:) real ( rk ), allocatable :: Xksi1 (:), Wksi1 (:), Xksi2 (:), Wksi2 (:) allocate ( Xksi1 ( degree ( 1 ) + 1 ), Wksi1 ( degree ( 1 ) + 1 )) allocate ( Xksi2 ( degree ( 2 ) + 1 ), Wksi2 ( degree ( 2 ) + 1 )) call gauss_legendre ( Xksi1 , Wksi1 , interval1 ) call gauss_legendre ( Xksi2 , Wksi2 , interval2 ) call ndgrid ( Xksi1 , Xksi2 , Xksi ) Wksi = kron ( Wksi1 , Wksi2 ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine gauss_legendre_3D ( interval1 , interval2 , interval3 , degree , Xksi , Wksi ) real ( rk ), intent ( in ) :: interval1 ( 2 ), interval2 ( 2 ), interval3 ( 2 ) integer , intent ( in ) :: degree ( 3 ) real ( rk ), allocatable , intent ( out ) :: Xksi (:,:), Wksi (:) real ( rk ), allocatable :: Xksi1 (:), Wksi1 (:), Xksi2 (:), Wksi2 (:), Xksi3 (:), Wksi3 (:) allocate ( Xksi1 ( degree ( 1 ) + 1 ), Wksi1 ( degree ( 1 ) + 1 )) allocate ( Xksi2 ( degree ( 2 ) + 1 ), Wksi2 ( degree ( 2 ) + 1 )) allocate ( Xksi3 ( degree ( 3 ) + 1 ), Wksi3 ( degree ( 3 ) + 1 )) call gauss_legendre ( Xksi1 , Wksi1 , interval1 ) call gauss_legendre ( Xksi2 , Wksi2 , interval2 ) call gauss_legendre ( Xksi3 , Wksi3 , interval3 ) call ndgrid ( Xksi1 , Xksi2 , Xksi3 , Xksi ) Wksi = kron ( kron ( Wksi3 , Wksi2 ), Wksi1 ) end subroutine !=============================================================================== end module forcad_utils","tags":"","loc":"sourcefile/forcad_utils.f90.html"},{"title":"shape_tetragon.f90 – ForCAD","text":"This file depends on sourcefile~~shape_tetragon.f90~~EfferentGraph sourcefile~shape_tetragon.f90 shape_tetragon.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_tetragon.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_tetragon use forcad implicit none type ( nurbs_surface ) :: shape !! Declare a NURBS surface object !----------------------------------------------------------------------------- ! Setting up the NURBS tetrangon !----------------------------------------------------------------------------- !> Set a tetragon with lengths of 2.0 and 3.0 and 3 and 4 control points in each direction !> The weights of the control points (Wc) are optional. call shape % set_tetragon ( L = [ 2.0_rk , 3.0_rk ], nc = [ 3 , 4 ]) !> Export the control points to a VTK file call shape % export_Xc ( 'vtk/shape_tetragon_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS surface !----------------------------------------------------------------------------- !> Generate the NURBS surface with resolutions of 30 in both dimensions call shape % create ( 30 , 30 ) !> Export the generated surface to a VTK file call shape % export_Xg ( 'vtk/shape_tetragon_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_tetragon_Xc.vtk' , 'vtk/shape_tetragon_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS surface object call shape % finalize () end program","tags":"","loc":"sourcefile/shape_tetragon.f90.html"},{"title":"forcad_nurbs_surface.f90 – ForCAD","text":"This file depends on sourcefile~~forcad_nurbs_surface.f90~~EfferentGraph sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Files dependent on this one sourcefile~~forcad_nurbs_surface.f90~~AfferentGraph sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~cmp_area.f90 cmp_area.f90 sourcefile~cmp_area.f90->sourcefile~forcad.f90 sourcefile~cmp_length.f90 cmp_length.f90 sourcefile~cmp_length.f90->sourcefile~forcad.f90 sourcefile~cmp_volume.f90 cmp_volume.f90 sourcefile~cmp_volume.f90->sourcefile~forcad.f90 sourcefile~demo_curve.f90 demo_curve.f90 sourcefile~demo_curve.f90->sourcefile~forcad.f90 sourcefile~demo_surface.f90 demo_surface.f90 sourcefile~demo_surface.f90->sourcefile~forcad.f90 sourcefile~demo_volume.f90 demo_volume.f90 sourcefile~demo_volume.f90->sourcefile~forcad.f90 sourcefile~example_curve_1.f90 example_curve_1.f90 sourcefile~example_curve_1.f90->sourcefile~forcad.f90 sourcefile~example_ppm1.f90 example_ppm1.f90 sourcefile~example_ppm1.f90->sourcefile~forcad.f90 sourcefile~example_ppm2.f90 example_ppm2.f90 sourcefile~example_ppm2.f90->sourcefile~forcad.f90 sourcefile~example_ppm3.f90 example_ppm3.f90 sourcefile~example_ppm3.f90->sourcefile~forcad.f90 sourcefile~example_surface_1.f90 example_surface_1.f90 sourcefile~example_surface_1.f90->sourcefile~forcad.f90 sourcefile~example_volume_1.f90 example_volume_1.f90 sourcefile~example_volume_1.f90->sourcefile~forcad.f90 sourcefile~nearest_point_1d.f90 nearest_point_1d.f90 sourcefile~nearest_point_1d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d.f90 nearest_point_2d.f90 sourcefile~nearest_point_2d.f90->sourcefile~forcad.f90 sourcefile~nearest_point_2d_bench.f90 nearest_point_2d_bench.f90 sourcefile~nearest_point_2d_bench.f90->sourcefile~forcad.f90 sourcefile~nearest_point_3d.f90 nearest_point_3d.f90 sourcefile~nearest_point_3d.f90->sourcefile~forcad.f90 sourcefile~put_to_nurbs.f90 put_to_nurbs.f90 sourcefile~put_to_nurbs.f90->sourcefile~forcad.f90 sourcefile~shape_c_1d.f90 shape_C_1d.f90 sourcefile~shape_c_1d.f90->sourcefile~forcad.f90 sourcefile~shape_c_2d.f90 shape_C_2d.f90 sourcefile~shape_c_2d.f90->sourcefile~forcad.f90 sourcefile~shape_c_3d.f90 shape_C_3d.f90 sourcefile~shape_c_3d.f90->sourcefile~forcad.f90 sourcefile~shape_circle.f90 shape_circle.f90 sourcefile~shape_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_circle.f90 shape_half_circle.f90 sourcefile~shape_half_circle.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_2d.f90 shape_half_ring_2d.f90 sourcefile~shape_half_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_half_ring_3d.f90 shape_half_ring_3d.f90 sourcefile~shape_half_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_hexahedron.f90 shape_hexahedron.f90 sourcefile~shape_hexahedron.f90->sourcefile~forcad.f90 sourcefile~shape_ring_2d.f90 shape_ring_2d.f90 sourcefile~shape_ring_2d.f90->sourcefile~forcad.f90 sourcefile~shape_ring_3d.f90 shape_ring_3d.f90 sourcefile~shape_ring_3d.f90->sourcefile~forcad.f90 sourcefile~shape_tetragon.f90 shape_tetragon.f90 sourcefile~shape_tetragon.f90->sourcefile~forcad.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> This module defines the 'nurbs_surface' type for representing a Non-Uniform Rational B-Spline (NURBS) surface. module forcad_nurbs_surface use forcad_utils , only : rk , basis_bspline , elemConn_C0 , kron , ndgrid , compute_multiplicity , compute_knot_vector , & basis_bspline_der , insert_knot_A_5_1 , findspan , elevate_degree_A_5_9 , remove_knots_A_5_8 , tetragon_Xc , & elemConn_Cn , unique , rotation , det , inv , gauss_leg implicit none private public nurbs_surface !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause type nurbs_surface real ( rk ), allocatable , private :: Xc (:,:) !! Control points (2D array: [nc(1)*nc(2), dim]) real ( rk ), allocatable , private :: Xg (:,:) !! Geometry points (2D array: [ng(1)*ng(2), dim]) real ( rk ), allocatable , private :: Wc (:) !! Weights for control points (1D array: [nc(1)*nc(2)]) real ( rk ), allocatable , private :: Xt1 (:) !! Evaluation parameter values in the first direction (1D array: [ng(1)]) real ( rk ), allocatable , private :: Xt2 (:) !! Evaluation parameter values in the second direction (1D array: [ng(2)]) real ( rk ), allocatable , private :: Xt (:,:) !! Evaluation parameter values (2D array: [ng(1)*ng(2), 2]) real ( rk ), allocatable , private :: knot1 (:) !! Knot vector in the first direction (1D array) real ( rk ), allocatable , private :: knot2 (:) !! Knot vector in the second direction (1D array) integer , private :: degree ( 2 ) !! Degree (order) of the surface integer , private :: nc ( 2 ) !! Number of control points in each direction integer , private :: ng ( 2 ) !! Number of geometry points in each direction integer , allocatable , private :: elemConn_Xc_vis (:,:) !! Connectivity for visualization of control points integer , allocatable , private :: elemConn_Xg_vis (:,:) !! Connectivity for visualization of geometry points integer , allocatable , private :: elemConn (:,:) !! IGA element connectivity contains procedure :: set1 !!> Set knot vectors, control points and weights for the NURBS surface object procedure :: set2 !!> Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights procedure :: set3 !!> Set Bezier or Rational Bezier surface using control points and weights procedure :: set4 !!> Set NURBS surface using degree, number of control points, control points and weights generic :: set => set1 , set2 , set3 , set4 !!> Set NURBS surface procedure :: create !!> Generate geometry points procedure :: cmp_Xg !!> Compute geometry points procedure , private :: get_Xc_all !!> Get all control points procedure , private :: get_Xci !!> Get i-th control point procedure , private :: get_Xcid !!> Get i-th control point in a specific direction generic :: get_Xc => get_Xc_all , get_Xci , get_Xcid !!> Get control points procedure , private :: get_Xg_all !!> Get all geometry points procedure , private :: get_Xgi !!> Get i-th geometry point procedure , private :: get_Xgid !!> Get i-th geometry point in a specific direction generic :: get_Xg => get_Xg_all , get_Xgi , get_Xgid !!> Get geometry points procedure , private :: get_Wc_all !!> Get all weights procedure , private :: get_Wci !!> Get i-th weight generic :: get_Wc => get_Wc_all , get_Wci !!> Get weights procedure :: get_Xt !!> Get parameter values procedure , private :: get_knot_all !!> Get all knot vectors procedure , private :: get_knoti !!> Get i-th knot value generic :: get_knot => get_knoti , get_knot_all !!> Get knot vector procedure :: get_ng !!> Get number of geometry points procedure , private :: get_nc_dir !!> Get number of control points in a specific direction procedure , private :: get_nc_all !!> Get number of control points in all directions generic :: get_nc => get_nc_all , get_nc_dir !!> Get number of control points procedure :: cmp_degree !!> Compute degree of the NURBS surface procedure , private :: get_degree_all !!> Get degree of the NURBS surface in both directions procedure , private :: get_degree_dir !!> Get degree of the NURBS surface in a specific direction generic :: get_degree => get_degree_all , get_degree_dir !!> Get degree of the NURBS surface procedure :: finalize !!> Finalize the NURBS surface object procedure :: cmp_elem_Xc_vis !!> Generate connectivity for control points procedure :: cmp_elem_Xg_vis !!> Generate connectivity for geometry points procedure :: cmp_elem !!> Generate IGA element connectivity procedure :: get_elem_Xc_vis !!> Get connectivity for control points procedure :: get_elem_Xg_vis !!> Get connectivity for geometry points procedure :: get_elem !!> Get IGA element connectivity procedure :: set_elem_Xc_vis !!> Set connectivity for control points procedure :: set_elem_Xg_vis !!> Set connectivity for geometry points procedure :: set_elem !!> Set IGA element connectivity procedure :: export_Xc !!> Export control points to VTK file procedure :: export_Xg !!> Export geometry points to VTK file procedure :: modify_Xc !!> Modify control points procedure :: modify_Wc !!> Modify weights procedure :: get_multiplicity !!> Compute and return the multiplicity of the knot vector procedure :: get_continuity !!> Compute and return the continuity of the NURBS surface procedure :: cmp_nc !!> Compute number of required control points procedure , private :: basis_vector !!> Compute the basis functions of the NURBS surface procedure , private :: basis_scalar !!> Compute the basis functions of the NURBS surface generic :: basis => basis_vector , basis_scalar !!> Compute the basis functions of the NURBS surface procedure , private :: derivative_vector !!> Compute the derivative of the NURBS surface procedure , private :: derivative_scalar !!> Compute the derivative of the NURBS surface generic :: derivative => derivative_vector , derivative_scalar !!> Compute the derivative of the NURBS surface procedure , private :: derivative2_vector !!> Compute the second derivative of the NURBS surface procedure , private :: derivative2_scalar !!> Compute the second derivative of the NURBS surface generic :: derivative2 => derivative2_vector , derivative2_scalar !!> Compute the second derivative of the NURBS surface procedure :: insert_knots !!> Insert knots into the knot vector procedure :: elevate_degree !!> Elevate degree procedure :: is_rational !!> Check if the NURBS surface is rational procedure :: remove_knots !!> Remove knots from the knot vector procedure :: rotate_Xc !!> Rotate control points procedure :: rotate_Xg !!> Rotate geometry points procedure :: translate_Xc !!> Translate control points procedure :: translate_Xg !!> Translate geometry points procedure :: show !!> Show the NURBS object using PyVista procedure :: nearest_point !!> Find the nearest point on the NURBS surface (Approximation) procedure :: nearest_point2 !!> Find the nearest point on the NURBS surface (Minimization - Newton's method) procedure :: ansatz !!> Compute the shape functions, derivative of shape functions and dA procedure :: cmp_area !!> Compute the area of the NURBS surface ! Shapes procedure :: set_tetragon !!> Set a tetragon procedure :: set_ring !!> Set a ring procedure :: set_half_ring !!> Set a half ring procedure :: set_C !!> Set a C-shape end type !=============================================================================== interface compute_Xg pure function compute_Xg_nurbs_2d ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_ng , f_Xc , f_Wc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Xg (:,:) end function pure function compute_Xg_bspline_2d ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_ng , f_Xc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:) real ( rk ), intent ( in ), contiguous :: f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), allocatable :: f_Xg (:,:) end function pure function compute_Xg_nurbs_2d_1point ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_Xc , f_Wc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Xg (:) end function pure function compute_Xg_bspline_2d_1point ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_Xc ) result ( f_Xg ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:) real ( rk ), intent ( in ), contiguous :: f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Xc (:,:) real ( rk ), allocatable :: f_Xg (:) end function end interface interface compute_dTgc pure subroutine compute_dTgc_nurbs_2d_vector ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_ng , f_Wc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_dTgc_bspline_2d_vector ( f_Xt , f_knot1 , f_knot2 , f_degree , nc , f_ng , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_dTgc_nurbs_2d_scalar ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_Wc , f_dTgc , f_Tgc , elem ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) integer , intent ( in ) :: elem (:) end subroutine pure subroutine compute_dTgc_bspline_2d_scalar ( f_Xt , f_knot1 , f_knot2 , f_degree , nc , f_dTgc , f_Tgc , elem ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) integer , intent ( in ) :: elem (:) end subroutine end interface interface compute_d2Tgc pure subroutine compute_d2Tgc_nurbs_2d_vector ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_ng , f_Wc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_d2Tgc_bspline_2d_vector ( f_Xt , f_knot1 , f_knot2 , f_degree , nc , f_ng , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:,:) end subroutine pure subroutine compute_d2Tgc_nurbs_2d_scalar ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_Wc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) end subroutine pure subroutine compute_d2Tgc_bspline_2d_scalar ( f_Xt , f_knot1 , f_knot2 , f_degree , nc , f_d2Tgc , f_dTgc , f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), allocatable , intent ( out ) :: f_d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: f_Tgc (:) end subroutine end interface interface compute_Tgc pure function compute_Tgc_nurbs_2d_vector ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_ng , f_Wc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Tgc (:,:) end function pure function compute_Tgc_bspline_2d_vector ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_ng ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:,:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), allocatable :: f_Tgc (:,:) end function pure function compute_Tgc_nurbs_2d_scalar ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc , f_Wc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Wc (:) real ( rk ), allocatable :: f_Tgc (:) end function pure function compute_Tgc_bspline_2d_scalar ( f_Xt , f_knot1 , f_knot2 , f_degree , f_nc ) result ( f_Tgc ) import :: rk real ( rk ), intent ( in ), contiguous :: f_Xt (:) real ( rk ), intent ( in ), contiguous :: f_knot1 (:), f_knot2 (:) integer , intent ( in ) :: f_degree ( 2 ) integer , intent ( in ) :: f_nc ( 2 ) real ( rk ), allocatable :: f_Tgc (:) end function end interface interface pure function nearest_point_help_2d ( f_ng , f_Xg , f_point_Xg ) result ( f_distances ) import :: rk integer , intent ( in ) :: f_ng ( 2 ) real ( rk ), intent ( in ), contiguous :: f_Xg (:,:) real ( rk ), intent ( in ), contiguous :: f_point_Xg (:) real ( rk ), allocatable :: f_distances (:) end function end interface contains !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set knot vectors, control points and weights for the NURBS surface object. pure subroutine set1 ( this , knot1 , knot2 , Xc , Wc ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: knot1 (:) real ( rk ), intent ( in ), contiguous :: knot2 (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( allocated ( this % knot1 )) deallocate ( this % knot1 ) if ( allocated ( this % knot2 )) deallocate ( this % knot2 ) if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % knot1 = knot1 this % knot2 = knot2 call this % cmp_degree () call this % cmp_nc () this % Xc = Xc if ( present ( Wc )) then if ( size ( Wc ) /= this % nc ( 1 ) * this % nc ( 2 )) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights pure subroutine set2 ( this , Xth_dir1 , Xth_dir2 , degree , continuity1 , continuity2 , Xc , Wc ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xth_dir1 (:), Xth_dir2 (:) integer , intent ( in ), contiguous :: degree (:) integer , intent ( in ), contiguous :: continuity1 (:), continuity2 (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) this % knot1 = compute_knot_vector ( Xth_dir1 , degree ( 1 ), continuity1 ) this % knot2 = compute_knot_vector ( Xth_dir2 , degree ( 2 ), continuity2 ) this % degree ( 1 ) = degree ( 1 ) this % degree ( 2 ) = degree ( 2 ) call this % cmp_nc () this % Xc = Xc if ( present ( Wc )) this % Wc = Wc end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause !> Set Bezier or Rational Bezier surface using control points and weights. pure subroutine set3 ( this , nc , Xc , Wc ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), contiguous :: nc (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % Xc = Xc this % nc = nc if ( allocated ( this % knot1 )) deallocate ( this % knot1 ) allocate ( this % knot1 ( 2 * this % nc ( 1 ))) this % knot1 ( 1 : this % nc ( 1 )) = 0.0_rk this % knot1 ( this % nc ( 1 ) + 1 : 2 * this % nc ( 1 )) = 1.0_rk if ( allocated ( this % knot2 )) deallocate ( this % knot2 ) allocate ( this % knot2 ( 2 * this % nc ( 2 ))) this % knot2 ( 1 : this % nc ( 2 )) = 0.0_rk this % knot2 ( this % nc ( 2 ) + 1 : 2 * this % nc ( 2 )) = 1.0_rk call this % cmp_degree () if ( present ( Wc )) then if ( size ( Wc ) /= this % nc ( 1 ) * this % nc ( 2 )) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set4 ( this , degree , nc , Xc , Wc ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), contiguous :: degree (:) integer , intent ( in ), contiguous :: nc (:) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) integer :: m ( 2 ), i if ( allocated ( this % Xc )) deallocate ( this % Xc ) this % Xc = Xc this % nc = nc this % degree = degree ! Size of knot vectors m = nc + degree + 1 if ( allocated ( this % knot1 )) deallocate ( this % knot1 ) allocate ( this % knot1 ( m ( 1 ))) this % knot1 ( 1 : degree ( 1 ) + 1 ) = 0.0_rk this % knot1 ( degree ( 1 ) + 2 : m ( 1 ) - degree ( 1 ) - 1 ) = [( real ( i , rk ) / ( m ( 1 ) - 2 * degree ( 1 ) - 1 ), i = 1 , m ( 1 ) - 2 * degree ( 1 ) - 2 )] this % knot1 ( m ( 1 ) - degree ( 1 ): m ( 1 )) = 1.0_rk if ( allocated ( this % knot2 )) deallocate ( this % knot2 ) allocate ( this % knot2 ( m ( 2 ))) this % knot2 ( 1 : degree ( 2 ) + 1 ) = 0.0_rk this % knot2 ( degree ( 2 ) + 2 : m ( 2 ) - degree ( 2 ) - 1 ) = [( real ( i , rk ) / ( m ( 2 ) - 2 * degree ( 2 ) - 1 ), i = 1 , m ( 2 ) - 2 * degree ( 2 ) - 2 )] this % knot2 ( m ( 2 ) - degree ( 2 ): m ( 2 )) = 1.0_rk if ( present ( Wc )) then if ( size ( Wc ) /= nc ( 1 ) * nc ( 2 )) then error stop 'Number of weights does not match the number of control points.' else if ( allocated ( this % Wc )) deallocate ( this % Wc ) this % Wc = Wc end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine create ( this , res1 , res2 , Xt1 , Xt2 , Xt ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), optional :: res1 , res2 real ( rk ), intent ( in ), contiguous , optional :: Xt1 (:), Xt2 (:) real ( rk ), contiguous , intent ( in ), optional :: Xt (:,:) integer :: i ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % knot1 ) . or . . not . allocated ( this % knot2 )) then error stop 'Knot vector(s) is/are not set.' end if ! Set parameter values if ( present ( Xt1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) this % Xt1 = Xt1 elseif ( present ( res1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) allocate ( this % Xt1 ( res1 )) this % Xt1 = [( real ( i - 1 , rk ) / real ( res1 - 1 , rk ), i = 1 , res1 )] ! else ! this%Xt1 = this%Xt1 end if ! Set parameter values if ( present ( Xt2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) this % Xt2 = Xt2 elseif ( present ( res2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) allocate ( this % Xt2 ( res2 )) this % Xt2 = [( real ( i - 1 , rk ) / real ( res2 - 1 , rk ), i = 1 , res2 )] ! else ! this%Xt2 = this%Xt2 end if if ( present ( Xt )) then this % Xt = Xt else ! Set number of geometry points this % ng ( 1 ) = size ( this % Xt1 , 1 ) this % ng ( 2 ) = size ( this % Xt2 , 1 ) call ndgrid ( this % Xt1 , this % Xt2 , this % Xt ) end if if ( allocated ( this % Xg )) deallocate ( this % Xg ) if ( this % is_rational ()) then ! NURBS this % Xg = compute_Xg (& this % Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % ng , this % Xc , this % Wc ) else ! B-Spline this % Xg = compute_Xg (& this % Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % ng , this % Xc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_Xg ( this , Xt ) result ( Xg ) class ( nurbs_surface ), intent ( in ) :: this real ( rk ), contiguous , intent ( in ) :: Xt (:) real ( rk ), allocatable :: Xg (:) ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % knot1 ) . or . . not . allocated ( this % knot2 )) then error stop 'Knot vector(s) is/are not set.' end if if ( this % is_rational ()) then ! NURBS Xg = compute_Xg ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % Xc , this % Wc ) else ! B-Spline Xg = compute_Xg ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % Xc ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xc_all ( this ) result ( Xc ) class ( nurbs_surface ), intent ( in ) :: this real ( rk ), allocatable :: Xc (:,:) if ( allocated ( this % Xc )) then Xc = this % Xc else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xci ( this , n ) result ( Xc ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ), allocatable :: Xc (:) if ( allocated ( this % Xc )) then if ( n < lbound ( this % Xc , 1 ) . or . n > ubound ( this % Xc , 1 )) then error stop 'Invalid index for control points.' end if Xc = this % Xc ( n ,:) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xcid ( this , n , dir ) result ( Xc ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: n integer , intent ( in ) :: dir real ( rk ) :: Xc if ( allocated ( this % Xc )) then if ( n < lbound ( this % Xc , 1 ) . or . n > ubound ( this % Xc , 1 )) then error stop 'Invalid index for control points.' end if if ( dir < lbound ( this % Xc , 2 ) . or . dir > ubound ( this % Xc , 2 )) then error stop 'Invalid direction for control points.' end if Xc = this % Xc ( n , dir ) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xg_all ( this ) result ( Xg ) class ( nurbs_surface ), intent ( in ) :: this real ( rk ), allocatable :: Xg (:,:) if ( allocated ( this % Xg )) then Xg = this % Xg else error stop 'Geometry points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xgi ( this , n ) result ( Xg ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ), allocatable :: Xg (:) if ( allocated ( this % Xg )) then if ( n < lbound ( this % Xg , 1 ) . or . n > ubound ( this % Xg , 1 )) then error stop 'Invalid index for geometry points.' end if Xg = this % Xg ( n ,:) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xgid ( this , n , dir ) result ( Xg ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: n integer , intent ( in ) :: dir real ( rk ) :: Xg if ( allocated ( this % Xg )) then if ( n < lbound ( this % Xg , 1 ) . or . n > ubound ( this % Xg , 1 )) then error stop 'Invalid index for geometry points.' end if if ( dir < lbound ( this % Xg , 2 ) . or . dir > ubound ( this % Xg , 2 )) then error stop 'Invalid direction for geometry points.' end if Xg = this % Xg ( n , dir ) else error stop 'Control points are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Wc_all ( this ) result ( Wc ) class ( nurbs_surface ), intent ( in ) :: this real ( rk ), allocatable :: Wc (:) if ( allocated ( this % Wc )) then Wc = this % Wc else error stop 'The NURBS surface is not rational or weights are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Wci ( this , n ) result ( Wc ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: n real ( rk ) :: Wc if ( allocated ( this % Wc )) then if ( n < lbound ( this % Wc , 1 ) . or . n > ubound ( this % Wc , 1 )) then error stop 'Invalid index for weights.' end if Wc = this % Wc ( n ) else error stop 'The NURBS surface is not rational or weights are not set.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_Xt ( this , dir ) result ( Xt ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: dir real ( rk ), allocatable :: Xt (:) if ( dir == 1 ) then if ( allocated ( this % Xt1 )) then Xt = this % Xt1 else error stop 'Parameter values are not set.' end if elseif ( dir == 2 ) then if ( allocated ( this % Xt2 )) then Xt = this % Xt2 else error stop 'Parameter values are not set.' end if else error stop 'Invalid direction for parameter values.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_ng ( this ) result ( ng ) class ( nurbs_surface ), intent ( in ) :: this integer :: ng ( 2 ) ng = this % ng end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_degree ( this , dir ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), optional :: dir integer , allocatable :: m1 (:), m2 (:) if ( present ( dir )) then if ( dir == 1 ) then m1 = this % get_multiplicity ( 1 ) this % degree ( 1 ) = m1 ( 1 ) - 1 else if ( dir == 2 ) then m2 = this % get_multiplicity ( 2 ) this % degree ( 2 ) = m2 ( 1 ) - 1 else error stop 'Invalid direction for degree.' end if else m1 = this % get_multiplicity ( 1 ) this % degree ( 1 ) = m1 ( 1 ) - 1 m2 = this % get_multiplicity ( 2 ) this % degree ( 2 ) = m2 ( 1 ) - 1 end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_degree_all ( this ) result ( degree ) class ( nurbs_surface ), intent ( in ) :: this integer :: degree ( 2 ) degree = this % degree end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_degree_dir ( this , dir ) result ( degree ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: dir integer :: degree if ( dir == 1 ) then degree = this % degree ( 1 ) else if ( dir == 2 ) then degree = this % degree ( 2 ) else error stop 'Invalid direction for degree.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_knot_all ( this , dir ) result ( knot ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: dir real ( rk ), allocatable :: knot (:) if ( dir == 1 ) then if ( allocated ( this % knot1 )) then knot = this % knot1 else error stop 'Knot vector is not set.' end if elseif ( dir == 2 ) then if ( allocated ( this % knot2 )) then knot = this % knot2 else error stop 'Knot vector is not set.' end if else error stop 'Invalid direction for knot vector.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_knoti ( this , dir , i ) result ( knot ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: dir integer , intent ( in ) :: i real ( rk ) :: knot if ( dir == 1 ) then if ( allocated ( this % knot1 )) then if ( i < 1 . or . i > size ( this % knot1 )) then error stop 'Invalid index for knot vector.' else knot = this % knot1 ( i ) end if else error stop 'Knot vector is not set.' end if elseif ( dir == 2 ) then if ( allocated ( this % knot2 )) then if ( i < 1 . or . i > size ( this % knot2 )) then error stop 'Invalid index for knot vector.' else knot = this % knot2 ( i ) end if else error stop 'Knot vector is not set.' end if else error stop 'Invalid direction for knot vector.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine finalize ( this ) class ( nurbs_surface ), intent ( inout ) :: this if ( allocated ( this % Xc )) deallocate ( this % Xc ) if ( allocated ( this % Xg )) deallocate ( this % Xg ) if ( allocated ( this % Wc )) deallocate ( this % Wc ) if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) if ( allocated ( this % Xt )) deallocate ( this % Xt ) if ( allocated ( this % knot1 )) deallocate ( this % knot1 ) if ( allocated ( this % knot2 )) deallocate ( this % knot2 ) if ( allocated ( this % elemConn_Xc_vis )) deallocate ( this % elemConn_Xc_vis ) if ( allocated ( this % elemConn_Xg_vis )) deallocate ( this % elemConn_Xg_vis ) if ( allocated ( this % elemConn )) deallocate ( this % elemConn ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem_Xc_vis ( this , p ) result ( elemConn ) class ( nurbs_surface ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) integer , intent ( in ), contiguous , optional :: p (:) if ( present ( p )) then elemConn = elemConn_C0 ( this % nc ( 1 ), this % nc ( 2 ), p ( 1 ), p ( 2 )) else elemConn = elemConn_C0 ( this % nc ( 1 ), this % nc ( 2 ), 1 , 1 ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem_Xg_vis ( this , p ) result ( elemConn ) class ( nurbs_surface ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) integer , intent ( in ), contiguous , optional :: p (:) if ( present ( p )) then elemConn = elemConn_C0 ( this % ng ( 1 ), this % ng ( 2 ), p ( 1 ), p ( 2 )) else elemConn = elemConn_C0 ( this % ng ( 1 ), this % ng ( 2 ), 1 , 1 ) end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine export_Xc ( this , filename ) class ( nurbs_surface ), intent ( in ) :: this character ( len =* ), intent ( in ) :: filename integer :: i , nc , nunit integer , allocatable :: elemConn (:,:) ! check if (. not . allocated ( this % Xc )) then error stop 'Control points are not set.' end if if (. not . allocated ( this % elemConn_Xc_vis )) then elemConn = this % cmp_elem_Xc_vis () else elemConn = this % elemConn_Xc_vis end if nc = size ( this % Xc , 1 ) open ( newunit = nunit , file = filename , action = 'write' ) write ( nunit , '(a)' ) '# vtk DataFile Version 2.0' write ( nunit , '(a)' ) 'Generated by ForCAD' write ( nunit , '(a)' ) 'ASCII' write ( nunit , '(a)' ) 'DATASET UNSTRUCTURED_GRID' write ( nunit , '(a,\" \",g0,\" \",a)' ) 'POINTS' , nc , 'double' if ( size ( this % Xc , 2 ) == 2 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xc ( i , 1 ), this % Xc ( i , 2 ), 0.0_rk , i = 1 , nc ) elseif ( size ( this % Xc , 2 ) == 3 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xc ( i , 1 ), this % Xc ( i , 2 ), this % Xc ( i , 3 ) , i = 1 , nc ) else error stop 'Invalid dimension for control points.' end if write ( nunit , '(a,\" \",g0,\" \",g0)' ) 'CELLS' , size ( elemConn , 1 ), size ( elemConn , 1 ) * ( size ( elemConn , 2 ) + 1 ) write ( nunit , '(g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0)' )& ( 4 , elemConn ( i , 1 ) - 1 , elemConn ( i , 2 ) - 1 , elemConn ( i , 4 ) - 1 , elemConn ( i , 3 ) - 1 , i = 1 , size ( elemConn , 1 )) write ( nunit , '(a,\" \",g0)' ) 'CELL_TYPES' , size ( elemConn , 1 ) write ( nunit , '(g0)' ) ( 9 , i = 1 , size ( elemConn , 1 )) close ( nunit ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine export_Xg ( this , filename ) class ( nurbs_surface ), intent ( in ) :: this character ( len =* ), intent ( in ) :: filename integer :: i , ng , nunit integer , allocatable :: elemConn (:,:) ! check if (. not . allocated ( this % Xg )) then error stop 'Geometry points are not set.' end if if (. not . allocated ( this % elemConn_Xg_vis )) then elemConn = this % cmp_elem_Xg_vis () else elemConn = this % elemConn_Xg_vis end if ng = size ( this % Xg , 1 ) open ( newunit = nunit , file = filename , action = 'write' ) write ( nunit , '(a)' ) '# vtk DataFile Version 2.0' write ( nunit , '(a)' ) 'Generated by ForCAD' write ( nunit , '(a)' ) 'ASCII' write ( nunit , '(a)' ) 'DATASET UNSTRUCTURED_GRID' write ( nunit , '(a,\" \",g0,\" \",a)' ) 'POINTS' , ng , 'double' if ( size ( this % Xg , 2 ) == 2 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xg ( i , 1 ), this % Xg ( i , 2 ), 0.0_rk , i = 1 , ng ) elseif ( size ( this % Xg , 2 ) == 3 ) then write ( nunit , '(g0,\" \",g0,\" \",g0)' ) ( this % Xg ( i , 1 ), this % Xg ( i , 2 ), this % Xg ( i , 3 ) , i = 1 , ng ) else error stop 'Invalid dimension for geometry points.' end if write ( nunit , '(a,\" \",g0,\" \",g0)' ) 'CELLS' , size ( elemConn , 1 ), size ( elemConn , 1 ) * ( size ( elemConn , 2 ) + 1 ) write ( nunit , '(g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0,\" \",g0)' )& ( 4 , elemConn ( i , 1 ) - 1 , elemConn ( i , 2 ) - 1 , elemConn ( i , 4 ) - 1 , elemConn ( i , 3 ) - 1 , i = 1 , size ( elemConn , 1 )) write ( nunit , '(a,\" \",g0)' ) 'CELL_TYPES' , size ( elemConn , 1 ) write ( nunit , '(g0)' ) ( 9 , i = 1 , size ( elemConn , 1 )) close ( nunit ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine modify_Xc ( this , X , num , dir ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: X integer , intent ( in ) :: num integer , intent ( in ) :: dir if ( allocated ( this % Xc )) then this % Xc ( num , dir ) = X if ( allocated ( this % Wc )) then call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), Xc = this % get_Xc (), Wc = this % get_Wc ()) else call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), Xc = this % get_Xc ()) end if else error stop 'Control points are not set.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine modify_Wc ( this , W , num ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: W integer , intent ( in ) :: num if ( allocated ( this % Wc )) then this % Wc ( num ) = W if ( allocated ( this % knot1 ) . and . allocated ( this % knot2 )) then call this % set ( knot1 = this % get_knot ( 1 ), knot2 = this % get_knot ( 2 ), Xc = this % get_Xc (), Wc = this % get_Wc ()) else call this % set ( nc = this % nc , Xc = this % get_Xc (), Wc = this % get_Wc ()) end if else error stop 'The NURBS surface is not rational.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_multiplicity ( this , dir ) result ( m ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: dir integer , allocatable :: m (:) if ( dir == 1 ) then ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else m = compute_multiplicity ( this % knot1 ) end if elseif ( dir == 2 ) then ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else m = compute_multiplicity ( this % knot2 ) end if else error stop 'Invalid direction.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_continuity ( this , dir ) result ( c ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: dir integer , allocatable :: c (:) if ( dir == 1 ) then ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else c = this % degree ( 1 ) - compute_multiplicity ( this % knot1 ) end if elseif ( dir == 2 ) then ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else c = this % degree ( 2 ) - compute_multiplicity ( this % knot2 ) end if else error stop 'Invalid direction.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_nc ( this , dir ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), optional :: dir if ( present ( dir )) then if ( dir == 1 ) then ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else this % nc ( 1 ) = sum ( compute_multiplicity ( this % knot1 )) - this % degree ( 1 ) - 1 end if elseif ( dir == 2 ) then ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else this % nc ( 2 ) = sum ( compute_multiplicity ( this % knot2 )) - this % degree ( 2 ) - 1 end if else error stop 'Invalid direction.' end if else ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else this % nc ( 1 ) = sum ( compute_multiplicity ( this % knot1 )) - this % degree ( 1 ) - 1 end if ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else this % nc ( 2 ) = sum ( compute_multiplicity ( this % knot2 )) - this % degree ( 2 ) - 1 end if end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_nc_all ( this ) result ( nc ) class ( nurbs_surface ), intent ( in ) :: this integer :: nc ( 2 ) nc = this % nc end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_nc_dir ( this , dir ) result ( nc ) class ( nurbs_surface ), intent ( in ) :: this integer , intent ( in ) :: dir integer :: nc if ( dir == 1 ) then ! check if (. not . allocated ( this % knot1 )) then error stop 'Knot vector is not set.' else nc = sum ( compute_multiplicity ( this % knot1 )) - this % degree ( 1 ) - 1 end if elseif ( dir == 2 ) then ! check if (. not . allocated ( this % knot2 )) then error stop 'Knot vector is not set.' else nc = sum ( compute_multiplicity ( this % knot2 )) - this % degree ( 2 ) - 1 end if else error stop 'Invalid direction.' end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative_vector ( this , res1 , res2 , Xt1 , Xt2 , dTgc , Tgc ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), optional :: res1 , res2 real ( rk ), intent ( in ), contiguous , optional :: Xt1 (:), Xt2 (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:,:) integer :: i real ( rk ), allocatable :: Xt (:,:) ! Set parameter values if ( present ( Xt1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) this % Xt1 = Xt1 elseif ( present ( res1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) allocate ( this % Xt1 ( res1 )) this % Xt1 = [( real ( i - 1 , rk ) / real ( res1 - 1 , rk ), i = 1 , res1 )] ! else ! this%Xt1 = this%Xt1 end if ! Set parameter values if ( present ( Xt2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) this % Xt2 = Xt2 elseif ( present ( res2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) allocate ( this % Xt2 ( res2 )) this % Xt2 = [( real ( i - 1 , rk ) / real ( res2 - 1 , rk ), i = 1 , res2 )] ! else ! this%Xt2 = this%Xt2 end if ! Set number of geometry points this % ng ( 1 ) = size ( this % Xt1 , 1 ) this % ng ( 2 ) = size ( this % Xt2 , 1 ) call ndgrid ( this % Xt1 , this % Xt2 , Xt ) if ( this % is_rational ()) then ! NURBS call compute_dTgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % ng , this % Wc , dTgc , Tgc ) else ! B-Spline call compute_dTgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % ng , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative_scalar ( this , Xt , dTgc , Tgc , elem ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xt (:) integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:) if ( this % is_rational ()) then ! NURBS call compute_dTgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % Wc , dTgc , Tgc , elem ) else ! B-Spline call compute_dTgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , dTgc , Tgc , elem ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative2_vector ( this , res1 , res2 , Xt1 , Xt2 , d2Tgc , dTgc , Tgc ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), optional :: res1 , res2 real ( rk ), intent ( in ), contiguous , optional :: Xt1 (:), Xt2 (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ), optional :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:,:) integer :: i real ( rk ), allocatable :: Xt (:,:) ! Set parameter values if ( present ( Xt1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) this % Xt1 = Xt1 elseif ( present ( res1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) allocate ( this % Xt1 ( res1 )) this % Xt1 = [( real ( i - 1 , rk ) / real ( res1 - 1 , rk ), i = 1 , res1 )] ! else ! this%Xt1 = this%Xt1 end if ! Set parameter values if ( present ( Xt2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) this % Xt2 = Xt2 elseif ( present ( res2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) allocate ( this % Xt2 ( res2 )) this % Xt2 = [( real ( i - 1 , rk ) / real ( res2 - 1 , rk ), i = 1 , res2 )] ! else ! this%Xt2 = this%Xt2 end if ! Set number of geometry points this % ng ( 1 ) = size ( this % Xt1 , 1 ) this % ng ( 2 ) = size ( this % Xt2 , 1 ) call ndgrid ( this % Xt1 , this % Xt2 , Xt ) if ( this % is_rational ()) then ! NURBS call compute_d2Tgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % ng , this % Wc , d2Tgc , dTgc , Tgc ) else ! B-Spline call compute_d2Tgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % ng , d2Tgc , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine derivative2_scalar ( this , Xt , d2Tgc , dTgc , Tgc ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: dTgc (:,:) real ( rk ), allocatable , intent ( out ), optional :: Tgc (:) if ( this % is_rational ()) then ! NURBS call compute_d2Tgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % Wc , d2Tgc , dTgc , Tgc ) else ! B-Spline call compute_d2Tgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , d2Tgc , dTgc , Tgc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine basis_vector ( this , res1 , res2 , Xt1 , Xt2 , Tgc ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), optional :: res1 , res2 real ( rk ), intent ( in ), contiguous , optional :: Xt1 (:), Xt2 (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) integer :: i real ( rk ), allocatable :: Xt (:,:) ! Set parameter values if ( present ( Xt1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) this % Xt1 = Xt1 elseif ( present ( res1 )) then if ( allocated ( this % Xt1 )) deallocate ( this % Xt1 ) allocate ( this % Xt1 ( res1 )) this % Xt1 = [( real ( i - 1 , rk ) / real ( res1 - 1 , rk ), i = 1 , res1 )] ! else ! this%Xt1 = this%Xt1 end if ! Set parameter values if ( present ( Xt2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) this % Xt2 = Xt2 elseif ( present ( res2 )) then if ( allocated ( this % Xt2 )) deallocate ( this % Xt2 ) allocate ( this % Xt2 ( res2 )) this % Xt2 = [( real ( i - 1 , rk ) / real ( res2 - 1 , rk ), i = 1 , res2 )] ! else ! this%Xt2 = this%Xt2 end if ! Set number of geometry points this % ng ( 1 ) = size ( this % Xt1 , 1 ) this % ng ( 2 ) = size ( this % Xt2 , 1 ) call ndgrid ( this % Xt1 , this % Xt2 , Xt ) if ( this % is_rational ()) then ! NURBS Tgc = compute_Tgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % ng , this % Wc ) else ! B-Spline Tgc = compute_Tgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % ng ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine basis_scalar ( this , Xt , Tgc ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: Xt (:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) if ( this % is_rational ()) then ! NURBS Tgc = compute_Tgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc , this % Wc ) else ! B-Spline Tgc = compute_Tgc ( Xt , this % knot1 , this % knot2 , this % degree , this % nc ) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine insert_knots ( this , dir , Xth , r ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ) :: dir real ( rk ), intent ( in ), contiguous :: Xth (:) integer , intent ( in ), contiguous :: r (:) integer :: k , i , s , dim , j , n_new real ( rk ), allocatable :: Xc (:,:), Xcw (:,:), Xcw_new (:,:), Xc_new (:,:), Wc_new (:), knot_new (:) real ( rk ), allocatable :: Xc3 (:,:,:) if ( dir == 1 ) then ! direction 1 if ( this % is_rational ()) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 1 ) - 1 , this % degree ( 1 ), Xth ( i ), this % knot1 ) if ( this % knot1 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot1 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xcw = reshape ( Xcw ,[ this % nc ( 1 ), this % nc ( 2 ) * ( dim + 1 )]) call insert_knot_A_5_1 (& this % degree ( 1 ),& this % knot1 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xcw_new ) Xcw_new = reshape ( Xcw_new ,[ this % nc ( 2 ) * ( n_new + 1 ), dim + 1 ]) allocate ( Xc_new ( 1 : this % nc ( 2 ) * ( n_new + 1 ), 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 2 ) * ( n_new + 1 ))) do j = 1 , this % nc ( 2 ) * ( n_new + 1 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 1 ) - 1 , this % degree ( 1 ), Xth ( i ), this % knot1 ) if ( this % knot1 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot1 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) Xc = reshape ( this % Xc ,[ this % nc ( 1 ), this % nc ( 2 ) * dim ]) call insert_knot_A_5_1 (& this % degree ( 1 ),& this % knot1 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xc_new ) Xc_new = reshape ( Xc_new ,[( this % nc ( 2 )) * ( n_new + 1 ), dim ]) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), Xc = Xc_new ) end do end if elseif ( dir == 2 ) then ! direction 2 if ( this % is_rational ()) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 2 ) - 1 , this % degree ( 2 ), Xth ( i ), this % knot2 ) if ( this % knot2 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot2 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc3 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), dim + 1 ]) Xc3 = reshape ( Xc3 , [ this % nc ( 2 ), this % nc ( 1 ), dim + 1 ], order = [ 2 , 1 , 3 ]) Xcw = reshape ( Xc3 ,[ this % nc ( 2 ), this % nc ( 1 ) * ( dim + 1 )]) call insert_knot_A_5_1 (& this % degree ( 2 ),& this % knot2 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xcw_new ) Xc3 = reshape ( Xcw_new , [ n_new + 1 , this % nc ( 1 ), dim + 1 ]) Xc3 = reshape ( Xc3 , [ this % nc ( 1 ), n_new + 1 , dim + 1 ], order = [ 2 , 1 , 3 ]) Xcw_new = reshape ( Xc3 ,[( this % nc ( 1 )) * ( n_new + 1 ), dim + 1 ]) allocate ( Xc_new ( 1 :( n_new + 1 ) * this % nc ( 1 ), 1 : dim )) allocate ( Wc_new ( 1 :( n_new + 1 ) * this % nc ( 1 ))) do j = 1 , ( n_new + 1 ) * this % nc ( 1 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 2 ) - 1 , this % degree ( 2 ), Xth ( i ), this % knot2 ) if ( this % knot2 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot2 , Xth ( i )) else s = 0 end if dim = size ( this % Xc , 2 ) Xc3 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), dim ]) Xc3 = reshape ( Xc3 , [ this % nc ( 2 ), this % nc ( 1 ), dim ], order = [ 2 , 1 , 3 ]) Xc = reshape ( Xc3 ,[ this % nc ( 2 ), this % nc ( 1 ) * dim ]) call insert_knot_A_5_1 (& this % degree ( 2 ),& this % knot2 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& n_new ,& knot_new ,& Xc_new ) Xc3 = reshape ( Xc_new , [ n_new + 1 , this % nc ( 1 ), dim ]) Xc3 = reshape ( Xc3 , [ this % nc ( 1 ), n_new + 1 , dim ], order = [ 2 , 1 , 3 ]) Xc_new = reshape ( Xc3 ,[( this % nc ( 1 )) * ( n_new + 1 ), dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , Xc = Xc_new ) end do end if else error stop 'Invalid direction.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine elevate_degree ( this , dir , t ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ) :: dir integer , intent ( in ) :: t real ( rk ), allocatable :: Xc (:,:), Xcw (:,:), Xcw_new (:,:), knot_new (:), Xc_new (:,:), Wc_new (:) integer :: dim , j , nc_new real ( rk ), allocatable :: Xc3 (:,:,:) if ( dir == 1 ) then ! direction 1 if ( this % is_rational ()) then ! NURBS dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xcw = reshape ( Xcw ,[ this % nc ( 1 ), this % nc ( 2 ) * ( dim + 1 )], order = [ 1 , 2 ]) call elevate_degree_A_5_9 ( t , this % knot1 , this % degree ( 1 ), Xcw , nc_new , knot_new , Xcw_new ) Xcw_new = reshape ( Xcw_new ,[ this % nc ( 2 ) * nc_new , dim + 1 ], order = [ 1 , 2 ]) allocate ( Xc_new ( 1 : this % nc ( 2 ) * nc_new , 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 2 ) * nc_new )) do j = 1 , this % nc ( 2 ) * nc_new Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) else ! B-Spline dim = size ( this % Xc , 2 ) Xc = reshape ( this % Xc ,[ this % nc ( 1 ), this % nc ( 2 ) * ( dim )], order = [ 1 , 2 ]) call elevate_degree_A_5_9 ( t , this % knot1 , this % degree ( 1 ), Xc , nc_new , knot_new , Xc_new ) Xc_new = reshape ( Xc_new ,[ this % nc ( 2 ) * nc_new , dim ], order = [ 1 , 2 ]) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), Xc = Xc_new ) deallocate ( Xc , Xc_new ) end if elseif ( dir == 2 ) then ! direction 2 if ( this % is_rational ()) then ! NURBS dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc3 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), dim + 1 ]) Xc3 = reshape ( Xc3 , [ this % nc ( 2 ), this % nc ( 1 ), dim + 1 ], order = [ 2 , 1 , 3 ]) Xcw = reshape ( Xc3 ,[ this % nc ( 2 ), this % nc ( 1 ) * ( dim + 1 )]) call elevate_degree_A_5_9 ( t , this % knot2 , this % degree ( 2 ), Xcw , nc_new , knot_new , Xcw_new ) Xc3 = reshape ( Xcw_new , [ nc_new , this % nc ( 1 ), dim + 1 ]) Xc3 = reshape ( Xc3 , [ this % nc ( 1 ), nc_new , dim + 1 ], order = [ 2 , 1 , 3 ]) Xcw_new = reshape ( Xc3 ,[( this % nc ( 1 )) * nc_new , dim + 1 ]) allocate ( Xc_new ( 1 : nc_new * this % nc ( 1 ), 1 : dim )) allocate ( Wc_new ( 1 : nc_new * this % nc ( 1 ))) do j = 1 , nc_new * this % nc ( 1 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw , Xcw_new , Xc_new , Wc_new ) else ! B-Spline dim = size ( this % Xc , 2 ) Xc3 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), dim ]) Xc3 = reshape ( Xc3 , [ this % nc ( 2 ), this % nc ( 1 ), dim ], order = [ 2 , 1 , 3 ]) Xc = reshape ( Xc3 ,[ this % nc ( 2 ), this % nc ( 1 ) * dim ]) call elevate_degree_A_5_9 ( t , this % knot2 , this % degree ( 2 ), Xc , nc_new , knot_new , Xc_new ) Xc3 = reshape ( Xc_new , [ nc_new , this % nc ( 1 ), dim ]) Xc3 = reshape ( Xc3 , [ this % nc ( 1 ), nc_new , dim ], order = [ 2 , 1 , 3 ]) Xc_new = reshape ( Xc3 ,[( this % nc ( 1 )) * nc_new , dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , Xc = Xc_new ) end if else error stop 'Invalid direction.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function is_rational ( this ) result ( r ) class ( nurbs_surface ), intent ( in ) :: this logical :: r r = . false . if ( allocated ( this % Wc )) then if ( any ( this % Wc /= this % Wc ( 1 ))) then r = . true . end if end if end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem_Xc_vis ( this , elemConn ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn_Xc_vis )) deallocate ( this % elemConn_Xc_vis ) this % elemConn_Xc_vis = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem_Xg_vis ( this , elemConn ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn_Xg_vis )) deallocate ( this % elemConn_Xg_vis ) this % elemConn_Xg_vis = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_elem ( this , elemConn ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ), contiguous :: elemConn (:,:) if ( allocated ( this % elemConn )) deallocate ( this % elemConn ) this % elemConn = elemConn end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem_Xc_vis ( this ) result ( elemConn ) class ( nurbs_surface ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn_Xc_vis end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem_Xg_vis ( this ) result ( elemConn ) class ( nurbs_surface ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn_Xg_vis end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function get_elem ( this ) result ( elemConn ) class ( nurbs_surface ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) elemConn = this % elemConn end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine remove_knots ( this , dir , Xth , r ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ) :: dir real ( rk ), intent ( in ), contiguous :: Xth (:) integer , intent ( in ), contiguous :: r (:) integer :: k , i , s , dim , j , nc_new , t real ( rk ), allocatable :: Xc (:,:), Xcw (:,:), Xcw_new (:,:), Xc_new (:,:), Wc_new (:), knot_new (:) real ( rk ), allocatable :: Xc3 (:,:,:) if ( dir == 1 ) then ! direction 1 if ( this % is_rational ()) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 1 ) - 1 , this % degree ( 1 ), Xth ( i ), this % knot1 ) if ( this % knot1 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot1 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xcw = reshape ( Xcw ,[ this % nc ( 1 ), this % nc ( 2 ) * ( dim + 1 )], order = [ 1 , 2 ]) call remove_knots_A_5_8 (& this % degree ( 1 ),& this % knot1 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xcw_new ) if ( allocated ( Xcw )) deallocate ( Xcw ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) Xcw_new = reshape ( Xcw_new ,[ this % nc ( 2 ) * ( nc_new ), dim + 1 ], order = [ 1 , 2 ]) allocate ( Xc_new ( 1 : this % nc ( 2 ) * ( nc_new ), 1 : dim )) allocate ( Wc_new ( 1 : this % nc ( 2 ) * ( nc_new ))) do j = 1 , this % nc ( 2 ) * ( nc_new ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw_new , Xc_new , Wc_new ) end if end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 1 ) - 1 , this % degree ( 1 ), Xth ( i ), this % knot1 ) if ( this % knot1 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot1 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) Xc = reshape ( this % Xc ,[ this % nc ( 1 ), this % nc ( 2 ) * dim ], order = [ 1 , 2 ]) call remove_knots_A_5_8 (& this % degree ( 1 ),& this % knot1 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xc_new ) if ( allocated ( Xc )) deallocate ( Xc ) if ( t == 0 ) then ! no change else nc_new = size ( Xc_new , 1 ) Xc_new = reshape ( Xc_new ,[( this % nc ( 2 )) * ( nc_new ), dim ], order = [ 1 , 2 ]) call this % set ( knot1 = knot_new , knot2 = this % get_knot ( 2 ), Xc = Xc_new ) end if end do end if elseif ( dir == 2 ) then ! direction 2 if ( this % is_rational ()) then ! NURBS do i = 1 , size ( Xth ) k = findspan ( this % nc ( 2 ) - 1 , this % degree ( 2 ), Xth ( i ), this % knot2 ) if ( this % knot2 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot2 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) allocate ( Xcw ( size ( this % Xc , 1 ), dim + 1 )) do j = 1 , size ( this % Xc , 1 ) Xcw ( j , 1 : dim ) = this % Xc ( j , 1 : dim ) * this % Wc ( j ) end do Xcw (:, dim + 1 ) = this % Wc (:) Xc3 = reshape ( Xcw , [ this % nc ( 1 ), this % nc ( 2 ), dim + 1 ]) Xc3 = reshape ( Xc3 , [ this % nc ( 2 ), this % nc ( 1 ), dim + 1 ], order = [ 2 , 1 , 3 ]) Xcw = reshape ( Xc3 , [ this % nc ( 2 ), this % nc ( 1 ) * ( dim + 1 )]) call remove_knots_A_5_8 (& this % degree ( 2 ),& this % knot2 ,& Xcw ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xcw_new ) if ( allocated ( Xcw )) deallocate ( Xcw ) if ( t == 0 ) then ! no change else nc_new = size ( Xcw_new , 1 ) Xc3 = reshape ( Xcw_new , [ nc_new , this % nc ( 1 ), dim + 1 ]) Xc3 = reshape ( Xc3 , [ this % nc ( 1 ), nc_new , dim + 1 ], order = [ 2 , 1 , 3 ]) Xcw_new = reshape ( Xc3 ,[( this % nc ( 1 )) * ( nc_new ), dim + 1 ]) allocate ( Xc_new ( 1 :( nc_new ) * this % nc ( 1 ), 1 : dim )) allocate ( Wc_new ( 1 :( nc_new ) * this % nc ( 1 ))) do j = 1 , ( nc_new ) * this % nc ( 1 ) Xc_new ( j , 1 : dim ) = Xcw_new ( j , 1 : dim ) / Xcw_new ( j , dim + 1 ) end do Wc_new (:) = Xcw_new (:, dim + 1 ) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , Xc = Xc_new , Wc = Wc_new ) deallocate ( Xcw_new , Xc_new , Wc_new ) end if end do else ! B-Spline do i = 1 , size ( Xth ) k = findspan ( this % nc ( 2 ) - 1 , this % degree ( 2 ), Xth ( i ), this % knot2 ) if ( this % knot2 ( k + 1 ) == Xth ( i )) then s = compute_multiplicity ( this % knot2 , Xth ( i )) else s = 0 end if k = k + 1 dim = size ( this % Xc , 2 ) Xc3 = reshape ( this % Xc , [ this % nc ( 1 ), this % nc ( 2 ), dim ]) Xc3 = reshape ( Xc3 , [ this % nc ( 2 ), this % nc ( 1 ), dim ], order = [ 2 , 1 , 3 ]) Xc = reshape ( Xc3 ,[ this % nc ( 2 ), this % nc ( 1 ) * dim ]) call remove_knots_A_5_8 (& this % degree ( 2 ),& this % knot2 ,& Xc ,& Xth ( i ),& k ,& s ,& r ( i ),& t ,& knot_new ,& Xc_new ) if ( allocated ( Xc )) deallocate ( Xc ) if ( t == 0 ) then ! no change else nc_new = size ( Xc_new , 1 ) Xc3 = reshape ( Xc_new , [ nc_new , this % nc ( 1 ), dim ]) Xc3 = reshape ( Xc3 , [ this % nc ( 1 ), nc_new , dim ], order = [ 2 , 1 , 3 ]) Xc_new = reshape ( Xc3 ,[( this % nc ( 1 )) * ( nc_new ), dim ]) call this % set ( knot1 = this % get_knot ( 1 ), knot2 = knot_new , Xc = Xc_new ) end if end do end if else error stop 'Invalid direction.' end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_tetragon ( this , L , nc , Wc ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: L ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), intent ( in ), contiguous , optional :: Wc (:) call this % set ( nc = nc , Xc = tetragon_Xc ( L , nc ), Wc = Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure function cmp_elem ( this ) result ( elemConn ) class ( nurbs_surface ), intent ( in ) :: this integer , allocatable :: elemConn (:,:) call elemConn_Cn ( this % nc ( 1 ), this % nc ( 2 ),& this % degree ( 1 ), this % degree ( 2 ),& unique ( this % knot1 ), unique ( this % knot2 ),& this % get_multiplicity ( 1 ), this % get_multiplicity ( 2 ),& elemConn ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine rotate_Xc ( this , alpha , beta , theta ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: alpha , beta , theta integer :: i do i = 1 , this % nc ( 1 ) * this % nc ( 2 ) this % Xc ( i , :) = matmul ( rotation ( alpha , beta , theta ), this % Xc ( i , :)) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine rotate_Xg ( this , alpha , beta , theta ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: alpha , beta , theta integer :: i do i = 1 , this % ng ( 1 ) * this % ng ( 2 ) this % Xg ( i , :) = matmul ( rotation ( alpha , beta , theta ), this % Xg ( i , :)) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine translate_Xc ( this , vec ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: vec (:) integer :: i do i = 1 , this % nc ( 1 ) * this % nc ( 2 ) this % Xc ( i , :) = this % Xc ( i , :) + vec end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine translate_Xg ( this , vec ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: vec (:) integer :: i do i = 1 , this % ng ( 1 ) * this % ng ( 2 ) this % Xg ( i , :) = this % Xg ( i , :) + vec end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine show ( this , vtkfile_Xc , vtkfile_Xg ) class ( nurbs_surface ), intent ( inout ) :: this character ( len =* ), intent ( in ) :: vtkfile_Xc , vtkfile_Xg character ( len = 3000 ) :: pyvista_script pyvista_script = & \"import pyvista as pv\" // achar ( 10 ) // & \"pv.global_theme.color = 'white'\" // achar ( 10 ) // & \"Xc = pv.read('\" // trim ( vtkfile_Xc ) // \"')\" // achar ( 10 ) // & \"Xg = pv.read('\" // trim ( vtkfile_Xg ) // \"')\" // achar ( 10 ) // & \"p = pv.Plotter(lighting='light kit')\" // achar ( 10 ) // & \"actor_Xcp = p.add_mesh(\" // achar ( 10 ) // & \"    Xc,\" // achar ( 10 ) // & \"    style='points',\" // achar ( 10 ) // & \"    point_size=10,\" // achar ( 10 ) // & \"    color='red',\" // achar ( 10 ) // & \"    render_points_as_spheres=True,\" // achar ( 10 ) // & \"    opacity=0.5,\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"actor_Xcw = p.add_mesh(\" // achar ( 10 ) // & \"    Xc,\" // achar ( 10 ) // & \"    show_edges=True,\" // achar ( 10 ) // & \"    color='yellow',\" // achar ( 10 ) // & \"    line_width=3,\" // achar ( 10 ) // & \"    style='wireframe',\" // achar ( 10 ) // & \"    opacity=0.2\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"actor_Xg = p.add_mesh(\" // achar ( 10 ) // & \"    Xg,\" // achar ( 10 ) // & \"    show_edges=False,\" // achar ( 10 ) // & \"    color='cyan',\" // achar ( 10 ) // & \"    line_width=7,\" // achar ( 10 ) // & \"    metallic=0.6,\" // achar ( 10 ) // & \"    pbr=True,\" // achar ( 10 ) // & \"    split_sharp_edges=True,\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_axes(interactive=False)\" // achar ( 10 ) // & \"def point_picker_callback(point):\" // achar ( 10 ) // & \"    mesh = Xc\" // achar ( 10 ) // & \"    point_id = mesh.find_closest_point(point)\" // achar ( 10 ) // & \"    point_coords = mesh.points[point_id]\" // achar ( 10 ) // & \"    label = f'ID: {point_id + 1}\\n({point_coords[0]:.3f}, {point_coords[1]:.3f}, {point_coords[2]:.3f})'\" // achar ( 10 ) // & \"    p.add_point_labels(\" // achar ( 10 ) // & \"        [point_coords],\" // achar ( 10 ) // & \"        [label],\" // achar ( 10 ) // & \"        font_size=14,\" // achar ( 10 ) // & \"        text_color='black',\" // achar ( 10 ) // & \"        show_points=False,\" // achar ( 10 ) // & \"        fill_shape=False,\" // achar ( 10 ) // & \"        shape=None,\" // achar ( 10 ) // & \"    )\" // achar ( 10 ) // & \"picker = p.enable_point_picking(callback=point_picker_callback, show_message=False)\" // achar ( 10 ) // & \"window_size = p.window_size\" // achar ( 10 ) // & \"y_pos = window_size[1]\" // achar ( 10 ) // & \"def Xcp_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xcp.SetVisibility(flag)\" // achar ( 10 ) // & \"def Xcw_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xcw.SetVisibility(flag)\" // achar ( 10 ) // & \"def Xg_toggle_vis(flag):\" // achar ( 10 ) // & \"    actor_Xg.SetVisibility(flag)\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xcp_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='red',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 1 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xcw_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='yellow',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 2 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_checkbox_button_widget(\" // achar ( 10 ) // & \"    Xg_toggle_vis,\" // achar ( 10 ) // & \"    value=True,\" // achar ( 10 ) // & \"    color_on='cyan',\" // achar ( 10 ) // & \"    size=25,\" // achar ( 10 ) // & \"    position=(0, y_pos - 3 * 25),\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xc (Points)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 1 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xc (Control geometry)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 2 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'Xg (Geometry)',\" // achar ( 10 ) // & \"    position=(25 + 3, y_pos - 3 * 25),\" // achar ( 10 ) // & \"    font_size=8,\" // achar ( 10 ) // & \"    color='black',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.add_text('ForCAD', position=(0.0, 10.0), font_size=14, color='black', font='times')\" // achar ( 10 ) // & \"p.add_text(\" // achar ( 10 ) // & \"    'https://github.com/gha3mi/forcad',\" // achar ( 10 ) // & \"    position=(0.0, 0.0),\" // achar ( 10 ) // & \"    font_size=7,\" // achar ( 10 ) // & \"    color='blue',\" // achar ( 10 ) // & \"    font='times',\" // achar ( 10 ) // & \")\" // achar ( 10 ) // & \"p.show(title='ForCAD', interactive=True)\" call execute_command_line ( 'python -c \"' // trim ( adjustl ( pyvista_script )) // '\"' ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_ring ( this , center , radius1 , radius2 ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius1 , radius2 real ( rk ), allocatable :: Xc (:,:), Wc (:), knot1 (:), knot2 (:) integer :: i ! Define control points for ring allocate ( Xc ( 14 , 3 )) Xc ( 1 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 3 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 6 ,:) = [ 1.0_rk , - sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 7 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 1 : 7 , 1 : 2 ) = Xc ( 1 : 7 , 1 : 2 ) * radius1 Xc ( 8 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 9 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 10 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 11 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 12 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 13 ,:) = [ 1.0_rk , - sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 14 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 8 : 14 , 1 : 2 ) = Xc ( 8 : 14 , 1 : 2 ) * radius2 ! Translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) end do ! Define weights for the control points Wc = [ 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ,& 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ] ! Define knot vector knot1 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 3.0_rk , 1.0_rk / 3.0_rk , 2.0_rk / 3.0_rk , 2.0_rk / 3.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot1 , knot2 , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_C ( this , center , radius1 , radius2 ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius1 , radius2 real ( rk ), allocatable :: Xc (:,:), Wc (:), knot1 (:), knot2 (:) integer :: i ! Define control points for C-shape allocate ( Xc ( 10 , 3 )) Xc ( 1 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 3 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 1 : 5 , 1 : 2 ) = Xc ( 1 : 5 , 1 : 2 ) * radius1 Xc ( 6 ,:) = [ 1.0_rk , 0.0_rk , 0.0_rk ] Xc ( 7 ,:) = [ 1.0_rk , sqrt ( 3.0_rk ), 0.0_rk ] Xc ( 8 ,:) = [ - 0.5_rk , sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 9 ,:) = [ - 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 10 ,:) = [ - 0.5_rk , - sqrt ( 3.0_rk ) / 2.0_rk , 0.0_rk ] Xc ( 6 : 10 , 1 : 2 ) = Xc ( 6 : 10 , 1 : 2 ) * radius2 ! Translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) end do ! Define weights for the control points Wc = [ 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ,& 1.0_rk , 0.5_rk , 1.0_rk , 0.5_rk , 1.0_rk ] ! Define knot vector knot1 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 2.0_rk , 1.0_rk / 2.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot1 , knot2 , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine set_half_ring ( this , center , radius1 , radius2 ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ), contiguous :: center (:) real ( rk ), intent ( in ) :: radius1 , radius2 real ( rk ), allocatable :: Xc (:,:), Wc (:), knot1 (:), knot2 (:) integer :: i ! Define control points for half ring allocate ( Xc ( 10 , 3 )) Xc ( 1 ,:) = [ 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 3 ,:) = [ 0.0_rk , 0.5_rk , 0.0_rk ] Xc ( 4 ,:) = [ - 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 5 ,:) = [ - 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 1 : 5 , 1 : 2 ) = Xc ( 1 : 5 , 1 : 2 ) * radius1 Xc ( 6 ,:) = [ 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 7 ,:) = [ 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 8 ,:) = [ 0.0_rk , 0.5_rk , 0.0_rk ] Xc ( 9 ,:) = [ - 0.5_rk , 0.5_rk , 0.0_rk ] Xc ( 10 ,:) = [ - 0.5_rk , 0.0_rk , 0.0_rk ] Xc ( 6 : 10 , 1 : 2 ) = Xc ( 6 : 10 , 1 : 2 ) * radius2 ! Translate the control points do i = 1 , size ( Xc , 1 ) Xc ( i ,:) = center + Xc ( i ,:) end do ! Define weights for the control points Wc = [ 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk ,& 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk , 1.0_rk / sqrt ( 2.0_rk ), 1.0_rk ] ! Define knot vector knot1 = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk / 2.0_rk , & 1.0_rk / 2.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ] ! Set knot vector, control points, and weights call this % set ( knot1 , knot2 , Xc , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine nearest_point ( this , point_Xg , nearest_Xg , nearest_Xt , id ) class ( nurbs_surface ), intent ( in ) :: this real ( rk ), intent ( in ) :: point_Xg (:) real ( rk ), intent ( out ), allocatable , optional :: nearest_Xg (:) real ( rk ), intent ( out ), allocatable , optional :: nearest_Xt (:) integer , intent ( out ), optional :: id integer :: id_ real ( rk ), allocatable :: distances (:) allocate ( distances ( this % ng ( 1 ) * this % ng ( 2 ))) distances = nearest_point_help_2d ( this % ng , this % Xg , point_Xg ) id_ = minloc ( distances , dim = 1 ) if ( present ( id )) id = id_ if ( present ( nearest_Xg )) nearest_Xg = this % Xg ( id_ ,:) if ( present ( nearest_Xt )) nearest_Xt = this % Xt ( id_ ,:) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine nearest_point2 ( this , point_Xg , tol , maxit , nearest_Xt , nearest_Xg ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( in ) :: point_Xg (:) real ( rk ), intent ( in ) :: tol integer , intent ( in ) :: maxit real ( rk ), intent ( out ) :: nearest_Xt ( 2 ) real ( rk ), allocatable , intent ( out ), optional :: nearest_Xg (:) real ( rk ) :: obj , grad ( 2 ), hess ( 2 , 2 ), dk ( 2 ), alphak , tau , beta , lower_bounds ( 2 ), upper_bounds ( 2 ) real ( rk ), allocatable :: Xg (:), xk (:), Tgc (:), dTgc (:,:), d2Tgc (:,:) integer :: k , l logical :: convergenz type ( nurbs_surface ) :: copy_this k = 0 ! lower and upper bounds lower_bounds = [ minval ( this % knot1 ), minval ( this % knot2 )] upper_bounds = [ maxval ( this % knot1 ), maxval ( this % knot2 )] ! guess initial point copy_this = this call copy_this % create ( 10 , 10 ) call copy_this % nearest_point ( point_Xg = point_Xg , nearest_Xt = xk ) call copy_this % finalize () ! Check if xk is within the knot vector range if ( xk ( 1 ) < minval ( this % knot1 )) then xk ( 1 ) = minval ( this % knot1 ) else if ( xk ( 1 ) > maxval ( this % knot1 )) then xk ( 1 ) = maxval ( this % knot1 ) end if if ( xk ( 2 ) < minval ( this % knot2 )) then xk ( 2 ) = minval ( this % knot2 ) else if ( xk ( 2 ) > maxval ( this % knot2 )) then xk ( 2 ) = maxval ( this % knot2 ) end if convergenz = . false . allocate ( Xg ( size ( this % Xc , 2 ))) ! allocate(dTgc(size(this%Xc,1), 2)) ! allocate(d2Tgc(size(this%Xc,1), 2)) do while (. not . convergenz . and . k < maxit ) ! objection, gradient and hessian Xg = this % cmp_Xg ( xk ) call this % derivative2 ( Xt = xk , d2Tgc = d2Tgc , dTgc = dTgc , Tgc = Tgc ) ! Tgc is not needed obj = norm2 ( Xg - point_Xg ) + 0.001_rk ! add a small number to avoid division by zero grad ( 1 ) = dot_product (( Xg - point_Xg ) / obj , matmul ( dTgc (:, 1 ), this % Xc )) grad ( 2 ) = dot_product (( Xg - point_Xg ) / obj , matmul ( dTgc (:, 2 ), this % Xc )) hess ( 1 , 1 ) = ( dot_product ( matmul ( dTgc (:, 1 ), this % Xc ), matmul ( dTgc (:, 1 ), this % Xc )) + & dot_product (( Xg - point_Xg ), matmul ( d2Tgc ( 1 : this % nc ( 1 ) * this % nc ( 2 ) , 1 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 1 ), this % Xc )) * grad ( 1 ) ) / obj ** 2 hess ( 2 , 1 ) = ( dot_product ( matmul ( dTgc (:, 1 ), this % Xc ), matmul ( dTgc (:, 2 ), this % Xc )) + & dot_product (( Xg - point_Xg ), matmul ( d2Tgc ( this % nc ( 1 ) * this % nc ( 2 ) + 1 : 2 * this % nc ( 1 ) * this % nc ( 2 ), 1 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 2 ), this % Xc )) * grad ( 1 ) ) / obj ** 2 hess ( 1 , 2 ) = ( dot_product ( matmul ( dTgc (:, 2 ), this % Xc ), matmul ( dTgc (:, 1 ), this % Xc )) + & dot_product (( Xg - point_Xg ), matmul ( d2Tgc ( 1 : this % nc ( 1 ) * this % nc ( 2 ) , 2 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 1 ), this % Xc )) * grad ( 2 ) ) / obj ** 2 hess ( 2 , 2 ) = ( dot_product ( matmul ( dTgc (:, 2 ), this % Xc ), matmul ( dTgc (:, 2 ), this % Xc )) + & dot_product (( Xg - point_Xg ), matmul ( d2Tgc ( this % nc ( 1 ) * this % nc ( 2 ) + 1 : 2 * this % nc ( 1 ) * this % nc ( 2 ), 2 ), this % Xc )) ) / obj & - ( dot_product ( Xg - point_Xg , matmul ( dTgc (:, 2 ), this % Xc )) * grad ( 2 ) ) / obj ** 2 ! debug print '(i3,1x,2e20.10,1x,e20.10)' , k , xk , norm2 ( grad ) if ( norm2 ( grad ) <= tol ) then convergenz = . true . nearest_Xt = xk if ( present ( nearest_Xg )) nearest_Xg = this % cmp_Xg ( nearest_Xt ) else dk = - matmul ( inv ( hess ), grad ) ! Backtracking-Armijo Line Search alphak = 1.0_rk tau = 0.5_rk ! 0 < tau  < 1 beta = 1.0e-4_rk ! 0 < beta < 1 l = 0 do while (. not . norm2 ( this % cmp_Xg ( xk + alphak * dk ) - point_Xg ) <= obj + alphak * beta * dot_product ( grad , dk ) . and . l < 50 ) alphak = tau * alphak l = l + 1 end do xk = xk + alphak * dk ! Check if xk is within the knot vector range xk = max ( min ( xk , upper_bounds ), lower_bounds ) k = k + 1 end if end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine ansatz ( this , ie , ig , Tgc , dTgc_dXg , dA ) class ( nurbs_surface ), intent ( inout ) :: this integer , intent ( in ) :: ie , ig real ( rk ), intent ( out ) :: dA real ( rk ), allocatable , intent ( out ) :: Tgc (:), dTgc_dXg (:,:) real ( rk ), allocatable :: Xth (:,:), Xth_e (:,:), Xth_eT (:,:), Xc_eT (:,:), Xth1 (:), Xth2 (:), Xksi (:,:), Wksi (:) integer , allocatable :: elem_th (:,:), elem_c (:,:), elem_ce (:) type ( nurbs_surface ) :: th , th_e real ( rk ), allocatable :: dTtth_dXksi (:,:), Ttth (:), dTgc_dXt (:,:), Xt (:), dXt_dXksi (:,:), dXg_dXt (:,:) real ( rk ), allocatable :: dXg_dXksi (:,:) !! Jacobian matrix real ( rk ) :: det_dXg_dXksi !! Determinant of the Jacobian matrix call gauss_leg ([ 0.0_rk , 1.0_rk ], [ 0.0_rk , 1.0_rk ], this % degree , Xksi , Wksi ) Xth1 = unique ( this % knot1 ) Xth2 = unique ( this % knot2 ) call ndgrid ( Xth1 , Xth2 , Xth ) call th % set ([ 0.0_rk , Xth1 , 1.0_rk ], [ 0.0_rk , Xth2 , 1.0_rk ], Xth ) elem_th = th % cmp_elem () elem_c = this % cmp_elem () Xth_e = Xth ( elem_th ( ie ,:),:) call th_e % set ([ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ], [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ], Xth_e ) Xth_eT = transpose ( Xth_e ) elem_ce = elem_c ( ie ,:) Xc_eT = transpose ( this % Xc ( elem_ce ,:)) call th_e % derivative ( Xksi ( ig ,:), dTtth_dXksi , Ttth ) Xt = matmul ( Xth_eT , Ttth ) dXt_dXksi = matmul ( Xth_eT , dTtth_dXksi ) call this % derivative ( Xt , dTgc_dXt , Tgc , elem_ce ) dXg_dXt = matmul ( Xc_eT , dTgc_dXt ) dTgc_dXg = matmul ( dTgc_dXt , inv ( dXg_dXt )) dXg_dXksi = matmul ( dXg_dXt , dXt_dXksi ) det_dXg_dXksi = det ( dXg_dXksi ) dA = det_dXg_dXksi * Wksi ( ig ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause pure subroutine cmp_area ( this , area ) class ( nurbs_surface ), intent ( inout ) :: this real ( rk ), intent ( out ) :: area real ( rk ), allocatable :: Tgc (:), dTgc_dXg (:,:) integer :: ie , ig real ( rk ) :: dA , dA_ig area = 0.0_rk do ie = 1 , size ( this % cmp_elem (), 1 ) dA = 0.0_rk do ig = 1 , size ( this % cmp_elem (), 2 ) call this % ansatz ( ie , ig , Tgc , dTgc_dXg , dA_ig ) dA = dA + dA_ig end do area = area + dA end do end subroutine !=============================================================================== end module forcad_nurbs_surface !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_nurbs_2d ( Xt , knot1 , knot2 , degree , nc , ng , Xc , Wc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: ng ( 2 ) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Xg (:,:) real ( rk ), allocatable :: Tgc (:) integer :: i allocate ( Xg ( ng ( 1 ) * ng ( 2 ), size ( Xc , 2 ))) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ))) !$OMP PARALLEL DO PRIVATE(Tgc) do i = 1 , ng ( 1 ) * ng ( 2 ) Tgc = kron (& basis_bspline ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ))) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) Xg ( i ,:) = matmul ( Tgc , Xc ) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_nurbs_2d_1point ( Xt , knot1 , knot2 , degree , nc , Xc , Wc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Xg (:) real ( rk ), allocatable :: Tgc (:) allocate ( Xg ( size ( Xc , 2 ))) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ))) Tgc = kron (& basis_bspline ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ))) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) Xg = matmul ( Tgc , Xc ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_bspline_2d ( Xt , knot1 , knot2 , degree , nc , ng , Xc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: ng ( 2 ) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), allocatable :: Xg (:,:) integer :: i allocate ( Xg ( ng ( 1 ) * ng ( 2 ), size ( Xc , 2 ))) !$OMP PARALLEL DO do i = 1 , ng ( 1 ) * ng ( 2 ) Xg ( i ,:) = matmul ( kron (& basis_bspline ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ))),& Xc ) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Xg_bspline_2d_1point ( Xt , knot1 , knot2 , degree , nc , Xc ) result ( Xg ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), intent ( in ), contiguous :: Xc (:,:) real ( rk ), allocatable :: Xg (:) allocate ( Xg ( size ( Xc , 2 ))) Xg = matmul ( kron (& basis_bspline ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ))),& Xc ) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_nurbs_2d_vector ( Xt , knot1 , knot2 , degree , nc , ng , Wc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: ng ( 2 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: dBi (:,:), dB1 (:), dB2 (:) real ( rk ), allocatable :: Bi (:), B1 (:), B2 (:) integer :: i allocate ( dTgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ), 2 ), Tgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ))) allocate ( Bi ( nc ( 1 ) * nc ( 2 )), dBi ( nc ( 1 ) * nc ( 2 ), 2 )) do i = 1 , size ( Xt , 1 ) call basis_bspline_der ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ), dB1 , B1 ) call basis_bspline_der ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 ), dB2 , B2 ) Bi = kron ( B2 , B1 ) Tgc ( i ,:) = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dBi (:, 1 ) = kron ( B2 , dB1 ) dBi (:, 2 ) = kron ( dB2 , B1 ) dTgc ( i ,:, 1 ) = ( dBi (:, 1 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 1 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc ( i ,:, 2 ) = ( dBi (:, 2 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 2 ), Wc ) ) / dot_product ( Bi , Wc ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_nurbs_2d_scalar ( Xt , knot1 , knot2 , degree , nc , Wc , dTgc , Tgc , elem ) use forcad_utils , only : rk , basis_bspline_der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), intent ( in ), contiguous :: Wc (:) integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: dB1 (:), dB2 (:), dBi (:,:) real ( rk ), allocatable :: B1 (:), B2 (:), Bi (:) call basis_bspline_der ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ), dB1 , B1 ) call basis_bspline_der ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 ), dB2 , B2 ) if (. not . present ( elem )) then allocate ( dTgc ( nc ( 1 ) * nc ( 2 ), 2 ), Tgc ( nc ( 1 ) * nc ( 2 ))) allocate ( dBi ( nc ( 1 ) * nc ( 2 ), 2 ), Bi ( nc ( 1 ) * nc ( 2 ))) Bi = kron ( B2 , B1 ) Tgc = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dBi (:, 1 ) = kron ( B2 , dB1 ) dBi (:, 2 ) = kron ( dB2 , B1 ) dTgc (:, 1 ) = ( dBi (:, 1 ) * Wc - Tgc * dot_product ( dBi (:, 1 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc (:, 2 ) = ( dBi (:, 2 ) * Wc - Tgc * dot_product ( dBi (:, 2 ), Wc ) ) / dot_product ( Bi , Wc ) else allocate ( dTgc ( size ( elem ), 2 ), Tgc ( size ( elem ))) allocate ( dBi ( size ( elem ), 2 ), Bi ( size ( elem ))) associate ( Biall => kron ( B2 , B1 )) Bi = Biall ( elem ) Tgc = Bi * ( Wc ( elem ) / ( dot_product ( Bi , Wc ( elem )))) end associate associate ( dB1all => kron ( B2 , dB1 ), dB2all => kron ( dB2 , B1 )) dBi (:, 1 ) = dB1all ( elem ) dBi (:, 2 ) = dB2all ( elem ) end associate dTgc (:, 1 ) = ( dBi (:, 1 ) * Wc ( elem ) - Tgc * dot_product ( dBi (:, 1 ), Wc ( elem )) ) / dot_product ( Bi , Wc ( elem )) dTgc (:, 2 ) = ( dBi (:, 2 ) * Wc ( elem ) - Tgc * dot_product ( dBi (:, 2 ), Wc ( elem )) ) / dot_product ( Bi , Wc ( elem )) end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_bspline_2d_vector ( Xt , knot1 , knot2 , degree , nc , ng , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: ng ( 2 ) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: dB1 (:), dB2 (:) real ( rk ), allocatable :: B1 (:), B2 (:) integer :: i allocate ( dTgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ), 2 ), Tgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ))) allocate ( B1 ( nc ( 1 )), B2 ( nc ( 2 )), dB1 ( nc ( 1 )), dB2 ( nc ( 2 ))) do i = 1 , size ( Xt , 1 ) call basis_bspline_der ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ), dB1 , B1 ) call basis_bspline_der ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 ), dB2 , B2 ) Tgc ( i ,:) = kron ( B2 , B1 ) dTgc ( i ,:, 1 ) = kron ( B2 , dB1 ) dTgc ( i ,:, 2 ) = kron ( dB2 , B1 ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_dTgc_bspline_2d_scalar ( Xt , knot1 , knot2 , degree , nc , dTgc , Tgc , elem ) use forcad_utils , only : rk , basis_bspline_der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ), optional :: elem (:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: dTgc1 (:), dTgc2 (:) real ( rk ), allocatable :: Tgc1 (:), Tgc2 (:) call basis_bspline_der ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ), dTgc1 , Tgc1 ) call basis_bspline_der ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 ), dTgc2 , Tgc2 ) if (. not . present ( elem )) then allocate ( dTgc ( nc ( 1 ) * nc ( 2 ), 2 )) Tgc = kron ( Tgc2 , Tgc1 ) dTgc (:, 1 ) = kron ( Tgc2 , dTgc1 ) dTgc (:, 2 ) = kron ( dTgc2 , Tgc1 ) else allocate ( dTgc ( size ( elem ), 2 )) associate ( B => kron ( Tgc2 , Tgc1 )) Tgc = B ( elem ) end associate associate ( dB1 => kron ( Tgc2 , dTgc1 ), dB2 => kron ( dTgc2 , Tgc1 )) dTgc (:, 1 ) = dB1 ( elem ) dTgc (:, 2 ) = dB2 ( elem ) end associate end if end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_nurbs_2d_vector ( Xt , knot1 , knot2 , degree , nc , ng , Wc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: ng ( 2 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: d2Bi (:,:), d2B1 (:), d2B2 (:) real ( rk ), allocatable :: dBi (:,:), dB1 (:), dB2 (:) real ( rk ), allocatable :: Bi (:), B1 (:), B2 (:) real ( rk ), allocatable :: Tgci (:), dTgci (:) integer :: i allocate ( d2Tgc ( ng ( 1 ) * ng ( 2 ), 2 * nc ( 1 ) * nc ( 2 ), 2 )) allocate ( B1 ( nc ( 1 )), B2 ( nc ( 2 ))) allocate ( dB1 ( nc ( 1 )), dB2 ( nc ( 2 ))) allocate ( d2B1 ( nc ( 1 )), d2B2 ( nc ( 2 ))) allocate ( Bi ( nc ( 1 ) * nc ( 2 )), dBi ( nc ( 1 ) * nc ( 2 ), 2 ), d2Bi ( 2 * nc ( 1 ) * nc ( 2 ), 2 )) allocate ( Tgci ( nc ( 1 ) * nc ( 2 )), dTgci ( nc ( 1 ) * nc ( 2 ))) allocate ( Tgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 )), dTgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ), 2 )) do i = 1 , size ( Xt , 1 ) call basis_bspline_2der ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ), d2B1 , dB1 , B1 ) call basis_bspline_2der ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 ), d2B2 , dB2 , B2 ) Bi = kron ( B2 , B1 ) Tgc ( i ,:) = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dBi (:, 1 ) = kron ( B2 , dB1 ) dBi (:, 2 ) = kron ( dB2 , B1 ) dTgc ( i ,:, 1 ) = ( dBi (:, 1 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 1 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc ( i ,:, 2 ) = ( dBi (:, 2 ) * Wc - Tgc ( i ,:) * dot_product ( dBi (:, 2 ), Wc ) ) / dot_product ( Bi , Wc ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 1 ) = kron ( B2 , d2B1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ) = kron ( dB2 , dB1 ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 2 ) = kron ( dB2 , dB1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ) = kron ( d2B2 , B1 ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) , 1 ) = & ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 1 ) * Wc - 2.0_rk * dTgc ( i ,:, 1 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ) = & ( d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ) * Wc - dTgc ( i ,:, 1 ) * dot_product ( dBi (:, 2 ), Wc ) - dTgc ( i ,:, 2 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) , 2 ) = & ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 2 ) * Wc - dTgc ( i ,:, 1 ) * dot_product ( dBi (:, 2 ), Wc ) - dTgc ( i ,:, 2 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 2 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ) = & ( d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ) * Wc - 2.0_rk * dTgc ( i ,:, 2 ) * dot_product ( dBi (:, 2 ), Wc ) & - Tgc ( i ,:) * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ), Wc )) / dot_product ( Bi , Wc ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_nurbs_2d_scalar ( Xt , knot1 , knot2 , degree , nc , Wc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: d2Bi (:,:), d2B1 (:), d2B2 (:) real ( rk ), allocatable :: dBi (:,:), dB1 (:), dB2 (:) real ( rk ), allocatable :: Bi (:), B1 (:), B2 (:) allocate ( B1 ( nc ( 1 )), B2 ( nc ( 2 ))) allocate ( dB1 ( nc ( 1 )), dB2 ( nc ( 2 ))) allocate ( d2B1 ( nc ( 1 )), d2B2 ( nc ( 2 ))) allocate ( Bi ( nc ( 1 ) * nc ( 2 )), dBi ( nc ( 1 ) * nc ( 2 ), 2 ), d2Bi ( 2 * nc ( 1 ) * nc ( 2 ), 2 )) allocate ( Tgc ( nc ( 1 ) * nc ( 2 )), dTgc ( nc ( 1 ) * nc ( 2 ), 2 ), d2Tgc ( 2 * nc ( 1 ) * nc ( 2 ), 2 )) call basis_bspline_2der ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ), d2B1 , dB1 , B1 ) call basis_bspline_2der ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 ), d2B2 , dB2 , B2 ) Bi = kron ( B2 , B1 ) Tgc = Bi * ( Wc / ( dot_product ( Bi , Wc ))) dBi (:, 1 ) = kron ( B2 , dB1 ) dBi (:, 2 ) = kron ( dB2 , B1 ) dTgc (:, 1 ) = ( dBi (:, 1 ) * Wc - Tgc * dot_product ( dBi (:, 1 ), Wc ) ) / dot_product ( Bi , Wc ) dTgc (:, 2 ) = ( dBi (:, 2 ) * Wc - Tgc * dot_product ( dBi (:, 2 ), Wc ) ) / dot_product ( Bi , Wc ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 1 ) = kron ( B2 , d2B1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ) = kron ( dB2 , dB1 ) d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 2 ) = kron ( dB2 , dB1 ) d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ) = kron ( d2B2 , B1 ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) , 1 ) = & ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 1 ) * Wc - 2.0_rk * dTgc (:, 1 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ) = & ( d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ) * Wc - dTgc (:, 1 ) * dot_product ( dBi (:, 2 ), Wc ) - dTgc (:, 2 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) , 2 ) = & ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 2 ) * Wc - dTgc (:, 1 ) * dot_product ( dBi (:, 2 ), Wc ) - dTgc (:, 2 ) * dot_product ( dBi (:, 1 ), Wc ) & - Tgc * dot_product ( d2Bi ( 1 : nc ( 1 ) * nc ( 2 ) , 2 ), Wc )) / dot_product ( Bi , Wc ) d2Tgc ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ) = & ( d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ) * Wc - 2.0_rk * dTgc (:, 2 ) * dot_product ( dBi (:, 2 ), Wc ) & - Tgc * dot_product ( d2Bi ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ), Wc )) / dot_product ( Bi , Wc ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_bspline_2d_vector ( Xt , knot1 , knot2 , degree , nc , ng , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: ng ( 2 ) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:,:) real ( rk ), allocatable :: d2B1 (:), d2B2 (:) real ( rk ), allocatable :: dB1 (:), dB2 (:) real ( rk ), allocatable :: B1 (:), B2 (:) integer :: i allocate ( d2Tgc ( ng ( 1 ) * ng ( 2 ), 2 * nc ( 1 ) * nc ( 2 ), 2 )) allocate ( dTgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ), 2 )) allocate ( Tgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ))) do i = 1 , size ( Xt , 1 ) call basis_bspline_2der ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ), d2B1 , dB1 , B1 ) call basis_bspline_2der ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 ), d2B2 , dB2 , B2 ) Tgc ( i ,:) = kron ( B2 , B1 ) dTgc ( i ,:, 1 ) = kron ( B2 , dB1 ) dTgc ( i ,:, 2 ) = kron ( dB2 , B1 ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) , 1 ) = kron ( B2 , d2B1 ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ) = kron ( dB2 , dB1 ) d2Tgc ( i , 1 : nc ( 1 ) * nc ( 2 ) , 2 ) = kron ( dB2 , dB1 ) d2Tgc ( i , nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ) = kron ( d2B2 , B1 ) end do end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure subroutine compute_d2Tgc_bspline_2d_scalar ( Xt , knot1 , knot2 , degree , nc , d2Tgc , dTgc , Tgc ) use forcad_utils , only : rk , basis_bspline_2der , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), allocatable , intent ( out ) :: d2Tgc (:,:) real ( rk ), allocatable , intent ( out ) :: dTgc (:,:) real ( rk ), allocatable , intent ( out ) :: Tgc (:) real ( rk ), allocatable :: d2B1 (:), d2B2 (:) real ( rk ), allocatable :: dB1 (:), dB2 (:) real ( rk ), allocatable :: B1 (:), B2 (:) allocate ( d2Tgc ( 2 * nc ( 1 ) * nc ( 2 ), 2 )) allocate ( dTgc ( nc ( 1 ) * nc ( 2 ), 2 )) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ))) call basis_bspline_2der ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ), d2B1 , dB1 , B1 ) call basis_bspline_2der ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 ), d2B2 , dB2 , B2 ) Tgc = kron ( B2 , B1 ) dTgc (:, 1 ) = kron ( B2 , dB1 ) dTgc (:, 2 ) = kron ( dB2 , B1 ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) , 1 ) = kron ( B2 , d2B1 ) d2Tgc ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 1 ) = kron ( dB2 , dB1 ) d2Tgc ( 1 : nc ( 1 ) * nc ( 2 ) , 2 ) = kron ( dB2 , dB1 ) d2Tgc ( nc ( 1 ) * nc ( 2 ) + 1 : 2 * nc ( 1 ) * nc ( 2 ), 2 ) = kron ( d2B2 , B1 ) end subroutine !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_nurbs_2d_vector ( Xt , knot1 , knot2 , degree , nc , ng , Wc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: ng ( 2 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Tgc (:,:) real ( rk ), allocatable :: Tgci (:) integer :: i allocate ( Tgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ))) allocate ( Tgci ( nc ( 1 ) * nc ( 2 ))) !$OMP PARALLEL DO PRIVATE(Tgci) do i = 1 , size ( Xt , 1 ) Tgci = kron (& basis_bspline ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ))) Tgc ( i ,:) = Tgci * ( Wc / ( dot_product ( Tgci , Wc ))) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_nurbs_2d_scalar ( Xt , knot1 , knot2 , degree , nc , Wc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), intent ( in ), contiguous :: Wc (:) real ( rk ), allocatable :: Tgc (:) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ))) Tgc = kron (& basis_bspline ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ))) Tgc = Tgc * ( Wc / ( dot_product ( Tgc , Wc ))) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_bspline_2d_vector ( Xt , knot1 , knot2 , degree , nc , ng ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:,:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) integer , intent ( in ) :: ng ( 2 ) real ( rk ), allocatable :: Tgc (:,:) integer :: i allocate ( Tgc ( ng ( 1 ) * ng ( 2 ), nc ( 1 ) * nc ( 2 ))) !$OMP PARALLEL DO do i = 1 , size ( Xt , 1 ) Tgc ( i ,:) = kron (& basis_bspline ( Xt ( i , 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( i , 1 ), knot1 , nc ( 1 ), degree ( 1 ))) end do !$OMP END PARALLEL DO end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function compute_Tgc_bspline_2d_scalar ( Xt , knot1 , knot2 , degree , nc ) result ( Tgc ) use forcad_utils , only : rk , basis_bspline , kron implicit none real ( rk ), intent ( in ), contiguous :: Xt (:) real ( rk ), intent ( in ), contiguous :: knot1 (:), knot2 (:) integer , intent ( in ) :: degree ( 2 ) integer , intent ( in ) :: nc ( 2 ) real ( rk ), allocatable :: Tgc (:) allocate ( Tgc ( nc ( 1 ) * nc ( 2 ))) Tgc = kron (& basis_bspline ( Xt ( 2 ), knot2 , nc ( 2 ), degree ( 2 )),& basis_bspline ( Xt ( 1 ), knot1 , nc ( 1 ), degree ( 1 ))) end function !=============================================================================== !=============================================================================== !> author: Seyed Ali Ghasemi !> license: BSD 3-Clause impure function nearest_point_help_2d ( ng , Xg , point_Xg ) result ( distances ) use forcad_utils , only : rk implicit none integer , intent ( in ) :: ng ( 2 ) real ( rk ), intent ( in ), contiguous :: Xg (:,:) real ( rk ), intent ( in ), contiguous :: point_Xg (:) real ( rk ), allocatable :: distances (:) integer :: i allocate ( distances ( ng ( 1 ) * ng ( 2 ))) !$OMP PARALLEL DO do i = 1 , ng ( 1 ) * ng ( 2 ) distances ( i ) = norm2 ( Xg ( i ,:) - point_Xg ) end do !$OMP END PARALLEL DO end function !===============================================================================","tags":"","loc":"sourcefile/forcad_nurbs_surface.f90.html"},{"title":"shape_C_3d.f90 – ForCAD","text":"This file depends on sourcefile~~shape_c_3d.f90~~EfferentGraph sourcefile~shape_c_3d.f90 shape_C_3d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_c_3d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_C_3d use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: shape !----------------------------------------------------------------------------- ! Setting up NURBS C-shape !----------------------------------------------------------------------------- !> Set a C-shape with radius 2.0 and center at [0.0, 0.0, 0.0] call shape % set_C ( center = [ 0.0_rk , 0.0_rk , 0.0_rk ], radius1 = 1.0_rk , radius2 = 2.0_rk , length = 2.0_rk ) !> Export control points to a VTK file call shape % export_Xc ( 'vtk/shape_C_3d_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating C-shape !----------------------------------------------------------------------------- !> Generate the NURBS C-shape with a resolution of 100 call shape % create ( 100 , 60 , 10 ) !> Export the generated cirlce to a VTK file call shape % export_Xg ( 'vtk/shape_C_3d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_C_3d_Xc.vtk' , 'vtk/shape_C_3d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call shape % finalize () end program","tags":"","loc":"sourcefile/shape_c_3d.f90.html"},{"title":"cmp_area.f90 – ForCAD","text":"This file depends on sourcefile~~cmp_area.f90~~EfferentGraph sourcefile~cmp_area.f90 cmp_area.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~cmp_area.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program compute_area use forcad implicit none type ( nurbs_surface ) :: shape real ( rk ) :: area real ( rk ) :: Xc ( 4 , 3 ) Xc ( 1 ,:) = [ 0.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 3 ,:) = [ 0.0_rk , 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ 2.0_rk , 2.0_rk , 0.0_rk ] call shape % set (& knot1 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& Xc = Xc ) call shape % cmp_area ( area ) print * , area end program","tags":"","loc":"sourcefile/cmp_area.f90.html"},{"title":"shape_C_2d.f90 – ForCAD","text":"This file depends on sourcefile~~shape_c_2d.f90~~EfferentGraph sourcefile~shape_c_2d.f90 shape_C_2d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_c_2d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_C_2d use forcad , only : rk , nurbs_surface implicit none type ( nurbs_surface ) :: shape !----------------------------------------------------------------------------- ! Setting up NURBS C-shape !----------------------------------------------------------------------------- !> Set a C-shape with radius 2.0 and center at [0.0, 0.0, 0.0] call shape % set_C ( center = [ 0.0_rk , 0.0_rk , 0.0_rk ], radius1 = 1.0_rk , radius2 = 2.0_rk ) !> Export control points to a VTK file call shape % export_Xc ( 'vtk/shape_C_2d_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating C-shape !----------------------------------------------------------------------------- !> Generate the NURBS C-shape with a resolution of 100 call shape % create ( 100 , 60 ) !> Export the generated cirlce to a VTK file call shape % export_Xg ( 'vtk/shape_C_2d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_C_2d_Xc.vtk' , 'vtk/shape_C_2d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call shape % finalize () end program","tags":"","loc":"sourcefile/shape_c_2d.f90.html"},{"title":"shape_circle.f90 – ForCAD","text":"This file depends on sourcefile~~shape_circle.f90~~EfferentGraph sourcefile~shape_circle.f90 shape_circle.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_circle.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_circle use forcad , only : rk , nurbs_curve implicit none type ( nurbs_curve ) :: shape !----------------------------------------------------------------------------- ! Setting up NURBS circle !----------------------------------------------------------------------------- !> Set a circle with radius 2.0 and center at [0.0, 0.0, 0.0] call shape % set_circle ( center = [ 0.0_rk , 0.0_rk , 0.0_rk ], radius = 2.0_rk ) !> Export control points to a VTK file call shape % export_Xc ( 'vtk/shape_circle_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating circle !----------------------------------------------------------------------------- !> Generate the NURBS circle with a resolution of 100 call shape % create ( res = 100 ) !> Export the generated cirlce to a VTK file call shape % export_Xg ( 'vtk/shape_circle_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_circle_Xc.vtk' , 'vtk/shape_circle_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call shape % finalize () end program","tags":"","loc":"sourcefile/shape_circle.f90.html"},{"title":"shape_half_ring_2d.f90 – ForCAD","text":"This file depends on sourcefile~~shape_half_ring_2d.f90~~EfferentGraph sourcefile~shape_half_ring_2d.f90 shape_half_ring_2d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_half_ring_2d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_half_ring_2d use forcad , only : rk , nurbs_surface implicit none type ( nurbs_surface ) :: shape !> Set up a half ring shape centered at 0,0,0 with inner radius 1 and outer radius 2. call shape % set_half_ring ([ 0.0_rk , 0.0_rk , 0.0_rk ], 1.0_rk , 2.0_rk ) !> Export the control points to a VTK file for visualization. call shape % export_Xc ( 'vtk/shape_half_ring_2d_Xc.vtk' ) !> Create the shape using the specified number of elements in each direction. call shape % create ( 60 , 15 ) !> Export the geometry to a VTK file for visualization. call shape % export_Xg ( 'vtk/shape_half_ring_2d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_half_ring_2d_Xc.vtk' , 'vtk/shape_half_ring_2d_Xg.vtk' ) !> Finalize and clean up the shape object. call shape % finalize () end program","tags":"","loc":"sourcefile/shape_half_ring_2d.f90.html"},{"title":"nearest_point_2d.f90 – ForCAD","text":"This file depends on sourcefile~~nearest_point_2d.f90~~EfferentGraph sourcefile~nearest_point_2d.f90 nearest_point_2d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~nearest_point_2d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program nearest_point_2d use forcad , only : rk , nurbs_surface implicit none type ( nurbs_surface ) :: shape !! Declare a NURBS surface object real ( rk ), allocatable :: nearest_Xg (:) !! Coordinates of the nearest point on the surface real ( rk ), allocatable :: nearest_Xt (:) !! Corresponding parametric coordinates of the nearest point integer :: id !! id of the nearest point real ( rk ) :: Xc ( 4 , 3 ) !! Control points real ( rk ) :: Wc ( 4 ) !! Weights of the control points !----------------------------------------------------------------------------- ! Setting up the NURBS tetrangon !----------------------------------------------------------------------------- !> Set a surface with 4 control points Xc ( 1 ,:) = [ 0.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 2.0_rk , 0.0_rk , 0.0_rk ] Xc ( 3 ,:) = [ 0.0_rk , 2.0_rk , 0.0_rk ] Xc ( 4 ,:) = [ 2.0_rk , 2.0_rk , 0.0_rk ] !> The weights of the control points (Wc) are optional. Wc = [ 1.0_rk , 1.1_rk , 0.7_rk , 1.0_rk ] call shape % set ( knot1 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ], knot2 = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ], Xc = Xc , Wc = Wc ) !----------------------------------------------------------------------------- ! Creating the NURBS surface !----------------------------------------------------------------------------- !> Generate the NURBS surface with resolutions of 30 in both dimensions call shape % create ( 30 , 30 ) !----------------------------------------------------------------------------- ! Nearest point on the surface (Approximation) !----------------------------------------------------------------------------- !> Find the nearest point on the surface to a given point ! nearest_Xg: Coordinates of the nearest point on the surface (optional) ! nearest_Xt: Corresponding parametric coordinates of the nearest point (optional) ! id: id of the nearest point (optional) call shape % nearest_point ([ 1.3_rk , 1.0_rk , 1.999999999_rk ], nearest_Xg , nearest_Xt , id ) print '(a,1x,g0,2x,g0,2x,g0,a,2x,g0,2x,g0,2x,a,1x,g0)' ,& 'Nearest point on the surface:' , nearest_Xg , ' with parametric coordinates:' , nearest_Xt , ' and id:' , id !----------------------------------------------------------------------------- ! Nearest point on the surface (Optimization) !----------------------------------------------------------------------------- !> Find the nearest point on the surface to a given point !> The optimization method is used to find the nearest point !> The optimization method is based on the Newton-Raphson method ! nearest_Xt: Corresponding parametric coordinates of the nearest point ! nearest_Xg: Coordinates of the nearest point on the surface (optional) call shape % nearest_point2 ([ 1.3_rk , 1.0_rk , 1.999999999_rk ], 1.0e-11_rk , 30 , nearest_Xt , nearest_Xg ) print '(a,1x,g0,2x,g0,2x,g0,a,2x,g0,2x,g0)' ,& 'Nearest point on the surface:' , nearest_Xg , ' with parametric coordinates:' , nearest_Xt !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS surface object call shape % finalize () ! deallocate(nearest_Xg, nearest_Xt) end program","tags":"","loc":"sourcefile/nearest_point_2d.f90.html"},{"title":"cmp_length.f90 – ForCAD","text":"This file depends on sourcefile~~cmp_length.f90~~EfferentGraph sourcefile~cmp_length.f90 cmp_length.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~cmp_length.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program compute_length use forcad implicit none type ( nurbs_curve ) :: shape real ( rk ) :: length real ( rk ) :: Xc ( 2 , 3 ) Xc ( 1 ,:) = [ 0.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 2.0_rk , 0.0_rk , 0.0_rk ] call shape % set (& knot = [ 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk ],& Xc = Xc ) call shape % cmp_length ( length ) print * , length end program","tags":"","loc":"sourcefile/cmp_length.f90.html"},{"title":"shape_C_1d.f90 – ForCAD","text":"This file depends on sourcefile~~shape_c_1d.f90~~EfferentGraph sourcefile~shape_c_1d.f90 shape_C_1d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_c_1d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_C_1d use forcad , only : rk , nurbs_curve implicit none type ( nurbs_curve ) :: shape !----------------------------------------------------------------------------- ! Setting up NURBS C-shape !----------------------------------------------------------------------------- !> Set a C-shape with radius 2.0 and center at [0.0, 0.0, 0.0] call shape % set_C ( center = [ 0.0_rk , 0.0_rk , 0.0_rk ], radius = 2.0_rk ) !> Export control points to a VTK file call shape % export_Xc ( 'vtk/shape_C_1d_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating C-shape !----------------------------------------------------------------------------- !> Generate the NURBS C-shape with a resolution of 100 call shape % create ( res = 100 ) !> Export the generated cirlce to a VTK file call shape % export_Xg ( 'vtk/shape_C_1d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_C_1d_Xc.vtk' , 'vtk/shape_C_1d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call shape % finalize () end program","tags":"","loc":"sourcefile/shape_c_1d.f90.html"},{"title":"shape_ring_3d.f90 – ForCAD","text":"This file depends on sourcefile~~shape_ring_3d.f90~~EfferentGraph sourcefile~shape_ring_3d.f90 shape_ring_3d.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~shape_ring_3d.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code program shape_ring_3d use forcad , only : rk , nurbs_volume implicit none type ( nurbs_volume ) :: shape !> Set up a ring shape centered at 0,0,0 with inner radius 1, outer radius 2, and length 1. call shape % set_ring ([ 0.0_rk , 0.0_rk , 0.0_rk ], 1.0_rk , 2.0_rk , 1.0_rk ) !> Export the control points to a VTK file for visualization. call shape % export_Xc ( 'vtk/shape_ring_3d_Xc.vtk' ) !> Create the shape using the specified number of elements in each direction. call shape % create ( 60 , 15 , 10 ) !> Export the geometry to a VTK file for visualization. call shape % export_Xg ( 'vtk/shape_ring_3d_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call shape % show ( 'vtk/shape_ring_3d_Xc.vtk' , 'vtk/shape_ring_3d_Xg.vtk' ) !> Finalize and clean up the shape object. call shape % finalize () end program","tags":"","loc":"sourcefile/shape_ring_3d.f90.html"},{"title":"example_ppm1.f90 – ForCAD","text":"This file depends on sourcefile~~example_ppm1.f90~~EfferentGraph sourcefile~example_ppm1.f90 example_ppm1.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~example_ppm1.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> Visualization of NURBS surfaces using ForCAD, ForImage and ForColorMap libraries !> This example converts NURBS surfaces (vector) to an image (raster) using ForCAD, ForImage and ForColorMap libraries. program example_ppm1 use forcad , only : rk , nurbs_surface use forimage , only : ik , format_pnm , color use forcolormap , only : colormap use fortime , only : timer implicit none type ( nurbs_surface ) :: shape type ( format_pnm ) :: image type ( color ) :: background_color type ( colormap ) :: cmap integer ( ik ), allocatable :: px (:, :) real ( rk ), allocatable :: Xg (:,:), z_values (:) real ( rk ) :: center ( 3 ), inner_radius , outer_radius , aspect_ratio integer :: height , width , ng ( 2 ), red , green , blue , res1 , res2 , i integer , allocatable :: idx (:,:) type ( timer ) :: t !----------------------------------------------------------------------------- ! Set the image size and calculate the aspect ratio !----------------------------------------------------------------------------- width = 2000 height = 2000 aspect_ratio = real ( width , rk ) / real ( height , rk ) allocate ( px ( height , 3 * width )) !----------------------------------------------------------------------------- ! Set the background color using ForColor class of ForImage !----------------------------------------------------------------------------- call t % timer_start () call background_color % set ( 'white' , use_library = . true .) do i = 1 , width px (:, 3 * ( i - 1 ) + 1 ) = background_color % get_r () px (:, 3 * ( i - 1 ) + 2 ) = background_color % get_g () px (:, 3 * ( i - 1 ) + 3 ) = background_color % get_b () end do call t % timer_stop ( message = 'Setting the background color' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a tetragon res1 = 2000 res2 = 2000 call shape % set_tetragon ( L = [ 1.0_rk , 1.0_rk ], nc = [ 2 , 2 ]) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a tetragon' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! circular gradient z_values = (( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 )))) ** 2 & + (( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) ** 2 ) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'buda' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a ring center = [ 0.25_rk , 0.25_rk , 0.0_rk ] outer_radius = 0.24_rk inner_radius = 0.0_rk res1 = 3500 res2 = 1000 center ( 2 ) = center ( 2 ) / aspect_ratio call shape % set_ring ( center , inner_radius , outer_radius ) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! circular gradient z_values = (( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 )))) ** 2 & + (( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) ** 2 ) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'managua' , 0.0_rk , 2.2_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a ring center = [ 0.75_rk , 0.25_rk , 0.0_rk ] outer_radius = 0.24_rk inner_radius = 0.08_rk res1 = 3500 res2 = 1000 center ( 2 ) = center ( 2 ) / aspect_ratio call shape % set_ring ( center , inner_radius , outer_radius ) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the y-direction z_values = ( Xg (:, 2 ) - minval ( Xg (:, 2 ))) / ( maxval ( Xg (:, 2 )) - minval ( Xg (:, 2 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'lipari' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a ring center = [ 0.25_rk , 0.75_rk , 0.0_rk ] outer_radius = 0.24_rk inner_radius = 0.01_rk res1 = 3500 res2 = 1000 center ( 2 ) = center ( 2 ) / aspect_ratio call shape % set_ring ( center , inner_radius , outer_radius ) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the x-direction z_values = ( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- call cmap % set ( 'oslo10' , 0.0_rk , 1.0_rk ) !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) call cmap % compute_RGB ( z_values ( i ), red , green , blue ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Set a shape object using ForCAD library !----------------------------------------------------------------------------- call t % timer_start () !> Set the shape parameters for a ring center = [ 0.75_rk , 0.75_rk , 0.0_rk ] outer_radius = 0.24_rk inner_radius = 0.22_rk res1 = 3500 res2 = 1000 center ( 2 ) = center ( 2 ) / aspect_ratio call shape % set_ring ( center , inner_radius , outer_radius ) call shape % create ( res1 , res2 ) Xg = shape % get_Xg () ng = shape % get_ng () call shape % finalize () call t % timer_stop ( message = 'Creating a ring' ) !----------------------------------------------------------------------------- ! Set the z-values of the geometry points !----------------------------------------------------------------------------- ! linear gradient in the x-direction z_values = ( Xg (:, 1 ) - minval ( Xg (:, 1 ))) / ( maxval ( Xg (:, 1 )) - minval ( Xg (:, 1 ))) !----------------------------------------------------------------------------- ! Set the colormap using ForColorMap library !----------------------------------------------------------------------------- red = 255 green = 215 blue = 0 !----------------------------------------------------------------------------- ! Set colors to the shape !----------------------------------------------------------------------------- call t % timer_start () Xg (:, 2 ) = Xg (:, 2 ) * aspect_ratio allocate ( idx ( ng ( 1 ) * ng ( 2 ), 2 )) idx (:, 1 ) = min ( max ( 1 , int ( Xg (:, 1 ) * width ) + 1 ), width ) idx (:, 2 ) = min ( max ( 1 , int ( Xg (:, 2 ) * height ) + 1 ), height ) do i = 1 , ng ( 1 ) * ng ( 2 ) px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 1 ) = red px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 2 ) = green px ( idx ( i , 2 ), 3 * ( idx ( i , 1 ) - 1 ) + 3 ) = blue end do deallocate ( idx ) call t % timer_stop ( message = 'Setting colors' ) !----------------------------------------------------------------------------- ! Save the image to a PPM file using ForImage library !----------------------------------------------------------------------------- call t % timer_start () call image % set_pnm (& encoding = 'binary' , & file_format = 'ppm' , & width = width , & height = height , & max_color = 255 , & comment = 'example: ForCAD + ForImage + ForColor + ForColormap' , & pixels = px & ) call image % export_pnm ( 'ppm/example_ppm1' ) call image % finalize () call t % timer_stop ( message = 'Saving the image' ) ! Clean up call cmap % finalize () deallocate ( px , Xg , z_values ) end program","tags":"","loc":"sourcefile/example_ppm1.f90.html"},{"title":"example_curve_1.f90 – ForCAD","text":"This file depends on sourcefile~~example_curve_1.f90~~EfferentGraph sourcefile~example_curve_1.f90 example_curve_1.f90 sourcefile~forcad.f90 forcad.f90 sourcefile~example_curve_1.f90->sourcefile~forcad.f90 sourcefile~forcad_nurbs_curve.f90 forcad_nurbs_curve.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_curve.f90 sourcefile~forcad_nurbs_surface.f90 forcad_nurbs_surface.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_surface.f90 sourcefile~forcad_nurbs_volume.f90 forcad_nurbs_volume.f90 sourcefile~forcad.f90->sourcefile~forcad_nurbs_volume.f90 sourcefile~forcad_utils.f90 forcad_utils.f90 sourcefile~forcad.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_curve.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_surface.f90->sourcefile~forcad_utils.f90 sourcefile~forcad_nurbs_volume.f90->sourcefile~forcad_utils.f90 Help Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\nis dependent upon another if the latter must be compiled before the former\ncan be. Where possible, edges connecting nodes are\ngiven different colours to make them easier to distinguish in\nlarge graphs. Source Code !> This program demonstrates the usage of a NURBS (Non-Uniform Rational B-Spline) curve object to create  and finalize a NURBS curve. !> It sets up control points, weights, and knot vectors for all three dimensions, generates the curve, and exports the control points and the curve to VTK files. program example1_curve use forcad , only : rk , nurbs_curve implicit none type ( nurbs_curve ) :: nurbs !! Declare a NURBS curve object real ( rk ), allocatable :: Xc (:,:), Wc (:) !! Arrays for control points and weights real ( rk ) :: knot ( 6 ) !! Array for knot vector !----------------------------------------------------------------------------- ! Setting up the NURBS curve !----------------------------------------------------------------------------- !> Define control points for the NURBS curve allocate ( Xc ( 3 , 3 )) Xc ( 1 ,:) = [ 0.0_rk , 0.0_rk , 0.0_rk ] Xc ( 2 ,:) = [ 0.0_rk , 5.0_rk , 0.0_rk ] Xc ( 3 ,:) = [ 5.0_rk , 5.0_rk , 0.0_rk ] !> Define weights for the control points (optional) allocate ( Wc ( 3 )) Wc = [ 1.0_rk , 2.0_rk , 0.3_rk ] !> Define knot vector knot = [ 0.0_rk , 0.0_rk , 0.0_rk , 1.0_rk , 1.0_rk , 1.0_rk ] !> Set knot vector, control points, and weights for the NURBS curve object. !> Wc is optional call nurbs % set ( knot , Xc , Wc ) !> Deallocate local arrays deallocate ( Xc , Wc ) !> Export control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_curve_Xc.vtk' ) !----------------------------------------------------------------------------- ! Creating the NURBS curve !----------------------------------------------------------------------------- !> Generate the NURBS curve with a resolution of 20 call nurbs % create ( res = 20 ) !> Export the generated curve to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_curve_Xg.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_curve_Xc.vtk' , 'vtk/nurbs_curve_Xg.vtk' ) !----------------------------------------------------------------------------- ! Refinements !----------------------------------------------------------------------------- !> Print size of the knot vector print * , size ( nurbs % get_knot ()) !> Insert knots 0.25, twice and 0.75, once call nurbs % insert_knots ([ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) !> Print size of the updated knot vector print * , size ( nurbs % get_knot ()) !> Print the degree of the curve print * , nurbs % get_degree () !> Elevate the degree of the curve (2 times) call nurbs % elevate_degree ( 2 ) !> Print the updated degree of the curve print * , nurbs % get_degree () !> Print size of the knot vector print * , size ( nurbs % get_knot ()) !> Remove knots 0.25, twice and 0.75, once call nurbs % remove_knots ([ 0.25_rk , 0.75_rk ], [ 2 , 1 ]) !> Print size of the updated knot vector print * , size ( nurbs % get_knot ()) !> Generate the refined curve with a resolution of 20 call nurbs % create () !> Export updated control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_curve_Xc2.vtk' ) !> Export the refined generated curve to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_curve_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_curve_Xc2.vtk' , 'vtk/nurbs_curve_Xg2.vtk' ) !----------------------------------------------------------------------------- ! Transformations !----------------------------------------------------------------------------- !> Rotate the control points call nurbs % rotate_Xc ( alpha = 4 5.0_rk , beta = 0.0_rk , theta = 9 0.0_rk ) !> Rotate the generated curve call nurbs % rotate_Xg ( alpha =- 4 5.0_rk , beta = 0.0_rk , theta =- 9 0.0_rk ) !> Translate the control points call nurbs % translate_Xc ([ 1.0_rk , 2.0_rk , - 3.0_rk ]) !> Translate the generated curve call nurbs % translate_Xg ([ - 1.0_rk , - 2.0_rk , 3.0_rk ]) !> Export the transformed control points to a VTK file call nurbs % export_Xc ( 'vtk/nurbs_curve_Xc3.vtk' ) !> Export the transformed generated volume to a VTK file call nurbs % export_Xg ( 'vtk/nurbs_curve_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Visualization using PyVista ! Note: PyVista is required for visualization. Install it using `pip install pyvista` !----------------------------------------------------------------------------- !> Show the control geometry and geometry using PyVista call nurbs % show ( 'vtk/nurbs_curve_Xc3.vtk' , 'vtk/nurbs_curve_Xg3.vtk' ) !----------------------------------------------------------------------------- ! Finalizing !----------------------------------------------------------------------------- !> Finalize the NURBS curve object call nurbs % finalize () end program example1_curve","tags":"","loc":"sourcefile/example_curve_1.f90.html"}]}
\ No newline at end of file
diff --git a/type/nurbs_curve.html b/type/nurbs_curve.html
index b3bfa8585..1e63bce9e 100644
--- a/type/nurbs_curve.html
+++ b/type/nurbs_curve.html
@@ -118,17 +118,17 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../type/nurbs_curve.html#variable-wc~48">Wc</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#variable-xc~51">Xc</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#variable-xg~26">Xg</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#variable-xt~62">Xt</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#variable-degree~54">degree</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#variable-elemconn~35">elemConn</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#variable-elemconn_xc_vis~3">elemConn_Xc_vis</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#variable-elemconn_xg_vis~3">elemConn_Xg_vis</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#variable-knot~16">knot</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#variable-nc~59">nc</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#variable-ng~28">ng</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#variable-wc~7">Wc</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#variable-xc~7">Xc</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#variable-xg">Xg</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#variable-xt">Xt</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#variable-degree">degree</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#variable-elemconn">elemConn</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#variable-elemconn_xc_vis">elemConn_Xc_vis</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#variable-elemconn_xg_vis">elemConn_Xg_vis</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#variable-knot~2">knot</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#variable-nc">nc</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#variable-ng">ng</a>
         </div>
       </div>
     </div>
@@ -155,75 +155,75 @@ <h4 class="card-header bg-primary text-white">Type-Bound Procedures</h4>
       </a>
       <div id="boundprocs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-ansatz~3">ansatz</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-basis~3">basis</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-cmp_xg~3">cmp_Xg</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-cmp_degree~3">cmp_degree</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-cmp_elem~3">cmp_elem</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-cmp_elem_xc_vis~3">cmp_elem_Xc_vis</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-cmp_elem_xg_vis~3">cmp_elem_Xg_vis</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-ansatz">ansatz</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-basis">basis</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-cmp_xg">cmp_Xg</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-cmp_degree">cmp_degree</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-cmp_elem">cmp_elem</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-cmp_elem_xc_vis">cmp_elem_Xc_vis</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-cmp_elem_xg_vis">cmp_elem_Xg_vis</a>
             <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-cmp_length">cmp_length</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-cmp_nc~3">cmp_nc</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-create~3">create</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-derivative~3">derivative</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-derivative2~3">derivative2</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-elevate_degree~3">elevate_degree</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-export_xc~3">export_Xc</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-export_xg~3">export_Xg</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-finalize~3">finalize</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_wc~3">get_Wc</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xc~3">get_Xc</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xg~3">get_Xg</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xt~3">get_Xt</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_continuity~3">get_continuity</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_degree~3">get_degree</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_elem~3">get_elem</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_elem_xc_vis~3">get_elem_Xc_vis</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_elem_xg_vis~3">get_elem_Xg_vis</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_knot~3">get_knot</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_multiplicity~3">get_multiplicity</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_nc~3">get_nc</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_ng~3">get_ng</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-insert_knots~3">insert_knots</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-is_rational~3">is_rational</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-modify_wc~3">modify_Wc</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-modify_xc~3">modify_Xc</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-nearest_point~3">nearest_point</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-nearest_point2~3">nearest_point2</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-remove_knots~3">remove_knots</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-rotate_xc~3">rotate_Xc</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-rotate_xg~3">rotate_Xg</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set~3">set</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set1~3">set1</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-cmp_nc">cmp_nc</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-create">create</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-derivative">derivative</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-derivative2">derivative2</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-elevate_degree">elevate_degree</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-export_xc">export_Xc</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-export_xg">export_Xg</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-finalize">finalize</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_wc">get_Wc</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xc">get_Xc</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xg">get_Xg</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xt">get_Xt</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_continuity">get_continuity</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_degree">get_degree</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_elem">get_elem</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_elem_xc_vis">get_elem_Xc_vis</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_elem_xg_vis">get_elem_Xg_vis</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_knot">get_knot</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_multiplicity">get_multiplicity</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_nc">get_nc</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_ng">get_ng</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-insert_knots">insert_knots</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-is_rational">is_rational</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-modify_wc">modify_Wc</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-modify_xc">modify_Xc</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-nearest_point">nearest_point</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-nearest_point2">nearest_point2</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-remove_knots">remove_knots</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-rotate_xc">rotate_Xc</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-rotate_xg">rotate_Xg</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set">set</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set1">set1</a>
             <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set1a">set1a</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set2~3">set2</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set3~3">set3</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set4~3">set4</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set_c~3">set_C</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set2">set2</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set3">set3</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set4">set4</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set_c">set_C</a>
             <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set_circle">set_circle</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set_elem~3">set_elem</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set_elem_xc_vis~3">set_elem_Xc_vis</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set_elem_xg_vis~3">set_elem_Xg_vis</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set_elem">set_elem</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set_elem_xc_vis">set_elem_Xc_vis</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set_elem_xg_vis">set_elem_Xg_vis</a>
             <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-set_half_circle">set_half_circle</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-show~3">show</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-translate_xc~3">translate_Xc</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-translate_xg~3">translate_Xg</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-basis_scalar~3">basis_scalar</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-basis_vector~3">basis_vector</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-derivative2_scalar~3">derivative2_scalar</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-derivative2_vector~3">derivative2_vector</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-derivative_scalar~3">derivative_scalar</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-derivative_vector~3">derivative_vector</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_wc_all~3">get_Wc_all</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_wci~3">get_Wci</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xc_all~3">get_Xc_all</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xci~3">get_Xci</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xcid~3">get_Xcid</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xg_all~3">get_Xg_all</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xgi~3">get_Xgi</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xgid~3">get_Xgid</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_knot_all~3">get_knot_all</a>
-            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_knoti~3">get_knoti</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-show">show</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-translate_xc">translate_Xc</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-translate_xg">translate_Xg</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-basis_scalar">basis_scalar</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-basis_vector">basis_vector</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-derivative2_scalar">derivative2_scalar</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-derivative2_vector">derivative2_vector</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-derivative_scalar">derivative_scalar</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-derivative_vector">derivative_vector</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_wc_all">get_Wc_all</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_wci">get_Wci</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xc_all">get_Xc_all</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xci">get_Xci</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xcid">get_Xcid</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xg_all">get_Xg_all</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xgi">get_Xgi</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_xgid">get_Xgid</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_knot_all">get_knot_all</a>
+            <a class="list-group-item" href="../type/nurbs_curve.html#boundprocedure-get_knoti">get_knoti</a>
         </div>
       </div>
     </div>
@@ -256,7 +256,7 @@ <h2>Components</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~48"></span>
+              <span class="anchor" id="variable-wc~7"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -273,7 +273,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~51"></span>
+              <span class="anchor" id="variable-xc~7"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -290,7 +290,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xg~26"></span>
+              <span class="anchor" id="variable-xg"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -307,7 +307,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~62"></span>
+              <span class="anchor" id="variable-xt"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -324,7 +324,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~54"></span>
+              <span class="anchor" id="variable-degree"></span>
               integer,
             </td>
               <td>private</td>
@@ -341,7 +341,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~35"></span>
+              <span class="anchor" id="variable-elemconn"></span>
               integer,
             </td>
               <td>private,</td>
@@ -358,7 +358,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn_xc_vis~3"></span>
+              <span class="anchor" id="variable-elemconn_xc_vis"></span>
               integer,
             </td>
               <td>private,</td>
@@ -375,7 +375,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn_xg_vis~3"></span>
+              <span class="anchor" id="variable-elemconn_xg_vis"></span>
               integer,
             </td>
               <td>private,</td>
@@ -392,7 +392,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot~16"></span>
+              <span class="anchor" id="variable-knot~2"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -409,7 +409,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~59"></span>
+              <span class="anchor" id="variable-nc"></span>
               integer,
             </td>
               <td>private</td>
@@ -426,7 +426,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~28"></span>
+              <span class="anchor" id="variable-ng"></span>
               integer,
             </td>
               <td>private</td>
@@ -454,7 +454,7 @@ <h2>Type-Bound Procedures</h2>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-ansatz~3"></span>
+      <span class="anchor" id="boundprocedure-ansatz"></span>
       <h3>
           procedure, public ::
   <strong>ansatz</strong>
@@ -470,7 +470,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/ansatz~3.html'>ansatz</a>(this, ie, ig, Tgc, dTgc_dXg, dL)  
+    private pure subroutine <a href='../proc/ansatz.html'>ansatz</a>(this, ie, ig, Tgc, dTgc_dXg, dL)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -593,10 +593,10 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-basis~3"></span>
+      <span class="anchor" id="boundprocedure-basis"></span>
       <h3>
           generic, public ::
-  <strong>basis</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-basis_vector~3'>basis_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-basis_scalar~3'>basis_scalar</a>
+  <strong>basis</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-basis_vector'>basis_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-basis_scalar'>basis_scalar</a>
         
       </h3>
     </div>
@@ -609,7 +609,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/basis_vector~3.html'>basis_vector</a>(this, res, Xt, Tgc)  
+    private pure subroutine <a href='../proc/basis_vector.html'>basis_vector</a>(this, res, Xt, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -697,7 +697,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/basis_scalar~3.html'>basis_scalar</a>(this, Xt, Tgc)  
+    private pure subroutine <a href='../proc/basis_scalar.html'>basis_scalar</a>(this, Xt, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -775,7 +775,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_xg~3"></span>
+      <span class="anchor" id="boundprocedure-cmp_xg"></span>
       <h3>
           procedure, public ::
   <strong>cmp_Xg</strong>
@@ -791,7 +791,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/cmp_xg~3.html'>cmp_Xg</a>(this, Xt) result(Xg)  
+    private pure function <a href='../proc/cmp_xg.html'>cmp_Xg</a>(this, Xt) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -859,7 +859,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_degree~3"></span>
+      <span class="anchor" id="boundprocedure-cmp_degree"></span>
       <h3>
           procedure, public ::
   <strong>cmp_degree</strong>
@@ -875,7 +875,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/cmp_degree~3.html'>cmp_degree</a>(this)  
+    private pure subroutine <a href='../proc/cmp_degree.html'>cmp_degree</a>(this)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -923,7 +923,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_elem~3"></span>
+      <span class="anchor" id="boundprocedure-cmp_elem"></span>
       <h3>
           procedure, public ::
   <strong>cmp_elem</strong>
@@ -939,7 +939,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/cmp_elem~3.html'>cmp_elem</a>(this) result(elemConn)  
+    private pure function <a href='../proc/cmp_elem.html'>cmp_elem</a>(this) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -992,7 +992,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_elem_xc_vis~3"></span>
+      <span class="anchor" id="boundprocedure-cmp_elem_xc_vis"></span>
       <h3>
           procedure, public ::
   <strong>cmp_elem_Xc_vis</strong>
@@ -1008,7 +1008,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/cmp_elem_xc_vis~3.html'>cmp_elem_Xc_vis</a>(this, p) result(elemConn)  
+    private pure function <a href='../proc/cmp_elem_xc_vis.html'>cmp_elem_Xc_vis</a>(this, p) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1076,7 +1076,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_elem_xg_vis~3"></span>
+      <span class="anchor" id="boundprocedure-cmp_elem_xg_vis"></span>
       <h3>
           procedure, public ::
   <strong>cmp_elem_Xg_vis</strong>
@@ -1092,7 +1092,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/cmp_elem_xg_vis~3.html'>cmp_elem_Xg_vis</a>(this, p) result(elemConn)  
+    private pure function <a href='../proc/cmp_elem_xg_vis.html'>cmp_elem_Xg_vis</a>(this, p) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1239,7 +1239,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_nc~3"></span>
+      <span class="anchor" id="boundprocedure-cmp_nc"></span>
       <h3>
           procedure, public ::
   <strong>cmp_nc</strong>
@@ -1255,7 +1255,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/cmp_nc~3.html'>cmp_nc</a>(this)  
+    private pure subroutine <a href='../proc/cmp_nc.html'>cmp_nc</a>(this)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1303,7 +1303,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-create~3"></span>
+      <span class="anchor" id="boundprocedure-create"></span>
       <h3>
           procedure, public ::
   <strong>create</strong>
@@ -1319,7 +1319,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/create~3.html'>create</a>(this, res, Xt)  
+    private pure subroutine <a href='../proc/create.html'>create</a>(this, res, Xt)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1397,10 +1397,10 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative~3"></span>
+      <span class="anchor" id="boundprocedure-derivative"></span>
       <h3>
           generic, public ::
-  <strong>derivative</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-derivative_vector~3'>derivative_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-derivative_scalar~3'>derivative_scalar</a>
+  <strong>derivative</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-derivative_vector'>derivative_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-derivative_scalar'>derivative_scalar</a>
         
       </h3>
     </div>
@@ -1413,7 +1413,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative_vector~3.html'>derivative_vector</a>(this, res, Xt, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative_vector.html'>derivative_vector</a>(this, res, Xt, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1516,7 +1516,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative_scalar~3.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
+    private pure subroutine <a href='../proc/derivative_scalar.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1624,10 +1624,10 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative2~3"></span>
+      <span class="anchor" id="boundprocedure-derivative2"></span>
       <h3>
           generic, public ::
-  <strong>derivative2</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-derivative2_vector~3'>derivative2_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-derivative2_scalar~3'>derivative2_scalar</a>
+  <strong>derivative2</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-derivative2_vector'>derivative2_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-derivative2_scalar'>derivative2_scalar</a>
         
       </h3>
     </div>
@@ -1640,7 +1640,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative2_vector~3.html'>derivative2_vector</a>(this, res, Xt, d2Tgc, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative2_vector.html'>derivative2_vector</a>(this, res, Xt, d2Tgc, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1758,7 +1758,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative2_scalar~3.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative2_scalar.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1866,7 +1866,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-elevate_degree~3"></span>
+      <span class="anchor" id="boundprocedure-elevate_degree"></span>
       <h3>
           procedure, public ::
   <strong>elevate_degree</strong>
@@ -1882,7 +1882,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/elevate_degree~3.html'>elevate_degree</a>(this, t)  
+    private pure subroutine <a href='../proc/elevate_degree.html'>elevate_degree</a>(this, t)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1945,7 +1945,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-export_xc~3"></span>
+      <span class="anchor" id="boundprocedure-export_xc"></span>
       <h3>
           procedure, public ::
   <strong>export_Xc</strong>
@@ -1961,7 +1961,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private impure subroutine <a href='../proc/export_xc~3.html'>export_Xc</a>(this, filename)  
+    private impure subroutine <a href='../proc/export_xc.html'>export_Xc</a>(this, filename)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2024,7 +2024,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-export_xg~3"></span>
+      <span class="anchor" id="boundprocedure-export_xg"></span>
       <h3>
           procedure, public ::
   <strong>export_Xg</strong>
@@ -2040,7 +2040,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private impure subroutine <a href='../proc/export_xg~3.html'>export_Xg</a>(this, filename)  
+    private impure subroutine <a href='../proc/export_xg.html'>export_Xg</a>(this, filename)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2103,7 +2103,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-finalize~3"></span>
+      <span class="anchor" id="boundprocedure-finalize"></span>
       <h3>
           procedure, public ::
   <strong>finalize</strong>
@@ -2119,7 +2119,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/finalize~3.html'>finalize</a>(this)  
+    private pure subroutine <a href='../proc/finalize.html'>finalize</a>(this)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2167,10 +2167,10 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_wc~3"></span>
+      <span class="anchor" id="boundprocedure-get_wc"></span>
       <h3>
           generic, public ::
-  <strong>get_Wc</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_wc_all~3'>get_Wc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_wci~3'>get_Wci</a>
+  <strong>get_Wc</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_wc_all'>get_Wc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_wci'>get_Wci</a>
         
       </h3>
     </div>
@@ -2183,7 +2183,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_wc_all~3.html'>get_Wc_all</a>(this) result(Wc)  
+    private pure function <a href='../proc/get_wc_all.html'>get_Wc_all</a>(this) result(Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2231,7 +2231,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_wci~3.html'>get_Wci</a>(this, n) result(Wc)  
+    private pure function <a href='../proc/get_wci.html'>get_Wci</a>(this, n) result(Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2299,10 +2299,10 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xc~3"></span>
+      <span class="anchor" id="boundprocedure-get_xc"></span>
       <h3>
           generic, public ::
-  <strong>get_Xc</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xc_all~3'>get_Xc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xci~3'>get_Xci</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xcid~3'>get_Xcid</a>
+  <strong>get_Xc</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xc_all'>get_Xc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xci'>get_Xci</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xcid'>get_Xcid</a>
         
       </h3>
     </div>
@@ -2315,7 +2315,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xc_all~3.html'>get_Xc_all</a>(this) result(Xc)  
+    private pure function <a href='../proc/get_xc_all.html'>get_Xc_all</a>(this) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2363,7 +2363,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xci~3.html'>get_Xci</a>(this, n) result(Xc)  
+    private pure function <a href='../proc/get_xci.html'>get_Xci</a>(this, n) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2426,7 +2426,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xcid~3.html'>get_Xcid</a>(this, n, dir) result(Xc)  
+    private pure function <a href='../proc/get_xcid.html'>get_Xcid</a>(this, n, dir) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2509,10 +2509,10 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xg~3"></span>
+      <span class="anchor" id="boundprocedure-get_xg"></span>
       <h3>
           generic, public ::
-  <strong>get_Xg</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xg_all~3'>get_Xg_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xgi~3'>get_Xgi</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xgid~3'>get_Xgid</a>
+  <strong>get_Xg</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xg_all'>get_Xg_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xgi'>get_Xgi</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_xgid'>get_Xgid</a>
         
       </h3>
     </div>
@@ -2525,7 +2525,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xg_all~3.html'>get_Xg_all</a>(this) result(Xg)  
+    private pure function <a href='../proc/get_xg_all.html'>get_Xg_all</a>(this) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2573,7 +2573,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xgi~3.html'>get_Xgi</a>(this, n) result(Xg)  
+    private pure function <a href='../proc/get_xgi.html'>get_Xgi</a>(this, n) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2636,7 +2636,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xgid~3.html'>get_Xgid</a>(this, n, dir) result(Xg)  
+    private pure function <a href='../proc/get_xgid.html'>get_Xgid</a>(this, n, dir) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2719,7 +2719,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xt~3"></span>
+      <span class="anchor" id="boundprocedure-get_xt"></span>
       <h3>
           procedure, public ::
   <strong>get_Xt</strong>
@@ -2735,7 +2735,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xt~3.html'>get_Xt</a>(this) result(Xt)  
+    private pure function <a href='../proc/get_xt.html'>get_Xt</a>(this) result(Xt)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2788,7 +2788,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_continuity~3"></span>
+      <span class="anchor" id="boundprocedure-get_continuity"></span>
       <h3>
           procedure, public ::
   <strong>get_continuity</strong>
@@ -2804,7 +2804,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_continuity~3.html'>get_continuity</a>(this) result(c)  
+    private pure function <a href='../proc/get_continuity.html'>get_continuity</a>(this) result(c)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2857,7 +2857,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_degree~3"></span>
+      <span class="anchor" id="boundprocedure-get_degree"></span>
       <h3>
           procedure, public ::
   <strong>get_degree</strong>
@@ -2926,7 +2926,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_elem~3"></span>
+      <span class="anchor" id="boundprocedure-get_elem"></span>
       <h3>
           procedure, public ::
   <strong>get_elem</strong>
@@ -2942,7 +2942,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_elem~3.html'>get_elem</a>(this) result(elemConn)  
+    private pure function <a href='../proc/get_elem.html'>get_elem</a>(this) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2995,7 +2995,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_elem_xc_vis~3"></span>
+      <span class="anchor" id="boundprocedure-get_elem_xc_vis"></span>
       <h3>
           procedure, public ::
   <strong>get_elem_Xc_vis</strong>
@@ -3011,7 +3011,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_elem_xc_vis~3.html'>get_elem_Xc_vis</a>(this) result(elemConn)  
+    private pure function <a href='../proc/get_elem_xc_vis.html'>get_elem_Xc_vis</a>(this) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3064,7 +3064,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_elem_xg_vis~3"></span>
+      <span class="anchor" id="boundprocedure-get_elem_xg_vis"></span>
       <h3>
           procedure, public ::
   <strong>get_elem_Xg_vis</strong>
@@ -3080,7 +3080,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_elem_xg_vis~3.html'>get_elem_Xg_vis</a>(this) result(elemConn)  
+    private pure function <a href='../proc/get_elem_xg_vis.html'>get_elem_Xg_vis</a>(this) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3133,10 +3133,10 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_knot~3"></span>
+      <span class="anchor" id="boundprocedure-get_knot"></span>
       <h3>
           generic, public ::
-  <strong>get_knot</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_knoti~3'>get_knoti</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_knot_all~3'>get_knot_all</a>
+  <strong>get_knot</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_knoti'>get_knoti</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-get_knot_all'>get_knot_all</a>
         
       </h3>
     </div>
@@ -3149,7 +3149,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_knoti~3.html'>get_knoti</a>(this, i) result(knot)  
+    private pure function <a href='../proc/get_knoti.html'>get_knoti</a>(this, i) result(knot)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3212,7 +3212,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_knot_all~3.html'>get_knot_all</a>(this) result(knot)  
+    private pure function <a href='../proc/get_knot_all.html'>get_knot_all</a>(this) result(knot)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3265,7 +3265,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_multiplicity~3"></span>
+      <span class="anchor" id="boundprocedure-get_multiplicity"></span>
       <h3>
           procedure, public ::
   <strong>get_multiplicity</strong>
@@ -3281,7 +3281,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_multiplicity~3.html'>get_multiplicity</a>(this) result(m)  
+    private pure function <a href='../proc/get_multiplicity.html'>get_multiplicity</a>(this) result(m)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3334,7 +3334,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_nc~3"></span>
+      <span class="anchor" id="boundprocedure-get_nc"></span>
       <h3>
           procedure, public ::
   <strong>get_nc</strong>
@@ -3403,7 +3403,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_ng~3"></span>
+      <span class="anchor" id="boundprocedure-get_ng"></span>
       <h3>
           procedure, public ::
   <strong>get_ng</strong>
@@ -3419,7 +3419,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_ng~3.html'>get_ng</a>(this) result(ng)  
+    private pure function <a href='../proc/get_ng.html'>get_ng</a>(this) result(ng)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3472,7 +3472,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-insert_knots~3"></span>
+      <span class="anchor" id="boundprocedure-insert_knots"></span>
       <h3>
           procedure, public ::
   <strong>insert_knots</strong>
@@ -3488,7 +3488,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/insert_knots~3.html'>insert_knots</a>(this, Xth, r)  
+    private pure subroutine <a href='../proc/insert_knots.html'>insert_knots</a>(this, Xth, r)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3566,7 +3566,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-is_rational~3"></span>
+      <span class="anchor" id="boundprocedure-is_rational"></span>
       <h3>
           procedure, public ::
   <strong>is_rational</strong>
@@ -3582,7 +3582,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/is_rational~3.html'>is_rational</a>(this) result(r)  
+    private pure function <a href='../proc/is_rational.html'>is_rational</a>(this) result(r)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3635,7 +3635,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-modify_wc~3"></span>
+      <span class="anchor" id="boundprocedure-modify_wc"></span>
       <h3>
           procedure, public ::
   <strong>modify_Wc</strong>
@@ -3651,7 +3651,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/modify_wc~3.html'>modify_Wc</a>(this, W, num)  
+    private pure subroutine <a href='../proc/modify_wc.html'>modify_Wc</a>(this, W, num)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3729,7 +3729,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-modify_xc~3"></span>
+      <span class="anchor" id="boundprocedure-modify_xc"></span>
       <h3>
           procedure, public ::
   <strong>modify_Xc</strong>
@@ -3745,7 +3745,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/modify_xc~3.html'>modify_Xc</a>(this, X, num, dir)  
+    private pure subroutine <a href='../proc/modify_xc.html'>modify_Xc</a>(this, X, num, dir)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3838,7 +3838,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-nearest_point~3"></span>
+      <span class="anchor" id="boundprocedure-nearest_point"></span>
       <h3>
           procedure, public ::
   <strong>nearest_point</strong>
@@ -3854,7 +3854,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/nearest_point~3.html'>nearest_point</a>(this, point_Xg, nearest_Xg, nearest_Xt, id)  
+    private pure subroutine <a href='../proc/nearest_point.html'>nearest_point</a>(this, point_Xg, nearest_Xg, nearest_Xt, id)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3962,7 +3962,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-nearest_point2~3"></span>
+      <span class="anchor" id="boundprocedure-nearest_point2"></span>
       <h3>
           procedure, public ::
   <strong>nearest_point2</strong>
@@ -3978,7 +3978,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private impure subroutine <a href='../proc/nearest_point2~3.html'>nearest_point2</a>(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg)  
+    private impure subroutine <a href='../proc/nearest_point2.html'>nearest_point2</a>(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4101,7 +4101,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-remove_knots~3"></span>
+      <span class="anchor" id="boundprocedure-remove_knots"></span>
       <h3>
           procedure, public ::
   <strong>remove_knots</strong>
@@ -4117,7 +4117,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/remove_knots~3.html'>remove_knots</a>(this, Xth, r)  
+    private pure subroutine <a href='../proc/remove_knots.html'>remove_knots</a>(this, Xth, r)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4195,7 +4195,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-rotate_xc~3"></span>
+      <span class="anchor" id="boundprocedure-rotate_xc"></span>
       <h3>
           procedure, public ::
   <strong>rotate_Xc</strong>
@@ -4211,7 +4211,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/rotate_xc~3.html'>rotate_Xc</a>(this, alpha, beta, theta)  
+    private pure subroutine <a href='../proc/rotate_xc.html'>rotate_Xc</a>(this, alpha, beta, theta)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4304,7 +4304,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-rotate_xg~3"></span>
+      <span class="anchor" id="boundprocedure-rotate_xg"></span>
       <h3>
           procedure, public ::
   <strong>rotate_Xg</strong>
@@ -4320,7 +4320,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/rotate_xg~3.html'>rotate_Xg</a>(this, alpha, beta, theta)  
+    private pure subroutine <a href='../proc/rotate_xg.html'>rotate_Xg</a>(this, alpha, beta, theta)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4413,10 +4413,10 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set~3"></span>
+      <span class="anchor" id="boundprocedure-set"></span>
       <h3>
           generic, public ::
-  <strong>set</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set1~3'>set1</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set1a'>set1a</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set2~3'>set2</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set3~3'>set3</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set4~3'>set4</a>
+  <strong>set</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set1'>set1</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set1a'>set1a</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set2'>set2</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set3'>set3</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_curve.html#boundprocedure-set4'>set4</a>
         
       </h3>
     </div>
@@ -4429,7 +4429,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set1~3.html'>set1</a>(this, knot, Xc, Wc)  
+    private pure subroutine <a href='../proc/set1.html'>set1</a>(this, knot, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4605,7 +4605,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set2~3.html'>set2</a>(this, Xth_dir, degree, continuity, Xc, Wc)  
+    private pure subroutine <a href='../proc/set2.html'>set2</a>(this, Xth_dir, degree, continuity, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4723,7 +4723,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set3~3.html'>set3</a>(this, Xc, Wc)  
+    private pure subroutine <a href='../proc/set3.html'>set3</a>(this, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4796,7 +4796,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set4~3.html'>set4</a>(this, degree, nc, Xc, Wc)  
+    private pure subroutine <a href='../proc/set4.html'>set4</a>(this, degree, nc, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4904,7 +4904,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set1~3"></span>
+      <span class="anchor" id="boundprocedure-set1"></span>
       <h3>
           procedure, public ::
   <strong>set1</strong>
@@ -4920,7 +4920,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set1~3.html'>set1</a>(this, knot, Xc, Wc)  
+    private pure subroutine <a href='../proc/set1.html'>set1</a>(this, knot, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5116,7 +5116,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set2~3"></span>
+      <span class="anchor" id="boundprocedure-set2"></span>
       <h3>
           procedure, public ::
   <strong>set2</strong>
@@ -5132,7 +5132,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set2~3.html'>set2</a>(this, Xth_dir, degree, continuity, Xc, Wc)  
+    private pure subroutine <a href='../proc/set2.html'>set2</a>(this, Xth_dir, degree, continuity, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5255,7 +5255,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set3~3"></span>
+      <span class="anchor" id="boundprocedure-set3"></span>
       <h3>
           procedure, public ::
   <strong>set3</strong>
@@ -5271,7 +5271,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set3~3.html'>set3</a>(this, Xc, Wc)  
+    private pure subroutine <a href='../proc/set3.html'>set3</a>(this, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5349,7 +5349,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set4~3"></span>
+      <span class="anchor" id="boundprocedure-set4"></span>
       <h3>
           procedure, public ::
   <strong>set4</strong>
@@ -5365,7 +5365,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set4~3.html'>set4</a>(this, degree, nc, Xc, Wc)  
+    private pure subroutine <a href='../proc/set4.html'>set4</a>(this, degree, nc, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5473,7 +5473,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set_c~3"></span>
+      <span class="anchor" id="boundprocedure-set_c"></span>
       <h3>
           procedure, public ::
   <strong>set_C</strong>
@@ -5489,7 +5489,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set_c~3.html'>set_C</a>(this, center, radius)  
+    private pure subroutine <a href='../proc/set_c.html'>set_C</a>(this, center, radius)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5661,7 +5661,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set_elem~3"></span>
+      <span class="anchor" id="boundprocedure-set_elem"></span>
       <h3>
           procedure, public ::
   <strong>set_elem</strong>
@@ -5677,7 +5677,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set_elem~3.html'>set_elem</a>(this, elemConn)  
+    private pure subroutine <a href='../proc/set_elem.html'>set_elem</a>(this, elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5740,7 +5740,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set_elem_xc_vis~3"></span>
+      <span class="anchor" id="boundprocedure-set_elem_xc_vis"></span>
       <h3>
           procedure, public ::
   <strong>set_elem_Xc_vis</strong>
@@ -5756,7 +5756,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set_elem_xc_vis~3.html'>set_elem_Xc_vis</a>(this, elemConn)  
+    private pure subroutine <a href='../proc/set_elem_xc_vis.html'>set_elem_Xc_vis</a>(this, elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5819,7 +5819,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set_elem_xg_vis~3"></span>
+      <span class="anchor" id="boundprocedure-set_elem_xg_vis"></span>
       <h3>
           procedure, public ::
   <strong>set_elem_Xg_vis</strong>
@@ -5835,7 +5835,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set_elem_xg_vis~3.html'>set_elem_Xg_vis</a>(this, elemConn)  
+    private pure subroutine <a href='../proc/set_elem_xg_vis.html'>set_elem_Xg_vis</a>(this, elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5992,7 +5992,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-show~3"></span>
+      <span class="anchor" id="boundprocedure-show"></span>
       <h3>
           procedure, public ::
   <strong>show</strong>
@@ -6008,7 +6008,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private impure subroutine <a href='../proc/show~3.html'>show</a>(this, vtkfile_Xc, vtkfile_Xg)  
+    private impure subroutine <a href='../proc/show.html'>show</a>(this, vtkfile_Xc, vtkfile_Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6086,7 +6086,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-translate_xc~3"></span>
+      <span class="anchor" id="boundprocedure-translate_xc"></span>
       <h3>
           procedure, public ::
   <strong>translate_Xc</strong>
@@ -6102,7 +6102,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/translate_xc~3.html'>translate_Xc</a>(this, vec)  
+    private pure subroutine <a href='../proc/translate_xc.html'>translate_Xc</a>(this, vec)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6165,7 +6165,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-translate_xg~3"></span>
+      <span class="anchor" id="boundprocedure-translate_xg"></span>
       <h3>
           procedure, public ::
   <strong>translate_Xg</strong>
@@ -6181,7 +6181,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/translate_xg~3.html'>translate_Xg</a>(this, vec)  
+    private pure subroutine <a href='../proc/translate_xg.html'>translate_Xg</a>(this, vec)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6244,7 +6244,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-basis_scalar~3"></span>
+      <span class="anchor" id="boundprocedure-basis_scalar"></span>
       <h3>
           procedure, private ::
   <strong>basis_scalar</strong>
@@ -6260,7 +6260,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/basis_scalar~3.html'>basis_scalar</a>(this, Xt, Tgc)  
+    private pure subroutine <a href='../proc/basis_scalar.html'>basis_scalar</a>(this, Xt, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6338,7 +6338,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-basis_vector~3"></span>
+      <span class="anchor" id="boundprocedure-basis_vector"></span>
       <h3>
           procedure, private ::
   <strong>basis_vector</strong>
@@ -6354,7 +6354,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/basis_vector~3.html'>basis_vector</a>(this, res, Xt, Tgc)  
+    private pure subroutine <a href='../proc/basis_vector.html'>basis_vector</a>(this, res, Xt, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6447,7 +6447,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative2_scalar~3"></span>
+      <span class="anchor" id="boundprocedure-derivative2_scalar"></span>
       <h3>
           procedure, private ::
   <strong>derivative2_scalar</strong>
@@ -6463,7 +6463,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative2_scalar~3.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative2_scalar.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6571,7 +6571,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative2_vector~3"></span>
+      <span class="anchor" id="boundprocedure-derivative2_vector"></span>
       <h3>
           procedure, private ::
   <strong>derivative2_vector</strong>
@@ -6587,7 +6587,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative2_vector~3.html'>derivative2_vector</a>(this, res, Xt, d2Tgc, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative2_vector.html'>derivative2_vector</a>(this, res, Xt, d2Tgc, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6710,7 +6710,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative_scalar~3"></span>
+      <span class="anchor" id="boundprocedure-derivative_scalar"></span>
       <h3>
           procedure, private ::
   <strong>derivative_scalar</strong>
@@ -6726,7 +6726,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative_scalar~3.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
+    private pure subroutine <a href='../proc/derivative_scalar.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6834,7 +6834,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative_vector~3"></span>
+      <span class="anchor" id="boundprocedure-derivative_vector"></span>
       <h3>
           procedure, private ::
   <strong>derivative_vector</strong>
@@ -6850,7 +6850,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative_vector~3.html'>derivative_vector</a>(this, res, Xt, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative_vector.html'>derivative_vector</a>(this, res, Xt, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6958,7 +6958,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_wc_all~3"></span>
+      <span class="anchor" id="boundprocedure-get_wc_all"></span>
       <h3>
           procedure, private ::
   <strong>get_Wc_all</strong>
@@ -6974,7 +6974,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_wc_all~3.html'>get_Wc_all</a>(this) result(Wc)  
+    private pure function <a href='../proc/get_wc_all.html'>get_Wc_all</a>(this) result(Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7027,7 +7027,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_wci~3"></span>
+      <span class="anchor" id="boundprocedure-get_wci"></span>
       <h3>
           procedure, private ::
   <strong>get_Wci</strong>
@@ -7043,7 +7043,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_wci~3.html'>get_Wci</a>(this, n) result(Wc)  
+    private pure function <a href='../proc/get_wci.html'>get_Wci</a>(this, n) result(Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7111,7 +7111,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xc_all~3"></span>
+      <span class="anchor" id="boundprocedure-get_xc_all"></span>
       <h3>
           procedure, private ::
   <strong>get_Xc_all</strong>
@@ -7127,7 +7127,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xc_all~3.html'>get_Xc_all</a>(this) result(Xc)  
+    private pure function <a href='../proc/get_xc_all.html'>get_Xc_all</a>(this) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7180,7 +7180,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xci~3"></span>
+      <span class="anchor" id="boundprocedure-get_xci"></span>
       <h3>
           procedure, private ::
   <strong>get_Xci</strong>
@@ -7196,7 +7196,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xci~3.html'>get_Xci</a>(this, n) result(Xc)  
+    private pure function <a href='../proc/get_xci.html'>get_Xci</a>(this, n) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7264,7 +7264,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xcid~3"></span>
+      <span class="anchor" id="boundprocedure-get_xcid"></span>
       <h3>
           procedure, private ::
   <strong>get_Xcid</strong>
@@ -7280,7 +7280,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xcid~3.html'>get_Xcid</a>(this, n, dir) result(Xc)  
+    private pure function <a href='../proc/get_xcid.html'>get_Xcid</a>(this, n, dir) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7363,7 +7363,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xg_all~3"></span>
+      <span class="anchor" id="boundprocedure-get_xg_all"></span>
       <h3>
           procedure, private ::
   <strong>get_Xg_all</strong>
@@ -7379,7 +7379,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xg_all~3.html'>get_Xg_all</a>(this) result(Xg)  
+    private pure function <a href='../proc/get_xg_all.html'>get_Xg_all</a>(this) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7432,7 +7432,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xgi~3"></span>
+      <span class="anchor" id="boundprocedure-get_xgi"></span>
       <h3>
           procedure, private ::
   <strong>get_Xgi</strong>
@@ -7448,7 +7448,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xgi~3.html'>get_Xgi</a>(this, n) result(Xg)  
+    private pure function <a href='../proc/get_xgi.html'>get_Xgi</a>(this, n) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7516,7 +7516,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xgid~3"></span>
+      <span class="anchor" id="boundprocedure-get_xgid"></span>
       <h3>
           procedure, private ::
   <strong>get_Xgid</strong>
@@ -7532,7 +7532,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xgid~3.html'>get_Xgid</a>(this, n, dir) result(Xg)  
+    private pure function <a href='../proc/get_xgid.html'>get_Xgid</a>(this, n, dir) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7615,7 +7615,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_knot_all~3"></span>
+      <span class="anchor" id="boundprocedure-get_knot_all"></span>
       <h3>
           procedure, private ::
   <strong>get_knot_all</strong>
@@ -7631,7 +7631,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_knot_all~3.html'>get_knot_all</a>(this) result(knot)  
+    private pure function <a href='../proc/get_knot_all.html'>get_knot_all</a>(this) result(knot)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7684,7 +7684,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_knoti~3"></span>
+      <span class="anchor" id="boundprocedure-get_knoti"></span>
       <h3>
           procedure, private ::
   <strong>get_knoti</strong>
@@ -7700,7 +7700,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_knoti~3.html'>get_knoti</a>(this, i) result(knot)  
+    private pure function <a href='../proc/get_knoti.html'>get_knoti</a>(this, i) result(knot)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7786,7 +7786,7 @@ <h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/type/nurbs_surface.html b/type/nurbs_surface.html
index 27dc715e2..cd9512d97 100644
--- a/type/nurbs_surface.html
+++ b/type/nurbs_surface.html
@@ -118,20 +118,20 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../type/nurbs_surface.html#variable-wc~26">Wc</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#variable-xc~27">Xc</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#variable-xg~13">Xg</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#variable-xt~29">Xt</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#variable-wc~46">Wc</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#variable-xc~45">Xc</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#variable-xg~25">Xg</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#variable-xt~62">Xt</a>
             <a class="list-group-item" href="../type/nurbs_surface.html#variable-xt1~6">Xt1</a>
             <a class="list-group-item" href="../type/nurbs_surface.html#variable-xt2~6">Xt2</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#variable-degree~23">degree</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#variable-elemconn~17">elemConn</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#variable-elemconn_xc_vis~2">elemConn_Xc_vis</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#variable-elemconn_xg_vis~2">elemConn_Xg_vis</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#variable-knot1~23">knot1</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#variable-knot2~23">knot2</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#variable-nc~24">nc</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#variable-ng~14">ng</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#variable-degree~53">degree</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#variable-elemconn~35">elemConn</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#variable-elemconn_xc_vis~3">elemConn_Xc_vis</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#variable-elemconn_xg_vis~3">elemConn_Xg_vis</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#variable-knot1~24">knot1</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#variable-knot2~24">knot2</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#variable-nc~52">nc</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#variable-ng~27">ng</a>
         </div>
       </div>
     </div>
@@ -158,77 +158,77 @@ <h4 class="card-header bg-primary text-white">Type-Bound Procedures</h4>
       </a>
       <div id="boundprocs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-ansatz~2">ansatz</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-basis~2">basis</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-cmp_xg~2">cmp_Xg</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-ansatz~3">ansatz</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-basis~3">basis</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-cmp_xg~3">cmp_Xg</a>
             <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-cmp_area">cmp_area</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-cmp_degree~2">cmp_degree</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-cmp_elem~2">cmp_elem</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-cmp_elem_xc_vis~2">cmp_elem_Xc_vis</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-cmp_elem_xg_vis~2">cmp_elem_Xg_vis</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-cmp_nc~2">cmp_nc</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-create~2">create</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-derivative~2">derivative</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-derivative2~2">derivative2</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-elevate_degree~2">elevate_degree</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-export_xc~2">export_Xc</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-export_xg~2">export_Xg</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-finalize~2">finalize</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_wc~2">get_Wc</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xc~2">get_Xc</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xg~2">get_Xg</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xt~2">get_Xt</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_continuity~2">get_continuity</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_degree~2">get_degree</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_elem~2">get_elem</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_elem_xc_vis~2">get_elem_Xc_vis</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_elem_xg_vis~2">get_elem_Xg_vis</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_knot~2">get_knot</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_multiplicity~2">get_multiplicity</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_nc~2">get_nc</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_ng~2">get_ng</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-insert_knots~2">insert_knots</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-is_rational~2">is_rational</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-modify_wc~2">modify_Wc</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-modify_xc~2">modify_Xc</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-nearest_point~2">nearest_point</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-nearest_point2~2">nearest_point2</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-remove_knots~2">remove_knots</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-rotate_xc~2">rotate_Xc</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-rotate_xg~2">rotate_Xg</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set~2">set</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set1~2">set1</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set2~2">set2</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set3~2">set3</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set4~2">set4</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set_c~2">set_C</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set_elem~2">set_elem</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set_elem_xc_vis~2">set_elem_Xc_vis</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set_elem_xg_vis~2">set_elem_Xg_vis</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-cmp_degree~3">cmp_degree</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-cmp_elem~3">cmp_elem</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-cmp_elem_xc_vis~3">cmp_elem_Xc_vis</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-cmp_elem_xg_vis~3">cmp_elem_Xg_vis</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-cmp_nc~3">cmp_nc</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-create~3">create</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-derivative~3">derivative</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-derivative2~3">derivative2</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-elevate_degree~3">elevate_degree</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-export_xc~3">export_Xc</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-export_xg~3">export_Xg</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-finalize~3">finalize</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_wc~3">get_Wc</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xc~3">get_Xc</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xg~3">get_Xg</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xt~3">get_Xt</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_continuity~3">get_continuity</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_degree~3">get_degree</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_elem~3">get_elem</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_elem_xc_vis~3">get_elem_Xc_vis</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_elem_xg_vis~3">get_elem_Xg_vis</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_knot~3">get_knot</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_multiplicity~3">get_multiplicity</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_nc~3">get_nc</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_ng~3">get_ng</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-insert_knots~3">insert_knots</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-is_rational~3">is_rational</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-modify_wc~3">modify_Wc</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-modify_xc~3">modify_Xc</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-nearest_point~3">nearest_point</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-nearest_point2~3">nearest_point2</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-remove_knots~3">remove_knots</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-rotate_xc~3">rotate_Xc</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-rotate_xg~3">rotate_Xg</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set~3">set</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set1~3">set1</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set2~3">set2</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set3~3">set3</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set4~3">set4</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set_c~3">set_C</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set_elem~3">set_elem</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set_elem_xc_vis~3">set_elem_Xc_vis</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set_elem_xg_vis~3">set_elem_Xg_vis</a>
             <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set_half_ring~2">set_half_ring</a>
             <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set_ring~2">set_ring</a>
             <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-set_tetragon">set_tetragon</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-show~2">show</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-translate_xc~2">translate_Xc</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-translate_xg~2">translate_Xg</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-basis_scalar~2">basis_scalar</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-basis_vector~2">basis_vector</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-derivative2_scalar~2">derivative2_scalar</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-derivative2_vector~2">derivative2_vector</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-derivative_scalar~2">derivative_scalar</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-derivative_vector~2">derivative_vector</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_wc_all~2">get_Wc_all</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_wci~2">get_Wci</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xc_all~2">get_Xc_all</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xci~2">get_Xci</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xcid~2">get_Xcid</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xg_all~2">get_Xg_all</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xgi~2">get_Xgi</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xgid~2">get_Xgid</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-show~3">show</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-translate_xc~3">translate_Xc</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-translate_xg~3">translate_Xg</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-basis_scalar~3">basis_scalar</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-basis_vector~3">basis_vector</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-derivative2_scalar~3">derivative2_scalar</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-derivative2_vector~3">derivative2_vector</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-derivative_scalar~3">derivative_scalar</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-derivative_vector~3">derivative_vector</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_wc_all~3">get_Wc_all</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_wci~3">get_Wci</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xc_all~3">get_Xc_all</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xci~3">get_Xci</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xcid~3">get_Xcid</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xg_all~3">get_Xg_all</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xgi~3">get_Xgi</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_xgid~3">get_Xgid</a>
             <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_degree_all~2">get_degree_all</a>
             <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_degree_dir~2">get_degree_dir</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_knot_all~2">get_knot_all</a>
-            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_knoti~2">get_knoti</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_knot_all~3">get_knot_all</a>
+            <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_knoti~3">get_knoti</a>
             <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_nc_all~2">get_nc_all</a>
             <a class="list-group-item" href="../type/nurbs_surface.html#boundprocedure-get_nc_dir~2">get_nc_dir</a>
         </div>
@@ -263,7 +263,7 @@ <h2>Components</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~26"></span>
+              <span class="anchor" id="variable-wc~46"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -280,7 +280,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~27"></span>
+              <span class="anchor" id="variable-xc~45"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -297,7 +297,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xg~13"></span>
+              <span class="anchor" id="variable-xg~25"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -314,7 +314,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt~29"></span>
+              <span class="anchor" id="variable-xt~62"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -365,7 +365,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree~23"></span>
+              <span class="anchor" id="variable-degree~53"></span>
               integer,
             </td>
               <td>private</td>
@@ -382,7 +382,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn~17"></span>
+              <span class="anchor" id="variable-elemconn~35"></span>
               integer,
             </td>
               <td>private,</td>
@@ -399,7 +399,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn_xc_vis~2"></span>
+              <span class="anchor" id="variable-elemconn_xc_vis~3"></span>
               integer,
             </td>
               <td>private,</td>
@@ -416,7 +416,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn_xg_vis~2"></span>
+              <span class="anchor" id="variable-elemconn_xg_vis~3"></span>
               integer,
             </td>
               <td>private,</td>
@@ -433,7 +433,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1~23"></span>
+              <span class="anchor" id="variable-knot1~24"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -450,7 +450,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2~23"></span>
+              <span class="anchor" id="variable-knot2~24"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -467,7 +467,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc~24"></span>
+              <span class="anchor" id="variable-nc~52"></span>
               integer,
             </td>
               <td>private</td>
@@ -484,7 +484,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng~14"></span>
+              <span class="anchor" id="variable-ng~27"></span>
               integer,
             </td>
               <td>private</td>
@@ -512,7 +512,7 @@ <h2>Type-Bound Procedures</h2>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-ansatz~2"></span>
+      <span class="anchor" id="boundprocedure-ansatz~3"></span>
       <h3>
           procedure, public ::
   <strong>ansatz</strong>
@@ -528,7 +528,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/ansatz~2.html'>ansatz</a>(this, ie, ig, Tgc, dTgc_dXg, dA)  
+    private pure subroutine <a href='../proc/ansatz~3.html'>ansatz</a>(this, ie, ig, Tgc, dTgc_dXg, dA)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -651,10 +651,10 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-basis~2"></span>
+      <span class="anchor" id="boundprocedure-basis~3"></span>
       <h3>
           generic, public ::
-  <strong>basis</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-basis_vector~2'>basis_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-basis_scalar~2'>basis_scalar</a>
+  <strong>basis</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-basis_vector~3'>basis_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-basis_scalar~3'>basis_scalar</a>
         
       </h3>
     </div>
@@ -667,7 +667,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/basis_vector~2.html'>basis_vector</a>(this, res1, res2, Xt1, Xt2, Tgc)  
+    private pure subroutine <a href='../proc/basis_vector~3.html'>basis_vector</a>(this, res1, res2, Xt1, Xt2, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -785,7 +785,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/basis_scalar~2.html'>basis_scalar</a>(this, Xt, Tgc)  
+    private pure subroutine <a href='../proc/basis_scalar~3.html'>basis_scalar</a>(this, Xt, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -863,7 +863,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_xg~2"></span>
+      <span class="anchor" id="boundprocedure-cmp_xg~3"></span>
       <h3>
           procedure, public ::
   <strong>cmp_Xg</strong>
@@ -879,7 +879,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/cmp_xg~2.html'>cmp_Xg</a>(this, Xt) result(Xg)  
+    private pure function <a href='../proc/cmp_xg~3.html'>cmp_Xg</a>(this, Xt) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1026,7 +1026,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_degree~2"></span>
+      <span class="anchor" id="boundprocedure-cmp_degree~3"></span>
       <h3>
           procedure, public ::
   <strong>cmp_degree</strong>
@@ -1042,7 +1042,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/cmp_degree~2.html'>cmp_degree</a>(this, dir)  
+    private pure subroutine <a href='../proc/cmp_degree~3.html'>cmp_degree</a>(this, dir)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1105,7 +1105,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_elem~2"></span>
+      <span class="anchor" id="boundprocedure-cmp_elem~3"></span>
       <h3>
           procedure, public ::
   <strong>cmp_elem</strong>
@@ -1121,7 +1121,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/cmp_elem~2.html'>cmp_elem</a>(this) result(elemConn)  
+    private pure function <a href='../proc/cmp_elem~3.html'>cmp_elem</a>(this) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1174,7 +1174,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_elem_xc_vis~2"></span>
+      <span class="anchor" id="boundprocedure-cmp_elem_xc_vis~3"></span>
       <h3>
           procedure, public ::
   <strong>cmp_elem_Xc_vis</strong>
@@ -1190,7 +1190,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/cmp_elem_xc_vis~2.html'>cmp_elem_Xc_vis</a>(this, p) result(elemConn)  
+    private pure function <a href='../proc/cmp_elem_xc_vis~3.html'>cmp_elem_Xc_vis</a>(this, p) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1258,7 +1258,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_elem_xg_vis~2"></span>
+      <span class="anchor" id="boundprocedure-cmp_elem_xg_vis~3"></span>
       <h3>
           procedure, public ::
   <strong>cmp_elem_Xg_vis</strong>
@@ -1274,7 +1274,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/cmp_elem_xg_vis~2.html'>cmp_elem_Xg_vis</a>(this, p) result(elemConn)  
+    private pure function <a href='../proc/cmp_elem_xg_vis~3.html'>cmp_elem_Xg_vis</a>(this, p) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1342,7 +1342,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_nc~2"></span>
+      <span class="anchor" id="boundprocedure-cmp_nc~3"></span>
       <h3>
           procedure, public ::
   <strong>cmp_nc</strong>
@@ -1358,7 +1358,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/cmp_nc~2.html'>cmp_nc</a>(this, dir)  
+    private pure subroutine <a href='../proc/cmp_nc~3.html'>cmp_nc</a>(this, dir)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1421,7 +1421,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-create~2"></span>
+      <span class="anchor" id="boundprocedure-create~3"></span>
       <h3>
           procedure, public ::
   <strong>create</strong>
@@ -1437,7 +1437,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/create~2.html'>create</a>(this, res1, res2, Xt1, Xt2, Xt)  
+    private pure subroutine <a href='../proc/create~3.html'>create</a>(this, res1, res2, Xt1, Xt2, Xt)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1560,10 +1560,10 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative~2"></span>
+      <span class="anchor" id="boundprocedure-derivative~3"></span>
       <h3>
           generic, public ::
-  <strong>derivative</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-derivative_vector~2'>derivative_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-derivative_scalar~2'>derivative_scalar</a>
+  <strong>derivative</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-derivative_vector~3'>derivative_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-derivative_scalar~3'>derivative_scalar</a>
         
       </h3>
     </div>
@@ -1576,7 +1576,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative_vector~2.html'>derivative_vector</a>(this, res1, res2, Xt1, Xt2, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative_vector~3.html'>derivative_vector</a>(this, res1, res2, Xt1, Xt2, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1709,7 +1709,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative_scalar~2.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
+    private pure subroutine <a href='../proc/derivative_scalar~3.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1817,10 +1817,10 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative2~2"></span>
+      <span class="anchor" id="boundprocedure-derivative2~3"></span>
       <h3>
           generic, public ::
-  <strong>derivative2</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-derivative2_vector~2'>derivative2_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-derivative2_scalar~2'>derivative2_scalar</a>
+  <strong>derivative2</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-derivative2_vector~3'>derivative2_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-derivative2_scalar~3'>derivative2_scalar</a>
         
       </h3>
     </div>
@@ -1833,7 +1833,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative2_vector~2.html'>derivative2_vector</a>(this, res1, res2, Xt1, Xt2, d2Tgc, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative2_vector~3.html'>derivative2_vector</a>(this, res1, res2, Xt1, Xt2, d2Tgc, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1981,7 +1981,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative2_scalar~2.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative2_scalar~3.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2089,7 +2089,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-elevate_degree~2"></span>
+      <span class="anchor" id="boundprocedure-elevate_degree~3"></span>
       <h3>
           procedure, public ::
   <strong>elevate_degree</strong>
@@ -2105,7 +2105,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/elevate_degree~2.html'>elevate_degree</a>(this, dir, t)  
+    private pure subroutine <a href='../proc/elevate_degree~3.html'>elevate_degree</a>(this, dir, t)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2183,7 +2183,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-export_xc~2"></span>
+      <span class="anchor" id="boundprocedure-export_xc~3"></span>
       <h3>
           procedure, public ::
   <strong>export_Xc</strong>
@@ -2199,7 +2199,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private impure subroutine <a href='../proc/export_xc~2.html'>export_Xc</a>(this, filename)  
+    private impure subroutine <a href='../proc/export_xc~3.html'>export_Xc</a>(this, filename)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2262,7 +2262,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-export_xg~2"></span>
+      <span class="anchor" id="boundprocedure-export_xg~3"></span>
       <h3>
           procedure, public ::
   <strong>export_Xg</strong>
@@ -2278,7 +2278,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private impure subroutine <a href='../proc/export_xg~2.html'>export_Xg</a>(this, filename)  
+    private impure subroutine <a href='../proc/export_xg~3.html'>export_Xg</a>(this, filename)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2341,7 +2341,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-finalize~2"></span>
+      <span class="anchor" id="boundprocedure-finalize~3"></span>
       <h3>
           procedure, public ::
   <strong>finalize</strong>
@@ -2357,7 +2357,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/finalize~2.html'>finalize</a>(this)  
+    private pure subroutine <a href='../proc/finalize~3.html'>finalize</a>(this)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2405,10 +2405,10 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_wc~2"></span>
+      <span class="anchor" id="boundprocedure-get_wc~3"></span>
       <h3>
           generic, public ::
-  <strong>get_Wc</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_wc_all~2'>get_Wc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_wci~2'>get_Wci</a>
+  <strong>get_Wc</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_wc_all~3'>get_Wc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_wci~3'>get_Wci</a>
         
       </h3>
     </div>
@@ -2421,7 +2421,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_wc_all~2.html'>get_Wc_all</a>(this) result(Wc)  
+    private pure function <a href='../proc/get_wc_all~3.html'>get_Wc_all</a>(this) result(Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2469,7 +2469,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_wci~2.html'>get_Wci</a>(this, n) result(Wc)  
+    private pure function <a href='../proc/get_wci~3.html'>get_Wci</a>(this, n) result(Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2537,10 +2537,10 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xc~2"></span>
+      <span class="anchor" id="boundprocedure-get_xc~3"></span>
       <h3>
           generic, public ::
-  <strong>get_Xc</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xc_all~2'>get_Xc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xci~2'>get_Xci</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xcid~2'>get_Xcid</a>
+  <strong>get_Xc</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xc_all~3'>get_Xc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xci~3'>get_Xci</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xcid~3'>get_Xcid</a>
         
       </h3>
     </div>
@@ -2553,7 +2553,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xc_all~2.html'>get_Xc_all</a>(this) result(Xc)  
+    private pure function <a href='../proc/get_xc_all~3.html'>get_Xc_all</a>(this) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2601,7 +2601,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xci~2.html'>get_Xci</a>(this, n) result(Xc)  
+    private pure function <a href='../proc/get_xci~3.html'>get_Xci</a>(this, n) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2664,7 +2664,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xcid~2.html'>get_Xcid</a>(this, n, dir) result(Xc)  
+    private pure function <a href='../proc/get_xcid~3.html'>get_Xcid</a>(this, n, dir) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2747,10 +2747,10 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xg~2"></span>
+      <span class="anchor" id="boundprocedure-get_xg~3"></span>
       <h3>
           generic, public ::
-  <strong>get_Xg</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xg_all~2'>get_Xg_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xgi~2'>get_Xgi</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xgid~2'>get_Xgid</a>
+  <strong>get_Xg</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xg_all~3'>get_Xg_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xgi~3'>get_Xgi</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_xgid~3'>get_Xgid</a>
         
       </h3>
     </div>
@@ -2763,7 +2763,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xg_all~2.html'>get_Xg_all</a>(this) result(Xg)  
+    private pure function <a href='../proc/get_xg_all~3.html'>get_Xg_all</a>(this) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2811,7 +2811,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xgi~2.html'>get_Xgi</a>(this, n) result(Xg)  
+    private pure function <a href='../proc/get_xgi~3.html'>get_Xgi</a>(this, n) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2874,7 +2874,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xgid~2.html'>get_Xgid</a>(this, n, dir) result(Xg)  
+    private pure function <a href='../proc/get_xgid~3.html'>get_Xgid</a>(this, n, dir) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2957,7 +2957,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xt~2"></span>
+      <span class="anchor" id="boundprocedure-get_xt~3"></span>
       <h3>
           procedure, public ::
   <strong>get_Xt</strong>
@@ -2973,7 +2973,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xt~2.html'>get_Xt</a>(this, dir) result(Xt)  
+    private pure function <a href='../proc/get_xt~3.html'>get_Xt</a>(this, dir) result(Xt)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3041,7 +3041,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_continuity~2"></span>
+      <span class="anchor" id="boundprocedure-get_continuity~3"></span>
       <h3>
           procedure, public ::
   <strong>get_continuity</strong>
@@ -3057,7 +3057,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_continuity~2.html'>get_continuity</a>(this, dir) result(c)  
+    private pure function <a href='../proc/get_continuity~3.html'>get_continuity</a>(this, dir) result(c)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3125,7 +3125,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_degree~2"></span>
+      <span class="anchor" id="boundprocedure-get_degree~3"></span>
       <h3>
           generic, public ::
   <strong>get_degree</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_degree_all~2'>get_degree_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_degree_dir~2'>get_degree_dir</a>
@@ -3257,7 +3257,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_elem~2"></span>
+      <span class="anchor" id="boundprocedure-get_elem~3"></span>
       <h3>
           procedure, public ::
   <strong>get_elem</strong>
@@ -3273,7 +3273,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_elem~2.html'>get_elem</a>(this) result(elemConn)  
+    private pure function <a href='../proc/get_elem~3.html'>get_elem</a>(this) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3326,7 +3326,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_elem_xc_vis~2"></span>
+      <span class="anchor" id="boundprocedure-get_elem_xc_vis~3"></span>
       <h3>
           procedure, public ::
   <strong>get_elem_Xc_vis</strong>
@@ -3342,7 +3342,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_elem_xc_vis~2.html'>get_elem_Xc_vis</a>(this) result(elemConn)  
+    private pure function <a href='../proc/get_elem_xc_vis~3.html'>get_elem_Xc_vis</a>(this) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3395,7 +3395,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_elem_xg_vis~2"></span>
+      <span class="anchor" id="boundprocedure-get_elem_xg_vis~3"></span>
       <h3>
           procedure, public ::
   <strong>get_elem_Xg_vis</strong>
@@ -3411,7 +3411,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_elem_xg_vis~2.html'>get_elem_Xg_vis</a>(this) result(elemConn)  
+    private pure function <a href='../proc/get_elem_xg_vis~3.html'>get_elem_Xg_vis</a>(this) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3464,10 +3464,10 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_knot~2"></span>
+      <span class="anchor" id="boundprocedure-get_knot~3"></span>
       <h3>
           generic, public ::
-  <strong>get_knot</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_knoti~2'>get_knoti</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_knot_all~2'>get_knot_all</a>
+  <strong>get_knot</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_knoti~3'>get_knoti</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_knot_all~3'>get_knot_all</a>
         
       </h3>
     </div>
@@ -3480,7 +3480,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_knoti~2.html'>get_knoti</a>(this, dir, i) result(knot)  
+    private pure function <a href='../proc/get_knoti~3.html'>get_knoti</a>(this, dir, i) result(knot)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3558,7 +3558,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_knot_all~2.html'>get_knot_all</a>(this, dir) result(knot)  
+    private pure function <a href='../proc/get_knot_all~3.html'>get_knot_all</a>(this, dir) result(knot)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3626,7 +3626,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_multiplicity~2"></span>
+      <span class="anchor" id="boundprocedure-get_multiplicity~3"></span>
       <h3>
           procedure, public ::
   <strong>get_multiplicity</strong>
@@ -3642,7 +3642,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_multiplicity~2.html'>get_multiplicity</a>(this, dir) result(m)  
+    private pure function <a href='../proc/get_multiplicity~3.html'>get_multiplicity</a>(this, dir) result(m)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3710,7 +3710,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_nc~2"></span>
+      <span class="anchor" id="boundprocedure-get_nc~3"></span>
       <h3>
           generic, public ::
   <strong>get_nc</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_nc_all~2'>get_nc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-get_nc_dir~2'>get_nc_dir</a>
@@ -3842,7 +3842,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_ng~2"></span>
+      <span class="anchor" id="boundprocedure-get_ng~3"></span>
       <h3>
           procedure, public ::
   <strong>get_ng</strong>
@@ -3858,7 +3858,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_ng~2.html'>get_ng</a>(this) result(ng)  
+    private pure function <a href='../proc/get_ng~3.html'>get_ng</a>(this) result(ng)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3911,7 +3911,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-insert_knots~2"></span>
+      <span class="anchor" id="boundprocedure-insert_knots~3"></span>
       <h3>
           procedure, public ::
   <strong>insert_knots</strong>
@@ -3927,7 +3927,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/insert_knots~2.html'>insert_knots</a>(this, dir, Xth, r)  
+    private pure subroutine <a href='../proc/insert_knots~3.html'>insert_knots</a>(this, dir, Xth, r)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4020,7 +4020,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-is_rational~2"></span>
+      <span class="anchor" id="boundprocedure-is_rational~3"></span>
       <h3>
           procedure, public ::
   <strong>is_rational</strong>
@@ -4036,7 +4036,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/is_rational~2.html'>is_rational</a>(this) result(r)  
+    private pure function <a href='../proc/is_rational~3.html'>is_rational</a>(this) result(r)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4089,7 +4089,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-modify_wc~2"></span>
+      <span class="anchor" id="boundprocedure-modify_wc~3"></span>
       <h3>
           procedure, public ::
   <strong>modify_Wc</strong>
@@ -4105,7 +4105,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/modify_wc~2.html'>modify_Wc</a>(this, W, num)  
+    private pure subroutine <a href='../proc/modify_wc~3.html'>modify_Wc</a>(this, W, num)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4183,7 +4183,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-modify_xc~2"></span>
+      <span class="anchor" id="boundprocedure-modify_xc~3"></span>
       <h3>
           procedure, public ::
   <strong>modify_Xc</strong>
@@ -4199,7 +4199,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/modify_xc~2.html'>modify_Xc</a>(this, X, num, dir)  
+    private pure subroutine <a href='../proc/modify_xc~3.html'>modify_Xc</a>(this, X, num, dir)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4292,7 +4292,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-nearest_point~2"></span>
+      <span class="anchor" id="boundprocedure-nearest_point~3"></span>
       <h3>
           procedure, public ::
   <strong>nearest_point</strong>
@@ -4308,7 +4308,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/nearest_point~2.html'>nearest_point</a>(this, point_Xg, nearest_Xg, nearest_Xt, id)  
+    private pure subroutine <a href='../proc/nearest_point~3.html'>nearest_point</a>(this, point_Xg, nearest_Xg, nearest_Xt, id)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4416,7 +4416,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-nearest_point2~2"></span>
+      <span class="anchor" id="boundprocedure-nearest_point2~3"></span>
       <h3>
           procedure, public ::
   <strong>nearest_point2</strong>
@@ -4432,7 +4432,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private impure subroutine <a href='../proc/nearest_point2~2.html'>nearest_point2</a>(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg)  
+    private impure subroutine <a href='../proc/nearest_point2~3.html'>nearest_point2</a>(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4555,7 +4555,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-remove_knots~2"></span>
+      <span class="anchor" id="boundprocedure-remove_knots~3"></span>
       <h3>
           procedure, public ::
   <strong>remove_knots</strong>
@@ -4571,7 +4571,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/remove_knots~2.html'>remove_knots</a>(this, dir, Xth, r)  
+    private pure subroutine <a href='../proc/remove_knots~3.html'>remove_knots</a>(this, dir, Xth, r)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4664,7 +4664,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-rotate_xc~2"></span>
+      <span class="anchor" id="boundprocedure-rotate_xc~3"></span>
       <h3>
           procedure, public ::
   <strong>rotate_Xc</strong>
@@ -4680,7 +4680,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/rotate_xc~2.html'>rotate_Xc</a>(this, alpha, beta, theta)  
+    private pure subroutine <a href='../proc/rotate_xc~3.html'>rotate_Xc</a>(this, alpha, beta, theta)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4773,7 +4773,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-rotate_xg~2"></span>
+      <span class="anchor" id="boundprocedure-rotate_xg~3"></span>
       <h3>
           procedure, public ::
   <strong>rotate_Xg</strong>
@@ -4789,7 +4789,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/rotate_xg~2.html'>rotate_Xg</a>(this, alpha, beta, theta)  
+    private pure subroutine <a href='../proc/rotate_xg~3.html'>rotate_Xg</a>(this, alpha, beta, theta)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4882,10 +4882,10 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set~2"></span>
+      <span class="anchor" id="boundprocedure-set~3"></span>
       <h3>
           generic, public ::
-  <strong>set</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-set1~2'>set1</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-set2~2'>set2</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-set3~2'>set3</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-set4~2'>set4</a>
+  <strong>set</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-set1~3'>set1</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-set2~3'>set2</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-set3~3'>set3</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_surface.html#boundprocedure-set4~3'>set4</a>
         
       </h3>
     </div>
@@ -4898,7 +4898,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set1~2.html'>set1</a>(this, knot1, knot2, Xc, Wc)  
+    private pure subroutine <a href='../proc/set1~3.html'>set1</a>(this, knot1, knot2, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5001,7 +5001,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set2~2.html'>set2</a>(this, Xth_dir1, Xth_dir2, degree, continuity1, continuity2, Xc, Wc)  
+    private pure subroutine <a href='../proc/set2~3.html'>set2</a>(this, Xth_dir1, Xth_dir2, degree, continuity1, continuity2, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5149,7 +5149,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set3~2.html'>set3</a>(this, nc, Xc, Wc)  
+    private pure subroutine <a href='../proc/set3~3.html'>set3</a>(this, nc, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5237,7 +5237,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set4~2.html'>set4</a>(this, degree, nc, Xc, Wc)  
+    private pure subroutine <a href='../proc/set4~3.html'>set4</a>(this, degree, nc, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5345,7 +5345,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set1~2"></span>
+      <span class="anchor" id="boundprocedure-set1~3"></span>
       <h3>
           procedure, public ::
   <strong>set1</strong>
@@ -5361,7 +5361,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set1~2.html'>set1</a>(this, knot1, knot2, Xc, Wc)  
+    private pure subroutine <a href='../proc/set1~3.html'>set1</a>(this, knot1, knot2, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5469,7 +5469,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set2~2"></span>
+      <span class="anchor" id="boundprocedure-set2~3"></span>
       <h3>
           procedure, public ::
   <strong>set2</strong>
@@ -5485,7 +5485,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set2~2.html'>set2</a>(this, Xth_dir1, Xth_dir2, degree, continuity1, continuity2, Xc, Wc)  
+    private pure subroutine <a href='../proc/set2~3.html'>set2</a>(this, Xth_dir1, Xth_dir2, degree, continuity1, continuity2, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5638,7 +5638,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set3~2"></span>
+      <span class="anchor" id="boundprocedure-set3~3"></span>
       <h3>
           procedure, public ::
   <strong>set3</strong>
@@ -5654,7 +5654,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set3~2.html'>set3</a>(this, nc, Xc, Wc)  
+    private pure subroutine <a href='../proc/set3~3.html'>set3</a>(this, nc, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5747,7 +5747,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set4~2"></span>
+      <span class="anchor" id="boundprocedure-set4~3"></span>
       <h3>
           procedure, public ::
   <strong>set4</strong>
@@ -5763,7 +5763,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set4~2.html'>set4</a>(this, degree, nc, Xc, Wc)  
+    private pure subroutine <a href='../proc/set4~3.html'>set4</a>(this, degree, nc, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5871,7 +5871,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set_c~2"></span>
+      <span class="anchor" id="boundprocedure-set_c~3"></span>
       <h3>
           procedure, public ::
   <strong>set_C</strong>
@@ -5887,7 +5887,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set_c~2.html'>set_C</a>(this, center, radius1, radius2)  
+    private pure subroutine <a href='../proc/set_c~3.html'>set_C</a>(this, center, radius1, radius2)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5980,7 +5980,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set_elem~2"></span>
+      <span class="anchor" id="boundprocedure-set_elem~3"></span>
       <h3>
           procedure, public ::
   <strong>set_elem</strong>
@@ -5996,7 +5996,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set_elem~2.html'>set_elem</a>(this, elemConn)  
+    private pure subroutine <a href='../proc/set_elem~3.html'>set_elem</a>(this, elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6059,7 +6059,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set_elem_xc_vis~2"></span>
+      <span class="anchor" id="boundprocedure-set_elem_xc_vis~3"></span>
       <h3>
           procedure, public ::
   <strong>set_elem_Xc_vis</strong>
@@ -6075,7 +6075,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set_elem_xc_vis~2.html'>set_elem_Xc_vis</a>(this, elemConn)  
+    private pure subroutine <a href='../proc/set_elem_xc_vis~3.html'>set_elem_Xc_vis</a>(this, elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6138,7 +6138,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set_elem_xg_vis~2"></span>
+      <span class="anchor" id="boundprocedure-set_elem_xg_vis~3"></span>
       <h3>
           procedure, public ::
   <strong>set_elem_Xg_vis</strong>
@@ -6154,7 +6154,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set_elem_xg_vis~2.html'>set_elem_Xg_vis</a>(this, elemConn)  
+    private pure subroutine <a href='../proc/set_elem_xg_vis~3.html'>set_elem_Xg_vis</a>(this, elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6544,7 +6544,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-show~2"></span>
+      <span class="anchor" id="boundprocedure-show~3"></span>
       <h3>
           procedure, public ::
   <strong>show</strong>
@@ -6560,7 +6560,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private impure subroutine <a href='../proc/show~2.html'>show</a>(this, vtkfile_Xc, vtkfile_Xg)  
+    private impure subroutine <a href='../proc/show~3.html'>show</a>(this, vtkfile_Xc, vtkfile_Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6638,7 +6638,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-translate_xc~2"></span>
+      <span class="anchor" id="boundprocedure-translate_xc~3"></span>
       <h3>
           procedure, public ::
   <strong>translate_Xc</strong>
@@ -6654,7 +6654,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/translate_xc~2.html'>translate_Xc</a>(this, vec)  
+    private pure subroutine <a href='../proc/translate_xc~3.html'>translate_Xc</a>(this, vec)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6717,7 +6717,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-translate_xg~2"></span>
+      <span class="anchor" id="boundprocedure-translate_xg~3"></span>
       <h3>
           procedure, public ::
   <strong>translate_Xg</strong>
@@ -6733,7 +6733,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/translate_xg~2.html'>translate_Xg</a>(this, vec)  
+    private pure subroutine <a href='../proc/translate_xg~3.html'>translate_Xg</a>(this, vec)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6796,7 +6796,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-basis_scalar~2"></span>
+      <span class="anchor" id="boundprocedure-basis_scalar~3"></span>
       <h3>
           procedure, private ::
   <strong>basis_scalar</strong>
@@ -6812,7 +6812,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/basis_scalar~2.html'>basis_scalar</a>(this, Xt, Tgc)  
+    private pure subroutine <a href='../proc/basis_scalar~3.html'>basis_scalar</a>(this, Xt, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6890,7 +6890,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-basis_vector~2"></span>
+      <span class="anchor" id="boundprocedure-basis_vector~3"></span>
       <h3>
           procedure, private ::
   <strong>basis_vector</strong>
@@ -6906,7 +6906,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/basis_vector~2.html'>basis_vector</a>(this, res1, res2, Xt1, Xt2, Tgc)  
+    private pure subroutine <a href='../proc/basis_vector~3.html'>basis_vector</a>(this, res1, res2, Xt1, Xt2, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7029,7 +7029,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative2_scalar~2"></span>
+      <span class="anchor" id="boundprocedure-derivative2_scalar~3"></span>
       <h3>
           procedure, private ::
   <strong>derivative2_scalar</strong>
@@ -7045,7 +7045,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative2_scalar~2.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative2_scalar~3.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7153,7 +7153,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative2_vector~2"></span>
+      <span class="anchor" id="boundprocedure-derivative2_vector~3"></span>
       <h3>
           procedure, private ::
   <strong>derivative2_vector</strong>
@@ -7169,7 +7169,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative2_vector~2.html'>derivative2_vector</a>(this, res1, res2, Xt1, Xt2, d2Tgc, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative2_vector~3.html'>derivative2_vector</a>(this, res1, res2, Xt1, Xt2, d2Tgc, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7322,7 +7322,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative_scalar~2"></span>
+      <span class="anchor" id="boundprocedure-derivative_scalar~3"></span>
       <h3>
           procedure, private ::
   <strong>derivative_scalar</strong>
@@ -7338,7 +7338,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative_scalar~2.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
+    private pure subroutine <a href='../proc/derivative_scalar~3.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7446,7 +7446,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative_vector~2"></span>
+      <span class="anchor" id="boundprocedure-derivative_vector~3"></span>
       <h3>
           procedure, private ::
   <strong>derivative_vector</strong>
@@ -7462,7 +7462,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative_vector~2.html'>derivative_vector</a>(this, res1, res2, Xt1, Xt2, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative_vector~3.html'>derivative_vector</a>(this, res1, res2, Xt1, Xt2, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7600,7 +7600,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_wc_all~2"></span>
+      <span class="anchor" id="boundprocedure-get_wc_all~3"></span>
       <h3>
           procedure, private ::
   <strong>get_Wc_all</strong>
@@ -7616,7 +7616,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_wc_all~2.html'>get_Wc_all</a>(this) result(Wc)  
+    private pure function <a href='../proc/get_wc_all~3.html'>get_Wc_all</a>(this) result(Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7669,7 +7669,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_wci~2"></span>
+      <span class="anchor" id="boundprocedure-get_wci~3"></span>
       <h3>
           procedure, private ::
   <strong>get_Wci</strong>
@@ -7685,7 +7685,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_wci~2.html'>get_Wci</a>(this, n) result(Wc)  
+    private pure function <a href='../proc/get_wci~3.html'>get_Wci</a>(this, n) result(Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7753,7 +7753,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xc_all~2"></span>
+      <span class="anchor" id="boundprocedure-get_xc_all~3"></span>
       <h3>
           procedure, private ::
   <strong>get_Xc_all</strong>
@@ -7769,7 +7769,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xc_all~2.html'>get_Xc_all</a>(this) result(Xc)  
+    private pure function <a href='../proc/get_xc_all~3.html'>get_Xc_all</a>(this) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7822,7 +7822,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xci~2"></span>
+      <span class="anchor" id="boundprocedure-get_xci~3"></span>
       <h3>
           procedure, private ::
   <strong>get_Xci</strong>
@@ -7838,7 +7838,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xci~2.html'>get_Xci</a>(this, n) result(Xc)  
+    private pure function <a href='../proc/get_xci~3.html'>get_Xci</a>(this, n) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7906,7 +7906,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xcid~2"></span>
+      <span class="anchor" id="boundprocedure-get_xcid~3"></span>
       <h3>
           procedure, private ::
   <strong>get_Xcid</strong>
@@ -7922,7 +7922,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xcid~2.html'>get_Xcid</a>(this, n, dir) result(Xc)  
+    private pure function <a href='../proc/get_xcid~3.html'>get_Xcid</a>(this, n, dir) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -8005,7 +8005,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xg_all~2"></span>
+      <span class="anchor" id="boundprocedure-get_xg_all~3"></span>
       <h3>
           procedure, private ::
   <strong>get_Xg_all</strong>
@@ -8021,7 +8021,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xg_all~2.html'>get_Xg_all</a>(this) result(Xg)  
+    private pure function <a href='../proc/get_xg_all~3.html'>get_Xg_all</a>(this) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -8074,7 +8074,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xgi~2"></span>
+      <span class="anchor" id="boundprocedure-get_xgi~3"></span>
       <h3>
           procedure, private ::
   <strong>get_Xgi</strong>
@@ -8090,7 +8090,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xgi~2.html'>get_Xgi</a>(this, n) result(Xg)  
+    private pure function <a href='../proc/get_xgi~3.html'>get_Xgi</a>(this, n) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -8158,7 +8158,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xgid~2"></span>
+      <span class="anchor" id="boundprocedure-get_xgid~3"></span>
       <h3>
           procedure, private ::
   <strong>get_Xgid</strong>
@@ -8174,7 +8174,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xgid~2.html'>get_Xgid</a>(this, n, dir) result(Xg)  
+    private pure function <a href='../proc/get_xgid~3.html'>get_Xgid</a>(this, n, dir) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -8410,7 +8410,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_knot_all~2"></span>
+      <span class="anchor" id="boundprocedure-get_knot_all~3"></span>
       <h3>
           procedure, private ::
   <strong>get_knot_all</strong>
@@ -8426,7 +8426,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_knot_all~2.html'>get_knot_all</a>(this, dir) result(knot)  
+    private pure function <a href='../proc/get_knot_all~3.html'>get_knot_all</a>(this, dir) result(knot)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -8494,7 +8494,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_knoti~2"></span>
+      <span class="anchor" id="boundprocedure-get_knoti~3"></span>
       <h3>
           procedure, private ::
   <strong>get_knoti</strong>
@@ -8510,7 +8510,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_knoti~2.html'>get_knoti</a>(this, dir, i) result(knot)  
+    private pure function <a href='../proc/get_knoti~3.html'>get_knoti</a>(this, dir, i) result(knot)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -8764,7 +8764,7 @@ <h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>
diff --git a/type/nurbs_volume.html b/type/nurbs_volume.html
index 2bfcc4a81..b11db330c 100644
--- a/type/nurbs_volume.html
+++ b/type/nurbs_volume.html
@@ -118,22 +118,22 @@ <h4 class="card-header bg-primary text-white">Variables</h4>
       </a>
       <div id="vars-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../type/nurbs_volume.html#variable-wc~2">Wc</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#variable-xc~3">Xc</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#variable-xg">Xg</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#variable-xt">Xt</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#variable-wc~26">Wc</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#variable-xc~23">Xc</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#variable-xg~14">Xg</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#variable-xt~28">Xt</a>
             <a class="list-group-item" href="../type/nurbs_volume.html#variable-xt1">Xt1</a>
             <a class="list-group-item" href="../type/nurbs_volume.html#variable-xt2">Xt2</a>
             <a class="list-group-item" href="../type/nurbs_volume.html#variable-xt3">Xt3</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#variable-degree">degree</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#variable-elemconn">elemConn</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#variable-elemconn_xc_vis">elemConn_Xc_vis</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#variable-elemconn_xg_vis">elemConn_Xg_vis</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#variable-knot1">knot1</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#variable-knot2">knot2</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#variable-knot3">knot3</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#variable-nc">nc</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#variable-ng">ng</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#variable-degree~21">degree</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#variable-elemconn~13">elemConn</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#variable-elemconn_xc_vis~2">elemConn_Xc_vis</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#variable-elemconn_xg_vis~2">elemConn_Xg_vis</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#variable-knot1~3">knot1</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#variable-knot2~3">knot2</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#variable-knot3~2">knot3</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#variable-nc~21">nc</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#variable-ng~15">ng</a>
         </div>
       </div>
     </div>
@@ -160,82 +160,82 @@ <h4 class="card-header bg-primary text-white">Type-Bound Procedures</h4>
       </a>
       <div id="boundprocs-0" class="collapse">
         <div class="list-group list-group-flush">
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-ansatz">ansatz</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-basis">basis</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-cmp_xg">cmp_Xg</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-cmp_degree">cmp_degree</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-ansatz~2">ansatz</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-basis~2">basis</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-cmp_xg~2">cmp_Xg</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-cmp_degree~2">cmp_degree</a>
             <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-cmp_degreeface">cmp_degreeFace</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-cmp_elem">cmp_elem</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-cmp_elem~2">cmp_elem</a>
             <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-cmp_elemface">cmp_elemFace</a>
             <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-cmp_elemface_xc_vis">cmp_elemFace_Xc_vis</a>
             <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-cmp_elemface_xg_vis">cmp_elemFace_Xg_vis</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-cmp_elem_xc_vis">cmp_elem_Xc_vis</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-cmp_elem_xg_vis">cmp_elem_Xg_vis</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-cmp_nc">cmp_nc</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-cmp_elem_xc_vis~2">cmp_elem_Xc_vis</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-cmp_elem_xg_vis~2">cmp_elem_Xg_vis</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-cmp_nc~2">cmp_nc</a>
             <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-cmp_volume">cmp_volume</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-create">create</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-derivative">derivative</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-derivative2">derivative2</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-elevate_degree">elevate_degree</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-export_xc">export_Xc</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-export_xg">export_Xg</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-finalize">finalize</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_wc">get_Wc</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xc">get_Xc</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xg">get_Xg</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xt">get_Xt</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_continuity">get_continuity</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_degree">get_degree</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_elem">get_elem</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_elem_xc_vis">get_elem_Xc_vis</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_elem_xg_vis">get_elem_Xg_vis</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_knot">get_knot</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_multiplicity">get_multiplicity</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_nc">get_nc</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_ng">get_ng</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-insert_knots">insert_knots</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-is_rational">is_rational</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-modify_wc">modify_Wc</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-modify_xc">modify_Xc</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-nearest_point">nearest_point</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-nearest_point2">nearest_point2</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-create~2">create</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-derivative~2">derivative</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-derivative2~2">derivative2</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-elevate_degree~2">elevate_degree</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-export_xc~2">export_Xc</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-export_xg~2">export_Xg</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-finalize~2">finalize</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_wc~2">get_Wc</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xc~2">get_Xc</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xg~2">get_Xg</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xt~2">get_Xt</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_continuity~2">get_continuity</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_degree~2">get_degree</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_elem~2">get_elem</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_elem_xc_vis~2">get_elem_Xc_vis</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_elem_xg_vis~2">get_elem_Xg_vis</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_knot~2">get_knot</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_multiplicity~2">get_multiplicity</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_nc~2">get_nc</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_ng~2">get_ng</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-insert_knots~2">insert_knots</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-is_rational~2">is_rational</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-modify_wc~2">modify_Wc</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-modify_xc~2">modify_Xc</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-nearest_point~2">nearest_point</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-nearest_point2~2">nearest_point2</a>
             <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-put_to_nurbs">put_to_nurbs</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-remove_knots">remove_knots</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-rotate_xc">rotate_Xc</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-rotate_xg">rotate_Xg</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set">set</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set1">set1</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set2">set2</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set3">set3</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set4">set4</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set_c">set_C</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set_elem">set_elem</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set_elem_xc_vis">set_elem_Xc_vis</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set_elem_xg_vis">set_elem_Xg_vis</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-remove_knots~2">remove_knots</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-rotate_xc~2">rotate_Xc</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-rotate_xg~2">rotate_Xg</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set~2">set</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set1~2">set1</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set2~2">set2</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set3~2">set3</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set4~2">set4</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set_c~2">set_C</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set_elem~2">set_elem</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set_elem_xc_vis~2">set_elem_Xc_vis</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set_elem_xg_vis~2">set_elem_Xg_vis</a>
             <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set_half_ring">set_half_ring</a>
             <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set_hexahedron">set_hexahedron</a>
             <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-set_ring">set_ring</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-show">show</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-translate_xc">translate_Xc</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-translate_xg">translate_Xg</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-basis_scalar">basis_scalar</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-basis_vector">basis_vector</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-derivative2_scalar">derivative2_scalar</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-derivative2_vector">derivative2_vector</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-derivative_scalar">derivative_scalar</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-derivative_vector">derivative_vector</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_wc_all">get_Wc_all</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_wci">get_Wci</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xc_all">get_Xc_all</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xci">get_Xci</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xcid">get_Xcid</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xg_all">get_Xg_all</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xgi">get_Xgi</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xgid">get_Xgid</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-show~2">show</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-translate_xc~2">translate_Xc</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-translate_xg~2">translate_Xg</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-basis_scalar~2">basis_scalar</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-basis_vector~2">basis_vector</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-derivative2_scalar~2">derivative2_scalar</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-derivative2_vector~2">derivative2_vector</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-derivative_scalar~2">derivative_scalar</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-derivative_vector~2">derivative_vector</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_wc_all~2">get_Wc_all</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_wci~2">get_Wci</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xc_all~2">get_Xc_all</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xci~2">get_Xci</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xcid~2">get_Xcid</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xg_all~2">get_Xg_all</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xgi~2">get_Xgi</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_xgid~2">get_Xgid</a>
             <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_degree_all">get_degree_all</a>
             <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_degree_dir">get_degree_dir</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_knot_all">get_knot_all</a>
-            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_knoti">get_knoti</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_knot_all~2">get_knot_all</a>
+            <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_knoti~2">get_knoti</a>
             <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_nc_all">get_nc_all</a>
             <a class="list-group-item" href="../type/nurbs_volume.html#boundprocedure-get_nc_dir">get_nc_dir</a>
         </div>
@@ -270,7 +270,7 @@ <h2>Components</h2>
     <tbody>
         <tr>
             <td>
-              <span class="anchor" id="variable-wc~2"></span>
+              <span class="anchor" id="variable-wc~26"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -287,7 +287,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xc~3"></span>
+              <span class="anchor" id="variable-xc~23"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -304,7 +304,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xg"></span>
+              <span class="anchor" id="variable-xg~14"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -321,7 +321,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-xt"></span>
+              <span class="anchor" id="variable-xt~28"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -389,7 +389,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-degree"></span>
+              <span class="anchor" id="variable-degree~21"></span>
               integer,
             </td>
               <td>private</td>
@@ -406,7 +406,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn"></span>
+              <span class="anchor" id="variable-elemconn~13"></span>
               integer,
             </td>
               <td>private,</td>
@@ -423,7 +423,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn_xc_vis"></span>
+              <span class="anchor" id="variable-elemconn_xc_vis~2"></span>
               integer,
             </td>
               <td>private,</td>
@@ -440,7 +440,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-elemconn_xg_vis"></span>
+              <span class="anchor" id="variable-elemconn_xg_vis~2"></span>
               integer,
             </td>
               <td>private,</td>
@@ -457,7 +457,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot1"></span>
+              <span class="anchor" id="variable-knot1~3"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -474,7 +474,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot2"></span>
+              <span class="anchor" id="variable-knot2~3"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -491,7 +491,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-knot3"></span>
+              <span class="anchor" id="variable-knot3~2"></span>
               real(kind=rk),
             </td>
               <td>private,</td>
@@ -508,7 +508,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-nc"></span>
+              <span class="anchor" id="variable-nc~21"></span>
               integer,
             </td>
               <td>private</td>
@@ -525,7 +525,7 @@ <h2>Components</h2>
         </tr>
         <tr>
             <td>
-              <span class="anchor" id="variable-ng"></span>
+              <span class="anchor" id="variable-ng~15"></span>
               integer,
             </td>
               <td>private</td>
@@ -553,7 +553,7 @@ <h2>Type-Bound Procedures</h2>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-ansatz"></span>
+      <span class="anchor" id="boundprocedure-ansatz~2"></span>
       <h3>
           procedure, public ::
   <strong>ansatz</strong>
@@ -569,7 +569,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/ansatz.html'>ansatz</a>(this, ie, ig, Tgc, dTgc_dXg, dV)  
+    private pure subroutine <a href='../proc/ansatz~2.html'>ansatz</a>(this, ie, ig, Tgc, dTgc_dXg, dV)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -692,10 +692,10 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-basis"></span>
+      <span class="anchor" id="boundprocedure-basis~2"></span>
       <h3>
           generic, public ::
-  <strong>basis</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-basis_vector'>basis_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-basis_scalar'>basis_scalar</a>
+  <strong>basis</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-basis_vector~2'>basis_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-basis_scalar~2'>basis_scalar</a>
         
       </h3>
     </div>
@@ -708,7 +708,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/basis_vector.html'>basis_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, Tgc)  
+    private pure subroutine <a href='../proc/basis_vector~2.html'>basis_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -856,7 +856,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/basis_scalar.html'>basis_scalar</a>(this, Xt, Tgc)  
+    private pure subroutine <a href='../proc/basis_scalar~2.html'>basis_scalar</a>(this, Xt, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -934,7 +934,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_xg"></span>
+      <span class="anchor" id="boundprocedure-cmp_xg~2"></span>
       <h3>
           procedure, public ::
   <strong>cmp_Xg</strong>
@@ -950,7 +950,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/cmp_xg.html'>cmp_Xg</a>(this, Xt) result(Xg)  
+    private pure function <a href='../proc/cmp_xg~2.html'>cmp_Xg</a>(this, Xt) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1018,7 +1018,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_degree"></span>
+      <span class="anchor" id="boundprocedure-cmp_degree~2"></span>
       <h3>
           procedure, public ::
   <strong>cmp_degree</strong>
@@ -1034,7 +1034,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/cmp_degree.html'>cmp_degree</a>(this, dir)  
+    private pure subroutine <a href='../proc/cmp_degree~2.html'>cmp_degree</a>(this, dir)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1181,7 +1181,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_elem"></span>
+      <span class="anchor" id="boundprocedure-cmp_elem~2"></span>
       <h3>
           procedure, public ::
   <strong>cmp_elem</strong>
@@ -1197,7 +1197,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/cmp_elem.html'>cmp_elem</a>(this) result(elemConn)  
+    private pure function <a href='../proc/cmp_elem~2.html'>cmp_elem</a>(this) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1547,7 +1547,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_elem_xc_vis"></span>
+      <span class="anchor" id="boundprocedure-cmp_elem_xc_vis~2"></span>
       <h3>
           procedure, public ::
   <strong>cmp_elem_Xc_vis</strong>
@@ -1563,7 +1563,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/cmp_elem_xc_vis.html'>cmp_elem_Xc_vis</a>(this, p) result(elemConn)  
+    private pure function <a href='../proc/cmp_elem_xc_vis~2.html'>cmp_elem_Xc_vis</a>(this, p) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1631,7 +1631,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_elem_xg_vis"></span>
+      <span class="anchor" id="boundprocedure-cmp_elem_xg_vis~2"></span>
       <h3>
           procedure, public ::
   <strong>cmp_elem_Xg_vis</strong>
@@ -1647,7 +1647,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/cmp_elem_xg_vis.html'>cmp_elem_Xg_vis</a>(this, p) result(elemConn)  
+    private pure function <a href='../proc/cmp_elem_xg_vis~2.html'>cmp_elem_Xg_vis</a>(this, p) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1715,7 +1715,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-cmp_nc"></span>
+      <span class="anchor" id="boundprocedure-cmp_nc~2"></span>
       <h3>
           procedure, public ::
   <strong>cmp_nc</strong>
@@ -1731,7 +1731,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/cmp_nc.html'>cmp_nc</a>(this, dir)  
+    private pure subroutine <a href='../proc/cmp_nc~2.html'>cmp_nc</a>(this, dir)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -1873,7 +1873,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-create"></span>
+      <span class="anchor" id="boundprocedure-create~2"></span>
       <h3>
           procedure, public ::
   <strong>create</strong>
@@ -1889,7 +1889,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/create.html'>create</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, Xt)  
+    private pure subroutine <a href='../proc/create~2.html'>create</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, Xt)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2042,10 +2042,10 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative"></span>
+      <span class="anchor" id="boundprocedure-derivative~2"></span>
       <h3>
           generic, public ::
-  <strong>derivative</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-derivative_vector'>derivative_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-derivative_scalar'>derivative_scalar</a>
+  <strong>derivative</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-derivative_vector~2'>derivative_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-derivative_scalar~2'>derivative_scalar</a>
         
       </h3>
     </div>
@@ -2058,7 +2058,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative_vector.html'>derivative_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative_vector~2.html'>derivative_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2221,7 +2221,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative_scalar.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
+    private pure subroutine <a href='../proc/derivative_scalar~2.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2329,10 +2329,10 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative2"></span>
+      <span class="anchor" id="boundprocedure-derivative2~2"></span>
       <h3>
           generic, public ::
-  <strong>derivative2</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-derivative2_vector'>derivative2_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-derivative2_scalar'>derivative2_scalar</a>
+  <strong>derivative2</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-derivative2_vector~2'>derivative2_vector</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-derivative2_scalar~2'>derivative2_scalar</a>
         
       </h3>
     </div>
@@ -2345,7 +2345,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative2_vector.html'>derivative2_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, d2Tgc, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative2_vector~2.html'>derivative2_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, d2Tgc, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2523,7 +2523,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative2_scalar.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative2_scalar~2.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2631,7 +2631,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-elevate_degree"></span>
+      <span class="anchor" id="boundprocedure-elevate_degree~2"></span>
       <h3>
           procedure, public ::
   <strong>elevate_degree</strong>
@@ -2647,7 +2647,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/elevate_degree.html'>elevate_degree</a>(this, dir, t)  
+    private pure subroutine <a href='../proc/elevate_degree~2.html'>elevate_degree</a>(this, dir, t)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2725,7 +2725,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-export_xc"></span>
+      <span class="anchor" id="boundprocedure-export_xc~2"></span>
       <h3>
           procedure, public ::
   <strong>export_Xc</strong>
@@ -2741,7 +2741,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private impure subroutine <a href='../proc/export_xc.html'>export_Xc</a>(this, filename)  
+    private impure subroutine <a href='../proc/export_xc~2.html'>export_Xc</a>(this, filename)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2804,7 +2804,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-export_xg"></span>
+      <span class="anchor" id="boundprocedure-export_xg~2"></span>
       <h3>
           procedure, public ::
   <strong>export_Xg</strong>
@@ -2820,7 +2820,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private impure subroutine <a href='../proc/export_xg.html'>export_Xg</a>(this, filename)  
+    private impure subroutine <a href='../proc/export_xg~2.html'>export_Xg</a>(this, filename)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2883,7 +2883,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-finalize"></span>
+      <span class="anchor" id="boundprocedure-finalize~2"></span>
       <h3>
           procedure, public ::
   <strong>finalize</strong>
@@ -2899,7 +2899,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/finalize.html'>finalize</a>(this)  
+    private pure subroutine <a href='../proc/finalize~2.html'>finalize</a>(this)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -2947,10 +2947,10 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_wc"></span>
+      <span class="anchor" id="boundprocedure-get_wc~2"></span>
       <h3>
           generic, public ::
-  <strong>get_Wc</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_wc_all'>get_Wc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_wci'>get_Wci</a>
+  <strong>get_Wc</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_wc_all~2'>get_Wc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_wci~2'>get_Wci</a>
         
       </h3>
     </div>
@@ -2963,7 +2963,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_wc_all.html'>get_Wc_all</a>(this) result(Wc)  
+    private pure function <a href='../proc/get_wc_all~2.html'>get_Wc_all</a>(this) result(Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3011,7 +3011,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_wci.html'>get_Wci</a>(this, n) result(Wc)  
+    private pure function <a href='../proc/get_wci~2.html'>get_Wci</a>(this, n) result(Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3079,10 +3079,10 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xc"></span>
+      <span class="anchor" id="boundprocedure-get_xc~2"></span>
       <h3>
           generic, public ::
-  <strong>get_Xc</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xc_all'>get_Xc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xci'>get_Xci</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xcid'>get_Xcid</a>
+  <strong>get_Xc</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xc_all~2'>get_Xc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xci~2'>get_Xci</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xcid~2'>get_Xcid</a>
         
       </h3>
     </div>
@@ -3095,7 +3095,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xc_all.html'>get_Xc_all</a>(this) result(Xc)  
+    private pure function <a href='../proc/get_xc_all~2.html'>get_Xc_all</a>(this) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3143,7 +3143,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xci.html'>get_Xci</a>(this, n) result(Xc)  
+    private pure function <a href='../proc/get_xci~2.html'>get_Xci</a>(this, n) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3206,7 +3206,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xcid.html'>get_Xcid</a>(this, n, dir) result(Xc)  
+    private pure function <a href='../proc/get_xcid~2.html'>get_Xcid</a>(this, n, dir) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3289,10 +3289,10 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xg"></span>
+      <span class="anchor" id="boundprocedure-get_xg~2"></span>
       <h3>
           generic, public ::
-  <strong>get_Xg</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xg_all'>get_Xg_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xgi'>get_Xgi</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xgid'>get_Xgid</a>
+  <strong>get_Xg</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xg_all~2'>get_Xg_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xgi~2'>get_Xgi</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_xgid~2'>get_Xgid</a>
         
       </h3>
     </div>
@@ -3305,7 +3305,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xg_all.html'>get_Xg_all</a>(this) result(Xg)  
+    private pure function <a href='../proc/get_xg_all~2.html'>get_Xg_all</a>(this) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3353,7 +3353,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xgi.html'>get_Xgi</a>(this, n) result(Xg)  
+    private pure function <a href='../proc/get_xgi~2.html'>get_Xgi</a>(this, n) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3416,7 +3416,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xgid.html'>get_Xgid</a>(this, n, dir) result(Xg)  
+    private pure function <a href='../proc/get_xgid~2.html'>get_Xgid</a>(this, n, dir) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3499,7 +3499,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xt"></span>
+      <span class="anchor" id="boundprocedure-get_xt~2"></span>
       <h3>
           procedure, public ::
   <strong>get_Xt</strong>
@@ -3515,7 +3515,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xt.html'>get_Xt</a>(this, dir) result(Xt)  
+    private pure function <a href='../proc/get_xt~2.html'>get_Xt</a>(this, dir) result(Xt)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3583,7 +3583,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_continuity"></span>
+      <span class="anchor" id="boundprocedure-get_continuity~2"></span>
       <h3>
           procedure, public ::
   <strong>get_continuity</strong>
@@ -3599,7 +3599,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_continuity.html'>get_continuity</a>(this, dir) result(c)  
+    private pure function <a href='../proc/get_continuity~2.html'>get_continuity</a>(this, dir) result(c)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3667,7 +3667,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_degree"></span>
+      <span class="anchor" id="boundprocedure-get_degree~2"></span>
       <h3>
           generic, public ::
   <strong>get_degree</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_degree_all'>get_degree_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_degree_dir'>get_degree_dir</a>
@@ -3799,7 +3799,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_elem"></span>
+      <span class="anchor" id="boundprocedure-get_elem~2"></span>
       <h3>
           procedure, public ::
   <strong>get_elem</strong>
@@ -3815,7 +3815,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_elem.html'>get_elem</a>(this) result(elemConn)  
+    private pure function <a href='../proc/get_elem~2.html'>get_elem</a>(this) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3868,7 +3868,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_elem_xc_vis"></span>
+      <span class="anchor" id="boundprocedure-get_elem_xc_vis~2"></span>
       <h3>
           procedure, public ::
   <strong>get_elem_Xc_vis</strong>
@@ -3884,7 +3884,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_elem_xc_vis.html'>get_elem_Xc_vis</a>(this) result(elemConn)  
+    private pure function <a href='../proc/get_elem_xc_vis~2.html'>get_elem_Xc_vis</a>(this) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -3937,7 +3937,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_elem_xg_vis"></span>
+      <span class="anchor" id="boundprocedure-get_elem_xg_vis~2"></span>
       <h3>
           procedure, public ::
   <strong>get_elem_Xg_vis</strong>
@@ -3953,7 +3953,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_elem_xg_vis.html'>get_elem_Xg_vis</a>(this) result(elemConn)  
+    private pure function <a href='../proc/get_elem_xg_vis~2.html'>get_elem_Xg_vis</a>(this) result(elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4006,10 +4006,10 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_knot"></span>
+      <span class="anchor" id="boundprocedure-get_knot~2"></span>
       <h3>
           generic, public ::
-  <strong>get_knot</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_knoti'>get_knoti</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_knot_all'>get_knot_all</a>
+  <strong>get_knot</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_knoti~2'>get_knoti</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_knot_all~2'>get_knot_all</a>
         
       </h3>
     </div>
@@ -4022,7 +4022,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_knoti.html'>get_knoti</a>(this, dir, i) result(knot)  
+    private pure function <a href='../proc/get_knoti~2.html'>get_knoti</a>(this, dir, i) result(knot)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4100,7 +4100,7 @@ <h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_knot_all.html'>get_knot_all</a>(this, dir) result(knot)  
+    private pure function <a href='../proc/get_knot_all~2.html'>get_knot_all</a>(this, dir) result(knot)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4168,7 +4168,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_multiplicity"></span>
+      <span class="anchor" id="boundprocedure-get_multiplicity~2"></span>
       <h3>
           procedure, public ::
   <strong>get_multiplicity</strong>
@@ -4184,7 +4184,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_multiplicity.html'>get_multiplicity</a>(this, dir) result(m)  
+    private pure function <a href='../proc/get_multiplicity~2.html'>get_multiplicity</a>(this, dir) result(m)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4252,7 +4252,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_nc"></span>
+      <span class="anchor" id="boundprocedure-get_nc~2"></span>
       <h3>
           generic, public ::
   <strong>get_nc</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_nc_all'>get_nc_all</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-get_nc_dir'>get_nc_dir</a>
@@ -4384,7 +4384,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_ng"></span>
+      <span class="anchor" id="boundprocedure-get_ng~2"></span>
       <h3>
           procedure, public ::
   <strong>get_ng</strong>
@@ -4400,7 +4400,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_ng.html'>get_ng</a>(this) result(ng)  
+    private pure function <a href='../proc/get_ng~2.html'>get_ng</a>(this) result(ng)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4453,7 +4453,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-insert_knots"></span>
+      <span class="anchor" id="boundprocedure-insert_knots~2"></span>
       <h3>
           procedure, public ::
   <strong>insert_knots</strong>
@@ -4469,7 +4469,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/insert_knots.html'>insert_knots</a>(this, dir, Xth, r)  
+    private pure subroutine <a href='../proc/insert_knots~2.html'>insert_knots</a>(this, dir, Xth, r)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4562,7 +4562,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-is_rational"></span>
+      <span class="anchor" id="boundprocedure-is_rational~2"></span>
       <h3>
           procedure, public ::
   <strong>is_rational</strong>
@@ -4578,7 +4578,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/is_rational.html'>is_rational</a>(this) result(r)  
+    private pure function <a href='../proc/is_rational~2.html'>is_rational</a>(this) result(r)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4631,7 +4631,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-modify_wc"></span>
+      <span class="anchor" id="boundprocedure-modify_wc~2"></span>
       <h3>
           procedure, public ::
   <strong>modify_Wc</strong>
@@ -4647,7 +4647,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/modify_wc.html'>modify_Wc</a>(this, W, num)  
+    private pure subroutine <a href='../proc/modify_wc~2.html'>modify_Wc</a>(this, W, num)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4725,7 +4725,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-modify_xc"></span>
+      <span class="anchor" id="boundprocedure-modify_xc~2"></span>
       <h3>
           procedure, public ::
   <strong>modify_Xc</strong>
@@ -4741,7 +4741,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/modify_xc.html'>modify_Xc</a>(this, X, num, dir)  
+    private pure subroutine <a href='../proc/modify_xc~2.html'>modify_Xc</a>(this, X, num, dir)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4834,7 +4834,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-nearest_point"></span>
+      <span class="anchor" id="boundprocedure-nearest_point~2"></span>
       <h3>
           procedure, public ::
   <strong>nearest_point</strong>
@@ -4850,7 +4850,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/nearest_point.html'>nearest_point</a>(this, point_Xg, nearest_Xg, nearest_Xt, id)  
+    private pure subroutine <a href='../proc/nearest_point~2.html'>nearest_point</a>(this, point_Xg, nearest_Xg, nearest_Xt, id)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -4958,7 +4958,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-nearest_point2"></span>
+      <span class="anchor" id="boundprocedure-nearest_point2~2"></span>
       <h3>
           procedure, public ::
   <strong>nearest_point2</strong>
@@ -4974,7 +4974,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private impure subroutine <a href='../proc/nearest_point2.html'>nearest_point2</a>(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg)  
+    private impure subroutine <a href='../proc/nearest_point2~2.html'>nearest_point2</a>(this, point_Xg, tol, maxit, nearest_Xt, nearest_Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5191,7 +5191,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-remove_knots"></span>
+      <span class="anchor" id="boundprocedure-remove_knots~2"></span>
       <h3>
           procedure, public ::
   <strong>remove_knots</strong>
@@ -5207,7 +5207,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/remove_knots.html'>remove_knots</a>(this, dir, Xth, r)  
+    private pure subroutine <a href='../proc/remove_knots~2.html'>remove_knots</a>(this, dir, Xth, r)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5300,7 +5300,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-rotate_xc"></span>
+      <span class="anchor" id="boundprocedure-rotate_xc~2"></span>
       <h3>
           procedure, public ::
   <strong>rotate_Xc</strong>
@@ -5316,7 +5316,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/rotate_xc.html'>rotate_Xc</a>(this, alpha, beta, theta)  
+    private pure subroutine <a href='../proc/rotate_xc~2.html'>rotate_Xc</a>(this, alpha, beta, theta)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5409,7 +5409,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-rotate_xg"></span>
+      <span class="anchor" id="boundprocedure-rotate_xg~2"></span>
       <h3>
           procedure, public ::
   <strong>rotate_Xg</strong>
@@ -5425,7 +5425,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/rotate_xg.html'>rotate_Xg</a>(this, alpha, beta, theta)  
+    private pure subroutine <a href='../proc/rotate_xg~2.html'>rotate_Xg</a>(this, alpha, beta, theta)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5518,10 +5518,10 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set"></span>
+      <span class="anchor" id="boundprocedure-set~2"></span>
       <h3>
           generic, public ::
-  <strong>set</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-set1'>set1</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-set2'>set2</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-set3'>set3</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-set4'>set4</a>
+  <strong>set</strong> => <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-set1~2'>set1</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-set2~2'>set2</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-set3~2'>set3</a>, <a href='/home/runner/work/forcad/forcad/doc/type/nurbs_volume.html#boundprocedure-set4~2'>set4</a>
         
       </h3>
     </div>
@@ -5534,7 +5534,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set1.html'>set1</a>(this, knot1, knot2, knot3, Xc, Wc)  
+    private pure subroutine <a href='../proc/set1~2.html'>set1</a>(this, knot1, knot2, knot3, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5652,7 +5652,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set2.html'>set2</a>(this, Xth_dir1, Xth_dir2, Xth_dir3, degree, continuity1, continuity2, continuity3, Xc, Wc)  
+    private pure subroutine <a href='../proc/set2~2.html'>set2</a>(this, Xth_dir1, Xth_dir2, Xth_dir3, degree, continuity1, continuity2, continuity3, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5830,7 +5830,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set3.html'>set3</a>(this, nc, Xc, Wc)  
+    private pure subroutine <a href='../proc/set3~2.html'>set3</a>(this, nc, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -5918,7 +5918,7 @@ <h4>Arguments</h4>
         </li>
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set4.html'>set4</a>(this, degree, nc, Xc, Wc)  
+    private pure subroutine <a href='../proc/set4~2.html'>set4</a>(this, degree, nc, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6026,7 +6026,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set1"></span>
+      <span class="anchor" id="boundprocedure-set1~2"></span>
       <h3>
           procedure, public ::
   <strong>set1</strong>
@@ -6042,7 +6042,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set1.html'>set1</a>(this, knot1, knot2, knot3, Xc, Wc)  
+    private pure subroutine <a href='../proc/set1~2.html'>set1</a>(this, knot1, knot2, knot3, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6165,7 +6165,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set2"></span>
+      <span class="anchor" id="boundprocedure-set2~2"></span>
       <h3>
           procedure, public ::
   <strong>set2</strong>
@@ -6181,7 +6181,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set2.html'>set2</a>(this, Xth_dir1, Xth_dir2, Xth_dir3, degree, continuity1, continuity2, continuity3, Xc, Wc)  
+    private pure subroutine <a href='../proc/set2~2.html'>set2</a>(this, Xth_dir1, Xth_dir2, Xth_dir3, degree, continuity1, continuity2, continuity3, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6364,7 +6364,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set3"></span>
+      <span class="anchor" id="boundprocedure-set3~2"></span>
       <h3>
           procedure, public ::
   <strong>set3</strong>
@@ -6380,7 +6380,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set3.html'>set3</a>(this, nc, Xc, Wc)  
+    private pure subroutine <a href='../proc/set3~2.html'>set3</a>(this, nc, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6473,7 +6473,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set4"></span>
+      <span class="anchor" id="boundprocedure-set4~2"></span>
       <h3>
           procedure, public ::
   <strong>set4</strong>
@@ -6489,7 +6489,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set4.html'>set4</a>(this, degree, nc, Xc, Wc)  
+    private pure subroutine <a href='../proc/set4~2.html'>set4</a>(this, degree, nc, Xc, Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6597,7 +6597,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set_c"></span>
+      <span class="anchor" id="boundprocedure-set_c~2"></span>
       <h3>
           procedure, public ::
   <strong>set_C</strong>
@@ -6613,7 +6613,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set_c.html'>set_C</a>(this, center, radius1, radius2, length)  
+    private pure subroutine <a href='../proc/set_c~2.html'>set_C</a>(this, center, radius1, radius2, length)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6721,7 +6721,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set_elem"></span>
+      <span class="anchor" id="boundprocedure-set_elem~2"></span>
       <h3>
           procedure, public ::
   <strong>set_elem</strong>
@@ -6737,7 +6737,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set_elem.html'>set_elem</a>(this, elemConn)  
+    private pure subroutine <a href='../proc/set_elem~2.html'>set_elem</a>(this, elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6800,7 +6800,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set_elem_xc_vis"></span>
+      <span class="anchor" id="boundprocedure-set_elem_xc_vis~2"></span>
       <h3>
           procedure, public ::
   <strong>set_elem_Xc_vis</strong>
@@ -6816,7 +6816,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set_elem_xc_vis.html'>set_elem_Xc_vis</a>(this, elemConn)  
+    private pure subroutine <a href='../proc/set_elem_xc_vis~2.html'>set_elem_Xc_vis</a>(this, elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -6879,7 +6879,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-set_elem_xg_vis"></span>
+      <span class="anchor" id="boundprocedure-set_elem_xg_vis~2"></span>
       <h3>
           procedure, public ::
   <strong>set_elem_Xg_vis</strong>
@@ -6895,7 +6895,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/set_elem_xg_vis.html'>set_elem_Xg_vis</a>(this, elemConn)  
+    private pure subroutine <a href='../proc/set_elem_xg_vis~2.html'>set_elem_Xg_vis</a>(this, elemConn)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7315,7 +7315,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-show"></span>
+      <span class="anchor" id="boundprocedure-show~2"></span>
       <h3>
           procedure, public ::
   <strong>show</strong>
@@ -7331,7 +7331,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private impure subroutine <a href='../proc/show.html'>show</a>(this, vtkfile_Xc, vtkfile_Xg)  
+    private impure subroutine <a href='../proc/show~2.html'>show</a>(this, vtkfile_Xc, vtkfile_Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7409,7 +7409,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-translate_xc"></span>
+      <span class="anchor" id="boundprocedure-translate_xc~2"></span>
       <h3>
           procedure, public ::
   <strong>translate_Xc</strong>
@@ -7425,7 +7425,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/translate_xc.html'>translate_Xc</a>(this, vec)  
+    private pure subroutine <a href='../proc/translate_xc~2.html'>translate_Xc</a>(this, vec)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7488,7 +7488,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-translate_xg"></span>
+      <span class="anchor" id="boundprocedure-translate_xg~2"></span>
       <h3>
           procedure, public ::
   <strong>translate_Xg</strong>
@@ -7504,7 +7504,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/translate_xg.html'>translate_Xg</a>(this, vec)  
+    private pure subroutine <a href='../proc/translate_xg~2.html'>translate_Xg</a>(this, vec)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7567,7 +7567,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-basis_scalar"></span>
+      <span class="anchor" id="boundprocedure-basis_scalar~2"></span>
       <h3>
           procedure, private ::
   <strong>basis_scalar</strong>
@@ -7583,7 +7583,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/basis_scalar.html'>basis_scalar</a>(this, Xt, Tgc)  
+    private pure subroutine <a href='../proc/basis_scalar~2.html'>basis_scalar</a>(this, Xt, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7661,7 +7661,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-basis_vector"></span>
+      <span class="anchor" id="boundprocedure-basis_vector~2"></span>
       <h3>
           procedure, private ::
   <strong>basis_vector</strong>
@@ -7677,7 +7677,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/basis_vector.html'>basis_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, Tgc)  
+    private pure subroutine <a href='../proc/basis_vector~2.html'>basis_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7830,7 +7830,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative2_scalar"></span>
+      <span class="anchor" id="boundprocedure-derivative2_scalar~2"></span>
       <h3>
           procedure, private ::
   <strong>derivative2_scalar</strong>
@@ -7846,7 +7846,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative2_scalar.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative2_scalar~2.html'>derivative2_scalar</a>(this, Xt, d2Tgc, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -7954,7 +7954,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative2_vector"></span>
+      <span class="anchor" id="boundprocedure-derivative2_vector~2"></span>
       <h3>
           procedure, private ::
   <strong>derivative2_vector</strong>
@@ -7970,7 +7970,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative2_vector.html'>derivative2_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, d2Tgc, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative2_vector~2.html'>derivative2_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, d2Tgc, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -8153,7 +8153,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative_scalar"></span>
+      <span class="anchor" id="boundprocedure-derivative_scalar~2"></span>
       <h3>
           procedure, private ::
   <strong>derivative_scalar</strong>
@@ -8169,7 +8169,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative_scalar.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
+    private pure subroutine <a href='../proc/derivative_scalar~2.html'>derivative_scalar</a>(this, Xt, dTgc, Tgc, elem)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -8277,7 +8277,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-derivative_vector"></span>
+      <span class="anchor" id="boundprocedure-derivative_vector~2"></span>
       <h3>
           procedure, private ::
   <strong>derivative_vector</strong>
@@ -8293,7 +8293,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure subroutine <a href='../proc/derivative_vector.html'>derivative_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, dTgc, Tgc)  
+    private pure subroutine <a href='../proc/derivative_vector~2.html'>derivative_vector</a>(this, res1, res2, res3, Xt1, Xt2, Xt3, dTgc, Tgc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -8461,7 +8461,7 @@ <h4>Arguments</h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_wc_all"></span>
+      <span class="anchor" id="boundprocedure-get_wc_all~2"></span>
       <h3>
           procedure, private ::
   <strong>get_Wc_all</strong>
@@ -8477,7 +8477,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_wc_all.html'>get_Wc_all</a>(this) result(Wc)  
+    private pure function <a href='../proc/get_wc_all~2.html'>get_Wc_all</a>(this) result(Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -8530,7 +8530,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_wci"></span>
+      <span class="anchor" id="boundprocedure-get_wci~2"></span>
       <h3>
           procedure, private ::
   <strong>get_Wci</strong>
@@ -8546,7 +8546,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_wci.html'>get_Wci</a>(this, n) result(Wc)  
+    private pure function <a href='../proc/get_wci~2.html'>get_Wci</a>(this, n) result(Wc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -8614,7 +8614,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xc_all"></span>
+      <span class="anchor" id="boundprocedure-get_xc_all~2"></span>
       <h3>
           procedure, private ::
   <strong>get_Xc_all</strong>
@@ -8630,7 +8630,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xc_all.html'>get_Xc_all</a>(this) result(Xc)  
+    private pure function <a href='../proc/get_xc_all~2.html'>get_Xc_all</a>(this) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -8683,7 +8683,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xci"></span>
+      <span class="anchor" id="boundprocedure-get_xci~2"></span>
       <h3>
           procedure, private ::
   <strong>get_Xci</strong>
@@ -8699,7 +8699,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xci.html'>get_Xci</a>(this, n) result(Xc)  
+    private pure function <a href='../proc/get_xci~2.html'>get_Xci</a>(this, n) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -8767,7 +8767,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xcid"></span>
+      <span class="anchor" id="boundprocedure-get_xcid~2"></span>
       <h3>
           procedure, private ::
   <strong>get_Xcid</strong>
@@ -8783,7 +8783,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xcid.html'>get_Xcid</a>(this, n, dir) result(Xc)  
+    private pure function <a href='../proc/get_xcid~2.html'>get_Xcid</a>(this, n, dir) result(Xc)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -8866,7 +8866,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xg_all"></span>
+      <span class="anchor" id="boundprocedure-get_xg_all~2"></span>
       <h3>
           procedure, private ::
   <strong>get_Xg_all</strong>
@@ -8882,7 +8882,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xg_all.html'>get_Xg_all</a>(this) result(Xg)  
+    private pure function <a href='../proc/get_xg_all~2.html'>get_Xg_all</a>(this) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -8935,7 +8935,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xgi"></span>
+      <span class="anchor" id="boundprocedure-get_xgi~2"></span>
       <h3>
           procedure, private ::
   <strong>get_Xgi</strong>
@@ -8951,7 +8951,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xgi.html'>get_Xgi</a>(this, n) result(Xg)  
+    private pure function <a href='../proc/get_xgi~2.html'>get_Xgi</a>(this, n) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -9019,7 +9019,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_xgid"></span>
+      <span class="anchor" id="boundprocedure-get_xgid~2"></span>
       <h3>
           procedure, private ::
   <strong>get_Xgid</strong>
@@ -9035,7 +9035,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_xgid.html'>get_Xgid</a>(this, n, dir) result(Xg)  
+    private pure function <a href='../proc/get_xgid~2.html'>get_Xgid</a>(this, n, dir) result(Xg)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -9271,7 +9271,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_knot_all"></span>
+      <span class="anchor" id="boundprocedure-get_knot_all~2"></span>
       <h3>
           procedure, private ::
   <strong>get_knot_all</strong>
@@ -9287,7 +9287,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_knot_all.html'>get_knot_all</a>(this, dir) result(knot)  
+    private pure function <a href='../proc/get_knot_all~2.html'>get_knot_all</a>(this, dir) result(knot)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -9355,7 +9355,7 @@ <h4>
           <div class="row">
               <div class="card mt-3">
     <div class="card-header codesum">
-      <span class="anchor" id="boundprocedure-get_knoti"></span>
+      <span class="anchor" id="boundprocedure-get_knoti~2"></span>
       <h3>
           procedure, private ::
   <strong>get_knoti</strong>
@@ -9371,7 +9371,7 @@ <h3>
     <ul class="list-group">
         <li class="list-group-item">
                   <h3>
-    private pure function <a href='../proc/get_knoti.html'>get_knoti</a>(this, dir, i) result(knot)  
+    private pure function <a href='../proc/get_knoti~2.html'>get_knoti</a>(this, dir, i) result(knot)  
 </h3>
         <dl class="dl-horizontal">
         <dt>Author</dt><dd>Seyed Ali Ghasemi</dd>
@@ -9625,7 +9625,7 @@ <h4>
             <p class="text-end">
               Documentation generated by
               <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2024-07-01T09:54:44.473032             </p>
+ on 2024-07-01T10:00:02.512255             </p>
           </div>
         </div>
         <br>